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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGPTMSGD

Package: Registration

Routine: DGPTMSGD


Information

DGPTMSGD ;ALB/JDS - PTF MULTIMESSAGE DELETE ; 19 DEC 84@ 0800

Source Information

Source file <DGPTMSGD.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 ^%DT  ^DIC  YN^DICN  ^DIK  
Registration 2 IN^DGHELP  LO^DGUTL  

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

Package Total Caller Graph
Registration 3 DG PTF MESSAGE CHECK  DGPTF2  DGPTF4  

Entry Points

Name Comments DBIA/ICR reference
EN
P
LOOP
READ
THRU
DEL
ONE
PICK
PICK1
HELP
ALL
ALL1
BACK
MES1
MESS
N
HLPN
Q

External References

Name Field # of Occurrence
^%DT P
IN^DGHELP EN
LO^DGUTL DGPTMSGD+2
^DIC P, HLPN+1
YN^DICN HELP+2
^DIK DEL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "DELETE BY [P]ATIENT OR [N]UMBER: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !!,"Enter 'P' to delete PTF messages by patient",!," or 'N' to delete PTF messages by number"
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+0
Function Call: WRITE
  • Prompt: I,?10
  • Line Location: LOOP+0
Function Call: READ
  • Formatting: !!
  • Prompt: "Enter the message #'s you wish to release: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: READ+0
Function Call: WRITE
  • Prompt: !,I,?10,"** Deleted **"
  • Line Location: DEL+0
Function Call: WRITE
  • Prompt: !!,"Enter:",!?10,"ALL to release all messages",!?10,"# to release a specific message",!?10,"#-# to release a range of messages",!?10,"#,#,#... to release a group of messages"
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,"Choose From:"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!,"Do you want to see a list of messages for this patient"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: $C(8)
  • Line Location: BACK+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: K
  • Line Location: MESS+0
Function Call: WRITE
  • Prompt: ?13,$E(L,1+(K*65),65*(K+1))
  • Line Location: MESS+0
Function Call: READ
  • Formatting: !!
  • Prompt: "Enter the message #'s you wish to release: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: N+0
Function Call: WRITE
  • Prompt: !!,"Enter:",!?10,"# to release a specific message",!?10,"#-# to release a range of messages",!?10,"#,#,#... to release a group of messages",!
  • Line Location: HLPN+0
Routine Call
  • DIC
  • Line Location:
    • P
    • HLPN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^DGM - [#45.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGM - [#45.5] LOOP, DEL, MES1
^DGM("PT" LOOP, ALL1

Label References

Name Line Occurrences
@( EN, READ, N
ALL1 ALL1
BACK LOOP
DEL THRU, ONE, PICK1, ALL1
EN EN, P
HELP HELP+2
LOOP HELP+1, HELP+2
MES1 LOOP
MESS MES1
N HLPN+1
PICK1 PICK1
Q EN, P, READ, THRU, ONE, PICK1+1, HELP+2, ALL1, N
READ P, HELP+2

Naked Globals

Name Field # of Occurrence
^( MES1
^(0 DEL

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN, HELP+2*, Q!
%DT P*, Q!
%Y Q!
A PICK*, PICK1, Q!
DA DEL*, Q!
>> DGALL ALL*
DGFR THRU*, DEL, ONE*, PICK1*, ALL1*, Q!
DGPTF P*, LOOP, DEL, ALL1, N*, Q!
DGTO THRU*, DEL, ONE*, PICK1*, ALL1*, Q!
DIC P*!, HLPN+1*, Q!
DIC("A" P*
DIC("S" P*
DIC(0 P*, HLPN+1*
DIK DEL*, Q!
DTIME EN, LOOP, READ, N
I LOOP*, DEL*, MES1, Q!
J PICK*, PICK1*, ALL*, ALL1*, BACK*, MES1*, Q!
K MESS*, Q!
L MES1*, MESS, Q!
>> NOW P*
U DEL
X EN*, P*, LOOP*, READ*, THRU, ONE, PICK, HELP+1, N*, HLPN+1*
, Q!
Y P, Q!
Z EN*, LOOP, HELP+1*, BACK*, MESS*, Q!
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 |  Naked Globals |  Local Variables  | All