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 |  Marked Items |  All
Print Page as PDF
Routine: BARRCHK

Package: IHS Accounts Receivable

Routine: BARRCHK


Information

BARRCHK ; IHS/SD/LSL - Report Utility to Check Parms ;07/23/2010

Source Information

Source file <BARRCHK.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Accounts Receivable 4 TRANS^BARRCHK1  $$CONVERT^BARRSL2  $$GROUPLAN^BARUTL  $$VALI^BARVPM  
DRG Grouper 1 (,$$CODECS,$$CODEFI,$$NUM)^ICDEX  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 13

Package Total Caller Graph
IHS Accounts Receivable 13 BARDRST  BARDYSV1  BARRADJ  BARRAMR  BARRAOI  BARRASM  BARRCXL1  BARRIDR  
BARRLBL  BARRNEGB  BARRPAY  BARRPSRA  BARRTAR  

Entry Points

Name Comments DBIA/ICR reference
DX29(BARDX) ;
ARACCT1
ARACCT
DX210(BARDX) ;
BILL ;EP
; for checking Bill File data parameters
DBGMSG ;
GETICD(BARDX)
DX ; - BAR*1.8*23
GETBI(D0) ;keep D0 intact
TRANS ;EP
DX10(BARDX) ;
DX9(BARDX) ;BARDX=BAR("DX")

External References

Name Field # of Occurrence
TRANS^BARRCHK1 TRANS+1
$$CONVERT^BARRSL2 ARACCT1+21
$$GROUPLAN^BARUTL BILL+26
$$VALI^BARVPM GETBI+2
$$GET1^DIQ BILL+18, BILL+24
^ICDEX GETICD+4
$$CODECS^ICDEX GETICD+6
$$CODEFI^ICDEX GETICD+5
$$NUM^ICDEX DX10+9, DX10+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PATIENT # MATCHES: PAT=",$G(BARY("PAT"))," P=",BAR("P")
  • Line Location: ARACCT+5
Function Call: WRITE
  • Prompt: " HIT=1"
  • Line Location: ARACCT1+42
Function Call: WRITE
  • Prompt: " HIT=0"
  • Line Location: DBGMSG+2
Function Call: WRITE
  • Prompt: !,"CHECKING IF DX ",BARDX," MATCHES CRITERIA FOR SELECTED DXs 9"
  • Line Location: DX29+1
Function Call: WRITE
  • Prompt: !,BARDX," NOT ICD9"
  • Line Location: DX29+7
Function Call: WRITE
  • Prompt: " YES ICD9 "_BAR("DX")
  • Line Location: DX29+12
Function Call: WRITE
  • Prompt: !,"CHECKING IF DX ",BARDX," MATCHES CRITERIA FOR SELECTED DXs 10"
  • Line Location: DX210+1
Function Call: WRITE
  • Prompt: !,BARDX," NOT ICD10"
  • Line Location: DX210+3
Function Call: WRITE
  • Prompt: " YES ICD10 "_BAR("DX")
  • Line Location: DX210+8
Function Call: WRITE
  • Prompt: !,i,". ",BARDX
  • Line Location: DX9+5
Function Call: WRITE
  • Prompt: !,1,". ",BARDX
  • Line Location: DX9+9
Function Call: WRITE
  • Prompt: !,BARI,". ",BARDX
  • Line Location: DX10+6
