IBM S/34 and S/36 FORM members

Members of type ‘O’ which contain screen layout information.

The morphology of these members are the same for S/34 and S/36 but the individual data structures vary.

The member starts with an vector of pointers to, and metadata for, each individual forms in the member.

Each individual form consists of three parts:

  • A header with global information

  • A vector of dynamic data field descriptions

  • A 5250 data stream containing the static part of the form.

For each form, a mock-up of it’s appearance is rendered:

  ┌────────────────────────────────────────────────────────────────────────────────┐
00│                                 ╳IPL╳SIGN ON                ╳Optional-*  ╳   ␣␣│
01│                                                                                │
02│                                                                                │
03│             ╳Enter badge  . . . . . . . . . . . . .╳ ├┴┴┴┴┴┴┴┴┴┤               │
04│                                                                                │
05│              User ID  . . . . . . . . . . . . . . .  ␣␣␣␣␣␣␣␣┴┤                │
06│                                                                                │
07│             ╳Password . . . . . . . . . . . . . . .╳ ├┴┴┴┴┤                    │
08│                                                                                │
09│             ╳User menu  . . . . . . . . . . . . . .╳ ␣␣␣␣␣␣┴┤        ╳*  ╳     │
10│                                                                                │
11│             ╳Library  . . . . . . . . . . . . . . .╳ ␣␣␣␣␣␣␣␣┴┤      ╳*  ╳     │
12│                                                                                │
13│             ╳Procedure  . . . . . . . . . . . . . .╳ ␣␣␣␣␣␣␣␣┴┤      ╳*  ╳     │
14│             ╳IGC session ?  . . . . . . . . . . Y,N╳ Y┴┤                       │
15│             ╳Date . . . . . . . . . . . . . ╳␣␣␣␣␣␣╳ ␣␣␣␣␣␣┴┤                  │
16│                                                                                │
17│             ╳Time . . . . . . . . . . . . .  hhmmss╳ ├┴┴┴┴┴┴┤                  │
18│                                                                                │
19│             ╳Overrides ?  . . . . . . . . . . . N,Y╳ N┴┤                       │
20│                                                                                │
21│ Help-Assistance for sign on                                  ╳␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣╳│
22│                                                                                │
23│                                               COPYRIGHT 1985 IBM Corporation.  │
24│                                                                                │
25│                                                                                │
26│                                                                                │
27│                                                                                │
  └────────────────────────────────────────────────────────────────────────────────┘

Usage

from autoarchaeologist.vendor.ibm.midrange import member_form
…
self.add_examiner(*member_form.ALL)

Notes

Reverse engineered from samples, many mysteries remain.

Test input

  • bitsavers: bits/IBM/System_34

  • COMPANY/IBM/S36

References

No documentation has been found.