Routine: PSAFIX

Information

PSAFIX ;BHM/DB - FIX INACTIVE DRUGS IN 58.8;10/3/97

Source file <PSAFIX.m>

Package	Total	Call Graph
VA Fileman	1	NOW^%DTC

Name	Field # of Occurrence
NOW^%DTC	PSAFIX+2

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: PSAFIX+2
Function Call: WRITE	Prompt: !!,"Correcting erroneous Drug entries in file 58.8.",! Line Location: PSAFIX+3
Function Call: WRITE	Prompt: !!,"Patch PSA33 has finished, and corrected ",$G(PSACNT)," bad entries.",! Line Location: DONE+0

Name	Line Occurrences (* Changed, ! Killed)
^PSD(58.8 - [#58.8]	BGN+1, DRUG, DRUG+1*