Routine: PSADA

Information

PSADA ;BIR/LTL-Pharmacy Location Lookup Utility ;7/23/97

Source file <PSADA.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No Drug Accountability location has been created yet.",! Line Location: START+2
Function Call: WRITE	Prompt: !!,"An Inpatient Site has not been identified for AR/WS.",!,"AR/WS dispensing data may not be gathered.",! Line Location: SKIP+3
Function Call: WRITE	Prompt: "*" Line Location: SKIP+12
Function Call: WRITE	Prompt: !!,"No Drug Accountability location has been created for ",$P($G(^PS(59,+PSAOSIT,0)),U),".",! Line Location: OP+6
Function Call: WRITE	Prompt: !,"No site was selected.",! Line Location: QUIT+0
Function Call: WRITE	Prompt: !!,PSALOCN," for " Line Location: QUIT+1
Function Call: WRITE	Prompt: $P(^(0),U)_" (IP) " Line Location: QUIT+2
Function Call: WRITE	Prompt: $P(^(0),U)_" (OP)" Line Location: QUIT+3
Function Call: WRITE	Prompt: "...I'm not sure" Line Location: QUIT+4
Function Call: WRITE	Prompt: !,"No outpatient sites have been set up.",! Line Location: COP+0
Function Call: WRITE	Prompt: !!,"Because there is more than one Outpatient Site at this facility, I need you to " Line Location: COP+3