Routine: BARPUC3

Call Graph Total: 14

Package	Total	Call Graph
IHS Accounts Receivable	10	HISTORY^BARBAD3 ASKLIN^BARFPST3 EN^BARPST6 HIT1^BARPUC2 SETTMP^BARPUC3A (,$$DSPLY)^BARPUC4 ($$AMT,COMHLP,POSTTX,SETHLP)^BARPUCU EN^BARROLL $$NOTOPEN^BARUFUT ($$UPC,EOP)^BARUTL
VA Fileman	3	^DIC $$GET1^DIQ ^DIR
IHS VA Utilities	1	(DIQ,VIEWR)^XBLM

Package

Total

Call Graph

HISTORY^BARBAD3 ASKLIN^BARFPST3 EN^BARPST6 HIT1^BARPUC2 SETTMP^BARPUC3A (,$$DSPLY)^BARPUC4 ($$AMT,COMHLP,POSTTX,SETHLP)^BARPUCU EN^BARROLL
$$NOTOPEN^BARUFUT ($$UPC,EOP)^BARUTL

VA Fileman

^DIC $$GET1^DIQ ^DIR

IHS VA Utilities

(DIQ,VIEWR)^XBLM

Package	Total	Caller Graph
IHS Accounts Receivable	2	BARPUC BARPUC4

Package

Total

Caller Graph

IHS Accounts Receivable

BARPUC BARPUC4

Entry Points

Name	Comments	DBIA/ICR reference
ASKCOM	;EP - ask command
EN	;EP - command processor for unallocated
ASKCOM1	;
ASKAMT	;
P1	;
GOD	;
S1	;
GOA	;
ASKLIN	;
GOB	;
FIN
EN1	;
EN2	;
FINISH	;
PDIR	;
CANCEL	;
POST()	;
COMHLP	;
GOQ	;
GOP	;
LNHLP	;

External References

Name	Field # of Occurrence
HISTORY^BARBAD3	ASKCOM1+31
ASKLIN^BARFPST3	ASKLIN+2
EN^BARPST6	ASKCOM1+26
HIT1^BARPUC2	EN1+3, ASKCOM+3, P1+1
SETTMP^BARPUC3A	S1+1
^BARPUC4	GOB+4
$$DSPLY^BARPUC4	ASKCOM1+29
$$AMT^BARPUCU	ASKAMT+8, ASKAMT+9
COMHLP^BARPUCU	COMHLP+1
POSTTX^BARPUCU	FIN+6
SETHLP^BARPUCU	EN2+3
EN^BARROLL	FIN+10
$$NOTOPEN^BARUFUT	ASKCOM1+2, FIN+8
$$UPC^BARUTL	ASKCOM1+12
EOP^BARUTL	ASKCOM1+30, P1+2
^DIC	ASKAMT+22, ASKAMT+39
$$GET1^DIQ	ASKCOM1+25
^DIR	PDIR+4
DIQ^XBLM	GOB+3
VIEWR^XBLM	GOD+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EN+4
Function Call: WRITE	Prompt: !! Line Location: EN2+1
Function Call: WRITE	Prompt: ! Line Location: ASKCOM+4
Function Call: WRITE	Prompt: !,"Select Command (Line # "_BARLIN_") : " Line Location: ASKCOM1+3
Function Call: WRITE	Prompt: *7," Sorry.. ["_BARHLP(BARCOM(1))_"] not active!" Line Location: GOB+5
Function Call: WRITE	Prompt: !,BARASK Line Location: ASKAMT+4
Function Call: WRITE	Prompt: $J(BARBAL,0,2)_"// " Line Location: ASKAMT+5
Function Call: WRITE	Prompt: *7," Must be a valid number!" Line Location: ASKAMT+11
Function Call: WRITE	Prompt: *7 Line Location: ASKAMT+24
Function Call: WRITE	Prompt: !! Line Location: ASKAMT+24
Function Call: WRITE	Prompt: *7,!! Line Location: ASKAMT+41
Function Call: WRITE	Prompt: *7 Line Location: PDIR+6
Routine Call	DIC Line Location: ASKAMT+22 ASKAMT+39
Routine Call	DIR Line Location: PDIR+4

