Hi Jonathan,
If you specify a Code Name for your Inline Code statement then the logic written in the Code section will be placed in a separate paragraph. That paragraph will be named whatever you specified in the Code Name field, but the logic will not be executed at that point. To actually execute that paragraph, you would need to add a second Inline Code statement that contained logic to PERFORM that paragraph. This second Inline Code statement needs to be placed in the PAD logic wherever you want the actual execution to occur.
So, for example, if your first Inline Code statement was given a Code Name of 1100-PACK-3-BYTES, all the logic in the Code section would be contained in the 1100-PACK-3-BYTES paragraph. You would then need to add a second Inline Code statement (without a Code Name) that contains the following line:
PERFORM 1100-PACK-3-BYTES THRU 1100-PACK-3-BYTES-EXIT.
Does this answer your question?
Thanks,
Clay
Original Message:
Sent: 02-24-2021 05:58 PM
From: Jonathan Hardy
Subject: Re: Looking for inline coding examples
hi Amit,
is there any way of encoding a paragraph within the code section. I've tried this, but unable to get an text into area-A.
I get a compiler error (as expected):
==001070==> IGYPS2010-E Procedure-name "1100-PACK-3-BYTES" was found in area "B" followed by a
period or section. The procedure-name was processed as if found in area "A".
Jonathan
Original Message:
Sent: 04-30-2019 02:30 PM
From: Amit Dwivedi
Subject: Re: Looking for inline coding examples
Hi S_Pickett
totally missed your question but just in case you are still looking for it...please see the example as attached pic.
Regards,
Amit