Xerox 9300 Monarch Technical Manual

XEROX

Technical Information

,

Xerox

900

Series/9300

MONARCH

Technical

Manual

90

06 160

April 1968

701

South Aviation Boulevard

EI

Segundo, California 90245

213679-4511

XEROX

Xerox

90

06

900

Technicat

160

Series/9300

Manual

Price: $3.75

MONARCH

April

1968

Printed in U.S.A.

This

publication,

cal

Manual,

description

for

642025-9300)

90

.

90

06

16C.

the

MONARCH

16D,

The

is a

only

Loader

REVISION

revision

change

Routine

of

the

made

Xerox

in this

(Cata

log

900

Series/9300

edition

No.

is

the

restoration

042010-900

MONARCH

of

Series,

Techni-

the

The

specifications

without

notice. configuration consult

II

their

Xerox

of

The

of

equipment

the

software

availability

sales

representative

such as

NOTICE

system or

described

performance

additional

for

tape

details.

in

of

units

this

some

or

publication

features

larger

may

memory.

are

subject

depend

Customers

on a

to

change

specific

should

CONTENTS

Catalog

900 Series

No.

9300

Introduction MONARCH Operating System for 900 Series/9300 Computers MONARCH Control Routine (CONTROL) Type Message Subroutines Standard Action Subroutine

(TYPM,

for

MONARCH Message Analysis Tables

TYPOUT)

System Routines (GSYSP) 5

(TABLES)

,042012

042004

042005 642019

642028 642027

MONARCH Control Message Input Subroutine (QMSGRD) 042006 642020 MONARCH Card

Read

Paper Tape/Typewriter Magnetic Tape Line Printer Subroutine

I/O

Subroutine Loader

Subroutine

I/O

Subroutine

(CARD)

I/O

Subroutine (MTYIO)

(MAGTP)

(MPRNT)

(LDIOSR)

MONARCH Control Supplementary Action Routines

(LDI2)

042007 642021 042031 642030 042032

642031 042033 642032 042034 642033 042030 642034

Page

iv

1 3

4

14 17

19 22 23 24 26 27

Transfer to 900 Series RAD

MONARCH Loader

MOf'JARCH

RAD

MONARCH Generator

Control (TFMONRCH) 042008

($QSYLDR)

900 Series MONARCH Resident

Routine MONARCH Bootstrap Loader MONARCH Loader MONARCH Appendix A Appendix B

(QFMR)

(BOOTSTRAP)

($QSYLDR)

Update Routine

($UPDATE) Control Message Action Subroutines Adding New Functions to the

Monitor

Function Code Table Symbol

Tab

I e Items and

Internal Format of Reference and Defin ition Items

(SYSGE

RAD

File Management

TABLES

N)

MONARCH

642023

04210D

042009 642024

042010

642025

042011 642026

39 40 44

58

68 70

84

92

96

16

46

iii

This

manual

ing

the

MONARCH MONARCH formation Operating

All

of

these

mended

bo

and program gram

See to

means

i c

corrections

then

as

is

reassembled

the

description

creati

ng

reassembling

describes

Reference

needed

System.

programs

of

input.

and

Monitor.

for

maki relative

A

in

of

updati

the

functional

Manual

the

mai

have

ng

changes

to

with

new

encoded

order

the

MONARCH

ng

MO

INTRODUCTION

characteristics

This

description

(SDS

Publication

ntenance

been

assembled

the

current

the

symbolic

to

and

one

deck

to

facilitate

Update

NARC H system

of

the

programs

is

modifi

using

of

these

intended

No.

cation

META-SYMBOL.

programs

to

supplement

900566) of

and

the

is by furn ish i ng

META-SYMBOL I isting

corrections

shou

Id

future

Routine

and

be

requested

changes.

the

current each

for

information

tapes.

compris-

provides

MO

NARC H

The

of

that

encoded

time a pro--

the

in-

recom-

sym-

program

relating

iv

!t

;1 I -1*

I

SCIENTIFIC

DATA

SYSTEMS

SDS

PROGRAM

LIBRARY

IDENTIFICATION: MONARCH

COMPUTER CONFIGURATION: Any

PURPOSE:

PROGRAMMING

CONVENTIONS:

SDS

900 Series/9300 Computer system with storage, console typewriter, and one or more magnetic tapes. see MONARCH

To

perform automatic execution of a sequence of independent or related

grams without requiring operator intervention.

MONARCH may be assembled using either also uses

no

MEMORY

I east

REQUIREMENTS:

SUBROUTINES USED:

At

MONARCH consists of the following routines:

8K

PROGRAM

FOR

900 SERIES/9300

REFERENCE

internal

words of core storage.

DESCRIPTION

MANUAL.

PROGRAMMED

COMPUTERS

SYMBOL

OPERATORS

Catalog

at

least

or

META-SYMBOL. It

and it

Nos. 042012 (900 Serie

642028 (9300)

8K

words of core

For

detai

Is,

pro-

is

reloca.table.

Routine MONARCH Control Routine

l.

MONARCH Message Analysis

2.

Tables

MONARCH Control Message

3.

Input Subrouti ne MO

4.

5.

6.

7.

8.

9.

NARC H I/O

Loader Card

Read

Subroutine

Paper T

Subroutine Magneti c Tape Line Printer Subroutine MONARCH Supplementary

Action

ape/T

Rouri

Subrouti

ypewri ter

I/O

nes

ne

I/O

Subrouti ne

Catalog No.

Mnemonic CONTROL

TABLES

QMSGRD

LDIOSR

CARD MTYIO 042032

MAGTP

MPRNT

LDI2

900 Series 9300 042004 042005

042006

042007

042031

042033

042034

042030

642027 642019

642020

642021

642030 642031

642032 642033 642034

SUBROUTINES USED: (cont.

)

10.

Routine Transfer to

Control

MONARCH

Mnemonic

TFMONRCH

Catalog

900 Series

042008

No.

9300 642023

MO

1l.

MONARCH

12.

MONARCH

13. FORTRAN

14. FORTRAN

15.

ALGOL

16.

*There

thus, selective

NARC H Bootstrap Loader

Loader

Update Action Bias

Action

is

no 9300

9300 FORTACT

I/O

MONARCH

handler

Routine

is

used

loading

BOOTSTRAP QSYLDR or

LOAD UPDATE FORTACT FORTBIAS

ALGOLA

requirement for FORTACTi

as

a test program to test

only.

042009 042010

042011 042014 042015 042017

642024 642025

642026

642035*

642036

2

t

;1 I _1*

I

SCIENTIPIC

DATA

SYSTEMS

IDENTIFICATION:

PURPOSE:

ACTION:

MONARCH

Analyze

The processing

a. b. c.

d.

the

following

Read

the Analyze Convert

tion

appropriate

in

specified

Transfer

function

SDS

PROGRAM

CONTROL

contents

functions

of

MO

NARC H

message

the

syntax

any

parameters

to

memory

control

code

to

in

LIBRARY

DESCRIPTION

ROUTINE

of

MONARCH

are

performed

Control

from

the

of

the

parameter

location(s}.

the

Action

the

control

in

(CONTROL)

messages:

current

control

the

Subroutine

message.

Control

(in

control-message

message.

control

and

messages.

the

message

store

Catalog

order

shown)

to

the

parameter

(processor)

042004

Nos.

642027

internal

values

corresponding

(900 (9300)

to

the

representa-

obtained

to

the

Serie!

CALLING SEQUENCE:

PROGRAMMING

CONVENTIONS:

MEMORY

REQUIREMENTS:

If

errors

are

detected

typed

tempts to

for

a.

b.

Relocatable registers

Approximately

out,

the

read

900

Series

After

To

in memory reported):

with a valid Assignment

loading

BRU

read

BRU

routine.

are

message

the

or

RDMSG

the

RDMSGR

unit,

Table

not

preserved.

24208 or

during

reloading

control

No

this

process,

contai

control

as

channel,

for

ni ng

the

message

or

on

Channel

the

MONARCH

message

would

control

PROGRAMMED OPERATORS

129610

be

the

and

messages

memory

an

error

from

A for

when

case

I/O

subroutine

locations.

the

(QMSG).

appropriate

is

ignored,

typewriter 1 {on

the

9300}.·

system:

MONARCH

after a control-message

error

and

address

used.

message

the

routine

the W buffer

Monitor

in

the

Contents

is

error

Unit

is

at-

still

is

of

3

SUBROUTINES USED:

QMSGRD,

MTYIO,

TYPM

COMMENTS:

IDENTIFICATION:

PURPOSE:

ACTION:

The

MONARCH

and

$CHAR)

$CODES $PARAMS is $CHAR is

Listing Action ARCH

TYPE MESSAGE SUBROUTINES (TYPM, TYPOUT)

To

type

SENSE 1 typewriter 1 or Computers designations output

Characters

location

Computers,

is

the

for

the

Subroutine

Control

(BREAKPOINT 1

set)

or

and

specified

Message

are

referred

the

table

the

table

of

Type

Message

for System

Routine

control

line

on

Channel

are

fixed

in

the

File

are

typed,

by

or

bits 9 through

Analysis

to

of

MONARCH

of

MONARCH

listings.

or

messages

printer

the

1,

A for

in

the

Description

beginning

Index

Tables

by

th is

routine.

BCD

Subroutine

Routines

SENSE 1

and

MONARCH

respectively

9300

Fi

Ie

Description

Table

with

Register

23

for

9300

(TABLES -

symbolic

character

(GSYSP)

reset)

Computers).

the

functions.

parameters.

(TYPM, TYPOUT)

are

or

print

error

