Routine: APSPLDEL

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIK ^DIR
IHS Changes To Pharmacy	1	DELETE^APSPDUED

Entry Points

Name	Comments	DBIA/ICR reference
END
EOJ	; Clean up variables
STUDY	; Deletes entries from APSP DUE STUDY file
PCV	; Deletes entries from APSP PRIMARY CARE VISIT file
DUE	; Deletes entries from APSP DUE REVIEW file
START	;
DEL	; Does actual lookup and deletion of entries
CRIT	; Deletes associated entries from APSP DUE CRITERIA File
DELX	; Exit point from DEL
PREPACK	; Deletes entries from APSP PREPACK LOG file
INTERV	; Deletes entries from APSP INTERVENTION file

Name	Line Occurrences (* Changed, ! Killed)
^APSPDUE(32.1 - [#9009032.1]	STUDY+2
^APSPDUE(32.2 - [#9009032.2]	CRIT+1

Name	Field # of Occurrence
>> APSP("LOG DEL	FLG" , START+2, EOJ+1!
>> APSPDUED("NAME"	STUDY+2*!
APSPLDEL	STUDY+2, PREPACK+2, DUE+2, INTERV+2, PCV+2*, EOJ+1!
APSPLDEL("CRIT"	CRIT+1*, CRIT+2!
APSPLDEL("DA"	STUDY+2, DEL+1!, DEL+4*, DEL+8, CRIT+1
APSPLDEL("DIC"	STUDY+2, PREPACK+2, DUE+2, INTERV+2, PCV+2*, DEL+8, DELX+1!
APSPLDEL("QFLG"	STUDY+1, STUDY+2, PREPACK+1, PREPACK+2, DUE+1, DUE+2, INTERV+1, INTERV+2, PCV+1, PCV+2 , DEL+3
DA	START+1!, DEL+2!, DEL+8, DEL+9!, DELX+1!, CRIT+1!, EOJ+2!
DIC	START+1!, STUDY+2, PREPACK+2, DUE+2, INTERV+2, PCV+2*, DEL+2!, DELX+1!, EOJ+2!
DIC("S"	PREPACK+2, DUE+2, INTERV+2, PCV+2
DIC(0	STUDY+2, PREPACK+2, DUE+2, INTERV+2, PCV+2*
DIE	START+1!
DIK	DEL+8, DEL+9!, CRIT+1!, EOJ+2!
DIR	DEL+6!, DELX+1!
DIR("A"	DEL+5*
DIR(0	DEL+5*
DIRUT	DEL+7, EOJ+1!
DR	START+1!, DEL+2!, EOJ+2!
DTOUT	EOJ+1!
DUOUT	EOJ+1!
X	DELX+1!, EOJ+1!
Y	DEL+3, DEL+4, DEL+5*, DEL+7, DELX+1!, EOJ+1!