Routine: BARCLU3

Package	Total	Call Graph
IHS Accounts Receivable	7	(BARCLIT,DISPLAY)^BARCLU (CACC,CC,CHECK,EOBSUB,INSSUB,SPAYOR)^BARCLU0 DISPLAY^BARCLU1 DICW^BARCLU2 NEWITEM^BARCLU4 EOP^BARUTL $$EN^BARVDF
VA Fileman	4	^DIC ^DIE $$GET1^DIQ ^DIR
IHS VA Utilities	1	$$DIC^XBDIQ1

Package	Total	Caller Graph
IHS Accounts Receivable	1	BARCLU

Entry Points

Name	Comments	DBIA/ICR reference
CC	; EP ; credit card
REFUND	; EP ; refund
EITEMEOB	;
PAYOR	; EP ; ask PAYOR (A/R Account with DISV(screen)
EROLL	;
ITEMEOB	;
EOB	;EP ; EOB entry ; the following lifted from BARCLU0 and modified
EDIT
DISPLAY	; EP ; display item elements
DICW	; EP ; help display an item lookup
UPDATE	;
CHECK	; EP ; for checks
ITEM	;
ERRORCOM	; EP ; LOOP FOR ERROR COMMENT
CASH	; EP ; cash col
CANCEL	; EP ; cancel a batch item
ITEMEDIT	;EP edit collection item
GL	; EP ; general ledger
ROLL	;

External References

Name	Field # of Occurrence
BARCLIT^BARCLU	ITEM+11, CANCEL+10, ERRORCOM+9, ROLL+2, UPDATE+31, ITEMEOB+13, ITEMEOB+39, DISPLAY+2
DISPLAY^BARCLU	DISPLAY+3
CACC^BARCLU0	GL+3, CASH+3
CC^BARCLU0	CC+3
CHECK^BARCLU0	CHECK+2
EOBSUB^BARCLU0	ITEMEOB+37
INSSUB^BARCLU0	ITEMEOB+38
SPAYOR^BARCLU0	ITEMEOB+3
DISPLAY^BARCLU1	ITEMEOB+40
DICW^BARCLU2	DICW+2
NEWITEM^BARCLU4	ROLL+4
EOP^BARUTL	CANCEL+18, ERRORCOM+13
$$EN^BARVDF	BARCLU3+12, ITEMEOB+15
^DIC	ITEM+8
^DIE	CANCEL+8, EDIT+9, ERRORCOM+7, UPDATE+13, UPDATE+21, UPDATE+28, REFUND+6, ITEMEOB+11, ITEMEOB+27, ITEMEOB+35 , PAYOR+7
$$GET1^DIQ	ITEMEOB+18
^DIR	ITEM+16, CANCEL+14, ERRORCOM+18, ITEMEDIT+17, ITEMEOB+45
$$DIC^XBDIQ1	CANCEL+4, EDIT+4, ERRORCOM+2, UPDATE+5, UPDATE+18, UPDATE+25, ITEMEDIT+5, ITEMEOB+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF") Line Location: BARCLU3+12
Function Call: WRITE	Prompt: !,"Edit / Cancel and Item with Auditing",! Line Location: BARCLU3+13
Function Call: WRITE	Prompt: !!,*7,"Error Comment Required",! Line Location: CANCEL+17
Function Call: WRITE	Prompt: !!,*7,"Error Comment Required",! Line Location: ERRORCOM+12
Function Call: WRITE	Prompt: !,"SELECTION ERROR ... SELECT PAYOR",! Line Location: ITEMEOB+5
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF") Line Location: ITEMEOB+15
Function Call: WRITE	Prompt: !!,"ENTERING ",BARCL(.01) Line Location: ITEMEOB+16
Function Call: WRITE	Prompt: ?30,"TYPE: ",BARCLID(2) Line Location: ITEMEOB+17
Function Call: WRITE	Prompt: ?50,"BATCH TOTAL: ",$$GET1^DIQ(90051.01,BARCLDA,15),!! Line Location: ITEMEOB+18
Function Call: WRITE	Prompt: "ITEM ",BARITDA,?20,BARCLIT(7) Line Location: ITEMEOB+19
Routine Call	DIE Line Location: CANCEL+8 EDIT+9 ERRORCOM+7 UPDATE+13 UPDATE+21 UPDATE+28 REFUND+6 ITEMEOB+11 ITEMEOB+27 ITEMEOB+35 PAYOR+7
Routine Call	DIC Line Location: ITEM+8
Routine Call	DIR Line Location: ITEM+16 CANCEL+14 ERRORCOM+18 ITEMEDIT+17 ITEMEOB+45

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BARCOL(2906 - [#90051.01]	GET1^DIQ

Label References

Name	Line Occurrences
CANCEL	ITEM+18, CANCEL+15, CANCEL+16
CASH	ITEMEDIT+7
CC	ITEMEDIT+8
CHECK	ITEMEDIT+10
DISPLAY	ITEM+13, CANCEL+11, ERRORCOM+10, ITEMEDIT+12
EDIT	ITEM+19
EOB	ITEMEDIT+6, ITEMEOB+46
ERRORCOM	EDIT+2, ERRORCOM+11, ERRORCOM+19
GL	ITEMEDIT+11
ITEM	ITEM+17, ITEM+20
ITEMEDIT	EDIT+12, ITEMEDIT+18
ITEMEOB	ITEMEOB+5
REFUND	ITEMEDIT+9
ROLL	EDIT+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BARAC	ITEMEOB+2, ITEMEOB+4
BARBL	ITEMEDIT+2!
>> BARCL(	ITEMEOB+16
>> BARCL("ID"	CANCEL+6
>> BARCLDA	ITEM+3, ITEM+4, EDIT+6, ERRORCOM+4, UPDATE+4, UPDATE+17, UPDATE+24, ITEMEDIT+4, ITEMEOB+8, ITEMEOB+18
>> BARCLID(12	ITEMEOB+30, PAYOR+4
>> BARCLID(13	ITEMEOB+32
>> BARCLID(2	ITEMEOB+17
>> BARCLIT(	UPDATE+7, UPDATE+8
>> BARCLIT(2	ITEM+12, ITEMEDIT+1, ITEMEOB+14
>> BARCLIT(501	CANCEL+16, ERRORCOM+11
>> BARCLIT(7	ITEMEOB+2, ITEMEOB+19
>> BARDIC	ITEM+3
>> BARI	UPDATE+7, UPDATE+8
>> BARITDA	ITEM+10, CANCEL+5, EDIT+5, ERRORCOM+3, ROLL+1, UPDATE+1, UPDATE+3, UPDATE+30*, ITEMEDIT+3, ITEMEOB+7 , ITEMEOB+19
>> BARITTYP	ITEMEOB+14*
>> BARNEW	UPDATE+1*, UPDATE+30
>> BAROLD	EDIT+5, ERRORCOM+3, ROLL+1*, UPDATE+16
BARQUIT	ITEMEOB+1!, ITEMEOB+41!
>> BARSPAR(2	ITEMEOB+33, ITEMEOB+37
>> BARSPAR(3	REFUND+3
>> BARX	ITEM+12, ITEMEDIT+1, ITEMEDIT+6, ITEMEDIT+7, ITEMEDIT+8, ITEMEDIT+9, ITEMEDIT+10, ITEMEDIT+11
DA	CANCEL+2!, CANCEL+5, EDIT+3!, EDIT+5, ERRORCOM+3, UPDATE+2!, UPDATE+3, UPDATE+15!, UPDATE+16, UPDATE+23! , UPDATE+24, UPDATE+32!, ITEMEDIT+3, ITEMEOB+7
DA(1	ITEM+4, CANCEL+6, EDIT+6, ERRORCOM+4, UPDATE+4, UPDATE+17, ITEMEDIT+4, ITEMEOB+8
DIC	BARCLU3+14!, ITEM+3*, EDIT+3!, UPDATE+2!, UPDATE+15!, UPDATE+23!, UPDATE+32!, PAYOR+3
DIC("A"	ITEM+2*
DIC("S"	ITEM+6*
DIC("W"	ITEM+1*
DIC(0	ITEM+5, ITEM+7
DIDEL	CANCEL+7, CANCEL+9!, EDIT+8, EDIT+10!, ERRORCOM+6, ERRORCOM+8!, UPDATE+12, UPDATE+14!, UPDATE+20, UPDATE+22! , UPDATE+27, UPDATE+29!, REFUND+5, REFUND+7!, ITEMEOB+10, ITEMEOB+12!, ITEMEOB+26, ITEMEOB+28!, ITEMEOB+34, ITEMEOB+36! , PAYOR+6*, PAYOR+8!
DIE	CANCEL+2!, CANCEL+4, EDIT+3!, EDIT+4, ERRORCOM+2, UPDATE+2!, UPDATE+5, UPDATE+15!, UPDATE+18, UPDATE+23! , UPDATE+25, UPDATE+32!, ITEMEDIT+2!, ITEMEDIT+5, ITEMEOB+6, PAYOR+3*
DIR	ITEM+14!, CANCEL+12!, ERRORCOM+14!, ITEMEDIT+13!, ITEMEOB+42!
DIR("A"	ERRORCOM+17, ITEMEDIT+15
DIR("B"	ERRORCOM+16, ITEMEDIT+16, ITEMEOB+44*
DIR(0	ITEM+15, CANCEL+13, ERRORCOM+15, ITEMEDIT+14, ITEMEOB+43*
DR	CANCEL+2!, CANCEL+3, EDIT+3!, EDIT+7, ERRORCOM+5, UPDATE+2!, UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+15! , UPDATE+19, UPDATE+23!, UPDATE+26, UPDATE+32!, CC+2, GL+2, REFUND+2, REFUND+3, REFUND+4, CASH+2 , ITEMEOB+9, ITEMEOB+20, ITEMEOB+29, ITEMEOB+30, ITEMEOB+31, ITEMEOB+32, ITEMEOB+33, PAYOR+2, PAYOR+4, PAYOR+5
>> Y	ITEM+9, ITEM+10, ITEM+17, ITEM+18, CANCEL+15, ERRORCOM+19, UPDATE+1, ITEMEDIT+18, ITEMEOB+4, ITEMEOB+5 , ITEMEOB+46

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARCLU3

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend: