CPYFRMIMPF only copies first field of each record
CPYFRMIMPF FROMSTMF('/qdls/edenimpt/pymanded.ttx') TOFILE(BETTY/E941) MBR
OPT(*ADD) FROMCCSID(37) RCDDLM(*CRLF) STRDLM('"') FLDDLM(',') RPLNULLVAL(
*FLDDFT)
This is the dds for E941:
A R PR941R
A EDEMP# 8
A LNAME 13
A FNAME 16
A GROSSPAY 12S 2
A NETPAY 12S 2
A FWTDED 12S 2
A MEDDED 12S 2
A SOCDED 12S 2
A WCBEN 12S 2



