PSOERX1A ;ALB/BWF - eRx Utilities/RPC's ; 8/3/2016 5:14pm
Source file <PSOERX1A.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 9 | EN^PSOERX1 (EN,INIT)^PSOERXD1 DERX1^PSOERXD2 (EN,INIT)^PSOERXP1 (EN,INIT)^PSOERXR1 UPDSTAT^PSOERXU1 $$GETPAT^PSOERXU5 $$RXEPRMT^PSOERXU7 ($$DONOTFIL,$$VALPTADD,AUDLOG,PAUSE,PRDRVAL)^PSOERXUT |
VA FileMan | 5 | (C,NOW)^%DTC ^DIC (FILE,UPDATE)^DIE ($$GET1,GETS)^DIQ ^DIR |
Kernel | 2 | $$UP^XLFSTR $$DEA^XUSER |
Registration | 2 | ^DPTLK DEM^VADPT |
List Manager | 1 | FULL^VALM1 |
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 |
---|---|---|
SI | ;
|
|
SBN | ;
|
|
L(DFN,DIS) | ;
|
|
UL(DFN) | ; unlock
|
|
R() | ; check lock on node
|
|
PDATE() | ;
|
|
WHO(DFN) | ;
|
|
ADDITEM(TEXT,HDR,DATA,STRT,LEN) | ;
|
|
PROV | ;
|
|
PAT | ;
|
|
DRUG | ;
|
|
EDIT(EDTYP,SBN) | ;
|
|
VPROV | ;
|
|
VPROV1 | ;
|
|
PRVWARN(ACTION,PSOIEN,VAPIEN) | ; Check whether the Provider Select is valid or not
; Input:(r)ACTION - Ation being peformed ("EP": Edit Provider | "VP": Validate Provider) ; (r)PSOIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; (r)VAPIEN - Provider -Pointer to the NEW PERSON file (#200) |
|
CHKPRV2(Y) | ;
|
|
PLSTRNG(LOW,HIGH,EDIT,SBN) | ;
|
|
VPAT | ;
|
|
PATWARN(ACTION,PSOIEN,SELPAT) | ; Check whether the Patient Select is valid or not
; Input:(r)ACTION - Ation being peformed ("EP": Edit Patient | "VP": Validate Patient) ; (r)PSOIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; (r)SELPAT - Patient -Pointer to the PATIENT file (#2) |
|
PATPRMT() | ;
|
Name | Field # of Occurrence |
---|---|
C^%DTC | PDATE+1 |
NOW^%DTC | L+10, R+5 |
^DIC | VPROV+24, VPROV1+1 |
FILE^DIE | VPROV+47, VPROV1+19, VPAT+35, VPAT+56 |
UPDATE^DIE | L+12, R+7 |
$$GET1^DIQ | SI+9, SBN+7, PROV+3, PROV+4, PROV+7, PAT+3, PAT+4, PAT+7, DRUG+3, DRUG+4 , DRUG+7, EDIT+6, VPROV+4, VPROV+5, VPROV+11, VPROV+12, VPROV+13, VPROV+14, VPROV+15, VPROV+28 , VPROV+35, VPROV+43, VPROV1+5, VPROV1+11, VPROV1+15, VPROV1+20, PRVWARN+6, PRVWARN+7, PRVWARN+8, PLSTRNG+5 , VPAT+4, VPAT+5, VPAT+6, VPAT+7, VPAT+8, VPAT+9, VPAT+10, VPAT+11, VPAT+14, VPAT+24 , VPAT+31, VPAT+48, VPAT+52, PATWARN+7, PATWARN+8, PATWARN+9, PATWARN+10, PATWARN+13, PATWARN+19 |
GETS^DIQ | VPROV+7 |
^DIR | SI+3, SI+13, SBN+11, EDIT+8, VPROV+20, VPROV+36, VPROV1+12, PLSTRNG+11, PLSTRNG+16, PLSTRNG+20 , PLSTRNG+49, VPAT+17, VPAT+25, VPAT+45, VPAT+49 |
^DPTLK | PATPRMT+2 |
EN^PSOERX1 | SI+10, SI+14, SI+17, SBN+8, SBN+12, SBN+15 |
EN^PSOERXD1 | DRUG+8 |
INIT^PSOERXD1 | EDIT+17 |
DERX1^PSOERXD2 | EDIT+14 |
EN^PSOERXP1 | PAT+8 |
INIT^PSOERXP1 | EDIT+18 |
EN^PSOERXR1 | PROV+8 |
INIT^PSOERXR1 | EDIT+19 |
UPDSTAT^PSOERXU1 | VPROV+48, VPROV+49, VPROV+50, VPROV+51, VPROV1+20, VPROV1+21, VPROV1+22, VPROV1+23, VPAT+37, VPAT+38 , VPAT+39, VPAT+40, VPAT+41, VPAT+42, VPAT+58, VPAT+59, VPAT+60 |
$$GETPAT^PSOERXU5 | SI+8, SBN+6 |
$$RXEPRMT^PSOERXU7 | PROV+5, PROV+6, PAT+5, PAT+6, DRUG+5, DRUG+6 |
$$DONOTFIL^PSOERXUT | PROV+1, PAT+1, DRUG+1 |
$$VALPTADD^PSOERXUT | PATWARN+19 |
AUDLOG^PSOERXUT | VPROV+44, VPROV1+16, VPAT+32, VPAT+53 |
PAUSE^PSOERXUT | VPROV+33, VPROV1+9 |
PRDRVAL^PSOERXUT | PRVWARN+9 |
DEM^VADPT | VPAT+20, VPAT+44, PATWARN+14 |
FULL^VALM1 | SI+2, SBN+2, PROV+1, PAT+1, DRUG+1, EDIT+2 |
$$UP^XLFSTR | PLSTRNG+25 |
$$DEA^XUSER | VPROV+43, VPROV1+15 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^PS(52.46 - [#52.46] | GET1^DIQ |
^PS(52.48 - [#52.48] | GETS^DIQ |
^PS(52.49 - [#52.49] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | R+8, WHO+1 |
^DPT("ADOB" | PATWARN+16 |
^DPT("SSN" | PATWARN+15 |
^PS(52.49 - [#52.49] | PLSTRNG+6 |
^VA(200 - [#200] | R+8, WHO+2, VPROV+27, VPROV+31, VPROV1+4, VPROV1+8, CHKPRV2+2 |
^XTMP("PSOERXLOCK" | L+2*, L+4, L+5, L+7, L+8, L+10*, L+13, UL+2!, R+2, R+3 , R+5*, R+8, WHO+1, WHO+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | SI+16!, SI+18!, SBN+14!, SBN+17!, L+10, R+5 |
ACTION | PRVWARN~, PRVWARN+9, PATWARN~, PATWARN+21 |
DATA | ADDITEM~, ADDITEM+2 |
DFN | L~, L+4, L+5, L+7, L+8, L+10, L+11, L+13, UL~, UL+2 , R+2, R+3, R+5, R+6, R+8, WHO~, WHO+1, WHO+2, VPAT+1~, VPAT+20* , VPAT+44*, PATWARN+14* |
DIC | VPROV+24*, VPROV1+1*, VPAT+1~ |
DIC("A" | VPROV+24*, VPROV1+1* |
DIC("S" | VPROV+24*, VPROV1+1* |
DIC(0 | VPROV+24*, VPROV1+1*, VPAT+19*, VPAT+43* |
>> DILOCKTM | L+5, L+8, R+3 |
DIR | SI+1~, SI+13!, SBN+1~, SBN+11!, EDIT+1~, PLSTRNG+1~, PLSTRNG+11!, PLSTRNG+16!, PLSTRNG+20!, PLSTRNG+49! , VPAT+1~, VPAT+45! |
DIR("?" | PLSTRNG+9* |
DIR("A" | VPROV+18*, VPROV+19*, VPROV+34*, VPROV+35*, VPROV1+10*, VPROV1+11*, PLSTRNG+8*, VPAT+15*, VPAT+16*, VPAT+23* , VPAT+24*, VPAT+47*, VPAT+48* |
DIR("B" | VPROV+20*, VPROV+36*, VPROV1+12*, PLSTRNG+10*, VPAT+17*, VPAT+25*, VPAT+49* |
DIR(0 | SI+3*, SI+13*, SBN+11*, EDIT+8*, VPROV+18*, VPROV+34*, VPROV1+10*, PLSTRNG+8*, PLSTRNG+16*, PLSTRNG+20* , PLSTRNG+49*, VPAT+15*, VPAT+23*, VPAT+45*, VPAT+47* |
DIS | L~, R+8 |
DONE | VPROV+2~, VPROV+22*, VPROV+23, VPROV+31*, PLSTRNG+1~, PLSTRNG+3*, PLSTRNG+4, PLSTRNG+12*, PLSTRNG+24*, PLSTRNG+29* , PLSTRNG+31*, PLSTRNG+36*, PLSTRNG+46* |
DONE2 | PLSTRNG+1~, PLSTRNG+40*, PLSTRNG+41, PLSTRNG+43* |
DT | PDATE+1, PDATE+2 |
DUOUT | VPAT+19!, VPAT+43! |
DUZ | L+4, L+10, L+11, R+2, R+5, R+6, VPROV+44, VPROV1+16, VPAT+32, VPAT+53 |
EDIT | PLSTRNG~, PLSTRNG+36, PLSTRNG+46 |
EDIT( | PLSTRNG+28*, PLSTRNG+31*, PLSTRNG+35*, PLSTRNG+45* |
EDTYP | EDIT~, EDIT+10, EDIT+11, EDIT+18, EDIT+19 |
ERXCNT | PATWARN+5~, PATWARN+6*, PATWARN+15*, PATWARN+16*, PATWARN+17*, PATWARN+20* |
ERXDAT | SI+1~ |
ERXDEA | PRVWARN+5~ |
ERXDOB | PATWARN+5~, PATWARN+9*, PATWARN+16 |
ERXDRIEN | PRVWARN+5~, PRVWARN+7*, PRVWARN+9 |
ERXFNAME | VPAT+1~, VPAT+6* |
ERXGEN | PATWARN+5~, PATWARN+10*, PATWARN+17 |
ERXIEN | SI+1~, SI+6*, SI+8, SI+9, SI+10, SI+14, SI+17, SBN+1~, SBN+5*, SBN+6 , SBN+7, SBN+8, SBN+12, SBN+15, PATWARN+19 |
ERXLNAME | VPAT+1~, VPAT+5* |
ERXLOCK | SI+1~, SI+12*, SI+13, SBN+10*, SBN+11 |
ERXMMFLG | VPROV+1~, VPROV+33*, VPROV+36, VPROV1+9*, VPROV1+12, VPAT+22*, VPAT+25, VPAT+46*, VPAT+49, PATWARN+5~ , PATWARN+6*, PATWARN+15*, PATWARN+16*, PATWARN+17*, PATWARN+20*, PATWARN+21*, PATWARN+24, PATWARN+29 |
ERXMSG | PRVWARN+5~, PRVWARN+9, PRVWARN+10, PRVWARN+11, PRVWARN+14, PATWARN+5~ |
ERXMSG( | PRVWARN+12, PATWARN+15*, PATWARN+16*, PATWARN+17*, PATWARN+20*, PATWARN+25, PATWARN+26 |
ERXMSG(0 | PATWARN+23 |
ERXPAT | SI+1~, SI+8*, SI+10, SI+12, SI+15, SBN+1~, SBN+6*, SBN+8, SBN+10, SBN+13 |
ERXPIEN | PRVWARN+5~, PRVWARN+6*, VPAT+1~, VPAT+4*, VPAT+5, VPAT+6, PATWARN+5~, PATWARN+7*, PATWARN+8, PATWARN+9 , PATWARN+10 |
ERXPRV | VPROV+28~*, VPROV+29, VPROV1+5~*, VPROV1+6 |
ERXSSN | PATWARN+5~, PATWARN+8*, PATWARN+15 |
ERXSTAT | VPROV+2~, VPROV+15*, VPROV1+21, VPROV1+22, VPAT+2~, VPAT+10*, VPAT+42, VPAT+60 |
EXPRFNAM | VPROV+1~, VPROV+10* |
EXPRIENS | VPROV+2~, VPROV+6*, VPROV+7, VPROV+8, VPROV+9, VPROV+10 |
EXPRLNAM | VPROV+1~, VPROV+9* |
EXPRNAME | VPROV+1~, VPROV+8* |
EXPRVDEA | PRVWARN+5~, PATWARN+5~ |
EXPRVIEN | VPROV+1~, VPROV+5*, VPROV+6 |
EXPRVNPI | PRVWARN+5~ |
FDA | L+12!, R+7!, VPROV+47!, VPROV1+19!, VPAT+35!, VPAT+56! |
FDA( | L+11*, R+6*, VPROV+39*, VPROV+46*, VPROV1+18*, VPAT+28*, VPAT+34*, VPAT+55* |
FLAG | L+2~, L+4, L+5*, L+6, L+7, L+8*, L+9 |
FULLDAT | ADDITEM+1~, ADDITEM+2*, ADDITEM+3, ADDITEM+8 |
HDR | ADDITEM~, ADDITEM+2 |
HIGH | PLSTRNG~, PLSTRNG+2, PLSTRNG+8, PLSTRNG+27, PLSTRNG+31, PLSTRNG+34, PLSTRNG+44 |
I | PRVWARN+5~, PRVWARN+12*, PLSTRNG+1~, PLSTRNG+27*, PLSTRNG+28, PLSTRNG+33*, PLSTRNG+34, PLSTRNG+35, VPAT+1~, PATWARN+5~ , PATWARN+25*, PATWARN+26 |
ITEM | EDIT+1~, EDIT+15*, EDIT+16 |
L | ADDITEM+1~, ADDITEM+6* |
LEN | ADDITEM~, ADDITEM+3, ADDITEM+8 |
LINE | SI+1~ |
LINEVAR | SI+1~ |
LIST | PLSTRNG+1~, PLSTRNG+2* |
LLEN | ADDITEM+1~, ADDITEM+4*, ADDITEM+5 |
LOW | PLSTRNG~, PLSTRNG+2, PLSTRNG+8, PLSTRNG+27, PLSTRNG+31, PLSTRNG+34, PLSTRNG+44 |
MANVAL | VPROV+1~, VPROV+11*, VPROV+19, VPAT+1~, VPAT+8* |
MTYPE | SI+1~, SI+9*, SI+10, SBN+1~, SBN+7*, SBN+8, VPROV+2~, VPROV+12*, VPROV+48, VPROV+49 , VPROV+50, VPROV+51, VPROV1+21, VPROV1+22, VPROV1+23, VPAT+2~, VPAT+11*, VPAT+37, VPAT+38, VPAT+39 , VPAT+40, VPAT+41, VPAT+58, VPAT+59 |
NEWPIEN | VPROV+2~, VPROV+26*, VPROV+27, VPROV+28, VPROV+31, VPROV+33, VPROV+35, VPROV+39, VPROV+41, VPROV+43 |
NEWRXIEN | SI+1~ |
NEWVAL | VPROV+2~, VPROV+44, VPROV1+16, VPAT+31~, VPAT+32, VPAT+52~, VPAT+53 |
NEWVAL(1 | VPROV+43*, VPROV1+15*, VPAT+31*, VPAT+52* |
NUM | PLSTRNG+1~, PLSTRNG+41*, PLSTRNG+42 |
NUMCHK | PLSTRNG+1~, PLSTRNG+39* |
>> PCV | SI+11, SBN+9 |
PDONE | VPAT+1~ |
PQUIT | EDIT+1~, EDIT+15* |
PRVDAT | VPROV+1~ |
PRVDAT( | VPROV+8, VPROV+9, VPROV+10 |
PSOIEN | PROV+1, PROV+3, PROV+4, PROV+5, PROV+6, PROV+7, PAT+1, PAT+3, PAT+4, PAT+5 , PAT+6, PAT+7, DRUG+1, DRUG+3, DRUG+4, DRUG+5, DRUG+6, DRUG+7, EDIT+5, EDIT+6 , EDIT+9, EDIT+14, VPROV+3, VPROV+4, VPROV+5, VPROV+11, VPROV+12, VPROV+13, VPROV+14, VPROV+15 , VPROV+33, VPROV+48, VPROV+49, VPROV+50, VPROV+51, VPROV1+9, VPROV1+20, VPROV1+21, VPROV1+22, VPROV1+23 , PRVWARN~, PRVWARN+6, PRVWARN+7, PRVWARN+8, PRVWARN+9, PLSTRNG+5, PLSTRNG+6, VPAT+3, VPAT+4, VPAT+7 , VPAT+8, VPAT+9, VPAT+10, VPAT+11, VPAT+22, VPAT+37, VPAT+38, VPAT+39, VPAT+40, VPAT+41 , VPAT+42, VPAT+46, VPAT+53, VPAT+58, VPAT+59, VPAT+60, PATWARN~, PATWARN+7, PATWARN+13 |
PSOIENS | EDIT+9*, EDIT+14, VPROV+1~, VPROV+3*, VPROV+39, VPROV+44, VPROV+46, VPROV1+16, VPROV1+18, VPAT+1~ , VPAT+3*, VPAT+28, VPAT+32, VPAT+34, VPAT+55 |
>> PSONOLCK | L+1, UL+1 |
QUIT | VPROV+2~, VPROV+37* |
REQIEN | SI+1~ |
RES | EDIT+1~, EDIT+12 |
RES( | EDIT+15 |
RES(0 | EDIT+13 |
RESP | SI+1~, SI+5*, SI+6 |
RESTYPE | VPROV+2~, VPROV+14*, VPROV+49, VPROV1+21, VPAT+2~, VPAT+9* |
RESVAL | PROV+2~, PROV+3*, PROV+6, PAT+2~, PAT+3*, PAT+6, DRUG+2~, DRUG+3*, DRUG+6 |
RXSTAT | EDIT+1~, EDIT+6* |
SBN | EDIT~, EDIT+3*, EDIT+12, PLSTRNG~, PLSTRNG+7, PLSTRNG+13, PLSTRNG+17, PLSTRNG+22 |
SELPAT | VPAT+1~, VPAT+19*, VPAT+20, VPAT+22, VPAT+24, VPAT+28, VPAT+29, VPAT+31, VPAT+43*, VPAT+44 , VPAT+46, VPAT+48, VPAT+52, VPAT+55, PATWARN~, PATWARN+13*, PATWARN+14, PATWARN+15, PATWARN+16, PATWARN+19 |
SELPRV | VPROV+2~, VPROV1+3*, VPROV1+4, VPROV1+5, VPROV1+8, VPROV1+9, VPROV1+11, VPROV1+15, VPROV1+18 |
STAT | PROV+2~, PROV+4*, PROV+5, PROV+6, PAT+2~, PAT+4*, PAT+5, PAT+6, DRUG+2~, DRUG+4* , DRUG+5, DRUG+6 |
STRT | ADDITEM~, ADDITEM+3, ADDITEM+5, ADDITEM+6 |
TAG | EDIT+1~, EDIT+16* |
TEXT | ADDITEM~, ADDITEM+3*, ADDITEM+4, ADDITEM+6, ADDITEM+7*, ADDITEM+8* |
U | VPROV+26, VPROV1+3, VPROV1+18, CHKPRV2+2, VPAT+21, VPAT+45, PATWARN+17, PATPRMT+3, PATPRMT+4 |
VADEA | PRVWARN+5~ |
VADM | VPAT+1~, PATWARN+5~ |
VADM(2 | VPAT+31, VPAT+52 |
VADM(3 | VPAT+31, VPAT+52 |
VADM(5 | PATWARN+17 |
VADM(6 | VPAT+21, VPAT+45 |
VAL | PLSTRNG+1~, PLSTRNG+42*, PLSTRNG+43, PLSTRNG+44, PLSTRNG+45 |
>> VALMAR | SI+6, SBN+5, EDIT+17, EDIT+18, EDIT+19 |
>> VALMBCK | SI+4*, SI+10*, SI+13*, SI+16*, SI+19*, SBN+4*, SBN+8*, SBN+11*, SBN+14*, SBN+16* , PROV+1*, PAT+1*, DRUG+1*, EDIT+4* |
>> VALMBG | SI+3 |
>> VALMLST | SI+3 |
VANPI | VPROV+2~, PRVWARN+5~ |
VAPIEN | VPROV+13*, VPROV+16, VPROV+41, PRVWARN~, PRVWARN+8*, PRVWARN+9, VPAT+1~, VPAT+7*, VPAT+13, VPAT+14 , VPAT+29 |
VAPNM | VPROV+2~, VPROV+4*, VPROV+17 |
VAPRVIEN | VPROV+1~ |
>> X | PDATE+2 |
X1 | PDATE+1~* |
X2 | PDATE+1~* |
>> XQORM("B" | PROV+7*, PAT+7*, DRUG+7*, VPAT+43*, VPAT+50* |
>> XQORNOD(0 | SBN+3 |
Y | SI+1~, SI+4, SI+5, SBN+1~, SBN+3*, SBN+4, SBN+5, R+8*, WHO+1*, WHO+2 , EDIT+1~, VPROV+21, VPROV+23, VPROV+25, VPROV+26, VPROV+32, VPROV+37, VPROV1+2, VPROV1+3, VPROV1+13 , CHKPRV2~, CHKPRV2+2, PLSTRNG+1~, PLSTRNG+5*, PLSTRNG+6*, PLSTRNG+7, PLSTRNG+12, PLSTRNG+13, PLSTRNG+16!, PLSTRNG+17 , PLSTRNG+21!, PLSTRNG+22*, PLSTRNG+23, PLSTRNG+24, PLSTRNG+25*, PLSTRNG+26, PLSTRNG+31, PLSTRNG+32, PLSTRNG+33, PLSTRNG+37 , PLSTRNG+39, PLSTRNG+42, PLSTRNG+49!, VPAT+1~, VPAT+18, VPAT+26, VPAT+50, PATPRMT+1~, PATPRMT+3, PATPRMT+4 |