Gerar relatorio por JOB para JPEG

173 views
Skip to first unread message

Bruno Beltrão

unread,
Dec 15, 2010, 7:11:48 AM12/15/10
to advpl-pr...@googlegroups.com, advpl_...@googlegroups.com, advp...@googlegroups.com

Bom dia Pessoal,

Não sei se seria uma limitação da microsiga ou algum erro meu. Seguinte estou tentando gerar um relatorio pra JPEG via JOB utilizando configuração apenas no INI:

[ONSTART]
Jobs=U_TESTETMS
;RefreshRate=60

[U_TESTETMS]
Main=U_TESTETMS
Environment=QUEFREN

So que se eu usar o DEV o relatorio é gerado sem problema, mas se eu usar o JOB o relatorio não gera, segue o fonte:

#include "protheus.ch"                         
#INCLUDE "TBICONN.CH"

User Function TesteTms()                                            

RESET ENVIRONMENT
RpcSetType ( 3 )
PREPARE ENVIRONMENT EMPRESA "03" FILIAL "01" MODULO "FIN" 

Private oPrint  := TMSPrinter():New(OemToAnsi('Grande Total Fisico'))
private cIniFile  := GetADV97()
private cPathRel  := GetPvProfString(GetEnvServer(),"StartPath","ERROR", cIniFile )

CONOUT("Inmiciando JOB")

oPrint:SetLandScape()               
oPrint:Say(100,0120,"Grupo de Produtos: ")
oPrint:saveallasjpeg(cPathRel + "\impgraf",2500,1200,180)

CONOUT("Fechando JOB")

return()


Isso ja aconteceu com alguem?

Obrigado!

--

Bruno Beltrão
Bacharel em Sistemas de Informação
Desenvolvedor (ADVPL, Delphi, Java)
João Pessoa - PB
Tel: (83)8804-3207 / (83)9107-3365 / (83)3247-5469

Johab de Oliveira Silvestre

unread,
Feb 14, 2011, 1:41:16 PM2/14/11
to advp...@googlegroups.com
Olá amigos,

Estou com um problema de ordem URGENTISSIMA!

Estamos tentanto implantar a NFSE (NOTA FISCAL DE SERVIÇO ELETRONICA) aqui no protheus, mas desde então não conseguimos todas tentativas foram fracassadas. Já fizemos praticamente tudo, sem sucesso!

Gostaria de saber se alguem já configurou a NFSE para o municipio de João pessoa.

O erro que sempre nos acompanha é:

Cod Erro = E160
Mensagem = Arquivo enviado fora da estrutura do arquivo XML de entarda.



Desde já agradeço a atenção!

Atenciosamente
Johab Silvestre - T.I.


Date: Wed, 15 Dec 2010 09:11:48 -0300
Subject: [advpl-pb] Gerar relatorio por JOB para JPEG
From: brunol...@gmail.com
To: advpl-pr...@googlegroups.com; advpl_...@googlegroups.com; advp...@googlegroups.com
--
Você está recebendo esta mensagem porque se inscreveu no grupo "ADVPL-PB" dos Grupos do Google.
Para postar neste grupo, envie um e-mail para advp...@googlegroups.com.
Para cancelar a inscrição nesse grupo, envie um e-mail para advpl-pb+u...@googlegroups.com.
Para obter mais opções, visite esse grupo em http://groups.google.com/group/advpl-pb?hl=pt-BR.
Reply all
Reply to author
Forward
0 new messages