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

Package: Womens Health

Routine: WVMGRP


Information

WVMGRP ;HCIOFO/FT,JR - MANAGER'S PATIENT EDITS;06/14/2017 08:56

Source Information

Source file <WVMGRP.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Womens Health 8 (DIC,DIE)^WVFMAN  ($$SHODATA,DOCACT)^WVMGRP1  $$PACT^WVMGRP2  ($$NAME,$$SSN)^WVUTL1  $$FMERROR^WVUTL11  DIRZ^WVUTL3  (CENTERT,SETVARS,TITLE)^WVUTL5  KILLALL^WVUTL8  
VA FileMan 4 ^DIK  $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  
Kernel 3 $$FMTE^XLFDT  ($$LOW,$$REPEAT,$$RJ)^XLFSTR  DELETEA^XQALERT  

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 EDIT PAP REGIMEN LOG  WV EDIT PREG/LAC STATUS DATA  WVMGRP1  WVMGRP2  

Entry Points

Name Comments DBIA/ICR reference
PLOG ;EP
DEL ; Delete File 790.04 entry if no patient
PLOGTX ;EP
PLSDATA ;EDIT PREGNANCY/LACTATION STATUS DATA
MANAGE ;MANAGE STATUS DATA INDIVIDUALLY
ERROR(ACTION,FMERROR,ERROR) ;DISPLAY ERROR MESSAGE
EXIT ;EP
PRINTX ;EP
NAME(DIC,Y) ;EP
NONE ;EP
NUMRECS(DFN) ;RETURN THE NUMBER OF PREGNANCY AND LACTATION RECORDS

External References

Name Field # of Occurrence
^DIK DEL+1
$$EXTERNAL^DILFD PLSDATA+15
$$GET1^DIQ MANAGE+6
^DIR MANAGE+15, MANAGE+32, MANAGE+47
DIC^WVFMAN PLOG+8, PLSDATA+8
DIE^WVFMAN PLOG+13
$$SHODATA^WVMGRP1 MANAGE+40
DOCACT^WVMGRP1 PLSDATA+17
$$PACT^WVMGRP2 MANAGE+51
$$NAME^WVUTL1 NAME+4
$$SSN^WVUTL1 NAME+4
$$FMERROR^WVUTL11 ERROR+3
DIRZ^WVUTL3 DEL+3, NONE+4
CENTERT^WVUTL5 NONE+2
SETVARS^WVUTL5 PLOG+2, PLSDATA+2
TITLE^WVUTL5 PLOG+5, PLSDATA+5
KILLALL^WVUTL8 EXIT+2
$$FMTE^XLFDT MANAGE+6
$$LOW^XLFSTR MANAGE+25
$$REPEAT^XLFSTR PRINTX+2
$$RJ^XLFSTR MANAGE+28
DELETEA^XQALERT PLSDATA+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PLOG+6
Function Call: WRITE
  • Prompt: !!?10,"**** Patient Name Required --- Entry Deleted ****",!!
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: "There are no status review records for "_WVPAT("NAME")_".",!
  • Line Location: PLSDATA+22
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: MANAGE+27
Function Call: WRITE
  • Prompt: !," Error while "_$G(ACTION)_":",!
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: " "_$$FMERROR^WVUTL11(.FMERROR),!
  • Line Location: ERROR+3
Function Call: WRITE
  • Prompt: " "_$P(ERROR,U,LINE),!
  • Line Location: ERROR+4
Function Call: WRITE
  • Prompt: " Please contact your help desk for assistance.",!!
  • Line Location: ERROR+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !,T,$P(X,";;",2)
  • Line Location: PRINTX+3
Function Call: WRITE
  • Prompt: !!?3,$$NAME^WVUTL1(WVDFN)," ",$$SSN^WVUTL1(WVDFN),!
  • Line Location: NAME+4
Function Call: WRITE
  • Prompt: !!!!,WVTITLE,!!
  • Line Location: NONE+3
