ACHSEOB9; IHS/ITSC/FCJ - PROCESS EOBRS for 3 digit icd code ; [ 09/17/2004 11:42 AM ]
Source file <ACHSEOB9.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
M1A | ;
|
|
P2 | ;
|
|
P1 | ;
|
|
I1 | ; Check DX codes first
|
|
ICNV | ; Convert E and vee codes and place decimal.
|
|
I2 | ;
|
|
ICD | ;Post ICD
|
|
EOB3 | ;
|
|
NOERR | ;Most of the error checking is done by this time
|
|
M1 | ;EP
|
|
ICNV1 | ;
|
|
PCC | ;
; Post CHS data to PCC |
|
REF | ;
|
Name | Field # of Occurrence |
---|---|
^%DT | P1+5, P1+7 |
C^%DTC | P1+9 |
$$DOC^ACHS | I2+10, PCC+6 |
DX1^ACHSBMC | REF+2 |
ERR^ACHSEOB4 | I1+2 |
REC2^ACHSEOBB | P1+2 |
^ACHSEOBG | EOB3+5, EOB3+11, EOB3+14, EOB3+21, EOB3+24, EOB3+29, EOB3+33, EOB3+36, EOB3+39, EOB3+43 , EOB3+46, EOB3+53, EOB3+59, P2+10, P2+13, P2+20 |
CHKOCC^ACHSEOBN | EOB3+56 |
VNDR^ACHSEOBN | P2+9 |
^ACHSPAP | PCC+6 |
^ACHSUF | M1+2, EOB3+10, EOB3+17 |
IX^DIC | EOB3+7 |
$$ICDDX^ICDCODE | I1+1 |
$$FMTE^XLFDT | EOB3+33, EOB3+36 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^AUTTLOC - [#9999999.06] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ACHS(2 - [#9002062] | EOB3+59 |
^ACHSEOBR("P" | M1A+2* |
^ACHSEOBR("SEQ-ERROR" | M1+9* |
^ACHSF - [#9002080] | EOB3+20, EOB3+24, EOB3+25, EOB3+33, EOB3+36, ICD+7, ICD+8, ICD+9, I1+4*, I1+8 , I2+8*, I2+12, PCC+2 |
^ACHSF("B" | EOB3+17 |
^ACHSICD( | I2+12*, I2+13* |
^ACHSICD9("B" | I2+6 |
^DD(9002080.01 | I1+4 |
^DIC(4 - [#4] | EOB3+11 |
^ICD - [#80.2] | P2+20 |
^TMP("ACHSEOB" | M1A+5!, P1+1 |
Name | Line Occurrences |
---|---|
EOB3 | M1+2 |
I1 | ICD+12 |
I2 | ICD+13 |
M1A | M1+5 |
P1 | P1+11 |
P2 | P1+1 |
PCC | ICD+13 |
REF | I2+10 |
Name | Field # of Occurrence |
---|---|
^(3 | EOB3+36 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | EOB3+32*, EOB3+33, EOB3+36 |
%DT | NOERR+5! |
>> ACHS | NOERR+4*, P1+1*, ICD+12* |
>> ACHS("FM" | P1+6*, P1+9 |
>> ACHS("TO" | P1+8*, P1+9 |
>> ACHS("X2" | P1+9* |
>> ACHS3RDP | EOB3+63* |
>> ACHS3RDS | EOB3+63* |
>> ACHSADAM | M1A+6* |
ACHSBLKF | P2+15!, P2+16* |
>> ACHSCTR(1 | M1A+2 |
>> ACHSDCR | EOB3+26* |
>> ACHSDERR | EOB3+2* |
>> ACHSDIEN | P2+4*, ICD+7, ICD+8, ICD+9, I1+4, I1+8, I2+8, I2+12, I2+13, PCC+2 |
>> ACHSDOCR | EOB3+25*, EOB3+26, EOB3+29, EOB3+39, EOB3+43, EOB3+46, EOB3+53, EOB3+59, EOB3+62, P2+13 , PCC+2* |
>> ACHSDRG | P2+17*, P2+20* |
>> ACHSDUZ2 | M1+2* |
>> ACHSDX | I2+2*, I2+10* |
ACHSEDAT | EOB3+5*, EOB3+11*, EOB3+15*, EOB3+17!, EOB3+21*, EOB3+24*, EOB3+29*, EOB3+33*, EOB3+36*, EOB3+39* , EOB3+43*, EOB3+46*, EOB3+53*, EOB3+59*, P2+10*, P2+13*, P2+20* |
ACHSEOBR | M1+5, M1+9, M1A+3, M1A+4, M1A+5!, M1A+7* |
ACHSEOBR("A" | M1A+1, M1A+2, EOB3+6, EOB3+14, EOB3+15, EOB3+17, EOB3+20, EOB3+21, EOB3+29, EOB3+42 , EOB3+43, EOB3+48, EOB3+50, P2+17 |
ACHSEOBR("B" | EOB3+32, EOB3+46, NOERR+1, P2+20 |
ACHSEOBR("C" | EOB3+39, EOB3+49, EOB3+59, P2+10, P2+13, P2+16 |
ACHSEOBR("D" | EOB3+62, EOB3+63 |
ACHSEOBR("E" | EOB3+62, EOB3+63, ICD+12 |
>> ACHSERR | EOB3+11, EOB3+17 |
>> ACHSERRA | EOB3+2* |
ACHSERRE | M1A+5!, EOB3+5*, EOB3+11*, EOB3+14, EOB3+15*, EOB3+17!, EOB3+21*, EOB3+24*, EOB3+29*, EOB3+33* , EOB3+36*, EOB3+39*, EOB3+43*, EOB3+46*, EOB3+53*, EOB3+59*, P2+10*, P2+13*, P2+20* |
>> ACHSFC | EOB3+14, EOB3+17 |
>> ACHSFULP | EOB3+62* |
ACHSFX | ICD+6!, ICD+14! |
ACHSFX( | ICD+9*, I1+7, I1+8!, I2+3, I2+4, I2+11! |
ACHSFXF | ICD+14!, I1+6*, I1+8*, I1+9, I2+2* |
ACHSFXI | ICD+14! |
ACHSFXI( | I1+9*, I2+7 |
ACHSICDN | ICD+14!, I2+5*, I2+6*, I2+7, I2+8, I2+13 |
ACHSICDO | ICD+14!, I2+4*, I2+6 |
>> ACHSIPA | EOB3+62* |
>> ACHSISAO | EOB3+5 |
>> ACHSOB | EOB3+63* |
>> ACHSOLD | M1A+3* |
>> ACHSPDAT | EOB3+50* |
>> ACHSPIND | EOB3+49* |
>> ACHSPROV | P2+10, P2+13 |
>> ACHSPSQN | EOB3+48* |
>> ACHSSVDT | NOERR+4*, P1+3*, P2+1* |
ACHSTEMP | P1+2! |
ACHSTEMP("F" | P1+3, P1+4, P1+6, P1+10 |
>> ACHSTERR | M1+9* |
ACHSTMP | ICD+6~*, ICD+7*, ICD+8, ICD+9, ICD+14!, I1+6*, I1+7*, I1+8, I2+2*, I2+3* , I2+4, I2+8, I2+10, I2+11, I2+13 |
>> ACHSTYP | P2+17* |
>> ACHSWKLD | NOERR+1*, NOERR+2*, P2+2*, P2+3* |
>> ACHSWKLD(1 | NOERR+4*, P1+9*, P2+2 |
>> ACHSWKLD(2 | NOERR+4*, P1+10*, P2+3 |
>> ACHSX | EOB3+20*, P1+1*, P1+2, ICD+12*, I1+1, ICNV+1*, ICNV+2*, ICNV+3*, ICNV1+1* |
ACHSYAYA | M1+2*!, EOB3+16*, EOB3+17* |
>> ACHSZFPT | M1A+2 |
>> D | EOB3+6* |
>> DA | EOB3+20*, EOB3+21, EOB3+24, EOB3+25, EOB3+33, EOB3+36, P2+4 |
>> DFN | EOB3+62* |
>> DIC | EOB3+6* |
>> DIC(0 | EOB3+6* |
DUZ(2 | M1+2*, EOB3+7*, EOB3+11, EOB3+16*, EOB3+17*, EOB3+20, EOB3+24, EOB3+25, EOB3+33, EOB3+36 , ICD+7, ICD+8, ICD+9, I1+4, I1+8, I2+8, I2+12, I2+13, PCC+2 |
IO | PCC+6 |
IO(0 | M1+6, PCC+6 |
U | EOB3+11, EOB3+26, EOB3+29, EOB3+36, EOB3+39, EOB3+43, EOB3+46, EOB3+53, EOB3+59, EOB3+62 , P2+13, ICD+9, I1+1, I1+4, I1+8, I2+8, I2+13 |
>> X | M1A+4*, M1A+7, EOB3+6*, EOB3+42*, EOB3+43, P1+4*, P1+6*, P1+9, P2+1*, ICNV1+1* |
>> X1 | P1+9* |
>> X2 | P1+9* |
>> Y | EOB3+5, EOB3+7, P1+6, P1+8, I1+1*, I1+2, I1+8, I1+9 |