Hola compañeros, en esto del SQL en RPG, estoy un tanto pez (Que raro
¿verdad? cuando no)
He creado un programita fácil, que me funciona perfectamente en
interactivo, pero que no hace nada en batch ¿alguna pista? (ya he
comprobado el valor de los parametros y es correcto.
Gracias
V5R4
H/EJECT
H DECEDIT('0,') ALTSEQ(*EXT) DATEDIT(*DMY.)
*****************************************************************
* *
* PROCESO INICIAL *
* *
*****************************************************************
*
D Seletq S 300
0018.00 *
0019.00 * PARMETROS TRANSFERIDOS
0020.00 *
0021.00 C *ENTRY PLIST
0022.00 C PARM usua 10
0023.00 C PARM WKSNAME 25
0031.00 *
0032.00 C EVAL Seletq= 'DELETE -
0033.00 C from REAL/USUWKS where -
0034.00 C USUWKSNAME = ' +
0035.00 C x'7D' + WKSNAME + x'7D' +
0036.00 C ' and USUcod <> ' +
0037.00 C x'7D' + usua + x'7D'
0038.00 *
0039.00 c/exec sql
0040.00 C+ PREPARE S1 FROM :Seletq
0041.00 c/end-exec
0042.00 c/exec sql
0043.00 c+ execute S1
0044.00 c/end-exec
0045.00 *
0046.00 C Seton Lr
Pedro Pinedo Hernandez: Analista-Programador
Grupo Amcor Flexibles Hispania S.L.
Departamento de Informática / IT Department
tfno.:+34 941 28 60 90 - 941 03 01 39
fax: +34 941 03 01 39
Avd. Burgos 67-95
26006 Logroño Spain
[email protected]
(quitar nospam del dominio, para enviar)
______________________________________________________
AMCOR FLEXIBLES - LEADING THROUGH INNOVATION
______________________________________________________
CAUTION - This message may contain privileged and confidential information
intended only for the use of the addressee named above. If you are not the
intended recipient of this message you are hereby notified that any use,
dissemination, distribution or reproduction of this message is prohibited. If
you have received this message in error please notify AMCOR FLEXIBLES
immediately. Any views expressed in this message are those of the individual
sender and may not necessarily reflect the views of AMCOR FLEXIBLES.__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#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