Routine: BAR50P05

Call Graph

Call Graph Total: 19

Package	Total	Call Graph
IHS Accounts Receivable	8	NEGBAL^BAR50EB NONPAYCH^BAR50EP1 (CLMFLG,DELREAS)^BAR50P04 $$EN^BAR50P0Z ^BARBLLK ($$MDT,MSG)^BARDUTL PAZ^BARRUTL $$IHSNEGB^BARUFUT
Registration	5	EN^VALM TERM^VALM0 CLEAR^VALM1 SET^VALM10 EN^VALM2
VA Fileman	3	^DIE $$GET1^DIQ ^DIR
Kernel	2	($$CJ,$$REPEAT)^XLFSTR DISP^XQORM1
IHS VA Utilities	1	($$DIC,ENP)^XBDIQ1

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAR50P00

Package

Total

Caller Graph

IHS Accounts Receivable

BAR50P00

Entry Points

Name	Comments	DBIA/ICR reference
RESET	; EP ; rebuilds array after action
CLAIM	;
EN	; EP
HDR	; EP ; header code
GATHER(IMPDA)	; ; SUBRTN to set data into array
PAD(D,L)	; ; -- SUBRTN to pad length of data ; -- D=data L=length
SP(N)	; -- SUBRTN to pad N number of spaces
REPROCES(IMPDA)	;EP - RE-PROCESS ERA FILE
VIEW	;EP
EXPND	; EP ; expand code
BROWSE	; Called from Listman screen BAR ERA Claim Review
INIT	; EP ; init variables and list array
EXIT	; EP ; exit code
GETRECRD(XCLM)	;
GETITEM	; -- select item from list
AUTOREV	;EP - AUTO REVIEW ;BAR1.86 SCR120 ADD LIST MANAGER PROMPT FOR AUTO-REVIEW
HELP	; EP ; help code

External References

Name	Field # of Occurrence
NEGBAL^BAR50EB	AUTOREV+12
NONPAYCH^BAR50EP1	AUTOREV+14
CLMFLG^BAR50P04	AUTOREV+9
DELREAS^BAR50P04	GETRECRD+59
$$EN^BAR50P0Z	AUTOREV+10
^BARBLLK	GETRECRD+44
$$MDT^BARDUTL	GATHER+25
MSG^BARDUTL	HELP+4
PAZ^BARRUTL	GATHER+64, VIEW+12
$$IHSNEGB^BARUFUT	AUTOREV+14
^DIE	GETRECRD+42, GETRECRD+52, GETRECRD+58, GETRECRD+66
$$GET1^DIQ	CLAIM+11, CLAIM+17, CLAIM+18, VIEW+11
^DIR	GETRECRD+20, GETRECRD+26, GETRECRD+35
EN^VALM	EN+4
TERM^VALM0	RESET+2
CLEAR^VALM1	BAR50P05+10, EXIT+2, AUTOREV+2, VIEW+5
SET^VALM10	GATHER+38, GATHER+43, GATHER+48, GATHER+53, GATHER+57
EN^VALM2	GETITEM+3, VIEW+3
$$DIC^XBDIQ1	GETRECRD+38, GETRECRD+48, GETRECRD+54, GETRECRD+62
ENP^XBDIQ1	CLAIM+2, CLAIM+7, GETRECRD+9
$$CJ^XLFSTR	GATHER+42, GATHER+47
$$REPEAT^XLFSTR	PAD+3
DISP^XQORM1	HELP+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Cannot change the status of a POSTED claim" Line Location: GETRECRD+10
Function Call: WRITE	Prompt: !!,"Please run the BLMT option or Run Auto-Review first to do auto-matching" Line Location: GETRECRD+11
Function Call: WRITE	Prompt: !,"Do you wish to change the status of claim ",$G(CLAIM($J,.01)) Line Location: GETRECRD+12
Function Call: WRITE	Prompt: " (# "_XCLMDA_" )" Line Location: GETRECRD+13
Routine Call	VALM Line Location: EN+4
Routine Call	DIE Line Location: GETRECRD+42 GETRECRD+52 GETRECRD+58 GETRECRD+66
Routine Call	DIR Line Location: GETRECRD+20 GETRECRD+26 GETRECRD+35

FileNo	Call Tags
90056.0205	GET1^DIQ
90056.0205401	GET1^DIQ
^BARERR - [#90056.21]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BARECHK - [#90056.22]	HDR+8
^BAREDI("1T" - [#90056.01]	HDR+3
^BAREDI("I"	HDR+2, HDR+7, GATHER+14, GATHER+15, CLAIM+15, AUTOREV+5
^TMP($J	EN+3!, EXIT+3!, GATHER+2!, GATHER+3!, GATHER+18, GATHER+21, GATHER+22, GATHER+32, GATHER+33, GATHER+41 , GATHER+46, GATHER+47, GATHER+61, CLAIM+3, CLAIM+6!, CLAIM+9, CLAIM+11, CLAIM+18*, GETITEM+2, GETITEM+8 , VIEW+2, VIEW+9
^XTMP("BAR-LIST"	AUTOREV+4!, AUTOREV+5*, AUTOREV+7, AUTOREV+9

Name	Line Occurrences
$$PAD	HDR+4, HDR+9, GATHER+28, GATHER+29, GATHER+34, GATHER+35, GATHER+37, GATHER+52, SP+1
CLAIM	GATHER+14, GATHER+15
GATHER	INIT+2, GETITEM+10, AUTOREV+15
GETITEM	BROWSE+2
GETRECRD	GETITEM+9
HDR	RESET+4
INIT	RESET+4
REPROCES	GETRECRD+60

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AFLD	GATHER+30!
AFLD(	GATHER+33*, GATHER+34, GATHER+35
>> AFN	GATHER+31, GATHER+32, GATHER+33
>> ALIST	GATHER+9*, GATHER+10, CLAIM+7
>> ARECORD	GATHER+31, GATHER+34, GATHER+35, GATHER+51, GATHER+52, GATHER+53
>> BARBL	AUTOREV+6, AUTOREV+7, AUTOREV+9
>> BARBLDA	GETRECRD+46
>> BARCHK	HDR+8, GATHER+14
>> BARCKIEN	HDR+8
>> BARFLG	AUTOREV+10*
>> BLANKLNE	GATHER+56*, GATHER+57
>> CHDR	HDR+8*, HDR+9
CLAIM	BROWSE+1!
CLAIM(	GETRECRD+10, GETRECRD+11, GETRECRD+12, GETRECRD+14, GETRECRD+15, GETRECRD+16, GETRECRD+17, GETRECRD+22, GETRECRD+25, GETRECRD+47 , GETRECRD+61
>> CLMCNT	AUTOREV+6*
CLMDA	GATHER+13, GATHER+14, GATHER+15, CLAIM+8, CLAIM+9, CLAIM+15, CLAIM+16, AUTOREV+1~, AUTOREV+3, AUTOREV+5* , AUTOREV+8, AUTOREV+9
>> COUNT	GATHER+6, GATHER+37, GATHER+38, GATHER+43, GATHER+48, GATHER+53, GATHER+57, GATHER+59
D	PAD~, PAD+3
>> DA	GETRECRD+40, GETRECRD+50, GETRECRD+56, GETRECRD+64
>> DA(1	GETRECRD+39, GETRECRD+49, GETRECRD+55, GETRECRD+63
>> DIE	GETRECRD+38, GETRECRD+48, GETRECRD+54, GETRECRD+62
DIR	GETRECRD+18!, GETRECRD+21!, GETRECRD+23!, GETRECRD+27!, GETRECRD+31!, GETRECRD+36!
DIR("A"	GETRECRD+25, GETRECRD+33
DIR("B"	GETRECRD+34*
DIR(0	GETRECRD+19, GETRECRD+24, GETRECRD+32*
>> DIROUT	GETRECRD+29
>> DIRUT	GETRECRD+29
>> DR	GETRECRD+41, GETRECRD+51, GETRECRD+57, GETRECRD+65
>> DTOUT	GETRECRD+29
>> DUOUT	GETRECRD+29
DUZ(2	HDR+2, HDR+7, GATHER+14, GATHER+15, CLAIM+15, AUTOREV+4, AUTOREV+5, AUTOREV+7, AUTOREV+9, AUTOREV+14
ECLM	GATHER+4!
EFLD	GATHER+19!
EFLD(	GATHER+22, GATHER+24, GATHER+25, GATHER+26, GATHER+28, GATHER+29
>> EFN	GATHER+20, GATHER+21, GATHER+22
>> ELIST	GATHER+8*, GATHER+10, CLAIM+2, GETRECRD+9
>> ERECORD	GATHER+20, GATHER+28, GATHER+29, GATHER+37, GATHER+38
ERRORS	EN+1~, AUTOREV+9
ERRS	AUTOREV+9!
>> FHDR	HDR+2, HDR+4, HDR+7, HDR+9
>> IENS	CLAIM+8, CLAIM+11, VIEW+10, VIEW+11
IMPDA	HDR+2, HDR+7, INIT+2, GATHER~, GATHER+14, GATHER+15, CLAIM+8, CLAIM+15, CLAIM+16, GETITEM+10 , GETRECRD+39, GETRECRD+49, GETRECRD+55, GETRECRD+59, GETRECRD+60, GETRECRD+63, REPROCES~, AUTOREV+5, AUTOREV+10, AUTOREV+12 , AUTOREV+14, AUTOREV+15, VIEW+10
IOM	GATHER+42, GATHER+47
L	PAD~, PAD+3
>> LINE	GATHER+6, GATHER+60, CLAIM+3, CLAIM+6, CLAIM+9, CLAIM+11, CLAIM+18, CLAIM+19*
>> LN	INIT+3, GATHER+6, GATHER+38, GATHER+39, GATHER+43, GATHER+44, GATHER+48, GATHER+49, GATHER+53, GATHER+54* , GATHER+57, GATHER+58*
N	SP~, SP+1
>> NEWSTAT	GETRECRD+15, GETRECRD+16, GETRECRD+17, GETRECRD+30, GETRECRD+43, GETRECRD+47, GETRECRD+61
REASCODE	CLAIM+13~, CLAIM+17*, CLAIM+18
REASDA	GATHER+45, GATHER+46, GATHER+47, CLAIM+13~, CLAIM+14, CLAIM+15, CLAIM+16, CLAIM+18
REASIENS	CLAIM+13~, CLAIM+16*, CLAIM+17, CLAIM+18
>> RECNM	GATHER+5*
>> RHEADER	GATHER+42*, GATHER+43
>> RN	GATHER+17, GATHER+18, GATHER+21, GATHER+22, GATHER+32, GATHER+33, GATHER+41, GATHER+46, GATHER+47
RPT	CLAIM+1!, CLAIM+4, CLAIM+5, CLAIM+6
RRECORD	GATHER+4!, GATHER+47*, GATHER+48
>> STATUS	CLAIM+3*, CLAIM+4
>> THDR	HDR+3, HDR+4, HDR+6, HDR+9
>> TRDA	HDR+3
>> TRNAME	HDR+5, HDR+6, GATHER+14, GATHER+15
U	HDR+7, HDR+8, GATHER+47, CLAIM+18, AUTOREV+5
>> VALMBCK	RESET+3*
>> VALMCNT	INIT+3*
>> VALMHDR(1	HDR+4, HDR+9
>> VALMLST	GETITEM+1, GETITEM+2, VIEW+1, VIEW+2
>> VALMQUIT	GATHER+62*
>> VALMY	GETITEM+4, VIEW+4
>> VALMY(	GETITEM+7, VIEW+8
>> WHOLELST	GATHER+10*
>> X	HELP+2*
XCLM	GETITEM+8, GETITEM+9, GETRECRD~, GETRECRD+40, GETRECRD+50, GETRECRD+56, GETRECRD+59, GETRECRD+64, VIEW+9, VIEW+10
XCLMDA	GETITEM+5~, GETITEM+6, GETITEM+7, GETITEM+8, GETRECRD+13, VIEW+6~, VIEW+7, VIEW+8, VIEW+9
>> XQORNOD(0	GETITEM+3, VIEW+3
>> Y	GETRECRD+28, GETRECRD+30, GETRECRD+37

Customize PDF page

Package: IHS Accounts Receivable

Routine: BAR50P05

Information

Source Information

Call Graph

Call Graph Total: 19

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: