ICL 1900 Software Tapes

4671004,ICLKG3LPS14(0)

Program Title Version Manual
GEORGE 3 LPS14 System
PROGRAM XKNP LPS14 Subject Program #XKNP 1 RP1031
LPSJDF LPS14 Control Macro   RP1031
LPSRUN LPS14 Control Macro   RP1031
LPSDEFAULTS LPS14 Macro   RP1031
LPSPROPERTY LPS14 Macro   RP1031
LPSATTRIBUTE LPS14 Macro   RP1031
LPSWHATPROPS LPS14 Macro   RP1031

Setting up LPS System on GEORGE 3

  1. Create user/directory :LPSCONTROL (under :SYSTEM)
    Give privileges ACTIVOP and HLSEXT and sufficient budgets for MONEY, TIME and SPACEMT.

  2. Set IPs LPSTIME=30 (run every 30 mins) and LPSVALUE=0

  3. Use NEWCOPYIN to copy a macro into :MACROS
           NEWCOPYIN (4671004)
           LPSWHATPROPS,LPSWHATPROPS
           ****
           


  4. Use NEWCOPYIN to copy program/macros into :LPSCONTROL
           NEWCOPYIN (4671004)
           PROGRAM XKNP,PROGRAM XKNP
           LPSJDF,LPSJDF
           LPSRUN,LPSRUN
           LPSDEFAULTS,LPSDEFAULTS
           LPSPROPERTY,LPSPROPERTY
           LPSATTRIBUTE,LPSATTRIBUTE
           ****
           


  5. Under :LPSCONTROL run:-
       LPSDEFAULTS - create default laser properties file
       LPSPROPERTY PRLASER - add a new property 'LASER' (for example)
       LPSATRIBUTE PRLASER - set 'LASER' as a printer property

  6. On operator's console:-
       PR LASER(PERM,EXCL) - set up a new G3 system property 'LASER' to match that in the LPS system
    Note: Other properties for special stationaries can be set up, but need to be both G3 and LPS properties.

  7. Run a G3 restore to enable the LPS interface:-
           ...
           ...
           #
           # LPS14 SUPPORT
           #
           #ALT ANIP=1
           #ALT K8LISTINIT=11
           #ALT K11LISTNEXT=12
            MENDIT :GEO,WHATPROP,865,4
            MENDIT :GEO,LISTEXCP,865,2
            MENDIT :GEO,LISTFIND,867,3
            MENDIT :GEO,LISTINIT,867,1
            MENDIT :GEO,LISTLOOP,867,1
            MENDIT :GEO,LISTNEXT,867,1
            MENDIT :GEO,LISTNIP,865,1
            MENDIT :GEO,LISTOPEN,867,1
            MENDIT :GEO,LISTPREP,865,2
            MENDIT :GEO,LISTPROC,867,4
           ...
           ...
           #
           #  RESTORE TIME MACROS
           #
            LFDBAID
            LPS ON
           ...
           ...
           
    These are in addition to any other 'mendits' and 'restore time macros' that you may have used.
    The version numbers are correct for the binary from the tape 4672012,ICLKGSNED867(10).
    The source files will need to be copied using NEWCOPYIN to :GEO from tapes 4671012,ICLKGCHAP867(375/0) and 4671013,ICLKGCHAP867(375/1).

  8. Reboot the system using the newly restored version of G3.

  9. The LPS job should start automatically at EMS (it finishes, leaving a control job running, like DUMPER).
    The job should spring into action after 30 minutes (IP LPSTIME=30) and spool to a POOL tape any files that have been listed using the 'LASER' property (LF file,*LP,PRLASER).
    The tape will then be released for printing, the job finishing and starting a new job that will spring into action in another 30 minutes.