Impresión Remota en AS400
El objetivo es crear un mecanismo que permita imprimir en nuestro sistema local (CTA) un
listado pedido en un sistema remoto (para nuestro ejemplo, CVA). Para ello hay dos
enfoques: El primero, y más sencillo, sería definir la impresora del PC local donde
tenemos instalado Client Access como impresora del sistema remoto. En este caso toda la
gestión del envío del listado recae sobre Client Access si bien tiene un inconveniente:
El listado remoto solo puede imprimirse por la impresora definida en el Client Access, y
no se puede escoger ninguna otra impresora del AS/400 local.
Otra desventaja es que deberemos crear en cada PC local donde queramos tener esta
funcionalidad, tantas definiciones de impresoras como sistemas remotos tengamos, lo que
puede suponer un caos organizativo.
La otra posibilidad, algo más complicada, pero que ofrece mayor flexibilidad, consiste
en crear una cola en el sistema remoto que apunte a nuestro sistema local. Una vez esta
cola remota está creada, se activa para que redireccione a nuestro sistema local todos
los listados que reciba. Una vez aquí, el listado puede tratarse como un listado más y
como tal, puede listarse por cualquier impresora del sistema, incluidas las definidas en
PCs con Client Access.
Esta segunda opción permitiría, por ejemplo, que un listado de facturas pedido en CVA
se imprimiese en la impresora PRT01 de CTA, suponiendo que tuviéramos papel de facturas
de la empresa remota, evidentemente… Otra posibilidad, si definimos las colas a la
inversa, sería imprimir en una impresora de CVA un listado de contabilidad (extracto de
cuenta, balance, etc…) solicitado en CTA.
Hay otra ventaja en este segundo caso, y es que las definiciones de impresoras remotas
se hacen en los AS/400 una sola vez, y sirven para todos los usuarios.
Puede copiar este documento en formato word.
Este documento ha sido cedido por Angel Lampreave de grupo TAINCO
A continuación, se analiza uno a uno los pasos a seguir para implementar este sistema
de impresión remota:
AS/400: Paso a Paso
- Sistema local (CTA): Crear una cola que recibirá los listados pedidos en los sistemas
remotos. Esta cola se llamará siempre RMTQ. La sintaxis del mandato es:
Selección o
mandato
===> CRTOUTQ OUTQ(SCENTORNO/RMTQ) TEXT('Cola CTA que imprime lst pedidos en sis
t remotos')
- Sistema remoto (CVA): Crear una cola que servirá para enviar los listados al sistema
local, donde se imprimirán. Esta cola se llamará como el sistema destino pero añadiendo
una Q al final. En nuestro ejemplo, sería CTAQ (queremos imprimir listados de CVA en el
sistema CTA). En la creación de esta cola remota habrá que indicar el sistema destino
(CTA) y la cola de salida de este sistema que recogerá lo que envíe (RMTQ, creada en el
paso anterior). Hay que especificar también que usaremos comunicación IP, así como
decirle que no transforme los datos. La sintaxis del mandato es:
Selección o mandato
===> CRTOUTQ OUTQ(SCENTORNO/CTAQ) RMTSYS(CTA) RMTPRTQ('SCENTORNO/RMTQ') CNNTYPE
(*IP) TRANSFORM(*NO) TEXT('Cola remota para imprimir listados en CTA')
- Sistema remoto (CVA): Una vez creada la cola remota, hay que activarla para que
redireccione los listados que se impriman en ella. Esto se consigue con el mandato
STRRMTWTR:
Selección o mandato
===> STRRMTWTR OUTQ(SCENTORNO/CTAQ)
- Sistema remoto (CVA): Una vez activada la cola remota, ya podremos imprimir en nuestro
sistema local un listado pedido de manera habitual en el sistema remoto. Para ello, habrá
que ir al spool del sistema remoto, localizar el listado que nos interesa y cambiarlo de
cola para situarlo en la cola remota. Una vez esté en ésta, el sistema remoto (CVA)
redireccionará automáticamente el listado a la cola de nuestro sistema local (RMTQ en
CTA), donde quedará ya como un listado más, el cual deberemos a su vez cambiar a la
impresora por donde queramos que se imprima.
A continuación podemos
ver la secuencia de tres pantallas: Estando en el sistema remoto, en primer lugar
cambiamos la cola de salida del listado para que salga por la cola CTAQ. En la segunda
pantalla, vemos la cola CTAQ que está procesando el listado (nótese que en lugar del
estado habitual de impresión WTR, tiene un estado de envío SND). Finalmente, ya en el
sistema local, podemos ver que ha llegado el listado a la cola RMTQ:
Trabajar con Todos los Archivos en Spool
Teclee opciones, pulse Intro.
1=Enviar 2=Cambiar 3=Retener 4=Suprimir 5=Visualizar 6=Liberar
7=Mensajes 8=Atributos 9=Trabajar con estado impresión
Págs Pág
Opc Archivo Usuario Disp/Cola Datos Usu Est Total Act Cop
2 QPDCDEVA QSECOFR QSECOFR RDY 2 1
Final
Parámetros para opciones 1, 2, 3 o mandato
===> OUTQ(SCENTORNO/CTAQ)
F3=Salir F10=Vista 3 F11=Vista 2 F12=Cancelar F22=Impresoras
F24=Más teclas
Trabajar con Cola de Salida
Cola: CTAQ Biblioteca: SCENTORNO Estado: RLS/WTR
Teclee opciones, pulse Intro.
1=Enviar 2=Cambiar 3=Retener 4=Suprimir 5=Visualizar 6=Liberar
7=Mensajes 8=Atributos 9=Trabajar con estado impresión
Datos Tipo
Opc Archivo Usuario Usuario Est Págs Copias Formulario Pri
QPDCDEVA QSECOFR SND 2 1 *STD 5
Final
Parámetros para opciones 1, 2, 3 o mandato
===>
F3=Salir F11=Ver 2 F12=Cancelar F20=Transcriptores F22=Impresoras
F24=Más teclas
Trabajar con Cola de Salida
Cola: RMTQ Biblioteca: SCENTORNO Estado: RLS
Teclee opciones, pulse Intro.
1=Enviar 2=Cambiar 3=Retener 4=Suprimir 5=Visualizar 6=Liberar
7=Mensajes 8=Atributos 9=Trabajar con estado impresión
Datos Tipo
Opc Archivo Usuario Usuario Est Págs Copias Formulario Pri
QPDCDEVA QSECOFR RDY 2 1 *STD 5
Final
Parámetros para opciones 1, 2, 3 o mandato
===>
F3=Salir F11=Ver 2 F12=Cancelar F20=Transcriptores F22=Impresoras
F24=Más teclas
- Sistema remoto (CVA): Una vez el listado ha sido enviado al sistema donde se imprimirá,
deberemos finalizar el transcriptor remoto con el mandato ENDWTR, tras lo cual podremos
desconectarnos del sistema remoto:
Selección o mandato
===> ENDWTR WTR(CTAQ) OPTION(*IMMED)
Evidentemente, los pasos para crear las colas local y remota sólo hay que hacerlas una
vez. Una vez creadas, tan sólo tendremos que activar el transcriptor remoto, cambiar el
listado de cola y volver a desactivarlo una vez el listado haya llegado a destino (pasos
3, 4 y 5).
Cedido por Ángel Lampreave
|
