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

Package: IHS Accounts Receivable

Routine: BARMPAS5


Information

BARMPAS5 ;IHS/SD/PKD - Patient Account Statement ;

Source Information

Source file <BARMPAS5.m>

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Accounts Receivable 3 BARFX001  BARMPAS2  BARMPAS3  

Entry Points

Name Comments DBIA/ICR reference
DOIT ;
TEST ;TEST - NO RE-NDEXING
FIXPAS ;
DELETE(BARFILE) ;
REINDEX(BARFILE) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Cannot get lock on ^TMP($J,'BARPAS_REINDEX') - cannot reindex."
  • Line Location: FIXPAS+2
Function Call: WRITE
  • Prompt: !,BARCNT,". ",BARFILE
  • Line Location: FIXPAS+5
Function Call: WRITE
  • Prompt: " file is ok - no re-indexing needed"
  • Line Location: FIXPAS+9
Function Call: WRITE
  • Prompt: !,"CANNOT GET LOCK OF ^XTMP(",BARFILE
  • Line Location: DOIT+2
Function Call: WRITE
  • Prompt: !,"FILE ",BARFILE," WILL BE NOW RE-INDEXED"
  • Line Location: DOIT+3
Function Call: WRITE
  • Prompt: " .... DONE"
  • Line Location: DOIT+14
Function Call: WRITE
  • Prompt: !,"FILE ",BARFILE," WILL BE REMOVED. HAS INVALID SORTING ORDER: ",BARSRTBY
  • Line Location: DELETE+1
Function Call: WRITE
  • Prompt: !,"THIS IS A TEST RUN TO SIMULATE RE-IDEXING."
  • Line Location: TEST+1
Function Call: WRITE
  • Prompt: !,"NO CHANGES IN ^XTMP WILL BE DONE."
  • Line Location: TEST+2
Function Call: WRITE
  • Prompt: !,BARCNT,". ",BARFILE
  • Line Location: TEST+5
Function Call: WRITE
  • Prompt: !,"FILE ",BARFILE," SHOULD BE NOW RE-INDEXED"
  • Line Location: TEST+8
Function Call: WRITE
  • Prompt: !,"FILE ",BARFILE," SHOULD BE NOW RE-INDEXED"
  • Line Location: TEST+10
Function Call: WRITE
  • Prompt: " NO ADJUSTMENT NEEDED"
  • Line Location: TEST+11
Function Call: WRITE
  • Prompt: !,"ALL DONE"
  • Line Location: TEST+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J FIXPAS+1, FIXPAS+10, DOIT+1!, DOIT+4*, DOIT+6*, DOIT+8*, DOIT+9*, DOIT+11, DOIT+12!
^XTMP( FIXPAS+4, FIXPAS+6, DOIT+2, DOIT+4, DOIT+5, DOIT+6, DOIT+10!, DOIT+11*, DOIT+13, DELETE+2!
, TEST+4, TEST+6

Label References

Name Line Occurrences
DELETE FIXPAS+8
DOIT REINDEX+1
REINDEX FIXPAS+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BARCNT FIXPAS+3*, FIXPAS+5*, TEST+3*, TEST+5*
BARFILE FIXPAS+4*, FIXPAS+5, FIXPAS+6, FIXPAS+7, FIXPAS+8, REINDEX~, DOIT+2, DOIT+3, DOIT+4, DOIT+5
, DOIT+6, DOIT+8, DOIT+9, DOIT+10, DOIT+11, DOIT+12, DOIT+13, DELETE~, DELETE+1, DELETE+2
, TEST+4*, TEST+5, TEST+6, TEST+8, TEST+10
>> BARLOC DOIT+5*, DOIT+6
>> BARSRTBY FIXPAS+6*, FIXPAS+7, FIXPAS+8, DELETE+1, TEST+6*, TEST+7, TEST+9
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All