How is FldA populated? Maybe what you are populating FldA from is what you need to check.
You could always do something like this on FldA.
D x S 10I 0
x = %len(%trimr(FldA));
if (%subst(FldA:x:1) = x'00');
x = x - 1;
FldB = %subst(FldA:1:x);
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jeff Young
Sent: Thursday, April 05, 2012 12:05 PM
Subject: Move variable length field to fixed length
I have a variable length field that I am moving to a fixed length field.
The fields are defined as:
D FldA S 128A Varying
D FldB S 30A
FldA = AB1234
My code is:
FldB = FldA;
After the move, FldB has a trailing NULL character.
When I look at it in DEBUG, I see 'C1C2F1F2F3F40040404040.....' for FldB.
FldA = 'C1C2F1F2F3F400000000..........................'
Why am I getting the trailing NULL and how can I prevent it.
Sr. Programmer Analyst
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l