Saludos desde Galicia,

 

Primero pedir disculpas por la tardanza pero el trabajo ya se sabe ….. 

 

Bueno, yo ejecuto las transferencias de la siguiente manera :

 

1.- CL AS400 :

                                                     

STRPCO     PCTA(*NO)                                 

MONMSG     MSGID(CPF0000)                            

                                                     

STRPCCMD   PCCMD('C:\190\BAJA190.BAT') PAUSE(*NO)    

 

Donde lógicamente los nombres y directorios son los que tu quieras.

 

 

2.- BAJA190.BAT:

 

            CLS

\ARCHIV~1\IBM\CLIENT~1\RTOPCB C:\190\F190.DTF

                                                     

            - El “RTOPCB” es un programa que instala el Client Access, este
envía datos al pc, el RFRMPCB los envia del Pc al AS400.

            - El F190.DTF es el archivo que generas cuando creas una
transferencia desde una sesion de AS400 ( uno de los iconos

              que tienes en la pantalla de la emulación ). En este archivo
se definen entre otras desde que archivo de AS400 leemos

              y a que archivo de Pc enviamos , , , ,

 

Este es el F190.DFT :

 

TRTOPC

 

FROM        BFIL94/F190

SELECT      *

WHERE

ORDER BY

3

C:\AEAT\190_2004\F190.TXT

1311

13211 661

C:\AEAT\190_2003\F190.FDF

22

JOIN BY

GROUP BY

HAVING

SYSTEM      SISTSEC.IP

OPTIONS     2:/,HMSDMYN11

 

 

NRG C7006

winspool

IP_xxx.xxx.xxx.xxx

1

10

6

0

SQLSEL

HTML        000    2    2  1  1  1
10000000000100000000100001000003006160010

HCSET       windows-1252

HTITLE

HCTEXT

PROPS       000110

 

 

            

 

3.- Este tipo de Transferencias ejecutadas desde el AS400 NO pueden ser en
BATCH dado que abren una sesión de DOS para ejecutarse.

 

4.- Lo que nada te impide es hacer un programa en AS400 donde generes un
fichero con las líneas antes descritas pero con los nombre de 

    fichero y/o ubicaciones que desees en cada momento. Tendrás que ejecutar
una transferencia que lo sitúe en el Pc donde corresponda y 

    le de la extensión que corresponde, mas o menos así :

 

                                               CLS

\ARCHIV~1\IBM\CLIENT~1\RTOPCB C:\190\FICHERO.DTF

                                               DELETE F190.DFT

                                               RENAME FICHERO F190.DFT

    Con lo que ahora el F190.DFT tendrá los nombres y las ubicaciones que TU
quieras, con ejecutar la transferencia desde el AS400 inicialmente

    Descrita TEMA ARREGLADO.

 

 

 

No se si me he explicado …. Si tienes cualquier duda NO dudes en escribirme
o llamarme a la oficina :

 

            Juan Pelaez

            [email protected]

 

            986 25 17 30

 


  _____  

Estoy utilizando la versión gratuita de SPAMfighter para usuarios privados. 
Hasta ahora ha bloqueado 1582 spam y me ha ahorrado mucho tiempo.
Ya somos 5.9 millones de usuarios en todo el mundo, únete a nosotros.
Puedes descargar la versión gratis aquí <http://www.spamfighter.com/les> .
Los usuarios de pago no tienen esta firma.

<<attachment: winmail.dat>>

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#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

Responder a