Routine: PSIVOCDS

Package	Total	Call Graph
Inpatient Medications	5	SETDD^PSIVOC ($$ONCALL,$$VAGEN)^PSJMISC $$P8^PSJMISC2 ($$DURATION,UND24HRS)^PSJOCDS $$ONE^PSJORPOE
Pharmacy Data Management	3	($$FRQ,$$MRT)^PSSDSAPI $$CONV^PSSDSAPK GROUTE^PSSFDBRT
Kernel	1	$$UP^XLFSTR

Package	Total	Caller Graph
Inpatient Medications	2	PSJAPIDS PSJOCDS

Entry Points

Name	Comments	DBIA/ICR reference
IN(PSJBASE)	;
IV	;Setup input data for Continuous IV (admixture, hyperal)
IVPB	;Setup input data for Schedule IV
SINGLE	;Set fields needed for Single Dose type ; Can't get FDB to return correct data for Continuous Infusion /w Single dose so all Continuous will be sent in as Maintenance.
COMMON	;Set common data for all IV types
BASIC	;Set basic data for non schedule IVs
FREEDOSE	;Set data for free text dose
ONEAD(PSJRT)	;Setup data for 'Continuous Infusion' IV type
CONTIV	;Set data needed for continuous IV with multiple drugs
ISONEAD()	;Return 1 if there's only one additive
ISALLBAG()	;Return 1 if not additive not in all bags
ISNOADD()	;Return 1 if there's no additives
PREMIX	;The route is always set to "Continuous Infusion" & the FREQUENCY must set to 1
SDACI()	;Return Single Dose Amount for ad for 'CONTINUOUS INFUSION' FDB Route (Not classed at "VT" or "TN")
CLASS(PSJDD)	;Check if the Drug contains "VT" & "TN" classes
IVFREQ()	;Return the frequency for an continuous IV ; Hours needed to run a bag is defined as: Total Volume / Infusion rate ; # of bags needed for a day is defined as: 24 / Hours need to run a bag ; PSJFREQ is either in Q#H or N for # of admin per day
ADJSDA(PSJTOTV,PSJINFRT,PSJSDA,PSJNOTE)	;Adjust SDA
UND24HRS	;Calculate freq for order <24 hrs
BOTTLE(PSJTOTBG,PSJBOT)	;Set freq to either specified bottle or # needed for the duration/24hrs of the order
DURATION()	;
FDBRT(PSJDD,PSJRT)	;Check if the ordered route can be admin by FDB for this drug
RTESCRN(PSJRT)	; Screen routes for none "VT or "TN"
LITER(PSJVOLP8)	; Convert the unit from ML to L for premix contains potassium ; PSJ5252 (6/29/11) - No longer need to convert "ML" to "L" for this drug now that FDB handles both units. ; FDB only accept Liter for this type for drug ; PSJVOLP8 - Either = volume or the infusion rate

