Routine: PSOCOSTP

Information

PSOCOSTP ;BHAM-ISC/SAB - Purges data from drug cost file (#50.9) ; 05/12/94 8:20

Source file <PSOCOSTP.m>

Package	Total	Call Graph
VA Fileman	4	(,DD)^%DT WAIT^DICD ^DIK ^DIR
Kernel	1	^%ZTLOAD

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSO PURGE DRUG COST

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),"There is NO cost Data to be Purged !",! Line Location: PSOCOSTP+2
Function Call: WRITE	Prompt: ! Line Location: BEG+0
Function Call: WRITE	Prompt: ! Line Location: END+1
Function Call: WRITE	Prompt: ! Line Location: END+3
Routine Call	DIR Line Location: END+1 END+3

Name	Line Occurrences (* Changed, ! Killed)
^PSCST - [#50.9]	EN
^PSCST(0	PSOCOSTP+2, ST
^PSOCST("B"	PSOCOSTP+2!