(on

the W buffer

Table

(PRTFDT) for

leftmost

(bits

10

through

Computers)

$CODES,

classifications.

included

(BREAKPOINT 1

messages,

The

unit

(TMFDT) for

line

character

23

until:

$PARAMS,

and

the

in

etc.,

for

and

printer

in

the

for

900

Standard

the

MON-

or

on

900

Series

channel

typewri

output.

memory

Series

ter

CALLING

SEQUENCE:

PROGRAMMING

CONVENTIONS:

4

a.

A

period

b.

72

characters

The

message return character printer

BRM

with for

Relocatable not preserved

(SDS

is

TYPM

the

origin

900

Series

use

PROGRAMMED

(SDS

text

code

of

text

upspaced

of

Computers,

subroutine·

but

the

code

have

is

assumed

528) is

is

typed.

one

or

the

message

assembled

contents

338)

is

typed

been

typed

to

be

typed

line

OPERATORS. The

prior

If

the

prior

BRM

text

or

in

bits 9 through

of

the A and B Registers

or

printed.

packed 4 characters

to

typing

message

to

printing

TYPOUT

in

bits

with

MONARCH

printed

the

is

output

the

10

through

23

contents

or

per

text

and

on

the

message.

23

for

9300

Control

of

the

are

modified.

word. A carriage

after

the

last

line

printer,

of

the

Index

Computers.

Routine.

Index

Regi

Register

Does

ster

the

are

MEMORY REQUIREMENTS:

SUBROUTINES USED:

Approximately

MTYIO

60

S

or

48

memory

10

locations.

COMMENTS:

IDENTIFICATION:

PURPOSE:

ACTION:

This

routine control buffer used by

(processors) to

tion

to

STANDARD

To

provide a standard

routines

The

following

1. The

in

itself,

a.

is used

messages

for

900

the

MONARCH

the

consol e

ACTION

(e.g.,

MONARCH

the

symbol

which

Ali

external entries for

the

by

obtained

Seri es

type

actions

Computers,

or

operator.

assemblers

Loader's

table

includes

definitions and, Business

the

MONARCH

from

media

or

Control

print

SUBROUTINE FOR SYSTEM ROUTINES (::;SYSP)

subroutine

and

are

performed

are

for

900

Assignment

error

compilers)

symbol

all

the

following:

Series

Routine

messages

for

Control

other

on

Channe

controlling

in

table

external

MONARCH

Computers

Table

and

the

than

and

from a

order

is

labels

(BAT).

Routine

I A for

MONARCH

to

the

MONARCH

indicated:

"purged"

Unit Assignment

only,

to

typewriter

9300

communicate

loading

so

defined

the

type

out

1 (on

Computers).

Action

that

within

external

Subroutines

other

...__--

of

standard

system

the

Table

or

the

tape.

only

the

definitions

print

W

It

is

informa-

system

entries

Loader

(UAT)

b. c.

d.

e.

2.

Selective

IORELC

routines routine.

subroutines.

bias for

3.

Locating routine in

An

external

An

external

Routine An

external

(QSYLDR).

An

external

(QDUMP).

loading (bits 0 through are

If

the

(QSRCH) is

the

record

definition definition

(QBOOT).

definition

of

to

be

loaded

this

is

the

Bits 9

first

I/O

standard

gop

following

standard

8)

to

case,

through

subroutine

system

coiled

for

the

Processor Error

for

the

entry

for

the

entry

for

the

entry

input/output

are

examined

handle

LDIOSR is

23

routine.

with

the

input/output

of

IORELC

to

be

loaded.

The instructions level 1 MONARCH

point

subroutines.

to

see

called

provide

system

to

Switch

to

the

to

the

to

the

if

any

functions

to

load

the

tape

position

ID

(QPESW).

Monitor

MONARCH

octal

standard

the

load

"search

the record

Bootstrap

dump

The

contents

for

the

indicated

relocation

'

system

for

I/O

!

Loader

routine

of

sub-

system

I/O

sub-

tape

that

5

ACTION:

(cont. )

system routine or to position the

RAD

system file system routine. The address of the search key tion $OMTE in

the

MONARCH control routine.

at

the first word of

is

obtai ned

from

the

that

loca-

CALLING

SEQUENCE:

Loading the standard system routine. Control

4.

MONARCH Loader with IORELC) in

The

Loader

ARCH

the

A Register and Loader

Option

Control Routine.

planned halts and no symbol

BRM

GSYSP or

BRU

flags

GSYSP

the

load

are

obtained

SRLDF

table

relocation

is

initially

listing.

with:

=

I/O

(IORELC)O_S

(IORELC)9_23 = Load

Function Switches.

relocation

bias for first subprogram

routine.

(OMTE)

(SRLDF)

= Address of

assumed

to 1 MONARCH tine

on the system

RAD

directory entry.

= Loader

Option

a-character

occur

in

ID

record which precedes the system rou-

tape,

Flags for MONARCH Loader.

is

transferred to the

bias (bits 9 through 23 of

Option

from

Flags in the B Register.

location

SRLDF

in

set to specify loading with no

of

the system

program ID. This same

characters

9 through

16

or in words one and two of its

the

MON-

ID

is

of the level

PROGRAMMING

CONVENTIONS:

MEMORY REQUIREMENTS:

SUBROUTINES USED:

6

Relocatable subroutine. No PROGRAMMED registers

Approximately

are

preserved. Assembled with MONARCH Control Routine.

50S or 40

memory locations.

10

LDIOSR SRLDSY QSRCH TYPM QSYLDR

(MONARCH Loader)

OPERATORS

are

used and

no

GLOSSARY

OF

ABBREVIATIONS

AND

SYMBOLS

(MONARCH

CONTROL

ROUTINE)

(a)

a~(b)

(a)~

QMSG MTYIO CADDR

LM

RM

LN

(b)

LA

LL LU

LS

IG

Contents Store Store UAT Address Character

Message Message

Universal

Character

contents contents

entry

Left

del delimiter

Left

delimiter

Left

Leading

imiter

of

a

for

of

typewriter

address

left

delimiter

right

left

plus

or

is

to

of

b in

location

of b indirectly

control

de of of of delimiter

minus

be

messages

I/O

of

I i

miter

character

numeric

symbolic

literal

word

sign

ignored

subroutine

control

word

a

in a

message

character

IL RL RU

WDTYP

ONR DNR

SYM

LIT

TY

MT

PR

PP

CR

CP

I

II

ega

I c

harac

Right

delimiter

Universal

Cell Word Word Word Wor,d Typewriter Magneti c Tape Photoreader

Paper

Card

which

type type type type

tape

reader punch

right

contains code code code code

pu

rer

for

literal

delimiter

for for

decimal for symbol for

nch

word

type

code,

octa I number

number

literal'

current

word

LP

Line

Printer

7

Al~

____________

MONARCH

~~

Does

QMSG

tubtoutlM

Inltlallz

Is

......

Type

«*'tal"

1,

........

'"-

a carriage return

I, and

QMSG - unit

s

U

I

•

CONTROL

SlDMSG

_IW

...... , chan-

.w~?

No

c

.....

1 0,

MTYlO

typewriter

I?

ROUTINE

Type the control

......

S

U

•

R

I.

1st

Is

S

u

a

R

Is

1st

"*tage

OMT£

PttMMAX -.....

ORGPRM

-add,...

PRMMIN-

IORAWD-l/O

mlnllllUm

-

arl,ln

IPf-orl,ln

G.t

1

Input area

char.

In

.......

from

Obtain

word

01

Is

,.t

........

WOtd

a legal function

of

ht

1 IlIUm nuntbef

number

of

tabl.

of

MONARCH

subr

...

GETCHR

character

record an

from

LM ( •.

IMIICIge

,.,

·A'?11-

.......

V.

typewriter

~

and

claulfy

current

worda.~I?

word

of

of paraMeten

of

para .... ter

Iectlons and load reloc:atlon bias

I?

No

Mkt

fWMIIICIIe

cod.

mnemonic?

V

..

of func:tlon

para

....

cod.

t."

_Iu.

·'roc...,·IUbr.

entry

outlin.

--.t

II

IMIIIIQe

from

typewriter

11

~~::::::::;r~V~.~-----'

MSGRST

.........

QMSG-

-----

unit

1,

channel

...

S IADFNC

U

•

Type

R

error

meuage

0,

MMO

8

5

U

•

It

MONARCH

No

CONTROL ROUTINE (cont.)

NOTE

_____

I

Exit 10

-Proc:_-

Subtautlne

(IRU*IPF)

x-type coM for

Cunw'lt

word

(PIMOIG)-Wlh".af

•

I.,.~ecl.lon·

panIIM"

.

,COMpUter?

9OOS.

.....

9300

F_

a.oc

h_NCtlon

channel

.....

for

24-Wt

.......

EC»tVEOO

unit and

9

MONARCH

C1~----------~"

CONTROL ROUTINE (cont.)

5

U

Get

cunwnt

•

I

x • left

dell",lt.,

forC

IC

• character

~

IWCt

ct..

........

cla.lflcatlon

cla.mcation

SGETWRD

(C)

fl'Ofll

code

for C

s

U

I I

s

U

I R

Get Internal

01

,.,....,

QQIIM

Convert

ftUIIIber

to binary

chan.

s

U

•

I

5

U

•

R

G.t

Internal cha-

of

number

DEQIN

Convert

binary

number

S

U

•

I

S

U

I

R

to

Get

of

GETINT

internal

word

Pack

word

~

chars. of

chan

S

GETINT

U

•

I

R

5

U

I I

Get internal

chars. of

word

!ill

Pack

chars. of

word

10

MONARCH

Dl~------------"

CONTROL ROUTINE {cont.}

s

u

•

R

X

Get next

~

.1"

....

code

1

character

for

C

~

char.

(C) from current

cl_lflc:atlon

IG

=

Dl

~

IL

~=

A3

Fill

u"UMd

tiON I" wold

IfMIC*

char.

ar.

posi-

with

11

MONARCH

CONTROL ROUTINE (cont.)

Extract wold

hom

Extract rlght;Ultlf1ed In A Register

(CADDR)

add,...

INII.

(CADOI)+ 1

& char. poIltlon

char.

GETCHR

(C)

&leaw

NOTE

I

Del

...

current

.......

Convert

from

1-

to binary,

Integer

Convert

fl"Ol'll

number to binary,

1-

DECIIN

to 8-dIQIt decimal

.Ingl.

precl.ion

OCTiIN

to

l-dlglt

I.

pNClllon

octal

ling

Obtain chan.

1

char./WOId)

word

In

~ry

ACCUM2)

fl"Ol'll

&.tore

.torage

WOld

thet114

rACK

area (Itored

char./

(ACCUM

T~.rror

"ILLEGAL MESSAGE, IGNOIED."

"

IADMSG

........

:

CONTROL

MESSAGE

we

error

"CONTROL

EllOl,

UNDEFINED

SYWOUC

IAD"M

".......:

MESSAGE

rARAMETER.

T",.

error

.........

"CONTlOL

Elloa,

MESSAGE

INSUFFICIENT

rAAAMETElS.

Twe·

"CONTROL ERROR."

NSFPRM

:

"

rror

.......

MESSAGE

8ADfNC

:

12

MONARCH CONTROL ROUTINE (cant.)

Bootstrap for paper tape or

magnetic

Set up

t10n

tape?

Abeolut.

relocataba.?

EOM

tabl.

for paper tape

or

-.olute

at

fli.

delcrfp-

Sav.

I,

UEAICPOINT

S

U

•

It

Store

"....

o.crlptlon

IIWIICIr.

1 (9300

Type

1 carriage return

origin

Tabl.

S

U

I

R

TVPM

origin

SENSE

no

in

FII.

(TMFOT+1)

~

Puncho~raF

to paper tape

TVPOUT

1)_? }-___________

.-clfled

~

Count number

".....

up to period

Store

word

fli.

delc:rlptlon

(PRTFOT)

of

wOtda

count

In

tabl.

In

s

U

I R

Typetextol

S

U

•

Type

It

1 carriage return

..........

MTYIO

S

U

I R

13

SCIENTIFIC

DATA

SYSTEMS

SDS

PROGRAM

LIBRARY

I DEN

TIFICATION:

PURPOSE:

PROGRAM

MONARCH

$PARAMS, $CHAR)

To

provide

Rout i nee

a.

Table

Each for Subroutine)

mum

message, values

For tine parameters

in

the

of

entry

the

number

are

control

from

this

table.

MESSAGE

following

MONARCH

in

control

for

of

(4)

to

message

the

designati

DESCRIPTION

ANALYSIS

this

table

message,

that

parameters

the

address

be

stored,

system

tables

control

functions

tape,

ng

for

Control

input/output

message

contains

(2)

the

message,

wh

ich

of

the

if

applicable.

the

TABLES

use

by

(1)

address

can

memory

which

initial

Catalog

(TABLES

the

MONARCH

function

the

function

of

the

(3)

the

be

supp

area

require

load

relocation

functions

Nos.

- $CODES,'!

codes

code

processor minimum lied

in

the

in

which

loading

are

a system

a Iso

042005 642019

Control

($CODES).

mnemonic

and

parameter

bias

contai

(900 (9300)

(Action

maxi-

control

rou-

and

ned

Series)

ACTION:

b.

Table containsa that

c.

Character corresponds The spect character one

1.

2.

None.

of

symbolic

1-t04-character

symbo I.

classification

position

to

the

code

word

conta

A

left

code

determines

curs

as

cupies

An

"internal"

code

determines

curs

to

sage

word.

parameters

to

one

of

the

origin

for

in i ng:

delimiter

the

leftmost

bit

positions

the

right

Occupies

($PARAMS).

symbol

table

of

the

64

possible

tabie

of

that

classification

entry

the

table,

character.

classification

the

role

character

12

through

the

role

of

the

leftmost

bit

and a 24-bit

($CHAR).

internal

for a given

is

determined

Each

code

that

the

character

in a

17.

code

for

that

the

character

positions

Each

character,

table

for

the

control

the

18

through

entry binary

entry

character

by

entry

character.

message

character.

in a

the

plays

control

23.

inthe

in

internal

consists

value

this

codes.

with

when

word.

when

table

re-

This

it

This

it

mes-

for

of

oc-

Oc-

oc-

i4

CALLING

SEQUENCE:

PROGRAMMING

CONVENTIONS:

MEMORY

REQUIREMENTS:

SUBROUTINES USED:

Not

applicable.

Re

locatabl e subrouti ne

GRAMMED

Variable, accordi

OPERATORS

ng

to

tries. The current size

None.

wi

th

no transfer address

are

used.

number

is

of

function code and symbol ic parameter

approximately 7358 or 47710 locations.

in

End

Record. No PRO-

en-

15

MONARCH OPERATING

MONARCH

MESSAGE

SYSTEM

ANALYSIS

TABLES

. FUNCTION CODE

The

table

0

P(l)

2

is

composed of entries of the following

1

st

4 characters of Function Code Mnemonic

1 Char

0

2nd 4 characters of Function Code Mnemonic

1 Char

0

S

SI

Xl

(1)

(1

) (1) (1)

0

2

TABLE

1 Char

(6) (6)

1 Char

(6) (6)

I

P(7)

BO

LO

BI

X3

SO

X2

3

(1)

4

( 1 )

5

(1) (1)

6 7

(1)

8

9

form:

I

Relocation

1 Char

Bias

(6)

1 Char

(6)

P(6)

for

1st

(IOLERC)

( 15)

I/O

Subr

(if

1 Char

(6)

1 Char

(6)

any)

23

2

23

3

23

Max no. of

3

4

Parameters

6

0

I I

Not Used

o 0 0 0 0 0

o

P(i) for i=1(1)7 refers to reference'parameter P(i) of the MONARCH Tables Routine.

P(7) and the

calling

sage

subroutines will be loaded

entry, as indicated. A 1 require

*i.

e.,

address of Action Subroutine for this control message.

UAT

unit and channel designation and (optionally) a parameter

the processor function,

that

MONARCH provide a standard

Min no. of

Params.

(3)

56

000

automatically

in

a given bit position indicates a potential

89

8 9

collectively

by MONARCH. Each bit of P(7) corresponds to a

I/O

Origin

Entry Point,

determine which, if any, of the standard

subroutine.

P(3)

of Parameter Table

15

P(2)

First Processor F unc tion

( 15)

META-SYMBOL Procedure

I/O

function which

* (IPF)

in

the control mes-

"FCII

in

4

23

5

23

the

I/O

UAT

may

16

t

;1

I

-\*;

SCIENTIFIC

DATA

.sYSTEMS

SDS

PROGRAM

LIBRARY

IDE

NTIFICA

PURPOSE:

ACTION:

TIO

N:

PROGRAM

MONARCH

To

obtain a record

netic

tape,

MO

NARCH

If

the

record characters record the

cated

a.

b.

length

control

in

the

If

the rectly whose

If

the

40-word subroutine binary from

Hollerith

and

the

control magnetic characters

CONTROL

paper

Unit

are

message

medium

into program

medium

mode.

tape

Assignment

length

stored

is less

MONARCH

the

input

whose

first

72

message

tape

(40

DESCRIPTION

Catalog

MESSAGE INPUT SUBROUTINE

from

the

or

exceeds

in

the

than

73

input

area.

Control

is

paper

control

ID

is

MTYIO.

is

cards

area

(CW)

program

The

binary

code

(12-bit

characters

input

record

\vords).

control

typewriter).

Table

72

control

characters,

tape message

or

magnetic

length

message

The

medium

entry

for

control

characters

message

The

Routine.

or

typewriter,

area

in

QMSGRD.

ID is CARD. The

card

image

code)

of

this

area

(MSG).

that

(18

the

control

by

tape,

thus

to

SDS

converted

can

be

input

executing

Nos.

input

medium

is

specified

messages

words),

entire

message

the

Cards

record

obtained

internal

Note

accommodated

area

record

are

record

that

only

($MSG).

input

the

read

is

code

are

the

042006 642020

(QMSGRD)

(cards,

the

(900 (9300)

mag-

by

(QMSG).

fi rst

If

is

stored

area

is

read

di-

subroutine

is

read

into

using

the

read

in

the

converted

(6-bit

moved

maximum

is

code) to

160

Serie

the

72

the

in

lo-

a

CALLING

SEQUENCE: PROGRAMMING

CONVENTIONS:

MEMORY REQUIREMENTS:

SUBROUTINES USED:

BRM

Relocatable

sters

munication

Assignment

Approximately

MTYIO,

QMSGRD

are

preserved.

with

Table.

CARD,

subroutine

No

input/output

3108 or

MAGTP,

200

with

no

transfer

PROGRAMMED OPERATORS

subroutines

locations.

10 HOLBCD

address

is

via

in

the

End

Record.

are

used.

MONARCH

No

Unit

regi-

Com-

17

MONARCH CONTROL

Is

control

MESSAGE

SQMSGIO

.......

'-1"",

INPUT

cards?

SUBROUTINE

LEGEND

".

,.

paper

TV

'"'

typewriter

CO

:II

cards

MT

:: magnetic tape

I

tope

Vea

Reset

unit

and c

.......

COFDT

(fil.

5

U

B

R

5

U

Convert Hallerlth

B

to 505 int

R

Mo..,. canverted record to control

.......

Input area (MSG)

x =

".....medl"",

tabl.)

~

,....

~

...

1 c

from carch

coded

'

cod.

....

In

record

QMSG

s

u

•

Convert

I"...

~

lead 1 record typewrite"

HaIl.,lth

to

teO

from

paper tape,

or

magnetic tape

coded card

by

tabl. look-up

s

U

B

R

Read 1 record from

tape

or

typewriter

M!1!Q

paper

18

s

u

•

R

Read 1 card In bi

CARD

MAGTP

s

..

,y

mod

•

u

•

R

lead

1 record

in

binary

mod.

I

;1

•

-II;

SCIENTIFIC

DATA

SYSTEMS

IDENTIFICATION:

PURPOSE:

ACTION:

MONARCH

To

load

selected,

in

order routine. control

to

satisfy

There

of

LDIOSR.

PRINT MTAPE CDRP

PTYIO

LDIOSR ining

U,l."\I·H·""

YYIIV

switch

Table

Unit one I/O pears

will

the

I/O

T

/(')

..

"'

..

, _

"",'-'.V",.II,,,,

which

entry

Assignment

of

the

four

subroutine

in

more

corresponding

code

in

the

RAD

File

Management

SOS

I/O

Card

determine

111...

is IIsetll, LDIOSR

which

Unit

PROGRAM

LIBRARY

DESCRIPTION

SUBROUTINE LOADER (LDIOSR)

standard,

the

I/O

are

four

They

Line

Printer

Magnetic

Read/Punch

Paper T ape/T

function

....... " .. : ...

""

..

''''~'''"''''"''''"'''

corresponds

Table

I/O

subroutines

to

be

loaded.

than

one

I/O

subroutine

Assignment

I/O

subroutine

standard

are:

Output

Tape

ypewri

which,

switches

"",..11:

..

""

.......

entry

of

is a

the

Table

Routine

subroutines

requirements

I/O

subroutines

Subroutine

I/O

Subroutine

ter

I/O

if

any,

corresponding

""

......

.,.

,..

..

""

u.~

will

examine

to

that

switch.

code

for

can

communicate,

Note

that

IIselected

will

be

loaded

entry

(QFMR) is

Subrouti

of

these

.......

1...

.......

.v

'-'~

an

even

li

Unit

is a

inserted

Catalog

from

the

MONARCH

of a MONARCH

which

ne

routines

to

MONARCH

,..

.. ~ ..

~~,...,J

"U"""~U.

the

MONARCH

If

the

unit

input/output

then

though

the

Assignment

only

once.

RAD

code,

at

that

Nos.

can

be

to

load

system

1=,..

..

"'

.....

I

,..1....

VI

C\,AI."II

Unit

address

device

LDIOSR

same Table

If

the

address

UAT

042007

642021

system

loaded

by

first

routine

,

/r"\ ~ ......

J./ _

Assignment

code

with

causes

unit

code

entries,

unit

address

of

entry.

(900 (9300)

tape

under

exam-

,..,,:"'

IUIII."IIVIl

in

which

that

ap-

the

Serie

....

that

CALLING SEQUENCE:

BRM with:

(IORELC)0_8 =

(IORELC)9_23 =

and

any

which

'PROGRAMMING

CO NVE

NTIONS:

Relocatable registers

l~v1Etv10RY

REQUIREM ENTS:

Approximately

SUBROUTINES USED:

SRLDSY

LDIOSR

Unit

are

set.

subroutine.

are

I/O

initial

.Assignment

preserved.

2608

or

function

load

Table

No

Assembled

178

10

switches

relocation

entries

bias

selected

PROGRAMMED OPERATORS

with

several

memory

locations.

(for first by

the

I/O

Action

I/O

subroutine)

function

are

used

Subroutines.

switches

and

no

19

MONARCH

I/O

SUBROUTINE LOADER

22

LEGEND

UAT

• Unit

UAC

= Unit

I

....

ignment Table

~

UAC

.. code for mag.

Code

No

Al~------------~

tape?

initialize tract

load

Extnlct UAT I/O

Prl

Store current printer

Store current load relocation bl

mag. tape subroutine origin

eulnutlne

1/0

function swltchea & Initial

relocation

entry

function

nter

unit

add,..

c~tng

1,10

eut:nutlne

1_

tubroutl".

bioi',..

code

No

relocation bl

art,in

No

para

loaded

........ , ..

IOlElC

(UAC)

to current

-

from

~t?

__

InMrt

printer

Into

UAT

current

I/O

....... orI,1n

I".

Into

current

......

tl".

.....

..........

function

origin

entry correepondlng

function

t:J

\JAT

entry corretpOndlng

I/O

to

-

UAC

.. code for card

Insert

origin of

routine Into

to current

Set

I/O

function swItch

Set

UAT

corretponcftng to neIlt

laIt

RAD

UAT

entry carresponcflng

I/O

function

functIon pointer to next

add,..

poInter to

1,10

functIon .wItch exGIRlned?

read/punch?

file IRallap

UAT

I/O

functIon

...

I/O

entry

nMrt

origin

01

card

I/O

to

IUbrou-

UAT

current

lne Into

UAT

current

nMrt

Iter try

/0

Na

Store current load relocation blaa _ origIn'

01

paper-tape/t)'pewrlter

nt

IUblOUtlne

I/O

entry correlpOftdlng

I/O

origin

01

I/O

subroutine Into

carr-.ondlnsl

function

paper-tape/type-

20

MONARCH

I/O

SUBROUTINE

LOADER

{cont.}

LEGEND

IORELC • addr

X •

•••

I

Index

Regllter

..

bias used

R

.. I ....

of

load

by

r.loc:ation

SRLDSY

(X)--Optlon

(JOIELC)--

(ar-acWre.

S

U

•

R

Set c:urrent load reloc:ation bias lum

(IORELC) & length

IUlt

FIaga,

MONARCH

c:urrent load reloc:atlon bien

01

1-"

khar.

Searc:h

VO

MIbroutln.

1-"

SRLDSY

for

& load tpec:lfled

of

eulMautine to be

MONARCH

I/O

Lo.Ier

10 fer

subroutine

I/O

of

21

!

;1

•

-\*;

SCIENTIFIC

DATA

SYSTEMS

SOS

PROGRAM

LIBRARY

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING

SEQUENCE:

PROGRAMMING

CONVENTIONS:

PROGRAM

CARD

To 900 Series Computers, or on unit and channel assignments Table entry for control messages (QMSG).

One

BRM PZE

Where a Card Read Subroutine,

log

See

READ

obtain

SO-column card

No.

description

SUBROUTINE

a binary card image

*QMSG a

is

the address

633001).

of

SDS

DESCRIPTION

(CARD)

from

a card reader (on

the

specified channel

are

taken

is

read

from

the card reader specified in binary mode.

of

the

File Description Table (see description

CDR,

Card Read Subroutine.

900 Seri

es

from

Cata

042031 (900 Series)

Catalog

on

the MONARCH Unit Assignment

log No. 030004 or 9300

Nos. 642030 (9300)

the

specified buffer for

9300 Computers). The

of

SDS

Cata-

MEMORY REQUIREMENTS:

SUBROUTINES USED:

COMMENTS:

Approximately

None.

This

is

the standard changed contexts within

from

270S or

SDS

CDR

to

CARD

MONARCH.

lS4

locations.

10

Card Read Subroutine with the entry point label

to

prevent

conflict

with the use of

CDR

in other

22

t

;1 • -I'

I

SCIENTIFIC

DATA

SYSTEMS

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING

SEQUENCES:

SDS

PROGRAM

PAPER-TAPE/TYPEWRITER

To

obtain and buffer unit

Unit

a.

b.

a.

control

to

type

control

for 900

and

channel

Assignment

Input. specified

Output. fied

Input.

by

One

the

message

messages

Series

by

One

BRM PZE a

Computers,

assignments

Table

record the

File

record

File

Description

*QMSG

entry

LIBRARY

DESCRIPTION

INPUT/OUTPUT

records

is

read

Description

is

and

or

for

control

fromthe

typed

from a

error

on

input

on

Table.

paper-tape messages Channel are

messages

unit

Table. typewriter

Catalog

SUBROUTINE (MTYIO)

in

typewriter

A for 9300

obtained

assigned

from

(QMSG).

1 from

reader

the

into

the

Nos.

or a typewriter

1 (on

Computers).

MONARCH

the

record

042032 {900 Seri4 642031 (9300)

the

W

The

area

speci-

PROGRAMMING

CONVENTIONS:

MEMORY REQUIREMENTS:

SUBROUTINES USED:

COMMENTS:

Output.

b.

Where cription

log

See

Approximately

None.

This is point

of

a is

of

No.

020019,

description

the

standard

label

PTYIO in

the SDS

changed

BRM

OP

address

Paper

of

530

other

MTYIO

a

of

the

Tape/fypewriter

or

9300

Catalog

SDS

Paper

or

344

8

SDS

from PTYIO to

contexts

10

Paper

within

Fi

Ie

Description

Subroutine,

No.

622001).

Tape/Typewriter

locations.

Tape/Typewriter

MTYIO

MONARCH.

Table

Subrouti nee

Subroutine

to

prevent

and

OP

= 040

PTYIO, 900

with

conflict

8

Series

the

with

(see

Cata-

entry

the

des-

use

23

!

;1 • -1*

,

SCIENTIFIC

DATA

SYSTEMS

SOS

PROGRAM

LIBRARY

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING

SEQUENCES:

MAGNETIC

To

perform ARCH channel Table

a.

b.

c. d.

a.

Control

assignments

entry

Input. parity

Output. the

parity

Rewind. The

Space.

netic

Input:

tape

PROGRAM

TAPE

magnetic

for

One

mode

INPUT/OUTPUT

tape

Routine

are

control

record

specified

One

record

mode

The

BRM PZE

specified

unit.

DESCRIPTION

SUBROUTINE (MAGTP)

input

and

output

and

Action

obtained

messages

is

read by

is

written

magnetic

number

*QMSG a

Subroutines

from

or

from

the

File

by

the

of

e. message

from

the

on

File

records

g.,

functions

(message

either

Description

the

tape

the

File

specified

Description

unit

is

to

obtain a control

record.

Catalog

MONARCH

Description

magnetic

Table.

is

given a rewind

skipped

Nos.

requested

processor).

magnetic

Table.

on

the

042033 642032

by

Unit

Table.

tape

specified

(900

(9300)

the

MON-

Unit

and

Assignment

unit

in

the

unit

in

command.

mag-

Series)

PROGRAMMING

CONVENTIONS:

MEMORY REQUIREMENTS:

SUBROUTINES USED:

Output:

b.

Rewind:

c.

d.

Space:

Where

records SDS

No.

See

Approximately

None.

a is

the

to

be Magnetic 040004

description

or

BRM

OP

BRM EOM

LDA BRM OP

address

skipped,

Tape

Input/Output

9300

of

SDS

1000S

MAGTP a

N MAGTP a

of

and

Series

Magnetic

or

512

the

File

N<O

Catalog

10

e.

g.,

Subroutine. e.

g.,

Subrouti e.g.,

Subrouti

Description

specifies

Subroutine,

No.

Tape

Input/Output

locations.

see

LABEL

(OP = 040

see

REWIN D

nee

see

SKIPREC

(OP = 030

ne.

Table,

backspace.

MT

640001.)

Action

N is

(See

APE,

900

Subroutine.

)

S

)

S

the

number

description

Series

of

Catalog

COMMENTS:

This is entry

the

use

the

point

of

standard

label

changed

MTAPE in

SDS

other

Magnetic

Tape

from MTAPE to

contexts

within

Input/Output

MAGTP

to

MONARCH.

Subroutine

prevent

with

conflict

the

with

25

I

;1

•

-II;

SCIENTIFIC

DATA

SYSTEMS

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING

SEQUENCE:

PROGRAMMING

CONVENTIONS:

SDS

LINE

To fer

One

BRM

where a Line Printer Subroutine, Catalog

PRINTER

print control messages and error messages on line printer 1

for

900 Series Computers, or on Channel A for 9300 Computers).

record

HLT

See description

is

MPRNT

a

is

the address of the File Description Table (see description

No. 662002).

PROGRAM

SUBROUTINE

printed

of

SDS

DESCRIPTION

from

the record area specified

PRINT,

Line Printer Subroutine.

LIBRARY

Catalog

(MPRNT)

by

900 Series Catalog No. 060005, or 9300

042034 (900 Series)

Nos. 642033 (9300)

(on

the W

File Description Table.

of

buf-

SDS

MEMORY REQUIREMENTS:

SUBROUTINES USED:

COMMENTS:

Approximately 3208 or 208

None.

This

is

the standard

changed

other contexts within MONARCH.

from

PRINT

SDS

to

MPRNT

locations.

10

Line Printer Subroutine with the entry point label

to prevent conflict with

the

use of

PRINT

in

26

I

;1

I

-II;

SCIENTIFIC

DATA

SYSTEMS

SOS

PROGRAM

LIBRARY

PROGRAM

IDENTIFICATION: MONARCH CONTROL

PURPOSE:

ACTION: Control

This

program serves as an extension of the MONARCH Control Routine (900 Series Catalog No. 042004, or 9300 Catalog No. 642027) and includes a number of required system action routines.

is

transferred to the action routine corresponding to the function code

in

specified

a.

Processor b. Processor c.

Magnetic tape functions.

1.

2.

3.

4.

5.

6.

7.

the control message.

for

META-SYMBOL systems

for

SYMBOL

Backfile Skipfile Back Skip record Rewi Write Label

($BKFILE)

($SKFILE)

record

nd

end-of-file ($LABEL)

($BKREC)

($SKREC)

($REWI N D)

DESCRIPTION

C

SUPPLEMENTARY

LDI2

systems

($WEOF) pear as part

($SYMBAR)

ACTION ROUTINES

contains the following action routines:

($META)

For routines 9300 MONARCH tine Loader

LDIOSR.

tIN

a a

og 0 s.

900 Computers only; these

are

assembled

(LDIOSR), and

of

042030 (900 Seril

642034 (930Q)

(LDI2)

wi

th

the

I/O

Subrou-

ap-

the listings for

10.

CALLING

SEQUENCE:

PROGRAMMING

CONVENTIONS:

Not

Relocatable and

MEMORY REQUIREMENTS:

Approximately

Posi

tion

($

8.

Punch

9. bootstrap loader ($LDI2X)

Write bootstrap loader

applicable.

POSN)

relocatable

no

PROGRAMMED

16308 or

paper

magnetic tape

($BTLDX)

920j 0

tape

locations:

OPERATORS

are used.

27

tF

SUBROUTINES USED:

COMMENTS:

GSYSP, MAGTP,

RDMSG,

TYPOUT,

RDMSGR,

TYPM,

MTYIO,

MSGRST,

QSRCH.

For

900 Series Computers only, the program sets MSFNC and MSFNCl for

communication with the

META-SYMBOL control program. MSFNC

(loca-

tion 02738) contains bit settings corresponding to symbolic parameters

fied

on

the

METASYM

requirements, and

PROC

name.

control card, which specifies the user's input/output

MSFNCl (location 02748) contains a

4-character

speci-

(BCD)

28

MONARCH CONTROL

SUPPLEMENTARY

ACTION

ROUTINES

Initialize to

nat

patallleter

tty

CI.,Aand

Setpa

......

Index-

0

I.

29

MONARCH CONTROL

SUPPLEMENTARY

ACTION

ROUTINES

(cont.)

Inltlallz.

IMelltClnlc

Merge

SI,

and/or

LO

and

....

10,

LO,

tabl. R ..

Xl,

and

bits ta

at

Ia.ELC

and

10

0367

......

Set

10

....

Set

LO

flag

--

....

-t

Set IftMIMnlc

tabl.

Rag

30

MONARCH

CONTROL

SUPPLEMENTARY

ACTION

ROUTINES

Type

"SEARCH

'SYMlOl' OI'M)(XX'

FAILED~

(cont.)

FOR

31

MONARCH CONTROL

Proc_

label

r.quest

SUPPLEMENTARY

ACTION

ROUTINES

had

MId

control

from

typewrIter.

{cont.}

.....age

No

s

Type

U

CONOmON,

B

Ott

R

MSG

~

-ABNORMAL

OF,

'LABEL'

ItEFUSEO-

MT,

32

Read next for current

control Input ....c:tlu",

controilMllCll.

aalgned

MONARCH CONTROL

S

U

1

Set

nI.delcrlptlon

tabl.

a

SUPPLEMENTARY

ACTION

ROUTINES

{cont.}

S

U

1

(IA21\""

a on 10/11

1\

""1\ label

Yes

l

)

U

I

Read

R

a D entry

Store QFW

QCWao

2'

QCW

X

at

X2

QFW

acy

NEXTWD -LASTWD

QCW

D

-

NEXTWD

......

_____

... U

s

I

R

Type

IDUPLICATE

LASEL

I

Set EOM description from

S

U

Writ.

I

absolut.

R

specified

at

fil.

tabl.

parCIIMter

MAGTP

r.locatabl./

bootstrap on

magn.tlc

(L)

tape

Set EOM

from

at

(L)

Mr:l1Q

relocatabl.

tape

delc:rlptlon

S

U

Punch

1

bootstrap on specified

It

paper

fil.

tabl.

33

MONARCH CONTROL

SUPPLEME

NTARY

ACTION

ROUTINES

(cont.)

s

u

,

R

Set

af....,..

s

u

,

R

s

~

R

~

"Itlon 0 at

QCW,o

....

~

Writ. requested

1"llnO

~

Write 'SYSENO' at

NEXTWO

s

....

QCWoat

QFWXl and QCW

LASTWO

01

odctr-.

label

and cl

..

0

X1

s

u

•

R

Fetch

text at

~

10

and store

TID

s

~

R FOIl LAIEL'

Type

~

'ILLEGAL

LEVEL

5

U

,

R

!Y!!!!

Type

'ILLEGAL

LOGICAL

FOR

OF

FILE

lABEL'

34

MONARCH

CONTROL

SUPPLEMENTARY

ACTION

ROUTINES

(cont.)

WrIte ipeClal

(171JOOOOa)

paper tape punch (used

by

FORTRAN

program

fa

No

EOf

on

complied

output on paper

•

No

mark

spec

I fled

Set logical

fll.

u

, Rewind

l

fli

delCrlptlon

the

........

tabl.

logical

at

fII.

35

MONARCH CONTROL

SUPPLEME~I.bRY

ACTION

ROUTINES

{cont.}

Convert EOM

to

UA

T

fOl'lNlt

_m

""'--------'

...... - ......... ,

S

U

Type

SEARCH,

R

MSG

Save

II indicator

QSYSTP

TYPM

'UNSUCassFU

'POSmON'

NOT

COMPlE

,

and

Mt

at

QSYSTP

36

MONARCH

CONTROL

SUPPLEMENTARY

ACTION

ROUTINES

(cont.)

ltepIoceUATentry'.

neI

bits with

••

and

.....

Indlcator ......

of

QOISK

~

No

-~:.f

""""--------..:..---'

Save

QSYSTP

..

t newly

vatue

formed

at

QSVSTP

and

v.. Merge address

l-.:..::.-

___

...

with

UAT

and

channel

of

QTAP£

entry'. unit

37

MONARCH CONTROL

-

Space"""

~orto

EOF

..

SUPPLEMENTARY

of

rk

ACTION

ROUTINES

s

u

•

R

(cont.)

eztrunberof

~or

To

EOf

mart,

38

no

t

*1 I -1*

I

SCIENTIPIC

DATA

SYSTEMS

IDENTIFICA

PURPOSE:

ACTION:

TION:

SDS

TRANSFER

a.

To the itor inadvertently tions,

ARCH

b.

To of

When this Record

TFMONRCH. TFMONRCH, point subroutine Record

the

routine

of

with a transfer

PROGRAM

TO

provide

last

memory

subroutines,

or Monitor

provide a transfer the

MONARCH

is

TF

MO

the

MONARCH

in

the

DESCRIPTION

MONARCH

an

external

location

and

deleted

changes

the

NRCH

of

complex.

Loader

last

to

MONARCH

address.

LIBRARY

such

any

instruction

Control

be

causes

Control

CONTROL

label

definition

used

by

that

or

rendered

of

the

Routine.

loads

loaded

the

loader

in

turn,

Routine

Monitor

Catalog

(TFMONRCH)

the

complex

the

external

inaccurate

subroutines

to

the

in

itia I entry

the

MONARCH

and

the

transfer

to

transfer

transfers

($RDMSG).

complex

Nos.

($QENDMN)

of

MONARCH

definition

by

insertions,

comprising

point

Monitor address control

control

that

to

This is

can

042008

642023

of

one

will

the

($RDMSG)

complex,

in

the

to

the

entry the

have

an

(900 (9300)

plus

Mon-

not

dele-

MON-

End·

only

End

be

Seri

e~

CALLING SEQUENCE:

PROGRAMMING CONVENTIONS:

MEMORY REQUIREMENTS:

SUBROUTINES USED:

COMMENTS:

Normal

address

Relocatable GRAMMED OPERATORS

Two (2)

None.

This tape ID is

sition,

MONARCH

is

encountered.

subroutine.

memory

subroutine

which

"MONITOR".

in

is in

the

scope

Loader

locations.

must

be

the

scope

It

of

action

End

used

(physically)

of

the

is

the

that

level 1 MONARCH

when

Record

and

no

level 1 MONARCH

only

"MONITOR"

an

has

transfer

registers

the

last

End Record

address.

are

used.

subroutine

ID Record

subroutine

ID

Record,

with a transfer

No

PRO-

on

the

system

whose

is

po-

fixed.

39

*

II

•

-1*

,

SCIENTIPIC

DATA

SYSTEMS

SDS

PROGRAM

LIBRARY

Page

IDENTIFICATION:

CONFIGURATION:

PROGRAMMED

OPERATORS:

STORAGE:

TIMING:

USE:

1

of

900

Series

Any SDS

8K

or magnetic 9367 consol e

None

Requires

N/A

SYSGEN message. beginning

PROGRAM

RAD

MONARCH

900

Series

more

core

tape

unit

RAD

typewri

767

locations,

is a

MONARCH SYSGE N uses with

LDIOSR, in a

DESCRIPTION

GENERATOR

computer

memory

on W

ter

or

including

with:

buffer

line

pri

system

resident

manner

nter

constants

routine, I/O

hand

similar

Catalog

(SYSGEN)

and a 256-word

and

is

called

I ers

and

overlays

to

the

UPDATE

No.

by a

input

MO

buffer

6SYSGEN

NARCH,

routine.

The

generation

1.

The

Tape

an

UPDATE

ated

RAD

2.

The

resultant

that

copies

The SYSGE N

MONARCH

MS51GN 6SYSGEN

This

sequence

on

channel

with

sector

ARCH

sector n downward.

and

of a RAD

MONARCH

operation

MONARCH

the

operati

tape,

5 =

n

of

messages

A,

and

O.

n is

its

files.

NST

RAD

on is

and

MTO,

being

the

A

MONARCH

system is

(unnecessary

system).

(New

issuing

System Tape) is

MONARCH

accompl

the

Xl

results

written

number

"directory"

of

system is

converted

system

ished

following

= DFuc,

in

the

on

RAD

sectors

of

level 1 (61)

when

onto

by first

control

50

system

unit

accomplished

to a RAD

beginning

input

to a SYSGEN

the

RAD.

bootstrapping

messages:

= X

being

"u"

to

read

on

channel

be

allocated

files

in

two

MONARCH from a

the

from

tape -situ-

operation

RAD

magnetic

"C",

to

RAD

is

maintained

steps:

system by

tape

beginning

MON-

from

0

USE: (cont

.)

The

original

Example:

level

records

are

output

on

SO

(LP or

TV)

METHOD:

.6ASSIGN .6SYSGEN

The X2

Levell

and

identifiers

level 2 records

When

are

SYSGEN

The that

Tape

SYSGEN

the

closed,

design

no

editing

is

copied

end

uses

consists

SYSGE N 1: a

Xl

of

the

and

S =

MTO,

4095.

fi

I es

are

discarded

are

abbreviated

the

Old

OST

is

resident

operation capability

onto

the

of

two RAD

Xl

then

begun

System Tape (OST) is

rewound,

RAD

of

SYSGEN

is

provided.

RAD

without

separate

bootstrap

SYSGEN 2: performs the SYSGEN

= DF1Y,

foil owi ng

from

to

the

and

package

programs:

SO = LP

the

Sand

the

output

(Xl)

first four words.

reached,

control

is

in

performing

similar

That

is,

returned

to

that

the

modification.

operation

D fil

file

during

the

to

MONARCH.

all

RAD

of

UPDATE,

complete

es.

SYSGEN;

Sand D fi

I/O

operations.

except

Old

System

I es

SYSGEN

1.

2 performs

Initializes

correspond

the

to

the

RAD

the

(UAT(X 1)).

2.

3.

Initializes

the the

UAT file

Routine.

4. Writes SYSGE N 1

permit

5. Rewinds

6.

Copies process, Directory the cludes

.62

records

move(r~'"'-

subsequent

the

.61

file

SYSGE

the

are

'-'-.'

Old

OST

records

that

N

message.

RAD

(word)

abbreviated

following EOM/SKS

unit

and

entries

pointers

(the

RAD

bootstrap

System

are

is

maintained

address

to

steps:

table

channel

utilized

maintained

Bootstrap)

of

the

Tape

and

to

the

RAD,

discarded,

Each such

at

the

first four words.

in

the

assignment

during

within

onto

system from

bypasses

beginning

but

their

at

the

end

entry

is

which

~

....

the

_~C'

File

Management

specified

SYSGEN.

the

File

RAD

sectors 0 through

the

RAD.

the

tape

with

labels

of

the

RAD,

three

words in

so-labeled

Blocking

in QSYST

Management

bootstrap.

sector

are

entered

as

iength,

file

sentinels

Routine

2,

3.

During

into

allocated

and

begins

•

are

to

the

a

by

in-

re-

41

'vYhen is

rewound,

the

end

and

of

the

control

as

Tis

reached,

is

returned

to

the

Sand D fi

the

MO

I es

NARCH.

are

closed,

the

as T

SYSGEN I/O

operati

uses

ons.

the

resident

File

Management

Routine

in

performing

all

RAD

42

900

SERIES

SYSGEN

RAD

MONARCH

GENERATOR

(SYSGEN)

OST

• Old S • ItAO D • SO

=

System

Sys

ItAD

Directory FII.

lilt

Output

.....

Tape

FII.

initialize ItAO Initialize

.

S,

Xl, SO

Initialize

.-oln'"

Output

ItAD

(Seeton

to

RewlndOST.

Iypau

Open 3

I/O

UAT

entrI

ItAD

fli

baohtrap

boatatrap.

tabI.

..

•

~2)

for

.......

---

....

AWn¥late to first ..

words

43

I

*1

• -\1*

SCIENTIFIC

DATA

SYSTEMS

SDS

PROGRAM

LIBRARY

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING SEQUENCE:

PROGRAM

RAD

MONARCH

To

load

standard programs from the

MONARCH

capabilities

Loads

with a transfer

external search

tions isfy

erence

routine).

BRM

binary

that

these

of

label

the

MONARCH

satisfy

references

Manual

QSYLDR

DESCRIPTION

LOADER ($QSYLDR)

system

cards,

Reference

this

object

address

or

PROGRAMMED OPERATOR

one

for a

routines

magnetic

routine).

programs from

is

Library

or

more

are

then

detailed

tape,

Manual

encountered.

for

of

loaded

description

from

for a

the

subroutines

the

MONARCH

paper

references.

tape

detailed

medium

At

this

(see

Section 3 of

of

the

Catalog

system

or

RAD

description

specified

point,

references,

which

operations

if

contain

Library

042100

No.

until

the

(900

and

(see

Section 3 of

of

an

there

are

the

loader

external

subroutines

MONARCH performed

Series

to

load

the

functional

End Record

unsatisfied

will

defini-

that

Ref-

by

only)

user

sat-

this

PROGRAMMING

CONVENTIONS:

tExcept number.

when

the

with

the

initial

switches

($QETBL) =

($QSYS!N)

($QSYSTP) =

The the

and

GRAMMED OPERATORS.

with

label be

accessibl e to

RAD

unit

in

loader

End

Record.

contains

the

loader,

definition

is

specified.

load

the B Register

address

=

unit, input

unit, tape UAT

is

assembled

no

external

entries

relocation

containing format.

The

it

is

other

In

bias

and:

of

last

entry

channel, medium.

channel,

as a relocatable

loader

assembled

for

programs.

this

and

This

and

the

t

is

written

references

However,

with

those

entry

case,

in

the A Register

in

loader's

I/O

subroutine

information

I/O

subroutine

library

in a

or

definitions

in

its

points

the

channel

symbol

is in UAT

subroutines.

subroutine

subset

order

to

symbol

table

and

field

and

the

table.

addresses

format.

addresses

This

with a transfer

of

the

SYMBOL

and

no

internal

facilitate

parameters

contains

communication

containing

loader

for bi.nary

t

for

the

magnetic

information

address

language,

PRO-

external

which

the

need

logical

option

is in

in

to

file

44

PROGRAMMING

CONVE

(cont

NTIONS:

.)

loader

The with

the

1.

The

and

RAD.

Li

2.

The ARCH itiate MONARCH

is

following search

the

Specifically,

brary

Monitor

Control

reloading

assembled

subroutines:

subroutine

MONARCH

on a

MO

NARCH system.

Bootstrap

Routine

of

Reference

(using

the

either

($QSRCH). This

Monitor

it

is used by

($QBOOT).

and

MONARCH Manual).

routines

the

various

SYMBOL

subroutine

to

locate

the

loader

This

MONARCH

system

or

META-SYMBOL)

is

files

to

locate

subroutine

system

tape

(see

used

by

the

on

magnetic

the

MONARCH

is

used by

Section 2 of

the

routines

together

loader

tape

MON-

to

the

or

in-

3. The four used by must

contain

linquished value the

4.

The dump

ARCH

5.

The

loader's

the

entry

In

addition,

1.

All Assignment Manual,

2.

The Processor Error

3.

The

4.

The

of

only

routines

RAD

points

MONARCH

initial entry

input

subroutines

the

loader

the

to

the

QTAPE

input

subroutines

routine

File

Management

symbol

of

each

the

symbol

Table

Appendix

entry

point

to

read

address

loader.

when

or

table

Unit

to

control

($QDUMP). by a user

will

of

the

table

Assignment

(BAT)

A.) Switch

point

the

($QCARD, $QTAPE, $QPAPER

binary

of

one

Bits 9

referenced

to

Routine

initially

subroutines

will

entries.

(QPESW).

to

the

RAD

Fi

records.

of

these

through

is

relinquished

This

routine

dump

contain

loader Ie

memory

(see

contain

Table

(Refer

(QSYLDR).

Management

Bits 9

subroutines

23

of

to

by

the

loader.

may

in

QFMR

external

described

external

(UAT)

to

and

the

Routine

QSYSTP must

the

be

octal writeup

in 1 through 5

definition

MONARCH

through

when

loader.

referred

with

on

definition

900

Series

(QFMR).

and

$QDISK)

23

of

QSYSIN

control

contain

These

to

by

zero

suppression.

page

58).

entries

above.

entries

Business

Reference

is

re-

are

MON-

for:

the

for

MEMORY REQUIREMENTS:

SUBROUTINES USED:

Approximately described

QSRCH, QCARD, QTAPE, QPAPER,

in

Calling

34308 or

Sequence

1816

memory

10

above}.

locations

QDISK,

{includes

QFMR,

the

subroutines

RDISC/WDISC.

45

FORMAT

Each item consists of 3 words:

SYMBOL

OF

TABLE

REFERENCE

ITEMS

AND INTERNAL

AND DEFINITION

ITEMS

Symbol

1-8

Chars.

Value

(900 Seri es)

Value

(9300) i

'the

third word of

Word

Word!

1 Char.

I

0

I

0

Sub-

type Items

~(2)

(6)

1C

(6

Used for POP

o 1 2

.0

Sub-

type

(2)

0123456789

each

00

(2)

item

1C

B

(1)

B 0

(1)

(6)

1 C

(6)

Yr

(1)

I

)

•

(5)

is

an instance of one of the following:

Only

M

(1)

I

6 7 8 9

.l

00

(2)

I

Symbol

I

Symbol

value

1C

(6)

1 C

(6)

•

or address of last reference

( 15)

I

of

address of lost reference

(

I I

I

15)

1C

(6)

1C

(6)

·

I

23

Internal POP

Definition

(900 Series only)

Common or

Program Length

Externa I Labe I

Reference

46

·,,0

Sub-

type

o 0

012

o

Sub-

type

o 0

o 1 2

Sub-

type

0

1

o

•

POP Sequence

(6)

•

Not

Used

0

•

Not Used

0

,

,.,

IL

I

8.

No.

7 8 9

CD

B

0

6 7 8 9

o

0

7 8 9

Yr

~

Ac

1

C

Address of

0

I

tua I, effec

I

Length of program or common block

I

data

•

ti

ve I origin of POP subroutine

( 15)

·

(15)

·

word

containing

( 15)

I

~-

I

last reference

•

23

·

(L)

23

·

23

External

Definition

Label

Sub-

1 0

o

type

•

0 0

1 2

•

G·

~

0

7 8 9

•

Value

of

(15)

I

label

I

23

Labeled

Common 0

Reference*

External

Reference

(900

Series

External

Reference

(900

Series

Notes:

CD

POP

only)

POP

only)

For is

•

Sub-

type

1 1

0

o 1 2

•

Sub-

type

Actual

Operation

o 1 (6)

o

1 2

•

01

Sub-

type

1

o

900

orllO:

Series

Actual6-Bit

Operation

0

1 2 7 8 9

Computers,

- F,,-r9300

I

6-Bit

Code

•

Code

(6)

Computers,

0

7 8 9

7 8

Lip

8

Address

~

0

CD.

~

1 0

<2

CJ:

Yn

, r

1

= 0

if

Label

Lip

Actua

=

O~

I

of

data

I I I I

I I I

I,

effective,

item,

word

and

•

containing

( 15)

Not

origin

( 15)

1

if

POP

used

of

item

I I

last

POP

whose

reference

23

0

23

•

subroutine

23

subtype

For

900 origin at the

Zero

reference

number.

The

fer

of

X +

sequence

is

actual

table

CD

9300 M subfield

Items whose

o .

0·

lOOa,

stored

Series

the

POP

when a POP number

item is

6-bit

entry,

Treated

subtype

Band C fields

as

illegal

Computers

subroutine

in

the

inserted

POP

whose

only,

definition

when

address

in

operation

address

of

the

fie

the

= 1

is

stored

item is

is

if

multiple

is

00

are

subtype

input

POP items

Id

symbol

code

obtained

00

by

in

is

encountered.

inserted

of

the

table.

is

also

definition.

not

entered

items:

the

whose

the

actua I POP

by

adding

B = 1

C = 1

MONARCH

subtype

address

in

the

The

stored

field

The symbol

transfer

actual

in

the

1008

in

the

table.

if

L is

length

if

L is

length

Loader.

is

11

are

not

of

the

actual

oper9tion

instruction-code

to

table.

table

the

6-bit

entry

sequence

of

a program

of a labeled

entered

POP

transfer

POP

address

(X

+ 1008)

code

replaces

field

number.

common

in

the

table

(X)

when a POP

the

of

the

block.

table.

The

entry,

replaces

seq~ence

POP

trans-

47

GLOSSARY OF ABBREVIATIONS

At';ID

SYMBOLS

(MONARCH

LOADER)

a~b

(x)

R

L

POP

LIB

(0)

x

(a)x_y

NRS ETBL POPCTR DCTR PDCTR RCTR

b rep laces the contents of a

of

Contents

memory location x Current binary record Current record from

Programmed

OPerator

NARCH

t

Library

MO

Library mode switch

Bit x of contents of memory location a

of

Bits x through y of contents

Number of

external

references satisfied less 2

memory location a

"End" of Loader1s Symbol Table

POP

Number of

definitions Number of multiple Number of multiple Number of multiple

external external external

- 1 t

label definitions

POP

definition/

label

reference/

t

PRCTR

LOADM

PRGTST

LOC

A

B

c

X

X2

tApplies to

Number of multiple

Load

mode switch

Purge test switch

of

Location

of

effective

load address for current address from va lue word

A Register

B Register Current label

Labe'l

or

popt

item from symbol

X Register

900 Series Computers only

external

item

from

POP references t

data

word or location

R

table

with same "name" as C

48

MONARCH

SQSYSLDR LOADER

LOADER

initialize correepond with system input medium

lIAS

FLAG-

Al

t------:::;:::==JL--

QSYSIN and

- load relocation bias

loader options in I Register

S

U

lead

1

R

S

U

Proc

I

R

____

READ

.

next record

LOAD

..

.,erified record

QSYBTP

In

to

A RegIster

STRT,

(R)

LOOP

S

U

1 'OIltlon ')'Item tape

R

100--

for loat program loaded +

·(IIAS)

length of

s

U

1 T)'Pe loader'uymbol table

R

SEARCH

at

library

(SEQNR), where (SEQNR)-

that

program

~

49

11~

____________

MONARCH

~

..

LOADER (cont.)

S

U

I

Read

R

Is

L.

Any

900

QSYSTP

1 record from library

level 1

MONARCH

No

UftICItlsfled

Serl

..

POP

v

Set

LOAOMand

(L)

10

rec"?

Label

or

references?

..

PRGTST

- - - - - - - -

Purge

MONARCH

WIll

detected

loader'.

symbol

E

....

of

library

table, etc.

50

S

U

....

1

record

(R)

..

from loader

10

record?

No

Ves'

count - 2

•

Input

b It a

medlulI!

MONARCH

It

13~------------~

CT,

WOCT-word

READ

SUIlOUTINE

MONARCH

x -

SEQNR - (lIAS) + program length

Cha,.. exit

LOADER (cont.)

Rec:onI

T)Ipe

Code

-load

addr_"

LOAD

'tOnI

In

R to load.,

R

r-

______

v

...

--...c

9300

Store modlfl.r Store

Ing modlfl.r

b load

words

0 in a location if the correspond-

LOC-laad

Does

relocation?

in fixed locations.

word

i.

not pr

add,...

in R

v

..

add,...

No

«IWO»

require COI'MlOn

Computer?

900

r.locatabl.?

...

nt in R

+ (lIAS)

Serl

••

LOC - iaad addr

Add (lIAS) to

«IWD»

&.t

to 1 If

the

-biased-

add,..

bit

18

...

fl.1d

In

of «LOC.)-l)

add,...

_-

Hove

all

prac:..ed?

data

word. In R been

51

MONARCH

Have

all

lte""

in R

been

D2~------------~-t

Store

effective

addr

LOADER (cont.)

proc..ed?

No

..

In

LOC

-'

I

Extract Sub-Type code of

value

word

and

LOAD

SUBROUTINE,

,tore

"POPs"

from

In

bits 0-1

ST

AND

EXTERNAL

LABELS

52

IhMII

C

h

load.,',

(X)

aQ1

with

OEF

aymbol

__

MONARCH

table

"....

LOADER {cont.}

«CHAIN»-

d,...

field of orig-

Inal value word

«CHAJN»~«CHAlN))~8

«CHAJN»9_23-~1

ad-

value

No

53

MONARCH

v.

'-------~~----~

LOADER (cont.)

No

NOTE

I

No

....

of C and X match

and

Record

and X agree

ryp.

Inltlallz.

first entry

F2~----------~~

of

C

symbol

in

loader's

tabl.

point

symbol

...

tabl.

at

SVWOL TAilf

54

MATCHED

EXTERNAL

SEARCH

AND

·POP· INSERT

flItOCESSING,

SUlROUTlNf

MONARCH

S.t

bib 3 thN • 01

ayneol

LOADER (cent.)

entry.

value

(POPCTR)18_23

tabl.

ward

01

new

G2~--------------~~--------------~

G3~--------------~

PXDCI

PXRCI

X2

- pop sequence number

word

of C

A-

Actual

POP

code

from

fl"Oftl

value

X

55

MONARCH

x-

LOADER

add,...

of

(cont.)

Input eubroutlne

S U

Set unit and chanMI

B

OIII....,.ts

R

WIQ

QCAlD

QTAPf

S U

•

R R

SEnO

Set unit and channel aulgnments

S U

Set unit and channel

auignIMnts

•

SETIO

QPAPfR

Determine (S

= 0,

BI = 3)

fil.

number

56

LOADER

INPUT

SUBROUTINES

MAGNETIC

TAPE

SEARCH

SQSRCH SEARCH

SUBROUTINE

14.,1--

A A

regllter

1 1 regIster

S

U

1 Read fJnt "

R

W.

Are

chan.

Are

chan.

~

wOlds

fJnt wold read a

v

..

9-16 =

·SYSENOI\"?

No

9-16·

((10», ((l0)+1)?

of

record

'~1'?

No

0

A, 1-..arch

key

·U

...

the

magnetIc tape. When QSYSTP

IllCllilnetlc

tope

read

IUbroutlne used

Is

OIIlgned

by

the

to

MONARCH Loader, when QSYSTP OIIigned

the

RAO,

SNXT reads

from

the

RAO

Directory

(0

to

file).

",

'\

57

I

;1

• -I,.;

SCIENTIFIC

DATA

SYSTEMS

SDS

PROGRAM

LIBRARY

PROGRAM

Page 1 of

IDE

NTIFICATION: 900 Series MONARCH Resident

MANAGEMENT ROUTINE (QFMR)

CONFIGURATION:

PURPOSE:

PROGRAMMED OPERATORS:

STORAGE:

TIMING:

USE:

CALLING SEQUENCE:

Any

SDS

900 Series Computer

Manages the

system.

None

Occupies

the last 650 locations in memory

NIA

The

subroutine

BRM

*QSYS

S,

Xl,

X2,

is

loaded as part of

DESCRIPTION

RAD

FILE

BolBI

(and

the

D)

RAD

Catalog

files for the

MONARCH System Loader.

No.

RAD

MONARCH

OP

FDT

Return;

The parameter following OP, and a pointer to a

OP

The communicate

(A)

= Address

is

used to

00 : Rewind 01 : Open 02 : Close 03 : Read 04 : Write 05 : Write with 06 : Position

file

indicate

description

additional

of

Verification

table

the

BRM

consists of a

file

description

the

following file operations:

(S

and D only)

is

used

by

both the user and

information about

RAD

table.

the

fi

I e.

six-bit

file operation.

operation code,

by

QFMR to

58

CALLING

SEQUENCE: (cont

.)

loc FDT

+1

+2

o

I

ER

2

lEOF

3

IEOS I

4

5 6

I

FP

I

9

10

Core Block

23

Origin

Size

+3

In

the

event

follows:

Error I. D.

ER

= 1

FP

= 1

EOS = 1

EOF=l

The

core

origin

an

I/O

operation

The

block

transferred.

delimiting,

delimiting record).

of

an

Cause

Operati A

Not

disc

End-of-file files

size

is

When

it

should

files

contain

error,

write

possible

storage

only).

is

the

to

set

the

on was

operation

available.

encountered

beginning

be

performed.

by

the

user

be

so

a word

cause

attempted

was

to

satisfy

core

user

to

is

reading

indicated

count

of

error

but

attempted

requested

on a

location

specify

from a

by

setting

in

bits

Logical

is

identified

was unsuccessfu I.

into a file-protected write

read

operation

to/from

the

number

fi

Ie whose

the

3-8

of

by QFMR in

operation.

which

of

words

records block the

size

first word

File

No.

FDT

area.

No

further

(self-delimiting

the

user

requests

that

are

to

are

sel

f-

negative

of

(self-

every

as

be

The

logical

O:S

1 : Xl

2 : X2

3 : BO/BI

4:D

METHOD:

QFMR is package:

RDISC/WDISC Disc

one

file

of

number is

two

routines

set

by

which

Handler

the

user

comprise

to

specify

the

MONARCH

the

file

by

number.

RAD

I/O

59

METHOD:

(cont

.)

RDISC/WDISC has sectors. WDISC is to a chpnnel

It

contains

random

having

the

access

interlace.

capability

only

coding

in

operation,

to

read

that

and

or

write a specified

actually

assumes

addresses

that

the

number

the

9367

disc.

is

connected

of

disc

RDISC/

The system processors, on never system processors

write

Position

64-word

and

retention

records.

RDISC/WDISC. It has

Repositi on

Buffer

The fi Ie

able.

has

been

aration

p-th

word is

p = q *

X2

and poi nt when

Tape BACKREC

I/O

management

For

each

fully

for

the

located

64

BO

are

of

rewi nd.

rewound.

or

RAD

are

active

utilized,

actually

RAD

Therefore,

MO

NARCH.

not

provided

package

file,

sector.

at

word r

~ q ~

fi I es

the

other

In

it

must

for

each

it

must

and

to

it

must

processors

behaves

it

at

which

Since

in

2047,

the

same

are

the However, for

hand,

essence,

keep

fi

I

e.

be

able

rewind

buffer

and

as

maintains

time

the

sectors

sector

0 ~ r ~ 63.

file,

si

mi

lar

same

control

SKIPFILE, SKIPREC, BACKFILE

RAD

files.

deal

with

QFMR

track

to

all

I/O

is

the

following

of

the

find

elements

files.

between

sector-oriented

though

the

q,

but

to

tape

buffer

are

the

"current

is

are

in

where

distinguishable fi

I es,

cards

sequential

an

interface

fi

responsibilities:

origin

and

current

within

the

record-oriented

hand I er.

RAD

were

word

sector

II

in

emptied/refilled

numerical

sequence,

from

and

are

destructibl

can

be

used for ei

I es,

and

between

position

the S file

address-

core

until

in

prep-

the

stand-

ther

and

the

it

the

e

Each

write

(overflow

Since

RAD boundary, example, management reading

or

Similarly,

The

file

management

eration.

Organizati

RAD:

60

on

Xl

of

storage

logical

it

is

if

the

routine

writing

all

output

on

of

and

X2 is

space).

files

necessary

Xl

file

must first

can

commence.

files package

RAD

Storage

5 J

checked

only

to

open

begins

should

BO

for

Both

files

rarely

would

the

with

the

transfer

be

closed

file

sector

automatically

X2

infringement

are

rewound

be

expected

prior

to

recording

fourth word in

040538 to

after

the

opens a file

upon

the

between

to

begin

or

sector

the

core

last

write after a rewind

other

JOBs.

at a sector

writing.

04053

8

buffer

operation.

file

,

the

For

file

before

op-

METHOD: (cont .)

CORE:

X7777

UAT BAT

(11 (11

) )

Unit Assignment Table Business Assignment Table

o

BRU BRU CAT RAD

BOOTSTRAP

FILE

POINTERS

RAD

PACKAGE

DUMP TYPSM

(11

BUFFERS META-SYMBOL

RESIDENT

QBOOT

BRU

(1

QBOOT

)

ERASABLE

(1)

)

(19) (12)

(389)

(192)

(103)

(1)

Li

nkage Linkage RAD

to Memory to

Symbol Tbl.Dump

Dump

EOM/SKS Table Bootstrap MONARCH File Management Pointers RAD

File

Mgt.Package

RAD

I/O

Buffers

Overlay

Li

nkage to Bootstra p

Loader

(3)

(1)

SUMMARY

OF

OPERATIONS:

RAD

storage

When

the tory). After the system storage

taneouslyactive, immediately

allocation

system

is

used for the

after

is based on

is

generated,

is

Xl

these

generated,

and

X2

files. Since they both share the same file; the

BO

fi I e.

Rewind Calling

sequence:

BRM

00

*QSYS FDT

Rewind and open file whose number

on

tab'1

e.

descripti

Words two and

Open

is

specified

three

*QSYS FDT

are

Calling

Open tion

the file whose number

table.

sequence:

Words two and

BRM

01

the

concept

are

S (the System File) and D (the

Sand D are

is

specified in

three

are

in

ignored.

of

two concurrently

closed, and

X2

and

BO

(BI)

X2

is

defined

the

fourth word of

active

the

remaining

are

not simul-

as beginning

ignored.

the fourth word of the file

"Open"

corresponds

to

Direc-

the

file

descrip-

an

fi les.

61

METHOD:

(cont

.)

unconditional buffer.

No

Close

read

operation

information

of

is

transferred

the

current

to

the

sector

user.

into

the

specified

file's

I/O

Calling

Close ti on

sequence:

the

tabl

e. conditional I/O

buffer.

"close"

is used

Read

Call

ing

sequence:

Read from

scription

two

specifies

fied

file

operation.

Variable

length

assume

to

the

file

whose

Words

write

operation

Since a "write"

to

ensure

the

file

whose

table.

must

length

be

Word

the

area

be

open;

records

unknown

record

length

BRM

02

number

two

and

03

three

into

((word

that

BRM

number

which

i.e.,

may

to

*QSYS

FDT

is

specified

three

are

upon

call

the

*QSYS

FDT

is

specifies

an

"open"

be

read

three)

be

specified

ignored.

the

current

does

file's

specified

the

information

under

<0).

in

the

sector

not

always

output

in

number

operation

"count

The

in

bits

fourth word

II

CI

ose"

from

result

buffer

is

the

fourth word

of

words

is

to

must

control

file

management

3-8

of

the

corresponds

the

specified

in

an

I/O

"dumped"

of

to

be

transferred.

precede

II

by

specifying

routine

the

first word in

file

to

operation,

onto

the

read,

the

first

descrip-

an

un-

file's

the

RAD.

file

de-

and

word

The

speci-

"read"

their

will

then

the

record.

62

Write Calling

Write scription word The

fi rst "wri

Before

contents

sequence:

onto

table.

two

specified

te

returning

of

"overwrite"

write

a

loader not

end-of-file

to

otherwise

the

file

Word

specifies

file

II

op~rati

to

the

"clear".

identify

contain

BRM

04

whose

the

must

on.

the

and a backspace.

the

number

three

area

be

open;

calling

word in

That

end

of

zero

specifies

from

program,

the

is,

the

in

the

*QSYS

FDT

is

specified

the

which

i.

output

e.,

it

the

an

buffer;

is

as

This

Xl,

X2,

first word.

in

number

information

"open"

the

file

however,

though

feature

and

BO

the

fourth word

of

words

is

to

operation

management

the

every

write

is used by

files,

whose

of

be

written,

be

transferred.

must

precede

routine

records

the

file

and

the

clears

write

will

followed

processors

could

de-

the

by

and

METHOD: (cont

.)

Write-with-Verification Calling

The cept pared, comparison The

advertently

Position

sequence:

write-with-verification

that

after

each

output

word by word,

user

buffer.

is

cautioned

destroyed

This

BRM

05

operation

to

the

with

the

output

option

against

by doi ng so.

is used

using this

*QSYS FDT

RAD,

buffer.

is

identical

the

during

option,

to

specified

The X2

SYSGEN,

since

the

write

sector

buffer

X2 or BO

is

when

operation,

input

and

is used for

X2

is

not

might

be

ex-

com-

the

active.

in-

SUBROUTINES:

Ca

II i ng

sequence:

Position

the

file

seri pti on tab! e

three

are

ignored.

This

option

in

accordance

RDISC/WDISC Ca

II i ng

Upon

return, A wi Otherwise, disc

area

is used

Sequence:

A will

is

file

LDA

BRM

06

whose

at

with

protected,

number

the

addieSS speC i

by

the

system

addresses

LOA LDB BRM Return

II

be

cI

ear

contain a lonel in

=

RAO *QSYS FOT

is

specified

fi

search

specified

=

Interlace

=

RAO RDISC/WOISC

if

the

A will

contain a lonel in

word

ed;

Sector

I/O

bit

address

in

the

then

open

routines

in

the D file.

control

operation

1,

and,

fourth word

the

fil

e.

to

position

word

was

performed

if

part

or

bit

5.

of

the

'vVords

the S file

successfu II

all

of

the

file

de-

two

and

randomly,

specified

y.

The

RAD

during

is

assigned.

The

handler

nel

error.

the

attempt

if a file-protected

The

handler

1. Uses

handler

SYSGEN

The

initiates

If

no

is

repeated

..

has

interlace,

util

or

bootstrap

file

error

test

the

following

but

izes

is

always

the

read/write

is

detected,

twice.

proves

not

the

11

to

assumed

true,

additional

interrupts.

EOM/SKS

correspond

operation

the

Upon

the

• • I •

AS

instructions

with

the

to

be

no. 1

and

handler

is

characteristics:

third

also

returns failure,

set.

that

channel

(unit

checks

with

A,

are

to

address

for a

(A)

is

set

initialized

which

= 026/066).

coupler

=

O.

to

lone

the

RAD

or

chan-

Otherwise,

l

and,

,

63

SUBROUTINES:

(cont

.)

2.

Uses

3. Does

automatic

not

check

band

incrementation.

co

II

i ng

parameters.

Therefore, maximum

disc

unit{s),

the

co

II

after

effective

and

is

legitimate.

latency,

rate.

it

is

the

handler

The

handler

responsibility

provides

is

ignorant

of

the

for

I/O

of

calling

transmission

the

physical

program

to

at

the

size

of

ensure

the

that

64

900

SERIES

MONARCH

RESIDENT

RAD

FDT FDT

initialize

FILE

MANAGEMENT

QFMI

(2)

- N

(3)

- 1

ROUTINE

(QFMR)

REWIND

9£t!m

'"

Q,R

SECTOR

-

_

(Q)

IUFFER(J)

PRIME TO

READ

SUI

IUFFER ITEMS

READ

SUI

N

IN

WRITE

SUI

BUFFER ITEMS

OUT

CLOSE

QCWro

'"

-

Q,R

IUFFER

N

SECTOR

(I) -

(Q)

65

900

SERIES

MONARCH

RESIDENT

RAD

FILE

MANAGEMENT

ROUTINE

N -

NO

WORDS

TUNSFEUED

I :: LOGICAL

f(O

OK:tl

(QFMR)

TO

IE

ALE

NO.

(cont.)

READ/WRITE

SECTOtt BUFFER -SECTOR

DISC

Q+f(I)-BUFFER

Ott

Q

66

900

SERIES

MONARCH

Load

I nterl

Connect ALC/ EOM/POT,IUC

ace,

RESIDENT

RAD

FILE

MANAGEMENT

ROUTINE

(QFMR)

(cont.)

67

t

;\

•

-It;

SCIENTIFIC

DATA

SYSTEMS

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING

SEQUENCE:

MONARCH

To

load

the

it.

Determines then

loads

reading

ing

Execute buffer tape point for

relocatable

them

for

reel

on

9300

into

magnetic

containing a MONARCH tape Computers).

SDS

BOOTSTRAP LOADER (BOOTSTRAP)

MO

the

900

PROGRAM

NARC H

memory

MONARCH

upper

tape"

Series

unit

0 (on

DESCRIPTION

Loader

size

Loader binary memory.

Computers,

records

FILL"

the W buffer

LIBRARY

from

of

the

computer

Routine

from

procedure

or

on

system

the

system

the

for

Channel

for

900

upper

tape

Catalog

tape

and

in

which

(higher

MONARCH

magnetic

A for

9300

must

be

Series

Computers

Nos.

transfer

it

is

being

addresses)

system

tape

unit

Computers).

positioned

042009 642024

control

executed

memory

tape

0 (on

at

or

Channel

and

the

load

(900 (9300)

to

and

by

load-

W

A

Series)

PROGRAMMING

CONVENTIONS:

MEMORY REQUIREMENTS:

SUBROUTINES USED:

This

program

tive

to

memory

lute,

it

can being OPERATORS

Approximately

None

recorded

has

be

are

3008

been location loaded

on

the

used.

or

written

2.

relative

system

19210

so

that

However,

to

any

tape

as

memory

it

can

be

since

reasonable

an

absolute

locations.

executed

a

1\

address

references

memory

program.

only

if

loaded

are

location

No

PROGRAMMED

prior

rela-

abso-

to

68

MONARCH

BOOTSTRAP

Read

In

reIt

of

eo..ute

...

on

1

record

nutIIber

In

R &

tAAX

extract

relocation

(R)

ff'Olll

of

baaed

had

on W buff.,.

C~

count

LOADER

$lOOT

Iootstrap

data

Loader

blot

for loader

Magnetic

worda

load relocation

from

(BOOTSTRAP)

Tape

0

word

NOTE

Control I,

I

.....

to

MONAICH

loader, which

to load MONARCH

I,

-prl

re-

AcCUMUlate bias

to addr

ing

load

relocation & store

It

~ted

check

.....

..

field of dato

checksu",

It

R

an

, add load relocation

words

requir-

data

words

.,

check.,,,,

End

Record?

LEX

IT

In

R?

No

69

I •

-\

SCI.NTIPIC

DATA

SYST.MS

IDENTIFICATION:

PURPOSE:

ACTION:

CALLING

SEQUENCE:

SDS

PROGRAM

MONARCH

To

load

standard

to

load

user Section 3 of tion

of

the

Loads

Record

are

the contain

Library Section 3 of tion

BRM

binary

with a transfer

unsatisfied

loader

external

subroutines

of

the

QSYLDR

PROGRAM

LIBRARY

DESCRIPTION

LOADER ($QSYLDR)

system

programs

the

MONARCH

functional

object

external

will

search

definitions

the

MONARCH

operations

routines

from

capabilities

programs

address

label

the

wh

ich

satisfy

performed

cards,

MONARCH

whichsatisfyone

Catalog

from

the

MONARCH

magnetic

Reference

of

this

from

the

is

encountered

or

PROGRAMMED OPERATOR

these

Reference

by

this

tape,

Manual

routine.

medium

.

Library

or

references

Manual

routine.

Nos.

or

for a detailed

specified

If,

at

for

subroutines

more

are

for a

system

paper

until

th is

point,

of

the

then

detailed

042010 642925

tape

tape.

descrip-

an

End

there

references,

which

references.

loaded.

descrip-

(900

93

(

and

See

Series)

99)

PROGRAMMING CONVENTIONS:

with

the

initial

option

($QETBL) =

($QSYSIN)

($QSYSTP)

The

dress SYMBOL and facilitate bol points

The

gether

switches

loader

in

no

internal

table

and

loader

with

is

the

End

language

communication

containing

parameters

is

the

load

relocation

in

the B Register

address

=

unit, input

=

unit, magnetic information

assembled

Record.

PROGRAMMED OPERATORS.

assembled

following

of

channel, medium.

channel,

tape

as a relocatable

The

and

contains

with

external

which

(using

subroutines:

bias

and:

last

entry

and

This

and

containing

is in UAT

loader

no

the

label

need

either

in

I/O

information

I/O

external

loader,

definition

to

be

the A Register

loader's

subroutine

the

library

format.

subroutine

is

written

accessible

SYMBOL

in a subset

references

it

is

assembled

entries

or

and

the

symbol

is in

However,

table.

addresses

UAT

format.

addresses

subroutines.

with a transfer

for

to

other

META-SYMBOL)

for

of

or

definitions

in

order

with

those

programs.

loader

for

binary

the

its

entry

This

ad-

to

sym-

to-

70

PROGRAMMING

CONVENTIONS:

(cont.

)

a.

The

is

used to loader

tape.

b.

The MONARCH routines Section 2 of

c.

The used QSYSIN when QSYSTP must

quished

erenced

d.

The dump MONARCH

zero

magnetic

by

the

locate

to

files locate

Monitor

to

three

by

input

the

must

control

to

the

by

routine

suppression.

tape

loader,

on

the

Bootstrap

Control

initiate

the

MONARCH

subroutines

loader

contain

is

relinquished

contain

loader.

the

loader.

routines

search

magnetic

subroutine

and

by

tape.

MONARCH

{$QBOOT}.

Routine

reloading

($QCARD,

to

read

binary

the

address

the

value

These

($QDUMP).

or

by a user

the

MONARCH

Specifically,

Library

This

and

the

of

the

MONARCH

Reference

records.

of

to

the

loader.

of

QTAPE

are

the

This

routine

to

dump

($QSRCH).

Monitor

on a MONARCH

subroutine

various

MONARCH

Manual).

$QTAPE,

Bits 9

one

of

these

Bits 9

when

only

input

may

memory

This

subroutine

routines,

it

is

used

is

used

system

and

through

tape

$QPAPER)

23

subroutines

through

control

is

subroutines

be

referred

in

octal

by

the

system

by

the

(see

of

23

of

relin-

ref-

to by

with

MEMORY REQUIREMENTS:

SUBROUTINES

USED:

~

I

,..,

T

lie

entri

.oa

es for

...

er

I

s sym

the

through d above.

definition

a,

entries

All

MONARCH

ness

Assignment

Reference

b.

The Processor Error

c.

The

initial

ApproX:imately routines

QSRCH,

described

QCARD,

hi..

b I

....

o

..

a e

W! . !nltla

entry

poi

In

addition

nts

for:

Unit

Assignment

Table

Manual,

Appendix

Switch

entry

27108 or

in

Calling

point

1480

QTAPE, QPAPER

'II'"

of

each

the

(BAT)

(QPESW),

to

the

memory

10

Sequence

II ' I d

.y

of

the

symbol

Table

entries.

A.

)

loader

contain

table

itself

locations

externa.

subrouti

will

(UAT)

(Refer

(QSYLDR).

nes

and

to

(includes

above).

e.!n!t!on

descri

contain

900

the

MONARCH

f'

, ,

bed

ina

external

Series

the

sub-

Busi-

71

FORMA

Each item consists of 3 words:

1 Char.

SYMBOL

T OF

TABLE

REFERENCE

ITEMS

1

AND INTERNAL

AND DEFINITION

C

ITEMS

1C

1 C

Symbol

1-8 Chars.

Value

(900 Seri es)

Value

the

Internal POP

Definition

(900 Series only)

Word

(9300)

third word of

I

0

Sub-

type

(2)

~6l

1 C 1 C

(6)

•

Used for POP

Items

(5)

I

Only

~

B

~

(1)

( 1 )

~6l

(6)

o 1 2 6 7 8 9

G)

Sub-

type

(2)

0123456789

each

00 M

(2)

item

o

Sub-

type

POP Sequence No.

I

(1)

is

an instance of one of the following:

•

I

00

(2)

I

B

(1)

8.

0

(1

)

~

a a (6) 1

012

7 8 9

I

Symbol

---

Symbol

I

Ac

tua I, effec

value

~6l

1C

(6)

15)

I

of

last reference

I

•

or address of last reference

(

I I

of

address

(

·

ti

ve, origin of POP subroutine

(

~6~

1C

(6)

·

I

·

23

CD

Sub-

Common or

Program Length

Externa I

Reference

72

Lobe

type

a a

a

Sub-

type

I

a

o

1

1 2

1

I

Jl..

•

Not

a

•

Not Used

a

')

Used

o

I

B

0

6 7 8 9

I

CD.

a a

7 8 9

C

Address of

~

Length of program or common block

I

data

·

(

15)

•

word containing last reference

(

15)

I

·

(L)

23

·

23

CD.

External

Definition

Labeled

Common 0

Reference*

External

Reference

(900

Externa I POP

Reference

(900

Label

Seri

es on

Series

POP

Iy)

only)

1

;~~:I

0

Sub-

type

1

o

Sub-

type

0

a

Sub-

type

1 0

o

0

1 2

0

1

1 2

Operation

1

1 2

Operation

1 2

•

Actual

•

Actual

(6)

6-Bit

Code

(6)

6-Bit

Code

I

•

o

1:1

7 8 9

G:

~

0

7 8 9

CD.

~

1 0

7 8 9

CD

Ll

IP

1

7 a 9

Address

Actual;

I

of

data

I

effective;

Value

•

word

•

Not

•

of

label

(15)

I I

containing

(

15)

I

used

I

origin

(

of

15)

last

POP

23

reference

23

•

a

23

•

subroutine

23

Notes:

For

900 origin at the

Zero reference number.

The

fer

of

X +

lOOa,

sequence

is

actual

table

CD CD

CD

8)

CD

Series

stored

For is

9300 M subfie

Items whose

Band C fields

Treated

the

POP

when a POP

number

item is

6-bit

entry

900

Series

01

or 10; for 9300

as

Computers

subroutine

when

in

the

address

inserted

POP

operation

whose

address

Computers,

Id

= 1

subtype

of

subtype

illegal

only,

is

stored

definition

the

item is

fie

Id

in

the

is

Computers,

if

mu

is

00

input

POP

code

obtained

items

is

of

the

symbol

is

by

in

inserted

Lip

= 0

if

Lip

Itiple

are

00

encountered.

table.

also

definition.

not

items:

the

MONARCH

whose

the

address

actual

stored

by

adding

entered

subtype

in

the

POP

The

Label

=

00

B = 1 C = 1

field

The

symbol

transfer

actual

in

the

lOOa

item,

in

if if

Loader.

is

of actual

to

and

the

table.

L is

length

L is

length

11

are

not

the

actual

6-bit

table.

table

operation

instruction-code

the

entry

sequence

1

if

POP

item

of

a program

of a labeled

entered

POP

transfer

POP

address

(X

+ 1008)

code

replaces

field

number.

whose

common

in

the

table

(X)

when a POP

the

of

the

subtype

block.

table.

entry,

replaces

sequence

POP

The

trans-

73

GLOSSARY

OF

ABBREVIATIONS

A~D

SYMBOLS

(MONARCH

LOADER)

a~b

(x)

R

L

POP

LIB

(a)

x

(a)x_y

NRS ETBL POPCTR DCTR PDCTR RCTR

b

rep

laces Contents Current Current

Programmed

Library Bit x Bits x

Number

"End"

Number

Number Number Number

of binary record

mode

of

contents

through y of

of

Loader1s Symbol of of of of

the

contents

memory

record from

OPerator

switch

of

externa I references

POP

definitions multiple multiple multiple

of

location

MO

NARCH

t

memory

contents

Table

external external

external

a

- 1 t

x

Library

location

of

memory

satisfied

label

definitions

POP

definitions

label

a

location

less 2

references

a

t

PRCTR

LOADM PRGTST

LOC

A

B

C

X X2

tApplies

to

900

Number

Load mode Purge

Location

of

effective

Register

A B

Register

Current

Label

X

Register

Series

Computers

of

test

switch

of

label

or

POptitem

multiple

switch

load

address

or

popt

only

external

from

item

from symbol

for

va

lue

from R

POP

current

references

data

word

table

with

word

same

t

or

location

"name"

as

C

74

MONARCH

LOADER

SQSYSLDR LOADER

1

}-------r-

A

BIAS - load FLAG--

loader

-_ -_

-..,-r-

S

relocation

options

-_ -_ -_

-_-_

bias

in B Register

--1-1-

____

in A Register

....,

STRT,

LOOP

U

B

Read

R

S

U

Process

B

R

No

Is R an

End

A2~--------------------~1

'-'

LOAD

verified

Record with a

(R)

record

transfer

(R)

address?

S SEArCH

u

B Position systerri

R f

tope

1

at

library

LDAPCT

BIAS--

(SEQNR),

(BIAS) for lost progrctm I()IJded

length

of

that

S TYPSYM

U

B

Type

where

program''''."

looJer'ssymool

(SEGNR)=

...... ~ .

table

.........

'"

\

-t

/¥'

,w""

75

MONARCH

LOADER (cont. )

81 ~ ______________

S QSYSTP

U

8 Read 1 record from

R

Is

l a

level 1 MONARCH

Is

l a

level

Any

900

Set

~

..

library

lD

No

2 MONARCH

unsatisfied

Series

POP

LOADM and PRGTST

ID

Yes

label

or

references?

Yes

(l)

record?

No

NOTE T

MONARCH was

detected

End

of

library

S

U

B

R

Is

CT,

record

input medium

R a MONARCH

Is

word

count

Is

word

count

WDCT --word

(R)

from

lD

No in R S

Yes

in R ~ 2?

Yes

count

loader

record?

31?

- 2

NRP

READ

SUBROUTINE

Purge

loader's

symbol

table,

etc.

76

MONARCH

x-

Record Type

LOADER

Code

(cont.)

LOAD

from R

SEQNR - (BIAS)

Change

"load

exit

Initialize

Store modifier words in fixed Store D in a location

ing modifier word

Is

load oddress in R

LOC--Ioad

iwD--address

+ program length

address" in R to loader

Data

Record Parameter

if

the

is

not present in R

relocatable?

Yes

address + (BIAS)

of

ist

data

locations.

correspond-

word

in

R

LOC --load address

Add (BIAS) to address field in

«IWD)) &set to 1 if

bit

the

"biased" address

18

of

«LOC)-l)

ex-

r-

_______

...;Y..;........

9300

Does

«IWD))

r.locatlon?

Have

ali

processed ?

r.qu i r.

no

Computer?

dara

words in R

No

900

common

Series

been

77

MONARCH

LOADER

(cont.)

Have a

II

items

in

D2~--------------~

'-----------~----------~

Does

address in

effective address

Store

Extract Sub-T)'!)e cade

of value

word

and store

X - record type code

in

NEXTl

of item

LOe

bits 0-1

ST

R been processed?

No

2nd

word

from

G I

Y.

EX

IT -_:

POPs

(900

Series only)

LOAD

78

SUBROUTINE,

"POPs" AND

EXTERNAL

LABELS

DEF

MONARCH

LOADER

(cont.)

C

~

loader's

Search for Item (X) with

symbol

lame

table

name

value

word

((CHAIN))o:s-((CHAIN))O_8

((CHAIN»9_23_symbol

No

G~---

value

...

,*

79

MONARCH

Yn

'-------~~-----'

LOADER

(cont.)

No

NOTE

J

Names

of C and X match

and

Record

and X agree

types

Initialize

first

entry

F2~------------

of

C

symbol

in

loader's

..

w

table

pointer

symbol

at

table

80

MATCHED

SYMBOL

TABLE

EXTERNAL

SEARCH

"POP" PROCESSING,

AND

INSERT

SUBROUTINE

MONARCH

Set bits 3 thru 8 of value symbol

table entry = (POPCTR)18_23

LOADER

900 Series Only

word

(cont.)

NSRTP

of new

G2~--------------~~~--------------~

X2, A-(POPCTR)

POPCTR --(POPCTR)

G3~--------------~~

«X2)+

01(X)s)

10-23

--(LOC)1O_23

G4~--------------~~

X2 --POP sequence number

word of C

A--

Actual

POP

code

+ 1

PXDCR

from

IPOPD

SUBORG

PXRCR va I ue

X

81

MONARCH

x-

address

LOADER

of

input

subroutine

(cont.)

S

U

I

R

gTI.Q

Set

unit

and

assignments

QCARD

channel

S

U

8

R

Replace

channel

& S

KS

in ut

Set

unit

assignments

unit

address

designators

instructions

subroutines

SETIO

and

used

channel

codes

in

all

by

QTAPE

and

EOM

loader

S

U

8

R

SETIO

Set

unit

and

assignments

QPAPER

channel

82

LOADER

INPUT

SUBROUTINES

MAGNETIC

Store search key Address in 10 and

S QSYSTP*

U

B

R

TAPE

SEARCH

set search flag

IRead

first 4 words of record

SUBROUTINE

$QSRCH SEARCH

.,8-0

A A register B 8 register

*Uses the magnetic

Are

tape

read subroutine used by the

Was first word read a

Yes

chan.

9-16 = "SYSENO"t\'?

No

chan.

9-16 = «10)),

A,

B--

search key

Reset search

flag

MONARCH

'6

I'?

«(10)+ 1)?

Loader.

No

83

I

;1

•

-\*

I

SCIENTIPIC

DATA

SYSTEMS

IDENTIFICATION:

PURPOSE:

ACTION:

ICALLING 'SEQUENCE:

SOS

PROGRAM

MONARCH

To

create tapes. tailed

Performs ing MONARCH

formed

BRM

with

indicated:

(QSYS)

See

description

insertion,

and

maintaining a MONARCH

by

MONUPD

the

following

PROGRAM

LIBRARY

DESCRIPTION

UPDATE ROUTINE ($UPDATE)

new

MONARCH

Section 4 of

of

deletion

Reference

this

routine.

MONARCH

=

unit

and taining magnetic-tape

the

system the functional

Manual

channel

the

old

tapes

MONARCH

capabilities

and

replacement

system

for a

description

Unit

Assignment

addresses

system

input/output

tape

Catalog

and

to

Reference

functions

tape.

of

magnetic

in

bits

subroutine

Nos.

update

Manual

of

this

See

of

the

Table

0-8.

042010 (900 Series)

642026 (9300)

existing

routine. related

Section 4 of

operations

entries

tape

Address

in

bits

for a

set

unit

9-23.

system

de-

to

creat-

the

per-

as

con-

of

a

PROGRAMMING

CONVENTIONS:

(QSYST)

(QSYSU)

(QMSG)

(QSMO)

Relocatable gram. of

is in end subroutines

No

typewriter

via

the

such a

way

hence

=

unit

and

channel

ich

the

wh Address bits

9-23.

=

unit

and

reader

put

subroutine

=

unit

and vice control-message

=

unit

and

in

bits

output

subroutine

PROGRAMMED OPERATORS

messages,

MONARCH

that

it

is

loaded

to

which

new

of a magnetic-tape

channel

in

bits

channel

in

bits

channel

0-8.

subroutine

assembled

communication

Unit

it

relies

into

it

refers.

addresses

system

address

0-8.

Address

Assignment on memory

Address

in

bits

addresses

Address

device

address

in

with

subroutines

9-23.

of a typewriter

bits

above

of

magnetic

tape

is to

be

input/output

of a card

of

control-message

of

an

input

in

bits

9-23.

of

typewriter

9-23.

META-SYMBOL

are

used.

with

input/output

Table.

The

in

the

MONARCH

tape

unit

written

reader

or

MONARCH

in

subroutine

or

paper-tape

or

paper-tape

subroutine

or

line

printer

assembly

With

the

subroutines

routine

Monitor

on

bits

0-8.

in

input

for

printer

pro-

exception

is

written

Monitor

in-

de-

the

84

MEMORY

REQUIREMENTS:

SUBROUTINES USED:

\ .

Approximately 34008 or 1790

memory locations, exclusive of

10

input/output subroutines and input/output buffers.

The

following subroutines

by

UPDATE:

in

the MONARCH Control Routine are used

\

GLOSSARY

QMSGRD,

OF

ABBREVIATIONS

GETWRD,

TYPOUT, MTYIO,

(UPDATE

ROUTINE)

CARD,

MAGTP,

MPRINT

OST Old System Tape

NST

UPD

o Current Record

R Current Record from Control Message Medium

U Current Record

New System Tape

UPdate File

from

Old

System Tape

UPdate F i

Ie

85

UPDATE

ROUTINE

I

\

SMONUPO

A

\'

\

S

U

INn

•

Al~--------------~~

S

U

8

~

Decode COPY meaage

•

COPY meaage

A,.

Set 1

leY.1

1

.....

1 1 Slop switch

has

2 argumen"?

v.

.......

equal?

v ..

No

.ewlnd

y.s

..

1t-'~1?

no

OST

no

Set

1

.....

1 2 Slop switch

A3~--------~--------------------~"

S

U

•

It

Search level

S

U

Search

1 ..... 1 2 10 record

•

SltCHl2

OST

for

I*(t

Has

'*'1.

l.v.1 1

10

been

wrltt.n

b

na".

of

1st

Writ. current CST I.vel 1

T~

curr.nt

Na

...

(chora. 9-16) of current

l.v.1 1

10

record ,. ·SYSENON\R?

~---------------4~

Do.

.....

,....

__

.&.aI

..

1 ..... 1 2

In

current CST

on NST?

arg.

,.

CST 1 .....

na".

of

leY.1 1 ID

record already

No

"l0AOMM"?

No

10

record on

1 1

ID

Va

1st

CHI.

record

OST

=

rec:otd?

NST

na".

•

Write

CUf'Nftt

OST

lewl

21D

.....

NST;

T~

current OST

leY.1 2 ID

on

rec.

1---------_1(

~

OST

for next

1 10 record

86

Read 1 record

Is

0 a binary or encoded

Is

0 a MONARCH ID

(0)

from OST

No

Ves

record?

UPDATE

ROUTINE

-NONSTANDARD

{cont.}

(

Type

FORMAT"

Blocking flag

Ves

Ve.

Set blocklna

mode

I.

0 a

I..,el

liD?

Ves

Reset blocking

Ilc,eldng

u"r

mode

level 2

Ve.

Reset blocking mode switch

set?

switch

_Itch

JD

control?

I.

BREAKPOINT 1 (9300

Store 0 as current OST level 1

level 2 ID record

Is

na

..

argument?

Is

name

argument?

SENSE

1)

Set?

level 1 Stop Iwltch

No

In

0 = level 1 name of 2nd

level 1 Stop Iwitch

No

level 2 Stop

In

Iwltchaet?

No

0 = level 2 name of 2nd

or

set?

let?

Flag 0 indicating

written

Chars.

9-16010

that

= "SYSEND,v('?

C6~----------~~~~------~--------~

BLOCKING

It

hal

been

.........

-----...0("010

a level 1 MONARCH ID

SUBROUTINE

record?

No

87

UPDATE

ROUTINE

No

S

U

8

R

Record

UPO

File

Is

U a binary or encoded record?

Is

U a MONARCH

~

(U) from

10

Record?

(cont.)

UPDIN

88

NOTE

End

Run

of Update

en

U a level 1 MONARCH

Ves

Chal'1.

9-16

of U ..

"SYSENo"",?

la

U a binary or encoded END

Ves

II

UP'[)

clevie.

a paper

tape

10

Record?

read

Record

...

?

Reset cunwnt

Search

OST

IO

Record

05T

level 2

for next level 1

10

Record

MCNARC

UPDATE

ROUTINE

(cant.)

Read

1 record

(U)

from

UPD

file

Woa encountered ?

Is

"SYSENOAA'?

Set current Set current

OIltlon

OST

MONARCH

"~lAAAJW05YSENOAA"

Yes

level 1 name of

OST 05T

at

Int.,-record gap preceding first record

loader.

Potltlon

level 1 level 1

NST

1st

argument =

INIT

IO

to

"~1MMMLOA~"

ID

to

H~J"".,.,.,..I\ANtAN'IAI\H

at

load point

No

Search

IO

Record

(UTVPE)-

OST

for next level 2

Is

(U) a COpy

MONARCH

Convert binary card Image to Internal code

1 (for level 1

2 (for level 2

3 (for

1

o (for binary or encoded record)

SRCHL2

MONARCH

IO

COPY

........

Record?

v

..

MONARCH MONARCH

1MIICIge)

or a

SOS

IO IO

Rec)

Write

MONARCH

Bootstrap

Loader

on

NST

Was

a level 1

encountered first?

MONARCH

IO

Record

Vel

89

Initial

Clear

UPDATE

COPY

meuage

Name

Table:

NIARGI N2ARGI

NIARG2 N2ARG2

ROUTINE

parameten

I

- 0

DECMSG

CLlTlL

{cont.}

W =

E =:

current current

IMIICIg8

syntax

word

table

entry

Set

SP

to

IUCCellOl'

E2

Initiallu

NIARGI

Set

for "COPV"

El

~------------~

Obtain

meaage

of E

r----

I

Set

~~E

Is

Syntax

I.

code

there

X =

___

Name

nest

an

entry

Table

action

Table

painter

(i.

e.,

E =:

"COPV")

word

(W)

from

for W •

cod.

Ves

auoclated

Ves

--.----,

point

to

action

~

paint

(SP)

____

(NP)

at

COPV

for

E?

with

wbroutinel

at

entry

E?

.J

90

DECODING

OF

COPY

MESSAGES

UNxARGy" means: xth name

ti

yth argument

UPDATE

ROUTINE

{cont.}

ROOST

NOfE

Block flag

..

foN Rnt entry

initialized

No

UnNCO¥erabie

........

Set CUrNnt NCord

to

2nd

Add

cUlTent record length

to block

sentlne! flag)

to

word

(rnet

start

Ilze

of

field

error.

again

block

Reload

pointer

of

block

~ty

....

~_

....

Set

current record

to

available

point.

word in

91

APPENDIX

A

CONTROL

Manual.

)

PURPOSE:

ACTION:

CALLING

SEQUENCE:

MESSAGE

ACTION

Each

with

Function which by

the

Each

responding Manual formed

BRU

SUBROUTINES

of

these

the

particular

Code

is

to

be

MONARCH

of

these

control

for a

by

the

*IPF

with:

(IPF) =

(OMTE)

subroutines

control

Table

contains

executed

Control

subroutines

message.

description

Action

Subroutine

Origin

for

the

(See

performs

message.

following

Routine.

performs

of

the

of

Action

of

Control

current

Section 2 of

the

processing

Each

entry

the

address

the

See

Section 2 of

control

of

analysis

functions

messages

associated

Subroutine.

tv'essage

Function

contro I message.

the

MONARCH

functions

in

the

Action

of

appropriate

the

and

with

each

associated

the

Control

Subroutine

the

control

MONARCH

the

functions

control

Code

Table

Reference

Message

message

to

the

cor-

Reference

per-

message.

entry

PROGRAMMING

CONVENTIONS:

(PRMCTR) =

(ORGPRM)

Each

Action

tines

are

fer

addresS'.

=

assembled

ways:

a.

When Type

an

an transfer ti

ne

to

obtai n the

W

buffer

Compu

ters).

Number message.

parameters.

Origin value in

the

occupies

same

control

Subroutine

separately,

Action

error

Subroutines

is

detected

appropriate

(BRU)

for

to

900

MSGRST

of

parameters

Double

of

table

order

message.

is a

error

precision

of

parameter

one

word.

as

the

relocatable

the

End

should

(e.

g.,

message

to

allow

control

message

Computers,

suppl

ied

in

literals

values.

Parameter

corresponding

subroutine.

Record

must

terminate

an

illegal

by

calling

the

MONARCH

from

or

on

Channel

the

current

are

counted

Each

values

parameters

If

Action

not

contain a trans-

in

one

of

parameter

TYPM

and

Control

typewri

ter

A for

control

as

2

parameter

are

stored

in

Subrou-

the

following

value).

then

Rou-

1 (on

the

9300

the

92

PROGRAMMING CONVENTIONS: (cont. )

MEMORY REQUIREMENTS:

b. When the Action Subroutine

tem routine to be loaded. Transfer MONARCH Control Routine to

is

one which does not require a sys-

(BRU)

obtain

to

RDMSGR

the next control message

unit.

c.

When the Action Subroutine

possibly one or more standard

and

is

one

input/output

which loads a system routine

subroutines}. GSYSP (or a subroutine which performs the same functions as GSYSP) should MONARCH Loader (via the instruction:

Variable.

(Approximately 6048 or 388

be

executed

and control

for

10

ultimately

"BRM

QSYLDR").

FORTACT

mately 608 or 4810 for ALGOLA).

to allow the

given

and

to the

approxi-

SUBROUTI USED:

NES

Any or all

Subroutine:

TYPM

LDIOSR

GSYSP

SRLDSY QSYLDR QSRCH QBOOT

QFMR

of

the following subrouti nes

can

be referenced by an Action

93

initialize

Set

.P15W

=-1.

IX

=-3.

(Input) -

(binary

and Insw.

I/O

Set (I)

Set

FORTRAN FSWl(llst output) FSWI

FSWQ

7"

switch.

-n8

75&

output-

FORTRAN

ACTION

ROUTINE

FlPTA FlPTI FlPTC

at

106&

107

8

110e

94

u

•

R

Read

In

FORTRAN

contJOl

S

U InMrt LlNKNO

• label

QFMl

Rewl.;;ao

l Update Xl disc

pointers.

disc fII

In

D fll

••

CIa

fil.

••

Read

In

FORTRAN

loader control

Stare

Set

blank,

at

MSfNC

= 0 and PAlMI = 0).

ALGOL

MSfNC+

1,

ACTION ROUTINE

+2.

Compare counter

Get

flnt

Comparison

Get

next parameter

PAlMI-

PlMCTR

parameter

to

?

no

panllMter

from

(L)

froIn

(L + 1)

)-----4

Load

~

ALGOl

y

..

U

I

R

95