Re: Help with QFMTSRC

 
If you only wish to add the warehouse code at the end of the present record
then change the FNC to FDC and it should work just fine. 
FNC 41 41 WAREHOUSE CODE   to
FDC 41 41 WAREHOUSE CODE 
 
----------------------------------------------------------
 
If you wish to sort with warehouse code too, you will want to:
Copy your new line up following the FNU line.  (The FD lines are the Data
you are writing to the output file)
You also have to change the 6A to 7A in the H line
 
FNU = FieldNormalsortUnpacked
FNC = FieldNormalsortCharacter
FDU = FieldDataoutputUnpacked
FDP = FieldDataoutputPacked
 
--------------------------------------------------------
Booth Martin   http://www.MartinVT.com
Booth@xxxxxxxxxxxx
---------------------------------------------------------
 
-------Original Message-------
 
From: RPG programming on the AS400 / iSeries
Date: Wednesday, February 26, 2003 16:10:29
To: RPG400-L@xxxxxxxxxxxx
Subject: Help with QFMTSRC
 
I am using the old QFMTSRC and am having a problem adding another field to
the existing source. 
 
*************** Beginning of data ************************************
HFILE 6A 
O C 1 1EQCX 
I 
FNU 8 13 INVOICE NO 
FDU 25 26 SALESPERSON NO 
FDU 30 31 INVOICE MONTH 
FDP 36 39 CREDIT AMOUNT 
FNC 41 41 WAREHOUSE CODE 
 
The existing data ends with CREDIT AMOUNT, and I am adding WAREHOUSE CODE.
Can anyone tell me what the letters to the left mean? FNU / FDU / etc. The
warehouse code is a character field. I don't necessarily want this to be
part of the sort, but just included into the file which is used as a primary
file in the RPG. Any help would be gratefully appreciated.
 
Sue Niccum