Name	Field # of Occurrence
SETDD^PSIVOC	IN+22
$$ONCALL^PSJMISC	IVPB+20
$$VAGEN^PSJMISC	LITER+6
$$P8^PSJMISC2	IV+2
$$DURATION^PSJOCDS	DURATION+12
UND24HRS^PSJOCDS	IVPB+23
$$ONE^PSJORPOE	IVPB+20
$$FRQ^PSSDSAPI	IVPB+34
$$MRT^PSSDSAPI	IN+14, IV+10
$$CONV^PSSDSAPK	IVFREQ+13, BOTTLE+13
GROUTE^PSSFDBRT	FDBRT+6
$$UP^XLFSTR	BOTTLE+3, BOTTLE+4

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.1 - [#51.1]	IVPB+19, IVPB+26, IVPB+33
^PSDRUG - [#50]	CLASS+5

Name	Line Occurrences
$$ADJSDA	IVFREQ+10, IVFREQ+16
$$CLASS	IV+11
$$DURATION	IVPB+5, CONTIV+2
$$FDBRT	IV+11
$$ISALLBAG	IV+11
$$ISONEAD	IV+11
$$IVFREQ	CONTIV+6
$$RTESCRN	IV+10, PREMIX+2
$$SDACI	ONEAD+11
BASIC	IV+3
BOTTLE	IVFREQ+15, UND24HRS+21
COMMON	IN+31
CONTIV	IV+13
FREEDOSE	IV+12, ONEAD+7, PREMIX+4
IV	IN+33
IVPB	IN+32
ONEAD	IV+11
PREMIX	IV+9
SINGLE	IVPB+20
UND24HRS	CONTIV+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ON	IN+10~
>> P("DTYP"	IN+32, IN+33
>> P("MR"	IN+14, IV+10, IVPB+8
>> P(11	IVPB+23, IVPB+31
>> P(15	IVPB+23, IVPB+27, IVPB+31
>> P(2	IVPB+23, DURATION+12
>> P(3	IVPB+23, DURATION+12
>> P(8	IV+2, DURATION+9
>> P(9	IVPB+10, IVPB+18, IVPB+19, IVPB+23, IVPB+25, IVPB+26, IVPB+28, IVPB+34
PSIVAS	IN+10~, IN+24*, IN+25, IV+9, IVFREQ+15, UND24HRS+21
PSIVAS0	IN+10~, IN+25, IVPB+2, IVPB+3, IVPB+12, IVPB+14, COMMON+2, COMMON+3, COMMON+4, BASIC+6 , ONEAD+12, ISALLBAG+3~, ISALLBAG+5, ISALLBAG+6, SDACI+8, SDACI+9, IVFREQ+15, UND24HRS+21, LITER+6
PSIVDDSV	IN+10~, IN+11!
PSIVDDSV(	IN+24, IN+25
PSIVDDSV("AD"	ISONEAD+2, ISONEAD+5, ISALLBAG+4, ISALLBAG+5, ISNOADD+2, SDACI+6
PSIVDDSV("SOL"	ISONEAD+2, ISONEAD+3, ISNOADD+3
PSIVDDSV("TOT_VOL"	IN+23*, SDACI+7, IVFREQ+6, UND24HRS+3
PSJALLGY	IN+10~, IN+11!
PSJBAG	UND24HRS+1~, UND24HRS+2, UND24HRS+11, UND24HRS+13, UND24HRS+18, UND24HRS+20
PSJBAGX	IVFREQ+4~, IVFREQ+11, IVFREQ+12, IVFREQ+13, ADJSDA+1~, ADJSDA+5, ADJSDA+8, ADJSDA+13, ADJSDA+14
PSJBASE	IN~
PSJBOT	IVFREQ+4~, BOTTLE~, BOTTLE+3, BOTTLE+4, BOTTLE+8, BOTTLE+10
PSJCLASS	ONEAD+1~, CLASS+4~, CLASS+5*, CLASS+7
PSJCNT	IN+10~, IN+12, IN+17, IN+18, IN+19, IN+20, IN+21, IN+30*, IV+11, IVPB+2 , IVPB+3, IVPB+6, IVPB+7, IVPB+8, IVPB+9, IVPB+10, IVPB+12, IVPB+13, IVPB+14, IVPB+22 , IVPB+23, IVPB+34, IVPB+35, IVPB+36, IVPB+37, IVPB+38, SINGLE+2, SINGLE+3, SINGLE+4, SINGLE+5 , SINGLE+6, COMMON+1, COMMON+2, COMMON+3, COMMON+4, COMMON+5, COMMON+6, COMMON+7, COMMON+9, BASIC+1 , BASIC+2, BASIC+3, BASIC+4, BASIC+6, FREEDOSE+3, FREEDOSE+4, FREEDOSE+5, FREEDOSE+6, FREEDOSE+7, FREEDOSE+8 , ONEAD+4, ONEAD+5, ONEAD+6, ONEAD+8, ONEAD+9, ONEAD+11, ONEAD+12, ONEAD+14, ONEAD+15, ONEAD+16 , ONEAD+17, ONEAD+18, CONTIV+6, CONTIV+8, CONTIV+9, CONTIV+10, PREMIX+2, PREMIX+3, PREMIX+5, PREMIX+6 , PREMIX+7, PREMIX+8, PREMIX+9, SDACI+9, IVFREQ+10, IVFREQ+16, IVFREQ+17, ADJSDA+9, ADJSDA+10, ADJSDA+11 , ADJSDA+12, ADJSDA+18, ADJSDA+20, UND24HRS+9, UND24HRS+10, UND24HRS+16, UND24HRS+17, UND24HRS+18, UND24HRS+22, BOTTLE+14
PSJCNTX	IN+10~, IN+24*, IN+25
PSJDD	CLASS~, CLASS+3, CLASS+5, FDBRT~, FDBRT+5, FDBRT+6
PSJDIFF	CONTIV+1~, CONTIV+2*, CONTIV+4, CONTIV+6, UND24HRS+11, UND24HRS+14
PSJFDB	IN+11!
PSJFDB(	IN+18, IN+19, IN+20, IN+21, IV+11, IVPB+12, IVPB+13, IVPB+14, IVPB+22, IVPB+34 , IVPB+35, IVPB+36, IVPB+37, IVPB+38, SINGLE+2, SINGLE+3, SINGLE+4, SINGLE+5, SINGLE+6, COMMON+1* , COMMON+2, COMMON+3, COMMON+4, COMMON+5, COMMON+6, COMMON+7, COMMON+9, BASIC+1, BASIC+2, BASIC+3 , BASIC+4, BASIC+6, FREEDOSE+3, FREEDOSE+4, FREEDOSE+5, FREEDOSE+6, FREEDOSE+7, FREEDOSE+8, ONEAD+4, ONEAD+5 , ONEAD+6, ONEAD+8, ONEAD+9, ONEAD+11, ONEAD+12, ONEAD+14, ONEAD+15, ONEAD+16, ONEAD+17, ONEAD+18 , CONTIV+6, CONTIV+8, CONTIV+9, CONTIV+10, PREMIX+2, PREMIX+3, PREMIX+5, PREMIX+6, PREMIX+7, PREMIX+8 , PREMIX+9, SDACI+9, IVFREQ+10, IVFREQ+16, IVFREQ+17, ADJSDA+9, ADJSDA+10, ADJSDA+11, ADJSDA+12, ADJSDA+18 , ADJSDA+20, UND24HRS+9, UND24HRS+10, UND24HRS+16, UND24HRS+17, UND24HRS+18, UND24HRS+22, BOTTLE+14
PSJFDBRT	FDBRT+4~, FDBRT+6
PSJFDBRT(	FDBRT+8
PSJFDBRT(0	FDBRT+7
PSJFREQ	CONTIV+1~, IVFREQ+4~, IVFREQ+5, IVFREQ+12, IVFREQ+13, IVFREQ+17, IVFREQ+18, UND24HRS+1~, UND24HRS+2, UND24HRS+20 , UND24HRS+21, UND24HRS+22, BOTTLE+3, BOTTLE+4, BOTTLE+7, BOTTLE+11, BOTTLE+13, BOTTLE+14
PSJHRS	UND24HRS+1~, UND24HRS+5*, UND24HRS+6, UND24HRS+7
PSJINFRT	ADJSDA~, ADJSDA+3, ADJSDA+5, ADJSDA+15, ADJSDA+16
>> PSJIV("DOSE_CNT"	IVPB+22
>> PSJIV("DUR"	IVPB+4, IVPB+7, DURATION+5, DURATION+6
>> PSJIV("FRQ_ERROR"	COMMON+9
>> PSJIV("OI_ERROR"	IN+16, IN+20, IN+21
>> PSJIV("TOT_VOL"	IN+23, DURATION+8, DURATION+10
PSJMNBAG	UND24HRS+1~, UND24HRS+2, UND24HRS+6, UND24HRS+8, UND24HRS+11
PSJNOTE	ADJSDA~, ADJSDA+17, ADJSDA+19
PSJNOTEV	ADJSDA+1~, ADJSDA+16, ADJSDA+18, ADJSDA+20, UND24HRS+15, UND24HRS+16
PSJOCDS	IN+11!
PSJOCDS(	IVPB+2, IVPB+3, IVPB+6, IVPB+7, IVPB+8, IVPB+9, IVPB+10*, IVPB+23
PSJOCDS("CONTEXT"	IN+32, IN+33
PSJOIX	IN+10~, IN+16*, IN+19, IN+20, IN+21
PSJONEFG	IN+10~, IVPB+16, IVPB+20, IVPB+24
PSJP15	IVPB+1~, IVPB+27, IVPB+28, IVPB+33*, IVPB+34
PSJP8	IN+10~, IV+2*, IV+4, IV+5, IV+6, IV+12, ONEAD+7, PREMIX+4
PSJP8ERR	IV+1~, FREEDOSE+7, FREEDOSE+8
PSJP8NUM	IN+10~, IV+4*, ONEAD+15, PREMIX+6, SDACI+8, IVFREQ+8, IVFREQ+9, IVFREQ+10, IVFREQ+11, IVFREQ+13 , IVFREQ+14, IVFREQ+16, UND24HRS+4, UND24HRS+5, UND24HRS+15, BOTTLE+12, BOTTLE+13, DURATION+9
PSJP8TME	IN+10~, IV+6*, ONEAD+8, ONEAD+9, ONEAD+10, ONEAD+17, ONEAD+18, PREMIX+8, PREMIX+9
PSJP8UNT	IN+10~, IV+5*, ONEAD+10, ONEAD+13, ONEAD+16, PREMIX+7
PSJP8X	DURATION+3~, DURATION+9*, DURATION+10
PSJP9	IVPB+1~, IVPB+18, IVPB+19, IVPB+20, IVPB+25, IVPB+31, IVPB+34
>> PSJPON	COMMON+1
PSJRT	IN+10~, IN+14*, COMMON+5, ONEAD~, ONEAD+2, ONEAD+6, PREMIX+2, PREMIX+3, FDBRT~, FDBRT+5 , FDBRT+8, RTESCRN~, RTESCRN+3, RTESCRN+4, RTESCRN+5, RTESCRN+6, RTESCRN+7, RTESCRN+8, RTESCRN+9, RTESCRN+10 , RTESCRN+11, RTESCRN+12
PSJSDA	SDACI+4~, SDACI+5, SDACI+8, SDACI+9, SDACI+10, ADJSDA~, ADJSDA+4, ADJSDA+15, ADJSDA+21, LITER+4~ , LITER+8*, LITER+10, LITER+11
PSJTOTBG	IVFREQ+4~, IVFREQ+5, IVFREQ+14, IVFREQ+15, IVFREQ+16, UND24HRS+1~, UND24HRS+7*, BOTTLE~, BOTTLE+2, BOTTLE+3 , BOTTLE+4, BOTTLE+7, BOTTLE+11, BOTTLE+12
PSJTOTBT	IVFREQ+4~, IVFREQ+5, BOTTLE+1~, BOTTLE+9, BOTTLE+10*, BOTTLE+11, BOTTLE+12
PSJTOTV	IVFREQ+4~, IVFREQ+6, IVFREQ+8, IVFREQ+9, IVFREQ+10, IVFREQ+11, IVFREQ+13, IVFREQ+14, IVFREQ+16, ADJSDA~ , ADJSDA+2, ADJSDA+5, ADJSDA+15, UND24HRS+1~, UND24HRS+3, UND24HRS+4, UND24HRS+5, BOTTLE+12, BOTTLE+13
PSJUNIT	LITER+4~, LITER+9*, LITER+10, LITER+11
PSJVAGEN	LITER+4~, LITER+6*, LITER+7
PSJVOLP8	LITER~, LITER+5, LITER+8
PSJX	IVPB+1~, IVPB+25, IVPB+26, IVPB+28, IVPB+31, IVPB+33, ONEAD+1~, ISONEAD+1~, ISONEAD+4, ISONEAD+5 , ISONEAD+6, ISNOADD+1~, IVFREQ+4~, BOTTLE+1~, BOTTLE+10, DURATION+3~, DURATION+4, DURATION+6, DURATION+7, DURATION+10 , DURATION+11
PSJXRT	IV+1~, IV+10*, IV+11
PSPDRG	IN+10~, IN+11!
U	IN+14, IN+20, IN+21, IV+4, IV+5, IV+6, IV+10, IVPB+2, IVPB+3, IVPB+12 , IVPB+14, IVPB+33, IVPB+34, COMMON+2, COMMON+3, COMMON+4, BASIC+6, ONEAD+12, ISALLBAG+6, SDACI+8 , SDACI+9, CLASS+5, IVFREQ+15, UND24HRS+21, LITER+6, LITER+11
X	IN+10~, IVPB+1~, IVPB+5, IVPB+6, IVPB+25, IVPB+34, IVPB+35, IVPB+36, ISONEAD+1~, ISONEAD+5* , ISALLBAG+3~, ISALLBAG+4, ISALLBAG+5, ISNOADD+1~, PREMIX+1~, SDACI+4~, SDACI+7, SDACI+8, IVFREQ+4~, ADJSDA+1~ , ADJSDA+5, ADJSDA+14, ADJSDA+15, ADJSDA+16, UND24HRS+1~, UND24HRS+14, UND24HRS+15, BOTTLE+1~, BOTTLE+10, DURATION+3~ , DURATION+5, DURATION+7, DURATION+8, DURATION+11, DURATION+12*, DURATION+13

Customize PDF page

Package: Inpatient Medications

Routine: PSIVOCDS

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: