Routine: BARBADU

Package	Total	Call Graph
IHS Accounts Receivable	5	$$EN^BARBAD2 TR^BARTDO ($$NEW,MSG)^BARTR $$NOTOPEN^BARUFUT $$EN^BARVDF
VA Fileman	3	FILE^DICN ^DIE $$GET1^DIQ

Package	Total	Caller Graph
IHS Accounts Receivable	2	BARBAD3 BARBAD4

Entry Points

Name	Comments	DBIA/ICR reference
P1	;
SETHLP	;EP - sethelp
COMHLP	;EP - help processor
SETCOLL	;EP ; Create COLLECTION STATUS multiple for A/R Bill
POSTTX	;EP - poster ;Heavily modified for BAR1.84 DD 4.1.7.2
CKBAL(BARL,BARB)	;EP; CHECK IF TX'S WILL CREATE NEGATIVE BALANCE
DONE	;
AMT(X,BARMIN,BARMAX)	;EP - ** number function
PX	;

External References

Name	Field # of Occurrence
$$EN^BARBAD2	POSTTX+14
TR^BARTDO	PX+27
$$NEW^BARTR	PX+1
MSG^BARTR	PX+3
$$NOTOPEN^BARUFUT	POSTTX+4
$$EN^BARVDF	COMHLP+2
FILE^DICN	SETCOLL+32
^DIE	PX+24, SETCOLL+23
$$GET1^DIQ	POSTTX+17, POSTTX+19, SETCOLL+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF"),!! Line Location: COMHLP+2
Function Call: WRITE	Prompt: ?IOM-$L(X)\2,X Line Location: COMHLP+4
Function Call: WRITE	Prompt: !?IOM-$L(X)\2 Line Location: COMHLP+5
Function Call: WRITE	Prompt: "-" Line Location: COMHLP+5
Function Call: WRITE	Prompt: !! Line Location: COMHLP+6
Function Call: WRITE	Prompt: !?2,BARHLP(J) Line Location: COMHLP+10
Function Call: WRITE	Prompt: !! Line Location: COMHLP+11
Function Call: WRITE	Prompt: !!,"Please wait... Posting Transactions." Line Location: POSTTX+6
Function Call: WRITE	Prompt: "." Line Location: PX+28
Routine Call	DIE Line Location: PX+24 SETCOLL+23

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BARBL(	SETCOLL+6, SETCOLL+7
^BARTBL("B"	POSTTX+29
^BARTMP($J	POSTTX+11, POSTTX+15
^DD(90050.01	SETCOLL+28

Label References

Name	Line Occurrences
CKBAL	POSTTX+20
P1	POSTTX+31
SETHLP	COMHLP+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BARAC	POSTTX+17, P1+8
BARADJ	POSTTX+32!
>> BARAMT	POSTTX+26*, POSTTX+27, P1+2, P1+3, SETCOLL+9, SETCOLL+10, SETCOLL+13, SETCOLL+14, SETCOLL+16
>> BARASFAC	P1+10*
BARATYP	POSTTX+30*, POSTTX+32!
BARB	CKBAL~
>> BARBDFN	POSTTX+11, POSTTX+14, POSTTX+15, POSTTX+17, POSTTX+18, POSTTX+19, PX+3, SETCOLL+4, SETCOLL+6, SETCOLL+7 , SETCOLL+19, SETCOLL+25
BARBLV	POSTTX+7!, POSTTX+32!
BARBLV(15	POSTTX+19*, POSTTX+20
BARBTOT	POSTTX+22, POSTTX+27, POSTTX+32!
BARCAT	POSTTX+28, POSTTX+32!, CKBAL+4~, CKBAL+10, CKBAL+12, PX+26
>> BARCNT	POSTTX+14*
>> BARCOL	PX+17
>> BARCOL(0	P1+9, P1+10, P1+11
>> BARCOM1	CKBAL+11*, P1+2, P1+3, SETCOLL+8, SETCOLL+12
>> BARCR	P1+2*
BARCUR	SETCOLL+2~, SETCOLL+3, SETCOLL+4, SETCOLL+9, SETCOLL+13
BARCURSC	SETCOLL+2~, SETCOLL+3, SETCOLL+7, SETCOLL+10, SETCOLL+14
>> BARDB	P1+3*
BARDIF	CKBAL+4~
>> BAREOB	P1+13
>> BARHLP(	COMHLP+9, COMHLP+10
>> BARHLP(1	SETHLP+1*
>> BARHLP(2	SETHLP+2*
>> BARHLP(3	SETHLP+3*
>> BARHLP(4	SETHLP+4*
>> BARHLP(5	SETHLP+5*
>> BARHLP(6	SETHLP+6*
>> BARHLP(7	SETHLP+7*
>> BARHLP(8	SETHLP+8*
>> BARITM(0	P1+8, P1+12, PX+18
BARJ	POSTTX+22, POSTTX+23, POSTTX+24, POSTTX+26, CKBAL+4~, CKBAL+5, CKBAL+6, CKBAL+7
BARL	CKBAL~, CKBAL+6
>> BARLIN	POSTTX+9, POSTTX+10, POSTTX+11, POSTTX+15, POSTTX+20, POSTTX+23, POSTTX+24, POSTTX+26, POSTTX+32, CKBAL+7
BARMAX	AMT~, AMT+8
BARMIN	AMT~, AMT+7
>> BARPAR	P1+9*
>> BARPASS	POSTTX+14
>> BARPAT	P1+7
BARPMT	POSTTX+32!
>> BARPT	P1+7*
>> BARREC	POSTTX+24, POSTTX+25, POSTTX+28, POSTTX+30, CKBAL+7, CKBAL+8, CKBAL+9, CKBAL+10, CKBAL+11
>> BARROLL(	POSTTX+18*
BARSCIEN	SETCOLL+2~, SETCOLL+5, SETCOLL+6, SETCOLL+7
>> BARSECT	P1+11*
>> BARSITE	P1+12, P1+13
>> BARSTOP	POSTTX+21, CKBAL+3*
BARTAMT	CKBAL+4~, CKBAL+9*, CKBAL+13
BARTEXT	SETCOLL+2~, SETCOLL+3, SETCOLL+11, SETCOLL+15*, SETCOLL+30
BARTOT	CKBAL+4~, CKBAL+5, CKBAL+13
BARTOTM	SETCOLL+2~, SETCOLL+3, SETCOLL+16, SETCOLL+30
BARTOTO	SETCOLL+2~, SETCOLL+3, SETCOLL+9, SETCOLL+13*
BARTOTSC	SETCOLL+2~, SETCOLL+3, SETCOLL+10, SETCOLL+14*, SETCOLL+30
>> BARTR(	POSTTX+10, POSTTX+23, POSTTX+24, POSTTX+26, POSTTX+32!, CKBAL+6, CKBAL+7
>> BARTRIEN	PX+2*, PX+27
>> BARTT	POSTTX+29*
>> BARTXT	POSTTX+25*
>> BARTYP	CKBAL+8*
DA	POSTTX+8~, PX+4!, PX+5, SETCOLL+2~, SETCOLL+17!, SETCOLL+19, SETCOLL+24!
DA(1	SETCOLL+25*, SETCOLL+26
DD	POSTTX+7!, SETCOLL+31!
DIC	POSTTX+8~, PX+4!, SETCOLL+2~, SETCOLL+26*
DIC("DR"	SETCOLL+29*
DIC("P"	SETCOLL+28*
DIC(0	SETCOLL+27*
DIDEL	PX+23, PX+25!, SETCOLL+17!, SETCOLL+22, SETCOLL+24!
DIE	POSTTX+8~, P1+1, PX+4!, PX+5, SETCOLL+17!, SETCOLL+18*, SETCOLL+24!
DIQ	POSTTX+8~
DLAYGO	SETCOLL+33!
DO	POSTTX+7!, SETCOLL+31!
DR	POSTTX+8~, PX+4!, PX+6, PX+7, PX+8, PX+9, PX+10, PX+11, PX+12, PX+13 , PX+14, PX+15, PX+16, PX+17, PX+18, PX+19, PX+20, PX+21, SETCOLL+2~, SETCOLL+20* , SETCOLL+21*
DT	SETCOLL+30
DUZ	POSTTX+4
DUZ(2	SETCOLL+6, SETCOLL+7
I	SETCOLL+2~
IOM	COMHLP+4, COMHLP+5
J	COMHLP+1~, COMHLP+5, COMHLP+8, COMHLP+9*, COMHLP+10, SETCOLL+2~
U	POSTTX+25, POSTTX+26, POSTTX+28, POSTTX+30, CKBAL+8, CKBAL+9, CKBAL+10, CKBAL+11, P1+8, P1+9 , P1+10, P1+11, P1+12, SETCOLL+7, SETCOLL+28, SETCOLL+30
>> UFMSESID	POSTTX+4
X	AMT~, AMT+3, AMT+4, AMT+5, AMT+6, AMT+7, AMT+8, AMT+9, COMHLP+1~, COMHLP+3 , COMHLP+4, COMHLP+5, PX+1, PX+2, PX+3, PX+5, SETCOLL+30

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARBADU

Information

Source Information

Call Graph

Call Graph Total: 8

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

Local Variables

Legend: