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 |