Freshmark replication server

freshmark-canonical

Program drill-down

SALESMAN_HALL_MAN

SALESMAN HALL MAN. Type DSP, base table AGENT_MAST.

Field inventory

53

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 CMD 5 C -1 271, 433
$SELECT    'W:SALESMAN_MAST;;;SLS_CODE=I\SLS_CODE,SLS_SPACE=I\SLS_MAN_FLOOR,SLS_HALL=I\AREA_NAME,SLS_SUB_HALL=I\AGENT;SLS_CODE LIKE '$I\SLS_CODE$' AND SLS_AGENT LIKE '$I\AGENT$' AND SLS_ITEM_SECT LIKE '$I\ITEM_SECTION$' AND SLS_MARKET LIKE '$I\MARKET$';  U:UPDATE_SLSMAN_FLOOR    A:CONST;;I\AGENT,I\FLOOR_SPACE,T\AGENT,T
1 0.0 CMD 7 C -1 431, 97
$SELECT  S:AGENT_CODE;I\AGENT
1 0.0 H -1 0, 0
  
1 0.0 Work 8 I 0 1, 61
$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    O:SETFOCUS;I\AGENT  
1 0.0 Work 9 I 0 81, 61
$DEFAULT    A:DATE;DD MMM YYYY;T\DATE  A:TIME;HH:MM:SS;T\TIME  A:TIMER_ON;1000    '$CALCULATE  'U:ZZGRID_SPLIT;INIT_GRID;G\GRIDM;I\LV_CODE,I\LV_DESC,I\LV_CALC_TYPE,I\LV_RATE,I\LV_MRATE,I\LV_VATCD,I\LV_BOARD  'U:ZZGRID_SPLIT;DB_TO_GRID;G\GRIDM;LEVY_MAST    O:SETFOCUS;I\DA_CODE    '$BEFORE_DELETE  
1 0.0 Work 9 I 0 441, 433
$VALIDATE    'I:I\FLOOR_SPACE;<>;  'DO(AREA1)  '  O:ENABLEINPUT;I\AREA_NAME,I\AREA_PERC    O:SETFOCUS;B\UPDATE  'DOEND(AREA1)    
1 0.0 Work 6 I -1 331, 97
$SELECT  S:AGENT_CODE;I\AGENT    $VALIDATE  M:    $CALCULATE  C:UCASE    I:I\AGENT;<>;  F:AGENT_MAST;Y;;T\AGENT=AM_NAME;AM_CODE='$I\AGENT$';I\AGENT    I:I\FLOOR_SPACE;<>;    O:ENABLEINPUT;I\AREA_NAME,I\AREA_PERC    
1 0.0 Work 10 I -1 331, 205
$CALCULATE    'F:MARKET_HALL_BARRIERS;;;I\FLOOR_SPACE=SUM(MHB_AREA);MHB_HALL='$I\AREA_NAME$' AND MHB_BARRIER='$I\AGENT$';I\AREA_NAME  F:MARKET_HALL_BARRIERS;;;I\FLOOR_SPACE=MHB_AREA;MHB_HALL='$I\AREA_NAME$' AND MHB_BARRIER='$I\AGENT$';I\AREA_NAME  A:VAR;I\FLOOR_SPACE;I\AGN_FLOOR    F:SALESMAN_MAST;;;T\SALESMAN=SLS_NAME
1 0.0 Work 11 I -1 331, 313
$CALCULATE    'I\SLSMAN_NEW_DIV  A:DIV;I\AREA_PERC;I\SLSMAN_NEW_DIV;T\FACT  A:MULT;I\FLOOR_SPACE;I\SLS_MAN_FLOOR;I\SLSMAN_NEW_DIV    A:SUB;I\AREA_PERC;I\SLSMAN_MORE;I\SLSMAN_TMP  A:ADD;I\PER_USE;I\TOT_PERC_SEL;I\SLSMAN_MORE    I:I\TOT_PERC_SEL;>;100    D:THE FLOOR SPACE ALLOCATED IS MORE THAN THE AVAIABLE FLOOR SPACE;E
1 0.0 Label 6 T -1 621, 49
  
