Versão atual:

Função saybitmap foi descontinuada?

Pessoal, bom dia.

Tenho um relatório em que no meu cabeçalho ele imprime uma imagem, porém, vários relatórios desse tipo parou de gerar a imagem. Abaixo um trecho do meu fonte.

    oPrn:SayBitmap(050,0020,cBitMap)
    oPrn:Say(040,1900,SM0->M0_NOMECOM,oFont1,100)
    oPrn:Say(090,1900,"Endereco: "+substr(SM0->M0_ENDENT,1,32),oFont9,100)
    oPrn:Say(130,1900,"Fone: "+alltrim(SM0->M0_TEL),oFont9,100)
    oPrn:Say(130,2340,"  Fax: "+alltrim(SM0->M0_FAX),oFont9,100)
    oPrn:Say(170,1900,"CEP: "+substr(SM0->M0_CEPENT,1,5)+"-"+substr(SM0->M0_CEPENT,6,3)+" - "+substr(SM0->M0_CIDENT,1,17)+" - "+SM0->M0_ESTENT,oFont9,100)
    oPrn:Say(210,1900,"CNPJ: "+Transform(alltrim(SM0->M0_CGC),"@R 99.999.999/9999-99")+"  INSCR.: "+Transform(alltrim(SM0->M0_INSC),"@R 99.999.999-99"),oFont9,100)
    oPrn:Say(250,1900,"Data de Emissão: "+dtoc(DATE()),oFont9,100)
    oPrn:Say(380,900,"Recibo de Pagamento a Autonomo - RPA ",oFont5,100)

A váriavel cBitmap é instanciada no começo do fonte com o seguinte trecho:

cBitMap  := "\SYSTEM\Duplic.bmp"

Segue print de como está gerando. Capturar.JPG Veja acima que ele sai sem a imagem, a versão do nosso prothues é a 12.1.25. Algo interessante que percebi é que esses relatórios em que não gera mais a imagem são relatórios do modelo antigo, onde não aparece a opção de gerar em PDF, apenas gera a impressão na tela para o usuário imprimir.

Versão (1):

Ver a versão formatada

Função saybitmap foi descontinuada?

Comentário

new question