Impresion de Codigos de Barras en una impresora termica EPSON TM-T20II

2016-03-03 Por tema Eduardo Pascual 

Buenas tardes foro:

Estoy intentando enviar codigos ESC/POS a una impresora Epson TM-T20II 
desde el AS/400 (he probado en COBOL, RPG) para imprimir codigos de barras.


La impresora esta definida en el AS/400 mediante una sesion de impresora 
de iSeries Access V7R1 con transformar impresion en sistema principal 
*WSCST y objeto de personalizacion QSYS/QWPDEFAULT que es como viene en 
la documentacion de IBM para dicha impresora.


Se supone segun pone en varios documentos que he encontrado, que con 
definir que no sustituya los caracteres no imprimibles en la *PRTF y 
enviar codigos hexadecimales o ASCII debiera de funcionar pero tras mil 
pruebas no lo he logrado.


Alguien ha logrado enviar dichos codigos a una impresora similar desde 
el AS/400 y le ha funcionado?


Gracias de antemano por vuestra colaboracion

Salu2

Edu






Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: IMPRESORA PARA PREFORMATOS

2016-03-03 Por tema Marcelo Diaz 
con este intructivo lo hago...  en color o blanco y negro...
El 3 de marzo de 2016, 16:03, CARLOS SANTIAGO
escribió:

> Acabo de borrar y reinstalar el driver. En negro, en principio sale bien,
> pero en color no hay manera por mas combinaciones que haga.
>
> Enviado desde iPhone CSM
>
>
> El 3 mar 2016, a las 18:05, CARLOS SANTIAGO 
> escribió:
>
> Buenas tardes
>
> Tengo un pc con Windows 7 prof 64 bits
>
> Iseries Access 7.1 con nivel de servicio SI57907.
>
> Instalo la Generic InfoPrint 600dpi AFP.
>
> Al generar un preformato tanto en color como en negro me genera un .prn
> con 1 Kb. (en blanco)
>
>
>
> Configuracion de la impresora
>
>
>
> 
>
> Defincion de image options
>
>
>
> 
>
> Tambien lo he puesto en default dither y en black.
>
>
>
> No hay manera.
>
> Alguna idea?
>
>
>
> Gracias anticipadas
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>


Preformatos.doc
Description: MS-Word document

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: IMPRESORA PARA PREFORMATOS

2016-03-03 Por tema CARLOS SANTIAGO 
Acabo de borrar y reinstalar el driver. En negro, en principio sale bien, pero 
en color no hay manera por mas combinaciones que haga. 

Enviado desde iPhone CSM


> El 3 mar 2016, a las 18:05, CARLOS SANTIAGO  escribió:
> 
> Buenas tardes
> Tengo un pc con Windows 7 prof 64 bits
> Iseries Access 7.1 con nivel de servicio SI57907.
> Instalo la Generic InfoPrint 600dpi AFP.
> Al generar un preformato tanto en color como en negro me genera un .prn con 1 
> Kb. (en blanco)
>  
> Configuracion de la impresora
>  
> 
> Defincion de image options
>  
> 
> Tambien lo he puesto en default dither y en black.
>  
> No hay manera.
> Alguna idea?
>  
> Gracias anticipadas
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Marcelo Diaz 
Nosotros lo sometemos a la qctl con el dia y la hora que queriamos que
arranquey la 1ra orden es endsbs *all *immed  entonces la maquina
se prendia el domingo hacia el backup full -full y se apagaba...


El 3 de marzo de 2016, 15:29, Carlos
escribió:

> Hola
>
> Con lo que pone en este documento podrás hacer lo que quieres (si tienes
> 5.3 o superior)
>
> http://www-01.ibm.com/support/docview.wss?uid=nas8N1015176
>
> Eso si, yo no recomiendo el ENDSBS con BCHTIMLMT(*NOMAX) porque si hay
> algún problema en la copia tienes que cancelarlo desde las DST. Así que lo
> mejor es calcular lo que te puede tardar y poner ese tiempo.
>
> Yo soy mas "antiguo" y me gusta hacer los SAVE 21 y 22 en interactivo y
> vigilando como va, pero es verdad que con esto me hubiera ahorrado un
> montón de horas mirando la pantallita.
>
> Saludos
> Carlos "empezando a sentirse isaurio"
>
>
> El 03/03/16 a las 09:38, Fernando Idem escribió:
>
> Buenos Dias;
>
> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
> de IBM, vimos que había otras opciones, como las siguientes;
>
> ENDSBS SBS(*ALL) OPTION(*IMMED)
> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
> SAVDLO DLO(*ALL) SAVFLR(*ANY)
> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
> ('/QDLS' *OMIT)) UPDHST(*YES)
>
> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
> puede hacer y si nos daría seguridad para que luego el sistema arranque
> correctamente.
>
> Un saludo
>
>
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Carlos 

Hola

Con lo que pone en este documento podrás hacer lo que quieres (si tienes 
5.3 o superior)


http://www-01.ibm.com/support/docview.wss?uid=nas8N1015176

Eso si, yo no recomiendo el ENDSBS con BCHTIMLMT(*NOMAX) porque si hay 
algún problema en la copia tienes que cancelarlo desde las DST. Así que 
lo mejor es calcular lo que te puede tardar y poner ese tiempo.


Yo soy mas "antiguo" y me gusta hacer los SAVE 21 y 22 en interactivo y 
vigilando como va, pero es verdad que con esto me hubiera ahorrado un 
montón de horas mirando la pantallita.


Saludos
Carlos "empezando a sentirse isaurio"


El 03/03/16 a las 09:38, Fernando Idem escribió:

Buenos Dias;

Estamos intentando planificar un SAVSYS, y hemos generado un Cl para 
que apague los subsistemas y luego genere un savsys, todo esto la 
hacemos en otra maquina antigua que tenemos para trastear, este SAVSYS 
que hicimos solo hizo una copia de datos de sistema, luego viendo en 
las explicaciones de IBM, vimos que había otras opciones, como las 
siguientes;


ENDSBS SBS(*ALL) OPTION(*IMMED)
CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
SAVDLO DLO(*ALL) SAVFLR(*ANY)
SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
OBJ(('/*') ('/QSYS.LIB' *OMIT) +
('/QDLS' *OMIT)) UPDHST(*YES)

Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se 
puede hacer y si nos daría seguridad para que luego el sistema 
arranque correctamente.


Un saludo






Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.



Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

IMPRESORA PARA PREFORMATOS

2016-03-03 Por tema CARLOS SANTIAGO 
Buenas tardes

Tengo un pc con Windows 7 prof 64 bits

Iseries Access 7.1 con nivel de servicio SI57907.

Instalo la Generic InfoPrint 600dpi AFP.

Al generar un preformato tanto en color como en negro me genera un .prn con
1 Kb. (en blanco)

 

Configuracion de la impresora

 



Defincion de image options

 



Tambien lo he puesto en default dither y en black.

 

No hay manera.

Alguna idea?

 

Gracias anticipadas


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: configuracion de Toshiba studio 477 por IP

2016-03-03 Por tema Marti Riera 
Hola,

Yo no he usado nunca este tipo de impresora pero si buscas en la pagina del
fabricante, parece que hay un driver para AS400:
https://electronicimaging.toshiba-europe.com/publicsite-service/driver/downloads

https://electronicimaging.toshiba-europe.com/publicsite-service/resource/download/pseu/en/83cbb3e9-d38a-464e-90d0-93273c710a59/60f07752b14fcddcef126a66ecf3010e/WCO_V2_2.zip

Suerte 1

Martí Riera

2016-03-03 16:27 GMT+01:00 Dymsis Gx :

> Buenos dias,
>
> Estamos configurando impresora  toshiba studio 477 y a través del
> client Access ha funcionado correctamente, ahora cuando queremos
> definirla a través de IP, la
>
> Impresión queda en estado PND en el spool y no realiza la impresión, ya
> hemos probado varios cambios de parámetros pero no estamos dando con los
> requeridos
>
> Para este modelo,
>
> Si alguien tiene la experiencia para compartir, le agredeceria
> mucho,
>
> Mario La Porta
>
> Dymsis
>
> Consultor Asociado
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

configuracion de Toshiba studio 477 por IP

2016-03-03 Por tema Dymsis Gx 
Buenos dias, 
Estamos configurando impresora  toshiba studio 477 y a través del
client Access ha funcionado correctamente, ahora cuando queremos definirla a
través de IP, la 
Impresión queda en estado PND en el spool y no realiza la impresión, ya
hemos probado varios cambios de parámetros pero no estamos dando con los
requeridos 
Para este modelo, 

Si alguien tiene la experiencia para compartir, le agredeceria
mucho, 

Mario La Porta
Dymsis
Consultor Asociado



Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

RE: Planificar SAVSYS

2016-03-03 Por tema Sergi 
No me he mirado mucho las respuestas porque voy liado pero te paso un CL 
que hice hace tiempo para poder planificar "a manubrio" un GO SAVE opción 
21 diferidamente. Te pongo sólo la parte de los pasos del backup 
propiamente dichos, si te interesa la parte donde pido la fecha/hora y 
hago el loop para esperar el momento te lo paso, pero bueno... esa parte 
no tiene secreto.

BEGIN: 
INZTAP DEV(TAP01) NEWVOL(TOTAL) NEWOWNID(COPIA) + 
   CHECK(*NO) DENSITY(*CTGTYPE) 
   MONMSG MSGID(CPF) EXEC(DO) 
  SNDMSG MSG('Fallida en INZTAP') TOUSR(QSECOFR) 
  GOTO   CMDLBL(FINAL) 
   ENDDO 
 
ENDSBS   SBS(*ALL) OPTION(*IMMED) 
 
LOOP: 
ENDSBS   SBS(*ALL) OPTION(*IMMED) 
MONMSG   MSGID(CPF1035) EXEC(DO) 
   RCVMSG   MSGTYPE(*EXCP) RMV(*YES) 
   DLYJOB   DLY(15) 
   GOTO CMDLBL(LOOP) 
ENDDO 
 
