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

Package: Womens Health

Routine: WVMGRP1


Information

WVMGRP1 ;ISP/RFR - MANAGER'S PATIENT EDITS;Nov 09, 2018@14:45

Source Information

Source file <WVMGRP1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 FILE^DIE  (EN,GETS)^DIQ  ^DIR  
Womens Health 2 $$ERROR^WVMGRP  $$PACT^WVMGRP2  
Kernel 1 ($$LJ,$$LOW,$$REPEAT,$$RJ,$$STRIP,$$TITLE)^XLFSTR  
Order Entry Results Reporting 1 WRAP^ORUTL  

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

Package Total Caller Graph
Womens Health 1 WVMGRP  

Entry Points

Name Comments DBIA/ICR reference
DOCACT ;PROCESS DOCUMENT ACTIONS
VISITS(WVVISITS,WVKEY,WVVISIT) ;RETRIEVE SPECIFIED VISIT
DOCS(WVDOCS,WVKEY,WVDOC) ;RETRIEVE SPECIFIED DOCUMENT
ITEMS(WVITEMS,WVKEY,WVPAT) ;RETRIEVE EITHER DOCUMENTS OR VISITS FOR A PATIENT
BRANCH(WVIEN,WVACT) ;PROCESS A BRANCH OF ACTIVITIES (DO NOT USE OUTSIDE OF THIS ROUTINE)
ACTIVTY(WVIEN) ;PROCESS AN ACTIVITY (DO NOT USE OUTSIDE OF THIS ROUTINE)
; INPUT: WVIEN: IEN OF THE CURRENT ACTIVITY [REQUIRED]
; OUTPUT: $$ACTIVTY: WHAT THE USER WANTS TO DO
; 1 TO REASSIGN, 2 TO MARK ENTERED IN ERROR, 0 TO TAKE NO ACTION, -1 TO QUIT
SHODATA() ;DISPLAY STATUS DATA
CROOTREC(WVIEN) ;DELETE FILE #790.8 ENTRY

External References

Name Field # of Occurrence
FILE^DIE DOCACT+79, CROOTREC+3
EN^DIQ SHODATA+10
GETS^DIQ DOCACT+58, VISITS+3, DOCS+3, ACTIVTY+5
^DIR DOCACT+13, DOCACT+51, DOCACT+68, ACTIVTY+40
WRAP^ORUTL DOCACT+35, DOCACT+49, ACTIVTY+26, ACTIVTY+37
$$ERROR^WVMGRP DOCACT+29, DOCACT+59, DOCACT+61, DOCACT+80, VISITS+4, DOCS+4, ACTIVTY+6, SHODATA+7, CROOTREC+4
$$PACT^WVMGRP2 DOCACT+54, BRANCH+5
$$LJ^XLFSTR DOCACT+10, DOCS+6
$$LOW^XLFSTR DOCACT+12
$$REPEAT^XLFSTR VISITS+12
$$RJ^XLFSTR DOCACT+65, VISITS+10, VISITS+11, VISITS+12
$$STRIP^XLFSTR DOCACT+16
$$TITLE^XLFSTR DOCACT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$LJ^XLFSTR(WVITEM,2)_" "
  • Line Location: DOCACT+10
Function Call: WRITE
  • Prompt: $S(WVPNUM>1:" ",1:"")_$P(WVITEMS(WVKEY(WVITEM)),U,WVPNUM),!
  • Line Location: DOCACT+10
Function Call: WRITE
  • Prompt: $P(WVITEMS(WVITEM),U,WVPNUM),!
  • Line Location: DOCACT+20
Function Call: WRITE
  • Prompt: !," L"
  • Line Location: DOCACT+25
Function Call: WRITE
  • Prompt: @IOF," Now l"
  • Line Location: DOCACT+26
Function Call: WRITE
  • Prompt: !,WVTXTA(WVCNT)
  • Line Location: DOCACT+36
Function Call: WRITE
  • Prompt: ?5,$$RJ^XLFSTR(WVCNT," ",3),?11,WVRTACTS(WVRTACTS("B",WVCNT)),!
  • Line Location: DOCACT+65
Function Call: WRITE
  • Prompt: !," Activity Detail:",!,"ACTIVITY DATE/TIME: ",WVDATA(790.801,WVIEN,.01,"E"),!,?2,"ACTION: ",WVDATA(790.801,WVIEN,3,"E"),!
  • Line Location: ACTIVTY+9
Function Call: WRITE
  • Prompt: ?2,"DOCUMENT NAME (IEN): ",WVDATA(790.801,WVIEN,2,"E"),!
  • Line Location: ACTIVTY+10
Function Call: WRITE
  • Prompt: ?2,"NEW PATIENT: ",WVPT,?40,"NEW VISIT: ",WVDATA(790.801,WVIEN,12,"E"),!
  • Line Location: ACTIVTY+11
Function Call: WRITE
  • Prompt: !," Please review the chart for "_WVPT_".",!,"Press ENTER to continue: "
  • Line Location: ACTIVTY+15
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ACTIVTY+16
Function Call: WRITE
  • Prompt: !
  • Line Location: ACTIVTY+16
Function Call: WRITE
  • Prompt: !!," Status Data ("_WVPAT("NAME")_"):"
  • Line Location: SHODATA+9
Routine Call
  • DIE
  • Line Location:
    • DOCACT+79
    • CROOTREC+3
Routine Call
  • DIR
  • Line Location:
    • DOCACT+13
    • DOCACT+51
    • DOCACT+68
    • ACTIVTY+40

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
790.801 GETS^DIQ
^TIU(8925 - [#8925] GETS^DIQ
^AUPNVSIT - [#9000010] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^WV(790 - [#790] SHODATA+3
^WV(790.8 - [#790.8] DOCACT+53, DOCACT+56, DOCACT+81, ITEMS+2, ITEMS+3, ITEMS+6, BRANCH+9, BRANCH+10

Label References

Name Line Occurrences
$$ACTIVTY BRANCH+2
$$BRANCH DOCACT+74, BRANCH+10
$$CROOTREC DOCACT+41, DOCACT+54, DOCACT+81
$$DOCS ITEMS+5
$$ITEMS DOCACT+5
$$SHODATA DOCACT+37, ACTIVTY+7
$$VISITS ITEMS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SHODATA+1~, SHODATA+3*, SHODATA+10*
DA(1 SHODATA+8*
DIC SHODATA+1~, SHODATA+8*
DIQ SHODATA+1~
DIR DOCACT+2~, DOCACT+70!, ACTIVTY+4~
DIR("?" DOCACT+12*, DOCACT+50*!, DOCACT+67*, ACTIVTY+27*!, ACTIVTY+38*!
DIR("A" DOCACT+11*, DOCACT+43*, DOCACT+66*, ACTIVTY+18*, ACTIVTY+29*
DIR(0 DOCACT+11*, DOCACT+43*, DOCACT+66*, ACTIVTY+39*
DIROUT DOCACT+2~, DOCACT+52, DOCACT+69, ACTIVTY+4~, ACTIVTY+41
DIRUT DOCACT+3~, DOCACT+52, DOCACT+69, ACTIVTY+4~, ACTIVTY+41
DR SHODATA+1~
DTIME ACTIVTY+16
DTOUT DOCACT+2~, ACTIVTY+4~
DUOUT DOCACT+2~, ACTIVTY+4~
IOF DOCACT+26
U DOCACT+6, DOCACT+9, DOCACT+10, DOCACT+11, DOCACT+12, DOCACT+16, DOCACT+19, DOCACT+20, DOCACT+31, DOCACT+32
, DOCACT+33, DOCACT+43, DOCACT+54, DOCACT+66, DOCACT+71, DOCACT+73, DOCACT+74, DOCACT+75, DOCACT+78, DOCACT+82
, VISITS+7, VISITS+11, VISITS+12, DOCS+7, ITEMS+2, ITEMS+7, BRANCH+2, BRANCH+3, BRANCH+5, BRANCH+10
, ACTIVTY+19, ACTIVTY+30, ACTIVTY+39, SHODATA+3, SHODATA+4
WVACT BRANCH~, BRANCH+5*, BRANCH+10
WVACTION DOCACT+22~, DOCACT+30, DOCACT+31, DOCACT+32, DOCACT+33, DOCACT+54, DOCACT+74, DOCACT+75*
WVAIEN BRANCH+1~, BRANCH+9*, BRANCH+10
WVAIEN( BRANCH+8*
WVAIEN(1 BRANCH+9, BRANCH+10
WVAIEN(2 BRANCH+9, BRANCH+10
WVCHAIN DOCACT+24~, DOCACT+78, DOCACT+82!, BRANCH+2*
WVCNT DOCACT+24~, DOCACT+35, DOCACT+36*, DOCACT+49, DOCACT+50, DOCACT+57*, DOCACT+58, DOCACT+60, DOCACT+65*, ACTIVTY+4~
, ACTIVTY+20*, ACTIVTY+26, ACTIVTY+27, ACTIVTY+31*, ACTIVTY+37, ACTIVTY+38
WVCNUM DOCACT+24~, DOCACT+78*
WVDATA DOCACT+2~, VISITS+1~, VISITS+9, DOCS+1~, ACTIVTY+4~
WVDATA( DOCACT+60, ACTIVTY+9, ACTIVTY+10, ACTIVTY+11, ACTIVTY+17, ACTIVTY+18, ACTIVTY+19, ACTIVTY+28, ACTIVTY+30
WVDATA(8925 DOCS+6, DOCS+7
WVDATA(9000010 VISITS+10, VISITS+11, VISITS+12
WVDOC DOCS~, DOCS+3, DOCS+6, DOCS+7, DOCS+8
WVDOCS DOCS~, DOCS+5*, DOCS+8
WVDOCS( DOCS+6*, DOCS+7*
WVENTRIS SHODATA+1~, SHODATA+2, SHODATA+5
WVENTRIS( SHODATA+3*, SHODATA+4*, SHODATA+10
>> WVENTS( SHODATA+4
>> WVENTS("Y" SHODATA+4
WVERROR DOCACT+2~, DOCACT+23, DOCACT+29*, DOCACT+30, DOCACT+37*, DOCACT+38, DOCACT+41*, DOCACT+42!, DOCACT+52*, DOCACT+55*
, DOCACT+56, DOCACT+59*, DOCACT+61*, DOCACT+62, DOCACT+63, DOCACT+69*, DOCACT+76*, DOCACT+80*, DOCACT+81*, SHODATA+1~
, SHODATA+5, SHODATA+7*, CROOTREC+1~, CROOTREC+2*, CROOTREC+4*, CROOTREC+5
WVERRORS DOCACT+2~, DOCACT+59, DOCACT+80, VISITS+1~, VISITS+4, VISITS+8!, DOCS+1~, DOCS+4, ACTIVTY+4~, CROOTREC+1~
, CROOTREC+4
WVERRORS("DIERR" VISITS+4, VISITS+6
WVFDA DOCACT+24~, ACTIVTY+4~, CROOTREC+1~
WVFDA( DOCACT+78*, CROOTREC+2*
WVFIRST DOCACT+22~*, DOCACT+25*
WVHELP DOCACT+24~, DOCACT+50, ACTIVTY+4~, ACTIVTY+27, ACTIVTY+38
WVIEN BRANCH~, BRANCH+2, BRANCH+5, BRANCH+8, ACTIVTY~, ACTIVTY+5, ACTIVTY+6, ACTIVTY+9, ACTIVTY+10, ACTIVTY+11
, ACTIVTY+17, ACTIVTY+18, ACTIVTY+19, ACTIVTY+28, ACTIVTY+30, CROOTREC~, CROOTREC+2
WVINDEX ITEMS+1~, ITEMS+2*, ITEMS+3, ITEMS+4, ITEMS+5, ITEMS+6, ITEMS+7
WVITEM DOCACT+2~, DOCACT+10*, DOCACT+15*, DOCACT+16, DOCACT+18*, DOCACT+20, DOCACT+23, DOCACT+28, DOCACT+86, DOCACT+90*
, ITEMS+1~, ITEMS+3*, ITEMS+4, ITEMS+5, ITEMS+6, SHODATA+3
WVITEMS DOCACT+2~, DOCACT+5, DOCACT+8, DOCACT+10, DOCACT+11, DOCACT+17, DOCACT+21, DOCACT+87*, DOCACT+88, DOCACT+89
, ITEMS~, ITEMS+2*, ITEMS+4, ITEMS+5, ITEMS+7
WVITEMS( DOCACT+10, DOCACT+16, DOCACT+20, DOCACT+23, DOCACT+28, DOCACT+86!, DOCACT+90, ITEMS+6*
WVITEMS(0 DOCACT+18
WVKEY DOCACT+3~, DOCACT+5, DOCACT+86!, DOCACT+90*, VISITS~, DOCS~, ITEMS~, ITEMS+4, ITEMS+5
WVKEY( DOCACT+10, DOCACT+14, DOCACT+15, DOCACT+90*, VISITS+13*, DOCS+8*
WVMSG ACTIVTY+4~, ACTIVTY+6, SHODATA+1~, SHODATA+6*, SHODATA+7
WVNODE DOCACT+2~, DOCACT+23*, DOCACT+27, DOCACT+28, DOCACT+39, DOCACT+43, DOCACT+44, DOCACT+54, DOCACT+75, BRANCH+5
, ACTIVTY+18, ACTIVTY+29, SHODATA+3, SHODATA+4, SHODATA+8
WVPAT DOCACT+5, ITEMS~, ITEMS+2, ITEMS+3, ITEMS+6, SHODATA+3, SHODATA+8
WVPAT("NAME" DOCACT+33, DOCACT+44, DOCACT+45, ACTIVTY+12, ACTIVTY+18, ACTIVTY+22, ACTIVTY+23, ACTIVTY+29, SHODATA+9
WVPIECE BRANCH+1~, BRANCH+8*
WVPNUM DOCACT+3~, DOCACT+10*, DOCACT+20*
WVPSA DOCACT+24~, DOCACT+30, DOCACT+53*, DOCACT+54
WVPT ACTIVTY+4~, ACTIVTY+11*, ACTIVTY+12*, ACTIVTY+15, ACTIVTY+22, ACTIVTY+24, ACTIVTY+25, ACTIVTY+32, ACTIVTY+33
WVRECID DOCACT+24~, DOCACT+28*, DOCACT+29, DOCACT+41, DOCACT+53*, DOCACT+54, DOCACT+56, DOCACT+57, DOCACT+60, DOCACT+81
WVRESULT DOCACT+22~, DOCACT+54*, DOCACT+55, DOCACT+74*, DOCACT+76, DOCACT+77, DOCACT+81*, BRANCH+1~, BRANCH+2*, BRANCH+3
, BRANCH+5*, BRANCH+6, BRANCH+9, BRANCH+10*, BRANCH+11, ACTIVTY+4~, ACTIVTY+7*, ACTIVTY+8, ACTIVTY+13
WVRET ACTIVTY+4~, ACTIVTY+19*, ACTIVTY+30*, ACTIVTY+42
WVRETURN VISITS+1~, VISITS+2*, VISITS+4*, VISITS+14, DOCS+1~, DOCS+2*, DOCS+4*, DOCS+9, ITEMS+1~, ITEMS+2*
, ITEMS+3, ITEMS+4*, ITEMS+5*, ITEMS+7*, ITEMS+8
WVRTACTS DOCACT+24~, DOCACT+56*, DOCACT+57, DOCACT+60, DOCACT+61, DOCACT+71*, DOCACT+73*, DOCACT+74, DOCACT+82
WVRTACTS( DOCACT+60*, DOCACT+65, DOCACT+72, DOCACT+82!
WVRTACTS("B" DOCACT+57*, DOCACT+58, DOCACT+60, DOCACT+62, DOCACT+63, DOCACT+65, DOCACT+71, DOCACT+72, DOCACT+73, DOCACT+82!
, DOCACT+83!, DOCACT+84*
WVSTATUS DOCACT+3~, DOCACT+4, DOCACT+5*, DOCACT+6
WVTEXT DOCACT+24~, DOCACT+31*, DOCACT+32*, DOCACT+33*, DOCACT+34*, DOCACT+35, DOCACT+44*, DOCACT+45*, DOCACT+46*, DOCACT+47*
, DOCACT+48*, DOCACT+49, ACTIVTY+4~, ACTIVTY+21*, ACTIVTY+22*, ACTIVTY+23*, ACTIVTY+24*, ACTIVTY+25*, ACTIVTY+26, ACTIVTY+32*
, ACTIVTY+33*, ACTIVTY+34*, ACTIVTY+35*, ACTIVTY+36*, ACTIVTY+37
WVTXTA DOCACT+24~
WVTXTA( DOCACT+36
WVTYPE DOCACT+3~, DOCACT+6*, DOCACT+9, DOCACT+11, DOCACT+12, DOCACT+19, SHODATA+2, SHODATA+3, SHODATA+4
WVVISIT VISITS~, VISITS+3, VISITS+7, VISITS+10, VISITS+11, VISITS+12, VISITS+13
WVVISITS VISITS~, VISITS+5*, VISITS+13
WVVISITS( VISITS+7*, VISITS+10*, VISITS+11*, VISITS+12*
X DOCACT+2~, ACTIVTY+4~, ACTIVTY+16*
Y DOCACT+2~, DOCACT+7, DOCACT+8, DOCACT+14*, DOCACT+15, DOCACT+21*, DOCACT+53, DOCACT+71, DOCACT+72, DOCACT+73*
, DOCACT+88*, ACTIVTY+4~, ACTIVTY+42
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  | All