REXX program skips an input record

[Pedro]

"ALLOC F(BINDEXMP) DA("IN_BIND_DSN") MOD REUSE"

At the point where you do execio, try adding a SAY statement to confirm it is using the same data set that you think it is using.

Code: Select all

SAY 'in_bind_dsn'  IN_BIND_DSN

In line 78, try changing the '+' to '-'. It does not make sense to me, but that stands out as a difference.

update: there is logic based on the '+' sign in the PACK_LIST_LOGIC routine.

[collinsm]

re: "calling the code 'terrible' "

My mistake. I have since only posted partial code.

[collinsm]

Concerning what Pedro said at 4:06pm
At the point where you do execio, try adding a SAY statement to confirm it is using the same data set that you think it is using.

It is using the model JCL, even though it exists in the exception library. A message is even displayed saying that it is using the exception JCL. I will look into this.

[collinsm]

The REXX has been using the wrong member, the model instead of the element. Thanks to everyone.