Routine: BARTRANT

Package	Total	Call Graph
IHS Accounts Receivable	10	^BARDBQUE $$DATE^BARDUTL (ALLOW,CHK,DT,ITYP)^BARRHD MSG^BARRSEL (ALL,ITYP,LOC)^BARRSL1 ARACCT^BARRSL2 ADJTYPE^BARRSL3 PAZ^BARRUTL INIT^BARUTL ^BARVKL0
VA Fileman	1	^DIR

Package

Total

Call Graph

^BARDBQUE $$DATE^BARDUTL (ALLOW,CHK,DT,ITYP)^BARRHD MSG^BARRSEL (ALL,ITYP,LOC)^BARRSL1 ARACCT^BARRSL2 ADJTYPE^BARRSL3 PAZ^BARRUTL
INIT^BARUTL ^BARVKL0

^DIR

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAR RPT ADJ REF TRNS

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
SORT	;
SETHDR	; ; Build header array
DATES	; ; Ask beginning and ending Transaction Dates.
EN	; EP
RTYP	; ; Ask report type
EN1
XIT	;
ASK	; EP

Name	Field # of Occurrence
^BARDBQUE	EN1+5
$$DATE^BARDUTL	DATES+4, DATES+7
ALLOW^BARRHD	SETHDR+7
CHK^BARRHD	SETHDR+7, SETHDR+8, SETHDR+14, SETHDR+20, SETHDR+32
DT^BARRHD	SETHDR+21
ITYP^BARRHD	SETHDR+8
MSG^BARRSEL	ASK+3
ALL^BARRSL1	ASK+14
ITYP^BARRSL1	ASK+19
LOC^BARRSL1	ASK+4
ARACCT^BARRSL2	ASK+11
ADJTYPE^BARRSL3	EN+9
PAZ^BARRUTL	EN1+6
INIT^BARUTL	EN+3
^BARVKL0	XIT+1
^DIR	EN+21, SORT+7, RTYP+8

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Note: Some bills may contain more than one adjustment transaction on the report." Line Location: EN+17
Function Call: WRITE	Prompt: ! Line Location: ASK+10
Function Call: WRITE	Prompt: ! Line Location: ASK+13
Function Call: WRITE	Prompt: ! Line Location: ASK+18
Function Call: WRITE	Prompt: !!," ============ Entry of TRANSACTION DATE Range =============",! Line Location: DATES+2
Function Call: WRITE	Prompt: ! Line Location: DATES+9
Routine Call	DIR Line Location: EN+21 SORT+7 RTYP+8

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	SETHDR+25, SETHDR+28

Name	Field # of Occurrence
%DT	DATES+3!, DATES+5!, DATES+8!
BAR	EN+1!
BAR("CONJ"	SETHDR+13, SETHDR+19, SETHDR+31*
BAR("HD"	SETHDR+5, SETHDR+6, SETHDR+11, SETHDR+17, SETHDR+23*
BAR("LOC"	EN+6*, SETHDR+26
BAR("LVL"	SETHDR+4, SETHDR+10, SETHDR+11, SETHDR+16, SETHDR+17, SETHDR+22, SETHDR+23
BAR("OPT"	EN+2, SETHDR+2
BAR("PRIVACY"	EN+5*
BAR("TXT"	SETHDR+12, SETHDR+18, SETHDR+24, SETHDR+25, SETHDR+27, SETHDR+28, SETHDR+29, SETHDR+30
>> BARA("LOC"	ASK+1*
>> BARA("SORT"	ASK+2, ASK+7, SORT+9, SORT+11*
>> BARDET	EN+23*
>> BAREND	DATES+7*, DATES+9, DATES+10, DATES+14
>> BARP("RTN"	EN+4*
>> BARQ("NS"	EN1+3*
>> BARQ("RC"	EN1+1*
>> BARQ("RP"	EN1+2*
>> BARQ("RX"	EN1+4*
>> BARSTART	EN+11, DATES+4*, DATES+6, DATES+10, DATES+13
>> BARUSR	EN+3
BARY	EN+1!
BARY("ALL"	ASK+16
BARY("DT"	DATES+13, DATES+14, SETHDR+3*
BARY("ITYP"	ASK+21
BARY("LOC"	ASK+6, SETHDR+25
BARY("RTYP"	EN+16, RTYP+11, RTYP+12, SETHDR+9, SETHDR+15
BARY("STCR"	ASK+8, ASK+9, ASK+12, ASK+17, SORT+1!, SORT+12, SORT+13, SETHDR+6, SETHDR+7, SETHDR+8
DIR	EN+22!, SORT+1!, SORT+8!, RTYP+9!
DIR("?"	SORT+6, RTYP+6, RTYP+7*
DIR("A"	EN+18, SORT+5, RTYP+4*
DIR("B"	EN+19, RTYP+5
DIR(0	EN+20, SORT+2, SORT+3, SORT+4, RTYP+2, RTYP+3
>> DIROUT	EN+8
>> DTOUT	EN+8, ASK+5, ASK+15, ASK+20, SORT+9
>> DUOUT	EN+8, ASK+5, ASK+15, ASK+20, SORT+9
DUZ(2	SETHDR+28
U	SETHDR+25, SETHDR+28
>> Y	EN+14, EN+23, SORT+10, SORT+12, RTYP+10, RTYP+11
>> Y(0	SORT+13, RTYP+12

Information