Freshmark replication server

freshmark-canonical

Program drill-down

PROHIBIT_SALES

PROHIBIT SALES. Type MAN, base table CLIENT_MAST.

Field inventory

31

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 Label 8 T -1 671, 25
  
1 0.0 H -1 0, 0
  
1 0.0 Label 1 T -1 291, 25
  
1 0.0 Label 2 T -1 331, 49
  
1 0.0 Label 3 T -1 1, 25
  
1 0.0 Work 4 I 0 11, 73
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET  A:CONST;N;I\ALLOW_DOCARCH    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME,I\DOCARCH_RUN_IND=CM_DOCARCH_RUN_TIME    'LOAD MARKET CODE  F:CLIENT_MAST;;CM_CODE;I\CM_CODE=CM_CODE        'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL  C:MCASE;;T\MARKET     
1 0.0 Work 5 I 0 11, 109
$DEFAULT    A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000    I:I\MARKET;=;15  O:HIDE;T\CM_PROHIBIT_SALES    I:I\MARKET;<>;15  O:HIDE;T\PROHIBIT_ALL,T\CM_PROHIBIT_AGENT_SALES,I\CM_PROHIBIT_AGENT_SALES    O:CAPTION_UPD;UPDATE  
1 0.0 CLIENT_MAST CM_PROHIBIT_SALES I -1 341, 181
$VALIDATE  'MAKE THIS FIELD MANDATORY  M:    'CONVERT TO UPPERCASE  C:UCASE    'ALLOW 'Y' OR 'N' ONLY  V:Y;N    'DEFAULT TO 'N' IF LEFT BLANK  I:I\CM_PROHIBIT_SALES;=;  A:CONST;N;I\CM_PROHIBIT_SALES    '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-  'NEW CHECK BY JD 20150702 -
1 0.0 CLIENT_MAST CM_PROHIBIT_SALES T -1 181, 181
$DEFAULT  C:LCASE
1 0.0 Label 7 T -1 621, 25
  
1 0.0 Label 9 T -1 621, 49
  
1 0.0 Label 10 T -1 671, 49
  
1 0.0 CLIENT_MAST CM_CODE I 0 61, 73
  
1 0.0 CLIENT_MAST CM_PROHIBIT_CASHIERS I -1 341, 217
$VALIDATE    'CONVERT TO UPPERCASE  C:UCASE    'ALLOW 'Y' OR 'N' ONLY  V:Y;N;    'DEFAULT TO 'N' IF LEFT BLANK  I:I\CM_PROHIBIT_CASHIERS;=;  A:CONST;N;I\CM_PROHIBIT_CASHIERS    'MAKE THIS FIELD MANDATORY  M:
1 0.0 Label 1 T -1 181, 253
  
1 0.0 Label 2 T -1 181, 217
  
1 0.0 CLIENT_MAST CM_PROHIBIT_GENERAL I -1 341, 253
$DEFAULT  A:USERID;;I\CM_USER  $VALIDATE    'CONVERT TO UPPERCASE  C:UCASE    'ALLOW 'Y' OR 'N' ONLY  V:Y;N;    'DEFAULT TO 'N' IF LEFT BLANK  I:I\CM_PROHIBIT_GENERAL;=;  A:CONST;N;I\CM_PROHIBIT_GENERAL    'MAKE THIS FIELD MANDATORY  M:          '$BEFORE_WRITE  'U:AUD_PROHIBIT_SALES_UPD;UPDATE
1 0.0 Label 2 T 0 181, 289
  
1 0.0 Work 1 I 0 41, 337
  
1 0.0 CLIENT_MAST CM_PROHIBIT_STATS I 0 341, 289
'$VALIDATE  ''MAKE THIS FIELD MANDATORY  'M:    ''CONVERT TO UPPERCASE  'C:UCASE    ''ALLOW 'Y' OR 'N' ONLY  'V:Y;N    ''DEFAULT TO 'N' IF LEFT BLANK  'I:I\CM_PROHIBIT_STATS;=;  'A:CONST;N;I\CM_PROHIBIT_STATS    $BEFORE_WRITE  A:CONST;N;I\CM_PROHIBIT_STATS  U:AUD_PROHIBIT_SALES_UPD;UPDATE    I:I\CM_PROHIBIT_AGENT_SALES
1 0.0 Label 1 T -1 181, 145
  
1 0.0 CLIENT_MAST CM_PROHIBIT_AGENT_SALES I -1 341, 145
$VALIDATE  'CONVERT TO UPPERCASE  C:UCASE    'ALLOW 'Y' OR 'N' ONLY  V:Y;N;    'DEFAULT TO 'N' IF LEFT BLANK  I:I\CM_PROHIBIT_AGENT_SALES;=;  A:CONST;N;I\CM_PROHIBIT_AGENT_SALES
1 0.0 Label 1 T -1 181, 181
  
1 0.0 Work 1 I 0 101, 73
  
1 0.0 Work 2 I 0 131, 73
  
1 0.0 EDI_CHK I 0 341, 97
  
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