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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ECTPFYR

Package: Interim Management Support

Routine: ECTPFYR


Information

ECTPFYR ;B'ham ISC/PTD-VAMC Staffing Report by Fiscal Year ;01/29/91 08:00

Source Information

Source file <ECTPFYR.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 ^%DT  NOW^%DTC  ^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: 1

Package Total Caller Graph
Interim Management Support 1 ECTP FISCAL YEAR  

Entry Points

Name Comments DBIA/ICR reference
V ;;1.05;INTERIM MANAGEMENT SUPPORT;;
BYR
EYR
DEV
ENQ ;ENTRY POINT WHEN QUEUED
SRV
EXIT
HDR ;PRINT REPORT MAIN HEADER
WRTLN
FTEE
PRTCHK

External References

Name Field # of Occurrence
^%DT BYR, EYR
NOW^%DTC HDR+1
^%ZIS DEV, EXIT+1
^%ZISC EXIT+1
^%ZTLOAD DEV+2
^DIR PRTCHK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!?29,"OPTION IS UNAVAILABLE!",!,"The 'VAMC Management' File - #731 is not loaded on your system.",!!
  • Line Location: V+1
Function Call: WRITE
  • Prompt: *7,!!,"'VAMC Management' File - #731 has not been populated on your system.",!!
  • Line Location: V+2
Function Call: WRITE
  • Prompt: !,"You may select the fiscal year RANGE for this report.",!,"(Up to 5 years of data may be displayed.)",!!
  • Line Location: V+3
Function Call: WRITE
  • Prompt: *7,!!,"Only a 5 year range may be shown on one report!",!!
  • Line Location: EYR+1
Function Call: WRITE
  • Prompt: *7,!!,"There is NO DATA in the file for the selected date range!",!!
  • Line Location: EYR+3
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: @IOF,!?25,"VAMC STAFFING TRENDS BY SERVICE",!?21,"ASSIGNED FTEE FOR FY: "_(1700+BYRDA)_" TO FY: "_(1700+EYRDA)
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!?45,Y,?70,"PAGE ",PGCT
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,LN
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,$P(^ECC(730,SRV,0),"^")
  • Line Location: WRTLN+0
Routine Call
  • DIR
  • Line Location:
    • PRTCHK
Routine Call
  • %ZIS
  • Line Location:
    • DEV
    • EXIT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR+1
^ECC(730 - [#730] WRTLN
^ECT(731 - [#731] V+1, V+2, EYR+2, ENQ+1
^TMP($J ENQ+1!*, SRV, EXIT!, FTEE, FTEE+1

Label References

Name Line Occurrences
BYR EYR+1
EXIT BYR, EYR, EYR+3, DEV, DEV+2, SRV
FTEE WRTLN+1
HDR ENQ+2, PRTCHK+1
PRTCHK WRTLN
WRTLN SRV

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT!, HDR+1
%DT BYR*!, EYR*!
%DT("A" BYR*, EYR*
%DT(0 BYR*, EYR*
%H EXIT!
%I EXIT!
%ZIS DEV!*
%ZIS("B" DEV*
BYRDA BYR*, EYR, EYR+1!, EYR+2, ENQ+1, EXIT!, HDR+1, HDR+2, WRTLN+1
CNT ENQ+1*, EXIT!, HDR+2, WRTLN+1
COL EXIT!, HDR+2*, WRTLN*, WRTLN+1*
CT EXIT!, HDR+2*, WRTLN*, WRTLN+1*
DIR EXIT!
DIR(0 PRTCHK*
DTOUT BYR, EYR, EXIT!
EYRDA EYR*, EYR+1!, EYR+2, ENQ+1, EXIT!, HDR+1, HDR+2, WRTLN+1
FLG EYR+2*, EYR+3, EXIT!
FTEE ENQ+1*, EXIT!, WRTLN+1, FTEE*, FTEE+1*
INCR EXIT!, HDR+2*, WRTLN*, WRTLN+1
IO DEV+3, EXIT+1
IO("Q" DEV+1!
IOF HDR+1
IOP DEV!, EXIT+1*
IOSL WRTLN
IOST PRTCHK
J ENQ+1*, EXIT!
LN ENQ+2*, EXIT!, HDR+3
PGCT ENQ+2*, EXIT!, HDR+1*
POP DEV, EXIT!
QFLG ENQ+2*, SRV, EXIT!, WRTLN, PRTCHK*
SRV ENQ+1*, SRV*, EXIT!, WRTLN, FTEE, FTEE+1
X BYR, EYR, EYR+1!, EXIT!
>> XQUIT V+1*, V+2*
Y BYR, EYR, EYR+1!, EXIT!, HDR+1*, PRTCHK
YEAR EXIT!, WRTLN+1*, FTEE, FTEE+1
YR EYR+2*, ENQ+1*, EXIT!, HDR+2*
ZTDESC DEV+1*, EXIT!
ZTRTN DEV+1*, EXIT!
ZTSAVE EXIT!
ZTSAVE("BYRDA" DEV+1*
ZTSAVE("EYRDA" DEV+1*
ZTSK DEV+2!, EXIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All