FAQs - Suporte técnico

Cross Segmento - TOTVS Backoffice Linha Protheus - ADVPL - Método INT25


Ocorrências
1- A FWMSPRINTER tem os formato ITF14 ou DUN14 ?

2- Ao utilizar a classe FWMsBar(INT25), o Protheus não esta respeitando nenhuma configuração nessa classe, a largura do código de barras, ele fica grande demais para passar em uma leitura de banco

Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus) - ADVPL –  A partir da versão 12.1.17

Causa
 o FWMSBar possui algumas limitações neste aspecto.


Solução

1- O DUN14 tem as mesmas características do método INT25 já existente na FWMsPrinter.

2 - Os métodos específicos permitem melhor dimensionamento dos objetos gráficos no relatório enquanto

Imprime código de barra no padrão Int25

@param nRow Posição relativa ao topo
@param nCol Posição relativa à esquerda
@param cCodeBar Texto a ser codificado
@param nWidth Largura da Barra
@param nHeight Altura da Barra
@param lSay Indica se deve colocar say com o conteúdo em baixo do código de barras
@param lCheck Indica se deve calcular o digito verificador

//--------------------------------------------------------------
Method Int25(nRow,nCol,cCodeBar,nWidth,nHeight,lSay,lCheck,oFont) Class FWMSPrinter

///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

Exemplo de customização

#Include "PROTHEUS.CH
#Include "RPTDEF.CH"
#INCLUDE "TBICONN.CH"

User Function Int25()

Local oFont := TFont():New('Courier new',,-16,.T.)
local cLineDig := ""
Local lAdjustToLegacy := .T.
Local lDisableSetup := .T.
Local cNUM:="0001" //É O NOME DO BOLETO NO MEU CASO O CODIGO DA NOTA
Local CodBarras := "23793047089000000042384022562100266430000100000" //CODIGO DE BARRAS A SE DECODIFICADO
Private oPrn

PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01"

oPrn := FWMSPrinter():New(cNUM,IMP_PDF,lAdjustToLegacy,,lDisableSetup,,,,,.F.)//instaciando a classe
oPrn:SetResolution(72)
oPrn:SetPortrait()
oPrn:SetPaperSize(DMPAPER_A4)
oPrn:StartPage()
oPrn:cPathPDF := "c:\Temp\"
oPrn:Int25(000800,300,CodBarras,0.73,40,.F.,.F., oFont)
oPrn:EndPage()
oPrn:Preview()
FreeObj(oPrn)

RESET ENVIRONMENT

Return
Esse artigo foi útil?
Usuários que acharam isso útil: 1 de 2

4 Comentários

  • Avatar
    Lucas Sagiorato

    Os valores de nWidth e nHeight são em qual unidade de medida? Pixels, centímetros?

    0
    Ações de comentário Permalink
  • Avatar
    GIVANILDO ANDRADE LOPES

    Sr. Lucas,

    Esse canal está aberto e é exclusivo para sugestões de melhoria nos artigos. Se mesmo após seguir os passos do artigo tenha encontrado uma inconsistência, foi criado um ticket no canal de atendimento.

    Em conjunto com você, Cliente TOTVS, desejamos criar artigos de qualidade para agilizar o atendimento e fomentar o autoatendimento.

    0
    Ações de comentário Permalink
  • Avatar
    RODRIGO BORSATO LUCIO

    Essa função não possui o parâmetro para impressão no sentido vertical?

    0
    Ações de comentário Permalink
  • Avatar
    Wanderson Fernandes de Souza

    Bom Dia,

    Está Solução que vocês passaram para minha empresa não funcionou, o que podemos fazer?

     

    0
    Ações de comentário Permalink
Por favor, entre para comentar.
X Fechar

Olá ,

Há pendência referente a um de seus produtos contratados para a empresa ().

Entre em contato com o Centro de Serviços TOTVS para tratativa.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cobrança – Verificação de pendências financeiras . clique aqui.

TOTVS

X Fechar

Olá ,

Seu contato não está cadastrado no Portal do Cliente como um perfil autorizado a solicitar consultoria telefônica.

Por gentileza, acione o administrador do Portal de sua empresa para: (1)configurar o seu acesso ou (2)buscar um perfil autorizado para registro desse atendimento.

Em caso de dúvidas sobre a identificação do contato administrador do Portal, ligue (11) 4003-0015, opção 7 e, em seguida, opção 4 para buscar o suporte com o time de Assessoria ao Portal do Cliente. . clique aqui.

TOTVS

X Fechar

Olá ,

Para o atendimento de "Consultoria Telefônica" você deverá estar de acordo com o Faturamento.

TOTVS

X Fechar

Olá,

Algo inesperado ocorreu, e o usuario nao foi reconhecido ou você nao se encontra logado

Por favor realize um novo login

Em caso de dúvidas, entre em contato com o administrador do Portal de Clientes de sua empresa para verificação do seu usuário, ou Centro de Serviços TOTVS.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cadastros . clique aqui.

TOTVS

Chat _

Preencha os campos abaixo para iniciar o atendimento:

Chat _