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

Package: Registration

Routine: DGPTCR


Information

DGPTCR ;ALB/MJK - Census Worklist Re-gen ; JAN 27, 2005

Source Information

Source file <DGPTCR.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 ^DIC  (FILE,YN)^DICN  ^DIE  ^DIK  
Registration 2 WARD^DGPTC1  (CHKCUR,DATE)^DGPTCO1  
Kernel 1 ^%ZTLOAD  
MailMan 1 ^XMD  

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

Package Total Caller Graph
Registration 5 DGPT CENSUS REGEN WORKFILE  DGPTC  DGPTCO1  DGPTCO3  DGPTCR1  

Entry Points

Name Comments DBIA/ICR reference
GEN ; -- ask user regen ques
GEN1
GENQ
REGEN ; -- census workfile generation
; -- kill off old values
; input: DGCN := ifn of census date file
; DGCDT := date of census
; DGFIRST := flag(1/0) to send bulletin (option)
Q
CHK ; -- determine if good adm then set work entry
CHKQ
FEE ; --check for fee entries
FEECHK ; -- determine if good adm then set work entry
FEECHKQ
BULL ; -- bull to user re-generating
BULL1
BULLQ
SET ; -- set line in xmtext array
BLANK
OLD ;
NEW ;
HEAD ;
AD
ADQ
AD1
AD1Q
BLDMSG ;Build message text if regen currently running
SNDMSG ;Generate mail message to user

External References

Name Field # of Occurrence
^%ZTLOAD GEN1+4
WARD^DGPTC1 CHK+3
CHKCUR^DGPTCO1 GEN+1
DATE^DGPTCO1 GEN+2
^DIC GEN+4
FILE^DICN CHK+8, FEECHK+8
YN^DICN GEN1
^DIE REGEN+19
^DIK REGEN+15
^XMD BULL1, SNDMSG+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GEN+2
Function Call: WRITE
  • Prompt: !!,"Are you sure"
  • Line Location: GEN1+0
Function Call: WRITE
  • Prompt: " (Ok, work file will remain the same.)"
  • Line Location: GEN1+1
Function Call: WRITE
  • Prompt: !?5,"Answer 'YES' if you want the system to re-calculate which",!?5,"admissions require Census records.",!?5,"Otherwise, answer 'NO'."
  • Line Location: GEN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: GEN1+4
Routine Call
  • DIC
  • Line Location:
    • GEN+4
Routine Call
  • DIE
  • Line Location:
    • REGEN+19

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" BULL+2, BULL+5, AD+2, AD1+2
^DG(45.85 - [#45.85] REGEN+7, REGEN+9, REGEN+11, REGEN+13, REGEN+14, REGEN+15, REGEN+20
^DG(45.86 - [#45.86] BULL+2, BULL+5
^DGPM - [#405] CHK+1, CHK+5, AD
^DGPM("ATT1" REGEN+17
^DGPT - [#45] FEE+5, FEE+6, FEE+7, FEECHK+1, AD+3, AD1, AD1+3
^DGPT("ACENSUS" AD+3, AD1+3
^DGPT("AFEE" FEE+1, FEE+2, FEE+4
^DPT - [#2] CHK+2, FEECHK+2, AD+1, AD1+1
^UTILITY("DGPT REGEN" REGEN+8!, Q!, BULL+1!, SET+2*

Label References

Name Line Occurrences
AD OLD+3, NEW+3
AD1 NEW+4
AD1Q AD1
ADQ AD
BLANK BULL+4, BULL+5, BULL+7, OLD+1, NEW+1, HEAD+1
BLDMSG REGEN+7
BULL REGEN+21
BULL1 BULL+7
BULLQ BULL+1
CHK REGEN+17
CHKQ CHK+1, CHK+2, CHK+3
FEE REGEN+18
FEECHK FEE+9
FEECHKQ FEECHK+1, FEECHK+2
GEN1 GEN1+2
GENQ GEN+4, GEN1+1
HEAD OLD+2, NEW+2
NEW BULL+9
OLD BULL+9
SET BULL+5, BULL+7, BULL+8, BLANK, OLD+2, NEW+2, HEAD+2, HEAD+3, AD+4, AD1+4
SNDMSG REGEN+7

Naked Globals

Name Field # of Occurrence
^(0 REGEN+15, CHK+1, CHK+5, AD, AD+1, AD+3, AD1, AD1+1, AD1+3
^(70 FEE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% GEN1*, GEN1+1, GEN1+2, GENQ!
>> DA REGEN+12*, REGEN+13, REGEN+14, REGEN+15, REGEN+19*
DD CHK+8!, FEECHK+8!
DFN Q!, CHK+2*, CHK+6, CHK+7, CHKQ!, FEE+1*, FEE+2, FEE+4, FEECHK+2, FEECHK+6
, FEECHK+7, OLD+3*, NEW+3*, NEW+4*, AD+1, AD1+1
>> DGAD REGEN+17*, CHK+1, CHK+6, OLD+3*, NEW+3*, AD
DGAD0 Q!, CHK+1*, CHK+2, CHK+4, CHK+5, FEECHK+4*
DGAD1 Q!, CHK+5*, FEECHK+5*
DGBLK BULL+2!*, BULLQ!, AD+1, AD+2, AD1+1, AD1+2
>> DGCDT GEN+4*, REGEN+17, CHK+3, FEECHK+3
DGCI AD+3*, ADQ!, AD1+3*
DGCN GEN+4*, GENQ!, REGEN+9, REGEN+11, REGEN+19, BULL+2, BULL+5, AD+3, AD1+3
DGCWD CHK+3*, CHKQ!
DGDS FEE+7*, FEE+8*, FEECHK+3, FEECHK+5, FEECHKQ!
DGDT REGEN+17*, Q!, FEE+2*, FEE+4, FEECHK+3, FEECHK+4
DGEW Q!
DGFIRST REGEN+9*, Q!, BULL+1
DGI REGEN+11*, REGEN+12, Q!, BULLQ!
DGL BULL+5*, BULL+7*, BULL+8*, BULLQ!, SET+2, BLANK*, OLD+2*, NEW+2*, HEAD+2*, HEAD+3*
, AD*, AD+1*, AD+2*, AD+3*, AD1*, AD1+1*, AD1+2*, AD1+3*
DGLINE BULL+3*, BULLQ!, SET+1*, SET+2
DGMV Q!
DGNEW REGEN+10*, Q!, CHK+6, FEECHK+6, BULL+6, BULL+7, BULL+9, NEW+3, NEW+4
DGOLD REGEN+10*, REGEN+15, Q!, CHK+6, FEECHK+6, BULL+6, BULL+7, BULL+9, OLD+3
DGPMAN CHK+1*, CHKQ!
DGPMCA CHK+1*, CHKQ!
>> DGPTCV5 BULL+6
DGPTF REGEN+14*, REGEN+15!, CHK+4*, CHK+6
DGPTMSG REGEN+7~
DGPTMSG(1 BLDMSG+1*
DGPTMSG(2 BLDMSG+2*
DGPTMSG(3 BLDMSG+3*
DGPTMSG(4 BLDMSG+4*
DGPTMSG(5 BLDMSG+5*
DGPTMSG(6 BLDMSG+6*
DGPTMSG(7 BLDMSG+7*
DGT CHK+3*, CHKQ!
DGX BULLQ!, AD*, AD+2, AD+3, AD1*, AD1+2
DIC GEN+3*, GEN+4!, CHK+7*, CHK+8!, FEECHK+7*, FEECHK+8!
DIC("A" GEN+3*
DIC("B" GEN+3*
DIC("DR" CHK+7*, FEECHK+7*
DIC(0 GEN+3*, CHK+7*, FEECHK+7*
>> DIE REGEN+19*
DIK REGEN+12*, REGEN+15!
DO CHK+8!, FEECHK+8!
>> DR REGEN+19*
DUZ BULL+3, SNDMSG+4
PTFEE FEE+4*, FEE+5, FEE+6, FEE+7, FEECHK+1, FEECHK+4, FEECHK+6, FEECHKQ!, NEW+4*, AD1
, AD1+2, AD1+3
U GEN+4, REGEN+14, REGEN+15, CHK+2, CHK+4, CHK+5, FEE+6, FEECHK+4, BULL+5, AD+1
, AD+2, AD+3, AD1+1, AD1+2, AD1+3
>> X CHK+7*, FEECHK+7*
XMDUZ SNDMSG+1~, SNDMSG+3*
XMSUB BULL+3*, BULLQ!, SNDMSG+1~, SNDMSG+2*
XMTEXT BULL+3*, BULLQ!, SNDMSG+1~, SNDMSG+5*
XMY BULLQ!, SNDMSG+1~
XMY( BULL+3*, SNDMSG+4*
>> XQM REGEN+8*
Y GEN+3, GEN+4, GENQ!, CHK+3, BULL+2*, BULL+3, BULL+5*, AD+2*, AD1+2*
>> ZTDESC GEN1+3*
>> ZTIO GEN1+3*
>> ZTRTN GEN1+3*
>> ZTSAVE("DGCDT" GEN1+4*
>> ZTSAVE("DGCN" GEN1+4*
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