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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BWPATCH2

Package: Women's Health

Routine: BWPATCH2


Information

BWPATCH2 ;IHS/ANMC/MWR - UTIL: MOSTLY PATIENT DATA [ 01/23/97 4:37 PM ];15-Feb-2003 22:03;PLS

Source Information

Source file <BWPATCH2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Women's Health 3 DIRZ^BWUTL3  (SETVARS,TITLE)^BWUTL5  KILLALL^BWUTL8  
Kernel 1 ^%ZIS  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
NOCHANGE ;EP
EOJ ;EP - End of job.
TEXT2 ;EP
START ;EP
INIT ;EP - Initialization.
TEXT1 ;EP
PRINTX ;EP
MAIN ;EP - Main program.

External References

Name Field # of Occurrence
^%ZIS INIT+2
DIRZ^BWUTL3 MAIN+35, NOCHANGE+1
SETVARS^BWUTL5 INIT+1
TITLE^BWUTL5 MAIN+1, MAIN+9
KILLALL^BWUTL8 EOJ+1
^DIR MAIN+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Do you wish to apply the patch and reindex the data now?"
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+6
Function Call: WRITE
  • Prompt: !!?14,"Reindexing..."
  • Line Location: MAIN+22
Function Call: WRITE
  • Prompt: !!!?14,"0% 50% 100%"
  • Line Location: MAIN+23
Function Call: WRITE
  • Prompt: !?14,"----------------------------------------------------"
  • Line Location: MAIN+24
Function Call: WRITE
  • Prompt: !?14,"["
  • Line Location: MAIN+25
Function Call: WRITE
  • Prompt: "="
  • Line Location: MAIN+28
Function Call: WRITE
  • Prompt: "="
  • Line Location: MAIN+32
Function Call: WRITE
  • Prompt: "]"
  • Line Location: MAIN+33
Function Call: WRITE
  • Prompt: !!!!?14,"Patch applied successfully! Job complete.",!!
  • Line Location: MAIN+34
Function Call: WRITE
  • Prompt: !?25,"NO CHANGES MADE!"
  • Line Location: NOCHANGE+1
Function Call: WRITE
  • Prompt: !,T,$P(X,";;",2)
  • Line Location: PRINTX+2
Routine Call
  • DIR
  • Line Location:
    • MAIN+6
Routine Call
  • %ZIS
  • Line Location:
    • INIT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BWNOT - [#9002086.4] MAIN+27, MAIN+29
^BWNOT("AOPEN" MAIN+20!, MAIN+31*
^BWNOT(0 MAIN+10, MAIN+21
^DD(9002086.4 MAIN+10, MAIN+15*, MAIN+17*

Label References

Name Line Occurrences
EOJ START+3
INIT START+1
MAIN START+2
NOCHANGE MAIN+7, MAIN+10
PRINTX TEXT1+9, TEXT2+5
TEXT1 MAIN+2
TEXT2 MAIN+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BWCOUNT MAIN+26*, MAIN+28*, MAIN+32
>> BWIEN MAIN+26*, MAIN+27*, MAIN+29, MAIN+31
BWINC MAIN+21*, MAIN+28, EOJ+1!
>> BWLINL TEXT1+9*, TEXT2+5*
>> BWPTITL INIT+3*, MAIN+1, MAIN+9
>> BWTAB TEXT1+9*, TEXT2+5*, PRINTX+1
BWY MAIN+13~, MAIN+14*, MAIN+15, MAIN+16*, MAIN+17
>> DIR("?" MAIN+4*
>> DIR("A" MAIN+5*
>> DIR(0 MAIN+5*
>> DIRUT MAIN+7
I MAIN+26~, MAIN+27*, MAIN+28, MAIN+32*, PRINTX+1~*, PRINTX+2*
>> IOP INIT+2*
T PRINTX+1~*, PRINTX+2
U MAIN+21, MAIN+30, MAIN+31
X PRINTX+1~, PRINTX+2*
Y MAIN+7, MAIN+26~, MAIN+29*, MAIN+30, MAIN+31

Marked Items

Name Field # of Occurrence
$T(@BWLINL+I PRINTX+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All