AS/400 - Soporte JDE

 
Vista:

Soporte JDE

Publicado por Ricardo (2 intervenciones) el 23/08/2007 17:10:42
Tengo un problema con un string de SQL que me da error de sintaxis, pero no encuentro el motivo. Lo procesé interactivo y también en batch.

El comando es:

Enter SQL Statements

Type SQL statement, press Enter.
Token <END-OF-STATEMENT> was not valid. Valid tokens: <IDENTIFIER>.
===> create table VEJDMPOBJ/WEBPAGCMP2 as
(SELECT RPAN8 AS RPAN8 ,
RPDCT AS RPDCT ,
F5_DCT.DRDL01 AS RPDCT_DESC ,
RNPYID ,
RPDCT AS RNDCT ,
F5_DCT.DRDL01 AS RNDCT_DESC ,
RPVINV AS RPVINV ,
CASE WHEN RNCRRM = 'F' THEN SUM ( RNPFAP ) ELSE SUM ( RNPAAP ) END
AS RNPAAP ,
CMTXT AS CMTXT ,
CMUPMJ AS CMUPMJ ,
RPDOC AS RPDOC ,
RPDIVJ ,
RPKCO ,
RPKCO AS RPKCO_DESC ,
CASE WHEN RNCRRM = 'F' THEN ( SUM ( RPAG )/DECIMAL ( RPCRR ) )
ELSE SUM ( RPAG ) END AS RPAG ,
SUM ( RPSTAM ) AS RPSTAM ,
F5_PST.DRDL01 AS RPPST ,
SUM ( RPATXN ) AS RPATXN ,
SUM ( RPATXA ) AS RPATXA ,
CVDL01 AS RPCRCD ,
RPPTC ,
RPDDJ ,
RPCRR ,
RPAAP ,
RMDMTJ ,
RPKCO AS CMKCO ,
RPDOC AS CMDOC ,
RNCRRM FROM VEJDMPDTA/F0414 ,
VEJDMPDTA/F0413 ,
VEJDMPCOM/F0005 F5_PST ,
VEJDMPCOM/F0005 F5_DCT ,
VEJDMPDTA/F0013 ,
VEJDMPDTA/F0411
LEFT JOIN VEJDMPOBJ/F0411COMM ON CMDCT = RPDCT AND CMKCO = RPKCO AND
CMDOC = RPDOC WHERE RNAN8 = RPAN8 AND RNDOC = RPDOC AND RMPYID =
RNPYID AND RNAN8 = RPAN8 AND RNDOC = RPDOC AND RNDCT = RPDCT AND
RNKCO = RPKCO AND RNSFX = RPSFX AND RNDCT = RPDCT AND RNKCO = RPKCO
AND RNSFX = RPSFX AND F5_DCT.DRSY = '00' AND F5_DCT.DRRT = 'DT' AND
RNDCT = TRIM ( F5_DCT.DRKY ) AND RPCRCD = CVCRCD AND F5_PST.DRSY =
'00' AND F5_PST.DRRT = 'PS' AND RPPST = TRIM ( F5_PST.DRKY )
AND RPDCT = 'PV'
GROUP BY RNPYID , RNDCT , CMTXT , CMUPMJ , RPAN8 , RPDCT , RPDOC ,
RPVINV , RPDIVJ , RPKCO , RMDMTJ , RPPST , RPCRCD , RPPTC , RPDDJ ,
RPCRR , RPAAP , F5_DCT.DRDL01 , F5_PST.DRDL01 , CVDL01 , RNCRRM )

Dió el siguiente error

Additional Message Information

Message ID . . . . . . : SQL0104 Severity . . . . . . . : 30
Message type . . . . . : Diagnostic

Message . . . . : Token <END-OF-STATEMENT> was not valid. Valid tokens:
<IDENTIFIER>.
Cause . . . . . : A syntax error was detected at token <END-OF-STATEMENT>.
Token <END-OF-STATEMENT> is not a valid token. A partial list of valid
tokens is <IDENTIFIER>. This list assumes that the statement is correct up
to the token. The error may be earlier in the statement, but the syntax of
the statement appears to be valid up to this point.
Recovery . . . : Do one or more of the following and try the request again:
-- Verify the SQL statement in the area of the token <END-OF-STATEMENT>.
Correct the statement. The error could be a missing comma or quotation
mark, it could be a misspelled word, or it could be related to the order of
clauses.
-- If the error token is <END-OF-STATEMENT>, correct the SQL statement

Procesando en forma batch obtengo:

*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....0....+....1....+....2....+.
40 RNKCO = RPKCO AND RNSFX = RPSFX AND RNDCT = RPDCT AND RNKCO = RPKCO
41 AND RNSFX = RPSFX AND F5_DCT.DRSY = '00' AND F5_DCT.DRRT = 'DT' AND
42 RNDCT = TRIM ( F5_DCT.DRKY ) AND RPCRCD = CVCRCD AND F5_PST.DRSY =
43 '00' AND F5_PST.DRRT = 'PS' AND RPPST = TRIM ( F5_PST.DRKY )
44 AND RPDCT = 'PV'
45 GROUP BY RNPYID , RNDCT , CMTXT , CMUPMJ , RPAN8 , RPDCT , RPDOC ,
46 RPVINV , RPDIVJ , RPKCO , RMDMTJ , RPPST , RPCRCD , RPPTC , RPDDJ ,
47 RPCRR , RPAAP , F5_DCT.DRDL01 , F5_PST.DRDL01 , CVDL01 , RNCRRM )
* * * * * E N D O F S O U R C E * * * * *
5722SS1 V5R3M0 040528 Run SQL Statements SQL_VENEZ 08/22/07 13:33:33 Page
Record *...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8 SEQNBR Last change
MSG ID SEV RECORD TEXT
SQL0104 30 47 Position 73 Token <END-OF-STATEMENT> was not valid.
Valid tokens: WITH DEFINITION <IDENTIFIER>.
Message Summary
Total Info Warning Error Severe Terminal
1 0 0 0 1 0
30 level severity errors found in source


Qué es lo que falta ?

Muchas gracias,
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:Soporte JDE

Publicado por Sergio (74 intervenciones) el 23/08/2007 19:11:45
Oye una consulta, la apertura del parentesis al final de la instruccion donde esta?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Soporte JDE

Publicado por Ricardo (2 intervenciones) el 23/08/2007 20:12:36
El paréntesis inicial corresponde a la cláusula SELECT

Muchas gracias,
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Soporte JDE

Publicado por Hernán gutiérrez (1 intervención) el 15/11/2007 22:30:58
Hola necesito poder solucionar un problema que me ha ocasionado un archivo de seguridad de JDE el cual e migrado de AS400 modelo 170 a AS400 820, el error esta dasdo en un World Writer y que es el siguente;

Programa en error:




ID de mensaje . . . . : RPG1299

Fecha de envío . . . . : 13/11/07 Hora de envío . . . . : 16:58:25



Mensaje . . . . : Error de E/S CPF5097 detectado en QADBLDEP (C G S D F).



Causa . . . . . : El programa RPG P82111 en la biblioteca JDFOBJ73 recibió

el mensaje CPF5097 en la sentencia 145800 mientras realizaba una operación

de E/S CHAIN en el archivo QADBLDEP. El archivo real es QSYS/QADBLDEP

MEMBER - QADBLDEP. Consulte las anotaciones de trabajo para obtener una

descripción detallada del mensaje CPF5097.

Recuperación . : Introduzca C para cancelar, G para seguir procesando en

*GETIN, S para obtener una salida impresa del almacenamiento del sistema, D

para obtener una salida impresa del almacenamiento del sistema con formato

RPG o F para obtener una salida impresa del almacenamiento del sistema con

formato completo.


Maquina de producción



ID de producto . . . . . . . . . . . : 5769999

Origen de la IPL . . . . . . . . . . : ÑÑMACHÑB

Release de la opción base . . . . . . : V4R5M0 L00





Maquina de contingencia



Visualizar estado PTF



Sistema: MILLA

ID de producto . . . . . . . . . . . : 5722999

Origen de IPL . . . . . . . . . . . . : ÑÑMACHÑB

Release de la opción base . . . . . . : V5R2M0 L00





Si alguien me puede ayudar estare muy agradecido.

[email protected]
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar