Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACRFFF2

Package: Commitment Register

Routine: ACRFFF2


Information

ACRFFF2 ;IHS/OIRM/DSD/AEF - PRODUCE FLAT FILE OF ITEMS ORDERED [ 10/27/2004 4:18 PM ]

Source Information

Source file <ACRFFF2.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Commitment Register 5 $$ARMSDIR^ACRFSYS  ($$DOL,$$SLDATE)^ACRFUTL  $$FYFUN^ACRFUTL1  PAUSE^ACRFWARN  (CLOSE,HFS)^ACRFZISH  
VA Fileman 2 ^DIC  ^DIR  
IHS VA Utilities 1 ^XBKVAR  
Kernel 1 HOME^%ZIS  

Entry Points

Name Comments DBIA/ICR reference
OCC(ACROCC)
EN ;EP -- MAIN ENTRY POINT
DATE(ACRDATES)
UNIX(ACRFILE)
ITEMS(ACRDOCDA,ACROCC,ACRDATE)
GET(ACRDATES,ACROCC,ACRLOC)
DLOOP ;----- DATE LOOP
HFS(ACROUT,%FILE,ACRDIR,ACRFILE)
WRITE(X) ;----- FORMAT AND WRITE DATA TO FLAT FILE ;ACR*2.1*13.06 IM14144
LOC(ACRLOC)
TXT ;----- PRINT OPTION TEXT
FILE(ACRFILE)
DESC ;----- ROUTINE DESCRIPTION

External References

Name Field # of Occurrence
HOME^%ZIS EN+5
$$ARMSDIR^ACRFSYS HFS+4
$$DOL^ACRFUTL ITEMS+51
$$SLDATE^ACRFUTL ITEMS+48
$$FYFUN^ACRFUTL1 ITEMS+16
PAUSE^ACRFWARN EN+27, EN+35
CLOSE^ACRFZISH UNIX+22
HFS^ACRFZISH HFS+8
^DIC LOC+5
^DIR DLOOP+7, DLOOP+12, OCC+6, FILE+10
^XBKVAR EN+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " please wait..."
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !!,"No data found"
  • Line Location: EN+26
Function Call: WRITE
  • Prompt: !
  • Line Location: UNIX+18
Function Call: WRITE
  • Prompt: !!,ACRCNT_" Records have been put into UNIX file /usr/spool/afsdata/"_ACRFILE
  • Line Location: UNIX+19
Function Call: WRITE
  • Prompt: !!,ACRCNT_" Records have been put into file "_ACRDIR_ACRFILE
  • Line Location: UNIX+21
Function Call: WRITE
  • Prompt: """"
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: Y
  • Line Location: WRITE+5
Function Call: WRITE
  • Prompt: """"
  • Line Location: WRITE+6
Function Call: WRITE
  • Prompt: ","
  • Line Location: WRITE+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DLOOP+3
Function Call: WRITE
  • Prompt: *7,!?5,"ENDING DATE cannot be less than BEGINNING DATE"
  • Line Location: DLOOP+17
Function Call: WRITE
  • Prompt: "CANNOT OPEN FILE "_ZISH1_ZISH2
  • Line Location: FILE+23
Function Call: WRITE
  • Prompt: !,X
  • Line Location: TXT+2
Routine Call
  • %ZIS
  • Line Location:
    • EN+5
Routine Call
  • DIC
  • Line Location:
    • LOC+5
Routine Call
  • DIR
  • Line Location:
    • DLOOP+7
    • DLOOP+12
    • OCC+6
    • FILE+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTTLCOD - [#9999999.66] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACRDOC - [#9002196] GET+11, ITEMS+39, ITEMS+44
^ACRDOC("DT" GET+8
^ACRDOC("S" GET+10
^ACRITEM - [#9002195] ITEMS+38
^ACRLOCB - [#9002188] GET+17, ITEMS+17
^ACRSS - [#9002193] ITEMS+6, ITEMS+19, ITEMS+26, ITEMS+32, ITEMS+37
^ACRSS("C" ITEMS+5
^ACRUI - [#9002190.6] ITEMS+30
^AUTTCAN - [#9999999.57] ITEMS+14
^AUTTDOCR - [#9999999.63] GET+14
^AUTTOBJC - [#9999999.59] ITEMS+10
^AUTTPRG - [#9999999.62] ITEMS+18
^AUTTVNDR - [#9999999.11] ITEMS+45
^TMP("ACR" EN+25, EN+31!, GET+4!, ITEMS+53*, UNIX+5, UNIX+12, UNIX+14, UNIX+15

Label References

Name Line Occurrences
DATE EN+9
DLOOP DLOOP+16
FILE EN+18
GET EN+23
HFS UNIX+7
ITEMS GET+19
LOC EN+15
OCC EN+12
TXT EN+7
UNIX EN+29
WRITE UNIX+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%FILE UNIX+4~, UNIX+7, UNIX+9, HFS~, HFS+8, HFS+9
ACRBEG GET+3~, GET+5*, GET+7, DLOOP+2~, DLOOP+10*, DLOOP+16, DLOOP+18
ACRCAN ITEMS+3~, ITEMS+13*, ITEMS+14*, ITEMS+52
ACRCNT UNIX+4~, UNIX+10*, UNIX+16*, UNIX+21
ACRCOST ITEMS+3~, ITEMS+31*, ITEMS+51
ACRDATA GET+3~, GET+11*, GET+12, GET+13, GET+16, ITEMS+3~, ITEMS+6*, ITEMS+7*, ITEMS+8, ITEMS+13
, ITEMS+15, ITEMS+19*, ITEMS+20*, ITEMS+21, ITEMS+22, ITEMS+23, ITEMS+24, ITEMS+25, ITEMS+26*, ITEMS+27*
, ITEMS+28, ITEMS+29, ITEMS+31, ITEMS+32*, ITEMS+33*, ITEMS+34, ITEMS+35, ITEMS+39*, ITEMS+40*, ITEMS+41
, ITEMS+42, ITEMS+43, ITEMS+48*, ITEMS+49*, ITEMS+50*, ITEMS+51*, ITEMS+52*, ITEMS+53
ACRDATE GET+3~, GET+7*, GET+8*, GET+10, GET+19, ITEMS~, ITEMS+48
ACRDATES EN+2~, EN+9, EN+10, EN+23, GET~, GET+5, GET+6, DATE~, DLOOP+18*
ACRDEPT ITEMS+3~, ITEMS+15*, ITEMS+16, ITEMS+17*, ITEMS+18*, ITEMS+52
ACRDESC1 ITEMS+3~, ITEMS+21*, ITEMS+49
ACRDESC2 ITEMS+3~, ITEMS+22*, ITEMS+50
ACRDESC3 ITEMS+3~, ITEMS+23*, ITEMS+50
ACRDESC4 ITEMS+3~, ITEMS+24*, ITEMS+50
ACRDESC5 ITEMS+3~, ITEMS+25*, ITEMS+50
ACRDIR UNIX+4~, UNIX+7, UNIX+21, HFS~, HFS+4*, HFS+5, HFS+8
ACRDOCDA GET+3~, GET+9*, GET+10*, GET+11, GET+19, ITEMS~, ITEMS+5, ITEMS+39, ITEMS+44, ITEMS+53
, UNIX+4~, UNIX+11*, UNIX+12*, UNIX+14, UNIX+15
ACRDOCNO ITEMS+3~, ITEMS+41*, ITEMS+48
ACREND GET+3~, GET+6*, GET+8, DLOOP+2~, DLOOP+15*, DLOOP+16, DLOOP+18
ACRFILE EN+2~, EN+18, EN+19, EN+29, UNIX~, UNIX+7, UNIX+21, FILE~, FILE+4*, FILE+12*
, HFS~, HFS+6
ACRFY ITEMS+3~, ITEMS+16*, ITEMS+52
ACRID ITEMS+3~, ITEMS+43*, ITEMS+48
ACRITMDA ITEMS+3~, ITEMS+4*, ITEMS+5*, ITEMS+6, ITEMS+19, ITEMS+26, ITEMS+32, ITEMS+37, ITEMS+53, UNIX+4~
, UNIX+13*, UNIX+14*, UNIX+15
ACRLOC EN+2~, EN+15, EN+16, EN+23, GET~, GET+18, LOC~, LOC+8*
>> ACRLOCDA GET+16*, GET+17*, GET+18
ACRNSN ITEMS+3~, ITEMS+35*, ITEMS+36, ITEMS+37*, ITEMS+38*, ITEMS+49
ACROCC EN+2~, EN+12, EN+13, EN+23, GET~, GET+19, ITEMS~, ITEMS+11, ITEMS+12, OCC~
, OCC+8*
ACROCCC ITEMS+3~, ITEMS+10*, ITEMS+11, ITEMS+12, ITEMS+52
ACROCCDA ITEMS+3~, ITEMS+8*, ITEMS+9, ITEMS+10
ACRORDNO ITEMS+3~, ITEMS+34*, ITEMS+49
ACROUT EN+2~, UNIX+4~, UNIX+7, UNIX+8, HFS~, HFS+9*
ACRPO ITEMS+3~, ITEMS+42*, ITEMS+48
ACRQTY ITEMS+3~, ITEMS+28*, ITEMS+51
ACRREF GET+3~, GET+13*, GET+14*, GET+15
ACRUI ITEMS+3~, ITEMS+29*, ITEMS+30*, ITEMS+51
ACRVEND ITEMS+3~, ITEMS+44*, ITEMS+45*, ITEMS+49
>> DIC LOC+3*
>> DIC(0 LOC+4*
DIR DLOOP+2~, FILE+3~
DIR("?" DLOOP+6*, OCC+5*, FILE+9*
DIR("A" DLOOP+5*, DLOOP+11*, OCC+4*, FILE+7*
DIR(0 DLOOP+4*, OCC+3*, FILE+5*
DIRUT DLOOP+2~, DLOOP+8, DLOOP+13, OCC+7, FILE+3~, FILE+11
DTOUT DLOOP+2~, DLOOP+8, DLOOP+13, OCC+7, LOC+6, FILE+3~, FILE+11
DUOUT DLOOP+2~, DLOOP+8, DLOOP+13, OCC+7, LOC+6, FILE+3~, FILE+11
>> I WRITE+2*, WRITE+3, TXT+2*
U GET+5, GET+6, GET+12, GET+13, GET+14, GET+16, GET+17, ITEMS+8, ITEMS+10, ITEMS+13
, ITEMS+14, ITEMS+15, ITEMS+17, ITEMS+18, ITEMS+21, ITEMS+22, ITEMS+23, ITEMS+24, ITEMS+25, ITEMS+28
, ITEMS+29, ITEMS+30, ITEMS+31, ITEMS+34, ITEMS+35, ITEMS+37, ITEMS+38, ITEMS+41, ITEMS+42, ITEMS+43
, ITEMS+44, ITEMS+45, ITEMS+48, ITEMS+49, ITEMS+50, ITEMS+51, ITEMS+52, WRITE+2, WRITE+3, DLOOP+18
X UNIX+4~, UNIX+15*, UNIX+17, WRITE~, WRITE+2, WRITE+3, DLOOP+2~, FILE+3~, HFS+3~, TXT+2*
Y WRITE+3*, WRITE+5, DLOOP+2~, DLOOP+9, DLOOP+10, DLOOP+14, DLOOP+15, OCC+8, LOC+7, LOC+8
, FILE+3~, FILE+12, HFS+3~
ZISH2 HFS+3~, HFS+6*, HFS+8
ZISH3 HFS+3~, HFS+7*, HFS+8

Marked Items

Name Field # of Occurrence
$T(DESC+I TXT+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All