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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ABSVTP

Package: Voluntary Timekeeping

Routine: ABSVTP


Information

ABSVTP ;VAMC ALTOONA/CTB_CLH - READ MASTER TAPE FROM AUSTIN ;4/4/00 8:48 AM

Source Information

Source file <ABSVTP.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Voluntary Timekeeping 5 MSG^ABSVQ  ^ABSVSITE  EN^ABSVTP1  $$DIR^ABSVU2  ^ABSVYN  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  H^XUS  
VA FileMan 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.0;VOLUNTARY TIMEKEEPING;**18**;JULY 6, 1994
LN
OUT
A
WR
RD
EOT
X ;S X="",@^%ZOSF("TRAP") S IOP=ABSVTAPE,ABSVEOT=1 D ^%ZIS

External References

Name Field # of Occurrence
^%ZIS V+12, X+1
HOME^%ZIS V+12
^%ZISC X+1
MSG^ABSVQ V+1, V+2
^ABSVSITE V+2
EN^ABSVTP1 X+3
$$DIR^ABSVU2 V+4
^ABSVYN V+6, V+7
^DIR V+3
H^XUS RD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"Use the following Parameters for reading this "_$S(MEDIA="F":"floppy disk",1:"Tape")
  • Line Location: V+8
Function Call: WRITE
  • Prompt: !,"("_COUNT_") ",ZY
  • Line Location: WR+0
Function Call: READ
  • Variable: X
  • Timeout: 5
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !,"FATAL ERROR READING TAPE, PLEASE START OVER."
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !!,*7,"End of tape reached, will now rewind tape and build ^TMP.",!
  • Line Location: EOT+0
Function Call: WRITE
  • Prompt: @%MT("REW")
  • Line Location: EOT+1
Routine Call
  • %ZIS
  • Line Location:
    • V+12
    • X+1
Routine Call
  • %ZIS
  • Line Location:
    • V+12
Routine Call
  • DIR
  • Line Location:
    • V+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("EOT" RD+1
^%ZOSF("TRAP" LN, X+2
^TMP("VOL1" WR*, RD!

Label References

Name Line Occurrences
A LN
EOT LN+1
OUT V+6, V+7
RD LN
WR A, A+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% V+2, V+6*, V+7*, OUT!
>> ABSVEOT V+13*
>> ABSVHOME V+13*, WR, RD, EOT
>> ABSVTAPE V+13*, RD
>> ABSVX LN, RD+2*
ABSVXA V+6*, V+7*, OUT!
ABSVXB V+6*, V+7*, OUT!
>> COUNT V+13*, WR*
>> DIR("A" V+3*
>> DIR(0 V+3*
>> I LN*
IO V+13, X+1
IO(0 V+13
IOP X+1*!
>> J A+1*
>> MEDIA V+5*, V+7, V+8, V+9, V+10, A
>> NY A+2*
>> POP V+12
>> X V+1*, V+2*, LN*, A, A+1, A+2*, RD*, RD+1*, RD+2, X+2*
>> Y V+5, RD+1
>> ZY V+13*, A*, A+2*, A+3, WR*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All