Routine: PSSCOMMN

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$DT^XLFDT
VA Fileman	2	^%DT ^DIR

Package	Total	Caller Graph
Pharmacy Data Management	1	PSS COMMON DOSAGES

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
END	;
ENDX	;
QUEUE	;
START	;
COMMH	;

External References

Name	Field # of Occurrence
^%DT	EN+4
^%ZIS	QUEUE+1
^%ZISC	ENDX+2
^%ZTLOAD	QUEUE+3
^DIR	EN+3, EN+8
$$DT^XLFDT	START+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This report displays common dosages of Dispense Drugs for Unit Dose orders",!,"based on the time frame entered. Unit Dose orders without a Dosage Ordered",!,"are not included on this report." Line Location: EN+1
Function Call: WRITE	Prompt: !,"If there are multiple Dispense Drugs associated with an order, only the first",!,"Dispense Drug of the order will print with the Dosage Ordered.",! Line Location: EN+2
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: EN+3
Function Call: WRITE	Prompt: ! Line Location: EN+4
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: EN+4
Function Call: WRITE	Prompt: ! Line Location: EN+6
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: EN+8
Function Call: WRITE	Prompt: !!,"Because of the length of this report, and the time needed to gather the",!,"information, this report must be queued to a printer.",! Line Location: EN+10
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: QUEUE+1
Function Call: WRITE	Prompt: !!,"This report must be queued to a printer.",! Line Location: QUEUE+2
Function Call: WRITE	Prompt: !!,"Report queued to print.",! Line Location: QUEUE+3
Function Call: WRITE	Prompt: !,PSSDNM Line Location: START+27
Function Call: WRITE	Prompt: ?43,PSSDOSEG,?65,^TMP("PSSDOS",$J,PSSDNM,PSSDOSEG) Line Location: START+28
Function Call: WRITE	Prompt: !!,"NO DATA TO PRINT",!! Line Location: START+30
Function Call: WRITE	Prompt: @IOF Line Location: END+1
Function Call: WRITE	Prompt: @IOF Line Location: COMMH+1
Function Call: WRITE	Prompt: !?3,"COMMON DOSAGES REPORT STARTING FROM "_$G(PSSPRINT)_$S($G(PSSCT)=1:"",1:" (cont.)"),?67,"PAGE: "_$G(PSSCT) Line Location: COMMH+1
Function Call: WRITE	Prompt: !!,"DRUG",?43,"DOSAGE",?62,"FREQUENCY",!,PSSLINE,! Line Location: COMMH+2
Routine Call	DIR Line Location: EN+3 EN+8
Routine Call	%ZIS Line Location: QUEUE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	START+11
^DGPM("ATT1"	START+10
^PS(55 - [#55]	START+14, START+15, START+16, START+17
^PSDRUG - [#50]	START+17, START+18
^TMP("PSSDOS"	START+4!, START+19, START+20, START+22, START+23, START+28, ENDX+1!
^TMP("PSSPAT"	START+4!, START+12, START+13*, ENDX+1!

Label References

Name	Line Occurrences
COMMH	START+7, START+25
END	START+8
ENDX	EN+3, EN+4, EN+8, QUEUE+1, QUEUE+3
QUEUE	QUEUE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	EN+4!*
%DT("A"	EN+4*
%DT(0	EN+4*
%ZIS	QUEUE+1!*, ENDX+2!
DIR	EN+3!, EN+6!, EN+8!
DIR("?"	EN+7*
DIR("A"	EN+3, EN+6
DIR("B"	EN+8*
DIR(0	EN+3, EN+6
>> DIRUT	EN+8
DT	EN+4, START+2*, START+10
>> DTOUT	EN+4
IO	START+1
IO("Q"	QUEUE+2
IOF	END+1, COMMH+1
IOP	QUEUE+1!
IOSL	START+25
POP	QUEUE+1!
PSSBEG	EN+5*, START+6, START+8, START+9, ENDX+1!
>> PSSCT	START+3, COMMH+1
PSSD	START+4!, START+9*, START+10, START+14, ENDX+1!
PSSDCT	START+4!, START+22, START+27, START+28, START+29, ENDX+1!
PSSDIEN	START+4!, START+17*, START+18, ENDX+1!
PSSDNAME	START+4!, START+18*, START+19, START+20, ENDX+1!
PSSDNM	START+4!, START+22*, START+23, START+27, START+28, ENDX+1!
PSSDO	START+4!, START+15*, START+19, START+20, ENDX+1!
PSSDOSEG	START+4!, START+22*, START+23, START+28, ENDX+1!
PSSDV	START+3*, START+4!, ENDX+1!
PSSIEN	START+4!, START+10*, START+11, ENDX+1!
PSSLINE	START+4!, START+5*, ENDX+1!, COMMH+2
PSSMIN	EN+9*, START+23, ENDX+1!
PSSONE	START+4!, START+16*, START+17, ENDX+1!
PSSOR	START+4!, START+14*, ENDX+1!
PSSORDA	START+4!, START+14*, START+15, START+16, START+17, ENDX+1!
>> PSSOUT	START+3*
PSSP	START+4!, START+10*, ENDX+1!
PSSPAT	START+4!, START+11*, START+12, START+13, START+14, START+15, START+16, START+17, ENDX+1!
PSSPFLAG	START+4!, START+21, START+26, START+30, ENDX+1!
PSSPRINT	START+4!, START+6*, ENDX+1!, COMMH+1
PSSXXX	START+4!, START+24, START+25, START+27, ENDX+1!
>> Y	EN+3, EN+4, EN+5, EN+8, EN+9
>> ZTDESC	QUEUE+3*
>> ZTQUEUED	ENDX+2
>> ZTREQ	ENDX+2*
>> ZTRTN	QUEUE+3*
>> ZTSAVE("PSSBEG"	QUEUE+3*
>> ZTSAVE("PSSMIN"	QUEUE+3*

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSCOMMN

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: