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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACRFPUTL

Package: Commitment Register

Routine: ACRFPUTL


Information

ACRFPUTL ;IHS/OIRM/DSD/THL,AEF - PRINT VENDOR DATA; [ 09/06/2006 9:44 AM ]

Source Information

Source file <ACRFPUTL.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Commitment Register 3 DIR^ACRFDIC  PAUSE^ACRFWARN  ^ACRFZIS  
VA Fileman 1 EN1^DIP  

Entry Points

Name Comments DBIA/ICR reference
VENDOR ;EP;TO PRINT VENDOR LISTINGS
ZIS
G ;;
ZIS1
V11
CHOICE
V1 ;
EXIT
V ;;
PRINT
DISPLAY
LOOP

External References

Name Field # of Occurrence
DIR^ACRFDIC VENDOR+9, CHOICE+5, CHOICE+12
PAUSE^ACRFWARN V1+28
^ACRFZIS ZIS1
EN1^DIP PRINT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: VENDOR+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CHOICE+4
Function Call: WRITE
  • Prompt: !!," Choose one or more sort criterion:"
  • Line Location: DISPLAY+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: V11+0
Function Call: WRITE
  • Prompt: !?20,"IHS ARMS CONTRACTOR LISTING"
  • Line Location: V11+0
Function Call: WRITE
  • Prompt: !,"==============================================================================="
  • Line Location: V11+1
Function Call: WRITE
  • Prompt: !
  • Line Location: V11+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACRCC( V1+12
^ACRF( V1+6, V1+7, V1+8, V1+9
^ACRF("O" V1+3, V1+5
^ACRFC( V1+13
^DIC(5 - [#5] V1+24, V1+26

Label References

Name Line Occurrences
CHOICE VENDOR+12
DISPLAY CHOICE
EXIT VENDOR+12
LOOP CHOICE+8
V11 V1+1, V1+29
ZIS LOOP+11

Naked Globals

Name Field # of Occurrence
^(0 V1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACR EXIT!, V1+2*, V1+3*, V1+5
ACRBY EXIT!, LOOP+8*, PRINT+4
>> ACRCC V1+10*, V1+12*, V1+14
>> ACRDA V1+4*, V1+5*, V1+6, V1+7, V1+8, V1+9
ACRDATA EXIT!, LOOP+2*, LOOP+3, LOOP+4, LOOP+5, DISPLAY+3*, DISPLAY+4, DISPLAY+5
ACRDATA( LOOP+2, DISPLAY+5*, DISPLAY+6, DISPLAY+7
ACRDIC EXIT!, VENDOR+2*, PRINT+1
>> ACRDT V1+7*, V1+16, V1+17, V1+18, V1+20, V1+21, V1+22, V1+23, V1+24, V1+25
, V1+26
>> ACRENT V1+14*, V1+15*, V1+19
>> ACRFC V1+11*, V1+13*, V1+14
>> ACRFLDS VENDOR+3*, CHOICE+14*, PRINT+2
ACRFR EXIT!, LOOP+9*, PRINT+5
ACRI EXIT!, CHOICE+1, LOOP+1*, LOOP+2, DISPLAY+2*, DISPLAY+5, DISPLAY+6, DISPLAY+7
>> ACRIHS1 V1+9*, V1+10, V1+11
>> ACROUT VENDOR+10, CHOICE+13, V1+3
ACRQUIT EXIT!, VENDOR+10, CHOICE+6*, CHOICE+13, DISPLAY+2, DISPLAY+4*, DISPLAY+8!, V1+3
>> ACRRTN ZIS*
ACRTO EXIT!, LOOP+10*, PRINT+6
ACRTYPE EXIT!, VENDOR+1*, CHOICE+8
ACRX EXIT!, VENDOR+4*, CHOICE+7*, LOOP+1, LOOP+2, LOOP+6*, LOOP+7
ACRY EXIT!
BY EXIT!, LOOP*, LOOP+3*, LOOP+8, PRINT+4*
DA EXIT!
DIC EXIT!, PRINT+1*
>> DIOEND PRINT+3*
>> DIR("A" VENDOR+6*, CHOICE+2*, CHOICE+10*
>> DIR("B" VENDOR+7*, CHOICE+3*, CHOICE+11*
>> DIR(0 VENDOR+5*, CHOICE+1*, CHOICE+9*
>> DIS(0 VENDOR+11*, PRINT+7*
DR EXIT!
FLDS EXIT!, PRINT+2*
FR EXIT!, LOOP*, LOOP+4*, LOOP+9, PRINT+5*
IOF V11
ION PRINT
IOP PRINT*, PRINT+9!
IOSL V1+27
IOST V1+28
TO EXIT!, LOOP*, LOOP+5*, LOOP+10, PRINT+6*
U CHOICE+6, LOOP+3, LOOP+4, LOOP+5, DISPLAY+6, DISPLAY+7, V1+6, V1+11, V1+12, V1+13
, V1+16, V1+17, V1+18, V1+20, V1+21, V1+22, V1+23, V1+24, V1+25, V1+26
>> X CHOICE+6
>> Y VENDOR+11, CHOICE+7, CHOICE+14
>> ZTDESC ZIS+1*

Marked Items

Name Field # of Occurrence
$T(@ACRTYPE+ACRI DISPLAY+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All