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 |