RE: Trying to read a Spool file

hi
   you can fist create the file with record length 132 with name splf


 PGM                                                                   
                                                                       
              CPYSPLF    FILE(SQLUPDATE) TOFILE(sreelib/SPLF) +      
                           JOB(561670/sree/QPADEV002P)              
                                                                       
              CALL       PGM(sreeLIB/SPLRPG)                         
 ENDPGM                                                                



FSPLF      IF   E             Disk    rename(splf:splfR)                
F                                     prefix(A_)                        
DWrk_subsr        S             10A                                     
 *                                                                      
C                   Read      SplfR                                  90 
C                   Eval      Wrk_subsr = %subst(A_splf:1:10)           
C     Wrk_subsr     Dsply                                               
 *                                                                      
C                   Eval      *InLr = *On                               



output :
________

DSPLY   5722WDS V 



With regards
MSG

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Banerjee, Amitava
Sent: Wednesday, April 12, 2006 12:04 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Trying to read a Spool file


Hi 
I am trying to read a spool file in RPG. Before RPG, I have written a CL
program where I am creating a physical file (YYYY) by CRTPF and then
doing CPYSPLF the spool to this physical file. And then reading the
physical file in RPG.

The CPYSPLF command:

CPYSPLF FILE(XXXX) TOFILE(LIBR01/YYYY) JOB(417971/USR01/JOB01)
CTLCHAR(*PRTCTL)



But in CL, when doing CPYSPLF, I am getting an error message "File XXXX
number 6 cannot be displayed, copied, or sent". And the error code is 5.
Below is the description of the error:

    5 - The file has a page definition specified.

Recovery  . . . :   If the data format (DTAFMT) parameter is specified
as
  *RCDDATA on the Send Network Spooled File (SNDNETSPLF) command, try

  specifying *ALLDATA as the value for the DTAFMT parameter.


I have tried other CTLCHAR parameter values, but I am getting the same
problem.

Please help.


Thank you,
Amitava
 
--------------------------------------------------------

This message (including any attachments) is only for the use of the
person(s) for whom it is intended. It may contain Mattel confidential,
proprietary and/or trade secret information. If you are not the intended
recipient, you should not copy, distribute or use this information for any
purpose, and you should delete this message and inform the sender
immediately.