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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSJPDCLU

Package: Inpatient Medications

Routine: PSJPDCLU


Information

PSJPDCLU ;BIR/MHA/MC - PADE ORDER ; 11/18/19 1:17pm

Source Information

Source file <PSJPDCLU.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Registration 6 IN5^VADPT  $$EN^VAFCPID  $$IN^VAFHLPV1  $$PIVCHK^VAFHPIVT  $$SEND^VAFHUTL  $$SITE^VASITE  
Inpatient Medications 5 $$PRNOK^PSGS0  RXC^PSJPADE  $$CHKPD^PSJPDCL  ($$CHKPDCL,$$LOGPIVOT,$$PDACT,$$PIVOT)^PSJPDCLA  ($$DOWSTR,CORD,SEND)^PSJPDCLV  
Health Level Seven 2 $$HLDATE^HLFNC  INIT^HLFNC2  
Kernel 2 $$HLNAME^XLFNAME  $$DEA^XUSER  
List Manager 1 (FULL,PAUSE)^VALM1  
National Drug File 1 $$PROD2^PSNAPIS  

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: 6

Package Total Caller Graph
Inpatient Medications 6 PSGOEE  PSIVOPT1  PSJHLU  PSJOEA1  PSJPADE  PSJPDCLV  

Entry Points

Name Comments DBIA/ICR reference
PDORD ;
CORD ;
SEND ;
PID ;
PV1 ;
ORC ;
RXE ;
IVRXE ;
IVC ;
CONT(VALUE,PIECE,FS) ;
RXR ;
RXC ;
IVRXC ;
ZRX ;
GETFORM(PSJ55) ;
QT(DFN,RXO,PS55) ;
DSPDRG() ;
GIVECODE(ID,CS) ;
DISP ;
ESC(VAL) ;

External References

Name Field # of Occurrence
$$HLDATE^HLFNC ORC+13, QT+9, QT+21
INIT^HLFNC2 PDORD+11
$$PRNOK^PSGS0 QT+10, QT+22
RXC^PSJPADE RXC+1
$$CHKPD^PSJPDCL PDORD+38, PDORD+44
$$CHKPDCL^PSJPDCLA PDORD+41, PDORD+48
$$LOGPIVOT^PSJPDCLA PDORD+36
$$PDACT^PSJPDCLA PDORD+4
$$PIVOT^PSJPDCLA PDORD+23, PDORD+34
$$DOWSTR^PSJPDCLV QT+11, QT+23
CORD^PSJPDCLV CORD+2
SEND^PSJPDCLV SEND+2
$$PROD2^PSNAPIS GETFORM+5
IN5^VADPT PDORD+18, PDORD+28
$$EN^VAFCPID PID+4
$$IN^VAFHLPV1 PV1+4, PV1+11
$$PIVCHK^VAFHPIVT PDORD+32
$$SEND^VAFHUTL PDORD+1
FULL^VALM1 DISP+2
PAUSE^VALM1 DISP+5
$$SITE^VASITE PV1+19
$$HLNAME^XLFNAME ORC+17, ORC+23, ORC+28, ORC+34, RXE+28, RXE+30, IVRXE+19, IVRXE+24
$$DEA^XUSER RXE+28, IVRXE+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?5,"THIS IS THE PADE "_$P(NSEG(SEQ),NFS)_" SEGMENT."
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: !,$P(NSEG(SEQ),NFS)_"-"_(TR-1)_$S(TR<10:"= ",1:"=")_TX
  • Line Location: DISP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] PDORD+31
