On Thu, Jan 4, 2024 at 09:36 AM, Doug Wegscheid wrote:
Prof. Ferland, would you be willing to post your complete job(s)?
Here it is:
* $$ JOB JNM=HELLO,CLASS=0,DISP=D
* $$ LST CLASS=A,DISP=D,JSEP=0
// JOB HELLO
// OPTION LINK
// EXEC ASSEMBLY
? ? ? ? ?PRINT NOGEN
HELLO? ? START 0
BEGIN? ? BALR? 3,0
? ? ? ? ?USING *,3
? ? ? ? ?OPEN? PRINTER
? ? ? ? ?PUT? ?PRINTER,MESSAGE?
? ? ? ? ?CLOSE PRINTER
? ? ? ? ?EOJ
PRINTER? DTFPR DEVADDR=SYSLST,IOAREA1=MESSAGE
MESSAGE? DC? ? CL121'Hello, World!'
? ? ? ? ?LTORG
? ? ? ? ?END? ?BEGIN
/*
// EXEC LNKEDT
// EXEC
/&
* $$ EOJ
This job uses one IOAREA. My original job with two IOAREAs and ASA is in the first message of this thread,
but you need to assemble module IJDFAZIW for it to work. I did that back then in 2020, but I forgot how. :-/
Cheers,
René FERLAND, Montreal
René Ferland