FileNo	Call Tags
^BARBL(2906 - [#90050.01]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BAR(90052.01 - [#90052.01]	ASKAMT+14
^BARTBL("D"	ASKAMT+29
^BARTMP($J	ASKCOM1+24, GOB+2, FIN+11!, CANCEL+1!
^TEMP($J	EN+1!

Label References

Name	Line Occurrences
$$POST	FIN
ASKAMT	GOP+1, GOP+2, GOA+1, GOA+2, ASKAMT+11, ASKAMT+24, ASKAMT+41
ASKCOM	ASKCOM1+20, ASKCOM1+22, ASKCOM1+28, ASKCOM1+31, GOD+1, GOB+1, GOB+6, ASKAMT+10, S1+2
ASKCOM1	ASKLIN+1, ASKLIN+5, COMHLP+2
CANCEL	FINISH+1, FIN+2
COMHLP	ASKCOM1+21
EN1	GOQ+1, FIN+1
FIN	FIN+9
FINISH	ASKLIN+3, ASKLIN+4, GOQ+1
PDIR	PDIR+6
S1	ASKAMT+13, ASKAMT+33

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BARACC	ASKCOM1+23~, ASKCOM1+25*, ASKCOM1+26
BARADJ	EN+2*, FINISH+1, CANCEL+2!
BARAMT	EN1+1!, EN2+2!, ASKCOM+1!, ASKAMT+12, ASKAMT+24!, ASKAMT+26, ASKAMT+41!, S1+1
>> BARASK	ASKAMT+2*, ASKAMT+4
BARATYP	EN1+1!, ASKCOM+1!, ASKAMT+1, ASKAMT+28!, ASKAMT+32, ASKAMT+33, ASKAMT+42*, S1+1
>> BARBAL	ASKAMT+3*, ASKAMT+5, ASKAMT+7, ASKAMT+8
BARBLDA	ASKCOM1+23~, ASKCOM1+24, ASKCOM1+25, ASKCOM1+26, GOB+2, GOB+3
BARCAT	EN1+1!, ASKCOM+1!, ASKAMT+1, ASKAMT+14, ASKAMT+25*, ASKAMT+26, ASKAMT+29, S1+1
>> BARCNT	ASKLIN+1, ASKLIN+5, GOQ+1
BARCOM	EN1+1!, EN2+2!, ASKCOM+1!, ASKCOM1+4, ASKCOM1+12, ASKCOM1+15
BARCOM(	ASKCOM1+15*, ASKCOM1+16, ASKCOM1+17!, ASKCOM1+22, ASKCOM1+28, ASKCOM1+31, GOQ+1, GOP+1, GOP+2, GOA+1 , GOA+2, GOD+1, GOB+1, GOB+4
BARCOM(1	ASKCOM1+20, ASKCOM1+21, GOB+5
>> BARDFLT	EN+3, ASKLIN+1
>> BARDSP	EN1+2, ASKCOM+2
>> BARHLP	EN2+3
>> BARHLP(	ASKCOM1+21, GOB+5
>> BARJ	ASKAMT+27, ASKAMT+29, ASKAMT+30, ASKAMT+31, ASKAMT+33
BARLIN	EN1+1!, ASKLIN+1*, ASKLIN+3, ASKLIN+4, ASKLIN+5, ASKCOM1+3, ASKCOM1+24, ASKCOM1+29, GOB+2, S1+1
>> BARPASS	EN1+3, ASKCOM+3, P1+1
>> BARPAT	ASKCOM1+26, GOD+2
BARPMT	EN+2*, ASKAMT+3, FINISH+1, CANCEL+2!
>> BARQ	FIN*, FIN+1, FIN+2, FIN+6
>> BARSTOP	FIN+9
BARTR	EN+1!, CANCEL+2!
>> BARTX(2	ASKAMT+3
BARTYP	EN1+1!, ASKCOM+1!, GOP+1, GOP+2, GOA+1, GOA+2, ASKAMT+2, ASKAMT+5, ASKAMT+7, ASKAMT+8 , ASKAMT+9, ASKAMT+13, S1+1
>> BARX	ASKAMT+27, ASKAMT+29, ASKAMT+32
DA	ASKCOM1+23~
DD	ASKAMT+21!, ASKAMT+38!
>> DFN	GOD+2*
DIC	ASKCOM1+23~, ASKAMT+17, ASKAMT+23!, ASKAMT+34, ASKAMT+40!
DIC("A"	ASKAMT+19, ASKAMT+36
DIC("S"	ASKAMT+20, ASKAMT+37
DIC(0	ASKAMT+18, ASKAMT+35
DIR	EN+1!, PDIR+1!, PDIR+5!
DIR("A"	PDIR+3*
DIR(0	PDIR+2*
DO	ASKAMT+21!, ASKAMT+38!
DTIME	ASKCOM1+4, ASKAMT+6
>> DUOUT	PDIR+6
DUZ	ASKCOM1+2, FIN+8
>> J	ASKCOM1+14, ASKCOM1+15, ASKCOM1+16, ASKCOM1+17, ASKCOM1+18, ASKCOM1+20, ASKCOM1+22, ASKCOM1+28, ASKCOM1+31, GOQ+1 , GOP+1, GOP+2, GOA+1, GOA+2, GOD+1, GOB+1, GOB+4
>> Q	ASKCOM1+13, ASKCOM1+14, ASKCOM1+19
>> UFMSESID	ASKCOM1+2, FIN+8
>> X	ASKAMT+6, ASKAMT+7, ASKAMT+8, ASKAMT+9, ASKAMT+10, ASKAMT+11, ASKAMT+12
>> Y	ASKCOM1+29*, ASKAMT+24, ASKAMT+25, ASKAMT+41, ASKAMT+42, PDIR+6, PDIR+7

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARPUC3

Information

Source Information