©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ACHSACO1 ; IHS/ITSC/TPF/PMF - AREA CONSOLIDATION (2/3) ;
Source file <ACHSACO1.m>
| Package | Total | Call Graph |
|---|---|---|
| Contract Health Management Information System | 2 | $$AOP^ACHS END^ACHSACO2 |
| Kernel | 1 | $$REPEAT^XLFSTR |
| VA Fileman | 1 | ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TU | ; UFMS Record ;ACHS*3.1*13 IHS/OIT/FCJ ADDED FOR PROCESSING UFMS RECORD
|
|
| T6 | ;'PROCESS AREA OFFICE DATA'
|
|
| T7 | ; Statistical records.
|
|
| T4 | ;
|
|
| T5 | ;'PROCESS FI DATA' 'FACILITIES EXPORTING FI DATA'
|
|
| T2 | ; FACILITY GENERATED DHR records for HAS and/or CORE.
; For HAS |
|
| T3 | ;
|
|
| A1 | ; Initialize counters, main process loop.
|
|
| REC(X) | ;EP - Return the name of the export record, 1-8.
|
|
| T | ;
|
|
| SVRSUB | ; Generate ^ACHSSVR global from 5A & 5B records.
|
|
| T4A | ;
|
|
| CORE(R) | ;PROCESS A '2B' RECORD INTO THE 80-160 '2' PART TWO RECORD
|
|
| SVR5A | ;
|
|
| SVR5B | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^AUTTVNDR - [#9999999.11] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ACHSAOP - [#9002079] | T3+3, T4+3, T5+1, T5+2, SVR5A+6 |
| ^ACHSAOPD( | T6+2* |
| ^ACHSAOVU( | T4A+4* |
| ^ACHSAOVU(0 | A1+6 |
| ^ACHSBCBS( | T3+4*, T4+4*, T5+1* |
| ^ACHSCORE("COUNT" | A1+10 |
| ^ACHSPCC( | T2+14*, T2+16* |
| ^ACHSPCC("COUNT" | A1+2, T2+17* |
| ^ACHSPG2( | T7+5* |
| ^ACHSPG2(0 | A1+9 |
| ^ACHSPIG( | T7+9* |
| ^ACHSPIG(0 | A1+8 |
| ^ACHSSVR( | SVR5A+12*, SVR5B+3* |
| ^ACHSUFMS( | TU+3* |
| ^ACHSUFMS("COUNT" | A1+11 |
| ^ACHSUFMS(0 | A1+12 |
| ^ACHSZOCT("AOPD" | A1+5 |
| ^ACHSZOCT("BCBS" | A1+4 |
| ^ACHSZOCT("PIG" | A1+7 |
| Name | Line Occurrences |
|---|---|
| $$CORE | T2+14, T2+16 |
| SVR5A | SVRSUB+1 |
| SVR5B | SVRSUB+1 |
| SVRSUB | T5+2 |
| T | A1+29 |
| T2 | T+8 |
| T3 | T+12 |
| T4 | T+15 |
| T4A | T4+3 |
| T5 | T+17 |
| T6 | T+20 |
| T7 | T+23 |
| TU | T+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ACHS | A1+3* |
| >> ACHSCCOR | A1+10* |
| >> ACHSCCOR("P" | A1+13* |
| >> ACHSCT | A1+2*, T2+13*, T2+14, T2+15*, T2+16, T2+17 |
| >> ACHSCTFI | A1+2*, A1+4*, T3+4*, T4+4*, T5+1* |
| >> ACHSCTFS | A1+2*, SVR5A+11*, SVR5A+12, SVR5B+3 |
| >> ACHSCTP2 | A1+2*, A1+9*, T7+3*, T7+5 |
| >> ACHSCTPD | A1+2*, A1+5*, T6+2* |
| >> ACHSCTPG | A1+2*, A1+7*, A1+8*, T7+7*, T7+9 |
| >> ACHSCTUA | A1+12*, TU+4* |
| >> ACHSCTUF | A1+2*, A1+11*, TU+2*, TU+3 |
| >> ACHSCTV | A1+2*, A1+6*, A1+19, T4A+4* |
| >> ACHSCTVS | A1+19* |
| >> ACHSDRUN | T+29 |
| >> ACHSEIN | SVR5A+9*, SVR5A+10*, SVR5A+12, SVR5B+3, CORE+2*, CORE+3 |
| >> ACHSF10 | CORE+6*, CORE+8 |
| >> ACHSF11 | CORE+7*, CORE+8 |
| >> ACHSF12 | CORE+5*, CORE+8 |
| >> ACHSFACD | T2+14, T2+16, T7+5, T7+9 |
| >> ACHSFCPT | T+4, T+5, T+29, T3+3, T4+3, T5+1 |
| >> ACHSHR1 | T2+8*, CORE+3 |
| >> ACHSHR2 | T2+10*, CORE+5, CORE+6, CORE+7 |
| >> ACHSJ | T+29* |
| >> ACHSRTYP | T+2*, T+3, T+8, T+12, T+15, T+17, T+20, T+23, T+25 |
| ACHSSRTY | T2+3~, T2+6*, T2+8, T2+10, T2+12 |
| >> ACHSSTV | T7+2 |
| >> ACHSSTYP | T7+4*, T7+5, T7+8*, T7+9 |
| >> ACHSTOTL( | A1+3*, T+3*, T+29 |
| >> ACHSX2 | A1+27*, T+2, T2+6, T2+8, T2+10, T3+4, T4+4, T4A+4, T5+1, T6+2 , T7+4, T7+5, T7+8, T7+9, TU+1, TU+3, TU+4, SVRSUB+1, SVR5A+2, SVR5A+7 , SVR5A+8, SVR5A+9, SVR5B+2, CORE+2 |
| ACHSX3 | SVR5A+1!, SVR5A+7*, SVR5A+12, SVR5B+1, SVR5B+3 |
| >> ACHSX4 | SVR5B+2*, SVR5B+3 |
| >> ACHSXD2 | A1+16 |
| >> ACHSZFAC | SVR5A+8*, SVR5A+12, SVR5B+3 |
| >> ACHSZFAC( | T+4*, T+5*, T+29* |
| >> D | SVR5A+2* |
| >> DIC | SVR5A+2* |
| >> DIC(0 | SVR5A+2* |
| DUZ(2 | T3+3, T4+3, T5+1, T5+2, SVR5A+6 |
| >> DX | A1+18* |
| >> DY | A1+18* |
| IO | A1+24 |
| IO(0 | A1+14, A1+40 |
| >> IOPAR | A1+17 |
| R | CORE~, CORE+1, CORE+3*, CORE+4, CORE+8*, CORE+9*, CORE+10 |
| >> TCOUNT | A1+23*, A1+40 |
| U | A1+6, A1+16, T+5, REC+7 |
| X | A1+23, A1+25*, A1+26, A1+30*, SVR5A+2*, SVR5A+3*, REC~, REC+5, REC+7 |
| >> Y | SVR5A+5, SVR5A+6 |