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: WVLETPR

Package: Womens Health

Routine: WVLETPR


Information

WVLETPR ;HCIOFO/FT,JR-WV PRINT LETTERS. ;1/10/00 16:45

Source Information

Source file <WVLETPR.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Womens Health 7 (DIC,DIE)^WVFMAN  ($$DECEASED,$$NAME,$$SSN)^WVUTL1  ZIS^WVUTL2  DIRZ^WVUTL3  (CENTERT,SETVARS,TITLE)^WVUTL5  (KILLALL,PATLKUP)^WVUTL8  (GADD,GAPPT,KADD,KAPPT,KILLUG,KVAR,SADD,SAPPT)^WVUTL9  
Kernel 2 ^%ZISC  $$REPEAT^XLFSTR  
VA FileMan 1 EN2^DIWF  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Womens Health 4 WV PRINT INDIVIDUAL LETTERS  WVLETDQ  WVNOTIF  WVRPCNO1  

Entry Points

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

External References

Name Field # of Occurrence
^%ZISC WVLETPR+14
EN2^DIWF PRINT+44
DIC^WVFMAN SELECT+7
DIE^WVFMAN PRINT+59, DECEASED+11
$$DECEASED^WVUTL1 PRINT+33
$$NAME^WVUTL1 SELECT+6, DECEASED+3
$$SSN^WVUTL1 DECEASED+4
ZIS^WVUTL2 DEVICE+4
DIRZ^WVUTL3 SELECT+14, SELECT+22, SELECT+30, CANTPRT+4, PRINT+54, DECEASED+8, PROMPT+2, NONE+4
CENTERT^WVUTL5 NONE+2
SETVARS^WVUTL5 WVLETPR+7, PRINT+3
TITLE^WVUTL5 SELECT+3
KILLALL^WVUTL8 EXIT+1
PATLKUP^WVUTL8 SELECT+4
GADD^WVUTL9 PRINT+40
GAPPT^WVUTL9 PRINT+36
KADD^WVUTL9 PRINT+39
KAPPT^WVUTL9 PRINT+35
KILLUG^WVUTL9 PRINT+38
KVAR^WVUTL9 PRINT+42
SADD^WVUTL9 PRINT+41
SAPPT^WVUTL9 PRINT+37
$$REPEAT^XLFSTR PRINTX+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"This Type of Notification"
  • Line Location: CANTPRT+2
Function Call: WRITE
  • Prompt: ", ",$P(^WV(790.403,WVTYPE,0),U),","
  • Condition for execution: WVTYPE
  • 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^WVUTL1(WVDFN)," #"
  • Line Location: DECEASED+3
Function Call: WRITE
  • Prompt: $$SSN^WVUTL1(WVDFN),", 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: !!!!,WVTITLE,!!
  • Line Location: NONE+3
Function Call: WRITE
  • Prompt: !,T,$P(X,";;",2)
  • Line Location: PRINTX+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^WV(790.4 - [#790.4] SELECT+13, SELECT+16, SELECT+17, PRINT+7, PRINT+10, PRINT+11, PRINT+13, PRINT+25, PRINT+47, PRINT+54
, PRINT+60, KILLXREF+3!, DECEASED+14
^WV(790.403 - [#790.403] SELECT+34, CANTPRT+3
^WV(790.404 - [#790.404] SELECT+25

Label References

Name Line Occurrences
CANTPRT SELECT+33, SELECT+34
DECEASED PRINT+33
DEVICE WVLETPR+11
KILLXREF PRINT+18, PRINT+47, PRINT+58, DECEASED+13
NONE SELECT+9
PRINT WVLETPR+13
PRINTX TEXT1+7
PROMPT PRINT+25, PRINT+45
SELECT WVLETPR+10
TEXT1 SELECT+14, PRINT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+2!
>> BY PRINT+23*
DIC SELECT+2~
>> DIWF PRINT+21*
>> DIWF(1 PRINT+22*
>> DR DECEASED+10*, DECEASED+11
DT PRINT+59
>> DTOUT SELECT+8
>> DUOUT SELECT+8
DUZ(2 SELECT+14, PRINT+8
I PRINTX+1~, PRINTX+2*
IO PRINT+25
IO("S" DECEASED+8
IOF PRINT+28, DECEASED+9
ION PRINT+5
IOP DEVICE+2!, PRINT+4~, PRINT+5*
IOST WVLETPR+12, PRINT+20
T PRINTX+1~*, PRINTX+2
U SELECT+13, SELECT+16, SELECT+17, SELECT+34, CANTPRT+3, PRINT+7, PRINT+10, PRINT+11, PRINT+13, PRINT+47
>> WVCRT WVLETPR+12*, PRINT+20*, PRINT+28, PRINT+50, DECEASED+8, DECEASED+9, PROMPT+2
WVDA WVLETPR+8~, SELECT+10*, SELECT+13, SELECT+16, SELECT+17, SELECT+27, PRINT+7, PRINT+10, PRINT+11, PRINT+13
, PRINT+18, PRINT+25, PRINT+27, PRINT+47, PRINT+54, PRINT+58, PRINT+59, PRINT+60, KILLXREF~, KILLXREF+2
, KILLXREF+3, DECEASED+11, DECEASED+13, DECEASED+14
WVDFN SELECT+6*, SELECT+29, PRINT+4~, PRINT+10*, PRINT+23, PRINT+33, PRINT+35, PRINT+36, PRINT+37, PRINT+39
, PRINT+40, PRINT+41, DECEASED+3, DECEASED+4
WVFACIL SELECT+13~*, SELECT+14, PRINT+7~*, PRINT+8
WVKDT PRINT+13*, PRINT+18, PRINT+47, PRINT+58, KILLXREF~, KILLXREF+2, KILLXREF+3, DECEASED+13
>> WVLINL TEXT1+7*
>> WVPOP WVLETPR+7*, WVLETPR+9*, WVLETPR+10, WVLETPR+11, SELECT+5*, SELECT+7, SELECT+8*, SELECT+9*, SELECT+14*, SELECT+22*
, SELECT+30*, CANTPRT+4*, DEVICE+4, PRINT+8*
>> WVPOP1 WVLETPR+7*, WVLETPR+9, SELECT+5*
WVPURP SELECT+16*, SELECT+20, SELECT+25, SELECT+28, PRINT+4~, PRINT+11*, PRINT+15
>> WVTAB TEXT1+7*, PRINTX+1
WVTITLE WVLETPR+8~, NONE+1*, NONE+2, NONE+3
>> WVTYPE SELECT+17*, SELECT+33, SELECT+34, CANTPRT+3
X SELECT+2~, SELECT+6*, SELECT+7, PRINTX+1~, PRINTX+2*
Y SELECT+2~, SELECT+4, SELECT+5, SELECT+6, SELECT+7, SELECT+9, SELECT+10
>> ZTRTN DEVICE+3*
>> ZTSAVE("WVDA" DEVICE+3*

Marked Items

Name Field # of Occurrence
$T(@WVLINL+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