linear-main procedure

Hello,

I'm just getting my hands dirty with message handling and have come to a point I cannot explain to myself. I got a program with a procedure. The procedure produces an escape message and the message goes up in the stack. I'm calling the program from the command line and am getting the error message displayed with the entry line for the response. Everything ok so far. (cycle program)

Now if I change the program to use a linear-main procedure (V6R1 - new H-spec main) I see the error message but it seems that it is already handled (at the control boundary? = the ILE program, I am calling from QCMD = OPM) and I don't have to give a response.

Why is that so? I would have expected the program to behave in the same way.

Code:
D proc1 PR

P main B
/free
proc1();
/end-free
P E

P proc1 B
D ptr S *
D x S 10I 0 based(ptr)
/free
x = 10; // generates an escape message because no memory has been allocated
/end-free
P E

Thanx in advance.

Regards

Mihael Schmidt
Anwendungsentwicklung

Dirk Rossmann GmbH
Iserhägener Str.16
30938 Burgwedel
* +49 (05139) 898 - 4353

Handelsregister-Nr. HRB 120546, Amtsgericht Hannover
Ust-Id-Nr. DE 115055186
St.-Nr. 16 / 205 / 65401
Geschäftsführer: Dirk Roßmann, Alice Schardt-Roßmann, Roland Frobel, Klaus Praus