Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BAR50P05

Package: IHS Accounts Receivable

Routine: BAR50P05


Information

BAR50P05 ; IHS/SD/LSL - REVIEW CLAIM STATUS ;

Source Information

Source file <BAR50P05.m>

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  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Accounts Receivable 1 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 ;BAR*1.8*6 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

FileMan Files Accessed Via FileMan Db Call

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

Label References

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All