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

Package: Record Tracking

Routine: RTSM81


Information

RTSM81 ;PKE/ISC-ALBANY-Retirement Data Routine; ; 11/7/90 ;

Source Information

Source file <RTSM81.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 7 ^%DT  (C,NOW)^%DTC  ^DIC  ^DIE  EN1^DIP  D^DIQ  ^DIR  

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

Package Total Caller Graph
Record Tracking 6 RT RETIREMENT PROFILE  RT SORT TEMPLATES  RT TIME STUDY  RT WARD LIST  RTSM8  RTW WARD LIST  

Entry Points

Name Comments DBIA/ICR reference
ASK
DIE
Q
START ;K RTFLAGS,RTT S (RTLSTQ,RTLSTP)=0 F I=10,8,12 S $P(RTFLAGS,"^",I)=$P(^DIC(195.4,1,0),"^",I)="y"
DIP
FLAG
DAT
TYP
SET ;
BDAT
HDR
H1
H2

External References

Name Field # of Occurrence
^%DT DAT+1
C^%DTC SET+1, BDAT
NOW^%DTC DAT
^DIC DIE
^DIE DIE, DIE+1
EN1^DIP DIP
D^DIQ BDAT
^DIR DIE+6, DIE+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Record Type Retirement Parameters:",!,"----------------------------------"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DIE+0
Function Call: WRITE
  • Prompt: !!,"Overall Retirement Parameters:",!,"------------------------------"
  • Line Location: DIE+1
Function Call: WRITE
  • Prompt: !!?5,*7,"No records will be retired!"
  • Line Location: DIE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DIE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DIE+7
Function Call: WRITE
  • Prompt: !!," 'Record Retirement Pull lists' will be generated by",!," searching all Records for ",$P($P(RTAPL,"^"),";",2)
  • Line Location: DIE+10
Function Call: WRITE
  • Prompt: !!," 'Record Retirement Pull lists' will be generated using",!," terminal digits to select a range of Records "
  • Line Location: DIE+12
Function Call: WRITE
  • Prompt: !!?5,"...compiling retirement profile"
  • Line Location: DIP+0
Function Call: WRITE
  • Prompt: Y
  • Line Location: BDAT+0
Function Call: WRITE
  • Prompt: !?5,"Generating ",RTDESC,!!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !?5
  • Condition for execution: $X>55
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: RTFLAGS(N)," "
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!?5,"You may select a single terminal digit like `11'",!?8,"or a range of terminal digits like `5-30'"
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !!?5,"Enter 'Y' to look for inactive records by terminal digit"
  • Line Location: H2+0
Function Call: WRITE
  • Prompt: !?5,"Enter 'N' to look for inactive records by record number"
  • Line Location: H2+1
Routine Call
  • DIC
  • Line Location:
    • DIE
Routine Call
  • DIE
  • Line Location:
    • DIE
    • DIE+1
Routine Call
  • DIR
  • Line Location:
    • DIE+6
    • DIE+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(195.1 - [#195.1] Classic Fileman Calls
^DIC(195.2 - [#195.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(195.1 - [#195.1] DIE+2
^DIC(195.2 - [#195.2] TYP

Label References

Name Line Occurrences
DAT FLAG+3, BDAT
DIE DIE
DIP ASK
Q DIE, DIE+1
SET TYP
TYP FLAG+3

Naked Globals

Name Field # of Occurrence
^( TYP
^(0 TYP
^(1 TYP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DAT+1*, DAT+2!
%I DAT+2!
%I(1 DAT*, DAT+1
%I(3 DAT*, DAT+1
BY DIP*!
>> DA DIE*, DIE+1*
DE DIE!, DIE+1!, Q!
DIC DIE*!, Q!, DIP*!
DIC("A" DIE*
DIC("S" DIE*
DIC(0 DIE*
>> DIE DIE*, DIE+1*
DIR DIE+6!, DIE+9!, Q!
DIR("?" DIE+5*, DIE+8*
DIR("A" DIE+4*, DIE+7*
DIR("B" DIE+4*, DIE+7*
DIR(0 DIE+4*, DIE+7*
>> DIS(0 DIP*
DQ DIE!, DIE+1!, Q!
>> DR DIE*, DIE+1*
DTOUT DIE+6, DIE+9, DIP!
>> DUOUT DIE+6, DIE+9
FLDS DIP*!
FR DIP!
IOF HDR
IOP DIP*!
IOST HDR
L DIP*!
>> RTA FLAG+2*
>> RTAA FLAG*
>> RTAPL DIE+1, DIE+2, DIE+10, FLAG, FLAG+2, TYP
>> RTB FLAG+1*
>> RTDESC HDR
RTERM DIE+2!, DIE+10*
>> RTFLAG( TYP*, SET+1*
>> RTFR FLAG+1
>> RTLSTM TYP*, SET+1*
>> RTTM DAT+2*, SET+1, BDAT
>> RTTMM DAT+2*
RTYPE TYP*, TYP+1!, SET+1
RTYPE0 TYP*, TYP+1!, SET+1
TO DIP!
>> X DIE, DIE+2*, DAT+1*, SET+1, BDAT
>> X1 SET+1*, BDAT*
>> X2 SET+1*, BDAT*
>> Y DIE, DIE+1, DIE+6, DIE+10, DAT+2, BDAT*
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