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 |  Local Variables |  All
Print Page as PDF
Routine: BMCMOD1

Package: Referred Care Information System

Routine: BMCMOD1


Information

BMCMOD1 ;IHS/OIT/FCJ - MODIFY A REFERRAL 2 OF 2;

Source Information

Source file <BMCMOD1.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA Fileman 4 DD^%DT  ^DIC  FILE^DICN  ^DIWP  
Lexicon Utility 3 ^LEXA1  CONFIG^LEXSET  ($$CSYS,$$IMPDATE)^LEXU  
DRG Grouper 2 ($$CODEN,$$ICDDX,$$SD)^ICDEX  $$CPT^ICPTCOD  
Referred Care Information System 1 DIE^BMCFMC  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Referred Care Information System 3 BMCADDS  BMCMOD  BMCMODS  

Entry Points

Name Comments DBIA/ICR reference
ADDDX ;EP-BMCMOD;BMC*4.0*9-ADD DX CALL
DISPCOM ;EP;CASE COMMENT
ADDPX ;EP-BMCMOD;BMC*4.0*9-ADD PX CALL
DISPPROC ;ENTRY POINT
DISPDX ;ENTRY POINT

External References

Name Field # of Occurrence
DD^%DT DISPCOM+10
DIE^BMCFMC ADDDX+15, ADDPX+9
^DIC ADDPX+3
FILE^DICN ADDDX+11, ADDPX+5
^DIWP DISPCOM+15
$$CODEN^ICDEX ADDDX+8
$$ICDDX^ICDEX DISPDX+9
$$SD^ICDEX DISPDX+10
$$CPT^ICPTCOD DISPPROC+6, DISPPROC+8
^LEXA1 ADDDX+6
CONFIG^LEXSET ADDDX+5
$$CSYS^LEXU ADDDX+3
$$IMPDATE^LEXU ADDDX+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPDX+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPPROC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPCOM+6
Function Call: WRITE
  • Prompt: Y
  • Line Location: DISPCOM+10
Function Call: WRITE
  • Prompt: !?10,^UTILITY($J,"W",DIWL,Z,0)
  • Line Location: DISPCOM+16
Function Call: WRITE
  • Prompt: !!
  • Line Location: ADDDX+6
Function Call: WRITE
  • Prompt: !!,"INVALID CODE cannot add."
  • Line Location: ADDDX+9
Function Call: WRITE
  • Prompt: !,"Unable to add DX code."
  • Line Location: ADDDX+12
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDDX+17
Function Call: WRITE
  • Prompt: !,"Unable to add CPT Procedure code."
  • Line Location: ADDPX+6
Routine Call
  • DIC
  • Line Location:
    • ADDPX+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICPT - [#81] Classic Fileman Calls
^BMCDX - [#90001.01] Classic Fileman Calls
^BMCPX - [#90001.02] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTNPOV - [#9999999.27] DISPDX+10, DISPPROC+8
^BMCCOM - [#90001.03] DISPCOM+4, DISPCOM+8, DISPCOM+10, DISPCOM+11, DISPCOM+13, DISPCOM+15
^BMCCOM("AD" DISPCOM+2, DISPCOM+3, DISPCOM+7
^BMCDX - [#90001.01] DISPDX+9, DISPDX+10
^BMCDX("AD" DISPDX+1, DISPDX+3
^BMCPX - [#90001.02] DISPPROC+6, DISPPROC+8
^BMCPX("AD" DISPPROC+1, DISPPROC+3
^UTILITY($J DISPCOM+12!, DISPCOM+16, DISPCOM+18!
^VA(200 - [#200] DISPCOM+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BMCC DISPDX+3*, DISPDX+9, DISPPROC+3*, DISPPROC+6, DISPCOM+7*, DISPCOM+9*, DISPCOM+10
>> BMCCTYP DISPCOM+4, DISPCOM+8
>> BMCDFN ADDDX+13, ADDPX+7
>> BMCDOS DISPDX+9, DISPDX+10, ADDDX+1, ADDDX+5
BMCDX ADDDX+18!, ADDPX+10!
>> BMCICD ADDDX+1*, ADDDX+2*, ADDDX+3, ADDDX+5
>> BMCICD1 ADDDX+1*, ADDDX+2*, ADDDX+5
BMCLEX ADDDX+3*, ADDDX+8, ADDDX+18!
BMCLOOK ADDDX+16!
>> BMCNONE DISPDX+1*, DISPPROC+1*, DISPCOM+5*
>> BMCQ ADDDX+4*, ADDDX+7*, ADDDX+12*, ADDPX+4*, ADDPX+6*
>> BMCRDX( DISPDX+3*, DISPPROC+3*, DISPCOM+9*
>> BMCRIEN DISPDX+1, DISPDX+3, DISPPROC+1, DISPPROC+3, DISPCOM+2, DISPCOM+3, DISPCOM+7, ADDDX+13, ADDPX+7
>> BMCTMP DISPCOM+2*, DISPCOM+3*, DISPCOM+4
>> BMCTMP1 DISPCOM+2*, DISPCOM+3, DISPCOM+4*, DISPCOM+5
>> BMCX DISPCOM+7*, DISPCOM+8, DISPCOM+9, DISPCOM+10, DISPCOM+11, DISPCOM+13, DISPCOM+15
>> BMCY DISPCOM+13*, DISPCOM+15
DA ADDDX+18!, ADDPX+10!
DIC ADDDX+10!, ADDDX+11*, ADDDX+18!, ADDPX+1*, ADDPX+4!, ADDPX+5*, ADDPX+10!
DIC("A" ADDDX+6*, ADDPX+1*
DIC("S" ADDPX+2*
DIC(0 ADDDX+11*, ADDPX+1*, ADDPX+5*
DIE ADDDX+14*, ADDDX+18!, ADDPX+8*, ADDPX+10!
DIWF DISPCOM+17!
DIWL DISPCOM+12*, DISPCOM+14*, DISPCOM+16, DISPCOM+17!
DIWR DISPCOM+12*, DISPCOM+14*, DISPCOM+17!
DLAYGO ADDDX+11*, ADDDX+18!, ADDPX+5*, ADDPX+10!
DR ADDDX+13*, ADDDX+18!, ADDPX+7*, ADDPX+10!
ICDV ADDDX+18!
LEXQ ADDDX+18!
LEXVDT ADDDX+18!
U DISPDX+9, DISPDX+10, DISPPROC+6, DISPPROC+8, DISPCOM+4, DISPCOM+8, DISPCOM+10, DISPCOM+11
X DISPDX+3*, DISPDX+9, DISPDX+10, DISPPROC+3*, DISPPROC+6, DISPPROC+8, DISPCOM+15*, ADDDX+6!, ADDDX+8*, ADDDX+9
, ADDDX+18!, ADDPX+10!
Y DISPCOM+10*, ADDDX+7, ADDDX+10!, ADDDX+12, ADDPX+4, ADDPX+6
Y( ADDDX+8
Z DISPCOM+16*, DISPCOM+17!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All