Prompt: !!,"This report gives you a printed copy of formulary drugs from your local file",!,"with synonyms marked as trade names. You"
Line Location: PSNFRMLY+2
Function Call: WRITE
Prompt: " will be asked if you want to include",!,"supply items. You are asked to type in a title for this report.",!,"You are then asked to print by Generic Name/Tradename or VA Class Code."
Line Location: PSNFRMLY+3
Function Call: WRITE
Prompt: !,"If you choose to print by VA Class Code, it"
Line Location: PSNFRMLY+4
Function Call: WRITE
Prompt: " will ask you to pick a range",!,"of VA Drug Class Codes."
Line Location: PSNFRMLY+5
Function Call: WRITE
Prompt: " Only active drugs will print. Drugs with",!,"a future inactive date will print as well."
Line Location: PSNFRMLY+6
Function Call: WRITE
Prompt: !,"You may queue the report to print, if you wish.",!!
Line Location: PSNFRMLY+7
Function Call: READ
Prompt: "Enter title for report: HOSPITAL// "
Formatting: !
Timeout: DTIME
Variable: PSNANS
Line Location: HEADER+0
Function Call: WRITE
Prompt: !,"Your answer must 30 characters or less.",!
Line Location: HEADER+2
Function Call: WRITE
Prompt: !,"You cannot delete. This is a free text field. Please enter the name that you",!,"want to print at the top of this report.",!
Line Location: HEADER+3
Function Call: WRITE
Prompt: !!,"Enter the name you want to print. This name will print at the top of this report",!,"along with the word ""FORMULARY""."
Line Location: HEADER+4
Function Call: WRITE
Prompt: !,PSNANS_" FORMULARY (BY VA CLASS)",!
Line Location: HEAD1+0
Function Call: WRITE
Prompt: !!,"You may print by DRUG GENERIC NAME/TRADENAME or VA CLASS CODE.",!,"Enter a <RET> or ""G"" to print by DRUG GENERIC NAME/TRADENAME or",!,"""C"" for VA CLASS CODE."
Line Location: ASKEM+0
Function Call: READ
Timeout: DTIME
Line Location: ASKEM+1
Function Call: WRITE
Prompt: !!,"Print by:"
Line Location: ASKEM+1
Function Call: WRITE
Prompt: !!,?5,"Enter a ""<RET>"" or ""Gg"" to print by local generic name/tradename.",!?5,"Enter a ""C"" to print by VA Drug Class Code",!?5,"You may enter an ""^"" to exit."