©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
ACRFIRSF ;IHS/OIRM/DSD/AEF - IRS 1099 VENDOR FLAT FILE [ 10/27/2004 4:18 PM ]
Source file <ACRFIRSF.m>
| Package | Total | Call Graph |
|---|---|---|
| Commitment Register | 3 | $$ARMSDIR^ACRFSYS PAUSE^ACRFWARN (CLOSE,OPEN)^ACRFZISH |
| IHS VA Utilities | 1 | ^XBKVAR |
| VA Fileman | 1 | ^DIR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;EP -- MAIN ENTRY POINT
|
|
| UNIX(ACRFILE) | ||
| HFS(ACROUT,%DEV,ACRFILE) | ||
| GET(ACRYR) | ||
| WRITE(X) | ;----- FORMAT AND WRITE DATA TO UNIX FILE
|
|
| YEAR(ACRYR) | ||
| TXT | ;----- PRINT OPTION TEXT
|
|
| FILE(ACRFILE) | ||
| DESC | ;----- WHAT THIS ROUTINE DOES
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ACR1099V - [#9002198.2] | GET+16, GET+17 |
| ^ACR1099V("C" | GET+5 |
| ^AUTTVNDR - [#9999999.11] | GET+7, GET+8, GET+9 |
| ^DIC(5 - [#5] | GET+14 |
| ^TMP("ACRF" | EN+11, EN+14!, GET+19*, UNIX+7, UNIX+15, UNIX+17 |
| Name | Line Occurrences |
|---|---|
| FILE | EN+7 |
| GET | EN+10 |
| TXT | EN+4 |
| UNIX | EN+13 |
| WRITE | UNIX+20 |
| YEAR | EN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DEV | UNIX+6~, UNIX+10, UNIX+11, UNIX+13, HFS~, HFS+11* |
| ACRADD1 | GET+3~, GET+10*, GET+19 |
| ACRADD2 | GET+3~, GET+11*, GET+19 |
| ACRCITY | GET+3~, GET+12*, GET+19 |
| ACRCNT | GET+3~, GET+4*, GET+6*, GET+19, UNIX+6~, UNIX+14*, UNIX+16* |
| ACRDATA | GET+3~, GET+9*, GET+10, GET+11, GET+12, GET+13, GET+15, UNIX+6~, UNIX+17*, UNIX+18 , UNIX+19 |
| ACREIN | GET+3~, GET+8*, GET+19 |
| ACRFILE | EN+2~, EN+7, EN+8, EN+13, UNIX~, UNIX+10, UNIX+23, FILE~, FILE+4*, FILE+10* , HFS~ |
| ACRNAME | GET+3~, GET+7*, GET+19 |
| ACROUT | UNIX+6~, UNIX+11*, UNIX+12, HFS~ |
| ACRPATH | UNIX+6~, UNIX+8*, UNIX+9, UNIX+10, UNIX+23 |
| ACRSTATE | GET+3~, GET+13*, GET+14*, GET+19 |
| ACRTYP | GET+3~, GET+16*, GET+19 |
| ACRVND | GET+3~, GET+4*, GET+5*, GET+7, GET+8, GET+9, GET+16, GET+17 |
| ACRYR | EN+2~, EN+5, EN+6, EN+10, YEAR~, YEAR+5*, YEAR+11*, GET~, GET+5, GET+17 , GET+19 |
| ACRYTD | GET+3~, GET+17*, GET+18*, GET+19 |
| ACRZIP | GET+3~, GET+15*, GET+19 |
| DIR | YEAR+3~, FILE+3~ |
| DIR("?" | FILE+7* |
| DIR("A" | YEAR+7*, FILE+6* |
| DIR("B" | YEAR+8* |
| DIR(0 | YEAR+6*, FILE+5* |
| DIRUT | YEAR+3~, YEAR+10, FILE+3~, FILE+9 |
| DT | YEAR+8 |
| DTOUT | YEAR+3~, YEAR+10, FILE+3~, FILE+9 |
| DUOUT | YEAR+3~, YEAR+10, FILE+3~, FILE+9 |
| I | UNIX+6~, UNIX+14*, UNIX+15*, UNIX+17, TXT+2~, TXT+3* |
| IO | HFS+11 |
| J | UNIX+6~, UNIX+18*, UNIX+19 |
| U | GET+7, GET+8, GET+10, GET+11, GET+12, GET+13, GET+14, GET+15, GET+16, GET+17 , GET+19, UNIX+18, UNIX+19 |
| X | YEAR+3~, UNIX+6~, UNIX+19*, UNIX+20, WRITE~, WRITE+3, FILE+3~, TXT+2~, TXT+3* |
| Y | YEAR+3~, YEAR+11, FILE+3~, FILE+10 |
| Name | Field # of Occurrence |
|---|---|
| $T(DESC+I | TXT+3 |