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 |  Marked Items  | All
Print Page as PDF
Routine: DGPTC

Package: Registration

Routine: DGPTC


Information

DGPTC ;ALB/MJK - Census Main Options; 15 APR 90 ; 5/11/01 1:15pm

Source Information

Source file <DGPTC.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Registration 11 (CEN,CLS,KVAR)^DGPTC1  ^DGPTCO  (CHKCUR,DATE)^DGPTCO1  GEN^DGPTCR  (,Q1)^DGPTF  EN^DGPTF099  (DREL,HEL)^DGPTFDEL  ^DGPTFREL  
^DGPTFTR  (CEN,FMT,PM,RTY,UPDT)^DGPTUTL  ^DGPTXCP  
VA FileMan 3 ^DIC  DT^DICRW  IXALL^DIK  
Kernel 1 ^%ZIS  

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

Package Total Caller Graph
Registration 8 DGPT CENSUS 099 TRANSACTION  DGPT CENSUS CLOSED FOR CENSUS  DGPT CENSUS DATE DISPLAY  DGPT CENSUS DATE EDIT  DGPT CENSUS OPEN RECORD  DGPT CENSUS OPEN RELEASED  DGPT CENSUS RELEASE RECORD  DGPT CENSUS TRANSMIT  

Entry Points

Name Comments DBIA/ICR reference
A
1 ;;Load/Edit PTF Record
2 ;;Release Closed Census Record
3 ;;Open Closed Census Record
4 ;;Transmit Census Records
Q4
5 ;;Re-Open Released/Transmitted Records
6 ;;Census Outputs
7 ;;Census Date Parameters
Q7
8 ;;Regenerate Census WorkFile
9 ;;Send 099 Transmission for Census Record
Q9
10 ;;Close Census Reord
Q10
CLOSE ; -- can we xmit?
CLOSEQ
PAR ; census date parameter profile
; input: D0 := ifn of ^DG(45.86)
PARQ

External References

Name Field # of Occurrence
^%ZIS PAR+3
CEN^DGPTC1 10+3
CLS^DGPTC1 10+9
KVAR^DGPTC1 Q10
^DGPTCO 6+1
CHKCUR^DGPTCO1 7+1
DATE^DGPTCO1 7+2
GEN^DGPTCR 8+1
^DGPTF 1+1
Q1^DGPTF 10+11
EN^DGPTF099 9+2
DREL^DGPTFDEL 5+1
HEL^DGPTFDEL 3+1
^DGPTFREL 2+1
^DGPTFTR 4+2
CEN^DGPTUTL CLOSE+1
FMT^DGPTUTL 10+7
PM^DGPTUTL 10+3
RTY^DGPTUTL 2+1, 3+1, 4+2, 5+1, 9+2, 10+8
UPDT^DGPTUTL 10+6
^DGPTXCP PAR+5
^DIC A+1, 7+3, 10+2
DT^DICRW DGPTC+3
IXALL^DIK DGPTC+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !
  • Line Location: 7+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: 7+6
Function Call: WRITE
  • Prompt: !
  • Line Location: 10+1
Function Call: WRITE
  • Prompt: !!,*7," >>>> Census transactions are not required for this PTF record."
  • Line Location: 10+4
Function Call: WRITE
  • Prompt: !!,*7," >>>> This PTF record is already closed for census. (Census #",$S($D(DGCI):DGCI,1:""),")"
  • Line Location: 10+5
Function Call: WRITE
  • Prompt: !!," >>>> Not able to close for census. Please use 'Load/Edit' option to edit PTF."
  • Line Location: 10+10
Function Call: WRITE
  • Prompt: !!?5,*7,"There is currently no active census being conducted."
  • Line Location: CLOSE+2
Function Call: WRITE
  • Prompt: !!?5,*7,"Census Close date has passed (",Y,").",!?5,"No transmissions allowed."
  • Line Location: CLOSE+3
Function Call: WRITE
  • Prompt: @IOF,*13,$E(DGDASH,1,28)," Quick Parameter Profile ",$E(DGDASH,1,27)
  • Line Location: PAR+4
Function Call: WRITE
  • Prompt: !,DGDASH
  • Line Location: PAR+5
Routine Call
  • %ZIS
  • Line Location:
    • PAR+3
Routine Call
  • DIC
  • Line Location:
    • A+1
    • 7+3
    • 10+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPT - [#45] Classic Fileman Calls
^DG(45.86 - [#45.86] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" PAR+2
^DD("DD" CLOSE+3
^DG(45.86 - [#45.86] 10+7
^DGPT - [#45] 10+6
^DOPT( DGPTC+4, DGPTC+5*, DGPTC+6*

Label References

Name Line Occurrences
10 10+4, 10+5, 10+11
@( A+1
A DGPTC+4, A+1
CLOSE 4+1, 9+1
CLOSEQ CLOSE+2, CLOSE+3
PAR 7+4
PARQ PAR+2
Q10 10+2
Q4 4+1
Q7 7+3
Q9 9+1

Naked Globals

Name Field # of Occurrence
^(0 10+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 7+4*, Q7!
DA Q7!
DFN 10+3*, Q10!
DG 3+2!
DG1 Q10!
DGADM 3+2!, Q10!
>> DGCI 10+5
DGCN Q4!, 7+4*, Q7!, Q9!, 10+7, CLOSE+2
DGCN0 Q4!, Q9!, CLOSE+3
>> DGCST 10+4, 10+5, 10+10
DGDASH 7+2!, PAR+3!*, PAR+4, PAR+5, PARQ!
DGDOM 3+2!
DGHEM 3+2!
DGL Q10!
DGNHCU 3+2!
DGPTF 10+3*, Q10!
DGPTFE 10+6*, Q10!
DGPTFMT Q10!
DGRTY Q10!
DGRTY0 Q10!
DIC A*, 7+3*!, 10+1*, 10+2!
DIC("B" 7+2*
DIC("S" 10+1*
DIC(0 A*, 7+3*, 10+1*
>> DIK DGPTC+3*
DT CLOSE+3
DXS PAR+3!, PARQ!
>> I DGPTC+6*
IOF PAR+4
IOP PAR+3*!
MASD 3+2!
MASDEV 3+2!
PARA 3+2!
PTF 10+3*, 10+6, Q10!
U 10+6, CLOSE+3
>> X DGPTC+3*, DGPTC+4, DGPTC+5, DGPTC+6, PAR+2*
>> Y DGPTC+6*, A+1, 2+1*, 3+1*, 4+1, 4+2*, 5+1*, 7+2, 7+3, 7+4
, 9+1, 9+2*, 10+2, 10+3, 10+7*, 10+8*, CLOSE+1*, CLOSE+2*, CLOSE+3*
>> Y(0 10+3, 10+6

Marked Items

Name Field # of Occurrence
$T(@I DGPTC+6
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 |  Marked Items  | All