Routine: ACRFPVEN

Package	Total	Call Graph
Commitment Register	4	(DIE,DIK,DIR,FILE)^ACRFDIC $$JDATE^ACRFIV12 PAUSE^ACRFWARN (CLOSE,HOST)^ACRFZIS
VA Fileman	1	NOW^%DTC

Package

Total

Call Graph

Commitment Register

(DIE,DIK,DIR,FILE)^ACRFDIC $$JDATE^ACRFIV12 PAUSE^ACRFWARN (CLOSE,HOST)^ACRFZIS

VA Fileman

NOW^%DTC

Package	Total	Caller Graph
Commitment Register	2	ACRFEA43 ACRFSS

Package

Total

Caller Graph

Commitment Register

ACRFEA43 ACRFSS

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	IMPORT+8
DIE^ACRFDIC	UP1+10, UP1+14, UP1+18, POS1+28
DIK^ACRFDIC	DOC+10
DIR^ACRFDIC	EN1+6, IMPORT+17, POS1+22
FILE^ACRFDIC	IMPORT+57, UP1+6
$$JDATE^ACRFIV12	IMPORT+12
PAUSE^ACRFWARN	EN1+13, EN1+19, IMPORT+24, POS1+10, POS1+16
CLOSE^ACRFZIS	CLOSE
HOST^ACRFZIS	IMPORT+28

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: EN1+0
Function Call: WRITE	Prompt: !!?10,"Utility to Import Prime Vendor Purchase Order Data" Line Location: EN1+1
Function Call: WRITE	Prompt: ! Line Location: EN1+5
Function Call: WRITE	Prompt: !!,"Import Complete." Line Location: EN1+11
Function Call: WRITE	Prompt: !!,"NO ITEMS IMPORTED. Import NOT completed." Line Location: EN1+12
Function Call: WRITE	Prompt: ! Line Location: IMPORT+16
Function Call: READ	Timeout: 10 Variable: X Line Location: IMPORT+35
Function Call: WRITE	Prompt: "." Line Location: UP1+19
Function Call: WRITE	Prompt: ! Line Location: POS1+21

FileNo	Call Tags
^ACRSS - [#9002193]	Classic Fileman Calls
^ACRSUP - [#9002194.1]	Classic Fileman Calls
^ACRDOC - [#9002196]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRDOC - [#9002196]	IMPORT+40, UPDATE+11, UP1, POS1+20
^ACRDOC("PVEN"	IMPORT+39, UPDATE+7
^ACRLOCB - [#9002188]	UP1+1
^ACRSUP - [#9002194.1]	UPDATE+4, DOC+5, POS1+3
^ACRSUP("B"	DOC+4
^ACRSUP("C"	UPDATE+3, POS1+2
^ACRSUP("D"	IMPORT+21
^ACRSYS(1	IMPORT+26
^AUTTOBJC("B"	UP1+9
^TMP("ACRPV"	POSEXIT!, POS1+6*, POS1+7, POS1+13
^TMP("ACRSUP"	DOC+1!, DOC+7, DOC+12*, DOC+14!

Name	Line Occurrences
DOC	POS1+29
EN1	EN+1
IMPORT	EN1+9
POS1	POS+2
POSEXIT	POS+1
UP1	UPDATE+12, DOC+13
UPDATE	EN1+16

Name	Field # of Occurrence
^("DT1"	IMPORT+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	IMPORT+10
>> %FN	IMPORT+26*
ACR	EXIT!, UPDATE+2, UPDATE+3, UPDATE+4, UP1+15, DOC+2~, DOC+3, DOC+4, DOC+5, DOC+8 , POS1~, POS1+1, POS1+2, POS1+3, POS1+12, POS1+13, POS1+15, POS1+17
ACR1	EXIT!, IMPORT+36, IMPORT+37, IMPORT+38, IMPORT+39, IMPORT+52, IMPORT+53, UPDATE+6, UPDATE+7, DOC+4 , POS1~, POS1+5, POS1+6, POS1+24*, POS1+27
ACR1(	POS1+17*, POS1+24
ACR2	EXIT!, IMPORT+41*, IMPORT+52, IMPORT+56
ACR3	EXIT!, IMPORT+42*, IMPORT+52, IMPORT+56
ACR4	EXIT!, IMPORT+43*, IMPORT+52, IMPORT+56
ACR5	EXIT!, IMPORT+44, IMPORT+45, IMPORT+52
ACR6	EXIT!, IMPORT+46, IMPORT+47, IMPORT+48, IMPORT+56
ACR7	EXIT!, IMPORT+49, IMPORT+50, IMPORT+56
>> ACRCANDA	UP1+1*, UP1+9
ACRDOC0	EXIT!
ACRDOCDA	EXIT!, IMPORT+39, IMPORT+40, UPDATE+7, UPDATE+8, UPDATE+9, UPDATE+10, UPDATE+11, UP1, UP1+9 , UP1+11, POS1+20, POS1+25
ACRDOCX	EXIT!, UPDATE+1, UPDATE+9, UPDATE+10
ACRI	EN1+11, IMPORT+33~, IMPORT+34, IMPORT+58
ACRJ	POS1~, POS1+11, POS1+14, POS1+15, POS1+16, POS1+17, POS1+18
ACRJDATE	IMPORT+11~, IMPORT+12*, IMPORT+15
ACRLBDA	EXIT!, UP1*, UP1+1, UP1+9
ACRNOW	IMPORT+9~, IMPORT+10*, IMPORT+15
ACROP	EXIT!, IMPORT+27*
ACROUT	EN+1, EXIT!
ACRQUIT	EN+1, EXIT!, EN1+7, EN1+14!, EN1+20!, IMPORT+18, IMPORT+29, IMPORT+32*
ACRX	EXIT!, UPDATE+4, UPDATE+5, UPDATE+6, UP1+4, UP1+9, DOC+5, DOC+6, DOC+7, DOC+12 , POS1~, POS1+3*, POS1+4, POS1+5
ACRXFILE	IMPORT+19~, IMPORT+20*, IMPORT+21, IMPORT+22, IMPORT+26, IMPORT+30, IMPORT+56
>> DA	UP1+7, UP1+11, UP1+15, DOC+8, POS1+25*
>> DIC	IMPORT+54, UP1+2
>> DIC("DR"	IMPORT+56, UP1+4
>> DIC(0	IMPORT+55, UP1+3
>> DIE	UP1+8, UP1+12, UP1+16, POS1+26
>> DIK	DOC+9*
>> DIR("A"	EN1+3, IMPORT+14, POS1+19, POS1+20
>> DIR("B"	EN1+4, IMPORT+15
>> DIR(0	EN1+2, IMPORT+13, POS1+18*
>> DR	UP1+9, UP1+13, UP1+17, POS1+27
DT	IMPORT+12, IMPORT+15
I	IMPORT+25~
IO	IMPORT+35
IOF	EN1
J	IMPORT+25~
U	IMPORT+26, IMPORT+40, UPDATE+5, UPDATE+6, UPDATE+11, UP1, UP1+1, UP1+4, UP1+9, DOC+6 , POS1+4, POS1+5, POS1+20
X	IMPORT+25~, IMPORT+35, IMPORT+36, IMPORT+41, IMPORT+42, IMPORT+43, IMPORT+44, IMPORT+46, IMPORT+49, IMPORT+53 , UP1+5*
>> Y	EN1+7, EN1+8, EN1+15, IMPORT+18, IMPORT+20, UP1+7, POS1+23, POS1+24

Customize PDF page

Package: Commitment Register

Routine: ACRFPVEN

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
EN	;EP;TO SELECT PRIME VENDOR CONTRACT FUNCTION
POSEXIT
DOC	;EP;TO UPDATE ARMS FOR SELECTED DOCUMENT
UPDATE	;EP;UPDATE ARMS DOCUMENT WITH VENDOR ORDER DATA
POS	;EP;FIND POS WHICH HAVE NOT BEEN IMPORTED TO ARMS
EN1
EXIT
IMPORT	;EP;READ DATA FROM HOST FILE
CLOSE
POS1
UP1