Bob,
Thanks for your response.  I looked at the BLSQMDEF macro, and I have the
CBLEN field coded, and looking at the expansion, I see the length being
generated at offset x'18' into the area generated by the CBLEN field, but as
you say if I issue a LEN value on the CBF command, then I get the full
amount of data dumped out.  I know have a couple of models that this happens
with, but not all of them, so it has me confused.  Any other ideas?
Thanks,
Wayne Driscoll
Product Developer
Western Metal Supply
NOTE: All opinions are strictly my own.
  

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Robert Wright
Sent: Friday, December 30, 2005 4:34 PM
To: [email protected]
Subject: Re: IPCS Format Models

Wayne Driscoll wrote on 12/30/2005 01:06:35 PM:

> I am starting to write IPCS format models for a number of our internal 
> control blocks, but I am having problems with one of them.  For one of
the
> models, I always get just the first 4 bytes (the eyecatcher) 
> formatted, followed by message "Control block is truncated", however 
> if I do an "IP LIST addr LEN(64)" I see the entire control block in 
> storage.  The
entries
> in parmlib(blscuser) are there for all the models, they are all in the
same
> load module, separate csects with aliases defined.  If I look at the
model
> load module, everything looks good, but I have no idea on how to 
> diagnose the "Control block is truncated" message.

It sounds like you forgot to supply a CBLEN equal in length to that block.
If you refer to the block by its structure name and don't have a scan
routine, IPCS will try to access the model to determine the eyecatcher and
length for that type of data.  If the acronym isn't defined to allow minimal
validation of the block or the CBLEN is zero, the model won't be used to
define the length of the block.  The current SETDEF LENGTH value will be
used, and that, in turn, defaults to 4.  That sets the stage for the
following to occur:

1.  The model processor retrieves the portion of the block of interest, 4
bytes in this case.

2.  All of the BLSQMFLD macros are processed to see which fields you might
like to have formatted.  If any of them lies outside the portion of the
block that was retrieved and the model processor has not been told to be
silent about the situation, one complaint about control block truncation
will emerge.

Bob Wright - MVS Service Aids

----------------------------------------------------------------------
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

----------------------------------------------------------------------
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