Hola, en la hoja F falta poner la longitud de la clave y donde empieza. saludos
Elvira Jurado Leiva - Dpto. Informática Tlf.: 914791512 (ext.165) - Fax: 914631790 [email protected] - www.f-soria.es AVISO DE CONFIDENCIALIDAD La información contenida en este mensaje y archivos adjuntos es privada, confidencial y de uso exclusivo de la(s) persona(s) y entidad(es) a la(s) que va dirigido. Si Ud. no es el destinatario de esta información se le notifica que está expresamente prohibida la declaración, reproducción, distribución o la toma de cualquier acción basada en el contenido de esta comunicación. Si ha recibido este mensaje por error, le rogamos que nos lo comunique inmediatamente y proceda a eliminarlo de todos sus sistemas. Francisco Soria Melguizo, S.A. no asume responsabilidad legal por el contenido de esta comunicación, ni representa la opinión de la firma, salvo que expresamente se especifique lo contrario y que el remitente esté autorizado para hacerlo. Gracias. De: Juan Gutierrez Ruiz <[email protected]> Para: "forum.help400" <[email protected]>, "[email protected]" <[email protected]>, Fecha: 12/02/2015 16:22 Asunto: Accesar con CHAIN a un archivo definido por programa Enviado por: [email protected] Buenos Días Foro estos tratando de acceder con un chain a un archivo definido por programa el archivo tiene una longitud de registro 400 y la claves es de 3 caracteres alfabéticos el archivo es MFUSCC es un archivo de clientes donde las 3 primeras posiciones es de 3 caracteres alfabéticas y el resto la razón social y demás, este fue credo en un ambiente 36 el problema es que al darle chain con el dato de entrada de 3 caracteres el compilador me manda error *RNF7055 30 1 El Factor 1 no es válido para la operación especificada. Causa . . . . . : El operando de Factor 1 no es válido para la operación especificada. -- Para el proceso de número de registro relativo, el operando de Factor 1 debe ser numérico con cero posiciones decimales. -- Para el acceso aleatorio por clave, el operando de Factor 1 debe ser compatible con el tipo de dirección de registro (posición 34 de la especificación de Archivo) del archivo. La especificación se pasa por alto. Recuperación . : Corrija la definición del operando de Factor 1. Vuelva a compilar. * * F I N D E R E S U M E N D E M E N S A J E S * * estos compilando en un RPGILE la tabla CONDATOS es igual, sin embargo este lo leo secuencialmente sin problema pero al archivo MFUSCC al encadenarlo me manda error alguien me puede echar una mano ?? gracias FCONDATOSX IF F 43 DISK FMFUSCC IF F 400 3AI 1 DISK FLCLIEN1 UF A E K DISK FLPOLDDS1 O A E K DISK * ICONDATOSX NS 01 I P 1 3 0LLAVE I 5 5 MA I 6 11 0NUMAUX I 12 17 0FECHA I 18 18 0CP I 19 23 0NP I P 24 31 2IMP I 32 32 CA IMFUSCC XX 02 1 CC I 1 3 CLIENTE I 4 45 NOMBRE I 46 400 DEMAS C* ============================================================== C* | RECEPCION Y MANEJO DE PARAMETROS. DEF. DE CAMPOS DE TRAB. | C* ============================================================== C *ENTRY PLIST C PARM WCTE 3 C* ============================================================== C* | B L O Q U E P R I N C I P A L D E L P R O G R A M A | C* ============================================================== C EXSR SRDATOS C EXSR SRCLIEN C EVAL *INLR = *ON C* ============================================================== C* | SRDATOS: Genera DDS TPOLDD de COMDATOSX | C* ============================================================== C SRDATOS BEGSR C READ CONDATOSX 80 C DOW *IN80 = *off C* MOVEL 'YYY' CLIECVE C MOVEL WCTE CLIECVE C Z-ADD LLAVE POLAIDD C Z-ADD LLAVE POLAIDD C Z-ADD NUMAUX POLAAUX C Z-ADD FECHA POLAFEC C Z-ADD CP POLACLP C Z-ADD NP POLANUP C Z-ADD IMP POLAIMP C MOVEL CA POLAMOV C WRITE TPOLDDSF C READ CONDATOSX 80 C ENDDO C ENDSR C* ============================================================== C* | SRCLIEN : CREA EL REGISRO DEL CLIENTE DE MFUSCC A TCLIEN | C* ============================================================== C SRCLIEN BEGSR C WCTE CHAIN MFUSCC 99 C IF *IN99 = *OFF C WCTE CHAIN TCLIENF C IF %FOUND C MOVEL CLIENTE CLIECVE C MOVEL NOMBRE CLIERAZ C WRITE TCLIENF C ENDIF C ENDIF C ENDSR Archivo . . . . : QPDSPFD Control . . . . . +1 Buscar. . . . . . *...+....1....+....2....+....3....+....4....+....5....+....6....+....7.. Vía de acceso . . . . . . . . . . . . . . . : Por clave Tamaño de vía de acceso . . . . . . . . . . : ACCPTHSIZ *MAX4GB Longitud máxima de clave. . . . . . . . . . : 3 Longitud máxima de registro . . . . . . . . : 400 Volátil . . . . . . . . . . . . . . . . . . : No Archivo actualmente registrándose por diario: No Descripción de Vía de Acceso Mantenimiento vía de acceso . . . . . . . . : MAINT *IMMED Valores claves exclusivas requeridos. . . . : UNIQUE Sí Vía de acceso registrada por diario . . . . : No Vía de acceso . . . . . . . . . . . . . . . : Por clave Tipo de Restricción . . . . . . . . . . . . : NONE Número de campos de clave . . . . . . . . . : 1 Formato de registro . . . . . . . . . . . . . : MFUSCCXX Campo de clave . . . . . . . . . . . . . . . : K00001 Secuencia . . . . . . . . . . . . . . . : Ascendente Signo especificado. . . . . . . . . . . : UNSIGNED Zona/dígito especificado. . . . . . . . : *NONE Orden de clasificación alternativo . . : No Lista de Formatos de Registro Regist Identificador Formato Campos Longit Identificador MFUSCCXX 2 400 3141689B15D70 Texto . . . . . . . . . . . . . . . . . . : Número total de formatos . . . . . . . . . . : 1 Número total de campos . . . . . . . . . . . : 2 Longitud total de registro . . . . . . . . . : 400 Lista de Miembros ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
