Quita la monitorizaci�n del mensaje y haz un debug(o haz los pasos a mano). Lo tienes monitorizado (CPF0000), o sea, 'para todo' y a lo mejor no falla donde t� piensas. Recuerda las consultas al Foro de los que teniamos Xp o 2000 con un SP nuevo y que no podiamos interactuar con las carpetas del AS.
| "Einb"
<[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED] 09/03/05 12:50
|
|
Hola a todos de nuevo, estoy intentando hacer el cl que me pase los ficheros al as400, tengo creada una unidad de red e: en ella tengo el fichero dentro de la carpeta TRANS , consigo copiarlo desde c:a la carpeta, pero de ahi no paso me dice que noe ncuentra el fichero en la carpeta TRANS, y no se que es lo que debo corregir, supongo que habre definido lago mal.
Gracias
PGM
STRPCO PCTA(*NO)
MONMSG MSGID(CPF0000)
STRPCCMD PCCMD('COPY C:\PIC.TXT E:\TRANS') +
PAUSE(*NO)
CPYFRMPCD FROMFLR(TRANS) TOFILE(FRINUED/FRPICK) +
FROMDOC(PIC.TXT)
CALL PGM(PGM) PARM(CREARFI)
CPYTOPCD FROMFILE(FRENPI) TOFLR('trans+08/05/03') +
TODOC(PIC.TXT) REPLACE(*YES)
STRPCCMD PCCMD('copy e:\TRANS\PIC.TXT C:\ACCESS\*.*') +
PAUSE(*NO)
FIN: ENDPGM
----- Original Message -----
From: medina
To: [email protected]
Sent: Wednesday, March 09, 2005 11:12 AM
Subject: RE:
Ahora que tambien lo puedes automatizar hacia una carpeta que tengas en C:
Yo tengo montado algunas transeferencias de AS400 a Pc y viceversa directo a carpetas del C:
sin tener que pasar por la QDLS con las transferencias del CA.
Utilizando el los procesos STRPCO y STRPCCMD.
Saludos
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de medina
Enviado el: mi�rcoles, 09 de marzo de 2005 11:00
Para: [email protected]
Asunto:
El nombre del archivo si tiene mas de ocho caracteres no te dejara copiarlo, y aun si tiene ocho tampoco podras
copiarlo en el raiz , si hacia una carpeta ya existente.
Lo de acceso denegado puede ser que no tengas el usuario a�adido en el directorio WRKDIRE
Saludos
Saludos
Paco Medina
Exclusivas Camacho, S.Ltda.
Dtor.Informatica
