Problemas de impressão

[jeancarlos]

Estou usando a nfe 2.0 com Delphi 2007

veja o que esta acontecendo:

Transp.Vol.Add.pesoL := strtofloat(DM.cdsNFSaidaTRANSP_PESO_L.Value); 


Transp.Vol.Add.pesoB := strtofloat(DM.cdsNFSaidaTRANSP_PESO_B.Value); 


Transp.Vol.Add.qVol   := DM.cdsNFSaidaTRANSP_QNT.AsInteger; 


Transp.Vol.Add.esp    := DM.cdsNFSaidaTRANSP_ESPECIE.AsString; 


Transp.Vol.Add.marca := DM.cdsNFSaidaTRANSP_MARCA.AsString; 


Transp.Vol.Add.nVol   := DM.cdsNFSaidaTRANSP_NRO.AsString;

O problema aqui é:

1º) nesse caso somente sai o "pesoL" na nota.

2º) se eu colocar o "pesoB" acima do "pesoL", somente sai o "pesoB"

3º) se eu comentar "pesoB" e "pesoL" sai somente "qVol" que seria a primeira informação..

Em resumo, somente sai o que eu coloco em primeiro lugar, os outros são ignorados.

Bom, como eu faço pra sair todos esses dados na nota fiscal, uma vez que somente esta saindo a primeira informação que eu insiro... e eu preciso que saiam todas elas.

Obrigado.

[André Ferreira de Moraes]

Cada vez que vc chama o comando Vol.Add um novo volume é adicionado na NFe, então no seu exemplo acima, o primeiro volume vc só preencheu o campo pesoL, no segundo só o pesoB, no terceiro só o qVol e assim por diante.

Use igual ao demo:

      with Transp.Vol.Add do

       begin

         qVol  := 1;

         esp   := 'Especie';

         marca := 'Marca';

         nVol  := 'Numero';

         pesoL := 100;

         pesoB := 110;


         //Lacres do volume. Pode ser adicionado vários

         //Lacres.Add.nLacre := '';

       end;

[/code]

[jeancarlos]

Obrigado, deu certo, vc me ajudou muito.

[gilsonlongo]

Olá,

Estou com problema com o campo qVol - Quando converto a variável que vem da tabela dá erro no componente.

qVol := StrToInt(mquant01); // quantidade de volumes

Onde encontro as definições do tipo de dado das variáveis usadas no componente?

Grato,

Gilson

Cada vez que vc chama o comando Vol.Add um novo volume é adicionado na NFe, então no seu exemplo acima, o primeiro volume vc só preencheu o campo pesoL, no segundo só o pesoB, no terceiro só o qVol e assim por diante.

Use igual ao demo:

      with Transp.Vol.Add do

       begin

         qVol  := 1;

         esp   := 'Especie';

         marca := 'Marca';

         nVol  := 'Numero';

         pesoL := 100;

         pesoB := 110;


         //Lacres do volume. Pode ser adicionado vários

         //Lacres.Add.nLacre := '';

       end;

[André Ferreira de Moraes]

Qual o erro?

O componente segue os tipos descritos no manual de integração - http://www.nfe.fazenda.gov.br/portal/ex ... lLdxB/oYA=

[gilsonlongo]

Oi André,

Era problema de conversão, mas por orientação do Cesar, foi resolvido, veja:

* os campos qVol, pesoL e pesoB. Estou com problema com o campo qVol - Quando converto a variável que vem da tabela dá erro no componente.

Ficou assim

qVol := strtoIntDef(mquant01, 0);

Valeu...

Obrigado.

Qual o erro?

O componente segue os tipos descritos no manual de integração - http://www.nfe.fazenda.gov.br/portal/ex ... lLdxB/oYA=