©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
SCCVEAP2 ;ALB/RMO,TMP - Appointment Conversion cont.; [ 04/05/95 10:19 AM ]
Source file <SCCVEAP2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETSCCVT(SCCVT,SCCONS) | ; Set the SCCVT array for source and service type
|
|
| VISITQ | ||
| CHKQ | ||
| 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 |
|
| 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 |
|
| VISIT(SCDTM,SCCV) | ;Create visit when encounter already exists
; Input -- SCDTM Appointment date/time ; SCCV Conversion array ; Output -- Visit file IEN |
|
| CHLD(SCOEP,SCCV,SCLOG) | ;Convert children
; Input -- SCOEP Parent outpatient encounter IEN ; SCCV Conversion array ; SCLOG Scheduling conversion log IEN [optional] ; Output -- None |
|
| ANCQ |
| 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* |
| Name | Line Occurrences |
|---|---|
| $$CHK | ANC+17 |
| $$VISIT | ANC+53 |
| ANCQ | ANC+9 |
| CHKQ | CHK+11 |
| SETSCCVT | VISIT+19, ANC+34 |
| VISITQ | VISIT+5, VISIT+8 |
| >> | 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 |