RE: CPF5035 Null?

["DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>]

Any possibility that MA26365 could be the culprit?

APAR#: MA26365
Component: 9400DG3DB - AS/400 VERTICAL MICROCODE V210
Release(s): R510, R520

Abstract
OSP-DB-F/USRPGM-MSGCPD4001-T/USRPGM MSGCPD4001 F/USRPGM


Error Description
Inserting a record into a file while a query over the same file
is still displayed on the client can cause data mapping errors
MSGCPF5097 f/qdbsigex t/qdbsigex, MSGCPD4001 f/usrpgm t/usrpgm
showing . . . key mapping of member *N file *N in library *N,
MSGCPF5035 f/usrpgm t/usrpgm. Once the query display is closed,
then the insert will work.

Problem Summary
**************************************************************
* PROBLEM: (MA26365) Licensed Program = 5722999              *
*          Usability of a Product's MAJOR Function           *
**************************************************************
* USERS AFFECTED: All OS/400 users.                          *
**************************************************************
* RECOMMENDATION: Apply LIC PTF MF29787 for 510.             *
*                 Apply LIC PTF MF29854 for 520.             *
**************************************************************
Inserting a record into a file while a query over the same file
is still displayed on the client can cause data mapping errors
MSGCPF5097 f/qdbsigex t/qdbsigex, MSGCPD4001 f/usrpgm t/usrpgm
showing . . . key mapping of member *N file *N in library *N,
MSGCPF5035 f/usrpgm t/usrpgm.  Once the query display is closed,
then the insert will work.

Problem Conclusion
The insert is causing index maintenance to occur.  The mapping
error occurs during index maintenance.  In this case, the field
on which the error occurs is not significant, so the error
should not cause index maintenance to fail, and the insert
should be allowed to complete.  This has been corrected.

Temporary Fix
                      *********
                      * HIPER *
                      *********

Comments


Circumvention


PTFs Available
R510 MF29950   1000
R520 MF29856   1000

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: Raul A Jager [mailto:raul@abc.com.py]
Sent: Friday, December 27, 2002 7:32 AM
To: rpg400-l@midrange.com
Subject: CPF5035 Null?


After compiling a program in V5R2 it gives me an error CPF5035 . The
program wrked in V5R1.  Below I copied the "help" for my error messsage.

The file has less than 150 000 records, and "FH_ENTRA" does not allow nulls.

____________________________________________________________________________
_________________________

                        Información Adicional de Mensaje

 ID de mensaje  . . . . :   CPF5035       Gravedad . . . . . . . :   10
 Tipo de mensaje  . . . :   Diagnóstico
 Fecha envío  . . . . . :   27/12/02      Hora envío . . . . . . :
10:19:32

 Mensaje . . . . :   Error de correlación de datos en el miembro HORARIO.
 Causa . . . . . :   Se produjo un error de correlación de datos en el campo
   FH_ENTRA del registro número 4294967295, formato de registro HOR1,
número de
   miembro 1, del miembro HORARIO del archivo HORARIO de la biblioteca
SALARY,
   debido al código de error 19. Los códigos de error y sus significados son
   los siguientes:
     1 -- Datos no válidos en campo decimal.
     2 -- Se truncó un dígito significativo.
     3 -- Un valor de coma flotante > que el valor representable máximo.
     4 -- Un valor de coma flotante < que el valor representable mínimo.
     5 -- Un valor de coma flotante que no es número no pudo
correlacionarse de
   precisión doble a simple o viceversa.

Más...
 Pulse Intro para continuar.

 F3=Salir   F6=Imprimir   F9=Visualizar detalles de mensajes   F12=Cancelar
 F21=Seleccionar nivel ayuda
____________________________________________________________________

                        Información Adicional de Mensaje

 ID de mensaje  . . . . :   CPF5035       Gravedad . . . . . . . :   10
 Tipo de mensaje  . . . :   Diagnóstico

     14 -- Longitud no válida de campo de longitud variable o datos no
válidos
   en una variable de subserie.
     15 -- Un valor de fecha > que el máximo permitido.
     16 -- Un valor de fecha < que el mínimo permitido.
     17 -- Formato no válido de datos de campo fecha, hora o indicación de
   hora.
     18 -- Datos no válidos en campo fecha, hora o indicación de hora.
     19 -- Se halló un campo nulo inesperado.
     20 -- No pudo establecerse un valor nulo en campo que no lo admite.
     21 -- Los datos se convirtieron de un CCSID a otro. Pero se utilizaron
   caracteres de sustitución en alguno que no pudo convertirse.
     22 -- Se halló un carácter de desplazamiento a teclado ideográfico al
   convertir a CCSID de byte único o mixto o se halló un carácter de

Más...
 Pulse Intro para continuar.

 F3=Salir   F6=Imprimir   F9=Visualizar detalles de mensajes   F12=Cancelar
 F21=Seleccionar nivel ayuda

__________________________________________________________________

The line 0001400 is in this segment:

___________________________________________________________________
0005.00 DFechaDia         S                   Like(FH_entra) inz(*sys)
0006.00 DFechaHasta       S                   Like(fh_entra)
0007.00 DFechaDesde       S                   Like(fh_entra)
0008.00 D fh_entra_new    S                   Like(fh_entra)
0009.00

0010.00  *  Consigue todos los horarios del mismo dia, semana anterior
0011.00 C/free
0012.00   fechadesde = fechadia - %days(7);
0013.00   fechahasta = fechadia - %days(5);
0014.00   setll fechadesde hor1;
 <--------------------------
0015.00
0016.00   dou fh_entra > fechahasta or %eof(horario_fh);
0017.00     read hor1;
0018.00     if not %eof(horario_fh);

KEY field description..

0002.59       1  HORARIO_FH
0002.60            HOR1
0002.61                         FH_ENTRA                TMSP       26
0002.62                         NCLIE                   PACK      7,0 SIGNED
0002.63  * *  F I N   D E   I N F O R M A C I O N   C A M P O S   D E
C L A V E   * *


____________________________________________________________________________
_________________
I know the official lenguage for this list is english, but it is not so
easy to translate the output from the AS/400

TIA

Raul.


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.