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(RESNDCLN) ;
; RESNDCLN=Specific Clinic IEN to be sent
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+12
$$PRNOK^PSGS0 QT+10, QT+22
RXC^PSJPADE RXC+1
$$CHKPD^PSJPDCL PDORD+40, PDORD+46
$$CHKPDCL^PSJPDCLA PDORD+43, PDORD+50
$$LOGPIVOT^PSJPDCLA PDORD+38
$$PDACT^PSJPDCLA PDORD+5
$$PIVOT^PSJPDCLA PDORD+25, PDORD+36
$$DOWSTR^PSJPDCLV QT+11, QT+24
CORD^PSJPDCLV CORD+2
SEND^PSJPDCLV SEND+2
$$PROD2^PSNAPIS GETFORM+5
IN5^VADPT PDORD+20, PDORD+30
$$EN^VAFCPID PID+4
$$IN^VAFHLPV1 PV1+4, PV1+11
$$PIVCHK^VAFHPIVT PDORD+34
$$SEND^VAFHUTL PDORD+2
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+33
^ORD(101 - [#101] PDORD+9, PDORD+11
^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+16, PDORD+17, ORC+10, ORC+11
^PS(58.7 - [#58.7] PDORD+3, PDORD+5
^PSDRUG - [#50] IVRXC+11, GETFORM+2, GETFORM+4, GETFORM+5, GIVECODE+2, GIVECODE+3, GIVECODE+4
^SC - [#44] PDORD+49, 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+39, PDORD+45
DISP ORC+38, RXE+39, IVC+7, RXR+7, IVRXC+16, ZRX+6
IVRXE RXE+3

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMDT PDORD+14~, PDORD+15*, PDORD+31*, PDORD+34
ASIH PDORD+14~, PDORD+15*, PDORD+21*, PDORD+25, PDORD+29
AT QT+4~*, QT+5, QT+16~*, QT+17
BEG CONT+1~, CONT+5*, CONT+6*
CLAPDT PDORD+14~, PDORD+15*, PDORD+16*, PDORD+17*, PDORD+39, PV1+12, PV1+13
CLN PDORD+14~, PDORD+15*, PDORD+16*, PDORD+17*, PDORD+18, PDORD+39, PDORD+43, PDORD+49, PDORD+50, PV1+12
, PV1+13
CNM PDORD+8~, PDORD+10*, PDORD+11
CS GIVECODE~, GIVECODE+5, GIVECODE+8
D IVRXC+1~, IVRXC+2*, IVRXC+7
DFN PDORD+14~, PDORD+15*, PDORD+16, PDORD+17, PDORD+25, PDORD+34, PDORD+36, PDORD+38, PID+4, PV1+4
, PV1+11, ORC+10, ORC+11, RXE+4, IVRXE+3, IVRXE+5, QT~
>> DGPMA PDORD+22
>> DGPMP PDORD+22
>> DGPMTYP PDORD+22
>> DGPMVI PDORD+22, PDORD+23
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+14~, PDORD+15*, PDORD+31*, PV1+11
FIL IVRXC+1~, IVRXC+4*
FS CONT~, CONT+2, CONT+3
FTS PDORD+14~, PDORD+15*, PDORD+28*, PDORD+32*
HL PDORD+12~
HL("ECH" PDORD+13
HL("FS" PDORD+13
I PDORD+4~*, PDORD+5*, PDORD+14~, PDORD+16*, PDORD+17*, PDORD+31*, PDORD+33, 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+4~, PDORD+5*, QT+5~*, QT+6*, QT+7, QT+17~*, QT+18*, QT+19, DSPDRG+1~*, DSPDRG+2*
, DSPDRG+3, DSPDRG+4
LOC PDORD+14~, PDORD+15*
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+12~, PDORD+13*, PDORD+32, 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+24
NFS PDORD+12~, PDORD+13*, 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+12~, PDORD+13*, QT+8, QT+20
NSEG PDORD+12~
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+14~
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+14~, PDORD+15*, PDORD+25*, PDORD+29, PDORD+34*, PDORD+35, PDORD+36*, PDORD+37, PDORD+38*, PDORD+40*
, 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+23
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+24
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+4~*, PDORD+6, PDORD+7, PDORD+42*
PSJBAP PDORD+4~, PDORD+7*, PDORD+42
>> PSJDCA PDORD+24, PDORD+25
PSJDD IVRXC+1~, IVRXC+2*, IVRXC+3, IVRXC+4*, IVRXC+6, IVRXC+11
PSJDIV1 PDORD+14~, PDORD+15*, PDORD+33*, PDORD+49*, PV1+19
>> PSJDMU ORC+33
>> PSJEXPOE ORC+3
PSJFTSH PDORD+4~, PDORD+25, PDORD+28, PDORD+36
>> PSJHLDFN PDORD+15
PSJPDO PDORD+19~*, PDORD+42*, PDORD+46*, PDORD+50*
PSJPDON PDORD+19~
PSJQ PDORD+4~, PDORD+19~*, PDORD+39, PDORD+40*, PDORD+41!, PDORD+43*, PDORD+45, PDORD+46*, PDORD+47, PDORD+49
, PDORD+50*
PSJQ2 PDORD+19~*, PDORD+41*, PDORD+49*
PSJQCL PDORD+19~
PSJRBD PDORD+14~, PDORD+15*, PDORD+27*, PDORD+31*, PDORD+40, PDORD+46, PV1+6
PSJRBDH PDORD+4~, PDORD+25, PDORD+27, PDORD+36, PV1+5
PSJWARD PDORD+14~, PDORD+15*, PDORD+26*, PDORD+31*, PDORD+39, PDORD+40, PDORD+45, PDORD+46, PV1+6, PV1+9
, PV1+13
PSJWARDH PDORD+4~, PDORD+25, PDORD+26, PDORD+36, PV1+5
PV PDORD+14~, PDORD+15*, PDORD+44*, PDORD+48*, PDORD+51*, 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*
RESNDCLN PDORD~, PDORD+18
RXO PDORD+16, PDORD+17, PDORD+25, PDORD+36, PDORD+38, 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+12~, 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+12~, 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+19~*, PDORD+39*, PDORD+48*, PDORD+49*
SNM PDORD+8~*, PDORD+9, PDORD+12
>> 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+19~
VAIP PDORD+19~, PDORD+23*, PV1+1~
VAIP("D" PDORD+30*
VAIP(13 PDORD+21, PDORD+31, PDORD+34
VAIP(14 PDORD+21
VAIP(3 PDORD+31
VAIP(5 PDORD+22, PDORD+24, PDORD+30, PDORD+31
VAIP(6 PDORD+31
VAIP(8 PDORD+32
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+24*
>> 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+22*, QT+24
VAR3 QT+23~*, QT+24
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