Imprimir mais de 99 paginas na FWMSPRINTER

Produto:

ADVPL

Versões:

P11 e P12

Ocorrência:

Não é possível imprimir mais de 99 paginas na Fwmsprinter

Ambiente:

Todos

Passo a passo:

A Classe Fwmsprinter com a opção de apresentação da tela do Setup tem a limitação de 99 paginas, mas é possível imprimir mas que 99 paginas utilizando o 13º parâmetro "nQtdCopy"  da classe Fwmsprinter sem apresentação de tela

Exemplo:

local nQtdCopy:= "150"

oPrint:= FWMSPrinter():New(cFilePrint, IMP_SPOOL , lAdjustToLegacy, cLocal, .T.,.f., , , .t., , ,,nQtdCopy )
oPrint:StartPage()
oPrint:lserver:=.T.
oPrint:linjob:=.T.
oPrint:cSession :=""
oPrint:cPrinter := "\\printserver-02\SPCloudPrinter-Color" // nome da impressora
oPrint:Box(10, 10, 110, 110)
oPrint:Say(10, 10, "TESTANDO")
oPrint:nPageCount:=2
oPrint:EndPage()
oPrint:Print()

 

Observações:

Link.: http://tdn.totvs.com/display/public/mp/FWMsPrinter