Freshmark replication server

freshmark-canonical

Program drill-down

AGENT_FAX_MSG

AGENT FAX MSG. Type DSP, base table AGENT_FAX_MESSAGE.

Field inventory

23

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 H -1 0, 0
  
1 0.0 Label 1 T -1 1, 25
  
1 0.0 Label 2 T -1 291, 25
  
1 0.0 Label 3 T -1 281, 49
  
1 0.0 Label 4 T -1 621, 25
  
1 0.0 Label 5 T -1 671, 25
  
1 0.0 Label 6 T -1 621, 49
  
1 0.0 Label 7 T -1 671, 49
  
1 0.0 MARKET I 0 11, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MARKET    'INITIALIZES THE DATE AND TIME INTO THE T\DATE AND T\TIME FIELDS  A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1
1 0.0 AGENT I -1 351, 145
$SELECT  S:AGENT_CODE;I\AGENT    $CALCULATE  M:  C:UCASE  F:AGENT_MAST;Y;;T\AGN_NAME=AM_NAME;AM_CODE='$I\AGENT$';I\AGENT  F:AGENT_FAX_MESSAGE;;;I\MESSAGE=AFM_MESSAGE;AFM_CODE='$I\AGENT$'
1 0.0 Label 10 T -1 261, 145
  
1 0.0 Label 11 T -1 451, 145
  
1 0.0 CMD 12 C -1 411, 145
$SELECT  S:AGENT_CODE;I\AGENT
1 0.0 MESSAGE I -1 101, 217
$CALCULATE  O:SETFOCUS;C\UPD  O:BACKCOLOR;C\UPD;YELLOW
1 0.0 Label 14 T -1 1, 217
  
1 0.0 CMD 15 C -1 241, 385
$SELECT  A:CONST;;I\MESSAGE  O:SETFOCUS;I\MESSAGE
1 0.0 CMD 16 C -1 391, 385
$SELECT    I:I\ORGS;<>;  DO(C2M)    I:I\AGENT;<>;I\ORGS    D:AGENT SELECTED DOES NOT MATCH LOGIN;ERRORM;I\MESSAGE  DOEND(C2M)    U:AGENT_FAX_MESSAGE;UPDATE    I:I\ORGS;=;  A:CONST;;I\AGENT,T\AGN_NAME,I\MESSAGE    I:I\ORGS;<>;  A:CONST;;I\MESSAGE    I:I\ORGS;=;  O:SETFOCUS;I\AGENT    I:I\ORGS;<>;  O:SETFOCUS;I\MESSAGE
1 0.0 ORGS I 0 31, 61
  
10 0.0 ZX_PRINT Z 0 0, 0
  
10 0.0 ZX_SELECT Z 0 0, 0
  
10 0.0 ZX_DELETE Z 0 0, 0
  
10 0.0 ZX_UPDATE Z 0 0, 0
  
10 0.0 ZX_EXIT Z 0 0, 0