Imprimi Página | Fechar janela |
imprimir campo memo Impresso de: Helpfacil - Portal do conhecimento Nome do Forum: Diversos Descrição do Forum: Dúvidas sobre outros assuntos não especificados URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=4&TopicID=24178 Data da Impressão: sexta-feira, 19 de abril de 2024 at 08:23 Topico: imprimir campo memo Postado por: ROGERIO_2010 Assunto: imprimir campo memo Data Postagem: quinta-feira, 28 de outubro de 2010 at 12:53 Pessoal, Gostaria de obter uma ajuda sobre como imprimir campo memo tipo blob. Configurei um relatorio no Microsiga adicionando um campo memo do tipo blob. Ao gerar o relatorio, o campo fica em branco. Já verifiquei na tabela e os campo está preenchido. Alguem sabe dar uma dica sobre o que pode estar acontecendo??? Agradeço á todos... Respostas: Postado Por: MARCIO.INF Data Postagem: quinta-feira, 28 de outubro de 2010 at 12:59 tente usar uma variavel para receber o campo memo, na hora de imprimir mande imprimir a variavel, deve funcionar, use um substr para pegar somente o numero de digitos que vc deseja... Marcio Santana dos Santos Analista de Sistemas Postado Por: ROALD Data Postagem: quinta-feira, 28 de outubro de 2010 at 13:30 No meu caso eu usei um posicione para pegar o texto de um campo blob, mas caso já tenha o campo disponivel é só jogar na variavel e mandar imprimir a variável, porem caso tenha mais de uma linha (entenda-se Enter), terá que tratar o texto para impressão, pois no meu caso ele juntava as duas linhas. _escopoinc := Posicione("ZOR",1,xfilial("ZOR")+mv_par01,"ZOR_ESCINC") ZOR_ESCINC - campo blob Postado Por: PAIDOADVPL Data Postagem: quinta-feira, 28 de outubro de 2010 at 16:07 Sei que vc deve quebrar o campo memo. Mas não com uma marreta! rs! Utilizando a idéia da função abaixo, nLinhas := MLCount(SZ5->Z5_OBS,70) For nXi:= 1 To nLinhas cTxtLinha := MemoLine(SZ5->Z5_OBS,70,nXi) If ! Empty(cTxtLinha) oPrint:Say(nLin+=50,nCol,("7) OBSERVACOES:"),oFont12n) oPrint:Say(nLin+=100,030,(cTxtLinha),oFont10) EndIf Next nXi Att, paidoadvpl@gmail.com http://advpl.4shared.com paidoadvpl@gmail.com http://advpl.4shared.com |
Imprimir Página | Fechar Janela |