Freshmark replication server

freshmark-canonical

Program drill-down

SALESMAN_REPORT_DUMP

SALESMAN REPORT DUMP. Type DSP, base table DEBT_ADDR.

Field inventory

28

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 CMD 11 C -1 351, 289
$SELECT  'DISABLE THE BUTTON TO DISALLOW A DOUBLE RUN  O:DISABLEINPUT;C\RUN    O:BACKCOLOR;T\PROG;RED  A:CONST;DUMP RUN IN PROGRESS;T\PROG  'CALL THE DUMPS  E:$GBLROOT$LEGEND\PROJ_FMS\STATS\DAILYSTATS.EXE 114,$I\FDATE$,$I\TDATE$,$I\AGENT$,$I\SMAN$    O:BACKCOLOR;T\PROG;BLUE  A:CONST; DUMP RUN COMPLETED;T\PROG    'CLEAR
1 0.0 H -1 0, 0
  
1 0.0 Work 8 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:DATE;DD 
1 0.0 Work 9 I 0 521, 133
  'ENABLE THE BUTTON AFTER THE INDICATOR IS SET  I:I\RUN;=;Y  DO(VGM)    O:ENABLEINPUT;C\RUN    O:BACKCOLOR;C\RUN;YELLOW    O:SETFOCUS;C\RUN  DOEND(VGM)
1 0.0 IND I 0 501, 133
  
1 0.0 Work 1 I -1 381, 205
$CALCULATE  M:  A:VAR;I\TDATE;I\TDATE;;YYYY-MM-DD    
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 291, 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 Label 10 T -1 281, 205
  
1 0.0 Label 12 T -1 341, 325
  
1 0.0 Work 1 I -1 381, 133
$VALIDATE  C:UCASE  I:I\AGENT;<>;  F:AGENT_MAST;Y;;T\AGENT_NAME=AM_NAME;AM_CODE='$I\AGENT$';I\AGENT
1 0.0 Label 1 T -1 441, 133
  
1 0.0 Label 1 T -1 281, 241
  
1 0.0 Work 2 I -1 381, 241
$SELECT  I:I\AGENT;<>;  S:SALESMAN_AGENT;I\SMAN;I\AGENT    I:I\AGENT;=;  S:SALESMAN;I\SMAN    $CALCULATE  I:I\SMAN;=;  A:CONST;ALL;T\SMAN_NAME    I:I\SMAN;<>;  DO(K22)    I:I\AGENT;<>;    F:SALESMAN_MAST;Y;;T\SMAN_NAME=SLS_NAME;SLS_CODE='$I\SMAN$' AND SLS_AGENT='$I\AGENT$';I\SMAN      I:I\AGENT;=;    F:SALESMAN_MAST;Y;
1 0.0 Label 4 T -1 281, 169
  
1 0.0 Label 2 T -1 281, 133
  
1 0.0 Label 1 T -1 491, 241
  
1 0.0 Work 3 I -1 381, 169
$CALCULATE  M:  A:VAR;I\FDATE;I\FDATE;;YYYY-MM-DD
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