SAVSYS DEV(TAP01) ENDOPT(*LEAVE) OUTPUT(*PRINT) 
MONMSG MSGID(CPF) EXEC(SNDMSG MSG('Ha fallat el + 
   SAVSYS') TOUSR(QSECOFR)) 
SAVLIB LIB(*NONSYS) DEV(TAP01) ENDOPT(*LEAVE) + 
   TGTRLS(*CURRENT) ACCPTH(*YES) OUTPUT(*PRINT) 
MONMSG MSGID(CPF) EXEC(SNDMSG MSG('Ha fallat la + 
   copia de biblioteques') TOUSR(QSECOFR)) 
SAVDLO DLO(*ALL) DEV(TAP01) ENDOPT(*LEAVE) + 
   OUTPUT(*PRINT) 
MONMSG MSGID(CPF) EXEC(SNDMSG MSG('Ha fallat la + 
   copia de documents') TOUSR(QSECOFR)) 
SAVDEV('/QSYS.LIB/TAP01.DEVD') OBJ(('/*') + 
   ('QSYS.LIB' *OMIT) ('/QDLS' *OMIT)) + 
   SAVACT(*YES) ENDOPT(*UNLOAD) UPDHST(*YES) 
MONMSG MSGID(CPF) EXEC(SNDMSG MSG('Ha fallat la + 
   copia del IFS') TOUSR(QSECOFR)) 
 
STRSBS SBSD(QCTL) 

SBMJOB CMD(CALL PGM(QSYS/QSTRUP)) JOBQ(QBATCH) 

  FINAL: 
 
ENDPGM 

Monitorizo los errores por si falla algo que no se quede el proceso parado 
y me envie un mensaje. Los mensajes están en catalán pero creo que se 
entienden ;-)

Saludos,



Sergi Sitjes
Director Sistemes d'Informació/CIO
GENEBRE GROUP
E-mail: se...@genebre.es
Web:   http://www.genebre.es
Tel:  +34 93 298 80 02
Fax: +34 93 298 80 07



De: José Manuel Raña 
Para:   "'forum.help400'" 
Fecha:  03/03/2016 14:48
Asunto: RE: Planificar SAVSYS
Enviado por:forum.help400-boun...@listas.combios.es



En el manual de backup y recuperación están las instrucciones detalladas, 
de todas las opciones del menú save…. Es decir están los comandos CL que 
se usan.
 
Saludos

 José Manuel Raña D. 
  Jefe de Sistemas
   Zona Ind. Castillito; Calle 98 Nro. 68 - 240 
   San Diego - Carabobo 
   Venezuela 
   Teléfono:  +58 241 871.71.11 Ext: 327
   Fax:  +58 241 871.73.43 
   Email: josemrd.produ...@gmail.com
  
  jose...@produsca.com

P Antes de imprimir este e-mail piense bien si es necesario hacerlo
 
De: forum.help400-boun...@listas.combios.es [
mailto:forum.help400-boun...@listas.combios.es] En nombre de Marti Riera
Enviado el: jueves, 3 de marzo de 2016 9:07 a. m.
Para: forum.help400
Asunto: Re: Planificar SAVSYS
 
Hola,
 
Por mi parte, te falta el ENDOPT del SAVSYS y del SAVDLO.
 
En la ayuda de la pantalla del GO SAVE, sobre la opcion 21, si pulsas F1 
te da toda la información de lo ejecuta esa opción.
 
El tema del .devd, ya te ha contestado nuestro colega Sergio Simon, en su 
ejemplo.
 
Saludos

Martí Riera
 
2016-03-03 12:52 GMT+01:00 Fernando Idem :
Gracias por vuestras aportaciones; 
 
Alex la opción que tu comentas solo es para poner la Hora de inicio, pero 
no veo la fecha, es asi?.
Lo estamos probando, y evidentemente la qctl se queda parada y en el job 
esta el DLY.
 
   
 
 
Marti lo que tu comentas serias algo asi;
 
ENDSBS SBS(*ALL) OPTION(*IMMED)
DLY(120)
CHGMSGQ MSGQ(QSYSOPR) DLVRY(*NOTIFY)
SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES) endopt(*leave)
SAVDLO DLO(*ALL) SAVFLR(*ANY)
SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
OBJ(('/*') ('/QSYS.LIB' *OMIT) +
('/QDLS' *OMIT)) UPDHST(*YES) endopt(*unload)
 STRSBS QCTL 
 
He puesto el DLYJOB, aunque he visto en la información de IBM lo 
siguiente;
a.  CPF0994 Mandato ENDSBS SBS(*ALL) procesándose
b. CPF0968 El sistema ha finalizado en condición restringida
Lo que no veo es esta parte, SAV 
DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD'), ahi solo están la 
bibliotecas, ¿Habria que poner un *.DEVD?
 
Lo que estamos intentando conseguir, es planificar en un CL toda estas 
ordenes que se generan en el SAVSYS(Opcion 21). 
 
 
Un saludo
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
El 3 de marzo de 2016, 9:53, Marti Riera  escribió:
Hola,
 
Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema 
este en restringido, o mejor aun (mas complicado) esperar

Re: Planificar SAVSYS

2016-03-03 Por tema Alex Martínez 
exacto, solo puedes planificar la hora, no el día.

El ultimo mandato SAV es para salvar el IFS, excluyendo con el *OMIT las
bibliotecas, que ya se han salvado antes con SAVLIB *NONSYS

El 3 de marzo de 2016, 12:52, Fernando Idem 
escribió:

> Gracias por vuestras aportaciones;
>
> Alex la opción que tu comentas solo es para poner la Hora de inicio, pero
> no veo la fecha, es asi?.
> Lo estamos probando, y evidentemente la qctl se queda parada y en el job
> esta el DLY.
>
>   [image: Imágenes integradas 1]
>
>
> Marti lo que tu comentas serias algo asi;
>
> ENDSBS SBS(*ALL) OPTION(*IMMED)
> DLY(120)
> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*NOTIFY)
> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES) *endopt(*leave)*
> SAVDLO DLO(*ALL) SAVFLR(*ANY)
> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
> ('/QDLS' *OMIT)) UPDHST(*YES) *endopt(*unload)*
>  STRSBS QCTL
>
> He puesto el DLYJOB, aunque he visto en la información de IBM lo
> siguiente;
>
>1. CPF0994 Mandato ENDSBS SBS(*ALL) procesándose
>2. CPF0968 El sistema ha finalizado en condición restringida
>
> Lo que no veo es esta parte, *SAV 
> DEV('/QSYS.LIB/nombre-**dispositivo-soporte.DEVD'),
> *ahi solo están la bibliotecas, ¿Habria que poner un *.DEVD?
>
> Lo que estamos intentando conseguir, es planificar en un CL toda estas
> ordenes que se generan en el SAVSYS(Opcion 21).
>
>
> Un saludo
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> El 3 de marzo de 2016, 9:53, Marti Riera  escribió:
>
>> Hola,
>>
>> Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema
>> este en restringido, o mejor aun (mas complicado) esperar el mensaje de
>> sistema en estado restringido.
>>
>> En los mandatos SAV* ademas de indicar el dispositivo debes poner el
>> parametro ENDOPT(*LEAVE), para en el siguiente lib continuar desde la
>> ultima posicion, execpto en el ultimo SAV que debes poner ENDOPT(*REWIND o
>> *UNLOAD)
>>
>> Por ultimo cuando termines debes decidir si debes hacer un PWRDWNSYS
>> *IMMED con RESTART(*YES) o un STRSBS QCTL.
>>
>> Saludos
>>
>>
>>
>> Martí Riera
>>
>> 2016-03-03 9:38 GMT+01:00 Fernando Idem :
>>
>>> Buenos Dias;
>>>
>>> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
>>> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
>>> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
>>> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
>>> de IBM, vimos que había otras opciones, como las siguientes;
>>>
>>> ENDSBS SBS(*ALL) OPTION(*IMMED)
>>> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
>>> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
>>> SAVDLO DLO(*ALL) SAVFLR(*ANY)
>>> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
>>> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
>>> ('/QDLS' *OMIT)) UPDHST(*YES)
>>>
>>> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
>>> puede hacer y si nos daría seguridad para que luego el sistema arranque
>>> correctamente.
>>>
>>> Un saludo
>>>
>>>
>>>
>>>
>>> 
>>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>>> Forum.Help400 © Publicaciones Help400, S.L.
>>>
>>
>>
>> 
>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>> Forum.Help400 © Publicaciones Help400, S.L.
>>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

RE: Planificar SAVSYS

2016-03-03 Por tema José Manuel Raña 
En el manual de backup y recuperación están las instrucciones detalladas, de 
todas las opciones del menú save…. Es decir están los comandos CL que se usan.

 

Saludos



 José Manuel Raña D. 

  Jefe de Sistemas
   Zona Ind. Castillito; Calle 98 Nro. 68 - 240 
   San Diego - Carabobo 
   Venezuela 
   Teléfono:  +58 241 871.71.11 Ext: 327

   Fax:  +58 241 871.73.43 
   Email:   josemrd.produ...@gmail.com   
   

  jose...@produsca.com


P Antes de imprimir este e-mail piense bien si es necesario hacerlo

 

De: forum.help400-boun...@listas.combios.es 
[mailto:forum.help400-boun...@listas.combios.es] En nombre de Marti Riera
Enviado el: jueves, 3 de marzo de 2016 9:07 a. m.
Para: forum.help400
Asunto: Re: Planificar SAVSYS

 

Hola,

 

Por mi parte, te falta el ENDOPT del SAVSYS y del SAVDLO.

 

En la ayuda de la pantalla del GO SAVE, sobre la opcion 21, si pulsas F1 te da 
toda la información de lo ejecuta esa opción.

 

El tema del .devd, ya te ha contestado nuestro colega Sergio Simon, en su 
ejemplo.

 

Saludos




Martí Riera

 

2016-03-03 12:52 GMT+01:00 Fernando Idem :

Gracias por vuestras aportaciones; 

 

Alex la opción que tu comentas solo es para poner la Hora de inicio, pero no 
veo la fecha, es asi?.

Lo estamos probando, y evidentemente la qctl se queda parada y en el job esta 
el DLY.

 

  Imágenes integradas 1  

 

 

Marti lo que tu comentas serias algo asi;

 

ENDSBS SBS(*ALL) OPTION(*IMMED)

DLY(120)

CHGMSGQ MSGQ(QSYSOPR) DLVRY(*NOTIFY)

SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES) endopt(*leave)

SAVDLO DLO(*ALL) SAVFLR(*ANY)

SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +

OBJ(('/*') ('/QSYS.LIB' *OMIT) +

('/QDLS' *OMIT)) UPDHST(*YES) endopt(*unload)

 STRSBS QCTL 

 

He puesto el DLYJOB, aunque he visto en la información de IBM lo siguiente;

a.  CPF0994 Mandato ENDSBS SBS(*ALL) procesándose

b. CPF0968 El sistema ha finalizado en condición restringida

Lo que no veo es esta parte, SAV 
DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD'), ahi solo están la 
bibliotecas, ¿Habria que poner un *.DEVD?

 

Lo que estamos intentando conseguir, es planificar en un CL toda estas ordenes 
que se generan en el SAVSYS(Opcion 21).   

 

 

Un saludo

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

El 3 de marzo de 2016, 9:53, Marti Riera  escribió:

Hola,

 

Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema este en 
restringido, o mejor aun (mas complicado) esperar el mensaje de sistema en 
estado restringido.

 

En los mandatos SAV* ademas de indicar el dispositivo debes poner el parametro 
ENDOPT(*LEAVE), para en el siguiente lib continuar desde la ultima posicion, 
execpto en el ultimo SAV que debes poner ENDOPT(*REWIND o *UNLOAD) 

 

Por ultimo cuando termines debes decidir si debes hacer un PWRDWNSYS *IMMED con 
RESTART(*YES) o un STRSBS QCTL.

 

Saludos

 

 




Martí Riera

 

2016-03-03 9:38 GMT+01:00 Fernando Idem :

Buenos Dias;

 

Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que apague 
los subsistemas y luego genere un savsys, todo esto la hacemos en otra maquina 
antigua que tenemos para trastear, este SAVSYS que hicimos solo hizo una copia 
de datos de sistema, luego viendo en las explicaciones de IBM, vimos que había 
otras opciones, como las siguientes;

 

ENDSBS SBS(*ALL) OPTION(*IMMED)

CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)

SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)

SAVDLO DLO(*ALL) SAVFLR(*ANY)

SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +

OBJ(('/*') ('/QSYS.LIB' *OMIT) +

('/QDLS' *OMIT)) UPDHST(*YES) 

 

Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se puede 
hacer y si nos daría seguridad para que luego el sistema arranque correctamente.

 

Un saludo  

 

 

 

 


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

 



Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

 



Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

 


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Fernando Idem 
Muchas a gracias;

Lo probare y a ver que tal sale, y ya os diré. Menos mal que tenemos una
maquina para trastear :-)

Saludos

El 3 de marzo de 2016, 14:37, Marti Riera  escribió:

> Hola,
>
> Por mi parte, te falta el ENDOPT del SAVSYS y del SAVDLO.
>
> En la ayuda de la pantalla del GO SAVE, sobre la opcion 21, si pulsas F1
> te da toda la información de lo ejecuta esa opción.
>
> El tema del .devd, ya te ha contestado nuestro colega Sergio Simon, en su
> ejemplo.
>
> Saludos
>
> Martí Riera
>
> 2016-03-03 12:52 GMT+01:00 Fernando Idem :
>
>> Gracias por vuestras aportaciones;
>>
>> Alex la opción que tu comentas solo es para poner la Hora de inicio, pero
>> no veo la fecha, es asi?.
>> Lo estamos probando, y evidentemente la qctl se queda parada y en el job
>> esta el DLY.
>>
>>   [image: Imágenes integradas 1]
>>
>>
>> Marti lo que tu comentas serias algo asi;
>>
>> ENDSBS SBS(*ALL) OPTION(*IMMED)
>> DLY(120)
>> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*NOTIFY)
>> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES) *endopt(*leave)*
>> SAVDLO DLO(*ALL) SAVFLR(*ANY)
>> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
>> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
>> ('/QDLS' *OMIT)) UPDHST(*YES) *endopt(*unload)*
>>  STRSBS QCTL
>>
>> He puesto el DLYJOB, aunque he visto en la información de IBM lo
>> siguiente;
>>
>>1. CPF0994 Mandato ENDSBS SBS(*ALL) procesándose
>>2. CPF0968 El sistema ha finalizado en condición restringida
>>
>> Lo que no veo es esta parte, *SAV 
>> DEV('/QSYS.LIB/nombre-**dispositivo-soporte.DEVD'),
>> *ahi solo están la bibliotecas, ¿Habria que poner un *.DEVD?
>>
>> Lo que estamos intentando conseguir, es planificar en un CL toda estas
>> ordenes que se generan en el SAVSYS(Opcion 21).
>>
>>
>> Un saludo
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>> El 3 de marzo de 2016, 9:53, Marti Riera 
>> escribió:
>>
>>> Hola,
>>>
>>> Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema
>>> este en restringido, o mejor aun (mas complicado) esperar el mensaje de
>>> sistema en estado restringido.
>>>
>>> En los mandatos SAV* ademas de indicar el dispositivo debes poner el
>>> parametro ENDOPT(*LEAVE), para en el siguiente lib continuar desde la
>>> ultima posicion, execpto en el ultimo SAV que debes poner ENDOPT(*REWIND o
>>> *UNLOAD)
>>>
>>> Por ultimo cuando termines debes decidir si debes hacer un PWRDWNSYS
>>> *IMMED con RESTART(*YES) o un STRSBS QCTL.
>>>
>>> Saludos
>>>
>>>
>>>
>>> Martí Riera
>>>
>>> 2016-03-03 9:38 GMT+01:00 Fernando Idem :
>>>
 Buenos Dias;

 Estamos intentando planificar un SAVSYS, y hemos generado un Cl para
 que apague los subsistemas y luego genere un savsys, todo esto la hacemos
 en otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
 solo hizo una copia de datos de sistema, luego viendo en las explicaciones
 de IBM, vimos que había otras opciones, como las siguientes;

 ENDSBS SBS(*ALL) OPTION(*IMMED)
 CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
 SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
 SAVDLO DLO(*ALL) SAVFLR(*ANY)
 SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
 OBJ(('/*') ('/QSYS.LIB' *OMIT) +
 ('/QDLS' *OMIT)) UPDHST(*YES)

 Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
 puede hacer y si nos daría seguridad para que luego el sistema arranque
 correctamente.

 Un saludo




 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.

>>>
>>>
>>> 
>>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>>> Forum.Help400 © Publicaciones Help400, S.L.
>>>
>>
>>
>> 
>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>> Forum.Help400 © Publicaciones Help400, S.L.
>>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Marti Riera 
Hola,

Por mi parte, te falta el ENDOPT del SAVSYS y del SAVDLO.

En la ayuda de la pantalla del GO SAVE, sobre la opcion 21, si pulsas F1 te
da toda la información de lo ejecuta esa opción.

El tema del .devd, ya te ha contestado nuestro colega Sergio Simon, en su
ejemplo.

Saludos

Martí Riera

2016-03-03 12:52 GMT+01:00 Fernando Idem :

> Gracias por vuestras aportaciones;
>
> Alex la opción que tu comentas solo es para poner la Hora de inicio, pero
> no veo la fecha, es asi?.
> Lo estamos probando, y evidentemente la qctl se queda parada y en el job
> esta el DLY.
>
>   [image: Imágenes integradas 1]
>
>
> Marti lo que tu comentas serias algo asi;
>
> ENDSBS SBS(*ALL) OPTION(*IMMED)
> DLY(120)
> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*NOTIFY)
> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES) *endopt(*leave)*
> SAVDLO DLO(*ALL) SAVFLR(*ANY)
> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
> ('/QDLS' *OMIT)) UPDHST(*YES) *endopt(*unload)*
>  STRSBS QCTL
>
> He puesto el DLYJOB, aunque he visto en la información de IBM lo
> siguiente;
>
>1. CPF0994 Mandato ENDSBS SBS(*ALL) procesándose
>2. CPF0968 El sistema ha finalizado en condición restringida
>
> Lo que no veo es esta parte, *SAV 
> DEV('/QSYS.LIB/nombre-**dispositivo-soporte.DEVD'),
> *ahi solo están la bibliotecas, ¿Habria que poner un *.DEVD?
>
> Lo que estamos intentando conseguir, es planificar en un CL toda estas
> ordenes que se generan en el SAVSYS(Opcion 21).
>
>
> Un saludo
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> El 3 de marzo de 2016, 9:53, Marti Riera  escribió:
>
>> Hola,
>>
>> Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema
>> este en restringido, o mejor aun (mas complicado) esperar el mensaje de
>> sistema en estado restringido.
>>
>> En los mandatos SAV* ademas de indicar el dispositivo debes poner el
>> parametro ENDOPT(*LEAVE), para en el siguiente lib continuar desde la
>> ultima posicion, execpto en el ultimo SAV que debes poner ENDOPT(*REWIND o
>> *UNLOAD)
>>
>> Por ultimo cuando termines debes decidir si debes hacer un PWRDWNSYS
>> *IMMED con RESTART(*YES) o un STRSBS QCTL.
>>
>> Saludos
>>
>>
>>
>> Martí Riera
>>
>> 2016-03-03 9:38 GMT+01:00 Fernando Idem :
>>
>>> Buenos Dias;
>>>
>>> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
>>> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
>>> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
>>> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
>>> de IBM, vimos que había otras opciones, como las siguientes;
>>>
>>> ENDSBS SBS(*ALL) OPTION(*IMMED)
>>> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
>>> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
>>> SAVDLO DLO(*ALL) SAVFLR(*ANY)
>>> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
>>> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
>>> ('/QDLS' *OMIT)) UPDHST(*YES)
>>>
>>> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
>>> puede hacer y si nos daría seguridad para que luego el sistema arranque
>>> correctamente.
>>>
>>> Un saludo
>>>
>>>
>>>
>>>
>>> 
>>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>>> Forum.Help400 © Publicaciones Help400, S.L.
>>>
>>
>>
>> 
>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>> Forum.Help400 © Publicaciones Help400, S.L.
>>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Sergio Simón 
Buenos días Fernando:

   Yo para paradas "cortas" salvo sin vías de acceso y ejecuto esta CL. Lo
ejecuto desde consola y en interactivo:

 PGM

 INZTAP DEV(TAP01) NEWVOL(SYSTEM) NEWOWNID('Copia +
  integra') CHECK(*NO) DENSITY(*ULTRIUM5)

 ENDSYS DELAY(120)

WAIT:DLYJOB DLY(60)

 SAVSYS DEV(TAP01) VOL(SYSPMI) USEOPTBLK(*NO) +
  OUTPUT(*PRINT)
 MONMSG MSGID(CPF3785) EXEC(GOTO CMDLBL(WAIT))

 QSYS/SAVLIB LIB(*NONSYS) DEV(TAP01) ENDOPT(*LEAVE) +
  *ACCPTH(*NO)* DTACPR(*YES)
OUTPUT(*PRINT)

  SAVDLO DLO(*ALL) DEV(TAP01) ENDOPT(*LEAVE) +
   OUTPUT(*PRINT)

  QSYS/SAV   DEV('/QSYS.LIB/tap01.devd') OBJ(('/*') +
   ('/QSYS.LIB' *OMIT) ('/QDLS' *OMIT)) +
   SAVACT(*SYNC) SAVACTOPT(*ALWCKPWRT) +
   OUTPUT(*PRINT) ENDOPT(*UNLOAD) DTACPR(*YES)


  ENDPGM

   Esta Cl salva todo el sistema y datos del servidor, en su día lo comenté
con IBM y me comentaron que sí podría restaurar microcódigo, sistema
operativo y datos del sistema con esta CL. Entiendo que de someterla se
debe someter por el subsistema QCTL.

   Para levantar los subsistemas después del salvar STRSBS SBSD(QCTL)
debería arrancar todo lo finalizado con el ENDSYS.

   Sin embargo como indican en otras conversaciones el mandato GO SAVE con
la opción 21 permite programar un Salvado completo del sistema y funciona
muy bien.

Saludos y espero que te sirva de ayuda.

El 3 de marzo de 2016, 9:38, Fernando Idem  escribió:

> Buenos Dias;
>
> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
> de IBM, vimos que había otras opciones, como las siguientes;
>
> ENDSBS SBS(*ALL) OPTION(*IMMED)
> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
> SAVDLO DLO(*ALL) SAVFLR(*ANY)
> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
> ('/QDLS' *OMIT)) UPDHST(*YES)
>
> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
> puede hacer y si nos daría seguridad para que luego el sistema arranque
> correctamente.
>
> Un saludo
>
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Fernando Idem 
Gracias por vuestras aportaciones;

Alex la opción que tu comentas solo es para poner la Hora de inicio, pero
no veo la fecha, es asi?.
Lo estamos probando, y evidentemente la qctl se queda parada y en el job
esta el DLY.

  [image: Imágenes integradas 1]


Marti lo que tu comentas serias algo asi;

ENDSBS SBS(*ALL) OPTION(*IMMED)
DLY(120)
CHGMSGQ MSGQ(QSYSOPR) DLVRY(*NOTIFY)
SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES) *endopt(*leave)*
SAVDLO DLO(*ALL) SAVFLR(*ANY)
SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
OBJ(('/*') ('/QSYS.LIB' *OMIT) +
('/QDLS' *OMIT)) UPDHST(*YES) *endopt(*unload)*
 STRSBS QCTL

He puesto el DLYJOB, aunque he visto en la información de IBM lo siguiente;

   1. CPF0994 Mandato ENDSBS SBS(*ALL) procesándose
   2. CPF0968 El sistema ha finalizado en condición restringida

Lo que no veo es esta parte, *SAV
DEV('/QSYS.LIB/nombre-**dispositivo-soporte.DEVD'),
*ahi solo están la bibliotecas, ¿Habria que poner un *.DEVD?

Lo que estamos intentando conseguir, es planificar en un CL toda estas
ordenes que se generan en el SAVSYS(Opcion 21).


Un saludo
















El 3 de marzo de 2016, 9:53, Marti Riera  escribió:

> Hola,
>
> Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema
> este en restringido, o mejor aun (mas complicado) esperar el mensaje de
> sistema en estado restringido.
>
> En los mandatos SAV* ademas de indicar el dispositivo debes poner el
> parametro ENDOPT(*LEAVE), para en el siguiente lib continuar desde la
> ultima posicion, execpto en el ultimo SAV que debes poner ENDOPT(*REWIND o
> *UNLOAD)
>
> Por ultimo cuando termines debes decidir si debes hacer un PWRDWNSYS
> *IMMED con RESTART(*YES) o un STRSBS QCTL.
>
> Saludos
>
>
>
> Martí Riera
>
> 2016-03-03 9:38 GMT+01:00 Fernando Idem :
>
>> Buenos Dias;
>>
>> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
>> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
>> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
>> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
>> de IBM, vimos que había otras opciones, como las siguientes;
>>
>> ENDSBS SBS(*ALL) OPTION(*IMMED)
>> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
>> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
>> SAVDLO DLO(*ALL) SAVFLR(*ANY)
>> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
>> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
>> ('/QDLS' *OMIT)) UPDHST(*YES)
>>
>> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
>> puede hacer y si nos daría seguridad para que luego el sistema arranque
>> correctamente.
>>
>> Un saludo
>>
>>
>>
>>
>> 
>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>> Forum.Help400 © Publicaciones Help400, S.L.
>>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: UNA DE PREFORMATOS (se comprime todo el documento)

2016-03-03 Por tema informatic 
Cuando salen las rayas negras es cuando imprimes directo desde el spool
, si lo transformas a pdf se imprime correctamente en color , ,  pero
eso ha pasado siempre..  si alguién sabe como imprimir 
directamente desde el spool en color sin pasar por PDF que lo explique ,
por favor ... 

A 2016-03-03 09:25, Fernando Idem escrigué:

> Buenos días Carlos; 
> 
> Cuando salen las rayas negras es que has elegido la impresora para imprimir 
> el OVL en blanco y negro teniendo las imágenes en color. 
> Yo para imprimir los word en color utilizo la Generic Infoprint 600AFP y en 
> B/N la Generic Infoprint 300AFP. 
> 
> Saludos 
> 
> El 24 de febrero de 2016, 17:11, CARLOS SANTIAGO  
> escribió:
> 
>> Hola 
>> 
>> Lo acabo de probar. Pero como el preformato es en color, en la impresora 
>> solo me salen rayas negras. 
>> 
>> La impresora es una hp laserjet pro 200 m251n. 
>> 
>> Esta la tengo configurada como 
>> 
>> Bits de detención  . . . . . . . . :   1 
>> 
>> Transf impresión sist princ  . . . :   *YES  
>> 
>> Fabricante, tipo y modelo  . . . . :   *HPCOLORLJ 
>> 
>> Cargador de papel 1  . . . . . . . :   *A4   
>> 
>> Cargador de papel 2  . . . . . . . :   *LETTER   
>> 
>> DE: forum.help400-boun...@listas.combios.es 
>> [mailto:forum.help400-boun...@listas.combios.es] EN NOMBRE DE Alex Martínez
>> ENVIADO EL: miércoles, 24 de febrero de 2016 11:22
>> PARA: forum.help400
>> ASUNTO: Re: UNA DE PREFORMATOS (se comprime todo el documento) 
>> 
>> ¿ has probado a imprimir directamente el overlay ?
>> 
>> OVRPRTFFILE(QSYSPRT) DEVTYPE(*AFPDS) +  
>> 
>> FRONTOVL(/)   
>> 
>> CPYF   FROMFILE(SYSIBM/SYSDUMMY1) TOFILE(QSYSPRT) + 
>> 
>> OUTFMT(*HEX) NBRRCDS(1)
>> 
>> El 23 de febrero de 2016, 19:00, CARLOS SANTIAGO  
>> escribió:
>> 
>> Buenas tardes 
>> 
>> Os comento 
>> 
>> Sistema Operativo 7.1 
>> 
>> Diseño un preformato en Word y lo subo al as400. 
>> 
>> Genero el ovl. 
>> 
>> Hasta aquí todo correcto. 
>> 
>> A partir de aquí genero un pdf 
>> 
>> OVRPRTFFILE() DEVTYPE(*AFPDS) DUPLEX(*YES) + 
>> 
>> FRONTOVL(/) +
>> 
>> BACKOVL(/ 0 0 *CONSTANT) +   
>> 
>> OUTQ(QPRINT) TOSTMF() WSCST(*PDF) +   
>> 
>> OVRSCOPE(*JOB) 
>> 
>> El backovl lo pongo porque lleva unas condiciones por cada hoja que se 
>> genera. 
>> 
>> En el frontovl aunque no lo ponga, Sí que tiene puesto 
>> 
>> Preformato cara anterior:   
>> 
>> Preformato . . . . . . . . . . >Nombre, *NONE  
>> 
>> Biblioteca . . . . . . . . . >Nombre, *LIBL, *CURLIB 
>> 
>> Desplazamiento vertical  . . .   0 0-57.790   
>> 
>> Desplazamiento transversal . .   0 0-57.790   
>> 
>> El pdf se genera correctamente, salvo por lo siguiente 
>> 
>> Se comprime Todo el documento ¡¡¡ 
>> 
>> Y lo he probado todo. 
>> 
>> Cuando imprimo el Word por la impresora sale correctamente. 
>> 
>> A alguien se le ocurre algo? 
>> 
>> Gracias anticipadas
>> 
>> 
>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>> Forum.Help400 (c) Publicaciones Help400, S.L. 
>> 
>> 
>> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
>> Forum.Help400 (c) Publicaciones Help400, S.L.
> 
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 (c) Publicaciones Help400, S.L.
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Marti Riera 
Hola,

Despues del ENDSBS deberias hacer un DLYJOB para esperar que el sistema
este en restringido, o mejor aun (mas complicado) esperar el mensaje de
sistema en estado restringido.

En los mandatos SAV* ademas de indicar el dispositivo debes poner el
parametro ENDOPT(*LEAVE), para en el siguiente lib continuar desde la
ultima posicion, execpto en el ultimo SAV que debes poner ENDOPT(*REWIND o
*UNLOAD)

