SCMSVUT2 ;ALB/JLU;Utility routine for AMBCARE;06/28/99
Source file <SCMSVUT2.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 6 | ($$CRTERR,$$DELERR,DELAERR)^SCDXFU02 $$BUILDHL7^SCDXMSG0 $$INPATENC^SCDXUTL PATDFN^SCDXUTL2 VALIDATE^SCMSVUT0 $$EL^SDCO22 |
| Health Level Seven | 2 | $$FMDATE^HLFNC INIT^HLFNC2 |
| CPT HCPCS Codes | 1 | ($$MOD,$$MODP)^ICPTMOD |
| Kernel | 1 | $$FMDIFF^XLFDT |
| Registration | 1 | $$CVEDT^DGCV |
| VA FileMan | 1 | ^%DT |
| 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 | SCDXHLDR SCDXMSG SCENIA1 SCENIA2 SD53747P ^SD(409.76 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COUNT(VALER) | ;counts the number of errored encounters found.
|
|
| IPERR(VALER) | ;counts the number of inpatient errored encounters found.
|
|
| FILEVERR(PTR,VALERR) | ;files the errors found for an encounter
|
|
| FILE(VALERR,SEG,PTR,FILE) | ;
|
|
| VALWL(CLIN) | ;WORKLOAD VALIDATION AT CHECK OUT
|
|
| VALIDATE(XMITPTR) | ;validates data that has a entry in the transmit file.
|
|
| VALQ | ||
| DEMUPDT(DFN,VALERR,TYP) | ;
|
|
| CLEAN(DFN,RNG,PTRS) | ;This subroutine cleans out all errors for a pateint
|
|
| MODCODE(DATA,ENCDT) | ;
|
|
| MODMETH(DATA) | ;
|
|
| ETHNIC(DATA) | ||
| CONFDT(DATA,SUB) | ||
| CONFCAT(DATA) | ||
| CVEDT(DATA) | ;Combat vet end date (ZEL.38)
|
|
| CLCV(DATA,SDOE) | ;Cross check for combat vet classification question
|
|
| DEMO | ;;2000^2030^2050^2100^2150^2200^2210^2220^2230^2240^2250^2300^2330^2360
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | CONFDT+7, CONFDT+10 |
| $$CVEDT^DGCV | CLCV+14 |
| $$FMDATE^HLFNC | CONFDT+6, CONFDT+9 |
| INIT^HLFNC2 | VALIDATE+18 |
| $$MOD^ICPTMOD | MODCODE+20 |
| $$MODP^ICPTMOD | MODCODE+26 |
| $$CRTERR^SCDXFU02 | FILE+10 |
| $$DELERR^SCDXFU02 | CLEAN+8 |
| DELAERR^SCDXFU02 | VALIDATE+25 |
| $$BUILDHL7^SCDXMSG0 | VALIDATE+21 |
| $$INPATENC^SCDXUTL | IPERR+7 |
| PATDFN^SCDXUTL2 | VALIDATE+12 |
| VALIDATE^SCMSVUT0 | VALIDATE+23 |
| $$EL^SDCO22 | CLCV+12 |
| $$FMDIFF^XLFDT | CONFDT+11 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ORD(101 - [#101] | VALIDATE+16 |
| ^SC - [#44] | VALWL+6 |
| ^SCE - [#409.68] | CLCV+9 |
| ^SD(409.73 - [#409.73] | VALIDATE+11, DEMUPDT+17 |
| ^SD(409.75 - [#409.75] | FILE+9, CLEAN+4, CLEAN+6 |
| ^SD(409.76 - [#409.76] | FILE+7 |
| Name | Line Occurrences |
|---|---|
| $$FILEVERR | VALIDATE+30 |
| CLEAN | DEMUPDT+13 |
| DEMUPDT | VALIDATE+26 |
| FILE | FILEVERR+8, DEMUPDT+19 |
| VALQ | VALIDATE+11, VALIDATE+17, VALIDATE+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | CONFDT+1~, CONFDT+7*, CONFDT+10* |
| A1 | VALWL+4~, VALWL+6*, VALWL+7 |
| >> ANS | VALIDATE+9*, VALIDATE+24*, VALIDATE+29*, VALQ |
| CLIN | VALWL~, VALWL+5*, VALWL+6 |
| CNT | COUNT+4~, COUNT+5*, COUNT+6*, COUNT+7, IPERR+4~, IPERR+5*, IPERR+7*, IPERR+8 |
| COD | CLEAN+3~, CLEAN+4* |
| CODE | FILE+4~, FILE+5*, FILE+6, FILE+7, FILE+10 |
| CODPTR | FILE+4~, FILE+7*, FILE+8, FILE+9 |
| CVEDT | CVEDT+4~, CVEDT+7*, CVEDT+8, CVEDT+9 |
| CVI | CVEDT+4~, CVEDT+6*, CVEDT+8 |
| DATA | MODCODE~, MODCODE+18, MODCODE+24, MODMETH~, MODMETH+13, MODMETH+14*, MODMETH+15, ETHNIC~, ETHNIC+4, ETHNIC+5 , ETHNIC+6, ETHNIC+7, CONFDT~, CONFDT+2, CONFDT+3, CONFDT+4, CONFCAT~, CONFCAT+1, CONFCAT+2, CONFCAT+5 , CVEDT~, CVEDT+5*, CVEDT+6, CVEDT+7, CLCV~, CLCV+5*, CLCV+6 |
| DATAMOD | MODCODE+17~, MODCODE+18*, MODCODE+19, MODCODE+20, MODCODE+26 |
| DATAPROC | MODCODE+23~, MODCODE+24*, MODCODE+25, MODCODE+26 |
| DFN | VALIDATE+8~, VALIDATE+26, DEMUPDT~, DEMUPDT+9*, DEMUPDT+10, DEMUPDT+13, CLEAN~, CLEAN+4, CLCV+11*, CLCV+12 , CLCV+14 |
| DTOUT | CONFDT+1~ |
| ENCDT | MODCODE~, MODCODE+20, MODCODE+26 |
| ENDT | CONFDT+1~, CONFDT+4*, CONFDT+8, CONFDT+9*, CONFDT+10, CONFDT+11 |
| ERR | VALIDATE+8~, VALIDATE+21*, VALIDATE+23 |
| FILE | FILEVERR+5~, FILEVERR+7*, FILEVERR+8, FILEVERR+9, FILE~, FILE+9*, FILE+10*, VALIDATE+28~, VALIDATE+30*, DEMUPDT+18~ , DEMUPDT+19 |
| GOOD | CONFCAT+3~, CONFCAT+4*, CONFCAT+5*, CONFCAT+6 |
| HL | VALIDATE+8~, VALIDATE+18, VALIDATE+21 |
| HL("" | VALIDATE+19 |
| >> HL7XMIT | VALIDATE+14*, VALIDATE+21, VALIDATE+33 |
| HLEID | VALIDATE+8~, VALIDATE+16*, VALIDATE+17, VALIDATE+18 |
| IEN | CLEAN+3~, CLEAN+4*, CLEAN+6, CLEAN+8 |
| LP | DEMUPDT+11~, DEMUPDT+16*, CLEAN+3~, CLEAN+4* |
| LP2 | CLEAN+3~, CLEAN+4* |
| MTHD | ETHNIC+3~, ETHNIC+7*, ETHNIC+9 |
| NBR | FILE+1~, FILE+2*, FILE+3*, FILE+5 |
| PTR | FILEVERR~, FILEVERR+8, FILE~, FILE+9, FILE+10, DEMUPDT+11~, DEMUPDT+16*, DEMUPDT+17, DEMUPDT+19, CLEAN+7* |
| PTRS | DEMUPDT+11~, DEMUPDT+12*, DEMUPDT+13, DEMUPDT+15, DEMUPDT+16, CLEAN~, CLEAN+9, CLEAN+10* |
| RES | CLEAN+5~, CLEAN+8* |
| RNG | DEMUPDT+11~, DEMUPDT+12*, DEMUPDT+13, CLEAN~, CLEAN+4 |
| SDDT | CLCV+7~, CLCV+10*, CLCV+14 |
| SDOE | CLCV~, CLCV+8*, CLCV+9, CLCV+12 |
| SDOE0 | CLCV+7~, CLCV+9*, CLCV+10, CLCV+11 |
| SEG | FILEVERR+5~, FILEVERR+7*, FILEVERR+8*, FILE~, FILE+3, FILE+5 |
| STDT | CONFDT+1~, CONFDT+3*, CONFDT+5, CONFDT+6*, CONFDT+7, CONFDT+11 |
| SUB | CONFDT~, CONFDT+3, CONFDT+4 |
| TYP | DEMUPDT~, DEMUPDT+9*, DEMUPDT+10 |
| U | VALWL+6, DEMUPDT+16, CLEAN+4, CLEAN+6, CLEAN+7 |
| VAL | ETHNIC+3~, ETHNIC+6*, ETHNIC+8, CONFCAT+3~, CONFCAT+5* |
| VALER | COUNT~, COUNT+6, IPERR~, IPERR+6 |
| VALERR | FILEVERR~, FILEVERR+6, FILEVERR+8, FILE~, FILE+3, FILE+5, VALIDATE+8~, VALIDATE+14*, VALIDATE+21, VALIDATE+23 , VALIDATE+26, VALIDATE+27, VALIDATE+30, VALIDATE+33, DEMUPDT~, DEMUPDT+9*, DEMUPDT+10, DEMUPDT+14, DEMUPDT+19 |
| VAR | COUNT+4~, COUNT+5*, COUNT+6*, IPERR+4~, IPERR+5*, IPERR+6*, IPERR+7, CLEAN+5~, CLEAN+6*, CLEAN+7 , CLEAN+9, CLEAN+10 |
| VET | CLCV+7~, CLCV+12*, CLCV+13, CLCV+14*, CLCV+15 |
| X | CONFDT+1~, CONFDT+7*, CONFDT+10* |
| XMITPTR | VALIDATE~, VALIDATE+10*, VALIDATE+11, VALIDATE+12, VALIDATE+14, VALIDATE+21, VALIDATE+25, VALIDATE+30 |
| Y | CONFDT+1~, CONFDT+7, CONFDT+10 |
| Name | Field # of Occurrence |
|---|---|
| $T(@(1) | DEMUPDT+12 |