Function Call: WRITE
  • Prompt: !,1,". ",BARDX
  • Line Location: DX10+12

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)
^BARAC( BILL+49
^BARBL( BILL+5, BILL+7, BILL+8
^TMP($J BILL+6*, BILL+45*, BILL+50*, BILL+53*, ARACCT+2*, ARACCT+4*, ARACCT+7*, ARACCT1+2*, ARACCT1+6*, ARACCT1+8*
, ARACCT1+12*, ARACCT1+14*, ARACCT1+18*, ARACCT1+20*, ARACCT1+23*, ARACCT1+25*, ARACCT1+27*, ARACCT1+32*, ARACCT1+36*, ARACCT1+40*

Label References

Name Line Occurrences
$$GETBI BILL+34
$$GETICD DX29+6, DX210+2
DBGMSG BILL+6, BILL+45, BILL+50, BILL+53, ARACCT+2, ARACCT+4, ARACCT+7, ARACCT1+2, ARACCT1+6, ARACCT1+8
, ARACCT1+12, ARACCT1+14, ARACCT1+18, ARACCT1+20, ARACCT1+23, ARACCT1+25, ARACCT1+27, ARACCT1+32, ARACCT1+36, ARACCT1+40
DX ARACCT1+16
DX10 DX210+6
DX210 DX+8, DX+9
DX29 DX+7, DX+9
DX9 DX29+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BAR BILL+5, BILL+6, BILL+7, BILL+8, BILL+18, BILL+24, BILL+26, BILL+45, BILL+50, BILL+53
, ARACCT+2, ARACCT+4, ARACCT+7, ARACCT1+2, ARACCT1+6, ARACCT1+8, ARACCT1+12, ARACCT1+14, ARACCT1+18, ARACCT1+20
, ARACCT1+23, ARACCT1+25, ARACCT1+27, ARACCT1+32, ARACCT1+36, ARACCT1+40
>> BAR("""GRP""" ARACCT1+8
>> BAR("A" BILL+14*, ARACCT1+34, ARACCT1+35
>> BAR("ALL" BILL+37*, BILL+38*, BILL+39*, BILL+40*, BILL+41*, BILL+42*, BILL+43*, ARACCT1+22, ARACCT1+23
>> BAR("BI" BILL+34*, BILL+35*, BILL+36, BILL+38, BILL+39, BILL+40, BILL+41, BILL+42, ARACCT1+17, ARACCT1+19
>> BAR("C" BILL+17*, BILL+48*, ARACCT1+24
>> BAR("D" BILL+13*, BILL+44, BILL+45, ARACCT1+30, ARACCT1+31
>> BAR("DS" BILL+18*, ARACCT1+10*, ARACCT1+11, ARACCT1+13
>> BAR("DX" BILL+23!, BILL+24*, BILL+25*, BILL+27*, ARACCT1+16, DX+1*, DX+5, DX+6, DX29+5*, DX29+9*
, DX29+10, DX29+11*, DX29+12, DX210+5*, DX210+6, DX210+7*, DX210+8, DX9+2*, DX9+8*, DX10+3*
, DX10+11*
>> BAR("GRP" BILL+26*, ARACCT1+4, ARACCT1+7
>> BAR("I" BILL+11*, BILL+33, BILL+44, BILL+45, BILL+49, ARACCT+1, ARACCT1+1
>> BAR("L" BILL+10*, BILL+44, BILL+45, BILL+52
>> BAR("P" BILL+12*, BILL+44, BILL+45, ARACCT+3
>> BAR("PD" BILL+15*, ARACCT1+38, ARACCT1+39
>> BAR("PV" BILL+16*, ARACCT+6
>> BAR("QUIT" ARACCT1+28!, ARACCT1+29, ARACCT1+30*, ARACCT1+31*, ARACCT1+32, ARACCT1+33, ARACCT1+34*, ARACCT1+35*, ARACCT1+36, ARACCT1+37
, ARACCT1+38*, ARACCT1+39*, ARACCT1+40
>> BAR("RTN" BILL+4
>> BAR("SUBR" BILL+4*, BILL+6, BILL+45, BILL+50, BILL+53, ARACCT+2, ARACCT+4, ARACCT+7, ARACCT1+2, ARACCT1+6
, ARACCT1+8, ARACCT1+12, ARACCT1+14, ARACCT1+18, ARACCT1+20, ARACCT1+23, ARACCT1+25, ARACCT1+27, ARACCT1+32, ARACCT1+36
, ARACCT1+40
>> BAR("V" BILL+9*, BILL+47*, ARACCT1+26
>> BAR(0 BILL+7*, BILL+11, BILL+14, BILL+15
>> BAR(1 BILL+8*, BILL+9, BILL+10, BILL+12, BILL+13, BILL+16, BILL+17
>> BARDBG DX+4*, DX29+1, DX29+7, DX29+12, DX210+1, DX210+3, DX210+8, DX9+5, DX9+9, DX10+6
, DX10+12
>> BARDEBUG BILL+2*, BILL+6, BILL+45, BILL+50, BILL+53, ARACCT+2, ARACCT+4, ARACCT+7, ARACCT1+2, ARACCT1+6
, ARACCT1+8, ARACCT1+12, ARACCT1+14, ARACCT1+18, ARACCT1+20, ARACCT1+23, ARACCT1+25, ARACCT1+27, ARACCT1+32, ARACCT1+36
, ARACCT1+40, ARACCT1+42, DBGMSG+1
BARDX DX+2~, DX+6*, DX+7, DX+8, DX+9, DX29~, DX29+1, DX29+6, DX29+7, DX29+10
, DX29+11, DX210~, DX210+1, DX210+2, DX210+3, DX210+6, DX210+7, DX9~, DX9+4, DX9+5
, DX9+8, DX9+9, DX10~, DX10+5, DX10+6, DX10+9, DX10+10, DX10+12, GETICD~, GETICD+2
, GETICD+3, GETICD+5, GETICD+6
BARDXY DX9+1~, DX9+4*, DX10+1~, DX10+5*
BARFILE GETICD+1~, GETICD+5*, GETICD+6
BARI DX10+1~, DX10+5*, DX10+6
BAROK DX9+1~, DX9+2, DX9+3*, DX9+4*, DX10+1~, DX10+3, DX10+4*, DX10+5*
>> BARP("HIT" BILL+3*, ARACCT1+41*
>> BARTMP BILL+33*, BILL+34, ARACCT1+5*, ARACCT1+6
BARX GETICD+1~, GETICD+6*, GETICD+7
>> BARY("ACCT" ARACCT1+1
>> BARY("ALL" ARACCT1+21*, ARACCT1+22, ARACCT1+23
>> BARY("ARACCT" ARACCT+1
>> BARY("CLIN" ARACCT1+24
>> BARY("DSCH" ARACCT1+10, ARACCT1+11
>> BARY("DSVC" ARACCT1+13
>> BARY("DT" ARACCT1+29, ARACCT1+30, ARACCT1+31, ARACCT1+33, ARACCT1+34, ARACCT1+35, ARACCT1+37, ARACCT1+38, ARACCT1+39
>> BARY("DX-ICDVER" DX+7, DX+8, DX+9
>> BARY("DX10" ARACCT1+16, DX210+5, DX210+6, DX10+3, DX10+5, DX10+7, DX10+8, DX10+9, DX10+10
>> BARY("DX9" ARACCT1+16, DX29+9, DX29+10, DX9+2, DX9+4, DX9+6, DX9+7, DX9+8
>> BARY("GRP PLA N" , ARACCT1+4, ARACCT1+7
>> BARY("ITYP" ARACCT1+19
>> BARY("LOC" BILL+52
>> BARY("PAT" ARACCT+3
>> BARY("PRV" ARACCT+6
>> BARY("SORT" BILL+47, BILL+48
>> BARY("TYP" ARACCT1+17
>> BARY("VTYP" ARACCT1+26
>> BARYTOTY("DX10" DX210+9*
>> BARYTOTY("DX9" DX29+13*
D0 GETBI~, GETBI+1
DUZ(2 BILL+5, BILL+7, BILL+8, BILL+49
I DX+2~, DX+5*, DX+6
U BILL+9, BILL+10, BILL+11, BILL+12, BILL+13, BILL+14, BILL+15, BILL+16, BILL+17, BILL+26
, BILL+45, ARACCT1+4, ARACCT1+17
>> i DX9+4*, DX9+5

Marked Items

Name Field # of Occurrence
$T( GETICD+4
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 |  Marked Items |  All