SD5364PT ;ALB/REW - SD*5.3*64 Post-installation ; 5 OCT 1996
Source file <SD5364PT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;entry point
|
|
| INTRO | ;header info for output
|
|
| SEARCH | ;look for erroneous OUTPATIENT ENCOUNTER ENTRIES
; SCE = ien of OUTPATIENT ENCOUNTER (#409.68) ; SCD = ien of DELETED OUTPATIENT ENCOUNTER (#409.74) ; SCCNT = Count of actually deleted records ; SCNODE = Zero Node of Associated File (409.68 or 409.74) ; SCTEST = Testing parameter to prevent deletion & list records |
|
| ;
|
||
| EXIT | ;final cleanup
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SCE - [#409.68] | SEARCH+13 |
| ^SD(409.73 - [#409.73] | SEARCH+12, SEARCH+15, SEARCH+24, SEARCH+28 |
| ^SD(409.74 - [#409.74] | SEARCH+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| SC40973 | SEARCH+7~, SEARCH+15*, SEARCH+16, SEARCH+17, SEARCH+18, SEARCH+28*, SEARCH+29, SEARCH+30 |
| SCCNT | SEARCH+7~, SEARCH+11*, SEARCH+20*, SEARCH+21, SEARCH+22*, SEARCH+27*, SEARCH+32 |
| SCD | SEARCH+7~, SEARCH+24*, SEARCH+25, SEARCH+28, SEARCH+29 |
| SCE | SEARCH+7~, SEARCH+12*, SEARCH+13, SEARCH+15, SEARCH+16, SEARCH+18 |
| SCNODE | SEARCH+7~, SEARCH+13*, SEARCH+14, SEARCH+16, SEARCH+18, SEARCH+25*, SEARCH+26, SEARCH+29 |
| >> SCTEST | SEARCH+8, SEARCH+9, SEARCH+16, SEARCH+17, SEARCH+30 |
