Freshmark replication server

freshmark-canonical

Program drill-down

DELIVERY_LINK_MAN

DELIVERY LINK MAINTENANCE. Type MAN, base table STK_MAST.

Field inventory

44

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 STK_MAST SM_DELTYPE T -1 211, 157
  
1 0.0 STK_MAST SM_LINKDELNO I -1 411, 373
$SELECT  'DISPLAY A SELECTION WINDOW  S:DELIVERY_NO;I\SM_LINKDELNO    $VALIDATE  'MAKE THIS FIELD MANDATORY  M:    'CLEAR WORK FIELDS  A:CONST;;W\TMP3,W\TMP4    I:I\SM_DELNO;<>;  A:ZEROFILL;I\SM_LINKDELNO,W\ZEROFILL,I\SM_LINKDELNO    'DISPLAY ERROR MESSAGE IF THE VALUE DOES NOT EXIST IN THE STK_MAST TABLE  F:STK_MAST;Y
1 0.0 STK_MAST SM_SUPP I -1 331, 301
  
1 0.0 STK_MAST SM_SUPP T -1 211, 301
  
1 0.0 STK_MAST SM_DELTYPE I -1 331, 157
  
1 0.0 CMD 5 C -1 461, 109
$SELECT  'DISPLAY A SELECTION WINDOW  S:DELIVERY_NO;I\SM_DELNO  
1 0.0 STK_MAST SM_DDATE I -1 331, 253
  
1 0.0 STK_MAST SM_DDATE T -1 211, 253
  
1 0.0 STK_MAST SM_DELNO T -1 211, 109
  
1 0.0 STK_MAST SM_AGENT I -1 331, 205
  
1 0.0 STK_MAST SM_AGENT T -1 211, 205
  
1 0.0 STK_MAST SM_DELNO I -1 331, 109
$SELECT  'DISPLAY A SELECTION WINDOW  S:DELIVERY_NO;I\SM_DELNO    $VALIDATE  'MAKE THIS FIELD MANDATORY  M:  I:I\SM_DELNO;<>;  A:ZEROFILL;I\SM_DELNO,W\ZEROFILL,I\SM_DELNO    F:STK_MAST;Y;SM_DELNO;W\TEMP=SM_LINKDELNO  F:STK_MAST;Y;SM_DELNO;I\TEMP=SM_LINKDELNO      $AFTER_READ  'DISPLAY THE DESCRIPTIONS FOR NEXT TO THE F
1 0.0 Label 8 T -1 321, 49
  
1 0.0 Label 1 T -1 291, 25
  
1 0.0 MARKET T -1 1, 25
  
1 0.0 Label 3 T -1 621, 25
  
1 0.0 Label 4 T -1 621, 49
  
1 0.0 Label 5 T -1 671, 25
  
1 0.0 Label 6 T -1 671, 49
  
1 0.0 DEFAULT I 0 1, 49
$DEFAULT    A:DATE;DD MMM/YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000  
1 0.0 STK_MAST SM_LINKDELNO T -1 211, 373
  
1 0.0 CMD 2 C -1 501, 373
$SELECT  'DISPLAY A SELECTION WINDOW  S:DELIVERY_NO;I\SM_LINKDELNO  
1 0.0 Label 3 T -1 401, 157
  
1 0.0 Label 6 T -1 381, 205
  
1 0.0 Label 7 T -1 421, 301
  
1 0.0 Work 1 I 0 11, 493
  
1 0.0 Work 2 I 0 141, 493
  
1 0.0 Work 3 I 0 251, 493
  
1 0.0 Work 4 I 0 371, 493
  
1 0.0 SUPPLIER I 0 371, 457
  
1 0.0 AGENT I 0 141, 457
  
1 0.0 DELIVERY TYPE I 0 31, 457
  
1 0.0 WTEMP I 0 561, 373
  
1 0.0 I TEMP I 0 561, 409
  
1 0.0 Work 1 I 0 61, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,W\ZEROFILL=CM_DEL_LEN    'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL  C:MCASE;;T\MARKET
1 0.0 Work 1 I 0 621, 469
  
1 0.0 Work 2 I 0 581, 469
  
1 0.0 ZERO FILL LENGTH I 0 501, 109
  
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