Title: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.
 -----Mensaje original-----
[Cristina V�zquez Osorio] 
Yo Compilo con 14 desde el pdm, �como saber si es eso?
 
De: Jos� S�nchez [mailto:[EMAIL PROTECTED]]
Enviado el: jueves 17 de octubre de 2002 13:30
Para: [EMAIL PROTECTED]
Asunto: Re: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.

Cristina, si compilas en Batch yo diria que la qtemp no es la misma ya que es otro trabajo.�puede ser eso?
 
Saludos.
----- Original Message -----
Sent: Thursday, October 17, 2002 1:11 PM
Subject: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.

   PGM        PARM(&P41 &P42)                            
   DCL        VAR(&RFLX) TYPE(*CHAR) LEN(10)             
   DCL        VAR(&P41) TYPE(*CHAR) LEN(8)               
   DCL        VAR(&P42) TYPE(*CHAR) LEN(8)               
   DCLF       FILE(QTEMP/WWPISINF)                       
   MONMSG     MSGID(CPF0000)                             
   DLTF       FILE(QTEMP/WWPISINF)                       
   MONMSG     MSGID(CPF0000)                             
   DSPFD      FILE(&P42/&P41) TYPE(*RCDFMT) +            
                OUTPUT(*OUTFILE) OUTFILE(QTEMP/WWPISINF) 
   MONMSG     MSGID(CPF0000)                             
   RCVF                                                  
   CHGVAR     VAR(&RFLX) VALUE(&RFLEN) 
          MONMSG     MSGID(CPF0000)                              
    DLTF       FILE(QTEMP/WWPISINF)                        
    MONMSG     MSGID(CPF0000)                              
    DSPFD      FILE(&P42/&P41) TYPE(*RCDFMT) +             
                 OUTPUT(*OUTFILE) OUTFILE(QTEMP/WWPISINF)  
    MONMSG     MSGID(CPF0000)                              
    RCVF                                                   
    CHGVAR     VAR(&RFLX) VALUE(&RFLEN)                    
    CHGDTAARA  DTAARA(*LDA (1 10)) VALUE(&RFLX)            
    ENDPGM                                                 
********* Fin de datos *************************************    
Este es mi programita, pues bien donde esta la qtemp si pongo qs36f, todo va perfectamente teniendo en cuenta que antes de compilar el programa debo crear manualmente el fichero llamado wwpisinf con dspfd.

En cuanto cambio la biblioteca y pongo la qtemp me dice que no encuentra el archivo wwpisinf (cuando estoy compilando), y estoy haciendo lo mismo que cuando ponia la qs36f. �porque?....el archivo s� est� en la qtemp, Alguien sabe por que????

En el parametro p42 y p41, viene el nombre del archivo y biblioteca del que quiero obtener informacion de long.de registro.

Gcs, de nuevo a todos.
SAludos.
Cris.  

Responder a