Exemple #1
0
        public void GravarDados()
        {
            string    sSQL     = "";
            ArrayList Nm_param = new ArrayList();
            ArrayList Vr_param = new ArrayList();

            if (IdDocumento > 0)
            {
                sSQL = "UPDATE PedCompra SET Id_Documento=@Id,Id_Pessoa=@IdPessoa,Data=Convert(DateTime,@Data,103),NumPedido=@NumPedido,Vendedor=@Vendedor,Fone=@Fone,PrevEntrega=Convert(DateTime,@PrevEntrega,103),Id_Usuario=@IdUsuario," +
                       "Observacao=@Obs,VlrTotal=@VlrTotal,Status=@Status,Id_Filial=@IdFilial,FormaPgto=@FormaPgto,Id_Transportadora=@IdTransp,NumNFe=@NumNFe,VlrIpi=@VlrIpi,VlrIcms=@VlrIcms,VlrSubTotal=@VlrSubTotal Where Id_Documento=@Chave";
                Nm_param.Add("@Chave"); Vr_param.Add(IdDocumento);
            }
            else
            {
                IdDocumento = Controle.ProximoID("PedCompra");
                sSQL        = "INSERT INTO PedCompra (Id_Documento,Id_Pessoa,Data,NumPedido,Vendedor,Fone,PrevEntrega,Id_Usuario,Observacao,VlrTotal,Status,Id_Filial,FormaPgto,Id_Transportadora,NumNFe,VlrIpi,VlrIcms,VlrSubTotal)" +
                              "VALUES (@Id,@IdPessoa,Convert(DateTime,@Data,103),@NumPedido,@Vendedor,@Fone,Convert(DateTime,@PrevEntrega,103),@IdUsuario,@Obs,@VlrTotal,@Status,@IdFilial,@FormaPgto,@IdTransp,@NumNFe,@VlrIpi,@VlrIcms,@VlrSubTotal)";
                NumPedido = string.Format("{0:D8}", Controle.ProximoID("NumPedCompra"));
            }
            if (sSQL != "")
            {
                Nm_param.Add("@Id");          Vr_param.Add(IdDocumento);
                Nm_param.Add("@IdPessoa");    Vr_param.Add(IdPessoa);
                Nm_param.Add("@Data");        Vr_param.Add(Data.ToShortDateString());
                Nm_param.Add("@NumPedido");   Vr_param.Add(NumPedido);
                Nm_param.Add("@Vendedor");    Vr_param.Add(Vendedor);
                Nm_param.Add("@Fone");        Vr_param.Add(Fone);
                Nm_param.Add("@PrevEntrega"); Vr_param.Add(PrevEntrega.ToShortDateString());
                Nm_param.Add("@IdUsuario");   Vr_param.Add(IdUsuario);
                Nm_param.Add("@Obs");         Vr_param.Add(Observacao);
                Nm_param.Add("@VlrTotal");    Vr_param.Add(Controle.FloatToStr(VlrTotal, 2));
                Nm_param.Add("@Status");      Vr_param.Add(Status);
                Nm_param.Add("@IdFilial");    Vr_param.Add(IdFilial);
                Nm_param.Add("@FormaPgto");   Vr_param.Add(FormaPgto);
                Nm_param.Add("@IdTransp");    Vr_param.Add(IdTransp);
                Nm_param.Add("@NumNFe");      Vr_param.Add(NumNFe);
                Nm_param.Add("@VlrIpi");      Vr_param.Add(Controle.FloatToStr(VlrIpi, 2));
                Nm_param.Add("@VlrIcms");     Vr_param.Add(Controle.FloatToStr(VlrIcms, 2));
                Nm_param.Add("@VlrSubTotal"); Vr_param.Add(Controle.FloatToStr(VlrSubTotal, 2));
                Controle.ExecutaSQL(sSQL, Nm_param, Vr_param);
            }
        }
