o si quieres que te cuando no encuentre un registro en el archivo noms4260 
correspondiente al registro en el rapadr no actualice este registro entonces 
seria asi:

update mylib/rapadr set pdfprp= (select claus from
mylib/noms4260 where avnrrp=avnr03 and instrp=inst03)
where idnrrp like '%4260' and exists (select * from
mylib/noms4260 where avnrrp=avnr03 and instrp=inst03)

Probablemente te de el error precisamente porque no encuentra un registro 
correspondiente.

Atentamente,

Bernabé Estrada







----- Original Message ----- 
From: "Carlos Augusto Correa García" <[EMAIL PROTECTED]>
To: "forum.help400" <[email protected]>
Sent: Wednesday, January 24, 2007 7:52 AM
Subject: Re: update en sql.


> Hola Oriol
> Prueba con esto:
> 
> *update mylib/rapadr set pdfprp= coalesce((select clauas from  *
> 
> *mylib/noms4260 where avnrrp=avnr03 and instrp=inst03),'XXXXXXXXXX')*
> 
> *where idnrrp like '%4260'      *
> (Asegurate de guadar un backup antes)
> Luego buscas los registros en MYLIB/RAPADR donde PDFPRP sea igual a 
> 'XXXXXXXXX'
> De seguro que para ese (o estos)  registro(s) no existe  un equivalente 
> en el archivo MYLIB/NOMS4260
> por lo tanto retorna nulo.
> De ser así la sentencia anterior era solo para ubicar donde se genera el 
> error,
> (si has ejecutado lo anterior restaura los datos originales)
> Luego la sentencia correcta es:
> 
> *
> update mylib/rapadr set pdfprp= coalesce((select clauas from  *
> 
> *mylib/noms4260 where avnrrp=avnr03 and instrp=inst03),** pdfprp**)*
> 
> *where idnrrp like '%4260'      *
> 
> Saludos desde Piura - Perú
> 
> ------------------------------------
> Carlos Augusto Correa García
> Area de Sistemas - Desarrollo
> Piura - Perú
> 
> Oriol Pegueroles Cases escribió:
> 
>> Buenas tardes,
>>
>>  
>>
>> Tengo un problema con la actualizacion de los datos del fichero 
>> mylib/rapadr cuya descripcion os adjunto.
>>
>>  
>>
>> Campo              Archivo            Biblioteca      
>> Tipo                    long. Nulos
>>
>> *INSTRP            RAPADR           MYLIB           
>> DECIMAL                   3           3   *
>>
>> *AVNRRP          RAPADR           MYLIB           
>> DECIMAL                   8           3   *
>>
>> *LNNRRP          RAPADR           MYLIB           
>> DECIMAL                   3           3   *
>>
>> MAILRP            RAPADR            MYLIB           
>> CHARACTER               128        3
>>
>> PDFPRP            RAPADR            MYLIB           
>> CHARACTER                20         3
>>
>>  
>>
>> *En negrita campos clave.
>>
>>  
>>
>> Debo actualizar el valor de PDFPRP de acuerdo con los valores del 
>> fichero mylib/noms4260
>>
>>  
>>
>> *INST03             NOMS4260           MYLIB           
>> DECIMAL                  3         3 *
>>
>> *AVNR03           NOMS4260           MYLIB      
>>     DECIMAL                   8        3 *
>>
>> CLAUAS           NOMS4260           MYLIB      
>>     CHARACTER               20        3
>>
>> ADNR03            NOMS4260           MYLIB         
>>  DECIMAL                     7         3
>>
>>  
>>
>> En este segundo fichero, el campo CLAUAS siempre tiene valor (he 
>> dejado un solo registro con todos los datos), sin embargo, al ejecutar
>>
>>  
>>
>> *update mylib/rapadr set pdfprp= (select clauas from  *
>>
>> *mylib/noms4260 where avnrrp=avnr03 and instrp=inst03)*
>>
>> *where idnrrp like '%4260'            *
>>
>>  
>>
>> me da     *Valores nulos no permitidos en la columna o variable 
>> PDFPRP*.           
>>
>>  
>>
>> Os adjunto descripcion del campo CLAUAS   y                     PDFPRP
>>
>>  
>>
>> Campo . . . . . . . . . :   CLAUAS          
>>                                    PDFPRP
>>
>> FOR Campo . . . . . . . :                  
>>
>> Tipo  . . . . . . . . . .   CHARACTER       
>>                                  CHARACTER
>>
>>   Biblioteca  . . . . . .                  
>>
>> Longitud  . . . . . . . .            20      
>>                                                       20
>>
>> Escala  . . . . . . . . .                  
>>
>> Nulos . . . . . . . . . .   3             
>>                                                3           
>>
>>                                            
>>
>> Datos . . . . . . . . . .   4               
>>                                              4
>>
>>                                            
>>
>> Asignar . . . . . . . . .                  
>>
>> CCSID . . . . . . . . . .   284             
>>                                           500
>>
>>                                             
>>
>> Valor por omisión . . . .                  
>>
>>   
>>
>> También he cambiado el CCSID por si venia de ahi el problema, pero 
>> sigue dandome el mismo error.
>>
>>     
>>
>> Gracias de antemano por vuestra ayuda,
>>
>>  
>>
>>  
>>
>>  
>>
>>
>> -- 
>> Este mensaje ha sido analizado por *MailScanner* 
>> <http://www.mailscanner.info/>
>> en busca de virus y otros contenidos peligrosos,
>> y se considera que está limpio.
>> MailScanner agradece a transtec Computers <http://www.transtec.co.uk/> 
>> por su apoyo.
>>
>>------------------------------------------------------------------------
>>
>>__________________________________________________
>>Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
>>&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
>>http://www.help400.es
>>_____________________________________________________
>>
>>Para darte de baja visita la siguente URL:
>>http://listas.combios.es/mailman/listinfo/forum.help400
>>
> 
> -- 
> Este mensaje ha sido analizado por MailScanner
> en busca de virus y otros contenidos peligrosos,
> y se considera que está limpio.
> For all your IT requirements visit: http://www.transtec.co.uk
> 
> __________________________________________________
> Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
> &amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
> 
> Para darte de baja visita la siguente URL:
> http://listas.combios.es/mailman/listinfo/forum.help400
__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a