1 0.0 Label 7 T -1 671, 49
  
1 0.0 Label 5 T -1 271, 49
  
1 0.0 Label 3 T -1 621, 25
  
1 0.0 Label 4 T -1 671, 25
  
1 0.0 Label 2 T -1 291, 25
  
1 0.0 Label 1 T -1 1, 25
  
1 0.0 Label 3 T -1 31, 205
  
1 0.0 Label 4 T -1 31, 313
  
1 0.0 Label 1 T -1 31, 97
  
1 0.0 Label 2 T -1 31, 241
  
1 0.0 Label 8 T -1 471, 97
  
1 0.0 Label 12 T 0 471, 205
  
1 0.0 Label 1 T -1 31, 133
  
1 0.0 Work 2 I -1 331, 133
$SELECT  S:SALESMAN_AGENT;I\SLS_CODE;I\AGENT    $CALCULATE  M:  C:UCASE  A:VAR;I\SLS_CODE;I\SLS_CODE;;000  F:SALESMAN_MAST;;;T\SALESMAN=SLS_NAME;SLS_AGENT='$I\AGENT$' AND SLS_CODE='&I\SLS_CODE&';I\SLS_CODE    'O:SETFOCUS;B\ITEM
1 0.0 CMD 3 C -1 431, 133
$SELECT  S:SALESMAN_AGENT;I\SLS_CODE;I\AGENT
1 0.0 Label 4 T -1 471, 133
  
1 0.0 Work 2 I -1 331, 277
  
1 0.0 CMD 5 C 0 431, 205
  
1 0.0 Label 4 T -1 31, 349
  
1 0.0 Label 1 T -1 31, 277
  
1 0.0 CMD 3 C 0 431, 169
$SELECT  S:ITEM_SEC_SALES;;I\SLS_CODE;I\AGENT;I\ITEM_SECTION  
1 0.0 Work 3 I -1 331, 349
$CALCULATE    O:SETFOCUS;B\UPDATE  
1 0.0 Label 1 T -1 31, 169
  
1 0.0 Work 2 I -1 331, 169
$SELECT    O:ENABLEINPUT:I\ITEM_SECTION  S:ITEM_SEC_SALES;;I\SLS_CODE;I\AGENT;I\ITEM_SECTION  O:DISABLEINPUT:I\ITEM_SECTION    $CALCULATE  'M:  C:UCASE  'A:VAR;I\SLS_CODE;I\SLS_CODE;;000  F:SALESMAN_MAST;Y;;I\ITEM_SECTION=SLS_ITEM_SECT;SLS_ITEM_SECT='$I\ITEM_SECTION$';I\ITEM_SECTION    A:CONST;;I\AREA_NAME  
1 0.0 Work 1 I 0 551, 433
  
1 0.0 Work 2 I -1 331, 241
  
1 0.0 Label 4 T 0 561, 277
  
1 0.0 Work 6 I 0 561, 313
  
1 0.0 Work 3 I 0 451, 277
  
1 0.0 Work 1 I 0 671, 277
  
1 0.0 Work 5 I 0 451, 313
  
1 0.0 Work 7 I 0 451, 349
  
1 0.0 Work 8 I -1 331, 385
  
1 0.0 Work 9 I 0 671, 349
  
1 0.0 Work 10 I 0 581, 205
  
1 0.0 Label 11 T -1 31, 385
  
1 0.0 Work 2 I -1 671, 241
  
1 0.0 Label 3 T -1 451, 241
  
10 0.0 ZX_DELETE Z 0 0, 0
  
10 0.0 ZX_PRINT Z 0 0, 0
  
10 0.0 ZX_SELECT Z 0 0, 0
  
10 0.0 ZX_EXIT Z 0 0, 0
  
10 0.0 ZX_UPDATE Z 0 0, 0