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 |