Freshmark replication server

freshmark-canonical

Program drill-down

DIRECT_SLS_AMEND_PRE

DIRECT DELIVERY SALES AMEND. Type DSP, base table STK_MAST_DIRECT.

Field inventory

72

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 CMD 1 C -1 321, 439
$SELECT  U:AMEND_DIRECT_DELIV;UPDATE_STK_MAST_DIRECT  A:CONST;;I\SMD_DDATE,I\SMD_TENANT,I\SMD_SUPP,I\SMD_INV,I\SMD_MKTREFNO,I\SMD_SUPPLREFNO,I\SMD_VREGNO,I\SMD_DELNO  A:CONST;;I\DELIV_DTE,I\DELIV_TIME,I\CONF_DTE,I\CONF_TIME  O:SETFOCUS;I\SMD_DELNO
1 0.0 CMD 4 C -1 191, 151
$SELECT  S:DIRECT_DELIV;I\SMD_DELNO
1 0.0 CMD 3 C -1 191, 199
  
1 0.0 CMD 4 C -1 191, 175
$SELECT    S:TENANT_CODE;I\SMD_TENANT
1 0.0 H -1 1, 145
  
1 0.0 Work 3 I -1 431, 265
  
1 0.0 Work 4 I -1 111, 265
$AFTER_READ  'DEFAULT CURRENT DATE  I:I\DELIV_DTE;=;  A:DATE;DD MMM YYYY;I\DELIV_DTE  I:I\DELIV_DTE;=;  A:VAR;I\SM_DDATE;I\DELIV_DTE      $VALIDATE  I:I\DELIV_DTE;=;  A:DATE;DD MMM YYYY;I\DELIV_DTE     M:
1 0.0 Work 6 I -1 431, 241
  
1 0.0 Work 8 I -1 111, 241
  
1 0.0 SMD_SUPPL_REFNO I -1 431, 301
$VALIDATE  O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW
1 0.0 Work 1 I 0 21, 547
  
1 0.0 SM_DDATE I 0 61, 79
  
1 0.0 SMD_BLOCK I 0 81, 595
  
1 0.0 I 0 1, 571
  
1 0.0 Work 1 I 0 1, 595
  
1 0.0 Work 2 I 0 21, 571
  
1 0.0 ORGS I 0 101, 79
  
1 0.0 Work 2 I 0 1, 547
  
1 0.0 MKT_ROOM I 0 701, 145
  
1 0.0 CM_DEL_LEN I 0 31, 103
  
1 0.0 Work 1 I 0 81, 547
  
1 0.0 AGENT I 0 41, 79
$DEFAULT  A:ORGS;;I\AGENT  A:ORGS;;I\ORGS    'GET USERNAME  A:USERID;;I\USER  A:USERID;;I\SMD_USER  'GET USER IP  A:USERIP;;I\IP      A:USERID;;I\SMD_CONF_USER  'GET USER IP  A:USERIP;;I\SMD_CONF_IP    A:CONST;N;I\SMD_BLOCK  'LOAD AGENT NAME  F:AGENT_MAST;;AM_CODE;T\AGENT=AM_NAME    'READ FMSX DETAILS FOR THE USER AND 
1 0.0 STK_MAST_DIRECT SMD_MARKET I 0 1, 79
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;I\CHARGEDAILY=CM_GENERATE_CS_CHARGE,I\OWN_CR=CM_OWN_ROOMS,I\TMP_TARIFF=CM_CS_MAX_CHARGE,I\TARIFF_OVRRD=CM_CS_ALLOW_TO,T\MARKET=CM_NAME,W\CM_DEL_LEN=CM_DEL_LEN,W\VATCODE=CM_CSVATCD,W\CS_MIN=CM_CS_MIN_CHARGE,W\CS_MAX=CM_CS_MAX_CHAR
1 0.0 WW I 0 51, 103
  
