SCED - the *c editor.

Description:

The *c editor is a program used for manipulating files in standard system format (i.e. BCD). Such files may contain control cards, card cards, binary object decks, or compressed source decks (comdks). It can be quite useful in preparing input to a filedit activity.

SCED looks for four file codes: IN, OT, A* and D*. File codes A* and D* are optional. As usual, these can be permanent or temporary, or on tape, disk, or "cards". The program copies file code IN to file code OT, optionally making any changes indicated on A*.

Modification is done by using $CHANGE cards which can take one of two forms:

$ change m: inserts the following control cards, comdks, etc, up to the next $CHANGE card ahead of change number M.
$ change m,n: deletes change numbers M thru N inclusive and replaces them with any control cards, etc. up to the next $CHANGE card.

To find out what the change numbers are, the file IN can be listed merely by not assigning A* and by assigning file OT to null, as in

$    file      ot,null

Comdks and binary decks are shown in the printer report via the cryptic words "(comdk)" or "(binary deck)", but BCD records are always printed out in full. If you use the ON5 option on the $PROGRAM card, SCED will print only those BCD records which have a "$" in the first column, e.g.

$    program   sced,on5

It is possible to change the name of the $CHANGE directive to some other name such as "$ALTER". This is done by placing a card with the new name in file code D*, e.g.

$     data    d*,,copy
$     alter
$     endcopy

Examples:

$    ident     userid,banner
$    program   sced
$    prmfl     in,r,s,cat/file1
$    prmfl     ot,w,s,cat/file2
$    data      a*,,copy
$    change    1
$    ident     unowho,example
$    change    101,129
$    change    189,189
$    gmap
$    update    list
$    alter     63,63
$    endcopy
$    endjob

Notes:

SCED always rewinds its input file before reading it, so if you need the second file of a multifile tape, use UTILITY to copy it somewhere else first.