Routine: PSOERUT

Package	Total	Call Graph
Outpatient Pharmacy	4	$$NUMERIC^PSOASAP0 $$DRUGHASH^PSOERUT $$RESOLV^PSOERXU2 $$ERXSIG^PSOERXUT
VA FileMan	2	$$GET1^DIQ ^DIWP
Kernel	1	($$TRIM,$$UP)^XLFSTR
Web Services Client	1	$$STATCHK^XOBWLIB

Package	Total	Caller Graph
Outpatient Pharmacy	13	PSOERPC0 PSOERPC1 PSOERPT0 PSOERRX0 PSOERRX1 PSOERUT PSOERUT2 PSOERUT3 PSOERUT4 PSOERUT5 PSOERUT6 PSOERX1E ^PS(52.49

Entry Points

Name	Comments	DBIA/ICR reference
XML2GBL(XML,OUTARR)	;Transfers XML incoming data into a TMP Gobal ; Input: XML - XML Message to be transferred to a Temp Global or Local Array ; OUTARR - Output Array (Temp Global or Local Array, e.g. $NA(^TMP($J,"PSOERUT")), "XMLMSG", "MSG(""ERX"")", etc.
PATNAME(ERXIEN)	; Returns the eRx Patient Name for a specific eRx Record ; Input: ERXIEN - eRx IEN - Pointer to #52.49
EPATFLST(MAXSIZE)	; Returns the eRx Patient Filter as a String List
VPATFLST(MAXSIZE)	; Returns the VistA Patient Filter as a String List
VPRVFLST(MAXSIZE)	; Returns the VistA Provider Filter as a String List
EPRVFLST(MAXSIZE)	; Returns the eRx Provider Filter as a String List
STATEABB(FILE,IEN)	; Returns the Patient or Provider State Abbreviation (eRx and VistA) ; Input: FILE - VistA File # (Can be 2, 200, 52.46 or 52.48) ; IEN - Internal Entry #
LASTREDT(XREF,IEN)	; Returns the Last eRx Received Date for a VistA Patient OR Provider
SSN(SSN)	; Returns the formatted SSN (999-99-9999) ; Input: SSN - Unformatted SSN (999999999)
ACTIONSTS(STS)	; Returns whether the eRx status is Actionable or no ; Input: STS - eRx Status. It can be external (e.g.,"N","RXF","RRN", etc...) or internal value (pointer to #52.45)
C2S(STR)	; Replaces commas with spaces (for auto-wrap to work) - Arbitrarily using '@' (not likely to be on the string)
S2C(STR)	; Replaces spaces with commas (for auto-wrap to work)
SORT(STR)	; Sorts a comma (,) separated list alphabetically
WRAP(STRING,LENGTH,WRPSTR)	; Formats a String into an Array ; Input: STRING - String to be formatted/wrapped in multiple lines ; LENGHT - Text line length
SADRGVRX(ERXIEN,RXIEN)	; Sets the "ADRGVRX" cross-reference on the ERX HOLDING QUEUE file (#52.49), ; PHARMACY PRESCRIPTION NUMBER field (#.13) ; Input: ERXIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; RXIEN - Pointer to the PRESCRIPTION file (#52)
KADRGVRX(ERXIEN,RXIEN)	; Kills the "ADRGVRX" cross-reference on the ERX HOLDING QUEUE file (#52.49), ; PHARMACY PRESCRIPTION NUMBER field (#.13) ; Input: ERXIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; RXIEN - Pointer to the PRESCRIPTION file (#52)
DRUGHASH(ERXIEN)	; Return the Drug Information corresponding Hash Value ; Input: ERXIEN - Pointer to the eRx being worked on (Pointer to #52.49)

Name	Field # of Occurrence
$$GET1^DIQ	PATNAME+4, PATNAME+5, PATNAME+6, PATNAME+9, EPATFLST+6, VPATFLST+6, VPRVFLST+6, EPRVFLST+6, EPRVFLST+7, STATEABB+6 , STATEABB+7, ACTIONSTS+4, SADRGVRX+6, SADRGVRX+7, DRUGHASH+8, DRUGHASH+9, DRUGHASH+10, DRUGHASH+11, DRUGHASH+12, DRUGHASH+14 , DRUGHASH+15, DRUGHASH+16, DRUGHASH+17
^DIWP	WRAP+6
$$NUMERIC^PSOASAP0	SSN+3
$$DRUGHASH^PSOERUT	KADRGVRX+6
$$RESOLV^PSOERXU2	PATNAME+8
$$ERXSIG^PSOERXUT	DRUGHASH+19
$$TRIM^XLFSTR	WRAP+7, WRAP+9, WRAP+11
$$UP^XLFSTR	DRUGHASH+19
$$STATCHK^XOBWLIB	XML2GBL+12

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^DIC(5 - [#5]	GET1^DIQ
^PS(52.45 - [#52.45]	GET1^DIQ
^PS(52.46 - [#52.46]	GET1^DIQ
^PS(52.48 - [#52.48]	GET1^DIQ
^PS(52.49 - [#52.49]	GET1^DIQ
52.49311	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.49 - [#52.49]	LASTREDT+5, LASTREDT+6, LASTREDT+7, SADRGVRX+4, SADRGVRX+9*, KADRGVRX+4, KADRGVRX+7!
^PSRX - [#52]	SADRGVRX+4, KADRGVRX+4
^UTILITY($J	WRAP+6!, WRAP+7, WRAP+9

Name	Line Occurrences
$$DRUGHASH	SADRGVRX+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRDPTH	XML2GBL+9~, XML2GBL+10*, XML2GBL+17
C2S	C2S+1~, C2S+2, C2S+3, C2S+4
DAYS	DRUGHASH+6~, DRUGHASH+16*, DRUGHASH+24
DIWF	WRAP+5~, WRAP+6*
DIWL	WRAP+5~, WRAP+6*
DIWR	WRAP+5~, WRAP+6*
DRUG	DRUGHASH+6~, DRUGHASH+10*, DRUGHASH+19
DRUGHASH	DRUGHASH+6~, DRUGHASH+7, DRUGHASH+21, DRUGHASH+22*, DRUGHASH+24
EIEN	LASTREDT+3~, LASTREDT+5*, LASTREDT+6, LASTREDT+7
ERXIEN	PATNAME~, PATNAME+4, PATNAME+5, PATNAME+6, PATNAME+8, PATNAME+9, SADRGVRX~, SADRGVRX+4, SADRGVRX+6, SADRGVRX+7 , SADRGVRX+8, SADRGVRX+9, KADRGVRX~, KADRGVRX+4, KADRGVRX+6, KADRGVRX+7, DRUGHASH~, DRUGHASH+7, DRUGHASH+8, DRUGHASH+9 , DRUGHASH+10, DRUGHASH+11, DRUGHASH+12, DRUGHASH+14, DRUGHASH+15, DRUGHASH+16, DRUGHASH+17, DRUGHASH+19
FIELD	STATEABB+4~, STATEABB+5*, STATEABB+6
FILE	STATEABB~, STATEABB+5, STATEABB+6
I	SORT+1~, SORT+2, WRAP+5~, WRAP+7, WRAP+9, WRAP+12, WRAP+13, DRUGHASH+6~, DRUGHASH+21, DRUGHASH+22
IEN	STATEABB~, STATEABB+5, STATEABB+6, LASTREDT~, LASTREDT+5, LASTREDT+6, LASTREDT+7
L	DRUGHASH+6~, DRUGHASH+20*, DRUGHASH+21, DRUGHASH+22
LASTREDT	LASTREDT+3~, LASTREDT+4, LASTREDT+6, LASTREDT+7, LASTREDT+8
LENGTH	WRAP~, WRAP+6, WRAP+7, WRAP+13
MAXSIZE	EPATFLST~, EPATFLST+10, VPATFLST~, VPATFLST+10, VPRVFLST~, VPRVFLST+10, EPRVFLST~, EPRVFLST+10
MTYPE	PATNAME+3~, PATNAME+5, PATNAME+6, DRUGHASH+6~, DRUGHASH+8, DRUGHASH+17
NDCCODE	DRUGHASH+6~, DRUGHASH+11, DRUGHASH+12, DRUGHASH+13, DRUGHASH+24
NEWERX	PATNAME+3~, PATNAME+8*, PATNAME+9
OUTARR	XML2GBL~, XML2GBL+6, XML2GBL+8, XML2GBL+10, XML2GBL+15, XML2GBL+16, XML2GBL+17, XML2GBL+19
PAT	EPATFLST+2~, EPATFLST+5*, EPATFLST+6
PATFLST	EPATFLST+2~, EPATFLST+4, EPATFLST+7, EPATFLST+9, EPATFLST+10, EPATFLST+11
>> PATFLTR	EPATFLST+3
>> PATFLTR(	EPATFLST+5
PATIEN	PATNAME+3~, PATNAME+4*, PATNAME+6
PATNAM	EPATFLST+2~, EPATFLST+6, EPATFLST+7, EPATFLST+8, VPATFLST+2~, VPATFLST+6, VPATFLST+7, VPATFLST+8
PATNAME	PATNAME+3~, PATNAME+6, PATNAME+7, PATNAME+9, PATNAME+10*, PATNAME+11
PRV	EPRVFLST+2~, EPRVFLST+5*, EPRVFLST+6, EPRVFLST+7
PRVDPTH	XML2GBL+9~, XML2GBL+10, XML2GBL+14, XML2GBL+17, XML2GBL+20
PRVFLST	EPRVFLST+2~, EPRVFLST+4, EPRVFLST+7, EPRVFLST+9, EPRVFLST+10, EPRVFLST+11
>> PRVFLTR	EPRVFLST+3
>> PRVFLTR(	EPRVFLST+5
PRVNAM	VPRVFLST+2~, VPRVFLST+6, VPRVFLST+7, VPRVFLST+8, EPRVFLST+2~, EPRVFLST+6, EPRVFLST+7, EPRVFLST+8
PSOHASH	SADRGVRX+5~, SADRGVRX+8, SADRGVRX+9, KADRGVRX+5~, KADRGVRX+6, KADRGVRX+7
QTY	DRUGHASH+6~, DRUGHASH+14*, DRUGHASH+24
READER	XML2GBL+9~, XML2GBL+11
REFS	DRUGHASH+6~, DRUGHASH+17*, DRUGHASH+24
RSPTYPE	DRUGHASH+6~, DRUGHASH+9*, DRUGHASH+17
RXIEN	SADRGVRX~, SADRGVRX+4, SADRGVRX+9, KADRGVRX~, KADRGVRX+4, KADRGVRX+7
S2C	S2C+1~, S2C+2, S2C+3, S2C+4*, S2C+5
SARR	SORT+1~
SARR(	SORT+2*, SORT+3
SEQ	XML2GBL+9~, XML2GBL+15*, XML2GBL+16
SSN	SSN~, SSN+3*, SSN+4, SSN+5
SSTR	SORT+1~, SORT+3, SORT+4, SORT+5
STATEIEN	STATEABB+4~, STATEABB+6*, STATEABB+7
STATUS	XML2GBL+9~, XML2GBL+11*, XML2GBL+12
STR	C2S~, C2S+2, S2C~, S2C+2, SORT~, SORT+2
STRING	WRAP~, WRAP+6, WRAP+11, WRAP+12, WRAP+13
STS	ACTIONSTS~, ACTIONSTS+4*, ACTIONSTS+5, ACTIONSTS+6
SUBS	DRUGHASH+6~, DRUGHASH+15*, DRUGHASH+24
TMP	EPATFLST+2~, VPATFLST+2~, VPRVFLST+2~, EPRVFLST+2~
TMP(	EPATFLST+7, EPATFLST+8, VPATFLST+7, VPATFLST+8, VPRVFLST+7, VPRVFLST+8, EPRVFLST+7, EPRVFLST+8
TOOLONG	WRAP+5~, WRAP+7*, WRAP+8
VPAT	VPATFLST+2~, VPATFLST+5*, VPATFLST+6
VPATFLST	VPATFLST+2~, VPATFLST+4, VPATFLST+7, VPATFLST+9, VPATFLST+10, VPATFLST+11
>> VPATFLTR	VPATFLST+3
>> VPATFLTR(	VPATFLST+5
VPRV	VPRVFLST+2~, VPRVFLST+5*, VPRVFLST+6
VPRVFLST	VPRVFLST+2~, VPRVFLST+4, VPRVFLST+7, VPRVFLST+9, VPRVFLST+10, VPRVFLST+11
>> VPRVFLTR	VPRVFLST+3
>> VPRVFLTR(	VPRVFLST+5
WORD	SORT+1~, SORT+3*
WRPSTR	WRAP~, WRAP+5!, WRAP+14!
WRPSTR(	WRAP+9, WRAP+13
WRPSTR(1	WRAP+14
X	WRAP+5~, WRAP+6, DRUGHASH+6~, DRUGHASH+19, DRUGHASH+20, DRUGHASH+21, DRUGHASH+22
XML	XML2GBL~, XML2GBL+11
>> XOBERR	XML2GBL+12
XREF	LASTREDT~, LASTREDT+5, LASTREDT+6, LASTREDT+7

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOERUT

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 13

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: