Bem-vindo(a) ao Suporte da Tecnospeed

Em que podemos ajudar? :)

Artigos nessa seção

Exibir mais

Método - Enviar Pagamento Operação - MDF-e

Avatar
Roney Campos
  • Atualizado
Seguir

 Para utilizar este evento, seu MDF-e deve ser emitido com a propriedade abaixo: 

Tx2 = tpProp_33=0 

Xml = <tpProp>0</tpProp>

 

Método PagamentoOperacaoMDFePorTx2

PagamentoOperacaoMDFePorTx2(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aTx2Evento: String): string;

 

Parâmetros PagamentoOperacaoMDFePorTx2 

Argumento Tipo Detalhes
aChaveMDFe String Chave da MDFe que será inclusa no pagamento operação
aDHEvento String Data e Hora do Evento (yyyy-mm-dd"T"hh:MM:ss)
aSequenciaEvento String Sequencia do Evento
aFusoHorario String Fuso horário do estado (-03:00)
aTx2Evento String Tx2 com os dados do evento

 

Exemplo abaixo do parâmetro  aTx2Evento:

TX2

INCLUIR
descEvento_1=Pagamento Operacao MDF-e
nProt_2=123456789012345
qtdViagens_3=00001
nroViagem_4=00001
SALVAR

incluirinfPag
xNome_5=Teste
CPF_6=
CNPJ_7=12345678901234
idEstrangeiro_8=
vContrato_9=120.00
indPag_10=1
codBanco_11=213
codAgencia_12=213
CNPJIPEF_13=

PIX_20=
vAdiant_21=0.00
indAntecipaAdiant_22=1
tpAntecip_23=2
salvarinfPag

incluirComp
tpComp_14=99
vComp_15=120.00
xComp_16=Outros
salvarComp

incluirinfPrazo
nParcela_17=001
dVenc_18=2020-03-08
vParcela_19=40.00
salvarinfPrazo

incluirinfPrazo
nParcela_17=002
dVenc_18=2020-04-08
vParcela_19=40.00
salvarinfPrazo

incluirinfPrazo
nParcela_17=003
dVenc_18=2020-05-08
vParcela_19=40.00
salvarinfPrazo

 

Método PagamentoOperacaoMDFe

PagamentoOperacaoMDFe(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aXmlEvento: String): string;

Exemplo em DataSet:

_spdMdfePagtoOperDatasetX := TspdMDFeDatasetX.Create(nil);

_spdMdfePagtoOperDatasetX.ConfigSection := 'ENVIAR';

_spdMdfePagtoOperDatasetX.MappingFileName := spdMDFe.DiretorioEsquemas + '3.00a\MappingPagtoOperMDFe.txt';

_spdMdfePagtoOperDatasetX.CreateDatasets;

_spdMdfePagtoOperDatasetX.Include;

_spdMdfePagtoOperDatasetX.IncludePart('evPagtoOperMDFe');

_spdMdfePagtoOperDatasetX.SetFieldAsString('descEvento_1','Pagamento Operacao MDF-e');

_spdMdfePagtoOperDatasetX.SetFieldAsString('nProt_2',edtProtocolo.Text);

_spdMdfePagtoOperDatasetX.SetFieldAsString('qtdViagens_3','00001');

_spdMdfePagtoOperDatasetX.SetFieldAsString('nroViagem_4','00001');

_spdMdfePagtoOperDatasetX.IncludePart('INFPAG');

_spdMdfePagtoOperDatasetX.SetFieldAsString('xNome_5','teste outros');

_spdMdfePagtoOperDatasetX.SetFieldAsString('CNPJ_7','00000000000000');

_spdMdfePagtoOperDatasetX.SetFieldAsString('vContrato_9','120.00');

_spdMdfePagtoOperDatasetX.SetFieldAsString('indPag_10','1');

_spdMdfePagtoOperDatasetX.SetFieldAsString('codBanco_11','123');

_spdMdfePagtoOperDatasetX.SetFieldAsString('codAgencia_12','213');

_spdMdfePagtoOperDatasetX.SetFieldAsString('PIX_20','01234567890');
_spdMdfePagtoOperDatasetX.SetFieldAsString('vAdiant_21','0.00');

_spdMdfePagtoOperDatasetX.SetFieldAsString('indAntecipaAdiant_22','1');

_spdMdfePagtoOperDatasetX.SetFieldAsString('tpAntecip_23','2');

_spdMdfePagtoOperDatasetX.IncludePart('COMP');

_spdMdfePagtoOperDatasetX.SetFieldAsString('tpComp_14','99');

_spdMdfePagtoOperDatasetX.SetFieldAsString('vComp_15','120.00');

_spdMdfePagtoOperDatasetX.SetFieldAsString('xComp_16','Outros');

_spdMdfePagtoOperDatasetX.SavePart('COMP');

_spdMdfePagtoOperDatasetX.IncludePart('INFPRAZO');

_spdMdfePagtoOperDatasetX.SetFieldAsString('nParcela_17','001');

_spdMdfePagtoOperDatasetX.SetFieldAsString('dVenc_18','2020-03-08');

_spdMdfePagtoOperDatasetX.SetFieldAsString('vParcela_19','40.00');

_spdMdfePagtoOperDatasetX.SavePart('INFPRAZO');

_spdMdfePagtoOperDatasetX.IncludePart('INFPRAZO');

_spdMdfePagtoOperDatasetX.SetFieldAsString('nParcela_17','002');

_spdMdfePagtoOperDatasetX.SetFieldAsString('dVenc_18','2020-04-08');

_spdMdfePagtoOperDatasetX.SetFieldAsString('vParcela_19','40.00');

_spdMdfePagtoOperDatasetX.SavePart('INFPRAZO');

_spdMdfePagtoOperDatasetX.IncludePart('INFPRAZO');

_spdMdfePagtoOperDatasetX.SetFieldAsString('nParcela_17','003');

_spdMdfePagtoOperDatasetX.SetFieldAsString('dVenc_18','2020-05-08');

_spdMdfePagtoOperDatasetX.SetFieldAsString('vParcela_19','40.00');

_spdMdfePagtoOperDatasetX.SavePart('INFPRAZO');

_spdMdfePagtoOperDatasetX.SavePart('INFPAG');

_spdMdfePagtoOperDatasetX.SavePart('evPagtoOperMDFe');

_spdMdfePagtoOperDatasetX.Save;

memo1.Text := EnviarEventoPagtoOper(_spdMdfePagtoOperDatasetX.LoteMdfe);

Parâmetros PagamentoOperacaoMDFe 

Argumento Tipo Detalhes
aChaveMDFe String Chave da MDFe que será inclusa no pagamento operação
aDHEvento String Data e Hora do Evento (yyyy-mm-dd"T"hh:MM:ss)
aSequenciaEvento String Sequencia do Evento
aFusoHorario String Fuso horário do estado (-03:00)
aXmlEvento String Xml com os dados do evento

 

Exemplo abaixo do parâmetro  aXmlEvento:

XML

<evPagtoOperMDFe xmlns="http://www.portalfiscal.inf.br/mdfe">
    <descEvento>Pagamento Operacao MDF-e</descEvento>
    <nProt>123456789012345</nProt>
    <infViagens>
        <qtdViagens>00001</qtdViagens>
        <nroViagem>00001</nroViagem>
    </infViagens>
    <infPag>
        <xNome>Teste</xNome>
        <CNPJ>12345678901234</CNPJ>
        <Comp>
            <tpComp>99</tpComp>
            <vComp>120.00</vComp>
           <xComp>Outros</xComp>
        </Comp>
        <vContrato>120.00</vContrato>
        <indPag>1</indPag>
        <vAdiant>0.00</vAdiant>  
        <indAntecipaAdiant>1</indAntecipaAdiant>
        <infPrazo>
            <nParcela>001</nParcela>
            <dVenc>2020-03-08</dVenc>
            <vParcela>40.00</vParcela>
        </infPrazo>
        <infPrazo>
            <nParcela>002</nParcela>
            <dVenc>2020-04-08</dVenc>
            <vParcela>40.00</vParcela>
        </infPrazo>
        <infPrazo>
            <nParcela>003</nParcela>
            <dVenc>2020-05-08</dVenc>
            <vParcela>40.00</vParcela>
        </infPrazo>
        <tpAntecip>2</tpAntecip>
        <infBanc>
            <codBanco>213</codBanco>
            <codAgencia>213</codAgencia>
        </infBanc>
    </infPag>
</evPagtoOperMDFe>

 

Retorno 

XML com o resultado da operação solicitada.

 

Exemplos

 

Delphi

 Result := spdMDFe.PagamentoOperacaoMDFePorTx2(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aTx2Evento: String):

 Result := spdMDFe.PagamentoOperacaoMDFe(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aXmlEvento: String):

 

C#

retorno = FspdMDFe.PagamentoOperacaoMDFePorTx2(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aTx2Evento);

retorno = FspdMDFe.PagamentoOperacaoMDFe(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aXmlEvento);

 

Visual Basic 6

retorno = FspdMDFe.PagamentoOperacaoMDFePorTx2(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aTx2Evento);

retorno = FspdMDFe.PagamentoOperacaoMDFe(aChaveMDFe, aDHEvento, aSequenciaEvento, aFusoHorario, aXmlEvento);

 

PHP

$retorno = FspdMDFe.PagamentoOperacaoMDFePorTx2($aChaveMDFe, $aDHEvento, $aSequenciaEvento, $aFusoHorario, $aTx2Evento);

$retorno = FspdMDFe.PagamentoOperacaoMDFe($aChaveMDFe, $aDHEvento, $aSequenciaEvento, $aFusoHorario, $aXmlEvento);

 

 

Artigos relacionados

Comentários

0 comentário

Por favor, entre para comentar.

Ícone de Chat