HP3000-L Archives

May 1999, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Richard Gambrell <[log in to unmask]>
Reply To:
Richard Gambrell <[log in to unmask]>
Date:
Mon, 17 May 1999 23:16:52 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (65 lines)
Isn't it remarkable how well data fits into 80 columns (or 160)?:-)
For example (further details left to the imagination):

missmrec.cob:      ***  STUDENT MATRICULATION RECORD (080 BYTES)
misxbrec.cob:      ***  SECTION BASIC DATA RECORD (080 BYTES)
misxcrec.cob:      ***  LINKED SECTION BASIC DATA RECORD (080 BYTES)
misxerec.cob:      ***  ASSIGNMENT DATA RECORD (080 BYTES)
misxfrec.cob:      ***  SESSION DATA RECORD (080 BYTES)

fdrecsm.cob:       01  MISSM-RECORD                PICTURE X(080).
fdrecxb.cob:       01  MISXB-RECORD                PICTURE X(080).
fdrecxc.cob:       01  MISXC-RECORD                PICTURE X(080).
fdrecxe.cob:       01  MISXE-RECORD                PICTURE X(080).
fdrecxf.cob:       01  MISXF-RECORD                PICTURE X(080).

000030     03  AST-CARD.
000040         05  A-ID                PICTURE X(08).
000050         05  A-CRDID             PICTURE X(03).
000060         05  A-SCHL              PICTURE X(30).
000090         05  A-TERM              PICTURE X(06).
000130         05  FILLER              PICTURE X(31).
000140         05  A-TRACE             PICTURE X(01).
000150         05  A-6OR8              PICTURE X(01).

(BTW, these lines are *not* from UTC's own software, so I can't reveal more
proprietary, copyrighted, confidential information...<grin>).

Richard G.

Jeff Kell wrote:
>
> "Simpkins, Terry" wrote:
>
> > I can still remember seeing a full box of cards dropped on the
> > mall at Purdue on cold WINDY day in January (early 70's), and the
> > primal scream emitted from the person who dropped them.
>
> Before UTC started online registration on the 3000 (Spring 77), we
> did batch registration "cafeteria style" on old IBM 360.  You punch
> out appointment cards for students with their ID number and mail them
> out early.  Then for each course/section, punch one card for each
> available "seat" in the class.  These are laid out on tables by
> department in the gym.  Student walks around and picks up the classes
> he wants (assuming there are cards left).  On the way out, they hand
> their selections to the attendant who insures the ID is on top and
> followed by their class cards, and they get put into big long card
> filing trays (about 4' long).  These are then fed into a batch program
> that reads them and updates the student files.
>
> Well, one day when walking up the hill from the gym to deliver a full
> tray to the computer center for processing...
>
> Now THAT was a primal scream.
>
> Jeff Kell <[log in to unmask]>

--
Richard Gambrell
Database Administrator and Consultant to Computing Services at
University of Tennessee at Chattanooga, Dept. 4454
113 Hunter Hall, 615 McCallie Ave. Chattanooga, TN 37403-2598
UTC phone: 423-755-4551 fax: 423-755-4025
UTC e-mail: [log in to unmask]
Business or private email: [log in to unmask]

ATOM RSS1 RSS2