Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSOERX1A

Package: Outpatient Pharmacy

Routine: PSOERX1A


Information

PSOERX1A ;ALB/BWF - eRx Utilities/RPC's ; 8/3/2016 5:14pm

Source Information

Source file <PSOERX1A.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Outpatient Pharmacy 7 EN^PSOERX1  (EN,INIT)^PSOERXD1  DERX1^PSOERXD2  (EN,INIT)^PSOERXP1  (EN,INIT)^PSOERXR1  UPDSTAT^PSOERXU1  $$GETPAT^PSOERXU5  
VA FileMan 5 (C,NOW)^%DTC  ^DIC  (FILE,UPDATE)^DIE  ($$GET1,GETS)^DIQ  ^DIR  
Registration 2 ^DPTLK  DEM^VADPT  
Kernel 1 $$UP^XLFSTR  
List Manager 1 FULL^VALM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 17

Package Total Caller Graph
Outpatient Pharmacy 17 PSO ERX EDIT  PSO ERX HQ SELECT  PSO ERX SELECT BY NUMBER  PSO ERX VALIDATE DRUG  PSO ERX VALIDATE PATIENT  PSO ERX VALIDATE PROVIDER  PSOERX  PSOERX1  
PSOERX1B  PSOERX1C  PSOERXC1  PSOERXD1  PSOERXD2  PSOERXP1  PSOERXR1  PSOERXU1  
PSOERXU3  

Entry Points

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 ;
PRVWARN(PSOIEN,VAPIEN) ;
CHKPRV2(Y) ;
PLSTRNG(LOW,HIGH,EDIT,SBN) ;
VPAT ;
PATWARN(PSOIEN,SELPAT) ;
PATPRMT() ;

External References

Name Field # of Occurrence
C^%DTC PDATE+1
NOW^%DTC L+12, R+5
^DIC VPROV+20, VPROV+37
FILE^DIE VPROV+33, VPROV+46, VPAT+27, VPAT+39
UPDATE^DIE L+14, R+7
$$GET1^DIQ SI+9, SBN+7, PROV+1, PAT+1, DRUG+1, EDIT+6, VPROV+4, VPROV+5, VPROV+11, VPROV+12
VPROV+13, VPROV+25, VPROV+42, VPROV+47, VPROV+49, PRVWARN+3, PRVWARN+4, PRVWARN+5, PRVWARN+6, PLSTRNG+5
VPAT+3, VPAT+4, VPAT+5, VPAT+6, VPAT+7, VPAT+10, VPAT+20, VPAT+29, VPAT+35, VPAT+40
, PATWARN+3, PATWARN+4, PATWARN+5, PATWARN+6, PATWARN+9
GETS^DIQ VPROV+7
^DIR SI+3, SI+13, SBN+11, EDIT+8, VPROV+18, VPROV+26, VPROV+43, PLSTRNG+11, PLSTRNG+17, PLSTRNG+21
, PLSTRNG+51, VPAT+13, VPAT+21, VPAT+32, VPAT+36
^DPTLK PATPRMT+2
EN^PSOERX1 SI+10, SI+14, SI+17, SBN+8, SBN+12, SBN+15
EN^PSOERXD1 DRUG+2
INIT^PSOERXD1 EDIT+17
DERX1^PSOERXD2 EDIT+14
EN^PSOERXP1 PAT+2
INIT^PSOERXP1 EDIT+18
EN^PSOERXR1 PROV+2
INIT^PSOERXR1 EDIT+19
UPDSTAT^PSOERXU1 VPROV+34, VPROV+35, VPROV+47, VPROV+49, VPAT+28, VPAT+29, VPAT+40
$$GETPAT^PSOERXU5 SI+8, SBN+6
DEM^VADPT VPAT+16, VPAT+31, PATWARN+10
FULL^VALM1 SI+2, SBN+2, EDIT+2
$$UP^XLFSTR PLSTRNG+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You have this patient locked in another open session"
  • Line Location: L+7
Function Call: WRITE
  • Prompt: !!,"******************************WARNING********************************"
  • Line Location: PRVWARN+10
Function Call: WRITE
  • Prompt: !,"*********************************************************************"
  • Line Location: PRVWARN+13
Function Call: WRITE
  • Prompt: !,"Invalid response."
  • Line Location: PLSTRNG+41
Function Call: WRITE
  • Prompt: "[PATIENT DIED ON "_$P($G(VADM(6)),U,2)_"]"
  • Line Location: VPAT+17
Function Call: WRITE
  • Prompt: "[PATIENT DIED ON "_$P($G(VADM(6)),U,2)_"]"
  • Line Location: VPAT+32
Function Call: WRITE
  • Prompt: !!,"******************************WARNING********************************"
  • Line Location: PATWARN+15
Function Call: WRITE
  • Prompt: !,"*********************************************************************"
  • Line Location: PATWARN+18
Routine Call
  • DIC
  • Line Location:
    • VPROV+20
    • VPROV+37
Routine Call
  • DIE
  • Line Location:
    • VPROV+33
    • VPROV+46
    • VPAT+27
    • VPAT+39
Routine Call
  • DIE
  • Line Location:
    • L+14
    • R+7
Routine Call
  • DIR
  • Line Location:
    • SI+3
    • SI+13
    • SBN+11
    • EDIT+8
    • VPROV+18
    • VPROV+26
    • VPROV+43
    • PLSTRNG+11
    • PLSTRNG+17
    • PLSTRNG+21
    • PLSTRNG+51
    • VPAT+13
    • VPAT+21
    • VPAT+32
    • VPAT+36