1 0.0 SMD_TENANT I -1 101, 175
$SELECT    S:TENANT_CODE;I\SMD_TENANT    $VALIDATE  M:  A:VAR;I\SMD_TENANT;I\SMD_TENANT;;000  F:TENANT_MAST;Y;;T\TENANT_NAME=TM_NAME;TM_CODE='$I\SMD_TENANT$';I\SMD_TENANT    F:STK_MAST_DIRECT;;;I\CONF=SMD_CONFIRMED;SMD_MARKET='$I\MARKET$' AND SMD_DELNO='$I\SMD_DELNO$'AND SMD_DELIND<>'Y';I\TENANT  I:I\CONF;=;Y  D:YOU CA
1 0.0 SMD_SUPP I -1 101, 199
$SELECT    S:SUPPLIER_MAST;I\SMD_SUPP    $VALIDATE  M:  A:VAR;I\SMD_SUPP;I\SMD_SUPP;;000000  F:SUPPLIER_MAST;Y;;T\SUPPL_NAME=SUM_NAME;SUM_SUPPL='$I\SMD_SUPP$';I\SMD_SUPP
1 0.0 SMD_INV I -1 111, 301
    
1 0.0 SMD_DELNO I -1 101, 151
  $SELECT  S:DIRECT_DELIV;I\SMD_DELNO  $VALIDATE  M:    A:VAR;I\SMD_DELNO;I\SMD_DELNO;;000000    F:STK_MAST_DIRECT;Y;;I\SMD_DDATE=SMD_DDATE,I\SMD_TENANT=SMD_TENANT,I\SMD_SUPP=SMD_SUPP,I\SMD_INV=SMD_INV,I\SMD_MKTREFNO=SMD_MKTREFNO,I\SMD_SUPPLREFNO=SMD_SUPPL_REFNO,I\TMP_CONF=SMD_CONFIRMED,I\SMD_VREGNO=SMD_VREGNO;SMD_MARK
1 0.0 SMD_MKTREFNO I -1 111, 337
$VALIDATE  O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW
1 0.0 Work 1 I 0 81, 79
$DEFAULT    'PUTS PIC ON THE UPDATE BUTTON  O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\CREATE    A:DATE;DD MMM/YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIME;HH:MM:SS;I\SMD_DTIME  A:TIME;HH:MM:SS;I\SMD_TIME  'A:TIMER_ON;1000  ''A:DATE;YYYY/MM/DD;I\SMD_DDATE  A:DATE;YYYY/MM/DD;I\SMD_DATE  A:TIME;HH:MM:SS;I\
1 0.0 SMD_DDATE I 0 1, 475
  
1 0.0 SMD_DTIME I 0 41, 571
  
1 0.0 SMD_DATE I 0 41, 595
  
1 0.0 SMD_TIME I 0 61, 571
  
1 0.0 SMD_USER I 0 61, 595
  
1 0.0 Work 1 I 0 121, 79
  
1 0.0 UPDATE_FLAG I 0 21, 79
  
1 0.0 Work 1 I 0 1, 103
  
1 0.0 DEPOSITS I 0 61, 103
  
1 0.0 Work 1 I 0 141, 79
  
1 0.0 Work 1 I 0 81, 571
  
1 0.0 Work 2 I 0 41, 547
  
1 0.0 Work 3 I 0 61, 547
  
1 0.0 I 0 1, 523
  
1 0.0 I 0 1, 499
  
1 0.0 I 0 101, 523
  
1 0.0 I 0 101, 547
  
1 0.0 I 0 101, 499
  
1 0.0 Label 1 T -1 311, 265
  
1 0.0 Label 2 T -1 1, 265
  
1 0.0 Label 5 T -1 311, 241
  
1 0.0 Label 7 T -1 1, 241
  
1 0.0 Label 1 T -1 231, 175
  
1 0.0 Label 2 T -1 231, 199
  
1 0.0 Label 2 T -1 1, 55
  
1 0.0 Label 6 T -1 671, 79
  
1 0.0 Label 12 T -1 1, 199
  
1 0.0 Label 3 T -1 621, 55
  
1 0.0 Label 1 T -1 291, 37
  
1 0.0 T -1 1, 301
  
1 0.0 Label 5 T -1 671, 55
  
1 0.0 Label 4 T -1 621, 79
  
1 0.0 DELNO T -1 1, 151
  
1 0.0 AGENT_NAME T -1 1, 337
  
1 0.0 TENANT T -1 1, 175
  
1 0.0 Label 8 T -1 291, 61
  
1 0.0 Label 1 T -1 311, 301
  
1 0.0 Work 1 I 0 221, 481
  
10 0.0 ZX_PRINT Z 0 1, 145
  
10 0.0 ZX_SELECT Z 0 1, 145
  
10 0.0 ZX_DELETE Z 0 1, 145
  
10 0.0 ZX_UPDATE Z 0 1, 145
  
10 0.0 ZX_EXIT Z 0 1, 145