Routine: PSOATRP

Package	Total	Call Graph
VA Fileman	3	DD^%DT NOW^%DTC ^DIR
Outpatient Pharmacy	1	SEL^PSOREJU1

Package

Total

Call Graph

DD^%DT NOW^%DTC ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	4	PSO INTERNET REFILL REPORT PSOATRD PSOATRPP PSOATRR

Package

Total

Caller Graph

Name	Field # of Occurrence
DD^%DT	PSOATRP+12, PSOATRP+16
NOW^%DTC	PSOATRP+4
^DIR	PSOATRP+10, PSOATRP+14, PSOATRP+19, PSOATRP+24, SKIPC+3
SEL^PSOREJU1	PSOATRP+6

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PSOATRP+10
Function Call: WRITE	Prompt: ! Line Location: PSOATRP+14
Function Call: WRITE	Prompt: ! Line Location: PSOATRP+18
Function Call: WRITE	Prompt: ! Line Location: PSOATRP+23
Function Call: WRITE	Prompt: ! Line Location: SKIPC+2
Function Call: WRITE	Prompt: ! Line Location: SKIPC+4
Function Call: WRITE	Prompt: !!,"Nothing queued to print.",! Line Location: MESS+0
Routine Call	DIR Line Location: PSOATRP+10 PSOATRP+14 PSOATRP+19 PSOATRP+24 SKIPC+3

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PSOATRP+4
^PS(59 - [#59]	PSOATRP+7, PSOATRP+8

Name	Line Occurrences
@(	SEL
MESS	PSOATRP+6, PSOATRP+11, PSOATRP+15, PSOATRP+20, PSOATRP+25, SKIPC+3
SEL	SKIPC+1

Name	Field # of Occurrence
^("I"	PSOATRP+8

Name	Field # of Occurrence
>> %	PSOATRP+4
DIR	PSOATRP+10!, PSOATRP+14!, PSOATRP+18!, PSOATRP+19!, PSOATRP+23!, PSOATRP+24!, SKIPC+2!, SKIPC+3!
DIR("?"	PSOATRP+10, PSOATRP+14, PSOATRP+19, PSOATRP+24
DIR("A"	PSOATRP+10, PSOATRP+14, PSOATRP+19, PSOATRP+24, SKIPC+2*
DIR("B"	PSOATRP+18, PSOATRP+23, SKIPC+3*
DIR(0	PSOATRP+10, PSOATRP+14, PSOATRP+18, PSOATRP+23, SKIPC+3*
DIRUT	SKIPC+3, END!
DT	PSOATRP+8
DTOUT	PSOATRP+11, PSOATRP+15, PSOATRP+20, PSOATRP+25, END!
DUOUT	PSOATRP+11, PSOATRP+15, PSOATRP+20, PSOATRP+25, END!
DV	DIV~, DIV+2
PSODIV	PSOATRP+3~, PSOATRP+6, PSOATRP+7, END!, DIV+1
PSODIV(	PSOATRP+8*, DIV+2
PSODS	PSOATRP+3~, PSOATRP+26*, SKIPC+1, END!
PSOED	PSOATRP+3~, PSOATRP+16*, END!
PSOEDX	PSOATRP+3~, PSOATRP+16*, END!
PSOREP	PSOATRP+3~, PSOATRP+21*, SEL, END!
PSORMZ	PSOATRP+3~, PSOATRP+4, SKIPC+4
PSORST	PSOATRP+3~, END!
PSOSD	PSOATRP+3~, PSOATRP+12*, END!
PSOSDX	PSOATRP+3~, PSOATRP+12*, END!
PSOSITE	PSOATRP+3~, PSOATRP+7*, PSOATRP+8, END!
RDATE	PSOATRP+3~, PSOATRP+4*
RX	DIV~
X	PSOATRP+3~, END!
Y	PSOATRP+3~, PSOATRP+4*, PSOATRP+11, PSOATRP+12, PSOATRP+15, PSOATRP+16, PSOATRP+21, PSOATRP+26, SKIPC+3, SKIPC+4 , END!

Information

Name	Comments	DBIA/ICR reference
MESS
SKIPC	;
SEL
END
DIV(RX,DV)	; Check if the Division for the Prescription/Fill was selected by the user