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

Package: Women's Health

Routine: BWLETPR


Information

BWLETPR ;IHS/ANMC/MWR - BW PRINT LETTERS. [ 06/06/99 8:10 AM ];15-Feb-2003 21:56;PLS

Source Information

Source file <BWLETPR.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Women's Health 6 (DIC,DIE)^BWFMAN  ($$DECEASED,$$HRCN,$$NAME)^BWUTL1  ZIS^BWUTL2  DIRZ^BWUTL3  (CENTERT,SETVARS,TITLE)^BWUTL5  (KILLALL,PATLKUP)^BWUTL8  
Kernel 2 ^%ZISC  $$FMTE^XLFDT  
VA Fileman 1 EN2^DIWF  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Women's Health 3 BW PRINT INDIVIDUAL LETTERS  BWLETDQ  BWNOTIF  

Entry Points

Name Comments DBIA/ICR reference
NONE ;EP
PROMPT ;EP
KILLXREF(BWDA,BWKDT) ;EP
PRINTX ;EP
PRINT ;EP
TEXT1 ;EP
EXIT ;EP
DECEASED ;EP
DEVICE ;EP
SELECT ;EP
CANTPRT ;EP

External References

Name Field # of Occurrence
^%ZISC BWLETPR+16
DIC^BWFMAN SELECT+11
DIE^BWFMAN PRINT+60, DECEASED+13
$$DECEASED^BWUTL1 PRINT+42
$$HRCN^BWUTL1 DECEASED+4
$$NAME^BWUTL1 SELECT+7, DECEASED+3
ZIS^BWUTL2 DEVICE+4
DIRZ^BWUTL3 SELECT+18, SELECT+26, SELECT+34, CANTPRT+4, PRINT+55, DECEASED+10, PROMPT+2, NONE+7
CENTERT^BWUTL5 NONE+5
SETVARS^BWUTL5 BWLETPR+9, PRINT+3
TITLE^BWUTL5 SELECT+4
KILLALL^BWUTL8 EXIT+1
PATLKUP^BWUTL8 SELECT+5
EN2^DIWF PRINT+45
$$FMTE^XLFDT PRINT+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"This Type of Notification"
  • Line Location: CANTPRT+2
Function Call: WRITE
  • Prompt: ", ",$P(^BWNOTT(BWTYPE,0),U),","
  • Condition for execution: BWTYPE
  • Line Location: CANTPRT+3
Function Call: WRITE
  • Prompt: " is not printable."
  • Line Location: CANTPRT+3
Function Call: WRITE
  • Prompt: !!?3,"NOTE: Because this patient, ",$$NAME^BWUTL1(BWDFN)," #"
  • Line Location: DECEASED+3
Function Call: WRITE
  • Prompt: $$HRCN^BWUTL1(BWDFN),", is now"
  • Line Location: DECEASED+4
Function Call: WRITE
  • Prompt: !?9,"registered as deceased, the letter will NOT be printed."
  • Line Location: DECEASED+5
Function Call: WRITE
  • Prompt: !?9,"Instead, this notification will be given a status of CLOSED"
  • Line Location: DECEASED+6
Function Call: WRITE
  • Prompt: !?9,"and an outcome of ""Patient Deceased""."
  • Line Location: DECEASED+7
Function Call: WRITE
  • Prompt: !!!!,BWTITLE,!!
  • Line Location: NONE+6
Function Call: WRITE
  • Prompt: !,T,$P(X,";;",2)
  • Line Location: PRINTX+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BWNOT - [#9002086.4] SELECT+17, SELECT+20, SELECT+21, PRINT+7, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+15, PRINT+31
, PRINT+48, PRINT+55, PRINT+61, DECEASED+16
^BWNOT("APRT" KILLXREF+3!
^BWNOTP - [#9002086.404] SELECT+29
^BWNOTT - [#9002086.403] SELECT+38, CANTPRT+3
^BWPCD - [#9002086.1] PRINT+12, PRINT+13

Label References

Name Line Occurrences
CANTPRT SELECT+37, SELECT+38
DECEASED PRINT+42
DEVICE BWLETPR+13
KILLXREF PRINT+20, PRINT+48, PRINT+59, DECEASED+15
NONE SELECT+13
PRINT BWLETPR+15
PRINTX TEXT1+7
PROMPT PRINT+31, PRINT+46
SELECT BWLETPR+12
TEXT1 SELECT+18, PRINT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+2!
>> BWCRT BWLETPR+14*, PRINT+22*, PRINT+28, PRINT+36, PRINT+51, DECEASED+10, PROMPT+2
BWDA BWLETPR+10~, SELECT+14*, SELECT+17, SELECT+20, SELECT+21, SELECT+31, PRINT+7, PRINT+10, PRINT+11, PRINT+12
, PRINT+13, PRINT+15, PRINT+20, PRINT+31, PRINT+33, PRINT+48, PRINT+55, PRINT+59, PRINT+60, PRINT+61
, KILLXREF~, KILLXREF+2, KILLXREF+3, DECEASED+13, DECEASED+15, DECEASED+16
BWDFN SELECT+7*, SELECT+33, PRINT+4~, PRINT+10*, PRINT+25, PRINT+42, DECEASED+3, DECEASED+4
BWFACIL SELECT+17~*, SELECT+18, PRINT+7~*, PRINT+8
BWIRAD PRINT+4~, PRINT+12*
BWKDT PRINT+15*, PRINT+20, PRINT+48, PRINT+59, KILLXREF~, KILLXREF+2, KILLXREF+3, DECEASED+15
>> BWLINL TEXT1+7*
BWNAM SELECT+3~, SELECT+7*, SELECT+11
BWPDATE PRINT+4~, PRINT+13*
>> BWPOP BWLETPR+9*, BWLETPR+11*, BWLETPR+12, BWLETPR+13, SELECT+6*, SELECT+11, SELECT+12*, SELECT+13*, SELECT+18*, SELECT+26*
, SELECT+34*, CANTPRT+4*, DEVICE+4, PRINT+8*
>> BWPOP1 BWLETPR+9*, BWLETPR+11, SELECT+6*
BWPURP SELECT+20*, SELECT+24, SELECT+29, SELECT+32, PRINT+4~, PRINT+11*, PRINT+17
>> BWTAB TEXT1+7*, PRINTX+1
BWTITLE BWLETPR+10~, NONE+4*, NONE+5, NONE+6
>> BWTYPE SELECT+21*, SELECT+37, SELECT+38, CANTPRT+3
>> BY PRINT+25*
DIC SELECT+3~
>> DIOEND PRINT+28*
>> DIWF PRINT+23*
>> DIWF(1 PRINT+24*
>> DR DECEASED+12*, DECEASED+13
DT PRINT+60
>> DTOUT SELECT+12
>> DUOUT SELECT+12
DUZ(2 SELECT+18, PRINT+8
I PRINTX+1~*, PRINTX+2*
IO PRINT+31
IOF PRINT+28, PRINT+36, DECEASED+10
ION PRINT+5
IOP DEVICE+2!, PRINT+4~, PRINT+5*
IOST BWLETPR+14, PRINT+22
T PRINTX+1~*, PRINTX+2
U SELECT+17, SELECT+20, SELECT+21, SELECT+38, CANTPRT+3, PRINT+7, PRINT+10, PRINT+11, PRINT+12, PRINT+13
, PRINT+15, PRINT+48
X SELECT+3~, PRINTX+1~, PRINTX+2*
Y SELECT+3~, SELECT+5, SELECT+6, SELECT+7, SELECT+11, SELECT+13, SELECT+14
>> ZTRTN DEVICE+3*
>> ZTSAVE("BWDA" DEVICE+3*

Marked Items

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