Freshmark replication server

freshmark-canonical

Program drill-down

FIX_BUYERS_OUT

FIX BUYERS OUT. Type DSP, base table DEBTOR_TRANS.

Field inventory

84

Live detail pulled from the database.

Page Seq Table Field Type Visible Position Logic snippet
1 0.0 CMD 33 C -1 651, 548
$SELECT    U:PRINT_MOBI_SALES;CHECK_ROWS;G\GRID  I:I\TMP2;<>;Y  D:PLEASE MARK A LINE TO PRINT;ERRORM;I\LINE    U:PRINT_MOBI_SALES;PRINT;G\GRID    I:I\ERROR;<>;Y  DO(1)    U:ZZGRID_SPLIT;INIT_GRID;G\GRID;I\LINE,I\CONSIGN,I\COMMODITY,I\SLD_QTY,I\PRICE,I\VAT:H,I\VALUE,I\DELDATE:H,I\TRDATE:H,I\BLK,I\DOCNO,I\TOT_SLD,I\TAXIN
1 0.0 Work 32 G -1 21, 205
  
1 0.0 H -1 0, 0
  
1 0.0 Work 4 I 0 21, 49
  
1 0.0 Work 1 I 0 391, 253
  
1 0.0 Work 2 I 0 411, 253
  
1 0.0 Work 34 I 0 761, 85
  
1 0.0 Work 35 I 0 761, 109
  
1 0.0 Work 35 I 0 761, 109
  
1 0.0 Work 37 I 0 761, 157
  
1 0.0 Work 38 I 0 761, 181
  
1 0.0 Work 39 I 0 761, 205
  
1 0.0 Work 47 I 0 611, 85
  
1 0.0 Work 48 I 0 611, 85
  
1 0.0 Work 40 I 0 731, 85
  
1 0.0 Work 41 I 0 731, 109
  
1 0.0 Work 42 I 0 731, 133
  
1 0.0 Work 43 I 0 731, 157
  
1 0.0 Work 44 I 0 731, 181
  
1 0.0 Work 45 I 0 731, 205
  
1 0.0 Work 46 I 0 761, 133
  
1 0.0 Work 50 I 0 611, 109
  
1 0.0 Work 51 I 0 681, 133
  
1 0.0 Work 2 I 0 521, 253
  
1 0.0 Work 3 I 0 621, 253
  
1 0.0 Work 4 I 0 261, 517
  
1 0.0 Work 5 I 0 141, 517
  
1 0.0 Work 2 I 0 61, 277
  
1 0.0 Work 52 I 0 21, 253
  
1 0.0 Work 53 I 0 121, 253
  
1 0.0 Work 54 I 0 51, 49
  
1 0.0 Work 1 I -1 511, 181
  
1 0.0 Work 2 I 0 221, 253
  
1 0.0 Work 1 I 0 421, 253
  
1 0.0 Work 9 I 0 1, 49
$DEFAULT  A:ORG;;I\MARKET  A:ORGS;;I\ORGS    'CHECK IF SALES HAVE BEEN PROHIBITED  F:CLIENT_MAST;;;T\MARKET=CM_NAME,I\TMP=CM_PROHIBIT_SALES,I\PROHIBIT_AGENT_SALES=CM_PROHIBIT_AGENT_SALES,I\TMP5=CM_CB_NOPREAMBLE,I\MAIN_SALE=CM_MAINBUYER_SALES,I\RFID=CM_USE_RFID,I\CREDITSALE=CM_AGENT_CR_SALE;CM_CODE='$I\MARKET$';    I:I\
1 0.0 Work 10 I -1 491, 97
$VALIDATE  I:I\ORGS;=;  DO(0)    I:I\AGENT;<>;    DO(AGN)      F:AGENT_MAST;;;T\AGENT_NAME=AM_NAME,I\NOINV=AM_NOINV_PRN,I\NOREM=AM_NOREM_PRN,I\AM_COMMIND=AM_COMMIND;AM_CODE='$I\AGENT$'      I:T\AGENT_NAME;=;      D:AGENT $I\AGENT$ DOES NOT EXIST;ERRORM;I\AGEBT    DOEND(AGN)  DOEND(0)
1 0.0 Work 11 I -1 121, 85
$VALIDATE  A:CONST;;I\LINE,I\CONSIGN,I\COMMODITY,I\SLD_QTY,I\PRICE,I\VAT,I\VALUE,I\DELDATE,I\TRDATE,I\DOCNO,I\BLK,I\TAXINV,I\TOT_SLD,I\SD_COMMP,I\SD_CONTMASS,I\SD_NOLEVY,I\SD_HPRICE,I\SD_LPRICE,I\SD_SLDQTY,I\SD_TOTSLS,I\SMAN,I\DUES_DONE  'INITIALIZES THE GRID   U:ZZGRID_SPLIT;INIT_GRID;G\GRID;I\LINE,I\CONSIGN,I\COMMODI
1 0.0 Work 13 I -1 121, 121
$VALIDATE  C:UCASE  V:Y;N  A:CONST;;I\LINE,I\CONSIGN,I\COMMODITY,I\SLD_QTY,I\PRICE,I\VAT,I\VALUE,I\DELDATE,I\TRDATE,I\DOCNO,I\BLK,I\TAXINV,I\TOT_SLD,I\SD_COMMP,I\SD_CONTMASS,I\SD_NOLEVY,I\SD_HPRICE,I\SD_LPRICE,I\SD_SLDQTY,I\SD_TOTSLS,I\DOC_MSG,I\SMAN,I\DUES_DONE  I:I\PRINT;=;Y  DO(0)    U:PRINT_MOBI_SALES;MARK_ALL;G\GR
1 0.0 Work 15 I -1 21, 181
$CALCULATE  A:CONST;;I\TMP2    I:I\LINE;<>;  DO(DLD)       O:ENABLEINPUT;I\PRNT    O:SETFOCUS;I\PRNT    U:ZZGRID_SPLIT;GRID_TO_SCREEN;G\GRID;I\LINE    A:VAR;I\TAXINV;I\ST_TAXINV  DOEND(DLD)    I:I\LINE;=;  DO(SQS)    U:PRINT_MOBI_SALES;CHECK_ROWS;G\GRID    I:I\TMP2;<>;Y    D:PLEASE MARK A LINE TO PRINT;ERRORM;I\LINE   
1 0.0 Work 5 I 0 661, 253
  
