Routine: BARPST7

Package	Total	Call Graph
IHS Accounts Receivable	4	TOP^BARPST1 $$NEW^BARTR ($$NOTOPEN,$$TRANTRIG)^BARUFUT EOP^BARUTL
VA Fileman	3	^DIE $$GET1^DIQ ^DIR
IHS VA Utilities	2	$$VALI^XBDIQ1 $$DIC^XBSFGBL

Package

Total

Call Graph

TOP^BARPST1 $$NEW^BARTR ($$NOTOPEN,$$TRANTRIG)^BARUFUT EOP^BARUTL

^DIE $$GET1^DIQ ^DIR

$$VALI^XBDIQ1 $$DIC^XBSFGBL

Package	Total	Caller Graph
IHS Accounts Receivable	1	BARPST

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !!! Line Location: TRYAGIN+2
Function Call: WRITE	Prompt: *7,!!,"Amount: "_$J(BARUN("AMT"),0,2) Line Location: TRYAGIN+9
Function Call: WRITE	Prompt: !!,"Updating Account, Transaction and Batch files now..." Line Location: TRYAGIN+18
Function Call: WRITE	Prompt: !!,"The system could not create an UN-ALLOCATED transaction. Please try again.",! Line Location: PX+4
Routine Call	DIE Line Location: ACC+11 SLVL+10 ILVL+10 PX+18
Routine Call	DIR Line Location: TRYAGIN+5 TRYAGIN+13

FileNo	Call Tags
^BARAC(2906 - [#90050.02]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BARTBL("B"	TX+9

Name	Field # of Occurrence
BARAC	TX+3~, TX+8*
BARCB	UNALC~, TRYAGIN+21, SLVL+4, ILVL+3
>> BARCLIT(19	TRYAGIN+3
BARCR	TX+3~, TX+7*
>> BAREOB	PX+16
BARITM	UNALC~, TRYAGIN+22, SLVL+5, ILVL+4
BARPMT	BATCH+1~, BATCH+2*
BARSUB	UNALC~, TRYAGIN+3, SLVL+2, SLVL+6, ILVL+6
>> BARTRIEN	TRYAGIN+25, PX+2*, PX+3, PX+21
BARTT	TX+3~, TX+9*
BARUN	UNALC+4~
BARUN("ACCT"	TRYAGIN+23, TRYAGIN+27, ILVL+5, TX+8
BARUN("AMT"	TRYAGIN+8*, TRYAGIN+9, BATCH+2, TX+7
BARUN(105	ILVL+7*
BARUN(302	ACC+6*
BARUN(304	ACC+5*
BARUN(5	SLVL+7*
>> BARVSIT(4	TRYAGIN+3
DA	TRYAGIN+19~, TRYAGIN+22, TRYAGIN+23, ACC~, ACC+2, ACC+5, ACC+6, BATCH+1~, SLVL+6, SLVL+7 , ILVL+4, ILVL+5, ILVL+7, PX+5
DA(1	TRYAGIN+21, SLVL+5, ILVL+3*
DA(2	SLVL+4*
DD	TX+6!
DIC	TRYAGIN+20, TRYAGIN+23, ACC+1~, ACC+3, ACC+7, BATCH+1~, SLVL+3, SLVL+7, ILVL+2, ILVL+5 , ILVL+7, TX+3~
DIC(0	ACC+4, TX+5
DIDEL	ACC+10, ACC+12!, SLVL+9, SLVL+11!, ILVL+9, ILVL+11!, PX+17, PX+19!
DIE	ACC+1~, ACC+7, BATCH+1~, SLVL+3, ILVL+2, TX+4
DIR	TRYAGIN+6!, TRYAGIN+14!
DIR("A"	TRYAGIN+4, TRYAGIN+10
DIR("B"	TRYAGIN+11*
DIR(0	TRYAGIN+3, TRYAGIN+12
DO	TX+6!
DR	ACC+1~, ACC+8, ACC+9, BATCH+1~, SLVL+8, ILVL+8, PX+6, PX+7, PX+8, PX+9 , PX+10, PX+11, PX+12, PX+13, PX+14, PX+15, PX+16*
>> DUOUT	TRYAGIN+7
DUZ	UNALC+2, TRYAGIN+17, TX+2, PX+21
>> UFMSESID	UNALC+2, TRYAGIN+17, TX+2, PX+21
>> X	PX+1, PX+2, PX+5, PX+21
>> Y	TRYAGIN+7, TRYAGIN+8, TRYAGIN+15

Information