Fórum ajuda com rave report #423571

13/09/2012

0

pessoal tenho que montar uma mala direta com cartas de cobrança a clientes cadastrados em um sistema meu,
so que deveria fazer isso com o rave report, não estou conseguindo imprimir a carta de cobrança preenchida com alguuns dados relativo ao debito.

se tiverem um exemplo, ou um link para abaixar um fonte demo me ajudem

por favor, tirem esta corda de meu pescoço......
Edson Melo

Edson Melo

Responder

Posts

14/09/2012

Bruno Leandro

Ola Edson qual a dificuldade a criação completa ou algo especifico
Responder

Gostei + 0

14/09/2012

Paulo Freire

Rapaz tem uma vídeo aula do rodrigo Carreiro especifica para isso, eu usei a uns 3 anos atrás para fazer Contrato de clientes para uma imobiliaria, no Rave Reports, vou procurar e posto aqui, se tu achar da um retorno.
Responder

Gostei + 0

14/09/2012

Edson Melo

ola bruno
o problema e o seguinte tenho que montar uma mala direta aonde tenho que mandar uma carta de cobrança a cliente em atrazo, esta carta e composta de um cabecario uma tabela e mais um texto finalizando a correspondencia a primeira parte o cabecario e eo texto e a tabela coloco, mas apos a tabela tem um texto final e o local de assinatura com os dados do comerciom esta e a parte que não to conseguindo fazer. no meu projeto coloquei mais uma band para finalizar com o segundo texto, mas a tabela no meio não aparece.

acho que consegui explicar, fiz um outro projeto onde coloquei a tabela no final do texto, funcionou, so que tambem não pude incluir o local da aasinatura pois ele não permite colocar nada apos a tabela
Responder

Gostei + 0

14/09/2012

Edson Melo

pessoal tambem tentei com o word ,as tive problemas tambem, na hora de montar uma tabela, segue abaixo uma copia de um outro post que enviei, qualquer um me resolve ou com rave ou com word, o que eu tenho e que montar esta mala direta,
neste exemplo abaixo nao tenho ideia de como montar varias cartas no mesmo arquivo, se puderem me ajudar

copia

tenho a seguinte codigo que monta um documento no word, apesar de alguns pontos que nao funcionam, esta ok
tenho um problema que nao consigo resolver. Tenho uma tabela que deveria ser montada no meio do documento,
so que o texto que deveria ser impresso apos a tabela, sai dentro da tabela, nao consegui um comando que
informa se ao sistema o fim da tabela para que eu posa inserir o final do texto ajudem me por favor


var i : integer;
MSWord : variant;
begin
MSWord:= CreateOleObject ('Word.Basic');
MSWord.Filenew;//inicia um novo documento
MSWord.AppShow;//mostra o word
MSWord.appmaximize;//Maximiza a janela do Word
// MSWord.insertpicture('.format.bmp');//Insere uma figura note que o ponto serve para dizer que esta no mesmo diretorio do programa
MSWord.Font('Times');//muda a fonte usada
MSWord.CenterPara;//coloca o texto no centro
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.bold;//coloca negrito
MSWord.underline;//sublina
MSWord.insert(#13+'CARTÃO SAÚDE CARAJÁS');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.leftPara;//coloca o texto no esquerda
MSWord.FontSize(12);//muda o tamanho da fonte
MSWord.insert(#13+#13'EDSON GARCIA DE MELO');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'Nº CONTRATO 00000000');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'Endereço : Rua Bairro : ');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'');//#13 serve para pular linha caso queira dar um tabulacao colocar o caracter corespondente no caso #9
MSWord.FontSize(16);//muda o tamanho da fonte
MSWord.CenterPara;//coloca o texto no centro
MSWord.bold;//coloca negrito
MSWord.insert(#13+'Presado Associado do Cartão Carajás');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
mSWord.insert(#13+'');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.RightPara;//coloca o texto no esquerda
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.bold(false);//tira o negrito
MSWord.insert(#13+' Comunicamos que seu Contrato de Adesão do Cartão Saúde Carajás efetuado');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.justifyPara;//coloca o texto no esquerda
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.insert(#13+'com nosso escritório, esta devidamente cadastrado, no entanto o mesmo encontra-se');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'com (as) respectivas anuidade em aberto com o(s) seguintes vencimentos ');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.RightPara;//coloca o texto no esquerda
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.bold(false);//tira o negrito



// estas linhas abaixo seriam as linhas que deveriam estar apos a tabela



MSWord.insert(#13+' Caro associado do Cartão Saúde Carajás, informamos que os debitos abaixo');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.justifyPara;//coloca o texto no esquerda
MSWord.FontSize(14);//muda o tamanho da fonte
MSWord.insert(#13+'mencionados poderão ser negociados. Portanto estamos convidando a você associado');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'a efetuar a liquidação de seu débito com o nosso escritório e receber seu cartão. Qual-');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'quer duvida entre em contato');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.leftPara;//coloca o texto no esquerda
MSWord.FontSize(12);//muda o tamanho da fonte
MSWord.insert(#13+'Atenciosamente');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.insert(#13+'');//#13 serve para pular linha caso queira dar um tabulacao e colocar o caracter corespondente no caso #9
MSWord.FontSize(12);//muda o tamanho da fonte
MSWord.underline(false);//retira o sublinhado
MSWord.tableinserttable(NumColumns:=1, NumRows:=1); //Insere uma tabela com uma linha e uma coluna
MSWord.TableSelectTable; //seleciona a tabela inteira
MSWord.TableAutoFormat(Format:= 27); //usa a auto formatacao de tabelas do Word a vigesima para ser exato muda forma da tabela max 30
MSWord.startOfRow;//coloca o cursor piscando no comeco da linha
MSWord.leftPara;//coloca o texto na esquerda
MSWord.insert('Vencimento Dias de Atrazo Valor');// escreve
MSWord.nextcell;//vai para a Proxima Celula como nao existe ainda ele cria outra linha
MSWord.tableselectRow;// seleciona a linha atual
MSWord.tableSplitCells(NumColumns:=3, NumRows:=1);//divide a celula em 3 colunas e 1 linha

while not DM_DADOS.CDS_RECEBER.Eof do
begin
MSWord.insert(DateToStr(DM_DADOS.CDS_RECEBERDT_VENCIMENTO.AsDateTime));// escreve
MSWord.nextcell;//proxima celula
MSWord.insert(DifDias(DM_DADOS.CDS_RECEBERDT_VENCIMENTO.AsDateTime,Date));// escreve
MSWord.nextcell;//proxima celula
MSWord.insert(FloatToStrF(DM_DADOS.CDS_RECEBERVL_RECEBER.AsFloat,ffCurrency,18,2));// escreve
if not DM_DADOS.CDS_RECEBER.Eof then MSWord.nextcell;//proxima celula
DM_DADOS.CDS_RECEBER.Next;
end;

aqui iriam as linhas de texto que completaria o documento
Responder

Gostei + 0

14/09/2012

Bruno Leandro

voce ta usando um band como cabeçado ? e esse band ta com a propriedade controllerband o databand da tabela ? e o rodape com o texto final tambem é um band e tambem esta setado com a propriedade controllerband o databand da tabela ?
Responder

Gostei + 0

14/09/2012

Edson Melo

bruno sim estou usando um band como a parte de cima ou seja como cabeçario, depois coloquei um banddetalhe, acho que e este o nome, para exibir os dados do banco de dados, quanto a estas propriedades não usei, nen sabia delas o rave não conheço direito. em meus relatorios uso sempre o rdprint, tentei usar eler para resolover meu problema, montei o relatorio certinho nele, so que tive uma surpresa, o meu cliente usa uma impressora laser, e parece que este componente não funciona direito com ele

mas vou tentar suas dica, não tinha pensado no rodape para imprimir a segunda parte voce me deu uma ideia
Responder

Gostei + 0

14/09/2012

Joel Rodrigues

Tem um curso aqui no portal sobre Rave Reports, abordando vários pontos importantes: https://www.devmedia.com.br/curso/rave-reports-impressao-de-graficos-personalizados/160
Responder

Gostei + 0

15/09/2012

Edson Melo

ola joel, tentei acessar alguns cursos, mas meu tipo de assinatura não permite.

bruno estou quase conseguindo, o texto que ficava como rodape estava em um segundo componente band retirei este texto, apaguei o 2 band e coloquei o texto na pagina fora do componente region, agora aparece em todas as folhas, mas tem um problema que não consigo resolver o cabeçario coloquei em no primeiro band, quando mando montar a carta o cabeçario so sai na primeira carta as outras paginas e impresso somente os dados do banco de dados e o rodape

me ajude com isto, e vamos aos poucos que chegarei ao fim

atenciosamente

edson garcia de melo

Responder

Gostei + 0

19/09/2012

Edson Melo

a todos muito obrigado pela ajuda mas consegui resolver o problema
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar