On Wed, 17 Aug 2005 07:40:58 -0500, Chase, John <[EMAIL PROTECTED]> wrote:

>> -----Original Message-----
>> From: IBM Mainframe Discussion List On Behalf Of Capomaestro
>>
>> [ snip ]
>>
>> If CICS (KCP, which would make the assembler code "main",
>> right?) detects that a module is not command level then R1
>> does not point at a parameter list (DFHCOMMAREA) neither does
>> R13 point to a savearea (ASRA/S0C4, you say potato and I say
>> potato). Therefore the stub is *required* under CICS and
>> harmless in batch.
>>
>> YMMV (but I am sceptical).
>
>When you resolve the issue, please update us with the diagnosis and "cure".
>I personally would be interested in learning how I've "gotten away with"
>doing things "wrong" all these years.
>
>    -jc-
>
>----------------------------------------------------------------------
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
>Search the archives at http://bama.ua.edu/archives/ibm-main.html

    ------     ----------   ---------------------------
    |CICS| --> |MYASMBLR|   |R1 --> ???|...|R13 -> ???|
    ------     ----------   ---------------------------
    ------     ----------
    |INIT| -|  |DFHEAI  |
    ------  |  ----------   ---------------------------
            -> |MYASMBLR|   |R1 --> EIB|...|R13 -> S/A|
               ----------   ---------------------------
    ------     ----------
    |CICS| -|  |DFHEAI  |
    ------  |  ----------   ---------------------------
            -> |MYASMBLR|   |R1 --> EIB|...|R13 -> S/A|
               ----------   ---------------------------

...and after all that, this behaviour is observed under TS3.1 .

Have you non-command level, non-preprocessed assembler modules gaining
control directly from CICS? The first example experiences a S0C4 on a STM.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to