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);
}
}