1 0.0 Work 1 I 0 401, 253
  
1 0.0 Work 1 I 0 321, 253
  
1 0.0 Work 2 I 0 351, 253
  
1 0.0 Work 3 I 0 391, 253
  
1 0.0 Work 29 I -1 431, 181
  
1 0.0 Work 30 I -1 641, 181
$CALCULATE  C:UCASE  V:Y;N    I:I\PRNT;=;N  DO(0)    'U:PRINT_MOBI_SALES;UNMARK_INV;G\GRID    U:ZZGRID_SPLIT;SCREEN_TO_GRID;G\GRID;I\LINE    O:SETFOCUS;I\LINE    A:CONST;;I\LINE,I\CONSIGN,I\COMMODITY,I\SLD_QTY,I\PRICE,I\VAT,I\VALUE,I\DELDATE,I\TRDATE,I\DOCNO,I\BLK,I\TAXINV,I\TOT_SLD,I\SD_COMMP,I\SD_CONTMASS,I\SD_NOLEVY
1 0.0 Work 1 I 0 701, 253
  
1 0.0 Work 3 I 0 421, 253
  
1 0.0 Work 4 I 0 441, 253
  
1 0.0 Work 17 I -1 61, 181
  
1 0.0 Work 21 I -1 141, 181
  
1 0.0 Work 22 I -1 291, 181
  
1 0.0 Work 25 I -1 361, 181
  
1 0.0 Work 27 I 0 491, 97
  
1 0.0 Work 2 I 0 21, 517
$VALIDATE  
1 0.0 Work 1 I 0 611, 133
  
1 0.0 Work 1 I 0 381, 517
  
1 0.0 Label 49 T -1 231, 85
  
1 0.0 Label 3 T -1 511, 157
  
1 0.0 Label 4 T 0 21, 277
  
1 0.0 Label 1 T -1 3, 25
  
1 0.0 Label 2 T -1 350, 25
  
1 0.0 Label 3 T -1 621, 25
  
1 0.0 Label 4 T -1 671, 25
  
1 0.0 Label 5 T -1 491, 97
  
1 0.0 Label 6 T -1 350, 49
  
1 0.0 Label 7 T -1 621, 49
  
1 0.0 Label 8 T -1 671, 49
  
1 0.0 Label 12 T -1 21, 85
  
1 0.0 Label 14 T -1 21, 121
  
1 0.0 Label 16 T -1 491, 97
  
1 0.0 Label 31 T -1 641, 157
  
1 0.0 Label 18 T -1 21, 157
  
1 0.0 Label 19 T -1 61, 157
  
1 0.0 Label 20 T -1 141, 157
  
1 0.0 Label 23 T -1 291, 157
  
1 0.0 Label 24 T -1 361, 157
  
1 0.0 Label 26 T 0 491, 97
  
1 0.0 Label 28 T -1 431, 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