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: BARFPST4

Package: IHS Accounts Receivable

Routine: BARFPST4


Information

BARFPST4 ; IHS/SD/LSL - A/R FLAT RATE POSTING #3 ;

Source Information

Source file <BARFPST4.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Accounts Receivable 2 $$SDT^BARDUTL  EXIT^BARFPST  
IHS VA Utilities 2 ($$VAL,$$VALI,ENP)^XBDIQ1  VIEWR^XBLM  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Accounts Receivable 2 BAR VIEW FLAT RATE BILLS  BARFPST5  

Entry Points

Name Comments DBIA/ICR reference
EN ; EP
; EP - View flate rate posting entries
FRPENTRY ;
ADJHDR ;
; Get and print data for Adjustments in header portion of view
DOC ;
; LSL - 01/01/2000 - Created routine
; Contains code for Reviewing bills in A/R FLAT RATE POSTING File
; May be called from FBL View Flat Rate Bills Option or
; by choosing REVIEW from Select Command Prompt in the
; FRP Flat Rate Posting Option.
REVIEW ; EP
; EP - Review entries
FACLINE ;
; Get facility, if bills under facility, write facility
REVIEW2 ;
; Print Report code used in XBLM call
; Get batch, item, payment, item amount from FRP file
BILLINE ;
; Get bill data and print data line

External References

Name Field # of Occurrence
$$SDT^BARDUTL BILLINE+18
EXIT^BARFPST EN+3
^DIC FRPENTRY+7
$$VAL^XBDIQ1 REVIEW2+18, REVIEW2+25, REVIEW2+27, REVIEW2+29, FACLINE+5
$$VALI^XBDIQ1 BILLINE+6
ENP^XBDIQ1 REVIEW2+9, ADJHDR+9, BILLINE+14
VIEWR^XBLM REVIEW+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FRPENTRY+2
Function Call: WRITE
  • Prompt: !?7,"Batch Name: ",BARREV(BARIEN,.04)
  • Line Location: REVIEW2+21
Function Call: WRITE
  • Prompt: ?50,"Starting Balance: ",$J(BARBEG,9,2)
  • Line Location: REVIEW2+22
Function Call: WRITE
  • Prompt: !?6,"Item Number: ",$$VAL^XBDIQ1(90051.1101,"BARIN1,BARIN2",.01)
  • Line Location: REVIEW2+25
Function Call: WRITE
  • Prompt: ?52,"Ending Balance: ",$J(BAREND,9,2)
  • Line Location: REVIEW2+26
Function Call: WRITE
  • Prompt: !?5,"Check Number: ",$$VAL^XBDIQ1(90051.1101,"BARIN1,BARIN2",11)
  • Line Location: REVIEW2+27
Function Call: WRITE
  • Prompt: ?48,"# of Bills to Post: ",$J(BARC,9)
  • Line Location: REVIEW2+28
Function Call: WRITE
  • Prompt: !?12,"Payor: ",$$VAL^XBDIQ1(90051.1101,"BARIN1,BARIN2",201)
  • Line Location: REVIEW2+29
Function Call: WRITE
  • Prompt: !?3,"Payment Amount: ",$J(BARREV(BARIEN,.09),9,2)
  • Line Location: REVIEW2+30
Function Call: WRITE
  • Prompt: !!,"Bill #",?21,"Patient Name",?41,"Billed Amt",?56,"DOS",?67,"Payor Billed"
  • Line Location: REVIEW2+34
Function Call: WRITE
  • Prompt: !
  • Line Location: REVIEW2+35
Function Call: WRITE
  • Prompt: !,"Adjustment Amount: ",$J(BARREV2(BARIEN,BARA,.03),9,2)
  • Line Location: ADJHDR+10
Function Call: WRITE
  • Prompt: ?35,"Category: ",BARREV2(BARIEN,BARA,.01)
  • Line Location: ADJHDR+11
Function Call: WRITE
  • Prompt: ?60,"Type: ",BARREV2(BARIEN,BARA,.02)
  • Line Location: ADJHDR+12
Function Call: WRITE
  • Prompt: !?10,BARRF,!
  • Line Location: FACLINE+6
Function Call: WRITE
  • Prompt: !,BARREV3(BARVBL,.01)
  • Line Location: BILLINE+15
Function Call: WRITE
  • Prompt: ?21,BARREV3(BARVBL,101)
  • Line Location: BILLINE+16
Function Call: WRITE
  • Prompt: ?43,$J(BARREV3(BARVBL,13),8,2)
  • Line Location: BILLINE+17