Por ultimo cuando termines debes decidir si debes hacer un PWRDWNSYS *IMMED
con RESTART(*YES) o un STRSBS QCTL.

Saludos



Martí Riera

2016-03-03 9:38 GMT+01:00 Fernando Idem :

> Buenos Dias;
>
> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
> de IBM, vimos que había otras opciones, como las siguientes;
>
> ENDSBS SBS(*ALL) OPTION(*IMMED)
> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
> SAVDLO DLO(*ALL) SAVFLR(*ANY)
> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
> ('/QDLS' *OMIT)) UPDHST(*YES)
>
> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
> puede hacer y si nos daría seguridad para que luego el sistema arranque
> correctamente.
>
> Un saludo
>
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Planificar SAVSYS

2016-03-03 Por tema Alex Martínez 
Hola

Si el SAVSYS es correcto puedes arrancar el sistema, sino hay problemas con
el dispositivo de carga, claro.

Decirte que desde la consola del sistema, la opción 21 de GO SAVE se puede
arrancar a una hora de inicio planificada y ya apaga los subsistemas y
copia todo el sistema.


El 3 de marzo de 2016, 9:38, Fernando Idem  escribió:

> Buenos Dias;
>
> Estamos intentando planificar un SAVSYS, y hemos generado un Cl para que
> apague los subsistemas y luego genere un savsys, todo esto la hacemos en
> otra maquina antigua que tenemos para trastear, este SAVSYS que hicimos
> solo hizo una copia de datos de sistema, luego viendo en las explicaciones
> de IBM, vimos que había otras opciones, como las siguientes;
>
> ENDSBS SBS(*ALL) OPTION(*IMMED)
> CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK o *NOTIFY)
> SAVSYSSAVLIB LIB(*NONSYS) ACCPTH(*YES)
> SAVDLO DLO(*ALL) SAVFLR(*ANY)
> SAV DEV('/QSYS.LIB/nombre-dispositivo-soporte.DEVD') +
> OBJ(('/*') ('/QSYS.LIB' *OMIT) +
> ('/QDLS' *OMIT)) UPDHST(*YES)
>
> Como en estas cosas no estoy muy ducho, me gustaría preguntaros, si se
> puede hacer y si nos daría seguridad para que luego el sistema arranque
> correctamente.
>
> Un saludo
>
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: UNA DE PREFORMATOS (se comprime todo el documento)

2016-03-03 Por tema Fernando Idem 
Buenos días Carlos;

Cuando salen las rayas negras es que has elegido la impresora para imprimir
el OVL en blanco y negro teniendo las imágenes en color.
Yo para imprimir los word en color utilizo la Generic Infoprint 600AFP y en
B/N la Generic Infoprint 300AFP.

Saludos



El 24 de febrero de 2016, 17:11, CARLOS SANTIAGO 
escribió:

> Hola
>
> Lo acabo de probar. Pero como el preformato es en color, en la impresora
> solo me salen rayas negras.
>
> La impresora es una hp laserjet pro 200 m251n.
>
> Esta la tengo configurada como
>
>
>
> Bits de detención  . . . . . . . . :   1
>
> Transf impresión sist princ  . . . :   *YES
>
> Fabricante, tipo y modelo  . . . . :   *HPCOLORLJ
>
> Cargador de papel 1  . . . . . . . :   *A4
>
> Cargador de papel 2  . . . . . . . :   *LETTER
>
>
>
>
>
>
>
> *De:* forum.help400-boun...@listas.combios.es [mailto:
> forum.help400-boun...@listas.combios.es] *En nombre de *Alex Martínez
> *Enviado el:* miércoles, 24 de febrero de 2016 11:22
> *Para:* forum.help400
> *Asunto:* Re: UNA DE PREFORMATOS (se comprime todo el documento)
>
>
>
> ¿ has probado a imprimir directamente el overlay ?
>
>
>
> OVRPRTFFILE(QSYSPRT) DEVTYPE(*AFPDS) +
>
>  FRONTOVL(/)
>
>
>
> CPYF   FROMFILE(SYSIBM/SYSDUMMY1) TOFILE(QSYSPRT) +
>
>  OUTFMT(*HEX) NBRRCDS(1)
>
>
>
> El 23 de febrero de 2016, 19:00, CARLOS SANTIAGO 
> escribió:
>
> Buenas tardes
>
> Os comento
>
> Sistema Operativo 7.1
>
> Diseño un preformato en Word y lo subo al as400.
>
> Genero el ovl.
>
> Hasta aquí todo correcto.
>
> A partir de aquí genero un pdf
>
>
>
> OVRPRTFFILE() DEVTYPE(*AFPDS) DUPLEX(*YES) +
>
>  FRONTOVL(/) +
>
>  BACKOVL(/ 0 0 *CONSTANT) +
>
>  OUTQ(QPRINT) TOSTMF() WSCST(*PDF) +
>
>  OVRSCOPE(*JOB)
>
>
>
> El backovl lo pongo porque lleva unas condiciones por cada hoja que se
> genera.
>
>
>
> En el frontovl aunque no lo ponga, Sí que tiene puesto
>
>
>
> Preformato cara anterior:
>
>   Preformato . . . . . . . . . . >Nombre, *NONE
>
> Biblioteca . . . . . . . . . >Nombre, *LIBL, *CURLIB
>
>   Desplazamiento vertical  . . .   0 0-57.790
>
>   Desplazamiento transversal . .   0 0-57.790
>
>
>
>
>
> El pdf se genera correctamente, salvo por lo siguiente
>
>
>
> Se comprime Todo el documento ¡¡¡
>
>
>
> Y lo he probado todo.
>
> Cuando imprimo el Word por la impresora sale correctamente.
>
>
>
> A alguien se le ocurre algo?
>
>
>
> Gracias anticipadas
>
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>
>
>
> 
> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
> Forum.Help400 © Publicaciones Help400, S.L.
>

Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.