Post by Roberto Tempestiper la oki userei un MFRTYPMDL(*LEXMARKC750)
per la lexmark m5255 userei MFRTYPMDL(*LEXOPTRAT)
per entrambe userei *IBMPJLDRV invece di *HPPJLDRV
fammi sapere
sempre uguale... che palle con queste stampanti !!
questo e' programmino di test
H DFTACTGRP(*NO)
fPROVAEMA o f 132 printer usropn
D/copy DEFINE,$$_DEFINE
d a s 1 inz('''')
Dsleep PR 10U 0 extproc('sleep')
D seconds 10U 0 value
D rc S 10U 0
D seconds S 10U 0 inz(2)
cmd = 'CHGPRTF FILE(PROVAEMA) DEV(CEDR) ALIGN(*NO)
OUTQ(*LIBL/CEDR)';
exsr esegui;
cmd = 'ENDWTR WTR(CEDR) OPTION(*IMMED)';
exsr esegui;
rc = sleep(seconds) ;
cmd = 'VRYCFG CFGOBJ(cedr) CFGTYPE(*DEV) STATUS(*off)';
exsr esegui;
cmd = 'DLTDEVD DEVD(CEDR)';
exsr esegui;
cmd =
'CRTDEVPRT DEVD(CEDR) DEVCLS(*LAN) TYPE(3812) MODEL(1) '+
'LANATTACH(*IP) PORT(9100) ATTACH(*DIRECT) '+
'ONLINE(*YES) FONT(15 *NONE) ' +
'FORMFEED(*AUTOCUT) SEPDRAWER(*FILE) ' +
'PRTERRMSG(*INFO) MSGQ(*LIBL/QSYSOPR) ' +
'ACTTMR(170) INACTTMR(*SEC15) ' +
'LINESPEED(19200) WORDLEN(8) PARITY(*NONE) ' +
'STOPBITS(1) TRANSFORM(*YES) ' +
'MFRTYPMDL(*LEXMARKC750) PPRSRC1(*CONT132) '+
'PPRSRC2(*A4) ENVELOPE(*NUMBER10) ' +
'ASCII899(*NO) IMGCFG(*NONE) ' +
'CHRID(*SYSVAL) RMTLOCNAME('+a+'10.168.1.54'+a+') ' +
'SYSDRVPGM(*IBMPJLDRV)';
exsr esegui;
cmd = 'VRYCFG CFGOBJ(cedr) CFGTYPE(*DEV) STATUS(*on)';
exsr esegui;
cmd = 'strprtwtr cedr';
exsr esegui;
cmd = 'ovrPRTF FILE(PROVAEMA) DEV(CEDR) OUTQ(*LIBL/CEDR)
PAGRTT(90)';
exsr esegui;
open provaema;
except ;
*inlr = *on;
begsr esegui;
monitor;
qcmdexc( cmd : %len(cmd));
on-error;
dsply (%subst(cmd:1:40));
endmon;
endsr;
oPROVAEMA e
o
'AAAAAAAAAAAAAAAAAAAAAAAAAA'