SCCVCST2 ; ALB/TMP - SCHED VSTS RE-CONVERSION - DELETE ENCOUNTER; 25-NOV-97
Source file <SCCVCST2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DELE(SDOE) | ;Delete Encounter on re-convert
; Input -- SDOE Outpatient Encounter file IEN |
|
DELEQ | ||
CHLD(SDOEP) | ;Delete child encounters
; SDOEP := Parent encounter ien |
|
SET(SDOE,SDOE0,SDT,DFN,SDCL,SDORG,SDDA,SDCNV) | ;Set Variables
|
|
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 |
|
OE(SDOE) | ;Delete Outpatient Encounter
; 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 ; |
|
CO(SDOE) | ;Delete Classification - NOT NEEDED - no data existed for the
; periods allowed to be converted ; SDOE := Encounter ien ; |
|
COQ |
FileNo | Call Tags |
---|---|
^SCE - [#409.68] | Classic Fileman Calls |