[RESOLVIDO] Espelho da nota fiscal

Discussão em 'EMS , HCM e Totvs 11' iniciado por juliano, Maio 18, 2010.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. juliano

    juliano Sem Pontuação

    Alguem ja desenvolveu algum espelho da nota fiscal ?, se tiverem como postar o exemplo...
  2. smonteiro

    smonteiro Membro Participativo

    Bom dia Juliano, já fiz um relatorio que emite espelhos de notas fiscais.

    Na "seleção" o usuário informa Serie, Doc, Emitente e Data. Em "parametros" criei uma opção para escolher se deseja visualizar NF do Fisico ou do Fiscal. No fim de cada documento criei uma especie de etiquetinha que quando é gerado o espelho no fim da página é gerado essa etiqueta que o usuário destaca para ficar com um comprovante.

    Exemplo da Geração da Etiquetinha:

    IF LAST (item-doc-est.it-codigo) THEN DO: /* Verifica se é o ultimo item da NF */

    ASSIGN i-linha = 75 - LINE-COUNTER (str-rp). /* conta numeros de linhas para criar a etiqueta no fim da pagina*/

    PUT STREAM str-rp
    SKIP (i-linha)
    FILL("-",132) FORMAT "x(132)" SKIP (1)
    "Recebi de " AT 1 emitente.nome-abrev AT 19 ", os produtos constantes da Nota Fiscal Nº " AT 37 docum-est.nro-docto AT 80 SKIP (1)
    FILL("_",39) FORMAT "x(39)" AT 1
    "Matricula e Assinatura do Recebedor" AT 1
    "Data do Recebimento: ____/____/____" AT 50 SKIP (1)
    FILL("-",132) FORMAT "x(132)"
    SKIP.
    END.
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página