Re: Trailing Blanks with CPYTOIMPF v5r1

["Bill Hopkins" <BHopkins@xxxxxxxxxxxxxxxxxxx>]

Does anyone have this working on v5r1? 
Up to this point it seems all responses are from people on v5v2.


I changed my PF to be Number 60 A VARLEN(15) and Name 60A VARLEN(40) and 
ran CPYTOIMPF twice. 

Both with *PCASCII and *DLM 

All fields were Eval %trim in RPGIV even literals that did not need it 
like 'Customer Number' 

First with STRDLM as " , it did as I thought and used all 60A including 
blanks because of " around both fields.

Second with STRDLM as *NONE first field 'Customer Number' used all 60A 
(not what I wanted, still had trailing blanks)
But second field 'Customer Name' used only the 40A like I wanted and 
expected (with no trailing blanks after 40A and *CR).

*** Note1 Did check fields to see if they where blanks. Hex option in DBU 
and WRKF

*** Note2 When run on files with more than two fields with all of the 
above same as listed here still only the last field gets handled 
correctly.   All fields except last have trailing blanks to 60A and all 
have been %trim into VARLEN field.

*** Note3 Also change not to have 'allocation length' on VARLEN in file. 
Results the same as first field Number but *CR was at end of last 
field/record with no blanks. Even better and what I expected but still 
fixed 60A with trailing blanks on all fields but last. :(

This is where I have my question.

Why only the last field of file not first or others? My thought is because 
it is the end of record and *CR took over.



Thanks 
Bill Hopkins

Question, Comments, or "Knocks in the Head"  welcomed!