PSIVORFA ;BIR/MLM - FILE/RETRIEVE ORDERS IN 53.1 ;Jun 17, 2020@15:41:25
Source file <PSIVORFA.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 |
|---|---|---|
| GT531(DFN,ON,PSJAPI) | ; Retrieve order data from 53.1 and place into local array
|
|
| GTDRG | ;
|
|
| GTPC(ON) | ; Retrieve Provider Comments and create "scratch" fields to edit
|
|
| PUT531 | ; Move data in local variables to 53.1
|
|
| UPD100 | ; Update order data in file 100
|
|
| PTD531 | ; Move drug data from local array into 53.1
|
| Name | Field # of Occurrence |
|---|---|
| IX^DIK | PUT531+17 |
| DIC^PSGORS0 | GT531+21 |
| EXPINF^PSIVEDT1 | GT531+28 |
| ORPARM^PSIVOREN | UPD100+1 |
| SET^PSIVORFE | UPD100+2 |
| EN^PSIVSP | GT531+22 |
| GTOT^PSIVUTL | GT531+33 |
| $$GETOPI^PSJBCMA5 | GT531+38, PUT531+23 |
| FILEOPI^PSJBCMA5 | PUT531+24 |
| $$IVCAT^PSJHLU | PUT531+14 |
| $$GETDUR^PSJLIVMD | PUT531+9 |
| $$OIDF^PSJLMUT1 | GT531+8 |
| DD^PSJLMUT1 | GT531+12 |
| $$ENORL^PSJUTL | UPD100+2 |
| FileNo | Call Tags |
|---|---|
| ^PS(53.1 - [#53.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS( | GTDRG+2 |
| ^PS(51.1 - [#51.1] | GT531+21, GT531+22 |
| ^PS(51.2 - [#51.2] | GT531+7 |
| ^PS(53.1 - [#53.1] | GT531+5, GT531+8, GT531+9, GT531+10, GT531+12, GT531+13, GT531+14, GT531+15, GT531+16, GT531+17 , GT531+23, GT531+24, GT531+30, GT531+32, GT531+34, GTDRG+1, GTDRG+2, PUT531+6*, PUT531+7*, PUT531+8* , PUT531+9, PUT531+10*, PUT531+11*, PUT531+12*, PUT531+13*, PUT531+14*, PUT531+15, PUT531+17!, PUT531+18!, PUT531+19* , PUT531+20*, PUT531+21, PUT531+23, PTD531+1!*, PTD531+3, PTD531+4* |
| ^PS(53.45 - [#53.45] | PUT531+21, PUT531+23, PUT531+24 |
| ^PS(59.5 - [#59.5] | GT531+30 |
| ^VA(200 - [#200] | GT531+7, GT531+16 |
| Name | Field # of Occurrence |
|---|---|
| ^( | PUT531+15* |
| ^(17 | GT531+24 |
| ^(4 | GT531+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | PUT531+17!* |
| DFN | GT531~, GT531+38, PUT531+3, PUT531+9, PUT531+14, PUT531+17, PUT531+18, PUT531+23, PUT531+24 |
| DIK | PUT531+17!* |
| DRG | GTDRG+1!, GTDRG+2*, PTD531+3*, PTD531+4 |
| DRG( | GTDRG+2*, PUT531+16, PTD531+2, PTD531+3, PTD531+4 |
| >> DRGI | GTDRG+2* |
| >> DRGN | GTDRG+2* |
| >> DRGT | PUT531+16*, PTD531+1, PTD531+2, PTD531+3, PTD531+4 |
| DUR | PUT531+9~*, PUT531+10, PUT531+11 |
| >> FIL | GTDRG+1*, GTDRG+2 |
| I | PUT531+23~* |
| IVLIMIT | PUT531+10! |
| LONGOPI | GT531+38~* |
| NAME | GT531+11~*, GT531+12, GT531+13 |
| ND | GTDRG+2*, PUT531+17! |
| ND( | PUT531+12 |
| ND(0 | PUT531+2*, PUT531+3* |
| ND(2 | PUT531+4* |
| ND(4 | PUT531+4*, PUT531+5* |
| ND(8 | PUT531+5* |
| ND(9 | PUT531+5* |
| ND2P5 | GT531+34~*, GT531+35, GT531+36, GT531+37 |
| NOECH | GT531+22~* |
| ON | GT531~, GT531+5, GT531+8, GT531+9, GT531+10, GT531+12, GT531+13, GT531+14, GT531+15, GT531+16 , GT531+17, GT531+23, GT531+24, GT531+30, GT531+32, GT531+33, GT531+34, GT531+38, GTDRG+1, GTDRG+2 , GTPC~, PUT531+2, PUT531+6, PUT531+7, PUT531+8, PUT531+9, PUT531+10, PUT531+11, PUT531+12, PUT531+13 , PUT531+14, PUT531+15, PUT531+17, PUT531+18, PUT531+19, PUT531+20, PUT531+21, PUT531+23, PUT531+24, PTD531+1 , PTD531+3, PTD531+4 |
| >> P | PUT531+14 |
| >> P( | GT531+4* |
| >> P("21FLG" | GT531+5* |
| >> P("APPT" | GT531+14*, PUT531+7 |
| >> P("CLIN" | GT531+14*, PUT531+6 |
| >> P("CLRK" | GT531+16*, PUT531+4 |
| >> P("DO" | GT531+8*, PUT531+15 |
| >> P("DTYP" | GT531+31* |
| >> P("DUR" | GT531+35* |
| >> P("FRES" | GT531+6* |
| >> P("IND" | GT531+9*, PUT531+20 |
| >> P("INS" | GT531+9*, GT531+13* |
| >> P("IVCAT" | GT531+37* |
| >> P("IVRM" | GT531+23*, GT531+30*, PUT531+5 |
| >> P("LIMIT" | GT531+36*, PUT531+8 |
| >> P("LOG" | GT531+5*, PUT531+3 |
| >> P("MR" | GT531+7*, PUT531+2 |
| >> P("NAT" | GT531+8*, PUT531+15 |
| >> P("NEWON" | GT531+6*, PUT531+3 |
| >> P("NINIT" | GT531+10*, PUT531+5 |
| >> P("NINITDT" | GT531+10*, PUT531+5 |
| >> P("NUMLBL" | GT531+24*, GT531+25*, GT531+28, PUT531+13 |
| >> P("OLDON" | GT531+6*, PUT531+3 |
| >> P("OPI" | GT531+30*, PUT531+5 |
| >> P("OT" | PUT531+2 |
| >> P("PACT" | GT531+32* |
| >> P("PD" | GT531+8*, PUT531+15 |
| >> P("PRNTON" | GT531+8* |
| >> P("PRY" | GT531+8* |
| >> P("REM" | GT531+30*, PUT531+5 |
| >> P("REN" | GT531+16*, PUT531+4 |
| >> P("RES" | GT531+6*, PUT531+3 |
| >> P("SYRS" | GT531+23*, PUT531+5 |
| >> P(11 | GT531+15*, GT531+20*, PUT531+4, PUT531+17 |
| >> P(15 | GT531+15*, GT531+20*, PUT531+4, PUT531+17, PUT531+19 |
| >> P(17 | GT531+5*, PUT531+2, PUT531+18 |
| >> P(2 | GT531+15*, PUT531+4 |
| >> P(21 | GT531+5*, PUT531+2 |
| >> P(23 | GT531+23*, GT531+31, PUT531+5 |
| >> P(3 | GT531+15*, PUT531+4 |
| >> P(4 | GT531+23*, GT531+29*, GT531+31, GT531+33, PUT531+5 |
| >> P(5 | GT531+23*, GT531+31, PUT531+5 |
| >> P(6 | GT531+7*, PUT531+2 |
| >> P(7 | GT531+23*, PUT531+5 |
| >> P(8 | GT531+23*, GT531+25, GT531+26, GT531+27, GT531+28*, PUT531+5 |
| >> P(9 | GT531+15*, GT531+16, GT531+17*, GT531+20, GT531+21, GT531+22, PUT531+1*, PUT531+4 |
| PSGOES | GT531+3~* |
| PSGS0XT | GT531+15, GT531+20, PUT531+4, PUT531+17*! |
| PSGS0Y | PUT531+17*! |
| PSGSCH | GT531+22~, PUT531+1 |
| PSGST | GT531+18! |
| PSIVCAT | PUT531+14*! |
| >> PSIVSN | GT531+30 |
| >> PSIVTYPE | GT531+29 |
| PSJABBIN | GT531+26~*, GT531+28 |
| PSJAPI | GT531~, GT531+38 |
| >> PSJCOM | GT531+8* |
| PSJINFIN | PUT531+21!* |
| >> PSJIVORF | UPD100+1 |
| >> PSJLABEL | GT531+33 |
| >> PSJORD | PUT531+9, PUT531+23 |
| >> PSJORIFN | GT531+5* |
| >> PSJORL | UPD100+2* |
| >> PSJSYSP | PUT531+21, PUT531+22, PUT531+23, PUT531+24 |
| U | GT531+5, GT531+6, GT531+7, GT531+8, GT531+10, GT531+13, GT531+15, GT531+16, GT531+17, GT531+23 , GT531+30, GTDRG+2, PUT531+2, PUT531+3, PUT531+4, PUT531+5, PUT531+15, PUT531+19, PTD531+3, PTD531+4 |
| >> VAIN(4 | UPD100+2 |
| >> X | GT531+4*, GT531+16*, GTDRG+1*, GTDRG+2, PUT531+12*, PTD531+2*, PTD531+3, PTD531+4 |
| >> X1 | PTD531+3*, PTD531+4 |
| XT | GT531+18!, GT531+20 |
| >> Y | GT531+5*, GT531+6, GT531+7*, GT531+8*, GT531+15*, GT531+16*, GT531+20, GT531+23*, GT531+30*, GTDRG+1* , GTDRG+2, PTD531+3*, PTD531+4* |
| >> ZZND | GT531+15, PUT531+4 |