Routine: PSNMCLS

Information

PSNMCLS ;BIR/WRT-Print report of drugs manually classed (excluding supply items) SORT BY LOCAL GENERIC NAME ;01/12/98 5:18 PM

Source file <PSNMCLS.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This report will give you an alphabetic listing, by local generic name, of the",!,"drugs from your local drug file which are ""active"" and have been assigned a",! Line Location: PSNMCLS+2
Function Call: WRITE	Prompt: "manual VA Drug Classification through the option ""Allow Unmatched Drugs To Be",!,"Classed"". This report will exclude your supply items that have been assigned",!,"an ""XA"" class." Line Location: PSNMCLS+3
Function Call: WRITE	Prompt: !,"You may queue the report to print, if you wish.",! Line Location: PSNMCLS+4
Function Call: WRITE	Prompt: @IOF Line Location: DONE+1
Function Call: WRITE	Prompt: @IOF Line Location: TITLE+0
Function Call: WRITE	Prompt: !,?23,"MANUALLY CLASSED DRUGS REPORT",! Line Location: TITLE+1
Function Call: WRITE	Prompt: !,"Date printed: ",Y,?55,"Page: ",PSNPGCT,! Line Location: TITLE+2
Function Call: WRITE	Prompt: !,"NUMBER",?10,"LOCAL DRUG GENERIC NAME",?63,"VA DRUG CLASS",! Line Location: TITLE+3
Function Call: WRITE	Prompt: "-" Line Location: TITLE+4
Function Call: WRITE	Prompt: !!,PSNB,?10,$P(^PSDRUG(PSNB,0),"^",1),?63,$P(^PS(50.605,$P(^PSDRUG(PSNB,"ND"),"^",6),0),"^",1) Line Location: REPRT+0