Freshmark replication server

freshmark-canonical

Program drill-down

AGN_LINKED_BUYERS

AGENT LINKED BUYER RANGES. Type MAN, base table AGENT_MAST.

Field inventory

26

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 AGENT_MAST AM_FBUYER I -1 341, 193
$VALIDATE  M:  A:CONST;;I\ERROR    'U:LINK_BUYERS_TO_AGENT;FROM_RANGE    'I:I\ERROR;=;Y  'D:RE-TRY;ERRORM;I\AM_FBUYER
1 0.0 Work 1 I 0 61, 49
  
1 0.0 AGENT_MAST AM_CODE I -1 341, 157
$SELECT  S:AGENT_CODE;I\AM_AGENT    $VALIDATE  M:  A:CONST;;I\ERROR  C:UCASE  I:I\ORGS;<>;  DO(9)    I:I\ORGS;<>;I\AM_AGENT    D:YOU CAN NOT SET A RANGE FOR OTHER AGENTS;ERRORM;I\AM_AGENT  DOEND(9)    F:AGENT_MAST;Y;;T\AM_NAME=AM_NAME;AM_CODE='$I\AM_AGENT$';I\AM_AGENT
1 0.0 AGENT_MAST AM_TBUYER I -1 341, 229
$VALIDATE  M:    U:LINK_BUYERS_TO_AGENT;DEBTOR_RANGE    I:I\ERROR;=;Y  D:TRY RANGES ABOVE $I\OPEN_RANGE$;ERRORM;I\AM_FBUYER
1 0.0 Work 13 I 0 1, 49
$DEFAULT  A:TIME;HH:MM:SS;T\TIME  A:DATE;DD MMM YYYY;T\DATE  A:TIMER_ON;1000    'PUTS PIC ON THE UPDATE BUTTON  O:LOADPIC;$GBLROOT$LEGEND\PROJ_FMS\PICS\NEW_TEXT_DOC.ICO;C\RUN
1 0.0 AGENT_MAST AM_MARKET I 0 31, 49
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\AM_MARKET    'LOAD MARKET  NAME  F:CLIENT_MAST;;CM_CODE;T\MKT=CM_NAME    'CHANGING TEXT CASE FOR THE FIRST CHARACTER TO UPPER CASE  C:MCASE;;T\MKT    A:ORGS;;I\ORGS  A:CONST;$I\ORGS$;I\AM_AGENT    I:I\ORGS;<>;  DO(03)  'O:DISABLEINPUT;I\AM_AGENT,C\AGENT  F:AGENT_MAST;;;T\AM_NAME=AM
1 0.0 Label 4 T -1 231, 229
  
1 0.0 Label 1 T -1 291, 25
  
1 0.0 Label 3 T -1 671, 25
  
1 0.0 Label 4 T -1 671, 49
  
1 0.0 Label 2 T -1 231, 193
  
1 0.0 Work 1 I 0 400, 355
  
1 0.0 Label 6 T -1 621, 25
  
1 0.0 Label 8 T -1 231, 157
  
1 0.0 Label 7 T -1 621, 49
  
1 0.0 Label 5 T -1 1, 25
  
1 0.0 AGENT_MAST AM_NAME T -1 401, 157
  
1 0.0 Label 2 T -1 271, 49
  
1 0.0 Label 2 T -1 311, 325
  
1 0.0 Work 2 I 0 481, 325
  
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
  
10 0.0 ZX_DELETE Z 0 0, 0