Function Call: WRITE
  • Prompt: ?53,$$SDT^BARDUTL(BARREV3(BARVBL,102,"I"))
  • Line Location: BILLINE+18
Function Call: WRITE
  • Prompt: ?66,BARREV3(BARVBL,3)
  • Line Location: BILLINE+19
Routine Call
  • DIC
  • Line Location:
    • FRPENTRY+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BARFRP( REVIEW2+12, REVIEW2+14, REVIEW2+33, REVIEW2+38, FACLINE+6, FACLINE+9

Label References

Name Line Occurrences
ADJHDR REVIEW2+33
BILLINE FACLINE+9
FACLINE REVIEW2+38
FRPENTRY EN+2
REVIEW EN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BARA REVIEW2+11*, REVIEW2+12*, REVIEW2+14, REVIEW2+32*, REVIEW2+33*, REVIEW2+37*, REVIEW2+38*, ADJHDR+5, ADJHDR+10, ADJHDR+11
, ADJHDR+12, FACLINE+4, FACLINE+6, FACLINE+9, BILLINE+4
>> BARB REVIEW2+13*, REVIEW2+14*, FACLINE+7*, FACLINE+9*, BILLINE+5
>> BARBEG REVIEW2+18*, REVIEW2+19, REVIEW2+22
>> BARC REVIEW2+11*, REVIEW2+15*, REVIEW2+19, REVIEW2+28
>> BAREND REVIEW2+19*, REVIEW2+26
>> BARFLAG REVIEW+3*
>> BARIEN FRPENTRY+9*, REVIEW2+5, REVIEW2+12, REVIEW2+14, REVIEW2+16, REVIEW2+17, REVIEW2+19, REVIEW2+21, REVIEW2+30, REVIEW2+33
, REVIEW2+38, ADJHDR+4, ADJHDR+10, ADJHDR+11, ADJHDR+12, FACLINE+3, FACLINE+6, FACLINE+9, BILLINE+3
>> BARIN1 REVIEW2+16*, REVIEW2+24
>> BARIN2 REVIEW2+17*, REVIEW2+24
>> BARNAME FRPENTRY+10*
BARREV REVIEW2+3!
BARREV( REVIEW2+16, REVIEW2+17, REVIEW2+19, REVIEW2+21, REVIEW2+30
BARREV2 ADJHDR+2!
BARREV2( ADJHDR+10, ADJHDR+11, ADJHDR+12
BARREV3 BILLINE+2!
BARREV3( BILLINE+15, BILLINE+16, BILLINE+17, BILLINE+18, BILLINE+19
>> BARRF FACLINE+5*, FACLINE+6
>> BARVBL BILLINE+6*, BILLINE+9, BILLINE+15, BILLINE+16, BILLINE+17, BILLINE+18, BILLINE+19
DA REVIEW2+3!, REVIEW2+5*, REVIEW2+9, REVIEW2+23!, REVIEW2+24*, ADJHDR+2!, ADJHDR+5*, FACLINE+2!, FACLINE+4*, BILLINE+2!
, BILLINE+5*, BILLINE+7!, BILLINE+9*, BILLINE+14
DA(1 REVIEW2+24*, ADJHDR+4*, FACLINE+3*, BILLINE+4*
DA(2 BILLINE+3*
DIC FRPENTRY+3!, FRPENTRY+4*, REVIEW2+3!, REVIEW2+4*, REVIEW2+9, REVIEW2+23!, ADJHDR+2!, ADJHDR+3*, ADJHDR+9, FACLINE+2!
, BILLINE+2!, BILLINE+7!, BILLINE+8*, BILLINE+14
DIC("A" FRPENTRY+6*
DIC(0 FRPENTRY+5*
DIQ REVIEW2+3!, REVIEW2+7*, REVIEW2+9, REVIEW2+23!, ADJHDR+2!, ADJHDR+7*, ADJHDR+9, FACLINE+2!, BILLINE+2!, BILLINE+7!
, BILLINE+12*, BILLINE+14
DIQ(0 REVIEW2+8*, REVIEW2+9, ADJHDR+8*, ADJHDR+9, BILLINE+13*, BILLINE+14
DR REVIEW2+3!, REVIEW2+6*, REVIEW2+9, REVIEW2+23!, ADJHDR+2!, ADJHDR+6*, ADJHDR+9, FACLINE+2!, BILLINE+2!, BILLINE+7!
, BILLINE+11*, BILLINE+14
DUZ(2 REVIEW2+12, REVIEW2+14, REVIEW2+33, REVIEW2+38, FACLINE+6, FACLINE+9
>> Y EN+3, FRPENTRY+8, FRPENTRY+9
>> Y(0 FRPENTRY+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All