Routine: PSODP

Package	Total	Call Graph
VA Fileman	3	YN^DICN EN1^DIP ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOD DUE SORT AND PRINT

Entry Points

External References

Name	Field # of Occurrence
YN^DICN	PSOSUMM+1, PSONLY+1
EN1^DIP	DIP+7
^DIR	SUMMHD

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Do you want a Report Summary" Line Location: PSOSUMM+0
Function Call: WRITE	Prompt: !,"Do you want a SUMMARY only" Line Location: PSONLY+0
Function Call: WRITE	Prompt: !!!,"Following is a Summary of the DUE Questionnaires and the",!,"corresponding Answers found in your report." Line Location: SUMM+4
Function Call: WRITE	Prompt: !,"This Summary contains a cumulative total of the YES/NO/UNKNOWN type answers.",!! Line Location: SUMM+5
Function Call: WRITE	Prompt: !,%," ANSWER SHEET"_$S(%>1:"S",1:"")_" HAD A MISSING QUESTIONNAIRE FIELD!" Line Location: SUMM+6
Function Call: WRITE	Prompt: !!!,"TOTAL ANSWER SHEETS FOUND: ",PSOATOT Line Location: SUMM+7
Function Call: WRITE	Prompt: !,"TOTAL QUESTIONNAIRES FOUND: ",PSOQATOT Line Location: SUMM+8
Function Call: WRITE	Prompt: !?(2-($L(PSOQ)\2)),PSOQ Line Location: SUMMOUT+0
Function Call: WRITE	Prompt: ?(16-($L(%)\2)),% Line Location: SUMMOUT+1
Function Call: WRITE	Prompt: ?(25-($L(%)\2)),% Line Location: SUMMOUT+2
Function Call: WRITE	Prompt: ?(38-($L(%)\2)),% Line Location: SUMMOUT+3
Function Call: WRITE	Prompt: ?(56-($L(%)\2)),% Line Location: SUMMOUT+4
Function Call: WRITE	Prompt: !! Line Location: SUMMHD+0
Function Call: WRITE	Prompt: @IOF Line Location: SUMMHD+1
Function Call: WRITE	Prompt: !!?(40-($L(PSOQAM)\2)),PSOQAM Line Location: SUMMHD+3
Function Call: WRITE	Prompt: !!,"Number of Answer Sheets: ",^TMP("PSOD",$J,PSOQA) Line Location: SUMMHD+4
Function Call: WRITE	Prompt: !!,"QUEST #",?15,"YES",?25,"NO",?35,"UNKNOWN",?50,"NOT ANSWERED" Line Location: SUMMHD+5
Function Call: WRITE	Prompt: !,PSOQL Line Location: SUMMHD+6
Function Call: WRITE	Prompt: !?5,"A Summary will be printed at the end of this report detailing the" Line Location: QUES+0
Function Call: WRITE	Prompt: !?5,"number of times a question was answered YES, NO, UNKNOWN, or NOT ANSWERED." Line Location: QUES+1
Function Call: WRITE	Prompt: !?5,"Answer 'YES' if you want to see the Summary ONLY." Line Location: QUES2+0
Function Call: WRITE	Prompt: !?5,"Answer 'YES' if you want to print this Summary." Line Location: QUES1+0
Routine Call	DIR Line Location: SUMMHD

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.073 - [#50.073]	ACCUM+4, SUMMHD+2
^PS(50.0731 - [#50.0731]	ACCUM+2, ACCUM+5, ACCUM+6, COUNT
^PS(50.0732 - [#50.0732]	ACCUM+6
^TMP("PSOD"	EXIT+3!, ACCUM+3, COUNT+2, SUMM+3, SUMM+6, SUMM+10, SUMMOUT+1, SUMMOUT+2, SUMMOUT+3, SUMMOUT+4 , SUMMHD+4, SUMMHD+7

Name	Line Occurrences
COUNT	ACCUM+6
DIP	PSOSUMM+5
EXIT	PSOSUMM+3, PSONLY+3
PSONLY	PSONLY+2
PSOSUMM	PSOSUMM+2
QUES	PSOSUMM+2, PSONLY+2
QUES1	PSOSUMM+2
QUES2	PSONLY+2
SUMMHD	SUMM+10
SUMMOUT	SUMM+10

Name	Field # of Occurrence
^(	ACCUM+3, ACCUM+6, COUNT+2, SUMM+3
^("NO"	SUMMOUT+2
^("NULL"	SUMMOUT+4
^("UNKNOWN"	SUMMOUT+3
^("YES"	SUMMOUT+1
^(0	ACCUM+6, SUMM+6
^(1	COUNT

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PSOSUMM+1, PSOSUMM+2, PSOSUMM+3, PSOSUMM+4, PSONLY+1, PSONLY+2, PSONLY+3, PSONLY+4, EXIT!, SUMM+6* , SUMMOUT+1, SUMMOUT+2, SUMMOUT+3, SUMMOUT+4
>> BY	DIP+6*
D0	EXIT!, ACCUM+2, ACCUM+5, ACCUM+6, COUNT
DCOPIES	DIP!, EXIT!
DHD	DIP+2*, EXIT!
DHIT	DIP!, DIP+4, DIP+5, EXIT!
DIC	DIP+2*, EXIT!
DIOBEG	DIP!, DIP+5*, EXIT!
DIOEND	DIP!, DIP+3, DIP+5, EXIT!
>> DIR(0	SUMMHD*
DIS	DIP!, EXIT!
FLDS	DIP+6*, EXIT!
FR	DIP!, EXIT!
IOF	SUMM+1, SUMM+11, SUMMHD+1
IOM	SUMM+2
IOST	SUMM+11, SUMMHD
L	DIP+6*, EXIT!
PG	DIP!, EXIT!
PSCNT	DIP+1*, EXIT+2!
PSOA	EXIT!, SUMM+3*
PSOATOT	EXIT!, SUMM+2, SUMM+3, SUMM+7
PSODA	EXIT+1!, COUNT, COUNT+1, COUNT+2
PSODN	EXIT+1!, ACCUM+6*, COUNT
PSODQA	EXIT+1!, ACCUM+2*, ACCUM+3, ACCUM+4, COUNT+2
PSONLY	PSOSUMM+5, PSONLY+4, DIP+6, EXIT+1!
PSOQ	EXIT+1!, SUMM+10*, SUMMOUT, SUMMOUT+1, SUMMOUT+2, SUMMOUT+3, SUMMOUT+4
PSOQA	EXIT+1!, SUMM+10*, SUMMOUT+1, SUMMOUT+2, SUMMOUT+3, SUMMOUT+4, SUMMHD+2, SUMMHD+4, SUMMHD+7
PSOQAM	EXIT+1!, SUMMHD+2*, SUMMHD+3
PSOQATOT	EXIT+1!, SUMM+2, SUMM+3, SUMM+6*, SUMM+8
PSOQL	DIP!, EXIT+1!, SUMM+2*, SUMMHD+6
PSOQM	EXIT+1!, ACCUM+6*, COUNT+2
PSOQN	EXIT+2!, ACCUM+6*
PSOSUMM	PSOSUMM+4*, PSOSUMM+5, DIP+5, EXIT+2!
PSPOP	EXIT+2!, SUMM+9, SUMM+10, SUMMHD
TO	DIP!
>> X	SUMMHD

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSODP

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
COUNT
SUMMOUT
PSOSUMM
DIP
QUES
SUMMHD
SUMM	;Enter here from ^DIP to print Summary
EXIT
QUES2
QUES1
PSONLY
ACCUM	;Enter here from DHIT="D ACCUM^PSODP"