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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BARPST2

Package: IHS Accounts Receivable

Routine: BARPST2


Information

BARPST2 ; IHS/SD/LSL - PAYMENT PATIENT SELECTION JAN 15,1997 ; 05/07/2008

Source Information

Source file <BARPST2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS Accounts Receivable 5 $$SDT^BARDUTL  $$DUPLBILL^BARPNP2  SUBHD^BARPST2  ($$FIND3PB,EOP)^BARUTL  $$EN^BARVDF  
IHS VA Utilities 1 EN^XBDIQ1  
VA Fileman 1 C^%DTC  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
IHS Accounts Receivable 7 BARACSI  BARFPST3  BARPRF3A  BARPST  BARPST2  BARPST3  BARPST3A  

Entry Points

Name Comments DBIA/ICR reference
HEAD ;
B2 ;
HEAD1 ;
HIT1(BARPASS) ; EP
; ** display a/r bills found
EN(BARPASS)
EHEAD ;
EXIT ;
B1 ;
SUBHD(BARCOL,BARITM,BARPMT) ; EP
HIT(BARPASS) ; EP
; ** display a/r bills found
CHKLINE(BARHD) ;
; Q 0 = CONTINUE
; Q 1 = STOP
ECHKLINE ;

External References

Name Field # of Occurrence
C^%DTC EN+10
$$SDT^BARDUTL HIT+29, HEAD+6, HIT1+28, HEAD1+6
$$DUPLBILL^BARPNP2 HIT+14, HIT1+14
SUBHD^BARPST2 HEAD1+8
$$FIND3PB^BARUTL HIT+25, HIT1+25
EOP^BARUTL CHKLINE+6
$$EN^BARVDF HEAD+1, HEAD1+1
EN^XBDIQ1 EN+20, SUBHD+9, SUBHD+16, SUBHD+25

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$EN^BARVDF("IOF"),!
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: "Claims for "_BARPTNAM_" from "_$$SDT^BARDUTL($P(BARPASS,U,2))_" to "_$$SDT^BARDUTL($P(BARPASS,U,3))
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: ?(IOM-15),"Page: "_BARPG,!!
  • Line Location: HEAD+7
Function Call: WRITE
  • Prompt: !!?32,"Billed",?70,"Current"
  • Line Location: HEAD+10
Function Call: WRITE
  • Prompt: !,"Line #",?8,"DOS",?18,"Claim #",?32,"Amount",?44,"Billed To",?70,"Balance"
  • Line Location: HEAD+11
Function Call: WRITE
  • Prompt: !,BARDSH
  • Line Location: HEAD+14
Function Call: WRITE
  • Prompt: "Batch : "_$E($P(BARCLV(.01),"-",1),1,19)
  • Line Location: SUBHD+27
Function Call: WRITE
  • Prompt: ?27,"Item : "_BARITV(.01)
  • Line Location: SUBHD+28
Function Call: WRITE
  • Prompt: ?50,"Location: "_BAREOV(.01)
  • Line Location: SUBHD+29
Function Call: WRITE
  • Prompt: !,"Amount : "_$J(BARCLV(15),8,2)
  • Line Location: SUBHD+30
Function Call: WRITE
  • Prompt: ?27,"Amount : "_$J(BARITV(101),8,2)
  • Line Location: SUBHD+32
Function Call: WRITE
  • Prompt: ?50," Amount : "_$J(BAREOV(2),8,2)
  • Line Location: SUBHD+33
Function Call: WRITE
  • Prompt: !,"Posted : "_$J(BARCLV(16)+BARPMT,8,2)
  • Line Location: SUBHD+34
Function Call: WRITE
  • Prompt: ?27,"Posted : "_$J(BARITV(18)+BARPMT,8,2)
  • Line Location: SUBHD+36
Function Call: WRITE
  • Prompt: ?50," Posted : "_$J(BAREOV(3)+BARPMT,8,2)
  • Line Location: SUBHD+37
Function Call: WRITE
  • Prompt: !,"Unalloc: "_$J(BARCLV(21),8,2)
  • Line Location: SUBHD+38
Function Call: WRITE
  • Prompt: ?27,"Unalloc: "_$J(BARITV(105),8,2)
  • Line Location: SUBHD+39
Function Call: WRITE
  • Prompt: ?50," Unalloc: "_$J(BAREOV(5),8,2)
  • Line Location: SUBHD+40
Function Call: WRITE
  • Prompt: !
  • Line Location: SUBHD+41
Function Call: WRITE
  • Prompt: "Balance: "_$J(BARCLV(17)-BARPMT,8,2)
  • Line Location: B1+1
Function Call: WRITE
  • Prompt: ?27,"Balance: "_$J(BARITV(19)-BARPMT,8,2)
  • Line Location: B1+2
Function Call: WRITE
  • Prompt: ?50," Balance: "_$J(BAREOV(4)-BARPMT,8,2)
  • Line Location: B2+1
Function Call: WRITE
  • Prompt: $$EN^BARVDF("IOF"),!
  • Line Location: HEAD1+1
Function Call: WRITE
  • Prompt: "Claims for "_BARPTNAM_" from "_$$SDT^BARDUTL($P(BARPASS,U,2))_" to "_$$SDT^BARDUTL($P(BARPASS,U,3))
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: ?(IOM-15),"Page: "_BARPG,!!
  • Line Location: HEAD1+7
Function Call: WRITE
  • Prompt: !!?40,"Billed",?50,"Current",?61,"Current",?72,"Current"
  • Line Location: HEAD1+9
Function Call: WRITE
  • Prompt: !,"Line #",?8,"DOS",?18,"Claim #",?40,"Amount",?50,"Paymnts",?62,"Adjust",?72,"Balance"
  • Line Location: HEAD1+10
Function Call: WRITE
  • Prompt: !,BARDSH
  • Line Location: HEAD1+13
Function Call: WRITE
  • Prompt: !?(IOM-15),"continued==>"
  • Line Location: CHKLINE+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( HIT+26, HIT1+26
^BARBL( EN+16, EN+18
^BARTMP($J EN+3!, EN+23*, EN+24*, EN+26!, EN+28!, HIT+5, HIT+6, HIT+7, HIT1+5, HIT1+6
, HIT1+7
^BARTR( HIT+9, HEAD+5, HIT1+8, HEAD1+5
^DPT - [#2] HEAD+4, HEAD1+4

Label References

Name Line Occurrences
$$CHKLINE HIT+10, HIT1+11
HEAD HIT+4, CHKLINE+8
HEAD1 HIT1+4, CHKLINE+9
SUBHD HEAD+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BARBDA EN+17*, EN+18*, EN+19, EN+23, EN+24, EN+26, EN+28, HIT+2~, HIT+3*, HIT+5*
, HIT+6, HIT+7, HIT+19, HIT+20, HIT+21, HIT+22, HIT+25
BARBEG EN+2~, EN+6*, EN+8
BARBLO HIT+2~, HIT+8*, HIT+9*, HIT+18*, HIT+19*, HIT+20*, HIT+21*, HIT+22*, HIT+31, HIT1+2~
, HIT1+8*, HIT1+18*, HIT1+19*, HIT1+20*, HIT1+21*, HIT1+22*, HIT1+28
BARBLV EN+2~, EN+31!
BARBLV( EN+23
BARBLV(13 EN+23
BARBLV(15 EN+23, EN+25
BARBLV(16 EN+22, EN+23, EN+25, EN+30
BARBLV(3 EN+23
BARCLV SUBHD+3!
BARCLV( SUBHD+27
BARCLV(15 SUBHD+30
BARCLV(16 SUBHD+34
BARCLV(17 B1+1
BARCLV(21 SUBHD+38
>> BARCMSG HIT+12*, HIT+13*, HIT+31, HIT1+12*, HIT1+13*, HIT1+30
BARCNT EN+2~, EN+15*, EN+21*, EN+23, EN+24, EN+26, EN+28, EN+29*, EN+30*, EN+32
BARCOL HEAD+9, SUBHD~, SUBHD+1, SUBHD+8, SUBHD+15, SUBHD+23, HEAD1+8
BARDPTR HIT+2~, HIT+17*, HIT+18, HIT+19, HIT+20, HIT1+2~, HIT1+17*, HIT1+18, HIT1+19, HIT1+20
>> BARDSH HEAD+12*, HEAD+13*, HEAD+14, HEAD1+11*, HEAD1+12*, HEAD1+13
BARDT EN+2~, EN+11*, EN+16*, EN+18, EN+23
BAREIN1 HIT+2~, HIT+15*, HIT+19, HIT+21, HIT1+2~, HIT1+15*, HIT1+19, HIT1+21
BAREIN2 HIT+2~, HIT+16*, HIT+20, HIT+22, HIT1+2~, HIT1+16*, HIT1+20, HIT1+22
BAREND EN+2~, EN+7*, EN+16
>> BAREOB SUBHD+18, SUBHD+22, SUBHD+29, SUBHD+33, SUBHD+37, SUBHD+40, B2+1
BAREOV SUBHD+3!
BAREOV( SUBHD+29
BAREOV(2 SUBHD+33
BAREOV(3 SUBHD+37
BAREOV(4 B2+1
BAREOV(5 SUBHD+40
BARHD CHKLINE~, CHKLINE+8, CHKLINE+9
BARHIT EN+2~, HIT1+2~, HIT1+3*, HIT1+5*, HIT1+6, HIT1+7, HIT1+19, HIT1+20, HIT1+21, HIT1+22
, HIT1+25
BARITM HEAD+9, SUBHD~, SUBHD+14, SUBHD+24, HEAD1+8
BARITV SUBHD+3!
BARITV( SUBHD+28
BARITV(101 SUBHD+32
BARITV(105 SUBHD+39
BARITV(18 SUBHD+36
BARITV(19 B1+2
BARLIN HIT+2~, HIT+6*, HIT+7, HIT+28, HIT1+2~, HIT1+6*, HIT1+7, HIT1+28
BARPASS EN~, EN+4, EN+5, EN+6, EN+7, HIT~, HEAD+4, HEAD+5, HEAD+6, HIT1~
, HEAD1+4, HEAD1+5, HEAD1+6
BARPAT EN+2~, EN+5*, EN+16, EN+18
>> BARPG HIT+3*, HEAD+3*, HEAD+7, HIT1+3*, HEAD1+3*, HEAD1+7
BARPMT HEAD+9, SUBHD~, SUBHD+34, SUBHD+36, SUBHD+37, B1+1, B1+2, B2+1, HEAD1+8
BARPTNAM HEAD+2~, HEAD+4*, HEAD+5*, HEAD+6, HEAD1+2~, HEAD1+4*, HEAD1+5*, HEAD1+6
BARREC HIT+2~, HIT+7*, HIT+8, HIT+13, HIT+14, HIT+29, HIT+32, HIT+33, HIT+34, HIT1+2~
, HIT1+7*, HIT1+8, HIT1+9, HIT1+10, HIT1+13, HIT1+14, HIT1+28, HIT1+31, HIT1+32, HIT1+33
, HIT1+34
>> BARSTAT HIT+26*, HIT+31, HIT1+26*, HIT1+29
>> BARSTOP HIT+3*, HIT+5, HIT+10*, HIT+11, HIT1+3*, HIT1+5, HIT1+11*
>> BARTADJ HIT1+3*, HIT1+10*
>> BARTMP HIT+14*, HIT+15, HIT+16, HIT+17, HIT1+14*, HIT1+15, HIT1+16, HIT1+17
>> BARTPAY HIT1+3*, HIT1+9*
>> BARTPB HIT+25*, HIT+26, HIT1+25*, HIT1+26
DA EN+19*, SUBHD+4~, SUBHD+8*, SUBHD+14*, SUBHD+22*
DA(1 SUBHD+15*, SUBHD+24*
DA(2 SUBHD+23*
DIC EN+2~, EN+12*, SUBHD+4~, SUBHD+5*, SUBHD+11*, SUBHD+19*
DIQ EN+2~, EN+14*, SUBHD+4~, SUBHD+6*, SUBHD+12*, SUBHD+20*
DR EN+2~, EN+13*, SUBHD+4~, SUBHD+7*, SUBHD+13*, SUBHD+21*
DUZ(2 EN+16, EN+18, HIT+9, HIT+25, HEAD+5, HIT1+8, HIT1+25, HEAD1+5
IOM HEAD+7, HEAD+13, HEAD1+7, HEAD1+12, CHKLINE+5
IOSL CHKLINE+4
U EN+6, EN+7, EN+23, HIT+8, HIT+13, HIT+14, HIT+26, HIT+29, HIT+32, HIT+33
, HIT+34, HEAD+4, HEAD+6, HIT1+8, HIT1+9, HIT1+10, HIT1+13, HIT1+14, HIT1+26, HIT1+28
, HIT1+31, HIT1+32, HIT1+33, HIT1+34, HEAD1+4, HEAD1+6
X EN+11, CHKLINE+3~
>> X1 EN+8*
>> X2 EN+9*
>> Y CHKLINE+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All