Routine: BARPST4

Package	Total	Call Graph
IHS Accounts Receivable	7	$$SDT^BARDUTL STOP^BARFPST1 ASKCOM^BARPST3 $$AMT^BARPSTU $$IHS^BARUFUT EOP^BARUTL $$EN^BARVDF
VA Fileman	2	^DIC ^DIR

Package	Total	Caller Graph
IHS Accounts Receivable	6	BARPNP4 BARPRF3A BARPST3 BARPST3A BARPUC3A BARPUC4

Entry Points

Name	Comments	DBIA/ICR reference
HEAD	;
EN	;EP
ASKAMT	;
B1O	;
S1	;
SETTMPO(BARTYP,BARAMT,BARLIN,BARCAT,BARATYP)	;OLD SETTMP; BAR1.84 DD 4.1.7.2
PARSE	;
SURE	;EP; WARNING MESSAGE
CKNEG(BARBBAL,BAROAMT,BARAMT)	;EP;CHECK FOR NEGATIVE BALANCES;BAR1.84 DD 4.1.7.2
SETTMP(BARTYP,BARAMT,BARLIN,BARCAT,BARATYP,BAROAMT)	;HEAVILY MODIFIED; BAR1.84 DD 4.1.7.2
DSPLY(BARLIN)	;EP - display temporary buffer
WARN(BARLVL,BARDIF)

External References

Name	Field # of Occurrence
$$SDT^BARDUTL	HEAD+3
STOP^BARFPST1	ASKAMT+7
ASKCOM^BARPST3	EN+1, EN+11, ASKAMT+5, S1+2
$$AMT^BARPSTU	ASKAMT+4
$$IHS^BARUFUT	ASKAMT+7, WARN+1
EOP^BARUTL	EN+3, B1O+8
$$EN^BARVDF	HEAD+1
^DIC	ASKAMT+20, ASKAMT+38
^DIR	EN+10, SURE+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+7
Function Call: WRITE	Prompt: !!,BARASK_$J(BARAMT,0,2)_"// " Line Location: ASKAMT+2
Function Call: WRITE	Prompt: *7," Must be a valid number!" Line Location: ASKAMT+6
Function Call: WRITE	Prompt: *7 Line Location: ASKAMT+22
Function Call: WRITE	Prompt: !! Line Location: ASKAMT+22
Function Call: WRITE	Prompt: *7,!! Line Location: ASKAMT+40
Function Call: WRITE	Prompt: ! Line Location: SURE+3
Function Call: WRITE	Prompt: ! Line Location: WARN+3
Function Call: WRITE	Prompt: *7,!,"Warning - Posted amount exceeds the " Line Location: WARN+4
Function Call: WRITE	Prompt: $S(BARLVL=1:"BATCH",BARLVL=2:"ITEM",BARLVL=3:"LOCATION",1:"BILL")_" balance" Line Location: WARN+5
Function Call: WRITE	Prompt: " by "_BARDIF_" amount" Line Location: WARN+6
Function Call: WRITE	Prompt: ?25,$E($P(^BAR(90052.01,Y,0),U,1),1,23) Line Location: DSPLY+11
Function Call: WRITE	Prompt: ?50,$E($P(^BARTBL(Y,0),U,1),1,28) Line Location: DSPLY+13
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF"),! Line Location: HEAD+1
Function Call: WRITE	Prompt: "Transactions for "_$P(^DPT(+BARPASS,0),U,1)_" from "_$$SDT^BARDUTL($P(BARPASS,U,2))_" to "_$$SDT^BARDUTL($P(BARPASS,U,3)) Line Location: HEAD+3
Function Call: WRITE	Prompt: ?(IOM-15),"Page: "_BARPG Line Location: HEAD+4
Function Call: WRITE	Prompt: !! Line Location: HEAD+5
Function Call: WRITE	Prompt: "Trans",?8,"Type",?15,"Amount",?25,"Category",?50,"Adj. Type" Line Location: HEAD+6
Function Call: WRITE	Prompt: !,BARDSH Line Location: HEAD+9
Routine Call	DIC Line Location: ASKAMT+20 ASKAMT+38
Routine Call	DIR Line Location: EN+10 SURE+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BAR(90052.01 - [#90052.01]	DSPLY+11
^BARTBL - [#90052.02]	DSPLY+13
^BARTBL("D"	ASKAMT+27
^BARTMP($J	SETTMP+5, SETTMP+6, SETTMP+25, SETTMP+26, SETTMP+31, SETTMP+32, SETTMPO+3, B1O+10, B1O+13, B1O+15*
^DPT - [#2]	HEAD+3

Label References

Name	Line Occurrences
$$DSPLY	EN+6
ASKAMT	ASKAMT+6, ASKAMT+7, ASKAMT+22, ASKAMT+40
CKNEG	SETTMP+9
HEAD	DSPLY+3
S1	ASKAMT+11, ASKAMT+31
SETTMP	S1+1
SURE	CKNEG+2, CKNEG+4
WARN	CKNEG+3, CKNEG+12, CKNEG+17, CKNEG+22, B1O+2, B1O+3, B1O+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BARADJ	SETTMP+30, SETTMP+31, B1O+14
BARAMT	PARSE+8, ASKAMT+2, ASKAMT+3, ASKAMT+9, ASKAMT+24*, S1+1, SETTMP~, SETTMP+9, SETTMP+21, SETTMP+23 , SETTMP+24, SETTMP+29, SETTMP+30, SETTMP+35, CKNEG~, CKNEG+2, CKNEG+3, CKNEG+12, CKNEG+17, CKNEG+22 , SETTMPO~, B1O+2, B1O+3, B1O+4, B1O+10, B1O+11, B1O+13, B1O+14, B1O+15, B1O+16
>> BARASK	ASKAMT+1*, ASKAMT+2
BARATYP	PARSE+10, ASKAMT+31, ASKAMT+32, ASKAMT+41*, S1+1, SETTMP~, SETTMP+35, SETTMPO~, B1O+16
BARBBAL	SETTMP+2~, SETTMP+6, SETTMP+8, SETTMP+9, SETTMP+21*, SETTMP+26, SETTMP+32, CKNEG~, CKNEG+2, CKNEG+3
BARCAT	PARSE+9, ASKAMT+14, ASKAMT+23, ASKAMT+24, ASKAMT+27, S1+1, SETTMP~, SETTMP+7, SETTMP+32, SETTMP+35 , SETTMPO~, B1O+16
>> BARCLV(17	CKNEG+8, CKNEG+11, B1O+2
BARCLV17	SETTMP+2~, CKNEG+7~, CKNEG+11*, CKNEG+12
>> BARDA	SETTMP+5, SETTMP+6, SETTMP+25, SETTMP+26, SETTMP+31, SETTMP+32, SETTMPO+3, B1O+10, B1O+13, B1O+15
BARDIF	WARN~, WARN+6
>> BARDSH	HEAD+7, HEAD+8, HEAD+9
>> BAREOB	CKNEG+18, B1O+4
>> BAREOV(4	CKNEG+21, B1O+4
BAREOV4	SETTMP+2~, CKNEG+7~, CKNEG+21*, CKNEG+22
>> BARFLG("BARWARN"	SETTMP+3!, SURE+2, SURE+4!, WARN+1!, WARN+3, WARN+7*, SETTMPO+1!, B1O+5, B1O+6!
>> BARITV(19	CKNEG+13, CKNEG+16, B1O+3
BARITV19	SETTMP+2~, CKNEG+7~, CKNEG+16*, CKNEG+17
BARJ	EN+5, ASKAMT+25, ASKAMT+27, ASKAMT+28, ASKAMT+29, ASKAMT+31, DSPLY+1~, DSPLY+4, DSPLY+5*, DSPLY+8 , DSPLY+9, DSPLY+10, DSPLY+12, DSPLY+14
BARK	ASKAMT+26!, ASKAMT+30*, ASKAMT+31
BARLIN	EN+1, EN+6, PARSE+1*, PARSE+2, PARSE+3, PARSE+6, S1+1, SETTMP~, SETTMP+5, SETTMP+6 , SETTMP+25, SETTMP+26, SETTMP+31, SETTMP+32, SETTMP+35, DSPLY~, DSPLY+5, DSPLY+8, DSPLY+9, DSPLY+10 , DSPLY+12, DSPLY+14, SETTMPO~, SETTMPO+3, B1O+10, B1O+13, B1O+15, B1O+16
BARLVL	WARN~, WARN+1, WARN+5
BAROAMT	PARSE+8*, S1+1, SETTMP~, SETTMP+8, SETTMP+9, SETTMP+23, SETTMP+24, SETTMP+29, SETTMP+30, SETTMP+36! , CKNEG~, CKNEG+11, CKNEG+16, CKNEG+21, B1O+2, B1O+3, B1O+4, B1O+10, B1O+11, B1O+13 , B1O+14, B1O+15, B1O+17!
>> BARPASS	HEAD+3
BARPG	DSPLY+1~, DSPLY+2, HEAD+2, HEAD+4
>> BARPMT	SETTMP+24, SETTMP+25, CKNEG+11, CKNEG+16, CKNEG+21, B1O+2, B1O+3, B1O+4, B1O+11
BARREC	PARSE+5~, PARSE+6*, PARSE+7, PARSE+8, PARSE+9, PARSE+10
BARSEL	EN+4~, EN+5, EN+6, EN+9, EN+12, PARSE+1, PARSE+3, DSPLY+4, DSPLY+6*, DSPLY+7 , DSPLY+14, DSPLY+15
BARSEL(	PARSE+1, PARSE+3, DSPLY+14*
>> BARSTOP	SETTMP+4, SETTMP+10, SURE+11, SETTMPO+2, B1O+1, B1O+5, B1O+9
>> BARTR(	EN+1, PARSE+6, SETTMP+35, DSPLY+5, DSPLY+8, DSPLY+9, DSPLY+10, DSPLY+12, B1O+16
BARTYP	PARSE+7*, ASKAMT+1, ASKAMT+7, ASKAMT+11, S1+1, SETTMP~, SETTMP+22, SETTMP+28, SETTMP+35, CKNEG+2 , CKNEG+6, SETTMPO~, B1O+1, B1O+12, B1O+16
>> BARV	PARSE+3*, PARSE+4, PARSE+6, SETTMP+35, B1O+16
>> BARX	ASKAMT+25, ASKAMT+27, ASKAMT+30
>> BARZZZZ	CKNEG+4, CKNEG+5, SURE+1
DD	ASKAMT+19!, ASKAMT+37!
DIC	ASKAMT+15, ASKAMT+21!, ASKAMT+33, ASKAMT+39!
DIC("A"	ASKAMT+17, ASKAMT+35
DIC("B"	ASKAMT+14, ASKAMT+32
DIC("S"	ASKAMT+18, ASKAMT+36
DIC(0	ASKAMT+16, ASKAMT+34
DIR	EN+8!, SURE+5!, SURE+10!
DIR("A"	SURE+7*
DIR("B"	SURE+8*
DIR(0	EN+9, SURE+6
DO	ASKAMT+19!, ASKAMT+37!
DTIME	ASKAMT+2
>> DTOUT	EN+11
>> DUOUT	EN+11
DUZ(2	ASKAMT+7, WARN+1
IOM	HEAD+4, HEAD+8
U	PARSE+7, PARSE+8, PARSE+9, PARSE+10, SETTMP+6, SETTMP+25, SETTMP+26, SETTMP+31, SETTMP+32, SETTMP+35 , DSPLY+8, DSPLY+9, DSPLY+10, DSPLY+11, DSPLY+12, DSPLY+13, HEAD+3, B1O+10, B1O+13, B1O+15 , B1O+16
>> X	ASKAMT+2, ASKAMT+3, ASKAMT+4*, ASKAMT+5, ASKAMT+6, ASKAMT+7, ASKAMT+9
>> Y	EN+12, ASKAMT+22, ASKAMT+23, ASKAMT+40, ASKAMT+41, SURE+11, DSPLY+10, DSPLY+11, DSPLY+12, DSPLY+13

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARPST4

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: