SCCVEAP2 ;ALB/RMO,TMP - Appointment Conversion cont.; [ 04/05/95 10:19 AM ]
Source file <SCCVEAP2.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
VISIT(SCDTM,SCCV) | ;Create visit when encounter already exists
; Input -- SCDTM Appointment date/time ; SCCV Conversion array ; Output -- Visit file IEN |
|
VISITQ | ||
ANC(SCOEP,DFN,SCDTM,SCCLN,SCCV,SCLOG) | ;Create stp code enctr/visit for ancillary tests
; Input -- SCOEP Parent encounter (if known) ; DFN Patient IEN ; SCDTM Appointment date/time ; SCCLN Clinic IEN ; SCCV Conversion array ; SCLOG Scheduling conversion log IEN [optional] ; Output -- None |
|
ANCQ | ||
CHK(DFN,SCDTM,SCCLN,SCCV,SCSCDI,SCOE) | ;Check if stop code should be added for ancillary test
; Input -- DFN Patient IEN ; SCDTM Appointment date/time ; SCCLN Clinic IEN ; SCCV Conversion array ; SCSCDI Clinic Stop Code IEN ; Output -- 1=Add enctr and visit 2=Add only visit and 0=No,don't add ; SCOE IEN of the encounter for the anc test |
|
CHKQ | ||
CHLD(SCOEP,SCCV,SCLOG) | ;Convert children
; Input -- SCOEP Parent outpatient encounter IEN ; SCCV Conversion array ; SCLOG Scheduling conversion log IEN [optional] ; Output -- None |
|
SETSCCVT(SCCVT,SCCONS) | ; Set the SCCVT array for source and service type
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | ANC+15 |
^SC - [#44] | CHK+11 |
^SCE - [#409.68] | VISIT+25, VISIT+38, ANC+50, CHK+18, CHK+27, CHLD+8 |
^SCE("APAR" | CHK+17, CHLD+7 |
^SDV - [#409.5] | CHLD+11 |
^XTMP("SCCV-ERR-" | ANC+38*, ANC+56* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | ANC~, ANC+17, ANC+20, ANC+23~, ANC+37, ANC+55, CHK~ |
SCADD | ANC+8~, ANC+17*, ANC+18, ANC+22, ANC+26, ANC+47 |
SCAEDTM | CHK+8~ |
SCANC | ANC+8~ |
SCANC( | ANC+14, ANC+24, ANC+35 |
SCANC(105 | ANC+11* |
SCANC(107 | ANC+12* |
SCANC(108 | ANC+10* |
SCCLN | ANC~, ANC+17, ANC+30, ANC+37, CHK~, CHK+11 |
SCCONS | VISIT+19, ANC+34, CHK+26, SETSCCVT~ |
SCCONS("SRCE" | SETSCCVT+1 |
SCCV | VISIT~, ANC~, ANC+17, CHK~, CHLD~ |
SCCV("CSC" | VISIT+10 |
SCCV("EVT" | ANC+9, CHLD+10, CHLD+15 |
SCCV("LOC" | SETSCCVT+3 |
SCCV("OE" | VISIT+5, VISIT+6, VISIT+7, VISIT+10, VISIT+12, VISIT+13, VISIT+14, VISIT+15, VISIT+16, VISIT+32 , VISIT+34, VISIT+38*, ANC+9, ANC+28, ANC+29, ANC+31 |
SCCV("ORG" | VISIT+17, SETSCCVT+3 |
SCCV("PAR" | VISIT+20 |
SCCV("PT" | ANC+9, ANC+10, ANC+11, ANC+12, ANC+24 |
SCCV("VST" | VISIT+39* |
>> SCCVEVT | ANC+21, CHK+21, CHK+22, CHK+25 |
SCCVT | VISIT+4~, VISIT+19, ANC+34, SETSCCVT~ |
SCCVT("LOC" | SETSCCVT+3* |
SCCVT("SOR" | SETSCCVT+1* |
SCCVT("SVC" | SETSCCVT+2* |
SCCVX | ANC+42~, ANC+45, ANC+48~, ANC+58~, ANC+59 |
SCCVX("HIST" | ANC+43* |
SCCVX("NEW" | ANC+44* |
SCCVX("VST" | ANC+59* |
SCCVY | ANC+48~, ANC+53 |
SCCVY("OE" | ANC+49*, ANC+50*, ANC+51, ANC+53, ANC+55 |
SCCVY("ORG" | ANC+52* |
SCCVY("PAR" | ANC+51* |
SCDA | CHK+8~ |
SCDATA | VISIT+4~, VISIT+36 |
SCDATA( | VISIT+34*, VISIT+35* |
SCDTM | VISIT~, VISIT+28, VISIT+34, ANC~, ANC+17, ANC+37, CHK~ |
SCERRMSG | CHLD+5~ |
SCLOG | ANC~, ANC+37, ANC+38, ANC+55, ANC+56, CHLD~, CHLD+15 |
SCOE | VISIT+4~, VISIT+6*, VISIT+36, VISIT+38, ANC+8~, ANC+17, ANC+24, ANC+35*, ANC+37, ANC+38 , ANC+40, ANC+45, ANC+47, ANC+49, ANC+50, ANC+55, ANC+56, ANC+59, CHK~, CHK+9* , CHK+24*, CHK+27* |
SCOE0 | CHLD+5~, CHLD+8*, CHLD+9, CHLD+10, CHLD+11, CHLD+12, CHLD+15 |
SCOE00 | CHK+8~, CHK+18*, CHK+19, CHK+21, CHK+23, CHK+26 |
SCOEC | CHK+8~, CHK+16*, CHK+17*, CHK+18, CHK+24, CHK+26, CHK+27, CHLD+5~, CHLD+6*, CHLD+7* , CHLD+8, CHLD+11 |
SCOEP | ANC~, ANC+24, ANC+32, ANC+35, CHK+17, CHLD~, CHLD+7, CHLD+15 |
SCOEP0 | VISIT+24~, VISIT+25*, VISIT+26 |
SCSCD | ANC+8~, ANC+13*, ANC+14*, ANC+15, ANC+24, ANC+35, ANC+37, ANC+55 |
SCSCDI | ANC+8~, ANC+15*, ANC+17, ANC+27, CHK~, CHK+19 |
SCT | ANC+8~, ANC+22*, ANC+24 |
>> SCTOT | ANC+24 |
>> SCTOT( | VISIT+30*, ANC+39*, ANC+41*, ANC+57* |
SCVSIT | VISIT+4~, VISIT+28, ANC+8~, ANC+35 |
SCVSIT("CLN" | VISIT+10*, VISIT+26, ANC+27* |
SCVSIT("DFN" | VISIT+7*, VISIT+8, ANC+20*, ANC+24 |
SCVSIT("DIV" | VISIT+12*, ANC+28* |
SCVSIT("ELG" | VISIT+13*, ANC+29* |
SCVSIT("LOC" | VISIT+14*, VISIT+26, ANC+30* |
SCVSIT("ORG" | VISIT+17*, VISIT+23, VISIT+34, ANC+33* |
SCVSIT("PAR" | VISIT+20*, VISIT+23, VISIT+25, ANC+32* |
SCVSIT("REF" | ANC+33* |
SCVSIT("STA" | VISIT+16* |
SCVSIT("TYP" | VISIT+15*, ANC+31* |
SCVSIT("VST" | VISIT+26*, VISIT+28, VISIT+30, VISIT+32, VISIT+35, VISIT+39, VISITQ, ANC+36, ANC+53*, ANC+54 , ANC+59 |
SCX | CHLD+5~, CHLD+10, CHLD+11*, CHLD+15* |
SDQ | CHK+8~, CHK+16*, CHK+17, CHK+20* |
SDVIEN | CHLD+5~, CHLD+9*, CHLD+11, CHLD+15 |
U | VISIT+7, VISIT+10, VISIT+12, VISIT+13, VISIT+14, VISIT+15, VISIT+16, VISIT+26, VISIT+32, ANC+10 , ANC+11, ANC+12, ANC+24, ANC+28, ANC+29, ANC+31, ANC+51, ANC+55, CHK+11, CHK+19 , CHK+21, CHK+23, CHLD+9, CHLD+10, CHLD+11, CHLD+12, CHLD+15 |
Y | CHK+8~, CHK+9*, CHK+11*, CHK+21*, CHK+23*, CHK+24*, CHK+27*, CHK+28*, CHKQ |