Routine: PSJHL9

Information

PSJHL9 ;BIR/LDT-VALIDATE INCOMING HL7 DATA/CREATE NEW ORDER ;08 Jul 99 / 10:50 AM

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Inpatient Medications	3	$$ENLU^PSGMI ENGNN^PSGOETO EN1^PSJHLERR
Kernel	2	($$FMADD,$$SCH)^XLFDT $$TRIM^XLFSTR
Order Entry Results Reporting	2	EN^ORERR ($$ESC,$$UNESC)^ORHLESC
VA Fileman	2	^%DT ^DIE
Registration	1	IN5^VADPT

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Inpatient Medications	2	PSJHL4 PSJHL4A

Entry Points

Name	Comments	DBIA/ICR reference
ORTYP(MDRT,DDRG)
DAY(DATE)	;DATE=FIRST FIVE DIGITS OF FM DATE
ERROR	;Sends error msg to CPRS, logs error in OE/RR Errors file
TRYAGAIN(MDRT,OI)
VALID	;
STRIP	;Strips spaces off the end of instructions.
NVO	; put new orders in non-verified orders file
ZQDATE(DATE,MONTHS)
STOP(REQST,DURA)

External References

Name	Field # of Occurrence
^%DT	ZQDATE+2
^DIE	NVO+8
EN^ORERR	ERROR+1
$$ESC^ORHLESC	NVO+4
$$UNESC^ORHLESC	NVO+28, NVO+30, NVO+31, NVO+33, NVO+36, NVO+42, NVO+48, NVO+51
$$ENLU^PSGMI	VALID+9
ENGNN^PSGOETO	NVO+3
EN1^PSJHLERR	ERROR+2
IN5^VADPT	VALID+13
$$FMADD^XLFDT	STOP+5, STOP+10, DAY+5
$$SCH^XLFDT	STOP+5, STOP+6
$$TRIM^XLFSTR	VALID+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PS(53.1 - [#53.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	ERROR+1
^PS(50.7 - [#50.7]	VALID+2
^PS(51.2 - [#51.2]	NVO+2, ORTYP+6, ORTYP+7, ORTYP+8, ORTYP+9, ORTYP+10, ORTYP+11, ORTYP+12
^PS(53.1 - [#53.1]	NVO+10, NVO+11, NVO+12, NVO+13, NVO+14, NVO+15, NVO+16, NVO+19, NVO+20, NVO+21 , NVO+22, NVO+25, NVO+26, NVO+27, NVO+28, NVO+29, NVO+30, NVO+31, NVO+32, NVO+33 , NVO+35, NVO+36, NVO+38, NVO+39, NVO+41, NVO+42, NVO+44, NVO+45, NVO+47, NVO+48 , NVO+49, NVO+50, NVO+51*
^PS(55 - [#55]	NVO+9*
^PSDRUG - [#50]	ORTYP+3, ORTYP+4, ORTYP+7, ORTYP+8, ORTYP+9, ORTYP+10, ORTYP+11, ORTYP+12, TRYAGAIN+5
^PSDRUG("ASP"	TRYAGAIN+4
^SC - [#44]	NVO+5
^TMP("PSJNVO"	VALID+18, ERROR+2!, NVO+40, NVO+42, NVO+43, NVO+45, NVO+46, NVO+48, NVO+50, NVO+51
^VA(200 - [#200]	NVO+49

Label References

Name	Line Occurrences
$$DAY	STOP+2, STOP+5
$$ORTYP	VALID+4, TRYAGAIN+6
$$STOP	NVO+21
$$TRYAGAIN	VALID+4
ERROR	VALID+1, VALID+2, VALID+3, VALID+12, VALID+13, VALID+16, VALID+18, VALID+20
STRIP	NVO+28

Naked Globals

Name	Field # of Occurrence
^(0	NVO+35, NVO+38

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ADMINS	NVO+6*, NVO+15
>> ADMINSTR	NVO+37
>> ADMINSTR(	NVO+39
>> APPL	VALID+1, VALID+3, VALID+4, VALID+5, VALID+6, VALID+12, VALID+13, VALID+14, VALID+15, VALID+17 , NVO+2, NVO+4, NVO+11, NVO+28, NVO+31
>> APPT	VALID+13, NVO+5
>> CLERK	NVO+32, NVO+49
DA	NVO+3~, NVO+8, NVO+10, NVO+11, NVO+12, NVO+13, NVO+14, NVO+15, NVO+16, NVO+19 , NVO+20, NVO+21, NVO+22, NVO+25, NVO+26, NVO+27, NVO+28, NVO+29, NVO+30, NVO+31 , NVO+32, NVO+33, NVO+35, NVO+36, NVO+38, NVO+39, NVO+41, NVO+42, NVO+44, NVO+45 , NVO+47, NVO+48, NVO+49, NVO+50, NVO+51
DATE	STOP+4*, STOP+5, ZQDATE~, ZQDATE+2, ZQDATE+3, DAY~, DAY+2, DAY+3, DAY+4
>> DAYS	STOP+2, STOP+5
DDRG	ORTYP~, ORTYP+2, ORTYP+3, ORTYP+4, ORTYP+7, ORTYP+8, ORTYP+9, ORTYP+10, ORTYP+11, ORTYP+12 , TRYAGAIN+4~*, TRYAGAIN+5, TRYAGAIN+6
>> DEL	STOP+5*
DFN	VALID+13~*
DIE	NVO+3~*
>> DISPENSE	VALID+4, NVO+33
>> DOSE	NVO+28
DR	NVO+3~, NVO+4, NVO+5, NVO+6, NVO+7
DT	TRYAGAIN+5
DURA	STOP~, STOP+2, STOP+3, STOP+4, STOP+5, STOP+6, STOP+7, STOP+8, STOP+9, STOP+10
>> DURATION	NVO+18*, NVO+19, NVO+21
>> FREQ	NVO+26
>> INFRT	VALID+19, VALID+20, NVO+23, NVO+24*, NVO+25
>> INSTR	NVO+22, NVO+28
>> IVCAT	VALID+19, NVO+6
>> IVLIMIT	NVO+20
>> IVTYP	NVO+25
>> JJ	NVO+36, NVO+39, NVO+42, NVO+45, NVO+48*, NVO+49, NVO+50, NVO+51
>> LOC	NVO+5
>> LOGIN	NVO+4
MDRT	ORTYP~, ORTYP+5, ORTYP+6, ORTYP+7, ORTYP+8, ORTYP+9, ORTYP+10, ORTYP+11, ORTYP+12, TRYAGAIN~ , TRYAGAIN+6
MONTHS	ZQDATE~, ZQDATE+2
>> NEWDATE	ZQDATE+3*, ZQDATE+4
>> NEWORDER	NVO+8*
>> NUM	STOP+4*
OI	TRYAGAIN~, TRYAGAIN+4
>> ORDCON	NVO+29
>> ORDER	ERROR+2, NVO+10
>> ORTYP	ORTYP+2, ORTYP+3, ORTYP+4, ORTYP+5, ORTYP+6, ORTYP+7, ORTYP+8, ORTYP+9, ORTYP+10, ORTYP+11 , ORTYP+12, ORTYP+13, TRYAGAIN+3, TRYAGAIN+6, TRYAGAIN+7, TRYAGAIN+8, TRYAGAIN+9, TRYAGAIN+10*, TRYAGAIN+11
ORTYPI	TRYAGAIN+2~, TRYAGAIN+3, TRYAGAIN+7, TRYAGAIN+10
ORTYPP	TRYAGAIN+2~, TRYAGAIN+3, TRYAGAIN+9, TRYAGAIN+10
ORTYPU	TRYAGAIN+2~, TRYAGAIN+3, TRYAGAIN+8, TRYAGAIN+10
>> PREON	NVO+14
>> PRIORITY	NVO+4
>> PRNTON	NVO+4
>> PROCOM	NVO+34
>> PROCOM(	NVO+36
>> PROVIDER	NVO+4, NVO+9
>> PSITEM	VALID+1, VALID+2, VALID+4, NVO+4
>> PSJHLDFN	VALID+13, ERROR+2, NVO+4, NVO+9
PSJHLSKP	NVO+8!
>> PSJMSG	ERROR+1
>> PSJORDER	NVO+8*
>> PSOC	ERROR+2
>> PSREASON	VALID+1, VALID+2, VALID+3, VALID+12, VALID+13, VALID+16, VALID+18, VALID+20, ERROR+1, ERROR+2
>> QFLG	ERROR+2*
>> QQ	NVO+51*
REQST	NVO+16, NVO+21, STOP~, STOP+2, STOP+4, STOP+5, STOP+6, STOP+10
>> ROC	VALID+16, NVO+13
>> ROUTE	VALID+3, VALID+4, VALID+16, NVO+1, NVO+2, NVO+4
>> SCHEDULE	VALID+7*, VALID+12, NVO+30
>> SCHTYP	NVO+7, NVO+27
>> STOP	STOP+3, STOP+5, STOP+6, STOP+10*, STOP+11
U	ERROR+2, NVO+5
>> UNIT	NVO+28
>> UNITS	NVO+31, NVO+33
>> VAIP(5	VALID+13
X	VALID+7~, VALID+8, VALID+9, VALID+10, VALID+11, ERROR+1, NVO+28~, STRIP+1, ZQDATE+2, ZQDATE+3 , DAY+1~, DAY+3, DAY+4*, DAY+5
>> Y	ZQDATE+2

Customize PDF page

Package: Inpatient Medications

Routine: PSJHL9

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: