Routine: PSOPMP0

Information

PSOPMP0 ;BIRM/MFR - Patient Medication Profile - Listmanager ;10/28/06

Package	Total	Call Graph
Outpatient Pharmacy	13	CHKADDR^PSOBAI ($$ECME,$$RXSITE)^PSOBPSUT $$CHKERX^PSOERXU1 EN^PSOLMPI ^PSOLSET EN^PSONVAVW DSPL^PSOORFI1 ($$ALLERGY,$$CMOP,$$COPAY,$$DAT,$$FILTER,$$ISSDT,$$LSTFD,$$REFREM,$$STSINFO,GROUP,PENHDR,RV,SETHDR,SETSIG,VIDEO)^PSOPMP1 (LOAD,LST)^PSOPMPPF $$TRIC^PSOREJP1 $$FIND^PSOREJUT DP^PSORXVW $$TITRX^PSOUTL
List Manager	3	EN^VALM FULL^VALM1 (RESTORE,SAVE)^VALM10
VA FileMan	2	^DIC $$GET1^DIQ
General Medical Record - Vitals	1	EN6^GMRVUTL
Registration	1	DEM^VADPT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 22

Package	Total	Caller Graph
Outpatient Pharmacy	19	PSO BPS MED PROF MENU PSO BPS PMP MAIN PSO HRC MAIN PSO HRC MENU PSO PMP PSO PMP CHANGE VIEW PSO PMP DRUG SORT PSO PMP ISSUE DATE SORT PSO PMP LAST FILL SORT PSO PMP MAIN PSO PMP MENU PSO PMP PATIENT INFORMATION PSO PMP RX SORT PSO PMP SELECT PSO PMP SIG DISPLAY PSO PMP STATUS GROUP PSOMPHRC PSOREJP1 PSOSPML4
Kernel	2	^DIC(19 ^ORD(101
E Claims Management Engine	1	BPSVRX3

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Menu option entry point
LST(SITE,PSODFN)	;ListManager entry point ; Loading Division/User preferences
HDR
INIT	;Populates the Body section for ListMan
SETLINE	;Sets the line to be displayed in ListMan
SETSORT(FIELD)	;Sets the data sorted by the FIELD specified
RX	;Sort by Rx
DR	;Sort by Drug
ID	;Sort by Issue Date
LF	;Sort by Last Fill Date
SORT(FIELD)	;Sort entries by FIELD
REF	;Screen Refresh
GS	;Group by Status
SIG	;Display SIG
PI	;Patient Information
CV	;Change View
SEL	;Process selection of one entry
EXIT	;
HELP
MEDPRO(RXIEN,FILL)	; MP Medication Profile	ICR #6863 Status: Active Usage: Private

External References

Name	Field # of Occurrence
^DIC	EN+8
$$GET1^DIQ	SETLINE+22, SETLINE+26, SETSORT+8, SETSORT+9, SETSORT+10, SETSORT+11, SETSORT+16, SETSORT+45, SETSORT+47, SETSORT+49 , SETSORT+50, SETSORT+51, SETSORT+52, SETSORT+54, SETSORT+55, SETSORT+56, SETSORT+67, SETSORT+68, SETSORT+70, SETSORT+71 , SETSORT+72, MEDPRO+14
EN6^GMRVUTL	HDR+6, HDR+7
CHKADDR^PSOBAI	EN+9
$$ECME^PSOBPSUT	SETSORT+20
$$RXSITE^PSOBPSUT	MEDPRO+13
$$CHKERX^PSOERXU1	SETLINE+23, SETLINE+27
EN^PSOLMPI	PI+1
^PSOLSET	EN+5
EN^PSONVAVW	SEL+24
DSPL^PSOORFI1	SEL+20
$$ALLERGY^PSOPMP1	HDR+9
$$CMOP^PSOPMP1	SETSORT+21, SETSORT+57
$$COPAY^PSOPMP1	SETSORT+20
$$DAT^PSOPMP1	HDR+6, HDR+7, SETSORT+73
$$FILTER^PSOPMP1	SETSORT+7
$$ISSDT^PSOPMP1	SETSORT+13, SETSORT+53
$$LSTFD^PSOPMP1	SETSORT+14
$$REFREM^PSOPMP1	SETSORT+15
$$STSINFO^PSOPMP1	SETSORT+12
GROUP^PSOPMP1	SETLINE+15, SETLINE+18
PENHDR^PSOPMP1	SEL+20
RV^PSOPMP1	SETLINE+43
SETHDR^PSOPMP1	HDR+15
SETSIG^PSOPMP1	SETLINE+36
VIDEO^PSOPMP1	SETLINE+42
LOAD^PSOPMPPF	LST+2, MEDPRO+18
LST^PSOPMPPF	CV+1
$$TRIC^PSOREJP1	SETSORT+30, SETSORT+32
$$FIND^PSOREJUT	SETSORT+28, SETSORT+30, SETSORT+32
DP^PSORXVW	SEL+14
$$TITRX^PSOUTL	SETSORT+20
DEM^VADPT	HDR+2
EN^VALM	LST+4
FULL^VALM1	LST+5
RESTORE^VALM10	SETLINE+8
SAVE^VALM10	SETLINE+40

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",! Line Location: EN+5
Function Call: WRITE	Prompt: !! Line Location: EN+8
Function Call: WRITE	Prompt: !,"Please wait..." Line Location: LST+3
Function Call: WRITE	Prompt: ?52,"Please wait..." Line Location: REF+1
Function Call: WRITE	Prompt: ?52,"Please wait..." Line Location: GS+1
Function Call: WRITE	Prompt: ?52,"Please wait..." Line Location: SIG+1
Function Call: WRITE	Prompt: !?52,"Please wait..." Line Location: CV+1
Routine Call	DIC Line Location: EN+8
Routine Call	VALM Line Location: LST+4

FileNo	Call Tags
^PSDRUG - [#50]	GET1^DIQ
^PS(50.7 - [#50.7]	GET1^DIQ
^PSRX - [#52]	GET1^DIQ
^PS(52.41 - [#52.41]	GET1^DIQ
55.05	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.41 - [#52.41]	SETLINE+35, SETSORT+44, SEL+19
^PS(55 - [#55]	SETSORT+5, SETSORT+6, SETSORT+66
^PSRX - [#52]	SETSORT+6, SETSORT+17, SETSORT+18
^TMP("PSOPMP0"	INIT+1!, SETLINE+3, SETLINE+4, SETLINE+11!, SETLINE+32, SETLINE+34, SETLINE+35*, SEL+5, SEL+6, EXIT+1! , MEDPRO+9!
^TMP("PSOPMPSR"	INIT+1!, SETLINE+2, SETLINE+12, SETLINE+14, SETLINE+15, SETLINE+16, SETLINE+18, SETLINE+19, SETLINE+20, SETSORT+2! , SETSORT+33, SETSORT+38, SETSORT+40, SETSORT+60, SETSORT+62, SETSORT+75, SETSORT+78*, EXIT+1!, MEDPRO+9!, MEDPRO+28!

Label References

Name	Line Occurrences
EXIT	EN+5, EN+8, LST+6
HDR	REF+1, GS+1, SIG+1, CV+1
INIT	REF+1, GS+1, SIG+1, CV+1
LST	EN+10
REF	SORT+3, SEL+11, SEL+17
SETLINE	INIT+2, MEDPRO+26
SETSORT	INIT+2, MEDPRO+25
SORT	RX+1, DR+1, ID+1, LF+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADVREA	HDR+1~
DA	SEL+12~, SEL+13*
DAYSUP	SETSORT+1~, SETSORT+16, SETSORT+22, SETSORT+55, SETSORT+58
DFN	EN+2~, EN+8, EN+9, EN+10, HDR+1~, HDR+2, HDR+9
DIC	EN+2~, EN+8*
DIC(0	EN+8*
DOB	HDR+1~, HDR+4*, HDR+11
DOCDAT	SETSORT+1~, SETSORT+72*, SETSORT+73, SETSORT+74
DRNAME	SETSORT+1~, SETSORT+10, SETSORT+20, SETSORT+23, SETSORT+47, SETSORT+48, SETSORT+50, SETSORT+57, SETSORT+59, SETSORT+68 , SETSORT+69, SETSORT+71*, SETSORT+73, SETSORT+74
DRUG	SETSORT+1~, SETSORT+9, SETSORT+10, SETSORT+21, SETSORT+47, SETSORT+57
DUZ	LST+2, CV+1, MEDPRO+18
ERXIEN1	SETLINE+1~, SETLINE+22!, SETLINE+23, SETLINE+25, SETLINE+26!, SETLINE+27
FIELD	SETSORT~, SETSORT+23, SETSORT+59, SETSORT+74, SORT~, SORT+1, SORT+2
FILL	MEDPRO~, MEDPRO+13
GMRAL	HDR+1~
>> GMRVSTR	HDR+6, HDR+7
GROUP	SETLINE+1~, SETLINE+11, SETLINE+12, SETLINE+13, SETLINE+14, SETLINE+15, SETLINE+16, SETLINE+18, SETLINE+19, SETLINE+20 , SETSORT+1~, SETSORT+25, SETSORT+28, SETSORT+30, SETSORT+32, SETSORT+33, SETSORT+34, SETSORT+36, SETSORT+37, SETSORT+38 , SETSORT+39, SETSORT+40, SETSORT+43, SETSORT+60, SETSORT+61, SETSORT+62, SETSORT+65, SETSORT+75, SETSORT+76, SETSORT+78
GRP	SETLINE+1~, SETLINE+13*, SETLINE+14, SETLINE+22, SETLINE+25, SETLINE+26, SETLINE+28, SETLINE+29, SETLINE+33, SETLINE+36
GRPCNT	SETSORT+1~
GRPCNT(	SETSORT+34, SETSORT+37, SETSORT+38, SETSORT+39, SETSORT+40, SETSORT+61, SETSORT+62, SETSORT+76*, SETSORT+78
GRPLN	EN+2~, SETLINE+9!
HIGHLN	EN+2~, SETLINE+9!
HIGHLN(	SETLINE+32*
HT	HDR+1~, HDR+7*, HDR+10
HTDT	HDR+1~, HDR+7*, HDR+10
I	SETLINE+1~, SETLINE+3, SETLINE+8, SETLINE+40*
IENSUB	SETLINE+1~, SETLINE+33*, SETLINE+34, SETLINE+35
ISSDT	SETSORT+1~, SETSORT+13, SETSORT+21, SETSORT+23, SETSORT+53, SETSORT+58, SETSORT+59
LASTLINE	EN+2~, SETLINE+8, SETLINE+39, SETLINE+40, SETLINE+41*
LBL	SETLINE+1~
LINE	HDR+1~, SETLINE+1~, SETLINE+11, SETLINE+15, SETLINE+18, SETLINE+32, SETLINE+35, SETLINE+36, SETLINE+39, SETLINE+40 , SETLINE+41, SETLINE+43, SEL+14~, SEL+20~, SEL+24~
LINE1	HDR+1~, HDR+8, HDR+9, HDR+14
LINE2	HDR+1~, HDR+10*, HDR+14
LINE3	HDR+1~, HDR+11*, HDR+14
LINE4	HDR+1~, HDR+12*, HDR+14
LN	SETLINE+1~
LSTFD	SETSORT+1~, SETSORT+14*, SETSORT+22, SETSORT+23
OI	SETSORT+1~, SETSORT+49, SETSORT+50, SETSORT+70, SETSORT+71
OR0	SEL+18~, SEL+19*
ORD	SETSORT+1~, SETSORT+43, SETSORT+44, SETSORT+45, SETSORT+47, SETSORT+49, SETSORT+51, SETSORT+52, SETSORT+53, SETSORT+54 , SETSORT+55, SETSORT+56, SETSORT+57, SETSORT+59, SETSORT+65, SETSORT+66, SETSORT+67, SETSORT+68, SETSORT+70, SETSORT+72 , SETSORT+73, SETSORT+74, SEL+1~, SEL+6*, SEL+7, SEL+13, SEL+19, SEL+24
ORDCNT	SETLINE+1~
ORNUM1	SETLINE+1~, SETLINE+22, SETLINE+23, SETLINE+26, SETLINE+27
PNAME	HDR+1~, HDR+3*, HDR+8
POS	HDR+1~
PS	SEL+12~, SEL+13*
PSOACTOV	SEL+18~, SEL+19*
PSOBADR	SETSORT+1~, SETSORT+17, SETSORT+18, SETSORT+19*, SETSORT+21
PSOCHNG	EN+1~
PSODFN	EN+9, LST~, HDR+2, SETLINE+36, SETSORT+5, SETSORT+6, SETSORT+44, SETSORT+66, SETSORT+67, SETSORT+68 , SETSORT+70, SETSORT+72, SEL+14~, SEL+20, SEL+24, MEDPRO+7~, MEDPRO+14
PSOEXDCE	EN+1~, HDR+12, MEDPRO+32!
PSOEXPDC	EN+1~
PSOLIS	SEL+1~, SEL+2*, SEL+3, SEL+4
>> PSOPAR	EN+5
PSORDCNT	EN+1~, MEDPRO+32!
PSORDER	EN+1~, SETLINE+19, SORT+1, SORT+2, MEDPRO+32!
PSORDSEQ	EN+1~
PSORDSEQ("H"	SETSORT+30, SETSORT+32
PSORDSEQ("N"	SETSORT+65
PSORDSEQ("P"	SETSORT+43
PSORDSEQ("R"	SETSORT+25
PSORDSEQ("T"	SETSORT+28
PSOSAVE	SEL+12~
PSOSEL	SEL+1~, SEL+4*, SEL+5, SEL+6
PSOSIGDP	EN+1~, SETLINE+36, SIG+1, SIG+2, SIG+3, MEDPRO+7~, MEDPRO+19
PSOSITE	EN+5, EN+10, MEDPRO+7~, MEDPRO+13*, MEDPRO+18
PSOSRTBY	EN+1~, INIT+2, SORT+1, SORT+2*, MEDPRO+7~, MEDPRO+25, MEDPRO+32!
PSOSTORD	EN+1~
PSOSTSEQ	EN+1~, MEDPRO+32!
PSOSTSGP	EN+1~, SETLINE+14, SETSORT+24, GS+1*, MEDPRO+32!
PSOVDA	SEL+12~, SEL+13*
QTY	SETSORT+1~, SETSORT+11, SETSORT+21, SETSORT+51, SETSORT+57
QTYL	SETLINE+1~, SETLINE+24*, SETLINE+25, SETLINE+29
RDREJ	SETSORT+1~, SETSORT+27, SETSORT+28, SETSORT+30, SETSORT+32
REFREM	SETSORT+1~, SETSORT+15, SETSORT+22, SETSORT+54, SETSORT+58
RFRX	SETSORT+1~, SETSORT+56*, SETSORT+58
RX	SETSORT+1~, SETSORT+6*, SETSORT+7, SETSORT+8, SETSORT+9, SETSORT+11, SETSORT+12, SETSORT+13, SETSORT+14, SETSORT+15 , SETSORT+16, SETSORT+17, SETSORT+18, SETSORT+20, SETSORT+21, SETSORT+28, SETSORT+30, SETSORT+32
RXIEN	MEDPRO~, MEDPRO+13, MEDPRO+14
RXNUM	SETSORT+1~, SETSORT+8*, SETSORT+20, SETSORT+23
SEQ	SETLINE+1~, SETLINE+21, SETLINE+34, SETSORT+1~, SETSORT+4, SETSORT+5*, SETSORT+6
SEX	HDR+1~, HDR+5*, HDR+12
SIG	SETSORT+1~
SITE	LST~, LST+2, CV+1
>> SORT	SETSORT+23, SETSORT+33, SETSORT+59, SETSORT+60, SETSORT+74*, SETSORT+75
STATUS	SETSORT+1~, SETSORT+12, SETSORT+21, SETSORT+24, SETSORT+52, SETSORT+56, SETSORT+57
STS	SETLINE+1~, SETLINE+11, SETLINE+16, SETLINE+17, SETLINE+18, SETLINE+19, SETLINE+20, SETSORT+1~, SETSORT+24, SETSORT+28 , SETSORT+30, SETSORT+32, SETSORT+33, SETSORT+34, SETSORT+39*, SETSORT+40
SUB	SETLINE+1~, SETLINE+11, SETLINE+19, SETLINE+20
TITLE	SEL+1~, SEL+8*, SEL+14~, SEL+20~, SEL+24~, SEL+26
TOTAL	SETLINE+1~
TYPE	SETLINE+1~, SETSORT+45, SETSORT+46, SEL+1~, SEL+5, SEL+6, SEL+11, SEL+17, SEL+23
U	SETSORT+30, SETSORT+32
VADM	HDR+1~, HDR+2!
VADM(1	HDR+3
VADM(2	HDR+10
VADM(3	HDR+4
VADM(4	HDR+4
VADM(5	HDR+5
>> VALM("TITLE"	SEL+8, SEL+26*
>> VALMBCK	REF+1, GS+1, SIG+1, PI+1, CV+2, SEL+2, SEL+4, SEL+5, SEL+7, SEL+11 , SEL+17, SEL+26
>> VALMBG	SIG+2, SIG+3, SIG+4, CV+2
VALMCNT	EN+2~, SETLINE+5, SETLINE+43, SIG+4
VALMHDR	HDR+14!
VALMHDR(1	HDR+14*
VALMHDR(2	HDR+14*
VALMHDR(3	HDR+14*
VALMHDR(4	HDR+14*
>> VALMSG	INIT+3, SEL+2, SEL+4, SEL+5, SEL+7*
WT	HDR+1~, HDR+6*, HDR+11
WTDT	HDR+1~, HDR+6*, HDR+11
X	HDR+1~, HDR+6, HDR+7, SETLINE+1~
X1	SETLINE+1~, SETLINE+21, SETLINE+22, SETLINE+25, SETLINE+26, SETLINE+28, SETLINE+29, SETLINE+30, SETLINE+31, SETLINE+32
XQORM	SEL+1~
>> XQORNOD(0	SEL+2
XX	SEL+1~, SEL+3*, SEL+4
Y	EN+2~, EN+8
Z	SETLINE+1~, SETLINE+20, SETLINE+22, SETLINE+24, SETLINE+25, SETLINE+26, SETLINE+29, SETLINE+30, SETLINE+31, SETLINE+34 , SETLINE+35, SETLINE+36, SETSORT+1~, SETSORT+20, SETSORT+21, SETSORT+22, SETSORT+33, SETSORT+57, SETSORT+58, SETSORT+60 , SETSORT+73*, SETSORT+75

Customize PDF page

Package: Outpatient Pharmacy