PSGOEE0 ;BIR/CML3 - ORDER EDIT UTILITIES ;Oct 27, 2020@15:14:39
Source file <PSGOEE0.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENSFE(PSGP,PSGORD) | ; Determine editable fields, and fields that cause new order.
|
|
| ENSFE3 | ; set-up fields to edit for 53.1 ;*399-IND
|
|
| ENSFE5 | ; set-up fields to edit for 55
|
|
| ENOK | ;
|
|
| ENNOU | ; create new order or update old order
|
|
| ENF | ; finish order from edit
|
|
| FIELDS | ;;linetag^routine for fied edit;variable used for before value;variable used for after value;associated field number in File; 1 - edit will create a new entry (field is starred) or 0 - edit will not create a new entry
|
|
| 31 | ;;108^PSGOE8;PSGOPD;PSGPD;108;1
|
|
| 32 | ;;109^PSGOE8;PSGODO;PSGDO;109;1
|
|
| 33 | ;;10^PSGOE81;PSGOSD;PSGSD;10;0
|
|
| 34 | ;;3^PSGOE8;PSGOMR;PSGMR;3;1
|
|
| 35 | ;;25^PSGOE81;PSGOFD;PSGFD;25;0
|
|
| 36 | ;;7^PSGOE8;PSGOST;PSGST;7;0
|
|
| 37 | ;;5^PSGOE82;PSGOSM;PSGSM;5;0
|
|
| 38 | ;;26^PSGOE8;PSGOSCH;PSGSCH;26;1
|
|
| 39 | ;;39^PSGOE81;PSGOAT;PSGAT;39;0
|
|
| 310 | ;;1^PSGOE82;PSGOPR;PSGPR;1;1
|
|
| 311 | ;;8^PSGOE81;PSGOSI;PSGSI;8;0
|
|
| 312 | ;;2^PSGOE82;;;2;0
|
|
| 313 | ;;40^PSGOE82;;;40;0
|
|
| 314 | ;;132^PSGOE41;PSGOIND;PSGIND;132;0
|
|
| 315 | ;;50^PSGOE82;P("CLINO");P("CLIN");113;0
|
|
| 316 | ;;51^PSGOE82;P("APPTO");P("APPT");126;0
|
|
| 51 | ;;108^PSGOE9;PSGOPD;PSGPD;108;1
|
|
| 52 | ;;109^PSGOE9;PSGODO;PSGDO;109;1
|
|
| 53 | ;;10^PSGOE91;PSGOSD;PSGSD;10;1
|
|
| 54 | ;;3^PSGOE9;PSGOMR;PSGMR;3;1
|
|
| 55 | ;;34^PSGOE91;PSGOFD;PSGFD;34;1
|
|
| 56 | ;;7^PSGOE9;PSGOST;PSGST;7;0
|
|
| 57 | ;;5^PSGOE82;PSGOSM;PSGSM;5;0
|
|
| 58 | ;;26^PSGOE9;PSGOSCH;PSGSCH;26;1
|
|
| 59 | ;;41^PSGOE91;PSGOAT;PSGAT;41;0
|
|
| 510 | ;;1^PSGOE92;PSGOPR;PSGPR;1;1
|
|
| 511 | ;;8^PSGOE92;PSGOSI;PSGSI;8;0
|
|
| 512 | ;;2^PSGOE92;;;2;0
|
|
| 513 | ;;15^PSGOE92;;;15;0
|
|
| 514 | ;;141^PSGOE41;PSGOIND;PSGIND;141;0
|
|
| 515 | ;;50^PSGOE82;P("CLINO");P("CLIN");130;0
|
|
| 516 | ;;51^PSGOE82;P("APPTO");P("APPT");131;0
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | ENOK+3*, ENOK+5*, ENF+1*, ENF+3 |
| DIR | ENNOU+1! |
| DIR(0 | ENNOU+1* |
| DR | ENOK+2*, ENOK+3, ENNOU+2!*, ENNOU+3*, ENNOU+4*, ENNOU+5*, ENNOU+7*, ENNOU+8*, ENNOU+10*, ENNOU+11* , ENNOU+14*, ENNOU+15*, ENNOU+16*, ENNOU+17* |
| F | ENOK+10! |
| F0 | ENOK+10! |
| F1 | ENOK+10! |
| F3 | ENOK+10! |
| FLD | ENNOU+11~* |
| >> MSG | ENNOU+1 |
| ND2 | ENOK+10! |
| P | ENNOU+14~*, ENNOU+15* |
| >> PSGAT | ENNOU+11 |
| PSGDL | ENOK+10! |
| PSGDLS | ENOK+10! |
| >> PSGDUR | ENNOU+10 |
| >> PSGEB | ENSFE3+6 |
| >> PSGEFN | ENSFE3+3*, ENSFE3+4*, ENSFE5+3* |
| >> PSGEFN( | ENSFE3+3*, ENNOU+3, ENNOU+14, ENNOU+15 |
| >> PSGEFN(9 | ENSFE3+5*, ENSFE5+5* |
| PSGF2 | ENOK+10! |
| PSGFOK | ENOK+10! |
| >> PSGHSM | ENNOU+8 |
| PSGND | ENF+3! |
| >> PSGOEEF | ENSFE3+3*, ENSFE3+4*, ENSFE3+5*, ENSFE3+6*, ENSFE5+4*, ENSFE5+5* |
| >> PSGOEEF( | ENSFE3+3*, ENSFE3+4*, ENSFE3+5*, ENSFE3+6*, ENSFE5+4*, ENSFE5+5* |
| >> PSGOEEF(109 | ENSFE3+8*, ENSFE5+8* |
| >> PSGOEEG | ENSFE3+9*, ENSFE5+6* |
| PSGOEEND | ENSFE3+9!, ENSFE5+6* |
| >> PSGOEENO | ENOK+2*, ENOK+3, ENOK+4, ENOK+6, ENOK+11*, ENNOU+2*, ENNOU+3*, ENNOU+7, ENNOU+14, ENNOU+15 , ENNOU+16, ENNOU+17 |
| >> PSGOEEWF | ENNOU+14, ENNOU+15, ENNOU+16, ENNOU+17 |
| >> PSGOEF | ENOK+7 |
| PSGOEFF | ENF+3*! |
| >> PSGOETO | ENSFE5+4 |
| >> PSGOETOF | ENSFE3+4, ENSFE3+6 |
| >> PSGOHSM | ENNOU+8 |
| >> PSGOPD | ENSFE3+9 |
| >> PSGOPDN | ENSFE3+9 |
| >> PSGOPR | ENSFE3+6 |
| PSGORD | ENSFE~, ENSFE+1, ENNOU+11 |
| PSGOROE1 | ENOK+10!, ENOK+11* |
| >> PSGOSI | ENNOU+4, ENNOU+5, ENNOU+7 |
| PSGP | ENSFE~ |
| >> PSGPD | ENSFE5+6, ENOK+2 |
| >> PSGPDN | ENSFE5+6 |
| >> PSGPDRG | ENSFE3+9*, ENSFE5+6* |
| >> PSGPDRGN | ENSFE3+9*, ENSFE5+6* |
| >> PSGRF | ENNOU+9, ENNOU+10 |
| >> PSGRMV | ENNOU+10 |
| >> PSGRMVT | ENNOU+10 |
| PSGRO | ENOK+10! |
| PSGSD | ENF+3! |
| >> PSGSI | ENNOU+4, ENNOU+5, ENNOU+7* |
| >> PSGSM | ENNOU+8 |
| >> PSGSTAT | ENSFE3+3 |
| >> PSJCM01 | ENSFE3+2, ENSFE5+2 |
| >> PSJCMO | ENSFE3+2, ENSFE5+2, ENSFE5+3 |
| PSJCMOF | ENSFE3+1~, ENSFE3+2*, ENSFE3+3, ENSFE3+4, ENSFE5+1~, ENSFE5+2*, ENSFE5+4 |
| PSJDOSE | ENSFE3+8~, ENSFE5+8~ |
| >> PSJDSFLG | ENSFE3+8, ENSFE5+8 |
| >> PSJLMFIN | ENNOU+7 |
| >> PSJNOO | ENOK+9*, ENOK+11 |
| >> PSJSYSP | ENOK+1, ENOK+2, ENNOU+14, ENNOU+15, ENNOU+16, ENNOU+17 |
| >> PSJSYSP0 | ENOK+1 |
| >> PSJSYSU | ENSFE3+5, ENSFE5+5 |
| >> Q | ENNOU+2*, ENNOU+3*, ENNOU+14*, ENNOU+15*, ENNOU+16*, ENNOU+17* |
| ENNOU+14*, ENNOU+15*, ENNOU+16*, ENNOU+17* | |
| SDT | ENOK+10! |
| U | ENOK+1, ENNOU+14, ENNOU+15 |
| >> X | ENSFE3+3*, ENSFE3+4*, ENSFE3+6*, ENSFE5+4*, ENNOU+14*, ENNOU+15*, ENNOU+16*, ENNOU+17* |
| >> Y | ENSFE3+4*, ENSFE3+6*, ENSFE5+4*, ENNOU+3*, ENNOU+14*, ENNOU+15*, ENNOU+16*, ENNOU+17* |