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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BDMTSN

Package: Diabetes Registry

Routine: BDMTSN


Information

BDMTSN ; IHS/CMI/LAB - DISPLAY IND LISTS ;

Source Information

Source file <BDMTSN.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Registration 3 EN^VALM  TERM^VALM0  (CLEAR,FULL)^VALM1  
IHS VA Utilities 2 ^XBDBQUE  EN^XBVK  
VA Fileman 2 ^DIC  ^DIR  
IHS Standard Terminology 1 ($$CONC,CONC)^BSTSAPI  
Kernel 1 DISP^XQORM1  

Entry Points

Name Comments DBIA/ICR reference
DISP ;EP - add an item to the selected list - called from a protocol
PHDR ;
EN ;EP -- main entry point for
HDR ; -- header code
HEAD1 ;
BROWSE ;
EOJ ;EP
EXPND ; -- expand code
BACK ;go back to listman
DISPX ;
INIT ;EP -- init variables and list array
PAUSE ;EP
EXIT ; -- exit code
CTR(X,Y) ;EP - Center X in a field Y wide.
PRINT ;
XIT ;
P1 ;
EP ;EP - CALLED FROM OPTION
HELP ; -- help code

External References

Name Field # of Occurrence
$$CONC^BSTSAPI P1+6
CONC^BSTSAPI P1+4
^DIC EP+6
^DIR PAUSE+2, DISP+3, DISP+9, PHDR+2
EN^VALM EN+1
TERM^VALM0 BACK+1
CLEAR^VALM1 EN+2
FULL^VALM1 EN+3, DISP+8
^XBDBQUE DISP+14, BROWSE+2
EN^XBVK EOJ+1
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Select the Audit Year",!!
  • Line Location: EP+5
Function Call: WRITE
  • Prompt: !!,"Goodbye"
  • Line Location: EP+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,"No list selected."
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !,"No list selected."
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PHDR+2
Function Call: WRITE
  • Prompt: !,"ZZZZZZZ"
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !,$P(^VA(200,DUZ,0),U,2),?72,"Page ",BDMPG,!
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: ?(80-$L($P(^DIC(4,$S($G(BDMDUZ2):BDMDUZ2,1:DUZ(2)),0),U))/2),$P(^DIC(4,$S($G(BDMDUZ2):BDMDUZ2,1:DUZ(2)),0),U),!
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: $$CTR("Listing of the "_BDMTAXN_" SNOMED List",80),!,BDM80D,!
  • Line Location: HEAD1+5
Routine Call
  • VALM
  • Line Location:
    • EN+1
Routine Call
  • DIC
  • Line Location:
    • EP+6
Routine Call
  • DIR
  • Line Location:
    • PAUSE+2
    • DISP+3
    • DISP+9
    • PHDR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BDMSNME - [#9003202.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BDMSNME - [#9003202.6] EP+7, INIT+3, INIT+4, DISP+6, P1+1
^BDMSNME("B" INIT+2
^DIC(4 - [#4] HEAD1+4
^TMP($J XIT+1!
^VA(200 - [#200] HEAD1+3

Label References

Name Line Occurrences
$$CTR HEAD1+5
BACK DISPX+1
BROWSE DISP+12
DISPX DISP+4, DISP+5, DISP+15
EN EP+8
EOJ EP+6, EN+5
HDR BACK+4
HEAD1 PHDR+1
INIT BACK+3
PHDR PRINT+4, P1+2
XIT DISP+10, DISP+12, P1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A P1+5~
B P1+5~
>> BDM80D HEAD1+5, PRINT+3*
>> BDMDUZ2 HEAD1+4
>> BDMGUI EOJ+1, HEAD1+2
>> BDMHIGH INIT+1*, INIT+10*, DISP+2
>> BDMOPT DISP+11*
>> BDMPG PHDR+1, HEAD1+1*, HEAD1+2, HEAD1+3, PRINT+1*
BDMQ PHDR+2*, PRINT+2!, P1+2
BDMTAX INIT+1!
BDMTAX( INIT+6*
BDMTAX("IDX" INIT+7*, DISP+6
>> BDMTAXI DISP+6*, P1+1
>> BDMTAXN DISP+6*, HEAD1+5
>> BDMTAXT DISP+6*, P1+1
>> BDMX INIT+3*, INIT+4, INIT+6, P1+1*, P1+3, P1+6
>> BDMY INIT+4*, INIT+7
>> BDMYR EP+3*, EP+7*, INIT+2*, INIT+3, INIT+4, INIT+7
>> BDMYRE EP+7*, HDR+1, INIT+2
>> C INIT+1*, INIT+8*, INIT+10
D P1+5~
DA DISP+9!
DIC EP+6*!
DIC(0 EP+6*
DIR PAUSE+2!, BACK+5!, DISP+3!, DISP+9!, PHDR+2!
DIR("A" PAUSE+2*, DISP+2*, DISP+9*
DIR("B" DISP+9*
DIR(0 PAUSE+2*, DISP+2*, DISP+9*, PHDR+2*
>> DIRUT PAUSE+2*, DISP+3*, DISP+5, DISP+10
>> DTOUT PHDR+2
>> DUOUT PAUSE+2, DISP+3
DUZ HEAD1+3
DUZ(2 HEAD1+4
E P1+5~
I BACK+6!
IO PAUSE+1, PHDR+2
IO(0 PAUSE+1, PHDR+2
IOF EP+4, EN+4, HEAD1+1
IOM CTR+1
IOSL P1+2
IOST PAUSE+1, PHDR+2
>> J INIT+3*, INIT+5*, INIT+6, INIT+7
U EP+7, INIT+7, DISP+6, HEAD1+3, HEAD1+4, P1+6
V P1+5~
>> VALMBCK BACK+2*
>> VALMCNT INIT+10*
>> VALMHDR(1 HDR+1*
>> VALMHDR(2 HDR+2*
X HELP+1*, BACK+6!, CTR~, CTR+1
>> XBIOP BROWSE+2*
>> XBNS DISP+13*
>> XBRC DISP+13*, BROWSE+2*
>> XBRP DISP+13*, BROWSE+1*
>> XBRX DISP+13*, BROWSE+2*
Y EP+6, EP+7, BACK+6!, DISP+4, DISP+6, DISP+11, DISP+12, PHDR+2, CTR~, CTR+1
Z BACK+6!

Marked Items

Name Field # of Occurrence
$T(CONC^BSTSAPI P1+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All