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

Package: Registration

Routine: DGPTFREL


Information

DGPTFREL ;ALB/JDS - DATA RELEASE ;1/25/05 12:22pm

Source Information

Source file <DGPTFREL.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Registration 7 ICDINFO^DGAPI  $$DATA2PCE^DGAPI1  Q1^DGPTF  MOB^DGPTFM2  XREF^DGPTFM21  (D,HANG,RTY)^DGPTUTL  LO^DGUTL  
VA Fileman 3 ^DIC  (FILE,YN)^DICN  ^DIE  
Uncategorized 1 ^A1B2MAIN  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Registration 4 DG PTF RELEASE RECORD  DGPTC  DGPTC1  DGPTF41  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- entry point
ERR
CEN ; -- does census also need to be released if releasing PTF in Load/Edit
Q
REL ;
ASK

External References

Name Field # of Occurrence
^A1B2MAIN REL+18
ICDINFO^DGAPI REL+12
$$DATA2PCE^DGAPI1 REL+15
Q1^DGPTF Q+1
MOB^DGPTFM2 REL+12
XREF^DGPTFM21 REL+12
D^DGPTUTL EN+1
HANG^DGPTUTL REL+17
RTY^DGPTUTL ASK+1, CEN+1
LO^DGUTL DGPTFREL+3
^DIC ASK+4
FILE^DICN REL+4, REL+10
YN^DICN REL+1
^DIE REL+8, REL+11, REL+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Cannot release while transmitting"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Release ",$P(DGRTY0,U)," record #",DGPTIFN," for:",!?5,$P(DGPT,U,1)," - ",$P(DGPT,U,9)," Closed ",Y
  • Line Location: REL+1
Function Call: WRITE
  • Prompt: !!,"Enter 'Y' if this is the ",$P(DGRTY0,U)," record you wish to release for transmission",!,"to Austin, 'N' or <RET> if not.",!
  • Line Location: REL+2
Function Call: WRITE
  • Prompt: !,*7,"Cannot continue without proper FileMan access. Please see your supervisor."
  • Line Location: REL+4
Function Call: WRITE
  • Prompt: !,"Patient is being edited by another user"
  • Line Location: REL+6
Function Call: WRITE
  • Prompt: !!,"****** ",$P(DGRTY0,U)," RECORD RELEASED ******",!
  • Line Location: REL+16
Function Call: WRITE
  • Prompt: !!,*7,"Census Record #",DGCI," also needs to be 'released'."
  • Line Location: CEN+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !,^(I)
  • Line Location: ERR+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !,"Press return to continue."
  • Line Location: ERR+2
Routine Call
  • DIE
  • Line Location:
    • REL+8
    • REL+11
    • REL+15
Routine Call
  • DIC
  • Line Location:
    • ASK+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGP(45.83 - [#45.83] Classic Fileman Calls
^DGP(45.84 - [#45.84] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGP(45.83 - [#45.83] ASK, REL+4, REL+7*, REL+8
^DGP(45.84 - [#45.84] EN+1
^DGPT - [#45] EN+1
^DGPT(45 REL+5, REL+17
^DPT - [#2] EN+1
^TMP("DGPAPI" ERR+1

Label References

Name Line Occurrences
ASK REL+20
CEN REL+19
EN CEN+1
ERR REL+15
Q ASK+4, REL+3, REL+4, REL+6
REL REL+2

Naked Globals

Name Field # of Occurrence
^( ERR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% REL+1*, REL+2, REL+3, Q!
A Q!
DA ASK+4*, REL+8*, REL+10!, REL+11*, Q!
DA(1 REL+10*
DD REL+4!
DFN EN+1*, REL+12, REL+15, Q!
>> DGCI CEN+1
>> DGCST CEN+1
DGPT EN+1*, REL+1, Q!
DGPTF EN+1*, Q!
DGPTFLE REL+19, CEN+1, Q!
DGPTIFN ASK+4*, EN+1, REL+1, REL+5, REL+10, REL+11, REL+15, REL+17, CEN+1*, Q!
DGREL EN+1*, Q!
DGRTY ASK+1, ASK+3, REL+18, CEN+1, Q!
DGRTY0 ASK+2, REL+1, REL+2, REL+16, Q!
>> DGZP REL+14*, REL+15
>> DGZPRF( REL+14, REL+15
DIC ASK+1!, ASK+2*, ASK+4!, REL+4*!, REL+10*!, Q!
DIC("A" ASK+2*
DIC("S" ASK+3*
DIC(0 ASK+2*, REL+4*, REL+10*
DIE REL+8*!, REL+11*, Q!
DINUM REL+4*!, REL+10*!
DO REL+4!
DP Q!
DR REL+8*, REL+11*, REL+13*, Q!
>> DRGCAL REL+19
DT REL+4, REL+7, REL+8, REL+10, REL+11
DTIME ERR+2
DUZ REL+11
>> I ERR+1*
IOF ERR
>> PTF ASK+4*, REL+12
>> RES REL+15
U ASK+2, EN+1, REL+1, REL+2, REL+8, REL+15, REL+16
X REL+4*, REL+10*, Q!, ERR+2*
Y ASK+1*, ASK+4, EN+1*, REL+1, REL+4, CEN+1*, 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