DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

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 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ T V

⟦e74739c35⟧ TextFile

    Length: 3552 (0xde0)
    Types: TextFile
    Names: »V«

Derivation

└─⟦d10a02448⟧ Bits:30000409 8mm tape, Rational 1000, ENVIRONMENT, D_12_7_3
    └─ ⟦fc9b38f02⟧ »DATA« 
        └─⟦9b46a407a⟧ 
            └─⟦12c68c704⟧ 
                └─⟦this⟧ 
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS 
    └─ ⟦91c658230⟧ »DATA« 
        └─⟦458657fb6⟧ 
            └─⟦220843204⟧ 
                └─⟦this⟧ 

TextFile

procedure Print (Object_Or_Image : String := "<CURSOR>";

                 From_First_Page : Positive := 1;
                 To_Last_Page : Positive := 3000;

                 Display_As_Twoup : Boolean := True;
                 Display_Border : Boolean := True;
                 Display_Filename : Boolean := True;
                 Display_Date : Boolean := True;

                 Ignore_Display_Parameters_For_Postscript : Boolean := True;
                 Highlight_Reserved_Words_For_Ada : Boolean := True;

                 Other_Options : String := "";

                 Number_Of_Copies : Positive := 1;
                 Printer : String := "<Default>";
                 Effort_Only : Boolean := False);

-- Prints one or more objects.
-- Additional parameters specify how the object(s) should be printed.
-- The printer used is based on the user via a map set up by the system manager.
--
-- The parameters have the following effects:
--      Object_Or_Image     Specifies the object(s) to be printed.  Can
--                          designate (via value "<cursor>") mail messages,
--                          I/O windows, etc.
--                          If more than one object is specified, then the print
--                          style is based on the first object in the list.
--
--    The following options only apply to printing on laser printers:
--
--      From_First_Page     Have the first printed page be as specified, if
--                          possible.
--      To_Last_Page        Have the last printed page be as specified, if
--                          possible.
--
--      Disply_As_Twoup     Causes printing in 2-up format if possible
--
--      Display_Border      Show a border around each page, if possible.
--
--      Display_Filename    Show the filename being printed on each page, if
--                          possible.
--      Display_Date        Show the file date on each page, if possible.
--
--
--      Ignore_Display_Parameters_For_Postscript
--                          If the object being printed is a PostScript file,
--                          causes Display_Two_Up, Display_Date, Display_Filename,
--                          and Display_Page_Border to be ignored.
--
--      Highlight_Reserved_Words_For_Ada
--                          If the object being printed is Ada, use Ada format
--                          which highlights keywords, italicizes comments, etc.
--
--
--    The following options apply to all files:
--
--      Other_Options       Standard Queue.Print options can be
--                          specified here.  The options specified here
--                          override any other option specifications.
--                          The options from above will be combined with these
--                          options, if they are still applicable.
--
--      Number_Of_Copies    Prints the specified number of copies.
--
--      Printer             Use the specified printer.  By default, determine
--                          the printer based on the user name.  (each user
--                          has a default printer).
--      Effort_Only         If true, don't print anything, but check
--                          parameter values and construct the command
--                          that would be sent to the Queue.Print command.
--
--  To print a wide listing, in landscape mode on a laser printer, the
--  following options should be used:
--
--      Display_As_Twoup => False
--      Other_Options = "Postscript => (Wide,Spacing=10,Size=10)"
--
--