예제 #1
0
 public static void Busca_Transf_Destino(TRegistro_Transferencia val)
 {
     if (val != null)
     {
         if (val.Transf_X_Contrato_Destino.Count == 0)
         {
             if (val.ID_Transf > 0)
             {
                 val.Transf_X_Contrato_Destino = TCN_Transf_X_Contrato.Busca(val.ID_Transf.ToString(),
                                                                             string.Empty,
                                                                             "E",
                                                                             string.Empty,
                                                                             false,
                                                                             null);
             }
         }
     }
 }
예제 #2
0
        public static string Grava_Transferencia(TRegistro_Transferencia val,
                                                 TObjetoBanco banco)
        {
            bool st_transacao = false;
            TCD_Transferencia qtb_Transferencia = new TCD_Transferencia();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_Transferencia.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_Transferencia.Banco_Dados = banco;
                }

                // Grava Transferencia
                string retorno = qtb_Transferencia.Gravar(val);
                val.ID_Transf = Convert.ToDecimal(CamadaDados.TDataQuery.getPubVariavel(retorno, "@P_ID_TRANSF"));
                // Grava Transferencia Pedido Origem

                #region Nota_Fiscal_Origem
                val.rNfOrigem.Nr_pedido            = val.Transf_X_Contrato_Origem[0].Nr_pedido;
                val.rNfOrigem.Cd_clifor            = val.Contrato_Origem.Cd_clifor;
                val.rNfOrigem.Cd_condfiscal_clifor = string.Empty;
                val.rNfOrigem.Cd_condpgto          = val.Contrato_Origem.CD_CondPGTO;
                val.rNfOrigem.Cd_empresa           = val.Contrato_Origem.Cd_empresa;
                val.rNfOrigem.Cd_endereco          = val.Contrato_Origem.Cd_endereco;
                val.rNfOrigem.Cd_movimentacao      = val.Contrato_Origem.Pedido_Fiscal[0].Cd_movto;
                if (val.Duplicata_Origem.Count > 0)
                {
                    val.rNfOrigem.Duplicata = val.Duplicata_Origem;
                }

                //Criar itens da nota fiscal
                TRegistro_LanFaturamento_Item Reg_Itens_Nota = new TRegistro_LanFaturamento_Item();
                Reg_Itens_Nota.Cd_produto    = val.Transf_X_Contrato_Origem[0].Cd_produto;
                Reg_Itens_Nota.lNfcompdev    = val.Complemento_Devolucao;
                Reg_Itens_Nota.Quantidade    = val.QTD_Transf;
                Reg_Itens_Nota.Vl_unitario   = val.VL_Unit_Origem;
                Reg_Itens_Nota.Cd_local      = val.Contrato_Origem.Cd_local;
                Reg_Itens_Nota.Vl_subtotal   = val.VL_Sub_Total_Origem;
                Reg_Itens_Nota.Id_pedidoitem = val.Contrato_Origem.Id_pedidoitem;
                Reg_Itens_Nota.Nr_pedido     = val.Contrato_Origem.Nr_pedido.Value;
                CamadaDados.Fiscal.TRegistro_CadCFOP rCfop = null;
                if (CamadaNegocio.Fiscal.TCN_Mov_X_CFOP.BuscarCFOP(val.rNfOrigem.Cd_movimentacaostring,
                                                                   val.Transf_X_Contrato_Origem[0].Cd_condfiscal_produto,
                                                                   val.Contrato_Origem.CD_UFClifor.Trim().Equals("99") ? "I" :
                                                                   val.Reg_Empresa_Origem.rEndereco.Cd_uf.Trim().Equals(val.Contrato_Origem.CD_UFClifor.Trim()) ? "D" : "F",
                                                                   val.Reg_Empresa_Origem.rEndereco.Cd_uf,
                                                                   val.Contrato_Origem.CD_UFClifor,
                                                                   val.rNfOrigem.Tp_movimento,
                                                                   val.Reg_Clifor_Origem.Cd_condfiscal_clifor,
                                                                   val.Reg_Empresa_Origem.Cd_empresa,
                                                                   ref rCfop,
                                                                   banco))
                {
                    Reg_Itens_Nota.Cd_cfop        = rCfop.CD_CFOP;
                    Reg_Itens_Nota.Ds_cfop        = rCfop.DS_CFOP;
                    Reg_Itens_Nota.St_bonificacao = rCfop.St_bonificacaobool;
                }
                else
                {
                    throw new Exception("Não existe CFOP " + (val.Contrato_Origem.CD_UFClifor.Trim().Equals("99") ? "internacional" : val.Reg_Empresa_Origem.rEndereco.Cd_uf.Trim().Equals(val.Contrato_Origem.CD_UFClifor.Trim()) ? "dentro estado" : "fora estado") + " configurado para a Movimentação " + val.rNfOrigem.Cd_movimentacaostring + " condição fiscal do produto " + val.Transf_X_Contrato_Origem[0].Cd_condfiscal_produto);
                }
                Reg_Itens_Nota.Cd_unidade = val.Contrato_Origem.Cd_unidade;
                Reg_Itens_Nota.Cd_unidEst = val.Contrato_Origem.Cd_unid_produto;
                //Procurar Impostos Estaduais para o Item
                string           vObsFiscal = string.Empty;
                TList_ImpostosNF lImpUfOrig = TCN_LanFaturamento_Item.procuraImpostosPorUf(val.Reg_Empresa_Origem.Cd_empresa,
                                                                                           val.Reg_Empresa_Origem.rEndereco.Cd_uf,
                                                                                           val.Contrato_Origem.CD_UFClifor,
                                                                                           val.Contrato_Origem.Pedido_Fiscal[0].Cd_movtostring,
                                                                                           val.rNfOrigem.Tp_movimento,
                                                                                           val.Reg_Clifor_Origem.Cd_condfiscal_clifor,
                                                                                           val.Reg_Produto_Origem.CD_CondFiscal_Produto,
                                                                                           val.VL_Sub_Total_Origem,
                                                                                           val.QTD_Transf,
                                                                                           ref vObsFiscal,
                                                                                           val.rNfOrigem.Dt_emissao,
                                                                                           val.Reg_Produto_Origem.CD_Produto,
                                                                                           val.rNfOrigem.Tp_nota,
                                                                                           val.rNfOrigem.Nr_serie,
                                                                                           banco);
                if (lImpUfOrig.Exists(v => v.Imposto.St_ICMS))
                {
                    TCN_LanFaturamento_Item.PreencherICMS(lImpUfOrig.Find(v => v.Imposto.St_ICMS), Reg_Itens_Nota);
                    val.rNfOrigem.Obsfiscal += string.IsNullOrEmpty(val.rNfOrigem.Obsfiscal) ? vObsFiscal.Trim() : "\r\n" + vObsFiscal.Trim();
                }
                else if (TCN_LanFaturamento_Item.ObrigImformarICMS(val.Reg_Produto_Origem.CD_Produto, val.rNfOrigem.Nr_serie, banco))
                {
                    throw new Exception("Não existe condição fiscal para o imposto ICMS: \r\n" +
                                        "Tipo Movimento: " + (val.rNfOrigem.Tp_movimento.Trim().ToUpper().Equals("E") ? "ENTRADA" : "SAIDA") + "\r\n" +
                                        "Movimentação Comercial: " + val.Contrato_Origem.Pedido_Fiscal[0].Cd_movtostring + " - " + val.Contrato_Origem.Pedido_Fiscal[0].Ds_movimentacao + "\r\n" +
                                        "Condição Fiscal Clifor: " + val.Reg_Clifor_Origem.Cd_condfiscal_clifor + "\r\n" +
                                        "Condição Fiscal Produto: " + val.Reg_Produto_Origem.CD_CondFiscal_Produto + "\r\n" +
                                        "UF Origem: " + val.Reg_Empresa_Origem.rEndereco.Cd_uf + "\r\n" +
                                        "UF Destino: " + val.Contrato_Origem.CD_UFClifor);
                }

                //Procurar impostos sobre os itens da nota fiscal de origem
                TCN_LanFaturamento_Item.PreencherOutrosImpostos(
                    TCN_LanFaturamento_Item.procuraCondicaoFiscalImpostos(val.Reg_Clifor_Origem.Cd_condfiscal_clifor,
                                                                          val.Reg_Produto_Origem.CD_CondFiscal_Produto,
                                                                          val.Contrato_Origem.Pedido_Fiscal[0].Cd_movtostring,
                                                                          val.rNfOrigem.Tp_movimento,
                                                                          val.Reg_Clifor_Origem.Tp_pessoa,
                                                                          val.Transf_X_Contrato_Origem[0].CD_Empresa,
                                                                          val.Contrato_Origem.Pedido_Fiscal[0].Nr_serie,
                                                                          val.Reg_Clifor_Origem.Cd_clifor,
                                                                          val.Reg_Produto_Origem.CD_Unidade,
                                                                          val.DT_Lancto,
                                                                          Reg_Itens_Nota.Quantidade,
                                                                          Reg_Itens_Nota.Vl_subtotal,
                                                                          val.rNfOrigem.Tp_nota,
                                                                          string.Empty,
                                                                          banco), Reg_Itens_Nota, val.rNfOrigem.Tp_movimento);
                //Gerar observacao para o item
                //Observação do Item com os dados das notas de origem
                string obsitem = string.Empty;
                val.Complemento_Devolucao.ForEach(p =>
                {
                    obsitem += (p.Nr_notafiscal_origem.ToString() + "/" + p.Nr_serie_origem).FormatStringDireita(21, ' ') +
                               (p.Qtd_lancto.ToString("N3", new System.Globalization.CultureInfo("en-US", true)) +
                                Reg_Itens_Nota.Sigla_unidade_estoque.Trim()).FormatStringDireita(15, ' ') +
                               p.Vl_lancto.ToString("N2", new System.Globalization.CultureInfo("en-US", true)).FormatStringDireita(12, ' ') + "\r\n";
                });
                Reg_Itens_Nota.Observacao_item += "NF/Serie Origem      Quantidade     Valor(R$)\r\n" + obsitem;
                //Adicionar item a nota fiscal de origem
                val.rNfOrigem.ItensNota.Add(Reg_Itens_Nota);
                //Gravar nota fiscal de origem
                TCN_LanFaturamento.GravarFaturamento(val.rNfOrigem, null, qtb_Transferencia.Banco_Dados);
                val.Transf_X_Contrato_Origem[0].NR_LanctoFiscal = val.rNfOrigem.Nr_lanctofiscal.Value;
                //Gravar transferencia x pedido origem
                TCN_Transf_X_Contrato.Gravar(new TRegistro_Transf_X_Contrato()
                {
                    CD_Empresa      = val.Transf_X_Contrato_Origem[0].CD_Empresa,
                    Cd_produto      = val.Transf_X_Contrato_Origem[0].Cd_produto,
                    ID_Transf       = val.ID_Transf,
                    TP_Movimento    = val.rNfOrigem.Tp_movimento,
                    NR_LanctoFiscal = val.rNfOrigem.Nr_lanctofiscal.Value,
                    ID_NFItem       = val.rNfOrigem.ItensNota[0].Id_nfitem,
                    NR_Contrato     = val.Contrato_Origem.Nr_contrato
                }, qtb_Transferencia.Banco_Dados);
                #endregion

                #region Nota_Fiscal_Destino
                val.rNfDestino.Nr_pedido       = val.Transf_X_Contrato_Destino[0].Nr_pedido;
                val.rNfDestino.Cd_clifor       = val.Contrato_Destino.Cd_clifor;
                val.rNfDestino.Cd_condpgto     = val.Contrato_Destino.CD_CondPGTO;
                val.rNfDestino.Cd_empresa      = val.Contrato_Destino.Cd_empresa;
                val.rNfDestino.Cd_endereco     = val.Contrato_Destino.Cd_endereco;
                val.rNfDestino.Cd_movimentacao = val.Contrato_Destino.Pedido_Fiscal[0].Cd_movto;
                if (val.Duplicata_Destino.Count > 0)
                {
                    val.rNfDestino.Duplicata = val.Duplicata_Destino;
                }

                //Registro item da nota fiscal de destino
                TRegistro_LanFaturamento_Item Reg_Itens_Nota_Destino = new TRegistro_LanFaturamento_Item();
                if (val.Transf_X_Contrato_Destino[0].CD_Unidade_Est.Equals(val.Transf_X_Contrato_Origem[0].CD_Unidade_Est))
                {
                    Reg_Itens_Nota_Destino.Quantidade = val.QTD_Transf;
                }
                else
                {
                    Reg_Itens_Nota_Destino.Quantidade = TCN_CadConvUnidade.ConvertUnid(val.Transf_X_Contrato_Destino[0].CD_Unidade_Est, val.Transf_X_Contrato_Origem[0].CD_Unidade_Est, val.QTD_Transf, 3, qtb_Transferencia.Banco_Dados);
                }

                Reg_Itens_Nota_Destino.Cd_produto    = val.Transf_X_Contrato_Destino[0].Cd_produto;
                Reg_Itens_Nota_Destino.Vl_unitario   = val.VL_Unit_Destino;
                Reg_Itens_Nota_Destino.Cd_local      = val.Contrato_Destino.Cd_local;
                Reg_Itens_Nota_Destino.Vl_subtotal   = val.VL_Sub_Total_Destino;
                Reg_Itens_Nota_Destino.Id_pedidoitem = val.Contrato_Destino.Id_pedidoitem.Value;
                Reg_Itens_Nota_Destino.Nr_pedido     = val.Contrato_Destino.Nr_pedido.Value;
                rCfop = null;
                if (TCN_Mov_X_CFOP.BuscarCFOP(val.rNfDestino.Cd_movimentacaostring,
                                              val.Transf_X_Contrato_Destino[0].Cd_condfiscal_produto,
                                              val.Contrato_Destino.CD_UFClifor.Trim().Equals("99") ? "I" :
                                              val.Reg_Empresa_Destino.rEndereco.Cd_uf.Trim().Equals(val.Contrato_Destino.CD_UFClifor.Trim()) ? "D" : "F",
                                              val.Reg_Empresa_Destino.rEndereco.Cd_uf,
                                              val.Contrato_Destino.CD_UFClifor,
                                              val.rNfDestino.Tp_movimento,
                                              val.Reg_Clifor_Destino.Cd_condfiscal_clifor,
                                              val.Reg_Empresa_Destino.Cd_empresa,
                                              ref rCfop,
                                              banco))
                {
                    Reg_Itens_Nota_Destino.Cd_cfop        = rCfop.CD_CFOP;
                    Reg_Itens_Nota_Destino.Ds_cfop        = rCfop.DS_CFOP;
                    Reg_Itens_Nota_Destino.St_bonificacao = rCfop.St_bonificacaobool;
                }
                else
                {
                    throw new Exception("Não existe CFOP " + (val.Contrato_Destino.CD_UFClifor.Trim().Equals("99") ? "internacional" : val.Reg_Empresa_Destino.rEndereco.Cd_uf.Trim().Equals(val.Contrato_Destino.CD_UFClifor.Trim()) ? "dentro estado" : "fora estado") + " configurado para a Movimentação " + val.rNfDestino.Cd_movimentacaostring + " condição fiscal do produto " + val.Transf_X_Contrato_Destino[0].Cd_condfiscal_produto);
                }
                Reg_Itens_Nota_Destino.Cd_unidade = val.Contrato_Destino.Cd_unidade;
                Reg_Itens_Nota_Destino.Cd_unidEst = val.Contrato_Destino.Cd_unid_produto;
                //Procurar Impostos Estaduais para o Item
                vObsFiscal = string.Empty;
                TList_ImpostosNF lImpUf = TCN_LanFaturamento_Item.procuraImpostosPorUf(val.Reg_Empresa_Destino.Cd_empresa,
                                                                                       val.Reg_Empresa_Destino.rEndereco.Cd_uf,
                                                                                       val.Contrato_Destino.CD_UFClifor,
                                                                                       val.Contrato_Destino.Pedido_Fiscal[0].Cd_movtostring,
                                                                                       val.rNfDestino.Tp_movimento,
                                                                                       val.Reg_Clifor_Destino.Cd_condfiscal_clifor,
                                                                                       val.Reg_Produto_Destino.CD_CondFiscal_Produto,
                                                                                       val.VL_Sub_Total_Destino,
                                                                                       val.QTD_Transf,
                                                                                       ref vObsFiscal,
                                                                                       val.rNfDestino.Dt_emissao,
                                                                                       val.Reg_Produto_Destino.CD_Produto,
                                                                                       val.rNfDestino.Tp_nota,
                                                                                       val.rNfDestino.Nr_serie,
                                                                                       banco);
                if (lImpUf.Exists(v => v.Imposto.St_ICMS))
                {
                    TCN_LanFaturamento_Item.PreencherICMS(lImpUf.Find(v => v.Imposto.St_ICMS), Reg_Itens_Nota_Destino);
                    val.rNfDestino.Obsfiscal += string.IsNullOrEmpty(val.rNfDestino.Obsfiscal) ? vObsFiscal.Trim() : "\r\n" + vObsFiscal.Trim();
                }
                else if (TCN_LanFaturamento_Item.ObrigImformarICMS(val.Reg_Produto_Destino.CD_Produto, val.rNfDestino.Nr_serie, banco))
                {
                    throw new Exception("Não existe condição fiscal para o imposto ICMS: \r\n" +
                                        "Tipo Movimento: " + (val.rNfDestino.Tp_movimento.Trim().ToUpper().Equals("E") ? "ENTRADA" : "SAIDA") + "\r\n" +
                                        "Movimentação Comercial: " + val.Contrato_Destino.Pedido_Fiscal[0].Cd_movtostring + " - " + val.Contrato_Destino.Pedido_Fiscal[0].Ds_movimentacao + "\r\n" +
                                        "Condição Fiscal Clifor: " + val.Reg_Clifor_Destino.Cd_condfiscal_clifor + "\r\n" +
                                        "Condição Fiscal Produto: " + val.Reg_Produto_Destino.CD_CondFiscal_Produto + "\r\n" +
                                        "UF Origem: " + val.Reg_Empresa_Destino.rEndereco.Cd_uf + "\r\n" +
                                        "UF Destino: " + val.Contrato_Destino.CD_UFClifor);
                }

                //Procurar impostos sobre os itens da nota fiscal de destino
                TCN_LanFaturamento_Item.PreencherOutrosImpostos(TCN_LanFaturamento_Item.procuraCondicaoFiscalImpostos(val.Reg_Clifor_Destino.Cd_condfiscal_clifor,
                                                                                                                      val.Reg_Produto_Destino.CD_CondFiscal_Produto,
                                                                                                                      val.Contrato_Destino.Pedido_Fiscal[0].Cd_movtostring,
                                                                                                                      val.rNfDestino.Tp_movimento,
                                                                                                                      val.Reg_Clifor_Destino.Tp_pessoa,
                                                                                                                      val.Transf_X_Contrato_Destino[0].CD_Empresa,
                                                                                                                      val.Contrato_Destino.Pedido_Fiscal[0].Nr_serie,
                                                                                                                      val.Reg_Clifor_Destino.Cd_clifor,
                                                                                                                      val.Reg_Produto_Destino.CD_Unidade,
                                                                                                                      val.DT_Lancto,
                                                                                                                      Reg_Itens_Nota_Destino.Quantidade,
                                                                                                                      Reg_Itens_Nota_Destino.Vl_subtotal,
                                                                                                                      val.rNfDestino.Tp_nota,
                                                                                                                      string.Empty,
                                                                                                                      banco), Reg_Itens_Nota_Destino, val.rNfDestino.Tp_movimento);
                val.rNfDestino.ItensNota.Add(Reg_Itens_Nota_Destino);
                //Gravar Nota Fiscal Destino
                TCN_LanFaturamento.GravarFaturamento(val.rNfDestino, null, qtb_Transferencia.Banco_Dados);
                val.Transf_X_Contrato_Destino[0].NR_LanctoFiscal = val.rNfDestino.Nr_lanctofiscal.Value;

                TCN_Transf_X_Contrato.Gravar(new TRegistro_Transf_X_Contrato()
                {
                    CD_Empresa      = val.Transf_X_Contrato_Destino[0].CD_Empresa,
                    Cd_produto      = val.Transf_X_Contrato_Destino[0].Cd_produto,
                    ID_Transf       = val.ID_Transf,
                    TP_Movimento    = val.rNfDestino.Tp_movimento,
                    NR_LanctoFiscal = val.rNfDestino.Nr_lanctofiscal.Value,
                    ID_NFItem       = val.rNfDestino.ItensNota[0].Id_nfitem,
                    NR_Contrato     = val.Transf_X_Contrato_Destino[0].NR_Contrato
                }, qtb_Transferencia.Banco_Dados);

                #endregion

                if (st_transacao)
                {
                    qtb_Transferencia.Banco_Dados.Commit_Tran();
                }

                return(retorno);
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_Transferencia.Banco_Dados.RollBack_Tran();
                }

                throw new Exception(ex.Message);
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_Transferencia.deletarBanco_Dados();
                }
            }
        }