FileMan Files Accessed Via FileMan Db 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] GET1^DIQ,  GETS^DIQ
^PS(52.49 - [#52.49] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" R+8, WHO+1
^DPT("ADOB" PATWARN+12
^DPT("SSN" PATWARN+11
^PS(52.49 - [#52.49] PLSTRNG+6
^VA(200 - [#200] R+8, WHO+2, PRVWARN+7, PRVWARN+8, CHKPRV2+2
^XTMP("PSOERXLOCK" L+2*, L+5, L+6, L+8, L+10, L+12*, L+15, UL+2!, R+2, R+3
, R+5*, R+8, WHO+1, WHO+2

Label References

Name Line Occurrences
$$L SI+12, SBN+10
$$PATPRMT VPAT+15, VPAT+30
$$PATWARN VPAT+18, VPAT+33
$$PDATE L+2
$$PRVWARN VPROV+23, VPROV+40
$$R L+15
$$WHO R+8
@( EDIT+16
PLSTRNG EDIT+12
UL SI+15, SBN+13
VPAT EDIT+18
VPROV EDIT+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SI+16!, SI+18!, SBN+14!, SBN+17!, L+12, R+5
DATA ADDITEM~, ADDITEM+2
DFN L~, L+5, L+6, L+8, L+10, L+12, L+13, L+15, UL~, UL+2
, R+2, R+3, R+5, R+6, R+8, WHO~, WHO+1, WHO+2, VPAT+1~, VPAT+16*
VPAT+31*, PATWARN+10*
DIC VPROV+20*, VPROV+37*, VPAT+1~
DIC("A" VPROV+20*, VPROV+37*
DIC("S" VPROV+20*, VPROV+37*
DIC(0 VPROV+20*, VPROV+37*, VPAT+15*, VPAT+30*
>> DILOCKTM L+6, L+10, R+3
DIR SI+1~, SI+13!, SBN+1~, SBN+11!, EDIT+1~, PLSTRNG+1~, PLSTRNG+11!, PLSTRNG+17!, PLSTRNG+21!, PLSTRNG+51!
VPAT+1~, VPAT+32!
DIR("?" PLSTRNG+9*
DIR("A" VPROV+16*, VPROV+17*, VPROV+24*, VPROV+25*, VPROV+41*, VPROV+42*, PLSTRNG+8*, VPAT+11*, VPAT+12*, VPAT+19*
VPAT+20*, VPAT+34*, VPAT+35*
DIR("B" VPROV+18*, VPROV+26*, VPROV+43*, PLSTRNG+10*, VPAT+13*, VPAT+21*, VPAT+36*
DIR(0 SI+3*, SI+13*, SBN+11*, EDIT+8*, VPROV+16*, VPROV+24*, VPROV+41*, PLSTRNG+8*, PLSTRNG+17*, PLSTRNG+21*
, PLSTRNG+51*, VPAT+11*, VPAT+19*, VPAT+32*, VPAT+34*
DIS L~, R+8
DONE PLSTRNG+1~, PLSTRNG+3*, PLSTRNG+4, PLSTRNG+12*, PLSTRNG+26*, PLSTRNG+31*, PLSTRNG+33*, PLSTRNG+38*, PLSTRNG+48*
DONE2 PLSTRNG+1~, PLSTRNG+42*, PLSTRNG+43, PLSTRNG+45*
DT PDATE+1, PDATE+2
DUOUT VPAT+15!, VPAT+30!
DUZ L+5, L+12, L+13, R+2, R+5, R+6
EDIT PLSTRNG~, PLSTRNG+38, PLSTRNG+48
EDIT( PLSTRNG+30*, PLSTRNG+33*, PLSTRNG+37*, PLSTRNG+47*
EDTYP EDIT~, EDIT+10, EDIT+11, EDIT+18, EDIT+19
ERXDAT SI+1~
ERXDEA PRVWARN+1~
ERXDOB PATWARN+1~, PATWARN+5*, PATWARN+12
ERXFNAME VPAT+1~, VPAT+5*
ERXGEN PATWARN+1~, PATWARN+6*, PATWARN+13
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
ERXLNAME VPAT+1~, VPAT+4*
ERXLOCK SI+1~, SI+12*, SI+13, SBN+10*, SBN+11
ERXMMFLG VPROV+23*, VPROV+26, VPROV+40*, VPROV+43, PRVWARN+1~, PRVWARN+2*, PRVWARN+7*, PRVWARN+8*, PRVWARN+9, PRVWARN+14
VPAT+18*, VPAT+21, VPAT+33*, VPAT+36, PATWARN+1~, PATWARN+2*, PATWARN+11*, PATWARN+12*, PATWARN+13*, PATWARN+14
ERXMSG PRVWARN+1~, PATWARN+1~
ERXMSG( PRVWARN+11, PRVWARN+12, PATWARN+16, PATWARN+17
ERXMSG(1 PRVWARN+7*, PATWARN+11*
ERXMSG(2 PRVWARN+8*, PATWARN+12*
ERXMSG(3 PATWARN+13*
ERXPAT SI+1~, SI+8*, SI+10, SI+12, SI+15, SBN+1~, SBN+6*, SBN+8, SBN+10, SBN+13
ERXPIEN PRVWARN+1~, PRVWARN+3*, PRVWARN+4, PRVWARN+5, VPAT+1~, VPAT+3*, VPAT+4, VPAT+5, PATWARN+1~, PATWARN+3*
, PATWARN+4, PATWARN+5, PATWARN+6
ERXSSN PATWARN+1~, PATWARN+4*, PATWARN+11
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+1~, PRVWARN+5*, PRVWARN+8, PATWARN+1~
EXPRVIEN VPROV+1~, VPROV+5*, VPROV+6
EXPRVNPI PRVWARN+1~, PRVWARN+4*, PRVWARN+7
FDA L+14!, R+7!, VPROV+33!, VPROV+46!, VPAT+27!, VPAT+39!
FDA( L+13*, R+6*, VPROV+29*, VPROV+32*, VPROV+45*, VPAT+24*, VPAT+26*, VPAT+38*
FLAG L+2~, L+5, L+6*, L+7, L+8, L+10*, L+11
FULLDAT ADDITEM+1~, ADDITEM+2*, ADDITEM+3, ADDITEM+8
HDR ADDITEM~, ADDITEM+2
HIGH PLSTRNG~, PLSTRNG+2, PLSTRNG+8, PLSTRNG+29, PLSTRNG+33, PLSTRNG+36, PLSTRNG+46
I PRVWARN+1~, PRVWARN+11*, PRVWARN+12, PLSTRNG+1~, PLSTRNG+29*, PLSTRNG+30, PLSTRNG+35*, PLSTRNG+36, PLSTRNG+37, VPAT+1~
, PATWARN+16*, PATWARN+17
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+29, PLSTRNG+33, PLSTRNG+36, PLSTRNG+46
MANVAL VPROV+1~, VPROV+11*, VPROV+17, VPAT+1~, VPAT+7*
MTYPE SI+1~, SI+9*, SI+10, SBN+1~, SBN+7*, SBN+8, VPROV+2~, VPROV+12*, VPROV+34, VPROV+35
NEWPIEN VPROV+2~, VPROV+22*, VPROV+25, VPROV+29, VPROV+31
NEWRXIEN SI+1~
NUM PLSTRNG+1~, PLSTRNG+43*, PLSTRNG+44
NUMCHK PLSTRNG+1~, PLSTRNG+41*
>> 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, PAT+1, DRUG+1, EDIT+5, EDIT+6, EDIT+9, EDIT+14, VPROV+3, VPROV+4, VPROV+5
VPROV+11, VPROV+12, VPROV+13, VPROV+23, VPROV+34, VPROV+35, VPROV+40, VPROV+47, VPROV+49, PRVWARN~
, PRVWARN+3, PRVWARN+6, PLSTRNG+5, PLSTRNG+6, VPAT+2, VPAT+3, VPAT+6, VPAT+7, VPAT+18, VPAT+28
VPAT+29, VPAT+33, VPAT+40, PATWARN~, PATWARN+3, PATWARN+9
PSOIENS EDIT+9*, EDIT+14, VPROV+1~, VPROV+3*, VPROV+29, VPROV+32, VPROV+45, VPAT+1~, VPAT+2*, VPAT+24
VPAT+26, VPAT+38
>> PSONOLCK L+1, UL+1
QUIT VPROV+2~, VPROV+27*
REQIEN SI+1~
RES EDIT+1~, EDIT+12
RES( EDIT+15
RES(0 EDIT+13
RESP SI+1~, SI+5*, SI+6
RXSTAT EDIT+1~, EDIT+6*
SBN EDIT~, EDIT+3*, EDIT+12, PLSTRNG~, PLSTRNG+7, PLSTRNG+14, PLSTRNG+18, PLSTRNG+24
SELPAT VPAT+1~, VPAT+15*, VPAT+16, VPAT+18, VPAT+20, VPAT+24, VPAT+25, VPAT+30*, VPAT+31, VPAT+33
VPAT+35, VPAT+38, PATWARN~, PATWARN+9*, PATWARN+10, PATWARN+11, PATWARN+12
SELPRV VPROV+2~, VPROV+39*, VPROV+40, VPROV+42, VPROV+45
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+22, VPROV+39, VPROV+45, CHKPRV2+2, VPAT+17, VPAT+32, PATWARN+13, PATPRMT+3, PATPRMT+4
VADEA PRVWARN+1~
VADM VPAT+1~, PATWARN+10
VADM(5 PATWARN+13
VADM(6 VPAT+17, VPAT+32
VAL PLSTRNG+1~, PLSTRNG+44*, PLSTRNG+45, PLSTRNG+46, PLSTRNG+47
>> 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*
, EDIT+4*
>> VALMBG SI+3
>> VALMLST SI+3
VANPI VPROV+2~, PRVWARN+1~
VAPIEN VPROV+13*, VPROV+14, VPROV+23, VPROV+31, PRVWARN~, PRVWARN+6*, PRVWARN+7, PRVWARN+8, VPAT+1~, VPAT+6*
VPAT+9, VPAT+10, VPAT+25
VAPNM VPROV+2~, VPROV+4*, VPROV+15
VAPRVIEN VPROV+1~
>> X PDATE+2
X1 PDATE+1~*
X2 PDATE+1~*
>> XQORM("B" PROV+1*, PAT+1*, DRUG+1*, VPAT+30*, VPAT+37*
>> 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+19, VPROV+21, VPROV+22!, VPROV+27, VPROV+38, VPROV+39, VPROV+44, CHKPRV2~, CHKPRV2+2
, PLSTRNG+1~, PLSTRNG+5*, PLSTRNG+6*, PLSTRNG+7, PLSTRNG+12, PLSTRNG+14, PLSTRNG+17!, PLSTRNG+18, PLSTRNG+22!, PLSTRNG+24*
, PLSTRNG+25, PLSTRNG+26, PLSTRNG+27*, PLSTRNG+28, PLSTRNG+33, PLSTRNG+34, PLSTRNG+35, PLSTRNG+39, PLSTRNG+41, PLSTRNG+44
, PLSTRNG+51!, VPAT+1~, VPAT+14, VPAT+22, VPAT+37, PATPRMT+1~, PATPRMT+3, PATPRMT+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All