Workstation Data Structure
From MidrangeWiki
Using RPG III type data structures:
Dwsds ds d dspf 1 8a D openflag 9 9a D eof 10 10a D status 11 15s 0 D opcode 16 21a D routine 22 29a D srcstmt 30 37a D rcdfmt 38 45a D msgid 46 52a D mi# 53 56a D scrsize 67 70s 0 D rows 152 153b 0 D columns 154 155b 0 D fkey 369 369
Using RPG IV Style Data Structures:
Dwsds ds d dspf 8a D openflag 1a D eof 1a D status 5s 0 D opcode 5a D routine 8a D srcstmt 8a D rcdfmt 8a D msgid 7a D mi# 4a D scrsize 4s 0 D rows 5i 0 D columns 5i 0 D fkey 1a