Estou com um problema ao gerar um relatório com Treport , Quando eu gero em excel formato normal ele gera os arquivos normalmente , Mais quando eu gero em excel formato de tabela aparece os dados vazios com os parâmetros iguais , Fonte anexado.
Relatório customizado Formato de tabela vazio.
- Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
- Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
- Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
- Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
- Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!
1 resposta
-
Caio,
Existem alguns pontos que você precisa dar uma revisada.
O principal, que pode estar interferindo em sua impressão, é a utilização do método
finishe depois do métodoprintnovamente:oSection1:Finish() oSection2:Finish() oSection1:Print() oSection2:Print()Onde a documento do TReport informa que não é necessário chamar o método
finish, uma vez que o métodoprintjá tem essa inteligência:Não é necessário executar o método Finish se for utilizar o método Print, já que este faz o controle de inicialização e finalização da impressão
Vendo alguns outros pontos, você consegue deixar o código mais simples:
STATIC Function TemQBP( ) Local lRet := .F. Local aArea := GetArea() dbSelectArea("SB1") lRet := FieldPos( "B1_QBP" ) > 0 RestArea(aArea) Return lRetNão é necessário fazer todo esse processo para verificar a existência de um campo, basta colocar o alias a esquerda do
FieldPos:static function TemQBP() Return SB1->( FieldPos("B1_QBP") ) > 0Com isso você terá exatamente o mesmo retorno, caso a tabela não esteja aberta, ela será aberta e a workarea não será alterada.
A função
AjustaSX1pode ser completamente removida, uma vez que a funçãoPutSx1está descontinuada já há alguns anos, ou seja, essa função não está fazendo nada.
Documentações:
https://tdn.totvs.com/display/PROT/TReport
https://tdn.totvs.com/pages/viewpage.action?pageId=244740739
-
Boa Tarde Caio, Consegui resolver o problema?
— Eduardo Candido 24 de Nov de 2020