Program drill-down
CONF_GROWER_SALES
CONFIRM GROWER SALES. Type DSP, base table DEBTOR_TRANS.
Field inventory
98
Live detail pulled from the database.
| Page | Seq | Table | Field | Type | Visible | Position | Logic snippet |
|---|---|---|---|---|---|---|---|
| 1 | 0.0 | Label 24 | T | -1 | 315, 205 | ||
| 1 | 0.0 | Label 5 | T | -1 | 181, 97 | ||
| 1 | 0.0 | Label 6 | T | -1 | 311, 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 | 11, 133 | ||
| 1 | 0.0 | Label 14 | T | -1 | 11, 169 | ||
| 1 | 0.0 | Label 16 | T | -1 | 11, 97 | ||
| 1 | 0.0 | Label 31 | T | -1 | 751, 205 | ||
| 1 | 0.0 | Label 18 | T | -1 | 11, 205 | ||
| 1 | 0.0 | Label 19 | T | -1 | 55, 205 | ||
| 1 | 0.0 | Label 20 | T | -1 | 125, 205 | ||
| 1 | 0.0 | Label 23 | T | -1 | 265, 205 | ||
| 1 | 0.0 | Label 4 | T | -1 | 671, 25 | ||
| 1 | 0.0 | Label 3 | T | -1 | 621, 25 | ||
| 1 | 0.0 | Label 2 | T | -1 | 350, 25 | ||
| 1 | 0.0 | Label 1 | T | -1 | 3, 25 | ||
| 1 | 0.0 | Label 4 | T | -1 | 451, 205 | ||
| 1 | 0.0 | Label 3 | T | -1 | 565, 205 | ||
| 1 | 0.0 | Label 49 | T | -1 | 261, 133 | ||
| 1 | 0.0 | Check 2 | K | -1 | 561, 517 | $VALIDATE I:K\CONF;=;1 DO(1) O:SETFOCUS;C\RUN O:BACKCOLOR;C\RUN;YELLOW DOEND(1) I:K\CONF;=;0 DO(0) O:DISABLEINPUT;G\GRID,I\LINE,I\CONSIGN,I\COMMODITY,I\SLD_QTY,I\PRICE,I\VAT,I\VALUE,I\TAXINV,I\PAY_AMT,I\PRINT,I\BLK,I\DELDATE,I\TRDATE,I\DOCNO O:SETFOCUS;I\LINE DOEND(0) $ESC O:ENABLEINPUT;G\ |
|
| 1 | 0.0 | Work 29 | I | -1 | 481, 229 | ||
| 1 | 0.0 | Work 3 | I | 0 | 451, 121 | ||
| 1 | 0.0 | Work 2 | I | 0 | 481, 121 | ||
| 1 | 0.0 | Work 1 | I | 0 | 421, 121 | ||
| 1 | 0.0 | Work 1 | I | -1 | 181, 517 | ||
| 1 | 0.0 | Work 1 | I | -1 | 651, 97 | ||
| 1 | 0.0 | Work 1 | I | -1 | 671, 229 | ||
| 1 | 0.0 | Work 1 | I | 0 | 681, 133 | ||
| 1 | 0.0 | Work 1 | I | 0 | 711, 133 | ||
| 1 | 0.0 | Work 2 | I | 0 | 681, 133 | $VALIDATE |
|
| 1 | 0.0 | Work 27 | I | 0 | 581, 145 | ||
| 1 | 0.0 | Work 25 | I | -1 | 311, 229 | ||
| 1 | 0.0 | Work 22 | I | -1 | 261, 229 | ||
| 1 | 0.0 | Work 21 | I | -1 | 111, 229 | ||
| 1 | 0.0 | Work 17 | I | -1 | 51, 229 | ||
| 1 | 0.0 | Work 30 | I | -1 | 751, 229 | $CALCULATE C:UCASE V:Y;N I:I\PRINT;=;N DO(0) U:PRINT_MOBI_SALES;UNMARK_INV;G\GRID U:ZZGRID_SPLIT;SCREEN_TO_GRID;G\GRID;I\LINE 'U:PRINT_MOBI_SALES;ADD_SALES;G\GRID 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\PAID_VAL,I\TA |
|
| 1 | 0.0 | Work 1 | I | 0 | 671, 253 | ||
| 1 | 0.0 | Work 3 | I | 0 | 421, 253 | ||
| 1 | 0.0 | Work 4 | I | 0 | 441, 253 | ||
| 1 | 0.0 | Work 1 | I | 0 | 311, 253 | ||
| 1 | 0.0 | Work 2 | I | 0 | 331, 253 | ||
| 1 | 0.0 | Work 3 | I | 0 | 391, 253 | ||
| 1 | 0.0 | Work 29 | I | -1 | 371, 229 | ||
| 1 | 0.0 | Work 13 | I | -1 | 121, 169 | $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\PAID_VAL,I\TAXINV,I\PAY_AMT,I\PRINT,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_ALL;=;Y DO(0) U:PRINT |
|
| 1 | 0.0 | Work 15 | I | -1 | 11, 229 | $CALCULATE A:CONST;;I\TMP2 I:I\LINE;<>; DO(DLD) U:ZZGRID_SPLIT;GRID_TO_SCREEN;G\GRID;I\LINE O:ENABLEINPUT;I\PRINT A:CONST;Y;I\PRINT O:SETFOCUS;I\PAY_AMT 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 L |
|
| 1 | 0.0 | Work 5 | I | 0 | 631, 253 | ||
| 1 | 0.0 | Work 1 | I | 0 | 391, 253 | ||
| 1 | 0.0 | Work 11 | I | -1 | 121, 133 | $SELECT S:BUYER NUMBER;I\ST_DEBTOR $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\PAID_VAL,I\TAXINV,I\PRINT,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_S |
|
| 1 | 0.0 | Work 10 | I | -1 | 121, 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 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 1 | I | 0 | 401, 253 | ||
| 1 | 0.0 | Work 2 | I | 0 | 211, 253 | ||
| 1 | 0.0 | Work 1 | I | -1 | 561, 229 | ||
| 1 | 0.0 | Work 54 | I | 0 | 51, 49 | ||
| 1 | 0.0 | Work 53 | I | 0 | 111, 253 | ||
| 1 | 0.0 | Work 52 | I | 0 | 11, 253 | ||
| 1 | 0.0 | Work 2 | I | -1 | 451, 229 | ||
| 1 | 0.0 | Work 43 | I | 0 | 731, 157 | ||
| 1 | 0.0 | Work 42 | I | 0 | 731, 133 | ||
| 1 | 0.0 | Work 41 | I | 0 | 711, 133 | ||
| 1 | 0.0 | Work 40 | I | 0 | 731, 133 | ||
| 1 | 0.0 | Work 48 | I | 0 | 681, 133 | ||
| 1 | 0.0 | Work 47 | I | 0 | 681, 133 | ||
| 1 | 0.0 | Work 39 | I | 0 | 761, 205 | ||
| 1 | 0.0 | Work 38 | I | 0 | 761, 181 | ||
| 1 | 0.0 | Work 37 | I | 0 | 761, 157 | ||
| 1 | 0.0 | Work 35 | I | 0 | 761, 133 | ||
| 1 | 0.0 | Work 35 | I | 0 | 761, 133 | ||
| 1 | 0.0 | Work 34 | I | 0 | 761, 133 | ||
| 1 | 0.0 | Work 2 | I | 0 | 391, 253 | ||
| 1 | 0.0 | Work 1 | I | 0 | 371, 253 | ||
| 1 | 0.0 | Work 4 | I | 0 | 21, 49 | ||
| 1 | 0.0 | H | -1 | 0, 0 | |||
| 1 | 0.0 | Work 32 | G | -1 | 11, 253 | ||
| 1 | 0.0 | CMD 1 | C | -1 | 221, 133 | $SELECT S:BUYER NUMBER;I\ST_DEBTOR |
|
| 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 I:I\TOT_DUE;>;I\DM_UNALLOC_AMT;;NUM DO(1) D:BUYER DOES NOT HAVE ENOUGH AMOUNT AVAILABLE;ERRORM;I\LINE A:CONST;;I\TOT_DUE DOEND(1) U:PRINT_MOBI_SALES;PRINT;G\GRID I:I\ERROR;<>;Y DO(1) U:ZZGRID |
|
| 1 | 0.0 | Work 5 | I | 0 | 631, 133 | ||
| 1 | 0.0 | Work 4 | I | 0 | 691, 133 | ||
| 1 | 0.0 | Work 3 | I | 0 | 601, 253 | ||
| 1 | 0.0 | Work 44 | I | 0 | 731, 181 | ||
| 1 | 0.0 | Work 45 | I | 0 | 661, 133 | ||
| 1 | 0.0 | Work 46 | I | 0 | 761, 133 | ||
| 1 | 0.0 | Work 50 | I | 0 | 681, 133 | ||
| 1 | 0.0 | Work 51 | I | 0 | 711, 133 | ||
| 1 | 0.0 | Work 2 | I | 0 | 501, 253 | ||
| 1 | 0.0 | Label 26 | T | 0 | 501, 145 | ||
| 1 | 0.0 | Label 28 | T | -1 | 375, 205 | ||
| 1 | 0.0 | Label 2 | T | -1 | 521, 97 | ||
| 1 | 0.0 | Label 2 | T | -1 | 81, 517 | ||
| 1 | 0.0 | Label 3 | T | -1 | 361, 517 | ||
| 1 | 0.0 | Label 2 | T | -1 | 675, 205 | ||
| 1 | 0.0 | Label 1 | T | -1 | 485, 205 | ||
| 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 |