Freshmark replication server

freshmark-canonical

Program drill-down

PROV_SALES_VAL

PROFORMA SALES VALIDATION PERIOD. Type MAN, base table PROV_PERIOD.

Field inventory

27

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 PROV_PERIOD PP_CODE I -1 71, 181
$SELECT  'DISPLAY A SELECTION WINDOW  S:PERIOD_CODE;I\PP_CODE      $VALIDATE  'MAKE THIS FIELD MANDATORY  M:    'CONVERT TO UPPERCASE  C:UCASE    
1 0.0 PROV_PERIOD PP_CODE T -1 71, 157
  
1 0.0 PROV_PERIOD PP_DESC I -1 151, 181
$VALIDATE  'MAKE THIS FIELD MANDATORY  M:    'CONVERT TO UPPERCASE  C:UCASE    'REMOVE EMPTY SPACES ON EOTHER SIDE  A:TRIM;I\PP_DESC;I\PP_DESC      'CLEAR FIELDS  A:CONST;;W\TEMP1  A:CONST;;W\TEMP2    'CHECK IF CODE ALREADY EXISTS  U:PALLET_TYPE;CODE_CHECK;I\PP_CODE,G\GRID,W\TEMP1,I\PP_DESC    I:W\TEMP1;=;N  U:PALLET_T
1 0.0 PROV_PERIOD PP_DESC T -1 151, 157
  
1 0.0 PROV_PERIOD PP_NODAYS I -1 491, 181
$VALIDATE  'MAKE THIS FIELD MANDATORY  M:      
1 0.0 PROV_PERIOD PP_NODAYS T -1 491, 157
  
1 0.0 Work 4 G -1 71, 205
  
1 0.0 Work 5 I 0 21, 121
$DEFAULT    A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000    U:ZZGRID_SPLIT;INIT_GRID;G\GRID;I\PP_CODE,I\PP_DESC,I\PP_NODAYS,I\PP_BLOCKED  U:ZZGRID_SPLIT;DB_TO_GRID;G\GRID;PROV_PERIOD
1 0.0 Work 6 I 0 21, 85
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME      'CONVERT ONLY THE FIRST CHARACTER OF THE MARKET LABEL  C:MCASE;;T\MARKET    
1 0.0 Label 7 T -1 1, 25
  
1 0.0 Label 8 T -1 291, 25
  
1 0.0 Label 9 T -1 241, 49
  
1 0.0 Label 10 T -1 621, 25
  
1 0.0 Label 11 T -1 671, 49
  
1 0.0 Label 12 T -1 621, 49
  
1 0.0 Label 13 T -1 671, 25
  
1 0.0 CMD 14 C -1 121, 181
$SELECT  'DISPLAY A SELECTION WINDOW  S:PERIOD_CODE;I\PP_CODE
1 0.0 Work 15 I 0 161, 397
  
1 0.0 Work 16 I 0 211, 397
  
1 0.0 PROV_PERIOD PP_BLOCKED I -1 621, 181
$VALIDATE  'MAKE THIS FIELD MANDATORY  M:    'CONVERT TO UPPERCASE  C:UCASE    'ALLOW ONLY A 'Y' OR 'N'  V:Y;N    $AFTER_READ  I:I\PP_BLOCKED;=;  A:CONST;N;I\PP_BLOCKED
1 0.0 T -1 621, 157
  
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