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

Package: Womens Health

Routine: WVPRPCD


Information

WVPRPCD ;HCIOFO/FT,JR - WV PRINT A PROCEDURE;08/28/2017 12:42

Source Information

Source file <WVPRPCD.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Womens Health 8 LKUPPCD^WVPROC  ZIS^WVUTL2  (DIRZ,PCDVARS)^WVUTL3  ($$COLP,$$DIAG,$$STAGE,$$STATUS)^WVUTL4  ($$TXDT,CENTERT,SETVARS,TITLE)^WVUTL5  ($$ECCDYS,$$HOSPLC,$$INSTTX,$$PROV)^WVUTL6  (HEADER4,TOPHEAD)^WVUTL7  KILLALL^WVUTL8  
Kernel 1 ^%ZISC  

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

Package Total Caller Graph
Womens Health 2 WV PRINT A PROCEDURE  WVPROF1  

Entry Points

Name Comments DBIA/ICR reference
TOP(DA) ;EP
STARTQ ;EP
START(DA) ;EP
DEVICE ;EP
JUSTPRT ;EP
PRTNEW ;EP
DEQUEUE ;EP
EXIT ;EP

External References

Name Field # of Occurrence
^%ZISC TOP+7, DEQUEUE+5
LKUPPCD^WVPROC JUSTPRT+6
ZIS^WVUTL2 DEVICE+3, PRTNEW+6
DIRZ^WVUTL3 START+40, START+73, START+85
PCDVARS^WVUTL3 START+4
$$COLP^WVUTL4 START+39
$$DIAG^WVUTL4 START+34, START+57, START+67, START+71
$$STAGE^WVUTL4 START+69
$$STATUS^WVUTL4 START+36
$$TXDT^WVUTL5 START+13, START+14, START+32
CENTERT^WVUTL5 START+7, START+42, START+60, START+75, START+77, START+83
SETVARS^WVUTL5 TOP+4, START+2
TITLE^WVUTL5 JUSTPRT+5, PRTNEW+4
$$ECCDYS^WVUTL6 START+63
$$HOSPLC^WVUTL6 START+20
$$INSTTX^WVUTL6 START+21
$$PROV^WVUTL6 START+15
HEADER4^WVUTL7 START+12, START+40, START+73
TOPHEAD^WVUTL7 START+4
KILLALL^WVUTL8 EXIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TOP+8
Function Call: WRITE
  • Prompt: !?5,"Date of Procedure: ",$$TXDT^WVUTL5($P(WVY,U,12))
  • Line Location: START+13
Function Call: WRITE
  • Prompt: !?4,"Date First Entered: ",$$TXDT^WVUTL5($P(WVY,U,19))
  • Line Location: START+14
Function Call: WRITE
  • Prompt: ?42,"First Entered By: "
  • Line Location: START+15
Function Call: WRITE
  • Prompt: $E($$PROV^WVUTL6,1,20)
  • Line Location: START+15
Function Call: WRITE
  • Prompt: !
  • Line Location: START+16
Function Call: WRITE
  • Prompt: ?43,"Radiology Case#: ",$P(WVY,U,15)
  • Condition for execution: $P(WVY,U,15)]""
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !?4,"Clinician/Provider: ",WVPROV
  • Line Location: START+19
Function Call: WRITE
  • Prompt: !?2,"Ward/Clinic/Location: "
  • Line Location: START+20
Function Call: WRITE
  • Prompt: $$HOSPLC^WVUTL6
  • Line Location: START+20
Function Call: WRITE
  • Prompt: !?2,"Health Care Facility: "
  • Line Location: START+21
Function Call: WRITE
  • Prompt: $$INSTTX^WVUTL6(X)
  • Line Location: START+21
Function Call: WRITE
  • Prompt: !?14,"Comments: "
  • Line Location: START+22
Function Call: WRITE
  • Prompt: Y,!
  • Line Location: START+28
Function Call: WRITE
  • Prompt: !?4,"Complete by (Date): ",$$TXDT^WVUTL5($P(WVY,U,13))
  • Line Location: START+32
Function Call: WRITE
  • Prompt: !?5,"Results/Diagnosis: ",WVRES
  • Line Location: START+33
Function Call: WRITE
  • Prompt: !," Sec Results/diagnosis: "
  • Line Location: START+34
Function Call: WRITE
  • Prompt: $$DIAG^WVUTL4($P(WVY,U,6))
  • Line Location: START+34
Function Call: WRITE
  • Prompt: ?57,"HPV: "
  • Line Location: START+35
Function Call: WRITE
  • Prompt: "YES"
  • Condition for execution: $P(WVY,U,8)
  • Line Location: START+35
Function Call: WRITE
  • Prompt: !?16,"Status: "
  • Line Location: START+36
Function Call: WRITE
  • Prompt: $$STATUS^WVUTL4
  • Line Location: START+36
Function Call: WRITE
  • Prompt: !!,WVTITLE
  • Line Location: START+42
Function Call: WRITE
  • Prompt: !?2,"T-Zone Seen Entirely: "
  • Line Location: START+44
Function Call: WRITE
  • Prompt: !?2,"Lesion Outside Canal: "
  • Line Location: START+49
Function Call: WRITE
  • Prompt: $P(WVY,U,24)
  • Line Location: START+51
Function Call: WRITE
  • Prompt: !?5,"Satisfactory Exam: "
  • Line Location: START+53
Function Call: WRITE
  • Prompt: !?12,"Impression: "
  • Line Location: START+56
Function Call: WRITE
  • Prompt: !!,WVTITLE
  • Line Location: START+60
Function Call: WRITE
  • Prompt: !?9,"ECC Dysplasia: "
  • Line Location: START+62
Function Call: WRITE
  • Prompt: $$ECCDYS^WVUTL6
  • Line Location: START+63
Function Call: WRITE
  • Prompt: !?3,"Ectocervical Biopsy: "
  • Line Location: START+66
Function Call: WRITE
  • Prompt: !?8,"STD Evaluation: "
  • Line Location: START+70
Function Call: WRITE
  • Prompt: !!,WVTITLE,!
  • Line Location: START+75
Function Call: WRITE
  • Prompt: !!,WVTITLE
  • Line Location: START+83
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+85

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^WV(790.1 - [#790.1] START+9, START+17, START+25, START+27, START+55, START+79, START+81, DEQUEUE+3

Label References

Name Line Occurrences
DEVICE TOP+5
EXIT STARTQ+3, JUSTPRT+9, PRTNEW+7, DEQUEUE+5
START TOP+6, STARTQ+3, DEQUEUE+4
TOP JUSTPRT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA TOP~, TOP+6, STARTQ+3, START~, START+4, START+9, START+17, START+25, START+27, START+39
, START+55, START+79, START+81, JUSTPRT+3~
IO START+11
IO("S" START+85
IOF TOP+8, START+85
L START+26~, START+29*, START+30
N START+1~, START+78*, START+79*, START+81, DEQUEUE+2*, DEQUEUE+3*, DEQUEUE+4
U START+9, START+13, START+14, START+15, START+16, START+17, START+20, START+21, START+27, START+32
, START+34, START+35, START+45, START+47, START+50, START+51, START+54, START+55, START+57, START+63
, START+65, START+67, START+69, START+71
>> WVCRT START+12, START+40, START+73, START+85
>> WVDFN START+9*
>> WVPOP TOP+5, START+39, START+40, START+44, START+49, START+53, START+56, START+59, START+62, START+65
, START+66, START+69, START+70, START+73, START+79, START+80, START+85, DEVICE+3, PRTNEW+6, PRTNEW+7
WVPRMT1 START+1~, START+8*
>> WVPROV START+19
>> WVRES START+33
>> WVSL START+3*, START+44, START+49, START+53, START+56, START+59, START+62, START+65, START+66, START+69
, START+70, START+80
WVSUBH START+77*, START+84!
WVTITLE START+1~, START+41*, START+42, START+59*, START+60, START+74*, START+75, START+76*, START+77, START+82*
, START+83
>> WVTITLE1 START+6*, START+7
WVY START+1~, START+9*, START+13, START+14, START+15, START+16, START+20, START+21, START+32, START+34
, START+35, START+36, START+45, START+47, START+50, START+51, START+54, START+57, START+63, START+65
, START+67, START+69, START+71
X START+1~, START+15*, START+17*, START+18, START+20*, START+21*, START+63*
Y START+26~, START+27*, START+28, START+29, START+30, START+36*, JUSTPRT+3~, JUSTPRT+4, JUSTPRT+6, JUSTPRT+7
, JUSTPRT+8
>> ZTRTN DEVICE+2*, PRTNEW+5*
>> ZTSAVE("DA" DEVICE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All