si
WWPISINF QTEMP PF Archivo de salida para DSPFD TYPE(*
-----Mensaje original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Enviado el: jueves 17 de octubre de 2002 13:47
Para: [EMAIL PROTECTED]
Asunto: RE: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.
�En tu QTEMP � existe el fichero ?.
�
������������������������������������������������������� Manel
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: jueves 17 de octubre de 2002 13:42
To: [EMAIL PROTECTED]
Subject: RE: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.
�-----Mensaje original-----
[Cristina V�zquez Osorio]�
Yo Compilo con 14 desde el pdm, �como saber si es eso?
De: Jos� S�nchez [mailto:[EMAIL PROTECTED]]
Enviado el: jueves 17 de octubre de 2002 13:30
Para: [EMAIL PROTECTED]
Asunto: Re: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.
Cristina, si compilas en Batch yo diria que la qtemp no es la misma ya
que es otro trabajo.�puede ser eso?
�
Saludos.
----- Original Message -----
From: Cristina V�zquez Osorio
To: 'FORUMAS400'
Sent: Thursday, October 17, 2002 1:11 PM
Subject: PROBLEMA CON CL ,PARA SABER LONG.DE REGISTRO DE UN ARCHIVO.
�� PGM������� PARM(&P41 &P42)����������������������������
�� DCL������� VAR(&RFLX) TYPE(*CHAR) LEN(10)�������������
�� DCL������� VAR(&P41) TYPE(*CHAR) LEN(8)���������������
�� DCL������� VAR(&P42) TYPE(*CHAR) LEN(8)���������������
�� DCLF������ FILE(QTEMP/WWPISINF)�����������������������
�� MONMSG���� MSGID(CPF0000)�����������������������������
�� DLTF������ FILE(QTEMP/WWPISINF)�����������������������
�� MONMSG���� MSGID(CPF0000)�����������������������������
�� DSPFD����� FILE(&P42/&P41) TYPE(*RCDFMT) +������������
��������������� OUTPUT(*OUTFILE) OUTFILE(QTEMP/WWPISINF)�
�� MONMSG���� MSGID(CPF0000)�����������������������������
�� RCVF��������������������������������������������������
�� CHGVAR���� VAR(&RFLX) VALUE(&RFLEN)�
��������� MONMSG���� MSGID(CPF0000)������������������������������
��� DLTF������ FILE(QTEMP/WWPISINF)������������������������
��� MONMSG���� MSGID(CPF0000)������������������������������
��� DSPFD����� FILE(&P42/&P41) TYPE(*RCDFMT) +�������������
���������������� OUTPUT(*OUTFILE) OUTFILE(QTEMP/WWPISINF)��
��� MONMSG���� MSGID(CPF0000)������������������������������
��� RCVF���������������������������������������������������
��� CHGVAR���� VAR(&RFLX) VALUE(&RFLEN)��������������������
��� CHGDTAARA� DTAARA(*LDA (1 10)) VALUE(&RFLX)������������
��� ENDPGM�������������������������������������������������
********* Fin de datos *************************************����
Este es mi programita, pues bien donde esta la qtemp si pongo qs36f,
todo va perfectamente teniendo en cuenta que antes de compilar el
programa debo crear manualmente el fichero llamado wwpisinf con dspfd.
En cuanto cambio la biblioteca y pongo la qtemp me dice que no
encuentra el archivo wwpisinf (cuando estoy compilando), y estoy
haciendo lo mismo que cuando ponia la qs36f. �porque?....el archivo s�
est� en la qtemp, Alguien sabe por que????
En el parametro p42 y p41, viene el nombre del archivo y biblioteca del
que quiero obtener informacion de long.de registro.
Gcs, de nuevo a todos.
SAludos.
Cris.��
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE
