Routine: SCCVCST2

Information

SCCVCST2 ; ALB/TMP - SCHED VSTS RE-CONVERSION - DELETE ENCOUNTER; 25-NOV-97

Source file <SCCVCST2.m>

Package	Total	Call Graph
VA Fileman	2	^DIE ^DIK
Scheduling	1	$$SDVIEN^SCCVU

Package	Total	Caller Graph
Scheduling	1	SCCVEAP3

Name	Comments	DBIA/ICR reference
DELPTR(DFN,SDT,SDDA,SDORG,SDOE)	; -- delete pointers to encounters in scheduling files ; DFN == patient ien ; SDT == encounter date/time ; SDDA == extended reference from encounter 9th piece ; SDORG == flag for origin of encounter ; SDOE == encounter ien
COQ
CHLD(SDOEP)	;Delete child encounters ; SDOEP := Parent encounter ien
SET(SDOE,SDOE0,SDT,DFN,SDCL,SDORG,SDDA,SDCNV)	;Set Variables
DELE(SDOE)	;Delete Encounter on re-convert ; Input -- SDOE Outpatient Encounter file IEN
DELEQ
OE(SDOE)	;Delete Outpatient Encounter ; SDOE := Encounter ien ;
CO(SDOE)	;Delete Classification - NOT NEEDED - no data existed for the ; periods allowed to be converted ; SDOE := Encounter ien ;
DEL(SDOE,SDFL)	;Delete Classification - NOT NEEDED - no data existed for the ; periods allowed to be converted ; SDOE := Encounter ien ; SDFL := Internal file # of entry to delete ;

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DELPTR+8, DELPTR+17
^SCE - [#409.68]	SET+2, SET+3, CO+6
^SCE("APAR"	CHLD+5
^SDD(	DEL+8
^SDD(409.42 - [#409.42]	CO+7
^SDV - [#409.5]	DELPTR+14

Name	Field # of Occurrence
DA	DELE+3~, DELPTR+7~, DELPTR+9, DELPTR+15, DELPTR+18, OE+3~, OE+4, DEL+6~, DEL+8*, CO+5~
DA(1	DELPTR+9, DELPTR+15, DELPTR+18*
DE	DELE+3~
DFN	DELE+3~, DELE+5, DELE+10, CHLD+3~, CHLD+6, CHLD+8, SET~, SET+2*, DELPTR~, DELPTR+8 , DELPTR+9, DELPTR+11, DELPTR+17, DELPTR+18
DIE	DELE+3~, DELPTR+7~, DELPTR+9, DELPTR+15, DELPTR+18*
DIK	OE+3~, OE+4, DEL+6~, DEL+7, CO+5~
DR	DELE+3~, DELPTR+7~, DELPTR+9, DELPTR+15, DELPTR+18*
SDCL	DELE+3~, DELE+5, CHLD+3~, CHLD+6, SET~, SET+2*
SDCNV	DELE+3~, DELE+5, DELE+8, CHLD+3~, CHLD+6, CHLD+7, SET~, SET+3*
SDCS	DELPTR+7~, DELPTR+13*, DELPTR+14, DELPTR+15
SDDA	DELE+3~, DELE+5, DELE+10, CHLD+3~, CHLD+6, CHLD+8, SET~, SET+2*, DELPTR~, DELPTR+12 , DELPTR+13, DELPTR+17, DELPTR+18
SDFL	DEL~, DEL+7, DEL+8, CO+5~
SDI	DELPTR+7~, DELPTR+12, DELPTR+13, DEL+6~, DEL+7, DEL+8*, CO+5~
SDOE	DELE~, DELE+5, DELE+10, DELE+13, DELE+15, SET~, SET+2, SET+3, DELPTR~, DELPTR+8 , DELPTR+14, DELPTR+17, OE~, OE+4, DEL~, DEL+8, CO~, CO+6, CO+7
SDOE0	DELE+3~, DELE+5, CHLD+3~, CHLD+6, SET~, SET+2*
SDOEC	CHLD+3~, CHLD+4, CHLD+5, CHLD+6, CHLD+8, CHLD+9
SDOEP	DELE+3~, CHLD~, CHLD+5
SDORG	DELE+3~, DELE+5, DELE+10, DELE+13, CHLD+3~, CHLD+6, CHLD+8, SET~, SET+2*, DELPTR~ , DELPTR+8, DELPTR+12, DELPTR+17
SDT	DELE+3~, DELE+5, DELE+10, CHLD+3~, CHLD+6, CHLD+8, SET~, SET+2*, DELPTR~, DELPTR+8 , DELPTR+9, DELPTR+11, DELPTR+15
SDVIEN	DELPTR+7~, DELPTR+11*, DELPTR+14, DELPTR+15
SDVSAV	DELE+3~
U	DELPTR+8, DELPTR+14, DELPTR+17