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 |