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 |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: XMAPBLOB

Package: MailMan

Routine: XMAPBLOB


Information

XMAPBLOB ;(WASH ISC)/CAP-DISPLAY BLOBs ;04/18/2002 07:22

Source Information

Source file <XMAPBLOB.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Imaging 4 ERASE^MAGAPI  ($$IMPORT,IMPORT)^MAGBAPI  ^MAGFILE  ^MAGOBJ  
VA FileMan 1 ^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
MailMan 1 XMJMOI  

Entry Points

Name Comments DBIA/ICR reference
BLOB
B
BQ
CLRQ
BLIST() ;List BLOBS in the message
A
ASK()
NODISP ;If not proper terminal
PRT ;Print BLOB list
PRTQ

External References

Name Field # of Occurrence
^DIR BLIST+3, ASK+3
ERASE^MAGAPI CLRQ+1
$$IMPORT^MAGBAPI B+2
IMPORT^MAGBAPI B+2
^MAGFILE B+3
^MAGOBJ BQ+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"============================================================="
  • Line Location: BLIST+4
Function Call: WRITE
  • Prompt: !!,"There are non-textual parts (BLOBs) included on this message"
  • Line Location: BLIST+5
Function Call: WRITE
  • Prompt: !!,"Object Name",?70,"Filename"
  • Line Location: BLIST+6
Function Call: WRITE
  • Prompt: !,I_". "_$E($P(XMA0(I),U,2),1,68),?70,$E($P(XMA0(I),U,9),1,9)
  • Line Location: BLIST+7
Function Call: WRITE
  • Prompt: !!,"Pick a BLOB you wish to display from the above list (1-"_XMB0_"): NONE// "
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !!,"Choose the index number of the BLOB you wish to display or accept the default.",!
  • Line Location: A+3
Function Call: WRITE
  • Prompt: !!,"Please choose a listed item by typing in its index number."
  • Line Location: A+4
Function Call: WRITE
  • Prompt: !!,"================================================================="
  • Line Location: NODISP+2
Function Call: WRITE
  • Prompt: !,"There are non-textual body parts (BLOBs) attached to this"
  • Line Location: NODISP+3
Function Call: WRITE
  • Prompt: !,"message. You may not execute them (display...) because you"
  • Line Location: NODISP+4
Function Call: WRITE
  • Prompt: !,"are not using the proper terminal."
  • Line Location: NODISP+5
Function Call: WRITE
  • Prompt: !!,"Query the message to see the list of BLOBs attached."
  • Line Location: NODISP+6
Function Call: WRITE
  • Prompt: !,"================================================================="
  • Line Location: NODISP+7
Routine Call
  • DIR
  • Line Location:
    • BLIST+3
    • ASK+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XMB(3.9 - [#3.9] BLOBBNODISP+1

Label References

Name Line Occurrences
$$ASK BQ+2
$$BLIST BQ+3, PRTQ
A A+3, A+4
B B+5
BLOB PRT+2
BQ BBQ+6
CLRQ BQ+2, BQ+3
PRTQ BQ+2

Naked Globals

Name Field # of Occurrence
^( B

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BLOB+1~, B*, B+1, B+2*
DIR BLIST+2~, BLIST+3!, ASK+1~
DIR("A" ASK+2*
DIR("B" ASK+2*
DIR(0 BLIST+3*, ASK+2*
DIRUT BLIST+2~, BLIST+3!, ASK+1~, ASK+3!
DTIME A+1
DUOUT BLIST+2~, ASK+1~
I BLOB+1~, BLIST+7*
IOSL BLIST+3
>> IOT BQ+3, BLIST+1
MAGFILE BLOB+1~, B+4, PRT+1~
MAGFILE1 PRT+1~
MAGFILE1( B+4
MAGFILE2 BLOB+1~
MAGOBJ PRT+1~
MAGROU PRT+1~
>> MAGXX B+1*, B+2
U B+4, BLIST+7, ASK+2
X BQ*, BQ+2*, BQ+3*, BQ+4, BLIST+2~, A+1*, A+2*, A+3, A+4, A+5
PRT+1~, PRTQ*
XMA0 BLOB+1~, BLOB+2*, B*, BQ+2*, BQ+3*, BQ+5
XMA0( B+1*, B+4*, BQBQ+5, BLIST+7, A+4, A+5
XMA0(0 BQBQ+5
XMA0(1 BQ+2, ASK+2
XMAPBLOB BLOB+2*, BQ+2, CLRQ, BLIST+1, BLIST+3, A, ASK, PRT+1~*
XMAPBLOB("D" BLIST+3, BLIST+4, BLIST+6*, NODISP+1*
XMAPBLOB("DISPDONE" BQBQ+1*
XMB0 BLOB+1~, BLOB+2*, B+1*, B+4, BQ+2, BQ+5, A+1
>> XMZ BLOBBNODISP+1
Y BLIST+2~, ASK+3

Marked Items

Name Field # of Occurrence
$T(IMPORT^MAGBAPI B+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All