Title: Mensaje
... No me hagas
caso, estaba pensando en CLP's, lo siento.
Saludos.
Fernando
Pérez.
Cerámica Saloni.
Dpto. Sistemas
-Mensaje original-De: Lorenzo Martinez
[mailto:[EMAIL PROTECTED] Enviado el: jueves, 13 de mayo de
2004 18:30Para: [EMAIL
Title: RV: Creación de ficheros de texto en el IFS
Hola.
Estoy intentando aplicar un ejemplo de Scott Klement sobre crear archivos de texto Ascii en el IFS desde RPG, vía api's. Creo que tengo un problema en la parte de la definición de la página de códigos, he utilizado varias de las que
Hola a [EMAIL PROTECTED]:
Antes de empezar a enrollarme quiero aclarar el código que da comienzo a la
cabecera del asunto:
[TV140504] simplemente quiere decir Tema del Viernes 14/05/2004, de esta
forma [EMAIL PROTECTED] [EMAIL PROTECTED] que no deseen recibir estos mensajes pueden
filtrarlos
fd = open('/QDLS/EDIU/ORDTRANS.TXT':
+O_WRONLY+O_TEXTDATA);
a mi me funciona asi donde
D
O_WRONLY
C
2 D
O_TEXTDATA
C
16777216
Saludos
Juan Monjo
Title: Mensaje
Sí, los valores de
las constantes coinciden.
¿ Y tienes definida
en esa carpeta la conversión a realizar, o simplemente por ser de QDLS convierte
de EBCDIC a ASCII ?
Saludos.
Fernando
Pérez.
Cerámica Saloni.
Dpto. Sistemas
-Mensaje original-De: Juan
Title: Mensaje
Misterio resuelto. El problema es que yo tenía 'O_WRONLY:O_TEXTDATA);' en lugar de 'O_WRONLY + O_TEXTDATA);'
Esos
pequeños detalles...;)
Saludos.
Fernando
Pérez.
Cerámica Saloni.
Dpto. Sistemas
-Mensaje original-De: Fernando Pérez
[mailto:[EMAIL
Title: Mensaje
Fernando en el texto que has enviado pones
esto
c eval fd =
open('/export/fpr.html': O_WRONLY:
c O_TEXTDATA)
En cambio yo
tengo
fd =
open('/export/fpr.html':+O_WRONLY+O_TEXTDATA)
prueba esto y
dime alguna cosa.
Esteproblema yo lo tuve lo veia en el as400 y luego lo
Title: Mensaje
Sí, sí, era eso. Y
luego, además, a la hora de crear el fichero, no ponía unid. de juego de
caracterescorrecto. Al final, para ver cual podría ser se me ha ocurrido
crear un archivo de texto desde windows y luego he mirado desde el
navigatorcual tenía. Poniéndolo en el open()
Buen Viernes,
Una pregunta que creo no tiene solución pero que de todas formas formulo al
foro, existe la posibilidad de recuperar el fuente de un programa RPG-ILE a
partir de su PGM,
El soporte que tengo en cinta del fuente no se corresponde con el PGM
compilado y no hay manera de
Igual es una chapucilla, pero si puedes hacer un debug llegarias a ver el fuente y
poderlo comparar con el que dices que no coincide.
Saludos
-Mensaje original-
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Enviado el: viernes, 14 de mayo de 2004 14:57
Para: [EMAIL PROTECTED]
Asunto:
Buena idea...
ha sido una ardua tarea de copy/paste pero gracias a compilar con la opción
*LIST he conseguido regenerar el fuente.
_
Jose Luis Aguilera
Analista
Ediciones Rueda JM, S.A.
Los Mesejo, 15
28007 Madrid
Tfno:914 343 883 / 914 343 860
Se que es un poco tarde pero te envio un programa que recupera los fuentes RPGLE a
partir de su objeto, asi para la proxima ya no vas a tener que estar con copy/paste
solo lo ejecutas de esta manera y listo
CALL biblioteca/RTVRPGLES PARM('OBJETOBIBLIOTECA' 'QRPGLESRC BIBLIOTECA'
Hola:
Veo que el tema se pone complicado. Propongo una idea, que no se si te
serviria, duplicar el mandato CHGJOB en otra libreria que este por
encima la QSYS y controlar pro un programa si ejecutas el CHGJOB
verdadero.
Es un poco palo pero podria servir?
Saludos
Marti Riera
- Mensaje
Hola,
os informo que la impresora ya funciona, y la solución no pasaba en
principio por aplicar ninguna Ptf. Al parecer esta impresora tiene un
parámetro que debe ponerse en 'BIDIRECCIONAL' (no acabo de entender porqué,
pues la conexión es via TCP).
Una vez cambiado todo ha funcionado
14 matches
Mail list logo
