Freshmark replication server

freshmark-canonical

Program drill-down

AUD_BYR_ACC_LIST

BUYER ACCOUNT CHANGES. Type DSP, base table DEBTOR_MAST.

Field inventory

29

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 291, 49
  
1 0.0 Label 4 T -1 621, 49
  
1 0.0 Label 5 T -1 671, 49
  
1 0.0 Label 6 T -1 621, 25
  
1 0.0 Label 7 T -1 671, 25
  
1 0.0 Label 8 T -1 191, 121
  
1 0.0 Label 9 T -1 191, 157
  
1 0.0 Label 10 T -1 191, 193
  
1 0.0 Work 11 I -1 301, 121
$SELECT  S:DEBTOR;I\DEBTOR    $CALCULATE  A:CONST;;T\PROG    I:I\DEBTOR;<>;  F:DEBTOR_MAST;Y;;T\NAME=DM_NAME;DM_DEBTOR='$I\DEBTOR$';I\DEBTOR  
1 0.0 Work 12 I -1 301, 157
$VALIDATE    I:I\FROMDATE;=;  A:DATE;DD MMM YYYY;I\FROMDATE
1 0.0 Work 13 I -1 301, 193
$VALIDATE    I:I\TODATE;=;  A:DATE;DD MMM YYYY;I\TODATE      
1 0.0 CMD 14 C -1 301, 265
$SELECT  I:I\FROMDATE;=;  A:DATE;YYYY MM DD;I\FROMDATE    I:I\TODATE;=;  A:DATE;YYYY MM DD;I\TODATE    A:CONST;PROCESSING....;T\PROG    'PATH THEN FOLLOWED BY PRINTING NAME THEN FOLLOWED BY PARAMETERS THEN LASTLY THE OUTPUT TYPE IE: S OR P OR Y  E:$GBLROOT$LEGEND\PROJ_FMS\BIN\PRINTING.EXE /PRINT=PRINT_AUD_BYR_ACC_LISTI
1 0.0 Label 15 T -1 261, 301
  
1 0.0 Work 16 I 0 1, 61
$DEFAULT    'LOAD MARKET CODE  A:ORG;;I\MARKET  A:ORGS;;I\ORGS    'LOAD MARKET  NAME  F:CLIENT_MAST;;;T\MARKET=CM_NAME;    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MARKET    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MARKET    'INITIALIZES THE DATE AND TIME INTO T
1 0.0 Work 17 I 0 31, 61
$DEFAULT  A:DATE;DD MMM YYYY;T\DATE  A:DATE;DD MMM YYYY;I\FROMDATE  A:DATE;DD MMM YYYY;I\TODATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000  
1 0.0 CMD 19 C -1 401, 121
$SELECT  S:DEBTOR;I\DEBTOR
1 0.0 Label 18 T -1 441, 121
  
1 0.0 Label 4 T -1 191, 229
  
1 0.0 Work 3 I -1 301, 229
$SELECT  S:FIELDS;I\FIELD_DESC      $VALIDATE  A:CONST;;T\PROG    I:I\FIELD_DESC;<>;  F:DEBTOR_MAST_FIELDS;Y;;I\FIELD_NAME=FIELD_NAME;FIELD_DESC='$I\FIELD_DESC$';I\FIELD_DESC        O:BACKCOLOR;C\RUN;YELLOW  O:SETFOCUS;C\RUN
1 0.0 CMD 5 C -1 501, 229
$SELECT  S:FIELDS;I\FIELD_NAME
1 0.0 Work 1 I 0 451, 421
  
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