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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRSATAPE

Package: PAID

Routine: PRSATAPE


Information

PRSATAPE ; HISC/FPT-Load 8B's onto Tape ;8/17/95 08:43

Source Information

Source file <PRSATAPE.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZISC  
MailMan 1 ^XMD  
VA FileMan 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
TAPE ; make a tape of 8b records
LOAD ; load records onto tape
PROCESS ; write records onto tape
AGAIN
MAIL ; move 8b tape data into mail messages
KILL
M1 ; move 8b records to mail messages
M2
M3

External References

Name Field # of Occurrence
^%ZIS TAPE+4, MAIL+1
HOME^%ZIS TAPE+4, MAIL+1
^%ZISC TAPE+5, MAIL+2
^DIC TAPE+2
^XMD M3+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: XMSUB
  • Line Location: LOAD+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: LOAD+5
Function Call: WRITE
  • Prompt: "*** END ***"_$J("",69)
  • Line Location: LOAD+6
Function Call: WRITE
  • Prompt: RECORD_$J("",80-$L(RECORD))
  • Line Location: AGAIN+0
Function Call: WRITE
  • Prompt: $E(RECORD,1,LENGTH-2)_$J("",80-(LENGTH-2))
  • Line Location: AGAIN+2
Function Call: READ
  • Variable: HEADER
  • Timeout: 60
  • Line Location: MAIL+2
Function Call: WRITE
  • Prompt: !!,RECCNT," Records / ",MSGCNT," Messages",!
  • Line Location: MAIL+3
Function Call: READ
  • Variable: X
  • Timeout: 60
  • Line Location: M1+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: M3+0
Routine Call
  • %ZIS
  • Line Location:
    • TAPE+4
    • MAIL+1
Routine Call
  • %ZIS
  • Line Location:
    • TAPE+4
    • MAIL+1
Routine Call
  • DIC
  • Line Location:
    • TAPE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRST(458 - [#458] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("SITE" LOAD+2
^DIC(4 - [#4] LOAD+1
^PRSPC - [#450] PROCESS+1
^PRST(458 - [#458] TAPE+1, TAPE+2, LOAD+2, LOAD+5, PROCESS+1, PROCESS+2
^TMP($J M1+1!*, M2!
^XMB(1 - [#4.3] LOAD+1

Label References

Name Line Occurrences
AGAIN AGAIN+2
KILL TAPE+1, TAPE+2, TAPE+4, TAPE+5, MAIL+1
LOAD TAPE+5
M1 MAIL+2, M1+2
M2 M1+1
M3 M1+2, M2
PROCESS LOAD+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS TAPE+4!*, MAIL+1!*, KILL!
%ZIS("A" TAPE+4*, MAIL+1*
%ZIS("B" TAPE+4*, MAIL+1*
DIC TAPE+2!*
DIC("B" TAPE+2*
DIC(0 TAPE+2*
HEADER MAIL+2*, KILL!, M3+1
IEN LOAD+4*, LOAD+5*, PROCESS+1, PROCESS+2, KILL!
IO TAPE+5, LOAD+3, LOAD+6, AGAINAGAIN+2, MAIL+2, M1+1
>> IO(0 LOAD+5, PROCESS+1, M3
LENGTH AGAIN!, AGAIN+1*, AGAIN+2
LOOP KILL!, M1+1*
MSGCNT MAIL+2*, MAIL+3, KILL!, M3+2*
NAME PROCESS+1*!
POP TAPE+4, MAIL+1, KILL!
PPIEN TAPE+1*, TAPE+2, TAPE+3*, LOAD+2, LOAD+5, PROCESS+1, PROCESS+2, KILL!
RECCNT LOAD+4*, LOAD+5, AGAIN*, AGAIN+2*, MAIL+2*, MAIL+3, KILL!, M1+1*
RECORD PROCESS+2*, AGAIN!, AGAIN+1, AGAIN+2*
SN LOAD+1*, LOAD+2, KILL!
STUB PROCESS+2*, AGAIN!, AGAIN+2
U TAPE+1, TAPE+2, LOAD+2, PROCESS+1
X KILL!, M1+1*
XMDUZ KILL!, M3+2*
XMSUB LOAD+2*, LOAD+3*, KILL!, M3+1*
XMTEXT KILL!, M3+2*
XMY KILL!
XMY("XXX@Q-TAB.DOMAIN.EXT" M3*
Y TAPE+2, TAPE+3, KILL!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All