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 |  All
Print Page as PDF
Routine: BMCMODS

Package: Referred Care Information System

Routine: BMCMODS


Information

BMCMODS ;IHS/ITSC/FCJ - EDIT SECONDARY REFERRAL ;

Source Information

Source file <BMCMODS.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Referred Care Information System 6 ($$CTR,HDR,PARMCHK)^BMC  GETSNO^BMCADD3  (DDS,DIC)^BMCFMC  ^BMCKILL  (17,ASK,SNO,VREF)^BMCMOD  DISPCOM^BMCMOD1  
IHS VA Utilities 1 $$VAL^XBDIQ1  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Referred Care Information System 2 BMC EDIT SECONDARY PROVIDER  BMCAPI  

Entry Points

Name Comments DBIA/ICR reference
SBCOM ;ADD BO/CHS COMMENTS ;BMC*4.0*3 8.13.07 IHS.OIT.FCJ ADD BO/CHS COMMENTS
STA ;EDIT STATUS OF REF;NEW FOR P9
EDIT ;EP;DISPLAY AND EDIT SEC REF
MEDCOM ;DISPLAY AND ADD COMMENTS FOR MED HX
START ;
EXIT ;EXIT PROGRAM
MEDHX ;EP;DISPLAY MED HX COMMENTS IF ANY AND ADD NEW COMMENTS TO SEC REF
MAIN ;
GETREF ;

External References

Name Field # of Occurrence
$$CTR^BMC MEDHX+3, MEDHX+4
HDR^BMC START+2
PARMCHK^BMC START+1
GETSNO^BMCADD3 MAIN+4
DDS^BMCFMC EDIT+8
DIC^BMCFMC GETREF+8
^BMCKILL EXIT+1
17^BMCMOD STA+3
ASK^BMCMOD MEDCOM+4, SBCOM+4
SNO^BMCMOD MAIN+7
VREF^BMCMOD MAIN+6
DISPCOM^BMCMOD1 MEDHX+6
^DIR MEDHX+9
$$VAL^XBDIQ1 MEDHX+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: GETREF+2
Function Call: WRITE
  • Prompt: @IOF,!,$$CTR^BMC("MEDICAL COMMENTS FROM PRIMARY REFERRAL",80)
  • Line Location: MEDHX+3
Function Call: WRITE
  • Prompt: !,$$CTR^BMC("REFERRAL: "_$P(BMCREC,U,2)_" PATIENT: "_$$VAL^XBDIQ1(90001,BMCSRIEN,.03),80),!
  • Line Location: MEDHX+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: MEDHX+5
Function Call: WRITE
  • Prompt: !,"THERE ARE NOT ANY MEDICAL COMMENTS FROM PRIMARY REFERRAL TO DISPLAY...",!
  • Line Location: MEDHX+7
Function Call: WRITE
  • Prompt: !
  • Line Location: MEDHX+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: MEDHX+8
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: STA+1
Routine Call
  • DIR
  • Line Location:
    • MEDHX+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BMCREF - [#90001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BMCREF - [#90001] GETREF+11, EDIT+1, EDIT+2, EDIT+3, EDIT+7

Label References

Name Line Occurrences
EDIT MAIN+5
EXIT START+3
GETREF MAIN+2
MAIN START+2
MEDHX MAIN+8
SBCOM MAIN+9
STA MAIN+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BMCATEMP MEDHX+1*, MEDCOM+1*, SBCOM+1*
>> BMCCTYP MEDHX+2*, MEDCOM+2*, SBCOM+2*
>> BMCETEMP MEDHX+1*, MEDCOM+1*, SBCOM+1*
>> BMCG MEDHX+1*, MEDCOM+1*, SBCOM+1*
>> BMCIEN MAIN+6*, MAIN+7*
BMCMODE MAIN+1*, EXIT+3!
>> BMCNONE MEDHX+6*, MEDHX+7
>> BMCPARM START+1
>> BMCPCC MAIN+6
>> BMCQ START+2, MAIN+1*, MAIN+3, MAIN+5, GETREF+1*, GETREF+13*
>> BMCREC GETREF+11*, MEDHX+4
BMCREF GETREF+2*, EXIT+3!
>> BMCRIEN MAIN+6*, MAIN+7*, GETREF+10*, EDIT+1*, MEDCOM+3*, MEDCOM+5*, SBCOM+3*, SBCOM+5*, STA+2*, STA+4*
BMCRSTAT EXIT+3!
>> BMCSCOD MAIN+6, MAIN+7
BMCSRIEN MAIN+6, MAIN+7, GETREF+10*, GETREF+11, EDIT+1, EDIT+2, EDIT+3, EDIT+6, EDIT+7, MEDHX+4
, MEDCOM+3, SBCOM+3, STA+2, EXIT+3!
BMCSUF EDIT+2*, EXIT+3!
>> BMCTERM MEDHX+1*, MEDCOM+1*, SBCOM+1*
BMCTMPP MEDCOM+3*, MEDCOM+5, SBCOM+3*, SBCOM+5, STA+2*, STA+4, EXIT+3!
>> BMCV MEDHX+1*, MEDCOM+1*, SBCOM+1*
BMCVCT EDIT+3*, EXIT+3!
BMCVST EXIT+3!
BMCVSTP EXIT+3!
DA EDIT+6*, MEDHX+9!, EXIT+2!
DDSCHANG EXIT+2!
>> DDSFILE EDIT+6*
DDSPARM EDIT+6*, EXIT+2!
DIC GETREF+4*, EXIT+2!
DIC("A" GETREF+4*
DIC("S" GETREF+7*
DIC(0 GETREF+4*
DIE EXIT+2!
DILN EXIT+2!
DIR MEDHX+9!
DIR("A" MEDHX+9*
DIR(0 MEDHX+9*
DISYS EXIT+2!
DIWI EXIT+2!
DIWTC EXIT+2!
DIWX EXIT+2!
>> DR EDIT+7*
>> I MEDHX+5*, MEDHX+8*
IOF MEDHX+3, STA+1
U EDIT+1, EDIT+2, EDIT+3, EDIT+7, MEDHX+4
W1 EXIT+2!
Y GETREF+9, GETREF+10, EXIT+2!
Y1 EXIT+2!
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 |  All