SDVSIT0 ;MJK/ALB,ESW,SCK - OE Processing ; 11/21/02 11:00am
Source file <SDVSIT0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Scheduling | 6 | SCCVEAP2 SDAMEVT3 SDES2SETCHECKOUT SDESCHECKOUT SDVSIT ^SCE |
Name | Comments | DBIA/ICR reference |
---|---|---|
ADD(SDT,SDVSIT) | ; -- add/find outpatient encounter
; input SDT = visit date internal format ; SDVSIT = <see bottom of routine> |
|
NEW(SDT,SDVSIT) | ; -- create new outpatient encounter record
; input SDT = visit date internal format ; SDVSIT = <see bottom of routine> |
|
LOCK | ||
NEWQ | ||
VISIT(SDT,SDVSIT) | ; -- add visit file entry
|
|
VISITQ | ||
STATUS(DFN,SDT,SDCL,SDORG,SDACT) | ; -- 409.68;.07 x-ref
|
FileNo | Call Tags |
---|---|
^SCE - [#409.68] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | VISIT+3 |
^DG(40.8 - [#40.8] | VISIT+17 |
^DISV( | LOCK+1* |
^DPT - [#2] | LOCK+3, VISIT+9 |
^SC - [#44] | STATUS+3 |
^SCE - [#409.68] | LOCK, LOCK+1*, LOCK+7, VISIT+11 |
^SCE("B" | LOCK+1* |
^SCE(0 | NEW+8, LOCK+1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | NEW+6~, LOCK+5*, VISIT+1~, VISIT+14~, VISIT+15*, VISIT+16 |
DE | NEW+6~ |
DFN | VISIT+1~, VISIT+6*, VISIT+7, VISIT+9, VISIT+12, VISIT+24, VISIT+35, STATUS~, STATUS+2 |
DIC | VISIT+1~, VISIT+14~, VISIT+15* |
DIC1 | VISIT+14~, VISIT+15*, VISIT+16 |
DIE | NEW+6~, LOCK+5*, VISIT+1~ |
DIQ | VISIT+14~, VISIT+15* |
DIQ(0 | VISIT+15* |
DQ | NEW+6~ |
DR | NEW+6~, LOCK+5*, VISIT+1~, VISIT+14~, VISIT+15*, VISIT+16 |
DUZ | LOCK+1 |
I | NEW+6~, NEW+8*, LOCK*, LOCK+1 |
INST | VISIT+14~ |
INST( | VISIT+16 |
>> SCCVT | VISIT+29 |
>> SCCVT("LOC" | VISIT+32 |
>> SCCVT("SOR" | VISIT+30 |
>> SCCVT("SVC" | VISIT+31 |
SDACT | STATUS~, STATUS+4 |
SDCL | STATUS~, STATUS+3 |
SDOE | NEW+6~, LOCK+5*, LOCK+6, LOCK+7, NEWQ |
SDORG | STATUS~ |
SDT | ADD~, ADD+9, ADD+11, NEW~, LOCK+1, LOCK+4, LOCK+6, VISIT~, VISIT+6, VISIT+7 , VISIT+12, VISIT+24, STATUS~, STATUS+2, STATUS+4 |
SDVSIT | ADD~, ADD+9, ADD+11, NEW~, VISIT~ |
SDVSIT("CLN" | VISIT+7 |
SDVSIT("DFN" | LOCK+3, LOCK+4, VISIT+6 |
SDVSIT("DIV" | VISIT+17 |
SDVSIT("ELG" | LOCK+3*, VISIT+9 |
SDVSIT("LOC" | LOCK+4, VISIT+10, VISIT+12 |
SDVSIT("ORG" | LOCK+4, VISIT+23, VISIT+39, VISIT+40 |
SDVSIT("PAR" | VISIT+11, VISIT+20 |
SDVSIT("STA" | LOCK+4* |
SDVSIT("SVC" | VISIT+7 |
SDVSIT("VST" | ADD+7*, VISIT+41* |
U | NEW+8, LOCK+3, VISIT+11, VISIT+17, STATUS+3 |
VSIT | VISIT+1~, VISIT+6*, VISIT+11*, VISIT+35 |
VSIT("ACT" | VISIT+12* |
VSIT("CLN" | VISIT+7*, VISIT+35 |
VSIT("ELG" | VISIT+9*, VISIT+35 |
VSIT("IEN" | VISIT+41 |
VSIT("INS" | VISIT+16*, VISIT+17*, VISIT+35 |
VSIT("LNK" | VISIT+11*, VISIT+13, VISIT+15 |
VSIT("LOC" | VISIT+10*, VISIT+32* |
VSIT("PRI" | VISIT+21*, VISIT+24*, VISIT+26* |
VSIT("SOR" | VISIT+30* |
VSIT("SVC" | VISIT+7*, VISIT+24*, VISIT+31* |
VSIT(0 | VISIT+6* |
VSITPKG | VISIT+1~, VISIT+6* |
X | NEW+6~, VISIT+1~, VISIT+3*, VISIT+11* |
Y | LOCK+1*, LOCK+5, STATUS+1~*, STATUS+2*, STATUS+3*, STATUS+4*, STATUS+5 |