Routine: ACRFEA42

Information

ACRFEA42 ;IHS/OIRM/DSD/THL,AEF - EDIT FINANCIAL DATA - CON'T; [ 03/28/2007 9:44 AM ]

Source Information

Source file <ACRFEA42.m>

Call Graph

Call Graph Total: 17

Package	Total	Call Graph
Commitment Register	16	SCREEN^ACRFAU (BAPPEND,DOCBOIL)^ACRFBOIL DIE^ACRFDIC (EN,SUBSET)^ACRFDTP2 SETDOC^ACRFEA1 (EDIE,EDIE1,OUT)^ACRFEA2 APPROVE^ACRFEA21 ^ACRFPAPV PSC^ACRFPO1 REQ^ACRFQ PRINT^ACRFSHIP COURSE^ACRFSS3 $$VENDOR^ACRFUFMU DISP^ACRFVLK PAUSE^ACRFWARN ^ACRPDS
VA Fileman	1	^DIC

Caller Graph

Caller Graph Total: 8

Package	Total	Caller Graph
Commitment Register	8	ACRFEA1 ACRFEA4 ACRFEA41 ACRFPAPV ACRFPO1 ACRFPRC1 ACRPRQS ACRPRQT

Entry Points

Name	Comments	DBIA/ICR reference
PR	;EP;TO PRINT DOCUMENT DURING DATA ENTRY/EDIT
DISP	;EP;TO DISPLAY FINANCIAL ACCOUNT DATA
NJ	;EP;EDIT NARRATIVE OR JUSTIFICATION
CR1
PDOCSTAT	;EP;TO PRINT DOCUMENT STATUS REPORT
ASUM	;EP;TO PRINT ACCOUNT SUMMARY
RV2	;S DIR("A")="Enter/Edit Requested Vendor? " ;ACR2.122.11l
FINDVND	; Ask / Lookup Vendor ;ACR2.122.11l NEW SUBROUTINE
RS	;EP;TO REVIEW STATUS OF DOCUMENT
RV	;EP;TO ENTER REQUESTED VENDOR DATA
BP1
AP	;EP;SEND DOCUMENT FOR APPROVAL
RV1	;EP;TO ENTER REQUESTED VENDOR DATA ;HEAVILY MODIFIED TO ALLOW SELECTION ONLY;ACR2.122.11l
BP	;EP;
QD	;EP;EDIT QUANTITY DISCOUNT INFO
ATTACH	;EP;TO INDICATE NUMBER OF ATTACHMENTS
CR	;EP;CHANGE TYPE OF REQUEST
DOCSTAT	;EP;TO EDIT THE STATUS OF THE DOCUMENT IN PROCUREMENT PROCESSING

External References

Name	Field # of Occurrence
SCREEN^ACRFAU	NJ+3
BAPPEND^ACRFBOIL	BP+1
DOCBOIL^ACRFBOIL	BP1
DIE^ACRFDIC	QD+4, CR1+2, CR1+7, CR1+11, RV1+12, RV1+32, ATTACH+5, DOCSTAT+6
EN^ACRFDTP2	ASUM+7
SUBSET^ACRFDTP2	ASUM+8
SETDOC^ACRFEA1	RS+2
EDIE^ACRFEA2	NJ+9
EDIE1^ACRFEA2	NJ+8
OUT^ACRFEA2	PR+5, CR+2, BP+3
APPROVE^ACRFEA21	AP+1
^ACRFPAPV	RS+5
PSC^ACRFPO1	PR+9
REQ^ACRFQ	PR+18
PRINT^ACRFSHIP	PR+8
COURSE^ACRFSS3	NJ+1
$$VENDOR^ACRFUFMU	FINDVND+7
DISP^ACRFVLK	RV1+13
PAUSE^ACRFWARN	ASUM+11, RV1+21
^ACRPDS	PDOCSTAT+6
^DIC	FINDVND+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"ACCOUNT SUMMARY YEAR-TO-DATE:" Line Location: ASUM+5
Function Call: WRITE	Prompt: !,"----------------------------------" Line Location: ASUM+6
Function Call: WRITE	Prompt: @ACRX Line Location: ASUM+10
Function Call: WRITE	Prompt: ! Line Location: RV2+4
Function Call: WRITE	Prompt: !!,"You did not select a Vendor from the Standard Vendor table." Line Location: RV1+29
Function Call: WRITE	Prompt: !,"You may enter data on the requested Vendor." Line Location: RV1+30
Function Call: WRITE	Prompt: ! Line Location: RV1+31
Function Call: WRITE	Prompt: @IOF Line Location: DISP+1
Function Call: WRITE	Prompt: ?20,"Current data:" Line Location: DISP+2
Function Call: WRITE	Prompt: ! Line Location: DISP+3
Function Call: WRITE	Prompt: ! Line Location: ATTACH+4
Function Call: WRITE	Prompt: !!,"Describe below the current status of this document in procurement." Line Location: DOCSTAT+1
Function Call: WRITE	Prompt: ! Line Location: DOCSTAT+2
Function Call: WRITE	Prompt: !!,"Procurement status report:" Line Location: PDOCSTAT+3
Routine Call	DIC Line Location: FINDVND+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACROBL - [#9002189]	Classic Fileman Calls
^ACRDOC - [#9002196]	Classic Fileman Calls
^AUTTVNDR - [#9999999.11]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRDOC - [#9002196]	RV1+15, RV1+16, RV1+17, RV1+18, PDOCSTAT+2
^ACRSS("C"	AP+1
^AUTTDOCR("B"	PR+15

Label References

Name	Line Occurrences
@(	DISP+7
DISP	NJ+4
FINDVND	RV1+3
RV2	RV+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR0	ASUM+10
>> ACR16	ASUM+10
>> ACR17	ASUM+10
>> ACR2	ASUM+10
>> ACR5	ASUM+10
ACRCSI	RS+4*, RS+6!
>> ACRDIE	NJ+2*
>> ACRDISDX	ASUM+2*
>> ACRDOC0	ASUM+4, RV1+15*
>> ACRDOCDA	NJ+6, QD+1, AP+1, CR1, CR1+4, CR1+8, RV1+6, RV1+15, RV1+16, RV1+17 , RV1+18, DISP+6, ATTACH+1, RS+1, DOCSTAT+3, PDOCSTAT+1, PDOCSTAT+2, PDOCSTAT+5, FINDVND+7
>> ACRDR	NJ+2*
>> ACRENTR1	ASUM+1*
>> ACRENTRY	PR+1, PR+17, NJ+7*
>> ACRGREF	ASUM+3*
ACRI	NJ+5~
>> ACROBLAP	PR+2, CR1+3
ACROUT	PR+1, PR+3, PR+6, PR+10, AP+2!, CR+3, BP+4, RV+1
>> ACRPOTC	PR+7*
>> ACRPRCS	AP+1
ACRPRT	PR+12*, PR+19!, AP+2!
ACRQUIT	PR+6, PR+11!, PR+20!, AP+2!, CR+3, BP+4, RV+1, RV+2!, RV1+4, RV1+14* , FINDVND+3, FINDVND+11
>> ACRREF	PR+13, PR+14*, PR+15, PR+17, NJ+1, RV1+8, RV1+16, RV1+17, DISP+5, RS+3
>> ACRREFDA	PR+15*
>> ACRREFX	PR+9, PR+17, NJ+2, RS+3
ACRREQST	PR+12*, PR+19!
ACRREV	PR+13, PR+16~, AP+1, ASUM+11
>> ACRRTN	DISP+5*, DISP+7
ACRSCREN	NJ+4, NJ+8, RV1+27, RV1+28!
>> ACRSS6	PR+1
>> ACRTXDA	PR+2, PR+3, CR1+3, CR1+6, CR1+10
>> ACRVND	RV1+10, FINDVND+7, FINDVND+8, FINDVND+12
>> ACRVND(0	FINDVND+13*
ACRX	ASUM+9~, ASUM+10*
>> ACRY	PR+7, ASUM+4*, CR+4, BP+5
>> ACRZDA	NJ+6*, DISP+6
D	FINDVND+2!
>> D0	DISP+6, RS+1, PDOCSTAT+5*
DA	QD+1, ASUM+4, CR1, CR1+4, CR1+8, RV1+6, ATTACH+1, DOCSTAT+3, FINDVND+2!
DC	DISP+4~, PDOCSTAT+4~
DD	FINDVND+2!
DIC	FINDVND+2!, FINDVND+4*
DIC("A"	FINDVND+6*
DIC("B"	FINDVND+8*
DIC("S"	FINDVND+9*
DIC(0	FINDVND+5*
>> DIE	QD+2, CR1+1, CR1+5, CR1+9, RV1+7, ATTACH+2, DOCSTAT+4*
DINUM	FINDVND+2!
DIP	DISP+4~, PDOCSTAT+4~
>> DIR("A"	PR+4, CR+1, BP+2*
DLAYGO	FINDVND+2!
DN	DISP+4~, PDOCSTAT+4~
DO	FINDVND+2!
DR	QD+3, CR1, CR1+6, CR1+10, RV1+8, RV1+10, ATTACH+3, DOCSTAT+5, FINDVND+2!
DXS	DISP+4~, PDOCSTAT+4~
IOF	DISP+1, FINDVND+1
IOST	ASUM+11
U	PR+2, NJ+2, ASUM+4, CR1+3, RV1+16, RV1+18
X	FINDVND+2!
Y	FINDVND+2!, FINDVND+11, FINDVND+12
Y(0	FINDVND+13

Customize PDF page

Package: Commitment Register

Routine: ACRFEA42

Call Graph Total: 17

Caller Graph Total: 8