Routine Call
  • DIR
  • Line Location:
    • MANAGE+15
    • MANAGE+32
    • MANAGE+47

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^WV(790 - [#790] EXTERNAL^DILFD
^WV(790.04 - [#790.04] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^WV(790 - [#790] PLSDATA+23, MANAGE+4, MANAGE+5, NUMRECS+3, NUMRECS+4
^WV(790.04 - [#790.04] PLOG+10
^WV(790.8 - [#790.8] PLSDATA+16, PLSDATA+18, PLSDATA+22, PLSDATA+26

Label References

Name Line Occurrences
DEL PLOG+10
EXIT PLOG+17, PLSDATA+28
MANAGE PLSDATA+23
NAME PLOG+11
PLOGTX PLOG+6
PRINTX PLOGTX+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A PLOG+3~, PLOG+7*, PLOG+8, PLSDATA+3~, PLSDATA+7*, PLSDATA+8
ACTION ERROR~, ERROR+2
COUNT NUMRECS+1~, NUMRECS+2*, NUMRECS+4*, NUMRECS+5
DA DEL+1*, PLSDATA+10!
DFN NUMRECS~, NUMRECS+3, NUMRECS+4
DIC NAME~, NAME+2, NAME+3
DIK PLOG+10~*, PLSDATA+3~
DIR PLSDATA+3~, MANAGE+36!, MANAGE+49!
DIR("?" MANAGE+14*, MANAGE+31*, MANAGE+43*, MANAGE+44*, MANAGE+45*, MANAGE+46*
DIR("A" MANAGE+13*, MANAGE+30*, MANAGE+42*
DIR(0 MANAGE+13*, MANAGE+30*, MANAGE+42*
DIROUT PLSDATA+3~, MANAGE+16, MANAGE+48
DIRUT PLSDATA+3~, MANAGE+16, MANAGE+48
DR PLOG+3~, PLOG+12*, PLOG+13
DTIME MANAGE+27
DTOUT PLSDATA+3~, MANAGE+33
DUOUT PLSDATA+3~, MANAGE+33
END MANAGE+23~, MANAGE+26, MANAGE+27*
ERROR ERROR~, ERROR+4
FMERROR ERROR~, ERROR+3
I PRINTX+2~, PRINTX+3*
IEN NUMRECS+1~, NUMRECS+3*, NUMRECS+4
IOF EXIT+1
IOSL MANAGE+27
LINE ERROR+1~, ERROR+4*
NODE NUMRECS+1~, NUMRECS+3*, NUMRECS+4
T PRINTX+2~*, PRINTX+3
U PLOG+10, MANAGE+2, MANAGE+5, MANAGE+6, MANAGE+7, MANAGE+13, MANAGE+25, MANAGE+28, MANAGE+30, MANAGE+42
, ERROR+4, NAME+3, NUMRECS+4
WVDATE MANAGE+1~, MANAGE+4*, MANAGE+6
WVDFN NAME+1~, NAME+2*, NAME+3*, NAME+4
WVDIRP2 MANAGE+1~, MANAGE+8*, MANAGE+12, MANAGE+13, MANAGE+20
WVDIRP2(1 MANAGE+4, MANAGE+7*, MANAGE+8, MANAGE+9, MANAGE+10!
WVENTS MANAGE+1~, MANAGE+6*, MANAGE+26*, MANAGE+28
WVENTS( MANAGE+6*, MANAGE+22, MANAGE+26, MANAGE+28, MANAGE+38, MANAGE+39, MANAGE+51, MANAGE+52*, MANAGE+53!
WVENTS("Y" MANAGE+37*, MANAGE+38*, MANAGE+51, MANAGE+53
WVENTS(0 MANAGE+20
WVEXIT MANAGE+1~, MANAGE+21, MANAGE+22, MANAGE+27*, MANAGE+33*, MANAGE+35*, MANAGE+39*, MANAGE+41*, MANAGE+48*, MANAGE+51*
, MANAGE+54!, MANAGE+55*, MANAGE+56
WVGOTIT MANAGE+1~, MANAGE+18*, MANAGE+19
WVIEN MANAGE+1~, MANAGE+4*, MANAGE+5, MANAGE+6
WVJR PLOG+9!, PLOG+10*, PLOG+16!, DEL+1, PLSDATA+10!
WVLINE MANAGE+23~, MANAGE+24*, MANAGE+27*, MANAGE+29*
>> WVLINL PLOGTX+9*
WVNODE MANAGE+1~, MANAGE+3*, MANAGE+4, MANAGE+5, MANAGE+6, MANAGE+7, MANAGE+9, MANAGE+11, MANAGE+18*, MANAGE+19*
, MANAGE+20*, MANAGE+22, MANAGE+25, MANAGE+26, MANAGE+28, MANAGE+38, MANAGE+39, MANAGE+51, MANAGE+52, MANAGE+53
WVNODE( MANAGE+3, MANAGE+6, MANAGE+7, MANAGE+9!, MANAGE+18, MANAGE+25
WVNODE(4 MANAGE+2*
WVNODE(5 MANAGE+2*
WVPAT PLSDATA+3~, PLSDATA+9*, PLSDATA+11*, PLSDATA+13*, PLSDATA+14, PLSDATA+15, PLSDATA+16, PLSDATA+18, PLSDATA+20, PLSDATA+22
, PLSDATA+23, PLSDATA+26, MANAGE+4, MANAGE+5, MANAGE+6, MANAGE+51
WVPAT("NAME" PLSDATA+15*, PLSDATA+22, PLSDATA+24
>> WVPOP PLOG+13, PLOG+14
WVPROMPT MANAGE+1~, MANAGE+51*
WVRETURN MANAGE+1~, MANAGE+40*, MANAGE+41
>> WVTAB PLOGTX+9*, PRINTX+2
>> WVTITLE NONE+1*, NONE+2, NONE+3
X PLSDATA+3~, MANAGE+23~, MANAGE+27*, PRINTX+2~, PRINTX+3*
XQAID PLSDATA+4, PLSDATA+6, PLSDATA+13, PLSDATA+19~, PLSDATA+20*, PLSDATA+22, PLSDATA+25
XQAKILL PLSDATA+19~, PLSDATA+26!, PLSDATA+27*
Y PLOG+3~, PLOG+4, PLOG+8, PLOG+9, PLOG+10, PLOG+11, PLOG+13, PLOG+14*, PLSDATA+3~, PLSDATA+4
, PLSDATA+8, PLSDATA+9*, PLSDATA+11, MANAGE+11*, MANAGE+12, MANAGE+16*, MANAGE+18, MANAGE+35, MANAGE+37, MANAGE+50
, MANAGE+55, MANAGE+56*, NAME~, NAME+2, NAME+3

Marked Items

Name Field # of Occurrence
$T(@WVLINL+I PRINTX+3
Info |  Source |  Call Graph |  Caller 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