public void GravarDados() { string sSQL = ""; ArrayList Nm_param = new ArrayList(); ArrayList Vr_param = new ArrayList(); if (IdFunc > 0) { sSQL = "UPDATE Funcionarios SET Id_Func=@Id,Matricula=@Matricula,Nome=@Nome,Cep=@Cep,Endereco=@Endereco,Numero=@Numero,Complemento=@Complemento,Bairro=@Bairro,Cidade=@Cidade,Id_UF=@IdUf,Telefone=@Telefone,Celular=@Celular,DtNascim=Convert(DateTime,@DtNascim,103),Rg=@Rg," + "DtEmissao=Convert(DateTime,@DtEmissao,103),NomePai=@NomePai,NomeMae=@NomeMae,Cpf=@Cpf,Ctps=@Ctps,Serie=@Serie,TituloEleitoral=@TituloEleitoral,RefPessoal=@RefPessoal,RefTelefone=@RefTelefone,Parentesco=@Parentesco,TipoConta=@TipoConta,Banco=@Banco,Agencia=@Agencia,Conta=@Conta," + "DtAdmissao=Convert(DateTime,@DtAdmissao,103),SalarioCtps=@SalarioCtps,SalarioAtual=@SalarioAtual,Funcao=@Funcao,Cbo=@Cbo,ObsAdvertencia=@ObsAdvertencia,ObsAltSalario=@ObsAltSalario,ObsOutras=@ObsOutras,Dependentes=@Dependentes,PlanoSaude=@PlanoSaude,ContratoExp=@ContratoExp," + "Id_Departamento=@IdDepartamento,Id_FilialTrab=@IdFilialTrab,Id_FilialReg=@IdFilialReg,Escolaridade=@Escolaridade,EstadoCivil=@EstadoCivil,CNH=@CNH,PIS=@PIS,Email=@Email,Id_Vendedor=@IdVendedor,Demissao=@Demissao,MotivoDemissao=@MotivoDemissao,AdiantSalario=@AdiantSalario,SalBaseHR=@SalBaseHR," + "ID_Pessoa=@IDPessoa,Celular2=@Celular2,Curso=@Curso Where Id_Func=@Chave"; Nm_param.Add("@Chave"); Vr_param.Add(IdFunc); } else { IdFunc = Controle.ProximoID("Funcionarios"); sSQL = "INSERT INTO Funcionarios (Id_Func,Matricula,Nome,Cep,Endereco,Numero,Complemento,Bairro,Cidade,Id_UF,Telefone,Celular,DtNascim,Rg,DtEmissao,NomePai,NomeMae,Cpf,Ctps,Serie,TituloEleitoral,RefPessoal,RefTelefone,Parentesco,TipoConta,Banco,Agencia,Conta,DtAdmissao,SalarioCtps," + "SalarioAtual,Funcao,Cbo,ObsAdvertencia,ObsAltSalario,ObsOutras,Dependentes,PlanoSaude,ContratoExp,Id_Departamento,Id_FilialTrab,Id_FilialReg,Escolaridade,EstadoCivil,CNH,PIS,Email,Id_Vendedor,Demissao,MotivoDemissao,AdiantSalario,SalBaseHR,ID_Pessoa,Celular2,Curso)" + " VALUES (@Id,@Matricula,@Nome,@Cep,@Endereco,@Numero,@Complemento,@Bairro,@Cidade,@IdUf,@Telefone,@Celular,Convert(DateTime,@DtNascim,103),@Rg,Convert(DateTime,@DtEmissao,103),@NomePai,@NomeMae,@Cpf,@Ctps,@Serie,@TituloEleitoral,@RefPessoal,@RefTelefone,@Parentesco," + "@TipoConta,@Banco,@Agencia,@Conta,Convert(DateTime,@DtAdmissao,103),@SalarioCtps,@SalarioAtual,@Funcao,@Cbo,@ObsAdvertencia,@ObsAltSalario,@ObsOutras,@Dependentes,@PlanoSaude,@ContratoExp,@IdDepartamento,@IdFilialTrab,@IdFilialReg,@Escolaridade,@EstadoCivil,@CNH,@PIS," + "@Email,@IdVendedor,@Demissao,@MotivoDemissao,@AdiantSalario,@SalBaseHR,@IDPessoa,@Celular2,@Curso)"; } if (sSQL != "") { Nm_param.Add("@Id"); Vr_param.Add(IdFunc); Nm_param.Add("@Matricula"); Vr_param.Add(Matricula); Nm_param.Add("@Nome"); Vr_param.Add(Nome); Nm_param.Add("@Cep"); Vr_param.Add(Cep); Nm_param.Add("@Endereco"); Vr_param.Add(Endereco); Nm_param.Add("@Numero"); Vr_param.Add(Numero); Nm_param.Add("@Complemento"); Vr_param.Add(Complemento); Nm_param.Add("@Bairro"); Vr_param.Add(Bairro); Nm_param.Add("@Cidade"); Vr_param.Add(Cidade); Nm_param.Add("@IdUf"); Vr_param.Add(IdUf); Nm_param.Add("@Telefone"); Vr_param.Add(Telefone); Nm_param.Add("@Celular"); Vr_param.Add(Celular); Nm_param.Add("@DtNascim"); Vr_param.Add(DtNasc.ToShortDateString()); Nm_param.Add("@Rg"); Vr_param.Add(Rg); Nm_param.Add("@DtEmissao"); Vr_param.Add(DtEmissao.ToShortDateString()); Nm_param.Add("@NomePai"); Vr_param.Add(NomePai); Nm_param.Add("@NomeMae"); Vr_param.Add(NomeMae); Nm_param.Add("@CPF"); Vr_param.Add(Cpf); Nm_param.Add("@Ctps"); Vr_param.Add(Ctps); Nm_param.Add("@Serie"); Vr_param.Add(Serie); Nm_param.Add("@TituloEleitoral"); Vr_param.Add(TituloEleitoral); Nm_param.Add("@RefPessoal"); Vr_param.Add(RefPessoal); Nm_param.Add("@RefTelefone"); Vr_param.Add(RefTelefone); Nm_param.Add("@Parentesco"); Vr_param.Add(Parentesco); Nm_param.Add("@TipoConta"); Vr_param.Add(TipoConta); Nm_param.Add("@Banco"); Vr_param.Add(Banco); Nm_param.Add("@Agencia"); Vr_param.Add(Agencia); Nm_param.Add("@Conta"); Vr_param.Add(Conta); Nm_param.Add("@DtAdmissao"); Vr_param.Add(DtAdmissao.ToShortDateString()); Nm_param.Add("@SalarioCtps"); Vr_param.Add(Controle.FloatToStr(SalarioCtps, 2)); Nm_param.Add("@SalarioAtual"); Vr_param.Add(Controle.FloatToStr(SalarioAtual, 2)); Nm_param.Add("@Funcao"); Vr_param.Add(Funcao); Nm_param.Add("@Cbo"); Vr_param.Add(CBO); Nm_param.Add("@ObsAdvertencia"); Vr_param.Add(ObsAdvertencia); Nm_param.Add("@ObsAltSalario"); Vr_param.Add(ObsAltSalario); Nm_param.Add("@ObsOutras"); Vr_param.Add(ObsOutras); Nm_param.Add("@Dependentes"); Vr_param.Add(Dependentes); Nm_param.Add("@PlanoSaude"); Vr_param.Add(PlanoSaude); Nm_param.Add("@ContratoExp"); Vr_param.Add(ContratoExp); Nm_param.Add("@IDDepartamento"); Vr_param.Add(IdDepartamento); Nm_param.Add("@IDFilialTrab"); Vr_param.Add(IdFilialTrab); Nm_param.Add("@IDFilialReg"); Vr_param.Add(IdFilialReg); Nm_param.Add("@Escolaridade"); Vr_param.Add(Escolaridade); Nm_param.Add("@EstadoCivil"); Vr_param.Add(EstadoCivil); Nm_param.Add("@CNH"); Vr_param.Add(CNH); Nm_param.Add("@PIS"); Vr_param.Add(PIS); Nm_param.Add("@Email"); Vr_param.Add(Email); Nm_param.Add("@IdVendedor"); Vr_param.Add(IdVendedor); Nm_param.Add("@Demissao"); Vr_param.Add(Demissao); Nm_param.Add("@MotivoDemissao"); Vr_param.Add(MotivoDemissao); Nm_param.Add("@AdiantSalario"); Vr_param.Add(AdiantSalario); Nm_param.Add("@SalBaseHR"); Vr_param.Add(SalBaseHR); Nm_param.Add("@IDPessoa"); Vr_param.Add(IdPessoa); Nm_param.Add("@Celular2"); Vr_param.Add(Celular2); Nm_param.Add("@Curso"); Vr_param.Add(Curso); Controle.ExecutaSQL(sSQL, Nm_param, Vr_param); GravaDemissao(); } }
public void GravarDados() { string sSQL = ""; ArrayList Nm_param = new ArrayList(); ArrayList Vr_param = new ArrayList(); if (IdMov > 0) { sSQL = "UPDATE MvEstoque SET Id_Mov=@Id,Data=Convert(DateTime,@Data,103),TpMov=@TpMov,Id_PedCompra=@IdPedCompra,Id_Pessoa=@IdPessoa,Documento=@Documento," + "NumDocumento=@NumDocumento,NumFormulario=@NumFormulario,Id_Filial=@IdFilial,Id_FilialOrigDest=@IdFilialOrigDest,Id_FormaPgto=@IdFormaPgto,Solicitante=@Solicitante," + "Autorizado=@Autorizado,DtEntSai=Convert(DateTime,@DtEntSai,103),TpFrete=@TpFrete,Id_CFOP=@IdCFOP,VlrSubTotal=@VlrSubTotal," + "VlrDesconto=@VlrDesconto,VlrTotal=@VlrTotal,B_Icms=@BIcms,VlrIcms=@VlrIcms,B_IcmsSub=@BIcmsSub,VlrIcmsSub=@VlrIcmsSub,VlrFrete=@VlrFrete,VlrSeguro=@VlrSeguro," + "VlrOutrasDesp=@VlrOutraDesp,VlrIpi=@VlrIpi,Observacao=@Observacao,Status=@Status,ObsSelo=@ObsSelo,ChaveNFE=@ChaveNFE,TipoPgto=@TipoPgto,DtEmissao=Convert(DateTime,@DtEmissao,103)," + "OutrosIPI=@OutrosIPI,Conferido=@Conferido,Id_MovChave=@IdMovChave,NtServico=@NtServico,NFeSerie=@NFeSerie,Id_Usuario=@IdUsuario,Pendencia=@Pendencia,ObsPendencia=@ObsPendencia,TpAvaria=@TpAvaria Where Id_Mov=@Chave"; Nm_param.Add("@Chave"); Vr_param.Add(IdMov); } else { IdMov = Controle.ProximoID("MvEstoque"); sSQL = "INSERT INTO MvEstoque (Id_Mov,Data,TpMov,Id_PedCompra,Id_Pessoa,Documento,NumDocumento,NumFormulario,Id_Filial,Id_FilialOrigDest,Id_FormaPgto,Solicitante," + "Autorizado,DtEntSai,TpFrete,Id_CFOP,VlrSubTotal,VlrDesconto,VlrTotal,B_Icms,VlrIcms,B_IcmsSub,VlrIcmsSub,VlrFrete,VlrSeguro,VlrOutrasDesp,VlrIpi,Observacao,Status,ObsSelo,ChaveNFE," + "TipoPgto,DtEmissao,OutrosIPI,Conferido,Id_MovChave,NtServico,NFeSerie,Id_Usuario,Pendencia,ObsPendencia,TpAvaria) " + "Values (@Id,Convert(DateTime,@Data,103),@TpMov,@IdPedCompra,@IdPessoa,@Documento,@NumDocumento,@NumFormulario,@IdFilial,@IdFilialOrigDest,@IdFormaPgto,@Solicitante," + "@Autorizado,Convert(DateTime,@DtEntSai,103),@TpFrete,@IdCFOP,@VlrSubTotal,@VlrDesconto,@VlrTotal,@BIcms,@VlrIcms,@BIcmsSub,@VlrIcmsSub,@VlrFrete,@VlrSeguro," + "@VlrOutraDesp,@VlrIpi,@Observacao,@Status,@ObsSelo,@ChaveNFE,@TipoPgto,Convert(DateTime,@DtEmissao,103),@OutrosIPI,@Conferido,@IdMovChave,@NtServico,@NFeSerie,@IdUsuario,@Pendencia,@ObsPendencia,@TpAvaria)"; } if (sSQL != "") { // Calcular os Impostos //CalcularImposto(); VlrTotal = VlrTotal + VlrIpi + VlrOutraDesp + VlrIcmsSub + OutrosIPI; //------------------ Nm_param.Add("@Id"); Vr_param.Add(IdMov); Nm_param.Add("@Data"); Vr_param.Add(Data.ToShortDateString()); Nm_param.Add("@TpMov"); Vr_param.Add(TpMov); Nm_param.Add("@IdPedCompra"); Vr_param.Add(IdPedCompra); Nm_param.Add("@IdPessoa"); Vr_param.Add(IdPessoa); Nm_param.Add("@Documento"); Vr_param.Add(Documento); Nm_param.Add("@NumDocumento"); Vr_param.Add(NumDocumento); Nm_param.Add("@NumFormulario"); Vr_param.Add(NumFormulario); Nm_param.Add("@IdFilial"); Vr_param.Add(IdFilial); Nm_param.Add("@IdFilialOrigDest"); Vr_param.Add(IdFilialOrigDest); Nm_param.Add("@IdFormaPgto"); Vr_param.Add(IdFormaPgto); Nm_param.Add("@Solicitante"); Vr_param.Add(Solicitante); Nm_param.Add("@Autorizado"); Vr_param.Add(Autorizado); Nm_param.Add("@DtEntSai"); Vr_param.Add(DtEntSai.ToShortDateString()); Nm_param.Add("@TpFrete"); Vr_param.Add(TpFrete); Nm_param.Add("@IdCfop"); Vr_param.Add(IdCFOP); Nm_param.Add("@VlrSubTotal"); Vr_param.Add(Controle.FloatToStr(VlrSubTotal, 2)); Nm_param.Add("@VlrDesconto"); Vr_param.Add(Controle.FloatToStr(VlrDesconto, 2)); Nm_param.Add("@VlrTotal"); Vr_param.Add(Controle.FloatToStr(VlrTotal, 2)); Nm_param.Add("@BIcms"); Vr_param.Add(Controle.FloatToStr(BIcms, 2)); Nm_param.Add("@VlrIcms"); Vr_param.Add(Controle.FloatToStr(VlrIcms, 2)); Nm_param.Add("@BIcmsSub"); Vr_param.Add(Controle.FloatToStr(BIcmsSub, 2)); Nm_param.Add("@VlrIcmsSub"); Vr_param.Add(Controle.FloatToStr(VlrIcmsSub, 2)); Nm_param.Add("@VlrFrete"); Vr_param.Add(Controle.FloatToStr(VlrFrete, 2)); Nm_param.Add("@VlrSeguro"); Vr_param.Add(Controle.FloatToStr(VlrSeguro, 2)); Nm_param.Add("@VlrOutraDesp"); Vr_param.Add(Controle.FloatToStr(VlrOutraDesp, 2)); Nm_param.Add("@OutrosIPI"); Vr_param.Add(Controle.FloatToStr(OutrosIPI, 2)); Nm_param.Add("@VlrIpi"); Vr_param.Add(Controle.FloatToStr(VlrIpi, 2)); Nm_param.Add("@Observacao"); Vr_param.Add(Observacao); Nm_param.Add("@ObsSelo"); Vr_param.Add(ObsSelo); Nm_param.Add("@Status"); Vr_param.Add(Status); Nm_param.Add("@ChaveNFE"); Vr_param.Add(ChaveNFE); Nm_param.Add("@TipoPgto"); Vr_param.Add(TipoPgto); Nm_param.Add("@DtEmissao"); Vr_param.Add(DtEmissao.ToShortDateString()); Nm_param.Add("@Conferido"); Vr_param.Add(Conferido); Nm_param.Add("@IdMovChave"); Vr_param.Add(IdMovChave); Nm_param.Add("@NtServico"); Vr_param.Add(NtServico); Nm_param.Add("@NFeSerie"); Vr_param.Add(NFeSerie); Nm_param.Add("@IdUsuario"); Vr_param.Add(IdUsuario); Nm_param.Add("@Pendencia"); Vr_param.Add(Pendencia); Nm_param.Add("@ObsPendencia"); Vr_param.Add(ObsPendencia); Nm_param.Add("@TpAvaria"); Vr_param.Add(TpAvaria); Controle.ExecutaSQL(sSQL, Nm_param, Vr_param); } }
public void GravarDados() { string sSQL = ""; ArrayList Nm_param = new ArrayList(); ArrayList Vr_param = new ArrayList(); if (IdNota > 0) { sSQL = "UPDATE NotaFiscal SET Id_Nota = @Id,Data=Convert(DateTime,@Data,103),Id_Filial = @IdFilial,Id_Venda = @IdVenda,Id_Pessoa = @IdPessoa,Id_Cfop = @IdCfop," + "Id_Transportadora = @IdTransportadora,Frete = @Frete,EntSaida = @EntSaida,DtEmissao=Convert(DateTime,@DtEmissao,103),NumFormulario = @NumFormulario,NumNota = @NumNota," + "VlrProdutos = @VlrProdutos,VlrDesconto=@VlrDesconto,VlrNota = @VlrNota,BIcms = @BIcms,VlrIcms = @VlrIcms,BIcmsSub = @BIcmsSub,VlrIcmsSub = @VlrIcmsSub,VlrFrete = @VlrFrete,VlrSeguro = @VlrSeguro," + "VlrOutraDesp = @VlrOutraDesp,VlrIpi = @VlrIpi,Observacao = @Observacao,Status = @Status,QtdeVolume = @QtdeVolume,Especie = @Especie,Marca = @Marca,PesoBruto = @PesoBruto," + "PesoLiquido = @PesoLiquido,RazaoSocial=@NmPessoa,CnpjCpf = @CnpjCpf,Insc_Uf = @InscUf,Cep = @Cep,Endereco = @Endereco,Numero=@Numero,Bairro = @Bairro,Complemento = @Compl,Cidade = @Cidade," + "Id_Uf = @IdUf,Telefone = @Telefone, SeqImp=@SeqImp,NFE=@NFE,Pais=@Pais,VlrAcrescimo=@VlrAcrescimo,Consumidor=@Consumidor,Atendimento=@Atendimento,DestOperacao=@DestOperacao,Finalidade=@Finalidade," + "ChaveNfeDev=@ChaveNfeDev,NatOp=@NatOp,CodMun=@CodMun,NumPedido=@NumPedido,ICMSInterno=@ICMSInterno,PercDifal=@PercDifal,VencFatura=@VencFatura,MeioPag=@MeioPag Where Id_Nota=@Chave"; Nm_param.Add("@Chave"); Vr_param.Add(IdNota); } else { IdNota = Controle.ProximoID("NotaFiscal"); sSQL = "INSERT INTO NotaFiscal (Id_Nota,Data,Id_Filial,Id_Venda,Id_Pessoa,Id_Cfop,Id_Transportadora,Frete,EntSaida,DtEmissao,NumFormulario,NumNota,VlrProdutos,VlrDesconto,VlrNota,BIcms,VlrIcms,BIcmsSub,VlrIcmsSub," + "VlrFrete,VlrSeguro,VlrOutraDesp,VlrIpi,Observacao,Status,QtdeVolume,Especie,Marca,PesoBruto,PesoLiquido,RazaoSocial,CnpjCpf,Insc_Uf,Cep,Endereco,Numero,Bairro,Complemento,Cidade,Id_Uf,Telefone,SeqImp,ProtocoloNfe,ReciboNfe," + "ChaveNfe,NFE,Pais,VlrAcrescimo,Consumidor,Atendimento,DestOperacao,Finalidade,ChaveNfeDev,NatOp,CodMun,NumPedido,ICMSInterno,PercDifal,VencFatura,MeioPag) " + "Values (@Id,Convert(DateTime,@Data,103),@IdFilial,@IdVenda,@IdPessoa,@IdCfop,@IdTransportadora,@Frete,@EntSaida,Convert(DateTime,@DtEmissao,103),@NumFormulario,@NumNota,@VlrProdutos,@VlrDesconto,@VlrNota," + "@BIcms,@VlrIcms,@BIcmsSub,@VlrIcmsSub,@VlrFrete,@VlrSeguro,@VlrOutraDesp,@VlrIpi,@Observacao,@Status,@QtdeVolume,@Especie,@Marca,@PesoBruto,@PesoLiquido,@NmPessoa,@CnpjCpf,@InscUf,@Cep,@Endereco,@Numero,@Bairro," + "@Compl,@Cidade,@IdUf,@Telefone,@SeqImp,' ',' ',' ',@NFE,@Pais,@VlrAcrescimo,@Consumidor,@Atendimento,@DestOperacao,@Finalidade,@ChaveNfeDev,@NatOp,@CodMun,@NumPedido,@ICMSInterno,@PercDifal,@VencFatura,@MeioPag)"; } if (sSQL != "") { // Calcular os Impostos CalcularImposto(); //------------------ VlrNota = (VlrProdutos + VlrIpi + VlrOutraDesp + VlrAcrescimo + VlrFrete) - VlrDesconto; Nm_param.Add("@Id"); Vr_param.Add(IdNota); Nm_param.Add("@Data"); Vr_param.Add(Data.ToShortDateString()); Nm_param.Add("@IdFilial"); Vr_param.Add(IdFilial); Nm_param.Add("@IdVenda"); Vr_param.Add(IdVenda); Nm_param.Add("@IdPessoa"); Vr_param.Add(IdPessoa); Nm_param.Add("@IdCfop"); Vr_param.Add(IdCfop); Nm_param.Add("@IdTransportadora"); Vr_param.Add(IdTransportadora); Nm_param.Add("@Frete"); Vr_param.Add(Frete); Nm_param.Add("@EntSaida"); Vr_param.Add(EntSaida); Nm_param.Add("@DtEmissao"); Vr_param.Add(DtEmissao.ToShortDateString()); Nm_param.Add("@NumFormulario"); Vr_param.Add(NumFormulario); Nm_param.Add("@NumNota"); Vr_param.Add(NumNota); Nm_param.Add("@VlrProdutos"); Vr_param.Add(Controle.FloatToStr(VlrProdutos, 2)); Nm_param.Add("@VlrDesconto"); Vr_param.Add(Controle.FloatToStr(VlrDesconto, 2)); Nm_param.Add("@VlrNota"); Vr_param.Add(Controle.FloatToStr(VlrNota, 2)); Nm_param.Add("@BIcms"); Vr_param.Add(Controle.FloatToStr(BIcms, 2)); Nm_param.Add("@VlrIcms"); Vr_param.Add(Controle.FloatToStr(VlrIcms, 2)); Nm_param.Add("@BIcmsSub"); Vr_param.Add(Controle.FloatToStr(BIcmsSub, 2)); Nm_param.Add("@VlrIcmsSub"); Vr_param.Add(Controle.FloatToStr(VlrIcmsSub, 2)); Nm_param.Add("@VlrFrete"); Vr_param.Add(Controle.FloatToStr(VlrFrete, 2)); Nm_param.Add("@VlrSeguro"); Vr_param.Add(Controle.FloatToStr(VlrSeguro, 2)); Nm_param.Add("@VlrOutraDesp"); Vr_param.Add(Controle.FloatToStr(VlrOutraDesp, 2)); Nm_param.Add("@VlrIpi"); Vr_param.Add(Controle.FloatToStr(VlrIpi, 2)); Nm_param.Add("@Observacao"); Vr_param.Add(Observacao); Nm_param.Add("@Status"); Vr_param.Add(Status); Nm_param.Add("@QtdeVolume"); Vr_param.Add(QtdeVolume); Nm_param.Add("@Especie"); Vr_param.Add(Especie); Nm_param.Add("@Marca"); Vr_param.Add(Marca); Nm_param.Add("@PesoBruto"); Vr_param.Add(Controle.FloatToStr(PesoBruto, 3)); Nm_param.Add("@PesoLiquido"); Vr_param.Add(Controle.FloatToStr(PesoLiquido, 3)); Nm_param.Add("@NmPessoa"); Vr_param.Add(NmPessoa); Nm_param.Add("@CnpjCpf"); Vr_param.Add(CnpjCpf); Nm_param.Add("@InscUf"); Vr_param.Add(InscUf); Nm_param.Add("@Cep"); Vr_param.Add(Cep); Nm_param.Add("@Endereco"); Vr_param.Add(Endereco); Nm_param.Add("@Numero"); Vr_param.Add(Numero); Nm_param.Add("@Bairro"); Vr_param.Add(Bairro); Nm_param.Add("@Compl"); Vr_param.Add(Compl); Nm_param.Add("@Cidade"); Vr_param.Add(Cidade); Nm_param.Add("@IdUf"); Vr_param.Add(IdUf); Nm_param.Add("@Telefone"); Vr_param.Add(Telefone); Nm_param.Add("@SeqImp"); Vr_param.Add(SeqImp); Nm_param.Add("@NFE"); Vr_param.Add(NFE); Nm_param.Add("@Pais"); Vr_param.Add(Pais); Nm_param.Add("@VlrAcrescimo"); Vr_param.Add(Controle.FloatToStr(VlrAcrescimo, 2)); Nm_param.Add("@Consumidor"); Vr_param.Add(Consumidor); Nm_param.Add("@Atendimento"); Vr_param.Add(Atendimento); Nm_param.Add("@DestOperacao"); Vr_param.Add(DestOperacao); Nm_param.Add("@Finalidade"); Vr_param.Add(Finalidade); Nm_param.Add("@ChaveNfeDev"); Vr_param.Add(ChaveNfeDev); Nm_param.Add("@NatOp"); Vr_param.Add(NatOp); Nm_param.Add("@CodMun"); Vr_param.Add(CodMun); Nm_param.Add("@NumPedido"); Vr_param.Add(NumPedido); Nm_param.Add("@ICMSInterno"); Vr_param.Add(Controle.FloatToStr(ICMSInterno, 2)); Nm_param.Add("@PercDifal"); Vr_param.Add(Controle.FloatToStr(PercDifal, 2)); Nm_param.Add("@VencFatura"); Vr_param.Add(VencFatura); Nm_param.Add("@MeioPag"); Vr_param.Add(MeioPag); Controle.ExecutaSQL(sSQL, Nm_param, Vr_param); } }