Freshmark replication server

freshmark-canonical

Program drill-down

OTHER_DP_LABELS

COTHER DEPOSIT LABELS. Type DSP, base table STK_TRANS.

Field inventory

26

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 CMD 14 C -1 341, 289
$SELECT    I:I\DEBTOR;=;  DO(PUS)    I:I\DEPNO;=;    D:PLEASE ENTER DEPOSITOR OR DEPNO;ERRORM;I\DEBTOR  DOEND(PUS)    I:I\DEPNO;=;  D:DEPOSIT NO IS A MANDATORY FIELD;ERRORM;I\DEPNO    A:CONST;IN PROGRESS...;T\PROG  U:CS_DEPOSIT_LABELS;OTHER_DP  A:CONST;DONE !!!;T\PROG    A:CONST;;I\AGENT,I\DEBTOR,I\DEPNO,I\NUMB_LABELS,
1 0.0 H -1 0, 0
  
1 0.0 Work 12 I 0 51, 61
  
1 0.0 Work 1 I -1 361, 205
$SELECT  'SELECT DEPOSIT NUMBER FROM THE SELECTION WINDOW  S:DEPOSIT_NO;I\DEPNO;I\MARKET    $VALIDATE  M:    I:I\DEPNO;<>;  DO(D)    I:I\DEBTOR;<>;    F:LOC_TRANS;Y;;;LT_MARKET = '$I\MARKET$' AND LT_DEPNO = '$I\DEPNO$' AND LT_DEBTOR = '$I\DEBTOR$';I\DEPNO      I:I\DEBTOTR;=;    F:LOC_TRANS;Y;;;LT_MARKET = '$I\MARKET$' 
1 0.0 Work 8 I -1 361, 133
$VALIDATE  A:CONST;;T\PROG    I:I\AGENT;<>;  F:AGENT_MAST;Y;;T\AGENT_NAME=AM_NAME;AM_CODE='$I\AGENT$';I\AGENT
1 0.0 Work 1 I -1 361, 169
$VALIDATE  C:UCASE  I:I\DOCNO;<>;  DO(I)    I:I\AGENT;=;    F:LOC_TRANS;Y;;;LT_MARKET = '$I\MARKET$' AND LT_DEBTOR = '$I\DEBTOR$';I\DEBTOR      I:I\AGENT;<>;    F:LOC_TRANS;Y;;;LT_MARKET = '$I\MARKET$' AND LT_DEBTOR = '$I\DEBTOR$' AND LT_AGENT = '$I\AGENT$';I\DEBTOR  DOEND(I)
1 0.0 Work 11 I 0 11, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET  A:ORGS;;I\ORGS  A:ORGS;;I\AGENT    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MKT=CM_NAME    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MKT    A:TIME;HH:MM:SS;T\TIME  A:DATE;DD MMM YYYY;T\DATE  A:DATE;DD MMM YYYY;I\SDATE  A:DATE;DD MMM YYYY;I\ED
1 0.0 Work 1 I -1 361, 241
$VALIDATE    I:I\DEBTOR;=;  DO(PUS)    I:I\DEPNO;=;    D:PLEASE ENTER DEPOSITOR OR DEPNO;ERRORM;I\DEBTOR  DOEND(PUS)      M:  I:I\NUMB_LABELS;=;0  D:ENTER A NUMBER OF COPIES MORE THAN ZERO;ERRORM;I\NUMB_LABELS    O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW
1 0.0 Label 6 T -1 671, 49
  
1 0.0 Label 2 T -1 241, 169
  
1 0.0 Label 6 T -1 241, 133
  
1 0.0 Label 9 T -1 421, 133
  
1 0.0 Label 2 T -1 241, 241
  
1 0.0 Label 5 T -1 621, 49
  
1 0.0 Label 4 T -1 671, 25
  
1 0.0 Label 16 T -1 281, 325
  
1 0.0 Label 15 T -1 211, 49
  
1 0.0 Label 2 T -1 241, 205
  
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 621, 25
  
10 0.0 ZX_EXIT 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_DELETE Z 0 0, 0
  
10 0.0 ZX_UPDATE Z 0 0, 0