Freshmark replication server

freshmark-canonical

Program drill-down

BUYER_DETAIL_PRINT

BUYER DETAIL PRINT. Type DSP, base table DEBTOR_MAST.

Field inventory

39

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 Label 8 T -1 41, 169
  
1 0.0 H -1 0, 0
  
1 0.0 Label 1 T -1 1, 25
  
1 0.0 Label 2 T -1 291, 25
  
1 0.0 Label 3 T -1 621, 25
  
1 0.0 Label 4 T -1 621, 49
  
1 0.0 Label 5 T -1 671, 25
  
1 0.0 Label 6 T -1 671, 49
  
1 0.0 Label 7 T -1 41, 133
  
1 0.0 Label 9 T -1 41, 205
  
1 0.0 Work 31 I -1 471, 385
  
1 0.0 Label 30 T -1 341, 385
  
1 0.0 Work 34 I 0 31, 61
$DEFAULT  'LOAD MARKET CODE  A:ORG;;I\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
1 0.0 Label 29 T -1 41, 301
  
1 0.0 Label 14 T -1 41, 325
  
1 0.0 Label 15 T -1 341, 325
  
1 0.0 Label 16 T -1 41, 349
  
1 0.0 Label 17 T -1 41, 385
  
1 0.0 Work 18 I -1 171, 133
$VALIDATE  A:CONST;;I\NAME,I\TYPE,I\ID,I\PASSPORT,I\CONTACT,I\CRLIMIT,I\OS_BAL,T\PROG  A:CONST;;I\ADDR1,I\ADDR2,I\ADDR3,I\PCODE  M:  I:I\DEBTOR;<>;  F:DEBTOR_MAST;Y;;I\NAME=DM_NAME,I\TYPE=DM_ACCTYPE,I\ID=DM_IDNO,I\PASSPORT=DM_PASSPORT_NO,I\CONTACT=DM_CONTACT,I\CRLIMIT=DM_CRLIMIT,I\OS_BAL=DM_OSBAL;DM_DEBTOR='$I\DEBTOR$'
1 0.0 Work 19 I -1 171, 169
  
1 0.0 Work 20 I -1 171, 205
  
1 0.0 Work 21 I -1 171, 229
  
1 0.0 Work 22 I -1 171, 253
  
1 0.0 Work 23 I -1 171, 277
  
1 0.0 Work 24 I -1 171, 301
  
1 0.0 Work 25 I -1 171, 325
  
1 0.0 Work 26 I -1 471, 325
  
1 0.0 Work 27 I -1 171, 349
  
1 0.0 Work 28 I -1 171, 385
  
1 0.0 Label 32 T -1 301, 49
  
1 0.0 CMD 33 C -1 291, 445
$SELECT  U:CALL_BUYER_DETAIL_PRINT;CALL    'I\DEBTOR,I\NAME,I\ADDR1,I\ADDR2,I\ADDR3,I\PCODE,I\TYPE,I\ID,I\PASSPORT,I\CONTACT,I\CRLIMIT,I\OS_BAL  A:CONST;;I\DEBTOR,I\NAME,I\ADDR1,I\ADDR2,I\ADDR3,I\PCODE,I\TYPE,I\ID,I\PASSPORT,I\CONTACT,I\CRLIMIT,I\OS_BAL  A:CONST;SENT TO PRINTER;T\PROG  O:SETFOCUS;I\DEBTOR
1 0.0 Work 35 I 0 31, 85
$DEFAULT    A:TIME;HH:MM:SS;T\TIME  A:DATE;DD MMM YYYY;T\DATE    A:TIMER_ON;1000
1 0.0 Work 1 I 0 201, 85
$DEFAULT  A:USERIP;;I\IP
1 0.0 Label 1 T -1 271, 481
  
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