ACRFFF4 ;IHS/OIRM/DSD/AEF - PRODUCE FLAT FILE OF TRAINING INFORMATION [ 09/23/2005 4:18 PM ]
Source file <ACRFFF4.m>
| Package | Total | Call Graph | 
|---|---|---|
| Commitment Register | 4 | $$ARMSDIR^ACRFSYS $$SLDATE^ACRFUTL $$NAME2^ACRFUTL1 PAUSE^ACRFWARN | 
| Kernel | 3 | HOME^%ZIS ^%ZISC OPEN^%ZISH | 
| VA Fileman | 2 | ^%DT ^DIR | 
| IHS VA Utilities | 1 | ^XBKVAR | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CAN(ACRDOCDA) | ||
| HFS(ACROUT,%FILE,ACRFILE) | ||
| CITY(X) | ;----- RETURNS EXTERNAL ARMS PER DIEM CITY^STATE | |
| UNIX(ACRFILE) | ||
| TITLE(X) | ;----- RETURNS TRAINING COURSE TITLE | |
| STAT(ACRDOCDA) | ||
| TVLT(X) | ;----- RETURNS EXTERNAL TRAVEL TO CITY^STATE | |
| ODSA(X) | ;----- RETURNS OFFICIAL DUTY STATION AREA | |
| ASUFAC(D0) | ||
| GET(ACRDATES) | ||
| SER(X) | ;----- RETURNS SERIES OF TRAVELER | |
| FILE(ACRFILE) | ||
| TXT | ;----- PRINT OPTION TEXT | |
| PAYPLAN(X) | ;----- RETURNS PAY PLAN OF TRAVELER | |
| BEG(X) | ;----- RETURNS TRAINING BEGIN DATE | |
| EN | ;EP -- MAIN ENTRY POINT | |
| DT(X) | ;----- RETURNS FM DATE | |
| AMTS(ACRDOCDA) | ||
| DOCNO(X) | ;----- RETURNS DOCUMENT NUMBER | |
| ODS(X) | ;----- RETURNS OFFICIAL DUTY STATION | |
| LOC(X) | ;----- RETURN INTERNAL LOCATION IEN OF TRAVELER OFFICIAL DUTY STATION | |
| TVLF(X) | ;----- RETURNS EXTERNAL TRAVEL FROM CITY^STATE | |
| DESC | ;----- ROUTINE DESCRIPTION | |
| END(X) | ;----- RETURNS TRAINING END DATE | |
| SEX(X) | ;----- RETURNS GENDER | |
| NAME(ACRDOCDA) | ||
| HRS(X) | ;----- RETURNS TRAINING HOURS (DUTY) | |
| DLOOP | ;----- DATE LOOP | |
| WRITE(X) | ; | |
| DATES(ACRDATES) | ||
| GRADE(X) | ;----- RETURNS GRADE OF TRAVELER | |
| ONE(ACRDOCDA) | 
| 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 | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ACRAU - [#9002185.3] | LOC+6, ODS+6, ODSA+6, PAYPLAN+6, GRADE+6, SER+6 | 
| ^ACRCAN - [#9002186.5] | CAN+6 | 
| ^ACRDOC - [#9002196] | GET+10, ONE+12, ONE+13, ONE+16, CAN+5, NAME+5, AMTS+6, DOCNO+6, TVLF+6, TVLT+6 , TVLT+7, BEG+6, END+6, TITLE+6, HRS+6 | 
| ^ACRDOC("REF" | GET+9 | 
| ^ACROBL - [#9002189] | STAT+4 | 
| ^ACRPD - [#9002193.9] | CITY+6 | 
| ^ACRSS - [#9002193] | AMTS+10, AMTS+12, AMTS+14 | 
| ^ACRSS("C" | AMTS+9 | 
| ^AUTTAREA - [#9999999.21] | ODSA+8 | 
| ^AUTTCAN - [#9999999.57] | CAN+7 | 
| ^AUTTDOCR("B" | GET+7 | 
| ^AUTTLOC - [#9999999.06] | ODS+7, ODSA+7 | 
| ^DD(9999999.06 | ASUFAC+7 | 
| ^DIC(4 - [#4] | ODS+8 | 
| ^DIC(5 - [#5] | CITY+9 | 
| ^TMP("ACR" | EN+19, GET+5!, ONE+40, ONE+41, ONE+48, ONE+49, ONE+50, ONE+51, ONE+54*, ONE+56 , ONE+57*, ONE+59, ONE+69*, UNIX+4, UNIX+10, UNIX+11, AMTS+16* | 
| ^VA(200 - [#200] | SEX+6 | 
| Name | Line Occurrences | 
|---|---|
| $$ASUFAC | ONE+25 | 
| $$BEG | ONE+35 | 
| $$CAN | ONE+26 | 
| $$CITY | TVLF+7, TVLT+8 | 
| $$DOCNO | ONE+11 | 
| $$DT | ONE+60, ONE+61 | 
| $$END | ONE+36 | 
| $$GRADE | ONE+33 | 
| $$HRS | ONE+38 | 
| $$LOC | ONE+25 | 
| $$NAME | ONE+28 | 
| $$ODS | ONE+29 | 
| $$ODSA | ONE+30 | 
| $$PAYPLAN | ONE+32 | 
| $$SER | ONE+34 | 
| $$SEX | ONE+31 | 
| $$STAT | ONE+52 | 
| $$TITLE | ONE+37 | 
| $$TVLF | ONE+44, ONE+45 | 
| $$TVLT | ONE+46, ONE+47 | 
| AMTS | ONE+19, ONE+20 | 
| DATES | EN+9 | 
| DLOOP | DLOOP+17 | 
| FILE | EN+12 | 
| GET | EN+17 | 
| HFS | UNIX+5 | 
| ONE | GET+13 | 
| TXT | EN+7 | 
| UNIX | EN+23 | 
| WRITE | UNIX+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> %DT | DT+5* | 
| %FILE | UNIX+3~, UNIX+5, UNIX+7, HFS~, HFS+13* | 
| ACRAMT | AMTS+4~, AMTS+13*, AMTS+15*, AMTS+16 | 
| >> ACRATT | ONE+12*, ONE+25, ONE+29, ONE+30, ONE+31, ONE+32, ONE+33, ONE+34 | 
| ACRBEG | DLOOP+2~, DLOOP+10*, DLOOP+17, DLOOP+19 | 
| ACRCNT | UNIX+3~, UNIX+8*, UNIX+12*, UNIX+15 | 
| ACRD0 | AMTS+4~, AMTS+8*, AMTS+9*, AMTS+10, AMTS+12, AMTS+14 | 
| ACRDATA | GET+3~, GET+10*, GET+11, GET+12, AMTS+4~, AMTS+12*, AMTS+13, AMTS+15 | 
| ACRDATES | EN+2~, EN+9, EN+10, EN+17, GET~, GET+11, GET+12, DATES~, DLOOP+19* | 
| ACRDOCDA | GET+3~, GET+8*, GET+9*, GET+10, GET+13, ONE~, ONE+11, ONE+12, ONE+13, ONE+19 , ONE+26, ONE+28, ONE+35, ONE+36, ONE+37, ONE+38, ONE+52, UNIX+3~, UNIX+9*, UNIX+10* , UNIX+11, CAN~, CAN+5, NAME~, NAME+5, AMTS~, AMTS+6, AMTS+9, STAT~, STAT+4 | 
| ACRDOCNO | GET+3~, ONE+9~, ONE+11*, ONE+27, ONE+39, ONE+40, ONE+41, ONE+54, ONE+56, ONE+57 , ONE+59, ONE+69, AMTS+4~, AMTS+6*, AMTS+7, AMTS+16 | 
| ACREND | DLOOP+2~, DLOOP+16*, DLOOP+17, DLOOP+19 | 
| ACRFILE | EN+2~, EN+12, EN+13, EN+23, UNIX~, UNIX+5, UNIX+15, FILE~, FILE+4*, FILE+10* , HFS~, HFS+7 | 
| ACRKW | AMTS+4~, AMTS+10*, AMTS+11, AMTS+16 | 
| ACROUT | UNIX+3~, UNIX+5, UNIX+6, HFS~, HFS+12* | 
| ACRREF | GET+3~, GET+7*, GET+9 | 
| ACRTODA | ONE+9~, ONE+13*, ONE+15, ONE+16, ONE+20, ONE+44, ONE+45, ONE+46, ONE+47 | 
| ACRTONO | GET+3~, ONE+9~, ONE+14*, ONE+16*, ONE+42, ONE+43, ONE+48, ONE+49, ONE+50, ONE+51 | 
| D0 | ASUFAC~, ASUFAC+7 | 
| DIR | DLOOP+2~, FILE+3~ | 
| DIR("?" | DLOOP+6*, DLOOP+12*, FILE+7* | 
| DIR("A" | DLOOP+5*, DLOOP+11*, FILE+6* | 
| DIR(0 | DLOOP+4*, FILE+5* | 
| DIRUT | DLOOP+2~, DLOOP+8, DLOOP+14, FILE+3~, FILE+9 | 
| DTOUT | DLOOP+2~, DLOOP+8, DLOOP+14, FILE+3~, FILE+9 | 
| DUOUT | DLOOP+2~, DLOOP+8, DLOOP+14, FILE+3~, FILE+9 | 
| I | WRITE+3~, WRITE+5*, WRITE+6, TXT+2~, TXT+3* | 
| IO | HFS+13 | 
| POP | HFS+3~, HFS+10 | 
| U | GET+11, GET+12, ONE+12, ONE+13, ONE+16, ONE+25, ONE+26, ONE+27, ONE+28, ONE+29 , ONE+30, ONE+31, ONE+32, ONE+33, ONE+34, ONE+35, ONE+36, ONE+37, ONE+38, ONE+40 , ONE+41, ONE+43, ONE+44, ONE+45, ONE+46, ONE+47, ONE+48, ONE+49, ONE+50, ONE+51 , ONE+52, ONE+60, ONE+61, ONE+62, ONE+63, ONE+64, ONE+65, ONE+66, ONE+67, WRITE+5 , WRITE+6, DLOOP+19, LOC+6, ASUFAC+8, CAN+5, CAN+6, CAN+7, NAME+5, AMTS+6, AMTS+10 , AMTS+13, AMTS+14, AMTS+15, STAT+4, DOCNO+6, TVLF+6, TVLT+7, CITY+7, CITY+8, CITY+9 , CITY+10, ODS+6, ODS+7, ODS+8, ODSA+6, ODSA+7, ODSA+8, SEX+6, PAYPLAN+7, GRADE+7 , SER+6, BEG+6, END+6, TITLE+6, HRS+6 | 
| X | UNIX+3~, UNIX+11*, UNIX+13, WRITE~, WRITE+5, WRITE+6, DLOOP+2~, FILE+3~, HFS+3~, LOC~ , LOC+6, AMTS+4~, TXT+2~, TXT+3*, DT~, DOCNO~, DOCNO+6, TVLF~, TVLF+6, TVLT~ , TVLT+6, TVLT+7, CITY~, CITY+6*, CITY+7, CITY+8*, CITY+9*, CITY+10, ODS~, ODS+6 , ODSA~, ODSA+6, SEX~, SEX+6, PAYPLAN~, PAYPLAN+6*, PAYPLAN+7, GRADE~, GRADE+6*, GRADE+7 , SER~, SER+6, BEG~, BEG+6, END~, END+6, TITLE~, TITLE+6, HRS~, HRS+6 | 
| Y | ONE+59*, ONE+60*, ONE+61*, ONE+62*, ONE+63*, ONE+64*, ONE+65*, ONE+66*, ONE+67*, ONE+69 , WRITE+3~, WRITE+6*, WRITE+8, DLOOP+2~, DLOOP+9, DLOOP+10, DLOOP+15, DLOOP+16, FILE+3~, FILE+10 , HFS+3~, LOC+4~, LOC+5*, LOC+6*, LOC+7, ASUFAC+5~, ASUFAC+6*, ASUFAC+8*, ASUFAC+9, CAN+3~ , CAN+4*, CAN+5*, CAN+6*, CAN+7*, CAN+8, NAME+3~, NAME+4*, NAME+5*, NAME+7*, NAME+8 , STAT+3~, STAT+4*, STAT+5*, STAT+6, DT+4~, DT+7, DOCNO+4~, DOCNO+5*, DOCNO+6*, DOCNO+7 , TVLF+4~, TVLF+5*, TVLF+7*, TVLF+8, TVLT+4~, TVLT+5*, TVLT+8*, TVLT+9, CITY+4~, CITY+5* , CITY+7*, CITY+10*, CITY+11, ODS+4~, ODS+5*, ODS+6*, ODS+7*, ODS+8*, ODS+9, ODSA+4~ , ODSA+5*, ODSA+6*, ODSA+7*, ODSA+8*, ODSA+9, SEX+4~, SEX+5*, SEX+6*, SEX+7, PAYPLAN+4~ , PAYPLAN+5*, PAYPLAN+7*, PAYPLAN+8, GRADE+4~, GRADE+5*, GRADE+7*, GRADE+8, SER+4~, SER+5*, SER+6* , SER+7, BEG+4~, BEG+5*, BEG+6*, BEG+7*, BEG+8, END+4~, END+5*, END+6*, END+7* , END+8, TITLE+4~, TITLE+5*, TITLE+6*, TITLE+7, HRS+4~, HRS+5*, HRS+6*, HRS+7 | 
| Y( | ASUFAC+8 | 
| Z | ONE+9~, ONE+25*, ONE+26*, ONE+27*, ONE+28*, ONE+29*, ONE+30*, ONE+31*, ONE+32*, ONE+33* , ONE+34*, ONE+35*, ONE+36*, ONE+37*, ONE+38*, ONE+40*, ONE+41*, ONE+43*, ONE+44*, ONE+45* , ONE+46*, ONE+47*, ONE+48*, ONE+49*, ONE+50*, ONE+51*, ONE+52*, ONE+54, ONE+57, ONE+60 , ONE+61, ONE+62, ONE+63, ONE+64, ONE+65, ONE+66, ONE+67, TVLF+4~, TVLF+6*, TVLF+7 , TVLT+4~, TVLT+6*, TVLT+7*, TVLT+8 | 
| ZISH1 | HFS+3~, HFS+4*, HFS+9 | 
| ZISH2 | HFS+3~, HFS+6*, HFS+9, HFS+11 | 
| ZISH3 | HFS+3~, HFS+7*, HFS+9, HFS+11 | 
| ZISH4 | HFS+3~, HFS+8*, HFS+9 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(DESC+I | TXT+3 |