Freshmark replication server

freshmark-canonical

Program drill-down

DIRECT_D_SLS_AMEND

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 Work 3 I -1 101, 205
  
1 0.0 Work 4 I -1 311, 205
  
1 0.0 CMD 1 C -1 321, 349
$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 Label 1 T -1 1, 205
  
1 0.0 Label 2 T -1 201, 205
  
1 0.0 Label 5 T -1 421, 205
  
1 0.0 Work 6 I -1 521, 205
  
1 0.0 Label 7 T -1 421, 169
  
1 0.0 Work 8 I -1 521, 169
  
1 0.0 SMD_SUPPL_REFNO I -1 521, 241
$VALIDATE  O:SETFOCUS;C\RUN  O:BACKCOLOR;C\RUN;YELLOW
1 0.0 Work 1 I 0 21, 517
  
1 0.0 SM_DDATE I 0 61, 49
  
1 0.0 SMD_BLOCK I 0 81, 565
  
1 0.0 CMD 4 C -1 191, 121
$SELECT  S:DIRECT_DELIV;I\SMD_DELNO
1 0.0 CMD 3 C -1 191, 169
  
1 0.0 CMD 4 C -1 191, 145
$SELECT    S:TENANT_CODE;I\SMD_TENANT
1 0.0 H -1 1, 115
  
1 0.0 I 0 1, 541
  
1 0.0 Work 1 I 0 1, 565
  
1 0.0 Work 2 I 0 21, 541
  
1 0.0 ORGS I 0 101, 49
  
1 0.0 Work 2 I 0 1, 517
  
1 0.0 MKT_ROOM I 0 701, 115
  
1 0.0 CM_DEL_LEN I 0 31, 73
  
1 0.0 Work 1 I 0 81, 517
  
1 0.0 AGENT I 0 41, 49
$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, 49
$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, 73
  
1 0.0 SMD_TENANT I -1 101, 145
$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
1 0.0 SMD_SUPP I -1 101, 169
$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 101, 241
    
1 0.0 SMD_DELNO I -1 101, 121
  $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 311, 241
  
1 0.0 Work 1 I 0 81, 49
$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, 445
  
1 0.0 SMD_DTIME I 0 41, 541
  
1 0.0 SMD_DATE I 0 41, 565
  
1 0.0 SMD_TIME I 0 61, 541
  
1 0.0 SMD_USER I 0 61, 565
  
1 0.0 Work 1 I 0 121, 49
  
1 0.0 UPDATE_FLAG I 0 21, 49
  
1 0.0 Work 1 I 0 1, 73
  
1 0.0 DEPOSITS I 0 61, 73
  
1 0.0 Work 1 I 0 141, 49
  
1 0.0 Work 1 I 0 81, 541
  
1 0.0 Work 2 I 0 41, 517
  
1 0.0 Work 3 I 0 61, 517
  
1 0.0 I 0 1, 493
  
1 0.0 I 0 1, 469
  
1 0.0 I 0 101, 493
  
1 0.0 I 0 101, 517
  
1 0.0 I 0 101, 469
  
1 0.0 Label 1 T -1 231, 145
  
1 0.0 Label 2 T -1 231, 169
  
1 0.0 Label 2 T -1 1, 25
  
1 0.0 Label 6 T -1 671, 49
  
1 0.0 Label 12 T -1 1, 169
  
1 0.0 Label 3 T -1 621, 25
  
1 0.0 Label 1 T -1 291, 25
  
1 0.0 T -1 1, 241
  
1 0.0 Label 5 T -1 671, 25
  
1 0.0 Label 4 T -1 621, 49
  
1 0.0 DELNO T -1 1, 121
  
1 0.0 AGENT_NAME T -1 211, 241
  
1 0.0 TENANT T -1 1, 145
  
1 0.0 Label 8 T -1 251, 49
  
1 0.0 Label 1 T -1 421, 241
  
10 0.0 ZX_PRINT Z 0 1, 115
  
10 0.0 ZX_SELECT Z 0 1, 115
  
10 0.0 ZX_DELETE Z 0 1, 115
  
10 0.0 ZX_UPDATE Z 0 1, 115
  
10 0.0 ZX_EXIT Z 0 1, 115