Re: MIDRANGE-L Digest, Vol 7, Issue 138

"I am working on a project where we will be sending data to a banking
institution (which shall remain unnamed). The bank's systems apparently
require that the first record in the file they receive must contain column
headings!

Anybody know of a way to accomplish this without having to do RPG
programming? The client wants to avoid using programs wherever possible."

I do this a lot, you have to create a text file with the headings in it
with a text editor, and copy the file over. Here's the CL to do it.

RMVLNK OBJLNK('/BONEYARD.CSV')
MONMSG MSGID(CPFA0A9)
CPY OBJ('/BONEYARDHDG.CSV') TOOBJ('/BONEYARD.CSV')

CPYTOIMPF FROMFILE(BONEYARD) TOSTMF('/BONEYARD.CSV') +
MBROPT(*ADD) RCDDLM(*CR)


The BONEYARDHDG.CSB looks like:

************Beginning of data**************
BONEYARD,Units currently in the Boneyard
Item#,Item Description,Qty
************End of Data********************

This is a very basic example, and provides a two line header for a
spreadsheet with 3 columns. Use the EDTF command to create the heading
file.


Dale Gindlesperger
IT Manager/Special Projects Leader
Fleetwood Folding Trailers, Inc.
258 Beacon Street
Somerset, PA 15501