Routine: PSOHLNE1

Package	Total	Call Graph
Outpatient Pharmacy	5	KL^PSOHLSIH (EN,INIT,RERROR,SEND)^PSOHLSN EN^PSOHLSN1 SCP^PSORN52D ECAN^PSOUTL
Kernel	1	$$HL7TFM^XLFDT
Order Entry Results Reporting	1	EN^ORERR
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOHLNEW

Name	Comments	DBIA/ICR reference
MISRN	;Mismatch on CPRS renewal
CNT	;
SET
END	;16 OF ORC?
EXPEN	;SS on Pending orders
ZCL	;ZCL segment - SC/EI related to ICDs
EXPQ
OID	;Check for 1 to 1 match from Dispense Drug to Orderable Item
CHCS	;Replace CHCS number with CPRS number in .01 field
ZRX	;Process ZRX segment
PARSE
EN	;ORC segment
EXP	;
MISX	;Mismatch patient on CPRS New Order
CP	;ZSC segment (replaced by ZCL segment)
NTE	;

Name	Field # of Occurrence
NOW^%DTC	EN+6, END+19, CNT+3
EN^ORERR	EXP+6, MISX+1, MISRN+3, MISRN+6, CHCS+2, CHCS+3
KL^PSOHLSIH	MISX+1, MISRN+3, MISRN+6
EN^PSOHLSN	EXPEN+3
INIT^PSOHLSN	EXP+8
RERROR^PSOHLSN	MISX+1, MISRN+3, MISRN+6
SEND^PSOHLSN	EXP+9
EN^PSOHLSN1	EXP+17
SCP^PSORN52D	ZCL+4
ECAN^PSOUTL	EXP+13
$$HL7TFM^XLFDT	EN+5, EN+16, END+8, END+18

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	MISRN+4
^PS(50.607 - [#50.607]	EN+24, END+16
^PS(52.41 - [#52.41]	EXP+5, EXPEN+1, CHCS+2, CHCS+3, CHCS+4, CHCS+5!, CHCS+6, CHCS+7
^PSDRUG - [#50]	OID+5
^PSDRUG("ASP"	OID+5
^PSRX - [#52]	EXP+6, EXP+10, EXP+11, EXP+13, EXP+14, MISRN+2, MISRN+5, CNT+1, CNT+2, CNT+3

Name	Line Occurrences
EXPEN	EXP+5
EXPQ	EXP+6, EXPEN+4
PARSE	EN+28
SET	PARSE, PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+8, PARSE+9

Name	Field # of Occurrence
^("I"	OID+5
^("STA"	EXP+13
^(0	EXP+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+6!, END+19!, CNT+3
AA	EXP+16, EXP+17, EXPQ!, EXPEN+1, EXPEN+2
AAA	EN+28, EN+29, EN+30, EXP+16, EXP+17, EXPQ!, EXPEN+2*, EXPEN+3
>> COMM	EXP+6, EXP+8, CHCS+2, CHCS+3*
>> DSIG	ZRX+8*
DT	EXP+11, OID+5
>> EER	EXP+7*
>> EFFECT	EN+5, END+18, END+19, PARSE+10
>> ENTERED	EN+4, PARSE+6, CNT+3
GG	EXP+14*, EXP+16, EXPQ!
>> JJ	EN+9*
>> JJJ	EN+11, EN+13, EN+14, EN+15, EN+16, EN+17, EN+19, EN+20, EN+21, EN+22 , EN+23, EN+24, END+2, END+3, END+4, END+5, END+6, END+8, END+9, END+10 , END+11, END+12, END+13, END+14, END+15, END+16
LL	EXP+5, EXP+6, EXP+10, EXP+11, EXP+13, EXP+14, EXP+17, EXPQ!, EXPEN+1, NTE+1 , NTE+2
>> LLL	NTE+1*, NTE+2
MSG	EXP+6, EXP+8~, MISX+1, MISRN+3, MISRN+6, CHCS+2, CHCS+3
MSG(	EN+3, EN+10, EN+27*, EN+28, EN+29, EN+30, END+20!, EXP+7, NTE+1, NTE+2
MSG(2	EXP+8*
MSG(3	EXP+8*
MSG(4	EXP+8*
MSG(5	EXP+8*
>> NATURE	ZRX+4*
>> NNCK	EN+27, PARSE+3, PARSE+4*
>> NNN	EN+27, EN+28
>> NNNN	EN+27, EN+28, EN+29, PARSE, PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6 , PARSE+7, PARSE+8, PARSE+9, PARSE+10
>> NWFLAG	MISX+1*
>> OOO	EN+28*, EN+29, EN+30
>> OR("PLACE"	EXP+8, EXPEN+3
>> ORCSEG	EN+8*, EN+9, EN+11
PAC	CNT+2*, CNT+3, CNT+4!
PACA	CNT+2*, CNT+4!
>> PDFN	MISRN+2, CHCS+2
>> PFLAG	ZRX+3*
>> PLACER	EN+4, PARSE+1, MISRN+4
>> PLACERXX	EN+4, PARSE+1, EXP+8
>> POLIM	EN+31, PARSE+1, PARSE+3, PARSE+4, PARSE+6, PARSE+8, PARSE+10, SET
>> POVAR	EN+27, EN+31, EN+32, SET*
>> POVAR1	EN+27, EN+28, EN+30, EN+32, PARSE+3
>> PREV	MISRN+2, MISRN+5, ZRX+2*, CNT+1, CNT+2, CNT+3
>> PRIOR	EN+18, END+10
>> PROV	EN+4, PARSE+8, CNT+3
>> PSERRORC	EXP+7*, EXP+8
>> PSERRPID	EXP+7*, EXP+8
>> PSERRPV1	EXP+7*, EXP+8
PSOCDD	OID+1~, OID+4, OID+5
PSOCDDI	OID+1~, OID+4, OID+5, OID+6
PSOCDDIZ	OID+1~, OID+3!, OID+5*, OID+7
>> PSOCHFFL	CHCS+2, CHCS+3, CHCS+4, CHCS+5, CHCS+6, CHCS+7
PSOCINV	MISRN+1~, MISRN+4*, MISRN+5
>> PSOCVI	MISRN+6*
PSOFFL	CHCS+2!, CHCS+3!
>> PSOFILNM	EXP+2, EXP+5, EXP+6
PSOHINST	EXP+8~
PSOHTMP	CHCS+1~, CHCS+4*, CHCS+5
>> PSOIBY	CP+2, ZCL+5, ZCL+7, ZCL+8, ZCL+9, ZCL+11, ZCL+12, ZCL+13, ZCL+14, ZCL+15*
>> PSOICD(	ZCL+2, ZCL+3
>> PSOIII	EN+27*
>> PSOLOG	EN+6, END+19
PSOLQ1I	EN+2!
PSOLQ1I(	EN+13, END+4
PSOLQ1II	EN+2!
PSOLQ1II(	EN+13, END+4
PSOLQ1IX	EN+2!
PSOLQ1IX(	EN+13, END+4
>> PSOMO	MISRN+2, MISRN+5
PSOMSORR	EXP+3*, EXPQ!
>> PSOOC	EN+4, PARSE, ZRX+1*
PSOPLC	CHCS+2!, CHCS+3!, CHCS+6
PSOPOSSD	EN+1~, EN+12, EN+13, EN+22, EN+23, EN+24, END+3, END+4, END+14, END+15 , END+16
>> PSOQWX	OID+7*
>> PSORDITE	OID+2, OID+5
>> PSORSO	ZRX+5*
PSOSCA	ZCL+4!
>> PSOSCP	ZCL+6
>> PSOSEG	EN+4, EN+5, EN+8, CP+1, CP+2, ZCL+1, ZCL+3, ZCL+8, ZCL+9, ZCL+10 , ZCL+11, ZCL+12, ZCL+13, ZCL+14, ZCL+15, ZRX+1, ZRX+2, ZRX+3, ZRX+4, ZRX+5 , ZRX+6, ZRX+8
PSOSND	CHCS+2!, CHCS+3!
PSOSSMES	EXP+4~, EXP+13, EXP+18!
PSOUNN	EN+24, EN+25!, END+16, END+17!
>> PSOXRP	MISRN+3*
>> PSRNFLAG	ZRX+1*
Q1	EN+1~
Q1(	EN+14, EN+21, END+5, END+13
>> Q1I(	EN+13, EN+22, EN+23, EN+24, END+4, END+14, END+15, END+16
Q2	EN+1~
Q2(	EN+15, EN+21, END+6, END+13
Q3	EN+1~
Q3(	EN+16, EN+21, END+8, END+13
Q4	EN+1~
Q4(	EN+17, EN+21, END+9, END+13
Q5	EN+1~
Q6	EN+1~
Q6(	EN+19, EN+21, END+11, END+13
Q7	EN+1~
Q7(	EN+20, EN+21, END+12, END+13
>> QCOUNT	EN+8, EN+9, EN+11, END+2*
>> QQQ	EN+11*, EN+12, EN+13, EN+14, EN+15, EN+16, EN+17, EN+18, EN+19, EN+20
>> QTARRAY(	EN+21, EN+23, EN+24, END+13, END+15, END+16
>> QTARRAY2(	EN+22, END+14
>> QTVAR(	END+2, END+3, END+4, END+5, END+6, END+8, END+9, END+10, END+11, END+12 , PARSE+3, PARSE+4
>> RCOMM	MISX+1, MISRN+3, MISRN+6*
>> ROUTING	ZRX+6, ZRX+7
SEQ	ZCL+1~
SEQ2	ZCL+1~*, ZCL+2, ZCL+3
SEQ3	ZCL+1~*, ZCL+3, ZCL+7, ZCL+8, ZCL+9, ZCL+10, ZCL+11, ZCL+12, ZCL+13, ZCL+14 , ZCL+15
>> SERV	CP+1, ZCL+10
TAC	CNT+1, CNT+3, CNT+4!
TACA	CNT+1*, CNT+4!
U	ZCL+7, ZCL+8, ZCL+9, ZCL+11, ZCL+12, ZCL+13, ZCL+14, ZCL+15
>> WORDP	NTE+1*, NTE+2
>> WPARRAY(	NTE+1, NTE+2
>> WPCT	NTE+1, NTE+2
X	EN+5!, EN+16!, END+8!, END+18!
>> ZZ	EN+3, EN+10, EN+27, EN+28, EN+29, EN+30, END+20

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOHLNE1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: