PXUTLSCC ;ISL/dee,ISA/KWP - Validates and corrects the Service Connected Conditions ;7/23/96
Source file <PXUTLSCC.m>
| Package | Total | Caller Graph |
|---|---|---|
| PCE Patient Care Encounter | 3 | PXAIPOV PXAIVSTV PXCAVST |
| Order Entry Results Reporting | 2 | ORWIB ORWPCE |
| Text Integration Utility | 1 | TIUPXAPS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENCHK(ENCOWNTR,X0) | ;Do outpatient encounter checks
|
|
| VEROUT | ;verify a clinic
|
|
| SCCOND(DFN,APPDT,HLOC,VISIT,PXUDATA) | ;Set up array of the patients
; Service Connected Conditions |
|
| SCC(PXUPAT,PXUDT,PXUHLOC,PXUTLVST,PXUIN,PXUOUT,PXUERR) | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | SCCOND+26 |
| ^SCE - [#409.68] | SCCOND+21, SCCOND+35, SCCOND+36 |
| ^SCE("AVSIT" | SCCOND+20 |
| ^SD(409.41 - [#409.41] | SCCOND+42, SCCOND+43 |
| Name | Line Occurrences |
|---|---|
| ENCHK | SCCOND+36 |
| SCCOND | SCC+22 |
| VEROUT | SCCOND+31 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SCCOND+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APPDT | SCCOND~, SCCOND+26, SCCOND+31, SCCOND+40 |
| CL | SCCOND+17~, VEROUT+2* |
| CLASSIF | SCCOND+17~, SCCOND+38, SCCOND+40 |
| CLASSIF( | SCCOND+44 |
| DFN | SCCOND~, SCCOND+26, SCCOND+31, SCCOND+40, ENCHK+1~, ENCHK+2*, ENCHK+5 |
| ENCOWNTR | ENCHK~, ENCHK+6 |
| END | SCCOND+17~, SCCOND+36*, SCCOND+37, ENCHK+3*, ENCHK+4*, ENCHK+5*, ENCHK+6* |
| HLOC | SCCOND~, SCCOND+26, VEROUT+2 |
| LOC | ENCHK+1~, ENCHK+2*, ENCHK+4 |
| MNE | SCCOND+17~, SCCOND+43*, SCCOND+44 |
| ORG | ENCHK+1~, ENCHK+2*, ENCHK+4, ENCHK+5 |
| OUTENC | SCCOND+17~, SCCOND+18*, SCCOND+20*, SCCOND+21*, SCCOND+27*, SCCOND+28, SCCOND+31*, SCCOND+34, SCCOND+35*, SCCOND+36 , SCCOND+37*, SCCOND+38, SCCOND+40, VEROUT+1, VEROUT+2* |
| PXUAO | SCC+21~, SCC+33*, SCC+34, SCC+35, SCC+37, SCC+39 |
| PXUDATA | SCCOND~ |
| PXUDATA( | SCCOND+44* |
| PXUDT | SCC~, SCC+22 |
| PXUEC | SCC+21~, SCC+49*, SCC+50, SCC+51, SCC+53, SCC+55 |
| PXUERR | SCC~, SCC+24*, SCC+26*, SCC+28*, SCC+30*, SCC+34*, SCC+36*, SCC+38*, SCC+39*, SCC+42* , SCC+44*, SCC+46*, SCC+47*, SCC+50*, SCC+52*, SCC+54*, SCC+55*, SCC+58*, SCC+60*, SCC+63* , SCC+65* |
| PXUHLOC | SCC~, SCC+22 |
| PXUHNC | SCC+21~, SCC+62*, SCC+63, SCC+64 |
| PXUIN | SCC~, SCC+23, SCC+25, SCC+33, SCC+41, SCC+49, SCC+57, SCC+62 |
| PXUIR | SCC+21~, SCC+41*, SCC+42, SCC+43, SCC+45, SCC+47 |
| PXUITEM | SCC+21~ |
| PXUMST | SCC+21~, SCC+57*, SCC+58, SCC+59 |
| PXUOUT | SCC~, SCC+23*, SCC+26*, SCC+30*, SCC+32, SCC+34*, SCC+38*, SCC+39*, SCC+42*, SCC+46* , SCC+47*, SCC+50*, SCC+54*, SCC+55*, SCC+58*, SCC+60*, SCC+63*, SCC+65* |
| PXUPAT | SCC~, SCC+22 |
| PXUPSCC | SCC+21~, SCC+22 |
| PXUPSCC("AO" | SCC+36, SCC+38 |
| PXUPSCC("EC" | SCC+52, SCC+54 |
| PXUPSCC("HNC" | SCC+65 |
| PXUPSCC("IR" | SCC+44, SCC+46 |
| PXUPSCC("MST" | SCC+60 |
| PXUPSCC("SC" | SCC+28, SCC+30 |
| PXUSC | SCC+21~, SCC+25*, SCC+26, SCC+27, SCC+29, SCC+32*, SCC+36, SCC+39, SCC+44, SCC+47 , SCC+52, SCC+55 |
| PXUTLVST | SCC~, SCC+22 |
| U | SCCOND+21, SCCOND+27, SCCOND+43, SCCOND+44, ENCHK+2, VEROUT+2 |
| VISIT | SCCOND~, SCCOND+19, SCCOND+20, SCCOND+22 |
| X0 | SCCOND+17~, SCCOND+36*, ENCHK~, ENCHK+2, ENCHK+3, ENCHK+5 |
| XX | SCCOND+17~, SCCOND+26*, SCCOND+27, SCCOND+41*, SCCOND+42*, SCCOND+43, SCCOND+44 |