RE: How to place null characters in a record

It sounds like you are looking for null terminated strings (using the
BIF %STR). However that might not completely cover your needs. On first
sight it looks you need to pre-fill the field with *ALL(x'00') and use
the %STR BIF (perhaps with a %SUBST) to fill the field.

Might be enough, might not be.

Cor

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx 
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of PAPWORTH Paul
Sent: dinsdag 12 december 2006 10:38
To: rpg400-l@xxxxxxxxxxxx
Subject: How to place null characters in a record 

We have a file which is 4000 bytes long and contains just one 
field (X(4000)). I would appreciate any suggestions  for how 
to place null characters (Hex '00') in all the unused bytes 
after the data. Ideally in RPG but Cobol would be ok.  

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) 
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx 
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives 
at http://archive.midrange.com/rpg400-l.

This e-mail and any attachment is for authorised use by the intended 
recipient(s) only. It may contain proprietary material, confidential 
information and/or be subject to legal privilege. It should not be copied, 
disclosed to, retained or used by, any other party. If you are not an intended 
recipient then please promptly delete this e-mail and any attachment and all 
copies and inform the sender. Thank you.