Routine: PSOPMPPF

Package	Total	Call Graph
VA Fileman	6	^%DT FILE^DICN ^DIE ^DIK $$GET1^DIQ ^DIR
Outpatient Pharmacy	1	^PSOLSET
Registration	1	FULL^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSO PMP SITE PREFERENCES PSOPMP0

Name	Comments	DBIA/ICR reference
SAVE(SITE,USER)	; - Saves preferences by Site and/or User
EN	; - Menu option entry point
STSGP	; - Group By Status
LOAD(SITE,USER)	; Loading Factory/Division/User preferences
SRTBY	; - Sort By
DISPLAY(SITE,USER)	; - Displays the current view
ORDCNT	; - Display Order Count
SET(ZNODE)	;
LST(PSOSITE,PSOUSER)	; - Listmanager entry point
EXIT	; Exit
GOTO(INPUT,HOME)	; - Directed up-arrow
SIGDP	; - Display SIG
EXPDC	; - Expiration/Discontinued Cutoff Date
END
CHANGED(SITE,USER,FIELD,VALUE)	; - Sets PSOCHNG so the list can be refreshed
ORDER	; - Sort Order
DELETE(SITE,USER)	; - Deletes user/division preferences

Name	Field # of Occurrence
^%DT	EXPDC+6, LOAD+18, SET+2
FILE^DICN	SAVE+8, SAVE+13
^DIE	SAVE+21, DELETE+9
^DIK	DELETE+6, DELETE+7
$$GET1^DIQ	LST+5, LST+11, DISPLAY+4, DISPLAY+6, DISPLAY+8
^DIR	LST+8, EXPDC+5, SRTBY+3, ORDER+3, SIGDP+3, STSGP+3, ORDCNT+3, EXIT+5
^PSOLSET	EN+2
FULL^VALM1	LST+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"Pharmacy Division Must be Selected!",! Line Location: EN+2
Function Call: WRITE	Prompt: ! Line Location: LST+2
Function Call: WRITE	Prompt: ! Line Location: LST+10
Function Call: WRITE	Prompt: !,"Division: ",$$GET1^DIQ(59,PSOSITE,.01),! Line Location: LST+11
Function Call: WRITE	Prompt: " DAYS" Line Location: EXPDC+6
Function Call: WRITE	Prompt: ! Line Location: EXIT+4
Function Call: WRITE	Prompt: !?5,X,!?5,LN Line Location: DISPLAY+9
Function Call: WRITE	Prompt: !?5,"EXP/CANCEL CUTOFF : ",$P(Z,"^",2)," DAYS" Line Location: DISPLAY+10
Function Call: WRITE	Prompt: !?5,"SORT BY : " Line Location: DISPLAY+11
Function Call: WRITE	Prompt: $S(X="RX":"Rx#",X="DR":"DRUG NAME",X="ID":"ISSUE DATE",X="LF":"LAST FILL DATE",1:"??") Line Location: DISPLAY+12
Function Call: WRITE	Prompt: !?5,"SORT ORDER : ",$S($P(Z,"^",4)="A":"ASCENDING",1:"DESCENDING") Line Location: DISPLAY+13
Function Call: WRITE	Prompt: !?5,"DISPLAY SIG : ",$S($P(Z,"^",5):"ON",1:"OFF") Line Location: DISPLAY+14
Function Call: WRITE	Prompt: !?5,"GROUP BY STATUS : ",$S($P(Z,"^",6):"ON",1:"OFF") Line Location: DISPLAY+15
Function Call: WRITE	Prompt: !?5,"DISPLAY ORDER COUNT: ",$S($P(Z,"^",7):"ON",1:"OFF") Line Location: DISPLAY+16
Function Call: WRITE	Prompt: ! Line Location: DISPLAY+17
Function Call: WRITE	Prompt: " ??",$C(7) Line Location: GOTO+14
Function Call: WRITE	Prompt: !!,"Saving..." Line Location: SAVE+3
Function Call: WRITE	Prompt: "OK!" Line Location: SAVE+21
Function Call: WRITE	Prompt: !!,"Deleting..." Line Location: DELETE+3
Function Call: WRITE	Prompt: "OK!" Line Location: DELETE+6
Function Call: WRITE	Prompt: "OK!" Line Location: DELETE+7
Function Call: WRITE	Prompt: "OK!" Line Location: DELETE+9
Routine Call	DIE Line Location: SAVE+21 DELETE+9
Routine Call	DIR Line Location: LST+8 EXPDC+5 SRTBY+3 ORDER+3 SIGDP+3 STSGP+3 ORDCNT+3 EXIT+5

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^PS(52.85 - [#52.85]	Classic Fileman Calls, GET1^DIQ
^PS(59 - [#59]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.85 - [#52.85]	LST+5, DISPLAY+3, DISPLAY+4, DISPLAY+6, LOAD+37, LOAD+40, CHANGED+5, CHANGED+6, SAVE+5, SAVE+10 , DELETE+7

Name	Line Occurrences
$$GOTO	EXPDC+5, SRTBY+3, ORDER+3, SIGDP+3, STSGP+3, ORDCNT+3
@(	EXPDC+5, SRTBY+3, ORDER+3, SIGDP+3, STSGP+3, ORDCNT+3
CHANGED	EXPDC+7, SRTBY+4, ORDER+4, SIGDP+4, STSGP+4, ORDCNT+4
DELETE	LST+9
DISPLAY	LST+6
END	EN+7
LOAD	EN+4, LST+9
LST	EN+4
SAVE	EN+5, EXIT+6
SET	LOAD+37, LOAD+40

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SAVE+6~, SAVE+11~
DA	SAVE+1~, SAVE+6~, SAVE+11~, SAVE+18, SAVE+19, DELETE+1~, DELETE+6, DELETE+7, DELETE+9*
DA(1	SAVE+12, SAVE+19, DELETE+6*
DD	SAVE+6~, SAVE+8!, SAVE+11~, SAVE+13!
DIC	SAVE+6~, SAVE+7, SAVE+11~, SAVE+12
DIC(0	SAVE+7, SAVE+12
DIE	SAVE+1~, SAVE+18, SAVE+19, DELETE+1~, DELETE+9*
DIK	DELETE+1~, DELETE+6, DELETE+7
DINUM	SAVE+6~, SAVE+7, SAVE+11~, SAVE+12
DIR	EN+1~, LST+1~, EXPDC+1!, SRTBY+1!, ORDER+1!, SIGDP+1!, STSGP+1!, ORDCNT+1!
DIR("?"	EXPDC+3, EXPDC+4
DIR("A"	LST+7, EXPDC+2, SRTBY+3, ORDER+3, SIGDP+3, STSGP+3, ORDCNT+3, EXIT+4
DIR("B"	LST+8, EXPDC+2, SRTBY+2, ORDER+2, SIGDP+2, STSGP+2, ORDCNT+2, EXIT+4
DIR(0	LST+8, EXPDC+2, SRTBY+2, ORDER+2, SIGDP+2, STSGP+2, ORDCNT+2, EXIT+4
DIROUT	EN+1~, LST+1~, LST+8, EXPDC+1!, EXPDC+5, SRTBY+1!, SRTBY+3, ORDER+1!, ORDER+3, SIGDP+1! , SIGDP+3, STSGP+1!, STSGP+3, ORDCNT+1!, ORDCNT+3, EXIT+5
DIRUT	EN+1~, LST+1~, LST+8, EXPDC+1!, EXPDC+5, SRTBY+1!, SRTBY+3, ORDER+1!, ORDER+3, SIGDP+1! , SIGDP+3, STSGP+1!, STSGP+3, ORDCNT+1!, ORDCNT+3, EXIT+5
DLAYGO	SAVE+6~, SAVE+11~
DO	SAVE+6~, SAVE+8!, SAVE+11~, SAVE+13!
DR	SAVE+1~, SAVE+6~, SAVE+11~, SAVE+15, SAVE+16, DELETE+1~, DELETE+8*
FIELD	CHANGED~, CHANGED+8, CHANGED+9, CHANGED+10, CHANGED+11, CHANGED+12, CHANGED+13
FLD	DELETE+1~, DELETE+8*
FLG	DISPLAY+1~, DISPLAY+2, DISPLAY+4, DISPLAY+8
GOTO	GOTO+1~, GOTO+12, GOTO+13, GOTO+14, GOTO+16
GRPNAM	LOAD+15~
HOME	GOTO~, GOTO+12, GOTO+14
INPUT	GOTO~, GOTO+2, GOTO+4
LN	DISPLAY+1~, DISPLAY+9*
ORDGRP	LOAD+15~
PSOCHNG	EN+1~, EN+5, LST+2, EXIT+3, CHANGED+1, CHANGED+8, CHANGED+9, CHANGED+10, CHANGED+11, CHANGED+12 , CHANGED+13*
PSOEXDCE	EXPDC+2, EXPDC+6, EXPDC+7, LOAD+13!, LOAD+18, SET+2*, SAVE+15
PSOEXPDC	EXPDC+6, LOAD+13!, LOAD+18, SET+2*
>> PSOPAR	EN+2
PSOQUIT	EN+1~, EN+5, LST+2, LST+8, LST+12, GOTO+2*
>> PSORDCNT	ORDCNT+2, ORDCNT+4, LOAD+19, SET+7*, SAVE+16
PSORDER	ORDER+2, ORDER+4, LOAD+13!, LOAD+19, SET+4*, SAVE+15
PSORDSEQ	LOAD+13!
PSORDSEQ("N"	LOAD+34*
PSORDSEQ("P"	LOAD+33*
PSORDSEQ("R"	LOAD+32*
PSORDSEQ("T"	LOAD+31*
PSOSIGDP	SIGDP+2, SIGDP+4, LOAD+13!, LOAD+19, SET+5*, SAVE+16
PSOSITE	EN+2, EN+4, EN+5, LST~, LST+5, LST+6, LST+9, LST+11, EXPDC+7, SRTBY+4 , ORDER+4, SIGDP+4, STSGP+4, ORDCNT+4, EXIT+6
PSOSRTBY	SRTBY+2, SRTBY+4, LOAD+13!, LOAD+19, SET+3*, SAVE+15
PSOSTSEQ	LOAD+13!
PSOSTSEQ("A"	LOAD+21*
PSOSTSEQ("DC"	LOAD+24*
PSOSTSEQ("DE"	LOAD+26*
PSOSTSEQ("DP"	LOAD+25*
PSOSTSEQ("E"	LOAD+23*
PSOSTSEQ("H"	LOAD+27*
PSOSTSEQ("N"	LOAD+29*
PSOSTSEQ("PH"	LOAD+28*
PSOSTSEQ("S"	LOAD+22*
PSOSTSGP	STSGP+2, STSGP+4, LOAD+13!, LOAD+19, SET+6*, SAVE+16
PSOUSER	LST~, LST+2*, LST+5, LST+6, LST+9, EXPDC+7, SRTBY+4, ORDER+4, SIGDP+4, STSGP+4 , ORDCNT+4, EXIT+3, EXIT+6
SAVEX	EXPDC+1!
SITE	DISPLAY~, DISPLAY+3, DISPLAY+4, DISPLAY+6, DISPLAY+8, LOAD~, LOAD+37, LOAD+40, CHANGED~, CHANGED+5 , CHANGED+6, SAVE~, SAVE+5, SAVE+7, SAVE+10, SAVE+12, SAVE+18, SAVE+19, DELETE~, DELETE+5 , DELETE+6, DELETE+7, DELETE+9
STS	LOAD+15~
STSGRP	LOAD+15~
TAG	GOTO+1~, GOTO+13*
TAG(	GOTO+13
TAG("DISPLAY	ORDER COUNT" , GOTO+10, SIG" , GOTO+8
TAG("EXP/CANC	EL CUTOFF" , GOTO+5*
TAG("GROUP BY	STATUS" , GOTO+9*
TAG("SORT BY"	, GOTO+6*
TAG("SORT ORD	ER" , GOTO+7*
TMP	LOAD+15~
TRGT	GOTO+1~, GOTO+4*, GOTO+13
USER	DISPLAY~, DISPLAY+3, DISPLAY+4, LOAD~, LOAD+37, CHANGED~, CHANGED+5, CHANGED+6, SAVE~, SAVE+10 , SAVE+12, SAVE+18, SAVE+19, DELETE~, DELETE+6
>> VALMBCK	EXIT+8*
VALUE	CHANGED~, CHANGED+8, CHANGED+9, CHANGED+10, CHANGED+11, CHANGED+12, CHANGED+13
X	EXPDC+5, EXPDC+6, SRTBY+3, ORDER+3, SIGDP+3, SIGDP+4, STSGP+3, STSGP+4, ORDCNT+3, ORDCNT+4 , DISPLAY+1~, DISPLAY+2, DISPLAY+4, DISPLAY+6, DISPLAY+8, DISPLAY+9, DISPLAY+11, DISPLAY+12, LOAD+15~, LOAD+18* , SET+1~, SET+2, SET+3, SET+4, SET+5, SET+6, SET+7, SAVE+6~, SAVE+7, SAVE+11~ , SAVE+12
Y	LST+9, EXPDC+6, SRTBY+4, ORDER+4, SIGDP+4, STSGP+4, ORDCNT+4*, EXIT+5, LOAD+15~, LOAD+18 , SET+1~, SET+2
Z	DISPLAY+1~, DISPLAY+2, DISPLAY+4, DISPLAY+6, DISPLAY+7, DISPLAY+10, DISPLAY+11, DISPLAY+13, DISPLAY+14, DISPLAY+15 , DISPLAY+16, LOAD+15~, CHANGED+4, CHANGED+5, CHANGED+6, CHANGED+8, CHANGED+9, CHANGED+10, CHANGED+11, CHANGED+12 , CHANGED+13
ZNODE	SET~, SET+2, SET+3, SET+4, SET+5, SET+6, SET+7

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOPMPPF

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: