Re: COBOL issue

2021-10-01 Thread Massimo Biancucci
Bernd, forget it ! :D Your code works on my zOS. Best regards. Il giorno ven 1 ott 2021 alle ore 17:55 Bernd Oppolzer < bernd.oppol...@t-online.de> ha scritto: > Many thanks to all who responded and especially to Peter for posting > this piece of ASSEMBLER > which solves the problem. > > I am

Re: COBOL issue

2021-10-01 Thread Bernd Oppolzer
Many thanks to all who responded and especially to Peter for posting this piece of ASSEMBLER which solves the problem. I am very impressed by the helpfulness of this mailing list, which I experienced this time again and many times before. @Max: the code that you provided unfortunately does

Re: COBOL issue

2021-10-01 Thread Massimo Biancucci
I'm sorry, I'm not at a terminal so my idea had not been proven. Il giorno ven 1 ott 2021 alle ore 17:46 Massimo Biancucci ha scritto: > Bernd, > > AFAIK the SET ADDRESS OF is to set a pointer to address a piece of storage. > This is why Cobol doesn't you allow to do such a command. > > If you

Re: COBOL issue

2021-10-01 Thread Massimo Biancucci
Bernd, AFAIK the SET ADDRESS OF is to set a pointer to address a piece of storage. This is why Cobol doesn't you allow to do such a command. If you want to "grab" the ADDRESS OF your working storage variable, you should define a POINTER in LINKAGE then set it to the value and then move it to

Re: COBOL issue

2021-10-01 Thread Tony Thigpen
Also, it's in the back of my mind that you can set a pointer to a '01' level, but only a '01' level. But, I work across all platforms and I may be thinking z/OS. If you are not using the SET ADDRESS against an '01' level, give it a try. Tony Thigpen Tony Thigpen wrote on 10/1/21 10:57 AM:

Re: COBOL issue

2021-10-01 Thread Tony Thigpen
Grab my small assembler program to do this: http://dinomasters.com/coolstuff/bsttezsp.txt Tony Thigpen Bernd Oppolzer wrote on 10/1/21 10:27 AM: Sorry, forgot to mention: I'm on VSE, the Compiler release is COBOL for VSE/ESA 1.1.1; this Compiler definitely only allows items from the Linkage

Re: COBOL issue

2021-10-01 Thread Farley, Peter x23353
Discussion List On Behalf Of Bernd Oppolzer Sent: Friday, October 1, 2021 10:27 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: COBOL issue Sorry, forgot to mention: I'm on VSE, the Compiler release is COBOL for VSE/ESA 1.1.1; this Compiler definitely only allows items from the Linkage Section. Ni

Re: COBOL issue

2021-10-01 Thread Bernd Oppolzer
Sorry, forgot to mention: I'm on VSE, the Compiler release is COBOL for VSE/ESA 1.1.1; this Compiler definitely only allows items from the Linkage Section. Nice to know about later version on other OSes. So there is no danger in applying an ASSEMBLER workaround and probably no other (simple and

Re: COBOL issue

2021-10-01 Thread Joe Monk
Depends on the release of the COBOL compiler. Later releases support working-storage items, earlier releases only allow linkage items. Joe On Fri, Oct 1, 2021 at 8:50 AM Bernd Oppolzer wrote: > Probably asking a COBOL question for the first time :-) > > I am thinking about writing a general

COBOL issue

2021-10-01 Thread Bernd Oppolzer
Probably asking a COBOL question for the first time :-) I am thinking about writing a general sub-program using COBOL which does several different computations, each of them needing different input and output data of different size. Because this should work with Batch and CICS, I am thinking