01 BLA-RECORD.
05 BLA-1 PIC X(3).
05 BLA-2 PIC S9(8) COMP.
Do you truly wish to assert that BLA-2 is aligned?
On Sun, 5 Jul 2020 17:45:37 -0500 Joe Monk <joemon...@gmail.com> wrote:
:>"Subordinate items are not aligned"
:>
:>yeah, no.
:>
:>If an 01 is aligned, then the subordinate 05 under the 01 is also aligned.
:>It has to be this way because of REDEFINES. I cant REDEFINE an unaligned
:>item into an aligned item.
:>
:>77 are aligned because they are standalone, i.e. no grouping.
:>
:>Joe
:>
:>On Sun, Jul 5, 2020 at 12:07 PM Binyamin Dissen <bdis...@dissensoftware.com>
:>wrote:
:>
:>> On Sun, 5 Jul 2020 11:31:55 -0500 Joe Monk <joemon...@gmail.com> wrote:
:>>
:>> :>Cobol has alignment too. You just dont see it.
:>>
:>> :>All storage is aligned.
:>>
:>> The opposite is true.
:>>
:>> Group (01/77) are aligned.
:>>
:>> Subordinate items are not aligned unless the SYNC clause is specified.
:>>
:>> :>On Sun, Jul 5, 2020 at 10:24 AM Nguyen Dt <ndt....@gmail.com> wrote:
:>> :>
:>> :>> Thank you all for your inputs,
:>> :>>
:>> :>> I am over the problem now.
:>> :>> In fact what i tried to do is to Move some fields to my output fields
:>> and
:>> :>> then write it as a report. (It is a Db2 performance report, the input
:>> are
:>> :>> from the trace buffers with the macros given by Db2 libraries)
:>> :>>
:>> :>> So my program is roughly like this
:>> :>> READ Buffer on QW... variables
:>> :>>
:>> :>> MVC OW...,QW...
:>> :>>
:>> :>>
:>> :>> OW... are the output fields i defined it exactly as in the DSECT got
:>> from
:>> :>> the macros.
:>> :>> As it is an output field, the position is important (and it is why i
:>> :>> detected a problem in the positions of my fields)
:>> :>> Its is OK now with OW... variables defined as characters CLx
:>> :>>
:>> :>> (PS: When i use NOALIGN , the program abends at execution ...)
:>> :>>
:>> :>> As i learn assembler "on the flight" , there is some important things
:>> that
:>> :>> i don' t understand , such as the alignment .... This is something we
:>> don't
:>> :>> care in cobol , rexx .... Can you tell me why assembler has the
:>> alignment
:>> :>> in words that are easy to understand and visualize in my little head ?
:>> :>>
:>> :>> Thank you again.
:>> :>> Duc
:>> :>>
:>> :>> ----------------------------------------------------------------------
:>> :>> For IBM-MAIN subscribe / signoff / archive access instructions,
:>> :>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
:>> :>>
:>> :>
:>> :>----------------------------------------------------------------------
:>> :>For IBM-MAIN subscribe / signoff / archive access instructions,
:>> :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
:>>
:>> --
:>> Binyamin Dissen <bdis...@dissensoftware.com>
:>> http://www.dissensoftware.com
:>>
:>> Director, Dissen Software, Bar & Grill - Israel
:>>
:>>
:>> Should you use the mailblocks package and expect a response from me,
:>> you should preauthorize the dissensoftware.com domain.
:>>
:>> I very rarely bother responding to challenge/response systems,
:>> especially those from irresponsible companies.
:>>
:>> ----------------------------------------------------------------------
:>> For IBM-MAIN subscribe / signoff / archive access instructions,
:>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
:>>
:>
:>----------------------------------------------------------------------
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
--
Binyamin Dissen <bdis...@dissensoftware.com>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
