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