^ORD(101 - [#101] PDORD+8, PDORD+10
^PS( IVRXC+4
^PS(50.606 - [#50.606] IVRXE+7, GETFORM+3
^PS(50.607 - [#50.607] IVRXC+12
^PS(50.7 - [#50.7] IVRXE+7, GETFORM+3
^PS(51.2 - [#51.2] RXR+3
^PS(52.6 - [#52.6] IVRXE+4, IVRXE+7
^PS(52.7 - [#52.7] IVRXE+4
^PS(55 - [#55] PDORD+15, PDORD+16, ORC+10, ORC+11
^PS(58.7 - [#58.7] PDORD+2, PDORD+4
^PSDRUG - [#50] IVRXC+11, GETFORM+2, GETFORM+4, GETFORM+5, GIVECODE+2, GIVECODE+3, GIVECODE+4
^SC - [#44] PDORD+47, PV1+12, PV1+13
^VA(200 - [#200] ORC+16, ORC+22, ORC+27, ORC+34, RXE+28, RXE+30, IVRXE+19, IVRXE+24
^XTMP("PADE" ORC+38, RXE+39, IVC+7, RXR+7, IVRXC+16, ZRX+6
^XUSEC("PSJ PADE MGR" DISP+1

Label References

Name Line Occurrences
$$DSPDRG RXE+5, RXE+27, GETFORM+2, GETFORM+4, GETFORM+5
$$ESC QT+8, GIVECODE+4, GIVECODE+6
$$GETFORM RXE+18
$$GIVECODE RXE+5, IVRXE+4, IVRXC+6
$$QT RXE+4, IVRXE+3, IVRXE+5
CONT IVRXE+38
CORD PDORD+37, PDORD+43
DISP ORC+38, RXE+39, IVC+7, RXR+7, IVRXC+16, ZRX+6
IVRXE RXE+3

Naked Globals

Name Field # of Occurrence
^("DSS" PDORD+15
^(8 PDORD+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMDT PDORD+13~, PDORD+14*, PDORD+29*, PDORD+32
ASIH PDORD+13~, PDORD+14*, PDORD+19*, PDORD+23, PDORD+27
AT QT+4~*, QT+5, QT+16~*, QT+17
BEG CONT+1~, CONT+5*, CONT+6*
CLAPDT PDORD+13~, PDORD+14*, PDORD+15*, PDORD+16*, PDORD+37, PV1+12, PV1+13
CLN PDORD+13~, PDORD+14*, PDORD+15*, PDORD+16*, PDORD+37, PDORD+41, PDORD+47, PDORD+48, PV1+12, PV1+13
CNM PDORD+7~, PDORD+9*, PDORD+10
CS GIVECODE~, GIVECODE+5, GIVECODE+8
D IVRXC+1~, IVRXC+2*, IVRXC+7
DFN PDORD+13~, PDORD+14*, PDORD+15, PDORD+16, PDORD+23, PDORD+32, PDORD+34, PDORD+36, PID+4, PV1+4
PV1+11, ORC+10, ORC+11, RXE+4, IVRXE+3, IVRXE+5, QT~
>> DGPMA PDORD+20
>> DGPMP PDORD+20
>> DGPMTYP PDORD+20
>> DGPMVI PDORD+20, PDORD+21
DOSE RXE+1~, RXE+7*, RXE+8, RXE+12, RXE+13, RXE+15, IVRXE+6, QT+3*, QT+8, QT+14*
, QT+15*, QT+20
DOSETMP RXE+6~, RXE+8*, RXE+9, RXE+15*, RXE+16*, RXE+17
DRGID GIVECODE+1~, GIVECODE+7*, GIVECODE+8
DRGNM GIVECODE+1~, GIVECODE+4*, GIVECODE+5
DRGNM2 GIVECODE+1~, GIVECODE+6*, GIVECODE+8
DRGSTR GIVECODE+1~, GIVECODE+5*, GIVECODE+8*, GIVECODE+9
DRUGND GIVECODE+1~, GIVECODE+3*, GIVECODE+6, GIVECODE+7
DT DSPDRG+3
DUZ ORC+20, ORC+33, DISP+1
END CONT+1~, CONT+5*, CONT+6*
EVNDT PDORD+13~, PDORD+14*, PDORD+29*, PV1+11
FIL IVRXC+1~, IVRXC+4*
FS CONT~, CONT+2, CONT+3
FTS PDORD+13~, PDORD+14*, PDORD+26*, PDORD+30*
HL PDORD+11~
HL("ECH" PDORD+12
HL("FS" PDORD+12
I PDORD+3~*, PDORD+4*, PDORD+13~, PDORD+15*, PDORD+16*, PDORD+29*, PDORD+31, RXE+22~*, RXE+23, RXE+24
RXE+35*, IVRXE+10~*, IVRXE+11, IVRXE+12, IVC+3*, QT+5~*, QT+7, QT+17~*, QT+19, DSPDRG+1~*
, DSPDRG+2, DSPDRG+4*, DSPDRG+5*, DSPDRG+6, ESC+2*
ID GIVECODE~, GIVECODE+2, GIVECODE+3, GIVECODE+4, GIVECODE+5
J PDORD+3~, PDORD+4*, QT+5~*, QT+6*, QT+7, QT+17~*, QT+18*, QT+19, DSPDRG+1~*, DSPDRG+2*
, DSPDRG+3, DSPDRG+4
LOC PDORD+13~, PDORD+14*
M PID+3~
MAX RXE+6~, RXE+9*, RXE+11, RXE+12, RXE+15
MIN RXE+6~, RXE+7*, RXE+9*, RXE+10, RXE+12, RXE+15
NAT QT+4~*, QT+7*, QT+8, QT+16~*, QT+19*, QT+20
ND0 IVRXE+1~, IVRXE+2*, QT+13*
NDAD IVRXE+1~, IVRXE+2*, IVRXE+4, QT+13*
NDPT2 IVRXE+1~, IVRXE+2*, QT+13*
NDSOL IVRXE+1~, IVRXE+2*, IVRXE+4, QT+13*
NECH PDORD+11~, PDORD+12*, PDORD+30, PV1+5, PV1+6, PV1+12, PV1+13, ORC+10, ORC+11, ORC+17
ORC+18, ORC+23, ORC+24, ORC+28, ORC+29, ORC+34, RXE+5, RXE+28, RXE+29, RXE+30
RXE+31, IVRXE+4, IVRXE+19, IVRXE+21, IVRXE+24, IVRXE+25, IVRXE+32, RXR+4, IVRXC+6, IVRXC+10
IVRXC+12, QT+8, QT+9, QT+11, QT+20, QT+21, QT+23
NFS PDORD+11~, PDORD+12*, PV1+5, PV1+6, PV1+12, PV1+13, PV1+15, PV1+16, PV1+19, ORC+4
ORC+5, ORC+6, ORC+7, ORC+12, ORC+13, ORC+18, ORC+24, ORC+29, ORC+30, ORC+32
ORC+35, RXE+4, RXE+5, RXE+10, RXE+11, RXE+13, RXE+17, RXE+19, RXE+26, RXE+27
RXE+29, RXE+31, RXE+32, RXE+38, IVRXE+3, IVRXE+4, IVRXE+5, IVRXE+6, IVRXE+8, IVRXE+14
IVRXE+15, IVRXE+16, IVRXE+21, IVRXE+25, IVRXE+26, IVRXE+27, IVRXE+31, IVRXE+32, IVRXE+37, IVRXE+38
IVC+6, RXR+4, IVRXC+5, IVRXC+6, IVRXC+9, IVRXC+10, IVRXC+13, ZRX+3, DISP+3, DISP+4
NODES CONT+1~, CONT+5*, CONT+6
NSCS PDORD+11~, PDORD+12*, QT+8, QT+20
NSEG PDORD+11~
NSEG( PID+6*, PV1+18*, PV1+19*, ORC+37*, RXE+34*, RXE+35*, RXE+38*, IVC+2*, IVC+3*, IVC+6*
RXR+6*, IVRXC+15*, ZRX+5*, DISP+3, DISP+4
NVAL ESC+1~, ESC+2*, ESC+3
PC RXE+22~*, RXE+24*, RXE+25*, RXE+26, IVRXE+10~*, IVRXE+12*, IVRXE+13*, IVRXE+14
PCE RXE+20~*, RXE+23*, RXE+25*, RXE+36, RXE+38, IVRXE+1~*, IVRXE+11*, IVRXE+13*, IVC+4, IVC+6
>> PDHDT ZRX+3
PDL PDORD+13~
PDL(14 GIVECODE+4*
PDL(15 ORC+4*
PDL(2 ORC+6*
>> PDTYP ORC+4, ORC+7, ZRX+2
PIECE CONT~, CONT+2
PIVOT PDORD+13~, PDORD+14*, PDORD+23*, PDORD+27, PDORD+32*, PDORD+33, PDORD+34*, PDORD+35, PDORD+36*, PDORD+38*
PV1+9, PV1+15
PS55 RXE+4, RXE+18, IVRXE+3, IVRXE+5, QT~
PS55( RXE+7, IVRXE+2, RXR+2, IVRXC+2, IVRXC+7, QT+3, QT+13, QT+21
PS55("AD" IVRXE+2, IVRXE+7, IVRXE+33, QT+13, QT+14
PS55("SOL" IVRXE+2, IVRXE+35, QT+13, QT+15
PS55(0 ORC+2, ORC+5, ORC+8, ORC+13, ORC+25, RXE+28, IVRXE+2, IVRXE+17, IVRXE+27, IVRXE+28
IVRXE+30, RXR+2, ZRX+1, QT+13, QT+16, QT+20, QT+21, QT+23
PS55(1 DSPDRG+2, DSPDRG+3, DSPDRG+6
PS55(10 IVRXE+9, IVRXE+10, IVRXE+11, IVRXE+12
PS55(15 RXE+21, RXE+22, RXE+23, RXE+24
PS55(2 ORC+8, ORC+13, ORC+14, QT+4, QT+8, QT+9, QT+10, QT+11, QT+22
PS55(4 ORC+14, ORC+19, RXE+30, IVRXE+22
PSJ55 GETFORM~
PSJADSO IVRXC+1~, IVRXC+2*, IVRXC+4, IVRXC+5, IVRXC+7
PSJAP PDORD+3~*, PDORD+5, PDORD+6, PDORD+40*
PSJBAP PDORD+3~, PDORD+6*, PDORD+40
>> PSJDCA PDORD+22, PDORD+23
PSJDD IVRXC+1~, IVRXC+2*, IVRXC+3, IVRXC+4*, IVRXC+6, IVRXC+11
PSJDIV1 PDORD+13~, PDORD+14*, PDORD+31*, PDORD+47*, PV1+19
>> PSJDMU ORC+33
>> PSJEXPOE ORC+3
PSJFTSH PDORD+3~, PDORD+23, PDORD+26, PDORD+34
>> PSJHLDFN PDORD+14
PSJPDO PDORD+17~*, PDORD+40*, PDORD+44*, PDORD+48*
PSJPDON PDORD+17~
PSJQ PDORD+3~, PDORD+17~*, PDORD+37, PDORD+38*, PDORD+39!, PDORD+41*, PDORD+43, PDORD+44*, PDORD+45, PDORD+47
PDORD+48*
PSJQ2 PDORD+17~*, PDORD+39*, PDORD+47*
PSJQCL PDORD+17~
PSJRBD PDORD+13~, PDORD+14*, PDORD+25*, PDORD+29*, PDORD+38, PDORD+44, PV1+6
PSJRBDH PDORD+3~, PDORD+23, PDORD+25, PDORD+34, PV1+5
PSJWARD PDORD+13~, PDORD+14*, PDORD+24*, PDORD+29*, PDORD+37, PDORD+38, PDORD+43, PDORD+44, PV1+6, PV1+9
PV1+13
PSJWARDH PDORD+3~, PDORD+23, PDORD+24, PDORD+34, PV1+5
PV PDORD+13~, PDORD+14*, PDORD+42*, PDORD+46*, PDORD+49*, PV1+2, PV1+8
PV1 PV1+1~, PV1+4*, PV1+5*, PV1+6*, PV1+7, PV1+11*, PV1+12*, PV1+13*, PV1+14, PV1+16
REM CONT+1~, CONT+5*
RXO PDORD+15, PDORD+16, PDORD+23, PDORD+34, PDORD+36, PV1+12, PV1+13, ORC+2, ORC+6, ORC+8
ORC+10, ORC+11, ORC+13, ORC+14, ORC+19, ORC+25, RXE+3, RXE+4, RXE+32, IVRXE+3
IVRXE+5, IVRXE+26, RXR+2, ZRX+1, QT~, QT+2, QT+12
SEG PDORD+11~, PV1+7*, PV1+14*, PV1+15*, PV1+16*, PV1+18, ORC+1*, ORC+4*, ORC+5*, ORC+6*
ORC+7*, ORC+12*, ORC+13*, ORC+18*, ORC+24*, ORC+29*, ORC+30, ORC+32*, ORC+35*, ORC+37
RXE+2*, RXE+4*, RXE+5*, RXE+10*, RXE+11*, RXE+13*, RXE+17*, RXE+19*, RXE+26*, RXE+27*
RXE+29*, RXE+31*, RXE+32*, RXE+34, RXE+40!, IVRXE+3*, IVRXE+4*, IVRXE+5*, IVRXE+6*, IVRXE+8*
IVRXE+14*, IVRXE+15*, IVRXE+16*, IVRXE+21*, IVRXE+25*, IVRXE+26*, IVRXE+27*, IVRXE+31*, IVRXE+32*, IVRXE+37*
IVC+2, IVC+8!, CONT+2*, CONT+3, CONT+4*, RXR+1*, RXR+4*, RXR+6, IVRXC+5*, IVRXC+6*
IVRXC+9*, IVRXC+10*, IVRXC+13*, IVRXC+15, ZRX+3*, ZRX+5
SEG( RXE+35, IVC+3, CONT+6*
SEG(0 RXE+35, IVC+3
SEQ PDORD+11~, PID+5*, PID+6, PV1+17*, PV1+18, PV1+19, ORC+36*, ORC+37, RXE+33*, RXE+34
RXE+35, RXE+37*, RXE+38, IVC+1*, IVC+2, IVC+3, IVC+5*, IVC+6, RXR+5*, RXR+6
IVRXC+14*, IVRXC+15, ZRX+4*, ZRX+5, DISP+3, DISP+4
SETZ PDORD+17~*, PDORD+37*, PDORD+46*, PDORD+47*
SNM PDORD+7~*, PDORD+8, PDORD+11
>> STATUS ORC+2*, ORC+3*, ORC+4, ORC+7, ZRX+1*, ZRX+2
STRING CONT+1~, CONT+5*, CONT+6
TEMP CONT+1~, CONT+3*, CONT+4, CONT+5
TEMP2 CONT+1~, CONT+6*
TR DISP+4~*
TX DISP+4~*
VAFPID PID+3~, PID+4*, PID+6
VAFSTR PID+1~, PID+2*, PID+4, PV1+3*, PV1+4, PV1+9*, PV1+10*, PV1+11
VAIN PDORD+17~
VAIP PDORD+17~, PDORD+21*, PV1+1~
VAIP("D" PDORD+28*
VAIP(13 PDORD+19, PDORD+29, PDORD+32
VAIP(14 PDORD+19
VAIP(3 PDORD+29
VAIP(5 PDORD+20, PDORD+22, PDORD+28, PDORD+29
VAIP(6 PDORD+29
VAIP(8 PDORD+30
VAL ESC~, ESC+2
VALUE CONT~, CONT+2, CONT+3
>> VAR1 ORC+8*, ORC+10*, ORC+11*, ORC+12, ORC+14*, ORC+15, ORC+16, ORC+18, ORC+19*, ORC+20*
ORC+21, ORC+22, ORC+24, ORC+25*, ORC+26, ORC+27, ORC+29, ORC+30*, ORC+31, ORC+33*
ORC+34, ORC+35, RXE+18*, RXE+19, RXE+28*, RXE+29, RXE+30*, RXE+31, IVRXE+7*, IVRXE+8
IVRXE+17*, IVRXE+18, IVRXE+19, IVRXE+20*, IVRXE+21, IVRXE+22*, IVRXE+23, IVRXE+24, IVRXE+25, IVRXE+28*
IVRXE+30, IVRXE+31, IVRXE+33*, IVRXE+35*, IVRXE+37, RXR+2*, RXR+3*, RXR+4, IVRXC+7*, IVRXC+9
IVRXC+11*, IVRXC+13, ZRX+2*, ZRX+3, GETFORM+3*, GETFORM+4*, GETFORM+5*, GETFORM+6, QT+1*, QT+2
, QT+8*, QT+9*, QT+11*, QT+12, QT+20*, QT+21*, QT+23*
>> VAR2 ORC+8*, ORC+9, ORC+10, ORC+11, ORC+16*, ORC+17*, ORC+18, ORC+22*, ORC+23*, ORC+24
ORC+27*, ORC+28*, ORC+29, ORC+31*, ORC+32, ORC+34*, ORC+35, RXE+28*, RXE+29, RXE+30*
RXE+31, IVRXE+19*, IVRXE+21, IVRXE+24*, IVRXE+25, IVRXE+28*, IVRXE+29*, IVRXE+30*, IVRXE+32, IVRXE+33*
IVRXE+34*, IVRXE+35*, IVRXE+36*, IVRXE+38, RXR+3*, RXR+4, IVRXC+7*, IVRXC+8*, IVRXC+10, IVRXC+12*
IVRXC+13, QT+10*, QT+11, QT+14*, QT+15*, QT+20, QT+21*, QT+22*, QT+23
X IVRXC+1~, IVRXC+11*, IVRXC+12, GETFORM+1~, GETFORM+2*, GETFORM+3*, GETFORM+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All