domingo, 22 de dezembro de 2019

DICAS 2580 - WINDEV WEBDEV MOBILE - Uninfe 41 - Inutilizacao Nota com uninfe dll






Doação Para Amarildo matos - https://streamelements.com/amarildo_matos/tip











boa noite


Doaçao Amarildo Matos - Link da doação: https://streamelements.com/amarildo_matos/tip
Boa Noite

Seja bem vindos a mais uma video Aula. Essa aula estara disponivel as 23:00 do dia 22/12/2019.

Dica 2580. Vamos fazer Inutilizacao Nfe pelo Uninfe Dll Integrado com Windev.

DICAS 2580 - WINDEV WEBDEV MOBILE - Uninfe 41 - Inutilizacao Nota com uninfe dll

Compartilhe Canal Youtube Amarildo Matos
Amarildo, desde 1990 ensinando Desenvolvimento de Sistemas, tornando
sonhos em realidades.




==================================
PROCEDURE INUTILIZACAO_NOTA_NFE(Srecebe_cnpj is string="",nRECEBE_TIPO_AMBIENTE is int=0,nRECEBE_EDT_CUF is int=0, ...
NRECEBE_EDT_INUTILIZA_MODELO is int=0,nDT_INUTILIZA_NUMERO_INICIAL is int=0, ...
nDT_INUTILIZA_NUMERO_FINAL is int= 0,nNEDT_INUTILIZA_SERIE is int=0, ...
SEDT_INUTILIZA_JUSTIFICATIVA is string="", ...
SEDT_INUTILIZA_ANO_DOIS_ULTIMOS_DIGITOS is string="")
retorno_xml is string=""
ver_certificado is Variant=SELECIONA_CERTIFICADO()
O_CONFIGURACAO is Configuracao
O_CONFIGURACAO.CertificadoDigital=ver_certificado
O_InutNFe is InutNFe
O_InutNFe.Versao="4.00"
o_InutNFeInfInut is InutNFeInfInut
o_InutNFeInfInut.Ano=SEDT_INUTILIZA_ANO_DOIS_ULTIMOS_DIGITOS // "19"
o_InutNFeInfInut.CNPJ = Srecebe_cnpj
o_InutNFeInfInut.CUF = nRECEBE_EDT_CUF// 43
o_InutNFeInfInut.Mod = NRECEBE_EDT_INUTILIZA_MODELO // 55
o_InutNFeInfInut.NNFIni =nDT_INUTILIZA_NUMERO_INICIAL// 2140
o_InutNFeInfInut.NNFFin = nDT_INUTILIZA_NUMERO_FINAL// 2140
o_InutNFeInfInut.Serie = nNEDT_INUTILIZA_SERIE // 1
o_InutNFeInfInut.TpAmb = nRECEBE_TIPO_AMBIENTE // 2// RECEBE_TIPO_AMBIENTE
o_InutNFeInfInut.XJust = SEDT_INUTILIZA_JUSTIFICATIVA //"Justificativa da inutilizacao de teste"
O_InutNFe.InfInut=o_InutNFeInfInut
WHEN EXCEPTION IN
O_inutilizacao is Unimake.Business.DFe.Servicos.NFe.Inutilizacao(O_InutNFe, O_CONFIGURACAO)
O_inutilizacao.Executar();
retorno_xml=O_inutilizacao.RetornoWSString
DO
retorno_xml="ERRO:"+ExceptionInfo(errFullDetails)
END
RESULT(retorno_xml)
========================================

// BTN NFE INUTILIZAR

n_ambiente is int=EDT_AMBIENTE
n_EDT_CUF is int=EDT_CUF
ano_dois_ultimos_digitos is string=EDT_INUTILIZA_ANO[[3 TO 4]]

(EDT_RESULTADO)=INUTILIZACAO_NOTA_NFE(EDT_INUTILIZA_CNPJ,n_ambiente,n_EDT_CUF,EDT_INUTILIZA_MODELO, ...
  EDT_INUTILIZA_NUMERO_INICIAL,EDT_INUTILIZA_NUMERO_FINAL, ...
EDT_INUTILIZA_SERIE,EDT_INUTILIZA_JUSTIFICATIVA,ano_dois_ultimos_digitos)
=========================================



// ---------------------------------------------------------------------------------------------------------
//Enviando XML de inutilização
// ---------------------------------------------------------------------------------------------------------

try
{
    var xml = new InutNFe
    {
        Versao = "4.00",
        InfInut = new InutNFeInfInut
        {
            Ano = "19",
            CNPJ = "06117473000150",
            CUF = CUF,
            Mod = ModeloDFe.NFe,
            NNFIni = 57919,
            NNFFin = 57919,
            Serie = 1,
            TpAmb = TpAmb,
            XJust = "Justificativa da inutilizacao de teste"
        }
    };

    var configuracao = new Configuracao
    {
        CertificadoDigital = CertificadoSelecionado
    };

    var inutilizacao = new Inutilizacao(xml, configuracao);
    inutilizacao.Executar();
    MessageBox.Show(inutilizacao.RetornoWSString);
    MessageBox.Show(inutilizacao.Result.InfInut.XMotivo);

    //Gravar o XML de distribuição se a inutilização foi homologada
    switch (inutilizacao.Result.InfInut.CStat)
    {
        case 102: //Inutilização homologada
            inutilizacao.GravarXmlDistribuicao(@"c:\testenfe\");
            break;

        default: //Inutilização rejeitada
            inutilizacao.GravarXmlDistribuicao(@"c:\testenfe\");
            break;
    }

}
catch (Exception ex)
{
    CatchException(ex);
}




























Blog - Uninfe - 1/... Como Instalar
Blog - Uninfe - 2/... - Criando wdl nfe
Blog - Uninfe - 3/... - Linkando Wdl Nota 
Blog - Xml - 4/... Xml Cabecalho
Blog - Xml - 5/... Tag Nfe
Blog - Xml - 6/... Tag InfNfe
Blog - Xml - 7/... - Tag Ide - uf
Blog - Xml - 8/... Tag Ide - Pegar Data e Hora Emissão
Blog - Xml - 9 / ... Tag Ide - Finalizar Grupo de Tag 
Blog - Xml - 10 / ... - Tag Emit - Inicio
Blog - Xml - 11 / ... - Tag emit - Emitente Final
Blog - Xml - 12/... - Tag Dest - Destinatario
Blog - Xml - 13/... - Tag - det nItem=1 - Inicio
Blog - Xml - 14/... - Tag - det Prod
Blog - Xml - 15/... - Tag - Imposto 
Blog - Xml - 16/... - Tag Final
Blog - Xml - 17/... - Gerar Xml e Enviar Pasta Validado
Blog - Xml - 18/... - Pegar retorno Xml Validado 
Blog - Xml - 19/... Calculo Digito - Modulo 11 Nfe
Blog - Xml - 20/... Achar a Posicao do Erro Nfe
Blog - Xml - 21/... Transmitir e Pegar Retorno
Blog - Xml - 22/... Imprimir Nfc-e Com Daruma
Blog - Xml - 23/... - Monitorar Pasta Uninfe de Retorno
Blog - Xml - 24/... - Parte 1/... - Uninfe Consulta Cadastro Contribuiente 
Blog - Xml - 25/... - Parte 2/... - Uninfe Consulta Cadastro Contribuiente
Blog - Xml - 26/... - Parte 3/... - Uninfe Consulta Cadastro Contribuiente  
Blog - Xml - 27/... - Parte 4/... - Uninfe Retorno Cadastro Contribuinte  
Blog - Xml - 28/... - Parte 5/... - Uninfe Retorno Contribuinte colocar Xml Edt 
Blog - Xml - 29/... - Parte 6/... - Uninfe Retorno Contribuinte - Pegar Dados Xml 
Blog - Xml - 30/... - Parte 7/... - Uninfe Retorno Contribuinte - Mudando Para Procedure global 
Blog - Xml - 31/... - Parte 8/Final - Uninfe Retorno Contribuiente Final 
INSTALACAO UNINFE - WINDEV UNIMAKE 32 - AULA 1345
Dica 2248. Hangout Vivo - Uninfe Integrando Com Windev - 13 08 2019 20:00
Dica 2251. Hangout Vivo - 15/08 20:00 - Iniciando Uninfe dll com Windev
DICAS 2560 WINDEV WEBDEV MOBILE Uninfe 36 Reiniciando Estudos Dll Uninfe
DICAS 2562 WINDEV WEBDEV MOBILE Uninfe 37 Seleciona Certificado Uninfe
DICAS 2568 WINDEV WEBDEV MOBILE Uninfe 38 Status Servico
DICAS 2572 WINDEV WEBDEV MOBILE Uninfe 39 Consulta Nota
DICAS 2575 WINDEV WEBDEV MOBILE Uninfe 40 Consulta Cadastro
DICAS 2580 - WINDEV WEBDEV MOBILE - Uninfe 41 - Inutilizacao Nota com uninfe dll
DICAS 2584 WINDEV WEBDEV MOBILE Uninfe 42 Consulta Recibo dll








Ao vivo 2582 - 22/12/2019 20:45 - Amarildo - Parte 3 - Fazendo Aula Inutilizacao - Uninfe - Dll com WINDEV






Doação Para Amarildo matos - https://streamelements.com/amarildo_matos/tip
























Ao vivo 2581 - 22/12/2019 18:00 - Amarildo - Parte 2 - Fazendo Aula Inutilizacao - Uninfe - Dll com WINDEV






Doação Para Amarildo matos - https://streamelements.com/amarildo_matos/tip
























Ao vivo 2579 - 22/12/2019 14:30 - Amarildo - Fazendo Aula Inutilizacao - Uninfe - Dll com WINDEV






Doação Para Amarildo matos - https://streamelements.com/amarildo_matos/tip
























Teste

Teste
teste