Routine: PSSSCHRP

Package	Total	Call Graph
VA Fileman	4	($$GET1,GETS)^DIQ ^DIR ^DIWP ^DIWW
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD

Package	Total	Caller Graph
Pharmacy Data Management	1	PSS SCHEDULE REPORT

Name	Comments	DBIA/ICR reference
EN	;Prompts for Administration File Schedule Report
END	;
FORMAT(PSSAFQC,PSSAFQQ)	;Format print arrays, breaking on the "-" character
MESS	;
START	;Print Administration Schedule File report
HD	;Report Header

Name	Field # of Occurrence
^%ZIS	EN+18
^%ZISC	END+7
^%ZTLOAD	EN+19
$$GET1^DIQ	START+56, START+82
GETS^DIQ	START+11
^DIR	EN+10, EN+11, EN+15, EN+16, EN+18, EN+19, END+3, HD+1
^DIWP	START+41, START+43, START+49, START+51
^DIWW	START+41, START+43, START+49, START+51

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This report displays entries from the ADMINISTRATION SCHEDULE (#51.1) File." Line Location: EN+1
Function Call: WRITE	Prompt: !,"It can be run for all Schedules, or only Schedules without a FREQUENCY" Line Location: EN+2
Function Call: WRITE	Prompt: !,"(IN MINUTES). Only schedules with a PSJ Package Prefix will be displayed, since" Line Location: EN+3
Function Call: WRITE	Prompt: !,"they are the only schedules the software will look at when deriving a FREQUENCY" Line Location: EN+4
Function Call: WRITE	Prompt: !,"(IN MINUTES) for the daily dosage checks. If a FREQUENCY (IN MINUTES) cannot",!,"be determined for an order, the daily dosage check cannot occur for that order." Line Location: EN+5
Function Call: WRITE	Prompt: ! Line Location: EN+10
Function Call: WRITE	Prompt: ! Line Location: EN+15
Function Call: WRITE	Prompt: ! Line Location: EN+17
Function Call: WRITE	Prompt: !!,"Report queued to print.",! Line Location: EN+19
Function Call: WRITE	Prompt: PSSAFROP,! Line Location: START+40
Function Call: WRITE	Prompt: PSSAFROP,! Line Location: START+42
Function Call: WRITE	Prompt: ! Line Location: START+44
Function Call: WRITE	Prompt: PSSAFROO,! Line Location: START+48
Function Call: WRITE	Prompt: PSSAFROO,! Line Location: START+50
Function Call: WRITE	Prompt: !!,"No schedules found without frequencies.",! Line Location: END+1
Function Call: WRITE	Prompt: !!,"End of Report.",! Line Location: END+2
Function Call: WRITE	Prompt: !!,"End of Report." Line Location: END+3
Function Call: WRITE	Prompt: ! Line Location: END+4
Function Call: WRITE	Prompt: @IOF Line Location: END+5
Function Call: WRITE	Prompt: @IOF Line Location: HD+2
Function Call: WRITE	Prompt: !,"ADMINISTRATION SCHEDULE FILE REPORT (All)" Line Location: HD+3
Function Call: WRITE	Prompt: !,"ADMINISTRATION SCHEDULE WITHOUT FREQUENCY REPORT" Line Location: HD+4
Function Call: WRITE	Prompt: ?$S(PSSALONG=80:68,1:120),"PAGE: "_PSSAFCT,!,PSSAFLIN,! Line Location: HD+5
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: MESS+1
Routine Call	DIR Line Location: EN+10 EN+11 EN+15 EN+16 EN+18 EN+19 END+3 HD+1
Routine Call	%ZIS Line Location: EN+18

FileNo	Call Tags
^PS(51.1 - [#51.1]	GET1^DIQ, GETS^DIQ
51.11	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.1 - [#51.1]	START+7, START+8, START+54, START+55, START+61
^UTILITY($J	START+41!, START+43!, START+49!, START+51!

Name	Line Occurrences
FORMAT	START+25, START+32, START+68, START+75
HD	START+6, START+16, START+24, START+28, START+31, START+35, START+36, START+44, START+53, START+59 , START+67, START+71, START+74, START+78, START+81, START+84, START+86
MESS	EN+10, EN+11, EN+15, EN+16, EN+18

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	EN+6~, EN+18!*, EN+19!
DIR	EN+6~, EN+7!, EN+10!, EN+11!, EN+13!, EN+15!, EN+16!, EN+18!, EN+19!, END+3! , HD+1!
DIR("?"	EN+8, EN+9, EN+14*
DIR("A"	EN+7, EN+10, EN+11, EN+13, EN+15, EN+16, EN+18, EN+19, END+3, HD+1
DIR("B"	EN+7, EN+13
DIR(0	EN+7, EN+10, EN+11, EN+13, EN+15, EN+16, EN+18, EN+19, END+3, HD+1
DIROUT	EN+6~
DIRUT	EN+6~
DIWF	START+41~, START+43~, START+49~, START+51~
DIWL	START+41~, START+43~, START+49~, START+51~
DIWR	START+41~, START+43~, START+49~, START+51~
DTOUT	EN+6~, EN+10, EN+15
DUOUT	EN+6~, EN+10, EN+15
IO	START+1
IO("Q"	EN+19
IOF	END+5, HD+2
IOP	EN+6~, EN+18!
IOSL	START+16, START+24, START+28, START+31, START+35, START+36, START+44, START+53, START+59, START+67 , START+71, START+74, START+78, START+81, START+84, START+86
IOST	START+4
POP	EN+6~, EN+18!
PSSAFAA	START+2~, START+18!, START+25!, START+32!, START+68!, START+75!, START+80!
PSSAFAA(	START+26, START+27, START+33, START+34, START+69, START+70, START+76, START+77, FORMAT+10, FORMAT+11 , FORMAT+12*
PSSAFAB	FORMAT+3~, FORMAT+4!
PSSAFAB(	FORMAT+5, FORMAT+6, FORMAT+9, FORMAT+10, FORMAT+11, FORMAT+12
PSSAFABC	START+3~, START+69, START+70, START+76, START+77
PSSAFAC	FORMAT+3~, FORMAT+4, FORMAT+5, FORMAT+6*, FORMAT+8
PSSAFAD	FORMAT+3~, FORMAT+5*, FORMAT+6
PSSAFAF	FORMAT+3~, FORMAT+7, FORMAT+10, FORMAT+11, FORMAT+12
PSSAFAL	START+2~, START+26, START+27, START+33, START+34, START+69, START+70, START+76, START+77
PSSAFAX	FORMAT+3~, FORMAT+8*, FORMAT+9, FORMAT+10, FORMAT+11, FORMAT+12
PSSAFAZ	FORMAT+3~, FORMAT+4, FORMAT+5, FORMAT+6*
PSSAFCT	START+2~, START+4, HD+1, HD+5
PSSAFDEV	START+2~, START+4*, END+2, END+3, END+4, HD+1
PSSAFLIN	START+2~, START+5!*, HD+5
PSSAFNOF	START+3~, START+4, START+14, END+1
PSSAFOUT	START+2~, START+4, START+7, START+8, START+16, START+18, START+24, START+26, START+28, START+31 , START+33, START+35, START+36, START+44, START+53, START+54, START+59, START+67, START+69, START+71 , START+74, START+76, START+78, START+79, START+81, START+84, START+86, END+1, END+3, HD+1
PSSAFQ	START+2~, START+7*, START+8
PSSAFQC	START+2~, START+9!, FORMAT~, FORMAT+5, FORMAT+6
PSSAFQEN	START+2~, START+8*, START+10, START+54, START+55, START+56, START+61, START+82
PSSAFQL	START+2~, START+3~, START+9!, START+20, START+22, START+29, START+63, FORMAT+5, FORMAT+6
PSSAFQQ	START+2~, START+9!, FORMAT~, FORMAT+11
PSSAFQS	START+2~, START+9!, START+17*, START+19, START+20, START+23, START+25, START+30, START+32
PSSAFRA	START+3~, START+9!, START+10*, START+11, START+12, START+13, START+15, START+17, START+38, START+46 , START+85
PSSAFRAA	START+3~, START+9!
PSSAFRAA(	START+12, START+13, START+15, START+17, START+38, START+46, START+85
PSSAFRFL	START+3~, START+26, START+27, START+33, START+34, START+54, START+58, START+59, START+60, START+66* , START+67, START+70, START+71, START+73, START+74, START+77, START+78, START+81
PSSAFROO	START+3~, START+9!, START+46*, START+48, START+49, START+50, START+51
PSSAFROP	START+3~, START+9!, START+38*, START+40, START+41, START+42, START+43
PSSAFRP	EN+6~, EN+12*, START+13, END+1, END+6!, HD+3, HD+4
PSSAFZZZ	START+3~, START+53, START+58, START+59, START+60, START+66, START+67, START+70, START+71, START+73* , START+74, START+77, START+78, START+81, START+83
PSSALONG	EN+6~, EN+17*, START+5, START+21, START+39, START+47, START+64, END+6!, HD+5
PSSTPE	START+2~, START+82!*, START+83
PSSWAS	START+2~, START+54*, START+55, START+56, START+61
PSSWASAD	START+2~, START+61*, START+62, START+63, START+66, START+68, START+73, START+75
PSSWASEN	START+2~, START+55*
PSSWASLL	START+2~, START+63*, START+65, START+72
PSSWASNM	START+2~, START+56*, START+58
PSSWASX	START+3~, START+9!, START+56*
X	EN+6~, START+41~, START+43~, START+49~, START+51~
Y	EN+6~, EN+7!, EN+10!, EN+11!, EN+12, EN+13!, EN+15!, EN+16!, EN+17, EN+18! , EN+19!, HD+1!
ZTDESC	EN+6~, EN+19*
>> ZTQUEUED	END+7
>> ZTREQ	END+7*
ZTRTN	EN+6~, EN+19*
ZTSAVE	EN+6~
ZTSAVE("PSSAFRP"	EN+19*
ZTSAVE("PSSALONG"	EN+19*
ZTSK	EN+6~

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSSCHRP

Information

Source Information

Call Graph

Call Graph Total: 7

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

Local Variables

Legend: