Freshmark replication server

freshmark-canonical

Program drill-down

SUPPL_PROD_PROV_MAN

SUPPLIER PRODUCT PROVINCE MAINT. Type MDL, base table SUPPL_PROD_PROV.

Field inventory

37

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 Label 16 T -1 671, 25
  
1 0.0 Label 15 T -1 621, 49
  
1 0.0 H -1 1, 1
  
1 0.0 Label 14 T -1 621, 25
  
1 0.0 Label 8 T -1 291, 25
  
1 0.0 Label 17 T -1 671, 49
  
1 0.0 Label 21 T -1 1, 25
  
1 0.0 SUPPL_PROD_PROV SPP_PROV I -1 531, 205
$SELECT  S:PROVINCE;I\SPP_PROV    $CALCULATE  'LOAD A LABEL ACCORDING TO A SELECTED ITEM  F:PROV_MAST;Y;PR_PROV;I\PROVINCE=PR_DESC;;I\SPP_PROV  U:ZZGRID_SPLIT;DB_TO_GRID;G\GRID;SUPPL_PROD_PROV,SPP_CODE='$I\SPP_CODE$',SPP_PROD='$I\SPP_PROD$',SPP_PROV='$I\SPP_PROV$'        $VALIDATE  M:  C:UCASE  A:ISNUMERIC;I\SPP_PROV;I
1 0.0 Label 9 T -1 221, 49
  
1 0.0 SUPPL_PROD_PROV SPP_CODE I -1 61, 205
$SELECT  I:I\AGENT;<>;  S:SUPPLIER_MAST1;I\SPP_CODE;I\AGENT    I:I\AGENT;=;  S:SUPPLIER_MAST;I\SPP_CODE    $CALCULATE  M:  A:CONST;;I\SPP_PROD,I\SPP_PROV,I\PRODUCT,I\PROVINCE  I:I\AGENT;<>;  DO(AGENT)  F:SUPPLIER_MAST;Y;;I\SPP_CODE=SUM_SUPPL;SUM_SUPPL='$I\SPP_CODE$' AND SUM_AGENT_CODE LIKE '%$I\AGENT$%';I\SPP_CODE  U:Z
1 0.0 SUPPL_PROD_PROV SPP_PROV T -1 531, 181
  
1 0.0 CMD 2 C -1 161, 205
$SELECT  I:I\AGENT;<>;  S:SUPPLIER_MAST1;I\SPP_CODE;I\AGENT    I:I\AGENT;=;  S:SUPPLIER_MAST;I\SPP_CODE  
1 0.0 Work 3 G -1 61, 229
  
1 0.0 SUPPL_PROD_PROV SPP_CODE T -1 61, 181
  
1 0.0 CMD 1 C -1 571, 205
$SELECT  S:PROVINCE;I\SPP_PROV  
1 0.0 SPP_PROD T -1 331, 181
  
1 0.0 SUPPL_PROD_PROV SPP_PROD I -1 331, 205
$SELECT  S:PRODUCT;I\SPP_PROD    $CALCULATE  M:  C:UCASE    I:I\SPP_PROD;<>;*     DO(PROD)       F:PRODUCT_MAST;Y;;I\SPP_PROD=PR_PRODUCT;PR_PRODUCT='$I\SPP_PROD$';I\SPP_PROD       'LOAD A LABEL ACCORDING TO A SELECTED ITEM       F:PRODUCT_MAST;Y;PR_PRODUCT;I\PRODUCT=PR_DESC;;I\SPP_PROD       U:GRID_DESC_LOAD;LOAD;G\GRI
1 0.0 CMD 3 C -1 361, 205
$SELECT  S:PRODUCT;I\SPP_PROD
1 0.0 Work 1 I 0 101, 97
$DEFAULT    'INITIALIZES THE DATE AND TIME INTO THE T\DATE AND T\TIME FIELDS  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\SPP_CODE,I\NAME,I\SPP_PROD,I\PRODUCT,I\SPP_PROV,I\PROVINCE  'U:ZZGRID_SPLIT;DB_TO_GRID;G\GRID;SUPPL_PROD_PROV  'U:GRID_DESC_LOAD;LOAD;G\GR
1 0.0 Work 4 I -1 191, 205
  
1 0.0 Work 5 I -1 391, 205
  
1 0.0 Work 6 I -1 601, 205
  
1 0.0 Work 23 I 0 11, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\MARKET  A:ORGS;;I\AGENT    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MARKET=CM_NAME  C:MCASE;;T\MARKET
1 0.0 Work 1 I 0 41, 517
  
1 0.0 BLOCKED I 0 211, 481
  
1 0.0 BLOCKED2 I 0 241, 481
  
1 0.0 Work 1 I 0 281, 481
  
10 0.0 ZX_DELETE Z 0 1, 1
  
10 0.0 ZX_UPDATE Z 0 1, 1
  
10 0.0 ZX_EXIT Z 0 1, 1
  
10 0.0 ZX_SELECT Z 0 1, 1
  
10 0.0 ZX_PRINT Z 0 1, 1
  
10 0.0 ZX_UPDATE Z 0 1, 1
  
10 0.0 ZX_SELECT Z 0 1, 1
  
10 0.0 ZX_EXIT Z 0 1, 1
  
10 0.0 ZX_DELETE Z 0 1, 1
  
10 0.0 ZX_PRINT Z 0 1, 1