Exemple #2
0
        public void GravarDados()
        {
            string    sSQL     = "";
            ArrayList Nm_param = new ArrayList();
            ArrayList Vr_param = new ArrayList();

            if (IdVenda > 0)
            {
                sSQL = "UPDATE MvVenda SET Id_Venda=@Id,Data=Convert(DateTime,@Data,103),ImpNF=@ImpNF,Id_Caixa=@IdCaixa,Id_Pessoa=@IdPessoa,Id_Filial=@IdFilial,Id_Vendedor=@IdVendedor,Id_Rota=@IdRota," +
                       "TpVenda=@TpVenda,NumDocumento=@NumDocumento,Id_FormaPgto=@IdFormaPgto,PrevEntrega=Convert(DateTime,@PrevEntrega,103),Observacao=@Observacao,VlrSubTotal=@VlrSubTotal,VlrDesconto=@VlrDesconto,VlrTotal=@VlrTotal," +
                       "CnpjCpf=@CnpjCpf,Pessoa=@NmPessoa,InscUF=@InscUF,Cep=@Cep,Endereco=@Endereco,Numero=@Numero,Complemento=@Complemento,Cidade=@Cidade,Bairro=@Bairro,Id_Uf=@IdUf,Fone=@Fone,FormNF=@FormNF,Id_UltUsuario=@IdUltUsuario,Credito=@VlrCredito," +
                       "PrazoPgto=@PrazoPgto,Id_VdTroca=@IdVdTroca,VdBalcao=@VdBalcao,Id_VdMatriz=@IdVdMatriz,SemMovEst=@SemMovEst,FrenteLoja=@FrenteLoja,Pais=@Pais,Id_LancCF=@IdLancCF,VdImpFat=@VdImpFat,Cli_Reativado=@CliReativado,Id_FilialEntrega=@IdFilialEntrega," +
                       "IgnoraDesc=@IgnoraDesc,Id_FilialOrigem=@IdFilialOrigem,NumPedido=@NumPedido Where Id_Venda=@Chave";
                Nm_param.Add("@Chave"); Vr_param.Add(IdVenda);
            }
            else
            {
                IdVenda = Controle.ProximoID("MVVENDA");
                if (TpVenda.Trim() == "OC")
                {
                    NumDocumento = "OC" + string.Format("{0:D5}", Controle.ProximoID("VD_ORCAM"));
                }
                if (TpVenda.Trim() == "OE")
                {
                    NumDocumento = "OE" + string.Format("{0:D5}", Controle.ProximoID("VD_ORDEM"));
                }
                if (TpVenda.Trim() == "PV")
                {
                    NumDocumento = "PV" + string.Format("{0:D5}", Controle.ProximoID("VD_PEDIDO"));
                }
                if (TpVenda.Trim() == "CO")
                {
                    NumDocumento = "CO" + string.Format("{0:D5}", Controle.ProximoID("VD_COMODATO"));
                }
                if (TpVenda.Trim() == "TROCA")
                {
                    NumDocumento = "TM" + string.Format("{0:D5}", Controle.ProximoID("VD_TROCA"));
                }
                if (TpVenda.Trim() == "PR")
                {
                    NumDocumento = "PR" + string.Format("{0:D5}", Controle.ProximoID("VD_PROMOCAO"));
                }
                if (TpVenda.Trim() == "BONIF")
                {
                    NumDocumento = "BF" + string.Format("{0:D5}", Controle.ProximoID("VD_BONIF"));
                }
                if (TpVenda.Trim() == "AM")
                {
                    NumDocumento = "AM" + string.Format("{0:D5}", Controle.ProximoID("VD_AMOSTRA"));
                }
                if (TpVenda.Trim() == "VF")
                {
                    NumDocumento = "VF" + string.Format("{0:D5}", Controle.ProximoID("VD_VDFINANC"));
                }
                if (TpVenda.Trim() == "EMVF")
                {
                    NumDocumento = "EM" + string.Format("{0:D5}", Controle.ProximoID("VD_EMFINANC"));
                }
                if (TpVenda.Trim() == "PI")
                {
                    NumDocumento = "PI" + string.Format("{0:D5}", Controle.ProximoID("VD_INTERNET"));
                }
                if (TpVenda.Trim() == "PC")
                {
                    NumDocumento = "PC" + string.Format("{0:D5}", Controle.ProximoID("VD_CONSIGACAO"));
                }

                sSQL = "INSERT INTO MVVENDA (Id_Venda,Data,ImpNF,Id_Caixa,Id_Pessoa,Id_Filial,Id_Vendedor,Id_Usuario,Id_Rota,TpVenda,NumDocumento,Id_FormaPgto,PrevEntrega,Observacao,VlrSubTotal,VlrDesconto,VlrTotal,CnpjCpf,Pessoa,InscUF,Cep,Endereco," +
                       "Numero,Complemento,Cidade,Bairro,Id_Uf,Fone,Id_Entregador,Id_VdMaster,VinculoVd,FormNF,Id_UsuAutDeb,Id_UltUsuario,Credito,PrazoPgto,Faturado,Id_VdTroca,VdBalcao,Id_VdMatriz,SemMovEst,FrenteLoja,Pais,Id_LancCF,VdImpFat,Cli_Reativado,Id_FilialEntrega,ObsCancelamento,IgnoraDesc,Id_FilialOrigem,Id_UsuLibParc,NumPedido,Id_Usuboleto,Status)" +
                       " VALUES(@Id,Convert(DateTime,@Data,103),@ImpNF,@IdCaixa,@IdPessoa,@IdFilial,@IdVendedor,@IdUsuario,@IdRota,@TpVenda,@NumDocumento,@IdFormaPgto,Convert(DateTime,@PrevEntrega,103),@Observacao,@VlrSubTotal,@VlrDesconto,@VlrTotal,@CnpjCpf,@NmPessoa," +
                       "@InscUF,@Cep,@Endereco,@Numero,@Complemento,@Cidade,@Bairro,@IdUf,@Fone,0,@VdMaster,'',@FormNF,0,@IdUltUsuario,@VlrCredito,@PrazoPgto,0,@IdVdTroca,@VdBalcao,@IdVdMatriz,@SemMovEst,@FrenteLoja,@Pais,@IdLancCF,@VdImpFat,@CliReativado,@IdFilialEntrega,' ',@IgnoraDesc,@IdFilialOrigem,@IdUsuLibParc,@NumPedido,@IdUsuboleto,@Status)";
                Nm_param.Add("@IdUsuario"); Vr_param.Add(IdUsuario);
                Nm_param.Add("@VdMaster"); Vr_param.Add(IdVenda);
            }

            if (sSQL != "")
            {
                Nm_param.Add("@Id"); Vr_param.Add(IdVenda);
                Nm_param.Add("@Data"); Vr_param.Add(Data.ToShortDateString());
                Nm_param.Add("@IdCaixa"); Vr_param.Add(IdCaixa);
                Nm_param.Add("@ImpNF"); Vr_param.Add(ImpNF);
                Nm_param.Add("@IdPessoa"); Vr_param.Add(IdPessoa);
                Nm_param.Add("@IdFilial"); Vr_param.Add(IdFilial);
                Nm_param.Add("@IdVendedor"); Vr_param.Add(IdVendedor);
                Nm_param.Add("@IdRota"); Vr_param.Add(IdRota);
                Nm_param.Add("@IdFormaPgto"); Vr_param.Add(IdFormaPgto);
                Nm_param.Add("@TpVenda"); Vr_param.Add(TpVenda);
                Nm_param.Add("@NumDocumento"); Vr_param.Add(NumDocumento);
                Nm_param.Add("@PrevEntrega"); Vr_param.Add(PrevEntrega.ToShortDateString());
                Nm_param.Add("@Observacao"); Vr_param.Add(Observacao);
                Nm_param.Add("@Status"); Vr_param.Add(Status);
                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("@VlrCredito"); Vr_param.Add(Controle.FloatToStr(VlrCredito, 2));
                Nm_param.Add("@VlrTotal"); Vr_param.Add(Controle.FloatToStr(VlrTotal, 2));
                Nm_param.Add("@CnpjCpf"); Vr_param.Add(CnpjCpf);
                Nm_param.Add("@NmPessoa"); Vr_param.Add(NmPessoa);
                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("@Complemento"); Vr_param.Add(Complemento);
                Nm_param.Add("@Cidade"); Vr_param.Add(Cidade);
                Nm_param.Add("@Bairro"); Vr_param.Add(Bairro);
                Nm_param.Add("@IdUf"); Vr_param.Add(IdUF);
                Nm_param.Add("@Fone"); Vr_param.Add(Fone);
                Nm_param.Add("@FormNF"); Vr_param.Add(FormNF);
                Nm_param.Add("@IdUltUsuario"); Vr_param.Add(IdUltUsuario);
                Nm_param.Add("@PrazoPgto"); Vr_param.Add(PrazoPgto);
                Nm_param.Add("@IdVdTroca"); Vr_param.Add(IdVdTroca);
                Nm_param.Add("@VdBalcao"); Vr_param.Add(VdBalcao);
                Nm_param.Add("@IdVdMatriz"); Vr_param.Add(IdVdMatriz);
                Nm_param.Add("@SemMovEst"); Vr_param.Add(SemMovEst);
                Nm_param.Add("@FrenteLoja"); Vr_param.Add(FrenteLoja);
                Nm_param.Add("@Pais"); Vr_param.Add(Pais);
                Nm_param.Add("@IdLancCF"); Vr_param.Add(IdLancCF);
                Nm_param.Add("@VdImpFat"); Vr_param.Add(VdImpFat);
                Nm_param.Add("@CliReativado"); Vr_param.Add(CliReativado);
                Nm_param.Add("@IdFilialEntrega"); Vr_param.Add(IdFilialEntrega);
                Nm_param.Add("@IdFilialOrigem"); Vr_param.Add(IdFilialOrigem);
                Nm_param.Add("@IgnoraDesc"); Vr_param.Add(IgnoraDesc);
                Nm_param.Add("@IdUsuLibParc"); Vr_param.Add(IdUsuLibParc);
                Nm_param.Add("@NumPedido"); Vr_param.Add(NumPedido);
                Nm_param.Add("@IdUsuboleto"); Vr_param.Add(IdUsuboleto);
                Controle.ExecutaSQL(sSQL, Nm_param, Vr_param);
            }
        }