Freshmark replication server

freshmark-canonical

Program drill-down

TOP_DEL_BYR_RESERV

TOP DELETED RESERVATIONS BY BUYER. Type DSP, base table DEBT_ADDR.

Field inventory

40

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 CMD 10 C -1 401, 241
$SELECT  S:DEBTOR;I\DEBTOR  
1 0.0 Work 8 I 0 1, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME    'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL  C:MCASE;;T\MARKET    A:CONST;N;I\DUMP  A:CONST;0;I\NUMBERS,I\FVALUE,I\TVALUE,I\PERC    'O:SETFOCUS;I\NUMBERS  O:SETFOCUS;I\AGENT  
1 0.0 CMD 2 C -1 301, 313
$SELECT     A:CONST;IN PROGRESS ...;T\PROG  E:$GBLROOT$LEGEND\PROJ_FMS\BIN\PRINTING2.EXE /PRINT=PRINT_TOP_DEL_RESERV_BY_BYR;$I\MARKET$,$I\AGENT$,$I\SDATE$,$I\EDATE$,$I\NUMBERS$,$I\DEBTOR$,$I\FVALUE$,$I\TVALUE$,$I\PERC$,$I\DUMP$,S  A:CONST;DONE PROGRESS !!!;T\PROG    A:DATE;DD MMM YYYY;I\SDATE  A:DATE;DD MMM YYYY;I\EDAT
1 0.0 CMD 4 C -1 351, 133
$SELECT  S:AGENT;I\AGENT
1 0.0 H -1 0, 0
  
1 0.0 Work 1 I -1 301, 133
$SELECT  S:AGENT;I\AGENT      $VALIDATE  C:UCASE  I:I\AGENT;=;  A:CONST;;T\AM_NAME    I:I\AGENT;<>;  F:AGENT_MAST;Y;;T\AM_NAME=AM_NAME;AM_CODE='$I\AGENT$';I\AGENT
1 0.0 Work 9 I 0 31, 61
$DEFAULT    A:DATE;DD MMM YYYY;T\DATE    A:DATE;DD MMM YYYY;I\SDATE  A:DATE;DD MMM YYYY;I\EDATE      A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000    A:CONST;N;I\DUMP        
1 0.0 Work 5 I -1 301, 277
$VALIDATE  C:UCASE  V:Y;N      O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW      
1 0.0 Work 4 I 0 41, 241
$VALIDATE    'M:
1 0.0 Work 8 I -1 301, 169
,$CALCULATE    ,A:DATEDIFF;I\SDATE;I\EDATE;#0    $VALIDATE    I:I\SDATE;=;  A:CONST;$T\DATE$;I\SDATE      M:    A:VAR;I\SDATE;I\EDATE      A:CONST;;T\PROG  M:
1 0.0 Work 9 I -1 301, 205
$VALIDATE  'A:DATEDIFF;I\SDATE;I\EDATE;#0            $CALCULATE  M:  
1 0.0 Work 10 I 0 491, 337
  
1 0.0 Work 1 I -1 301, 241
$SELECT  S:DEBTOR;I\DEBTOR      $VALIDATE  I:I\DEBTOR;=;  A:CONST;;T\NAME    I:I\DEBTOR;<>;  F:DEBTOR_MAST;Y;;T\NAME=DM_NAME;DM_DEBTOR='$I\DEBTOR$';I\DEBTOR
1 0.0 Work 2 I 0 31, 277
$VALIDATE  I:I\FVALUE;=;  A:CONST;0;I\FVALUE    
1 0.0 Work 3 I 0 31, 313
$VALIDATE  I:I\TVALUE;=;  A:CONST;0;I\TVALUE  
1 0.0 Work 7 I 0 31, 349
$VALIDATE  I:I\PERC;=;  A:CONST;0;I\PERC
1 0.0 Label 2 T -1 191, 133
  
1 0.0 Label 3 T -1 391, 133
  
1 0.0 Label 6 T -1 621, 49
  
1 0.0 Label 7 T -1 671, 49
  
1 0.0 Label 5 T -1 221, 49
  
1 0.0 Label 3 T -1 621, 25
  
1 0.0 Label 4 T -1 671, 25
  
1 0.0 Label 2 T -1 291, 25
  
1 0.0 Label 1 T -1 1, 25
  
1 0.0 Label 3 T -1 191, 277
  
1 0.0 Label 1 T 0 31, 241
  
1 0.0 Label 6 T -1 191, 169
  
1 0.0 Label 7 T -1 191, 205
  
1 0.0 Label 1 T -1 271, 349
  
1 0.0 Label 9 T -1 441, 241
  
1 0.0 Label 4 T -1 191, 241
  
1 0.0 Label 5 T 0 31, 277
  
1 0.0 Label 6 T 0 31, 313
  
1 0.0 Label 8 T 0 31, 349
  
10 0.0 ZX_DELETE Z 0 0, 0
  
10 0.0 ZX_PRINT Z 0 0, 0
  
10 0.0 ZX_SELECT Z 0 0, 0
  
10 0.0 ZX_EXIT Z 0 0, 0
  
10 0.0 ZX_UPDATE Z 0 0, 0