Freshmark replication server

freshmark-canonical

Program drill-down

CT_DUMPS

CAPE TOWN DUMPS. Type DSP, base table DEBT_ADDR.

Field inventory

20

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 331, 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 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 501, 169
  '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 Label 10 T -1 231, 169
  
1 0.0 CMD 11 C -1 291, 205
$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 1000,$I\DATER$    O:BACKCOLOR;T\PROG;BLUE  A:CONST; DUMP RUN COMPLETED;T\PROG    'CLEAR FIELDS  A:DATE;DD MMM YYYY;
1 0.0 Label 12 T -1 261, 253
  
1 0.0 IND I 0 451, 169
  
1 0.0 Work 1 I -1 301, 169
$CALCULATE  M:  A:VAR;I\DATER;I\DATER;;YYYY-MM-DD    O:ENABLEINPUT;C\RUN  O:BACKCOLOR;C\RUN;YELLOW  O:SETFOCUS;C\RUN
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