DataMuseum.dk Presents historical artifacts from the history of: Rational R1000/400

This is an automatic "excavation" of a thematic subset of artifacts from Datamuseum.dk's BitArchive. See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦19d016892⟧ Ada Source

    Length: 3072 (0xc00)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, package Analyze_Views, seg_0044c2

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

--| @SUMMARY
--|     Hypertext table of all subsystem views and import/reference relations.
--|
--| @DESCRIPTION
--|     This package creates an abstract document report showing
--|     information about all specified views or views within subsystems
--|     within the specified object. Information includes the number of
--|     imports and referencers of each view, and the model.
--|
--|     Add puts a table into an existing abstract document.
--|     Display is the same as Add, except an abstract document is
--|        created.
--|
--|     Expand_Imports_And_Referencers is not yet implemented.
--|
--| @INDICES (Command_Interface, Abstract_Document)
with Abstract_Document;
package Analyze_Views is

    --| @DESCRIPTION The interface will add a table to an existing
    --| and open abstract document containing analysis of all views
    --| specified explicitly or located within the specified object
    procedure Add (Views_Within : String := "";
                   Expand_Imports_And_Referencers : Boolean := False;
                   To_Document : in out Abstract_Document.Handle;
                   Response : String := "<PROFILE>");

    --| @DESCRIPTION The interface will create and display an abstract
    --| document containing analysis of all views specified
    --| explicitly or located within the specified object
    procedure Display (Views_Within : String := "";
                       Expand_Imports_And_Referencers : Boolean := False;
                       To_Preview_Object : String := "View_Info";
                       Response : String := "<PROFILE>");
end Analyze_Views;

    nblk1=2
    nid=0
    hdr6=4
        [0x00] rec0=19 rec1=00 rec2=01 rec3=010
        [0x01] rec0=0c rec1=00 rec2=02 rec3=000
    tail 0x217001a14815c645ebaba 0x42a00088462061e03