public static decimal buscaCliforMaiorNota(string vCd_Clifor)
{
TpBusca[] vBusca = new TpBusca[3];
vBusca[0].vNM_Campo = "a.Tp_Movimento";
vBusca[0].vOperador = "=";
vBusca[0].vVL_Busca = "'S'";
vBusca[1].vNM_Campo = "isnull(a.ST_Registro ,'A')";
vBusca[1].vOperador = "=";
vBusca[1].vVL_Busca = "'A'";
vBusca[2].vNM_Campo = "";
vBusca[2].vOperador = "exists";
vBusca[2].vVL_Busca = "(select 1 from tb_div_usuario_x_empresa x " +
"where x.cd_empresa = a.cd_empresa " +
"and ((x.login = '******') or " +
"(exists(select 1 from tb_div_usuario_x_grupos y " +
" where y.logingrp = x.login and y.loginusr = '******'))))";
if (!string.IsNullOrEmpty(vCd_Clifor))
{
Array.Resize(ref vBusca, vBusca.Length + 1);
vBusca[vBusca.Length - 1].vNM_Campo = "a.CD_Clifor";
vBusca[vBusca.Length - 1].vOperador = "=";
vBusca[vBusca.Length - 1].vVL_Busca = "'" + vCd_Clifor + "'";
}
object vl_TotalFat = new CamadaDados.Faturamento.NotaFiscal.TCD_LanFaturamento().BuscarEscalar(vBusca, "isnull(max (a.Vl_TotalNota),0)");
return(vl_TotalFat != null?Convert.ToDecimal(vl_TotalFat.ToString()) : 0);
}
public static string EstornarConferenciaPedido(TList_EntregaPedido val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
string retorno = string.Empty;
TCD_EntregaPedido qtb_entrega = new TCD_EntregaPedido();
try
{
if (banco == null)
{
st_transacao = qtb_entrega.CriarBanco_Dados(true);
}
else
{
qtb_entrega.Banco_Dados = banco;
}
val.ForEach(p =>
{
if (p.St_registro.Trim().ToUpper().Equals("P"))
{
//Verificar se a reserva ja foi faturada
object obj = new CamadaDados.Faturamento.NotaFiscal.TCD_LanFaturamento(qtb_entrega.Banco_Dados).BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'C'"
},
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fat_notafiscal_item_x_estoque x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.nr_lanctofiscal = a.nr_lanctofiscal " +
"and x.id_entrega = " + p.Id_entrega.Value.ToString() + ")"
}
}, "a.nr_notafiscal");
if (obj == null)
{
p.St_registro = "A";
p.Qtd_entregue = decimal.Zero;
p.Login = string.Empty;
Gravar(p, qtb_entrega.Banco_Dados);
}
else
{
retorno += "Entrega: " + p.Id_entrega.ToString() + " ja se encontra faturada.\r\n" +
"Nota Fiscal: " + obj.ToString().Trim() + "\r\n";
}
}
});
if (st_transacao)
{
qtb_entrega.Banco_Dados.Commit_Tran();
}
return(retorno);
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_entrega.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro estornar conferencia: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_entrega.deletarBanco_Dados();
}
}
}
private void CancelarNFe()
{
if (string.IsNullOrEmpty(cd_empresa.Text))
{
MessageBox.Show("Obrigatorio informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (cbSerie.SelectedItem == null)
{
MessageBox.Show("Obrigatorio informar serie.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cbSerie.Focus();
return;
}
if (string.IsNullOrEmpty(nr_notafiscal.Text))
{
MessageBox.Show("Obrigatorio informar " + (St_nfce ? "NFCe" : "NFe") + ".", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
nr_notafiscal.Focus();
return;
}
if (St_nfce)
{
CamadaDados.Faturamento.PDV.TList_NFCe lNFCe =
CamadaNegocio.Faturamento.PDV.TCN_NFCe.Buscar(string.Empty,
nr_notafiscal.Text,
cd_empresa.Text,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
cbSerie.SelectedValue.ToString(),
string.Empty,
false,
string.Empty,
string.Empty,
1,
null);
if (lNFCe.Count > 0)
{
List <CamadaDados.Faturamento.PDV.TRegistro_VendaRapida> lVenda = null;
if (lNFCe[0].St_registro.Trim().ToUpper().Equals("C"))
{
MessageBox.Show("NFCe ja se encontra CANCELADA.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
string msg = string.Empty;
if (lNFCe[0].Id_contingencia.HasValue &&
!lNFCe[0].Nr_protocolo.HasValue)
{
msg = "NFCe emitida em CONTINGÊNCIA OFFLINE e ainda não transmitida para a receita.\r\n" +
"O cancelamento desta NFCe somente ocorrerá após o envio da mesma para receita.";
}
if (MessageBox.Show((string.IsNullOrEmpty(msg) ? string.Empty : msg + "\r\n") + "Confirma cancelamento NFCe?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
== DialogResult.Yes)
{
try
{
bool st_cancelar = true;
//Verificar se o NFCe esta vinculado a NFe
object obj = new CamadaDados.Faturamento.NotaFiscal.TCD_LanFaturamento().BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'C'"
},
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fat_ecfvinculadoNF x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.nr_lanctofiscal = a.nr_lanctofiscal " +
"and x.cd_empresa = '" + lNFCe[0].Cd_empresa.Trim() + "' " +
"and x.id_cupom = " + lNFCe[0].Id_nfcestr + ")"
}
}, "a.nr_notafiscal");
if (obj != null)
{
MessageBox.Show("NFCe Nº" + lNFCe[0].Id_nfcestr + " esta vinculado a NFe Nº" + obj.ToString() + ".\r\n" +
"Para cancelar NFCe obrigatório antes cancelar NFe.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (lNFCe[0].Nr_protocolo.HasValue ||
lNFCe[0].Id_contingencia.HasValue)
{
string motivo = string.Empty;
CamadaDados.Faturamento.Cadastros.TList_CfgNfe lCfg = null;
CamadaDados.Faturamento.Cadastros.TList_Evento lEv = null;
//Verificar evento
CamadaDados.Faturamento.PDV.TList_EventoNFCe lEvento =
CamadaNegocio.Faturamento.PDV.TCN_EventoNFCe.Buscar(lNFCe[0].Cd_empresa,
lNFCe[0].Id_nfcestr,
string.Empty,
null);
if (lEvento.Count.Equals(0))
{
if (string.IsNullOrEmpty(motivo))
{
InputBox ibp = new InputBox();
ibp.Text = "Motivo Cancelamento NFCe";
motivo = ibp.ShowDialog();
if (string.IsNullOrEmpty(motivo))
{
MessageBox.Show("Obrigatorio informar motivo de cancelamento da NFCe.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (motivo.Trim().Length < 15)
{
MessageBox.Show("Motivo de cancelamento deve ter mais que 15 caracteres.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
//Buscar evento Cancelamento
if (lEv == null)
{
lEv = CamadaNegocio.Faturamento.Cadastros.TCN_Evento.Buscar(string.Empty, string.Empty, "CA", null);
}
if (lEv.Count.Equals(0))
{
MessageBox.Show("Não existe evento de CANCELAMENTO NFE cadastrado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Cancelar NFe Receita
CamadaDados.Faturamento.PDV.TRegistro_EventoNFCe rEvento = new CamadaDados.Faturamento.PDV.TRegistro_EventoNFCe();
rEvento.Cd_empresa = lNFCe[0].Cd_empresa;
rEvento.Id_cupom = lNFCe[0].Id_nfce;
rEvento.Chave_acesso_nfce = lNFCe[0].Chave_acesso;
rEvento.Nr_protocoloNFCe = lNFCe[0].Nr_protocolo;
rEvento.Dt_evento = CamadaDados.UtilData.Data_Servidor();
rEvento.Justificativa = motivo;
rEvento.Cd_eventostr = lEv[0].Cd_eventostr;
rEvento.Tp_evento = lEv[0].Tp_evento;
rEvento.Ds_evento = lEv[0].Ds_evento;
rEvento.St_registro = "A";
CamadaNegocio.Faturamento.PDV.TCN_EventoNFCe.Gravar(rEvento, null);
lEvento.Add(rEvento);
}
if (!lEvento[0].St_registro.Trim().ToUpper().Equals("T") &&
lNFCe[0].Nr_protocolo.HasValue)
{
//Buscar CfgNfe para a empresa
if (lCfg == null)
{
lCfg = CamadaNegocio.Faturamento.Cadastros.TCN_CfgNfe.Buscar(lNFCe[0].Cd_empresa,
string.Empty,
string.Empty,
null);
}
if (lCfg.Count.Equals(0))
{
MessageBox.Show("Não existe configuração para envio de evento para a empresa " + lNFCe[0].Cd_empresa.Trim() + ".",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
msg = NFCe.EventoNFCe.TEventoNFCe.EnviarEvento(lEvento[0], lCfg[0]);
if (!string.IsNullOrEmpty(msg))
{
MessageBox.Show("Erro ao enviar evento CANCELAMENTO para a receita.\r\n" +
"Aguarde um tempo e tente novamente.\r\n" +
"Erro: " + msg.Trim() + ".",
"Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
st_cancelar = false;
}
}
}
}
if (st_cancelar)
{
if (!lNFCe[0].Nr_protocolo.HasValue &&
!lNFCe[0].Id_contingencia.HasValue)
{
//Buscar CfgNfe para a empresa
CamadaDados.Faturamento.Cadastros.TList_CfgNfe lCfgNfCe =
CamadaNegocio.Faturamento.Cadastros.TCN_CfgNfe.Buscar(lNFCe[0].Cd_empresa,
string.Empty,
string.Empty,
null);
if (lCfgNfCe.Count.Equals(0))
{
MessageBox.Show("Não existe configuração NFC-e para a empresa " + lNFCe[0].Cd_empresa.Trim() + ".",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
//Consultar Chave
string ret = NFCe.ConsultaChave.TConsultaChave.ConsultaChave(lNFCe[0].Chave_acesso,
"1",
lCfgNfCe[0]);
if (!string.IsNullOrEmpty(ret))
{
MessageBox.Show("Não é permtido excluir cupom com chave de acesso existente na receita.\r\n" + ret, "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
CamadaNegocio.Faturamento.PDV.TCN_NFCe.CancelarCF(lNFCe[0], null);
MessageBox.Show("NFCe cancelada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
if (!lNFCe[0].Nr_protocolo.HasValue &&
!lNFCe[0].Id_contingencia.HasValue)
{
CamadaDados.Faturamento.Cadastros.TList_CadSequenciaNF lSeq =
CamadaNegocio.Faturamento.Cadastros.TCN_CadSequenciaNF.Busca(lNFCe[0].Nr_serie,
lNFCe[0].Cd_modelo,
lNFCe[0].Cd_empresa,
null);
if (lSeq.Count > 0)
{
if (lSeq[0].Seq_NotaFiscal.Equals(lNFCe[0].NR_NFCe))
{
lSeq[0].Seq_NotaFiscal--;
CamadaNegocio.Faturamento.Cadastros.TCN_CadSequenciaNF.Gravar(lSeq[0], null);
MessageBox.Show("Sequencia de numeração da serie voltada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
//Buscar configuracao nfe
CamadaDados.Faturamento.Cadastros.TList_CfgNfe lCfgNfe =
CamadaNegocio.Faturamento.Cadastros.TCN_CfgNfe.Buscar(lNFCe[0].Cd_empresa,
string.Empty,
string.Empty,
null);
if (lCfgNfe.Count > 0)
{
try
{
//Inutilizar numero nota
NFCe.InutilizaNFCe.TInutilizaNFCe.InutilizarNFCe(lCfgNfe[0].Cd_uf_empresa,
lCfgNfe[0].Cnpj_empresa,
lNFCe[0].Nr_serie,
lNFCe[0].Cd_modelo,
DateTime.Now.Year.ToString(),
lNFCe[0].NR_NFCe.Value,
lNFCe[0].NR_NFCe.Value,
"NUMERO INUTILIZADO DEVIDO A ERRO NA EMISSAO DA NFCe",
lCfgNfe[0]);
MessageBox.Show("Numero INUTILIZADO com sucesso na receita.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
catch (Exception ex)
{ MessageBox.Show("Erro: " + ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
Close();
}
}
catch (Exception ex)
{ MessageBox.Show(ex.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
else
{
CamadaDados.Faturamento.NotaFiscal.TList_RegLanFaturamento lNf =
CamadaNegocio.Faturamento.NotaFiscal.TCN_LanFaturamento.Busca(cd_empresa.Text,
nr_notafiscal.Text,
cbSerie.SelectedValue.ToString(),
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
true,
string.Empty,
string.Empty,
"S",
string.Empty,
"A",
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
"'P'",
string.Empty,
false,
string.Empty,
string.Empty,
string.Empty,
1,
string.Empty,
null);
if (lNf.Count > 0)
{
try
{
//Verificar se NFe ja nao foi cancelada junto a receita
CamadaDados.Faturamento.NFE.TList_EventoNFe lEvento =
CamadaNegocio.Faturamento.NFE.TCN_EventoNFe.Buscar(string.Empty,
lNf[0].Cd_empresa,
lNf[0].Nr_lanctofiscal.ToString(),
string.Empty,
string.Empty,
"CA",
string.Empty,
null);
if (lEvento.Count.Equals(0) ? false : lEvento[0].St_registro.Trim().ToUpper().Equals("T"))
{
//Cancelar somente NFe no Aliance.NET
CamadaNegocio.Faturamento.NotaFiscal.TCN_LanFaturamento.CancelarFaturamento(lNf[0], null);
MessageBox.Show("NF-e cancelada com sucesso no sistema Aliance.NET", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
//Cancelar pedido
CamadaDados.Faturamento.Pedido.TList_Pedido lPed =
CamadaNegocio.Faturamento.Pedido.TCN_Pedido.Busca(lNf[0].Cd_empresa,
string.Empty,
lNf[0].Nr_pedidostring,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
false,
false,
false,
false,
false,
false,
false,
false,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
false,
1,
string.Empty,
null);
CamadaNegocio.Faturamento.Pedido.TCN_Pedido.Deleta_Pedido(lPed[0], null);
//Cancelar venda rapida
CamadaDados.Faturamento.PDV.TList_VendaRapida lVenda =
new CamadaDados.Faturamento.PDV.TCD_VendaRapida().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_pdv_pedido_x_vendarapida x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.id_vendarapida = a.id_cupom " +
"and x.nr_pedido = " + lNf[0].Nr_pedidostring + ")"
}
}, 0, string.Empty, string.Empty);
CamadaNegocio.Faturamento.PDV.TCN_VendaRapida.ExcluirVendaRapida(lVenda, null);
Close();
}
else
{
if (lEvento.Count.Equals(0))
{
InputBox ibp = new InputBox();
ibp.Text = "Motivo Cancelamento Nota Fiscal";
string motivo = ibp.ShowDialog();
if (string.IsNullOrEmpty(motivo))
{
MessageBox.Show("Obrigatorio informar motivo de cancelamento da nota fiscal.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (motivo.Trim().Length < 15)
{
MessageBox.Show("Motivo de cancelamento deve ter mais que 15 caracteres.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Buscar evento Carta Correcao
CamadaDados.Faturamento.Cadastros.TList_Evento lEv =
CamadaNegocio.Faturamento.Cadastros.TCN_Evento.Buscar(string.Empty, string.Empty, "CA", null);
if (lEv.Count.Equals(0))
{
MessageBox.Show("Não existe evento de CANCELAMENTO NFE cadastrado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Cancelar NFe Receita
CamadaDados.Faturamento.NFE.TRegistro_EventoNFe rEvento = new CamadaDados.Faturamento.NFE.TRegistro_EventoNFe();
rEvento.Cd_empresa = lNf[0].Cd_empresa;
rEvento.Nr_lanctofiscal = lNf[0].Nr_lanctofiscal;
rEvento.Chave_acesso_nfe = lNf[0].Chave_acesso_nfe;
rEvento.Nr_protocoloNfe = lNf[0].Nr_protocolo;
rEvento.Dt_evento = CamadaDados.UtilData.Data_Servidor();
rEvento.Ds_evento = motivo;
rEvento.Cd_eventostr = lEv[0].Cd_eventostr;
rEvento.Descricao_evento = lEv[0].Ds_evento;
rEvento.Tp_evento = lEv[0].Tp_evento;
rEvento.St_registro = "A";
CamadaNegocio.Faturamento.NFE.TCN_EventoNFe.Gravar(rEvento, null);
if (MessageBox.Show("Evento de CANCELAMENTO gravado com sucesso.\r\n" +
"Deseja enviar o mesmo para a receita?", "Pergunta",
MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
== DialogResult.Yes)
{
//Buscar CfgNfe para a empresa
CamadaDados.Faturamento.Cadastros.TList_CfgNfe lCfg =
CamadaNegocio.Faturamento.Cadastros.TCN_CfgNfe.Buscar(lNf[0].Cd_empresa,
string.Empty,
string.Empty,
null);
if (lCfg.Count.Equals(0))
{
MessageBox.Show("Não existe configuração para envio de evento para a empresa " + lNf[0].Cd_empresa.Trim() + ".",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
string msg = srvNFE.Evento.TEventoNFe.EnviarEvento(rEvento, lCfg[0]);
if (!string.IsNullOrEmpty(msg))
{
MessageBox.Show("Erro ao enviar evento CANCELAMENTO para a receita.\r\n" +
"Aguarde um tempo e tente novamente.\r\n" +
"Erro: " + msg.Trim() + "\r\n" +
"Obs.: A NFe não será cancelada no sistema Aliance.NET enquanto a mesma não for cancelada junto a receita.",
"Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
else
{
MessageBox.Show("Evento registrado e vinculado a NF-e.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CamadaNegocio.Faturamento.NotaFiscal.TCN_LanFaturamento.CancelarFaturamento(lNf[0], null);
MessageBox.Show("NF-e cancelada com sucesso no sistema Aliance.NET", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
//Cancelar pedido
CamadaDados.Faturamento.Pedido.TList_Pedido lPed =
new CamadaDados.Faturamento.Pedido.TCD_Pedido().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = lNf[0].Nr_pedidostring
},
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_pdv_pedido_x_vendarapida x " +
"where x.nr_pedido = a.nr_pedido)"
}
}, 1, string.Empty);
if (lPed.Count > 0)
{
CamadaNegocio.Faturamento.Pedido.TCN_Pedido.Deleta_Pedido(lPed[0], null);
//Cancelar venda rapida
CamadaDados.Faturamento.PDV.TList_VendaRapida lVenda =
new CamadaDados.Faturamento.PDV.TCD_VendaRapida().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_pdv_pedido_x_vendarapida x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.id_vendarapida = a.id_cupom " +
"and x.nr_pedido = " + lNf[0].Nr_pedidostring + ")"
}
}, 0, string.Empty, string.Empty);
CamadaNegocio.Faturamento.PDV.TCN_VendaRapida.ExcluirVendaRapida(lVenda, null);
}
//Cancelar venda rapida nota entrega futura
CamadaDados.Faturamento.PDV.TList_VendaRapida lVendaEF =
new CamadaDados.Faturamento.PDV.TCD_VendaRapida().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_pdv_vendarapida_x_entregafutura x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.id_cupom = a.id_cupom " +
"and x.cd_empresa = '" + lNf[0].Cd_empresa.Trim() + "' " +
"and x.nr_lanctofiscal = " + lNf[0].Nr_lanctofiscalstr + ")"
}
}, 0, string.Empty, string.Empty);
CamadaNegocio.Faturamento.PDV.TCN_VendaRapida.ExcluirVendaRapida(lVendaEF, null);
Close();
}
}
}
}
else
{
//Buscar CfgNfe para a empresa
CamadaDados.Faturamento.Cadastros.TList_CfgNfe lCfg =
CamadaNegocio.Faturamento.Cadastros.TCN_CfgNfe.Buscar(lNf[0].Cd_empresa,
string.Empty,
string.Empty,
null);
if (lCfg.Count.Equals(0))
{
MessageBox.Show("Não existe configuração para envio de evento para a empresa " + lNf[0].Cd_empresa.Trim() + ".",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
string msg = srvNFE.Evento.TEventoNFe.EnviarEvento(lEvento[0], lCfg[0]);
if (!string.IsNullOrEmpty(msg))
{
MessageBox.Show("Erro ao enviar evento CANCELAMENTO para a receita.\r\n" +
"Aguarde um tempo e tente novamente.\r\n" +
"Erro: " + msg.Trim() + "\r\n" +
"Obs.: A NFe não será cancelada no sistema Aliance.NET enquanto a mesma não for cancelada junto a receita.",
"Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
else
{
MessageBox.Show("Evento registrado e vinculado a NF-e.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CamadaNegocio.Faturamento.NotaFiscal.TCN_LanFaturamento.CancelarFaturamento(lNf[0], null);
MessageBox.Show("NF-e cancelada com sucesso no sistema Aliance.NET", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
//Cancelar pedido
CamadaDados.Faturamento.Pedido.TList_Pedido lPed =
CamadaNegocio.Faturamento.Pedido.TCN_Pedido.Busca(lNf[0].Cd_empresa,
string.Empty,
lNf[0].Nr_pedidostring,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
false,
false,
false,
false,
false,
false,
false,
false,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
decimal.Zero,
decimal.Zero,
string.Empty,
string.Empty,
false,
1,
string.Empty,
null);
CamadaNegocio.Faturamento.Pedido.TCN_Pedido.Deleta_Pedido(lPed[0], null);
//Cancelar venda rapida
CamadaDados.Faturamento.PDV.TList_VendaRapida lVenda =
new CamadaDados.Faturamento.PDV.TCD_VendaRapida().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_pdv_pedido_x_vendarapida x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.id_vendarapida = a.id_cupom " +
"and x.nr_pedido = " + lNf[0].Nr_pedidostring + ")"
}
}, 0, string.Empty, string.Empty);
CamadaNegocio.Faturamento.PDV.TCN_VendaRapida.ExcluirVendaRapida(lVenda, null);
Close();
}
}
}
}
}
catch (Exception ex)
{ MessageBox.Show("Erro: " + ex.Message.Trim()); }
}
}
}
public static string Gravar(TRegistro_CadSequenciaNF val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_CadSequenciaNF cd = new TCD_CadSequenciaNF();
try
{
if (banco == null)
{
st_transacao = cd.CriarBanco_Dados(true);
}
else
{
cd.Banco_Dados = banco;
}
//Buscar ultima nota emitida para esta sequencia
object obj = new CamadaDados.Faturamento.NotaFiscal.TCD_LanFaturamento(banco).BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + val.CD_Empresa.Trim() + "'"
},
new TpBusca()
{
vNM_Campo = "a.nr_serie",
vOperador = "=",
vVL_Busca = "'" + val.Nr_Serie.Trim() + "'"
},
new TpBusca()
{
vNM_Campo = "a.cd_modelo",
vOperador = "=",
vVL_Busca = "'" + val.Cd_modelo.Trim() + "'"
},
new TpBusca()
{
vNM_Campo = "a.tp_nota",
vOperador = "=",
vVL_Busca = "'P'"
}
}, "a.nr_notafiscal", string.Empty, "a.nr_notafiscal desc", null);
if (obj != null)
{
if (decimal.Parse(obj.ToString()) > val.Seq_NotaFiscal)
{
throw new Exception("Existe nota fiscal propria emitida com numero maior que a sequencia.");
}
}
string retorno = cd.Grava(val);
if (st_transacao)
{
cd.Banco_Dados.Commit_Tran();
}
return(retorno);
}
catch (Exception ex)
{
if (st_transacao)
{
cd.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar sequencia: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
cd.deletarBanco_Dados();
}
}
}
public static string Excluir(TRegistro_AlocacaoItem val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_AlocacaoItem qtb_aloc = new TCD_AlocacaoItem();
try
{
if (banco == null)
{
st_transacao = qtb_aloc.CriarBanco_Dados(true);
}
else
{
qtb_aloc.Banco_Dados = banco;
}
//Verificar se a entrega ja nao esta faturada
object obj = new CamadaDados.Faturamento.NotaFiscal.TCD_LanFaturamento(qtb_aloc.Banco_Dados).BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'C'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fat_notafiscal_item_x_estoque x " +
"where x.cd_empresa = a.cd_empresa " +
"and x.nr_lanctofiscal = a.nr_lanctofiscal " +
"and x.id_entrega = " + val.Id_entregastr + ")"
}
}, "a.nr_notafiscal");
if (obj != null)
{
throw new Exception("Entrega: " + val.Id_entregastr + " ja se encontra faturada.\r\n" +
"Nota Fiscal: " + obj.ToString().Trim() + ".");
}
qtb_aloc.Excluir(val);
//Excluir entrega do pedido
CamadaNegocio.Faturamento.Pedido.TCN_LanEntregaPedido.Excluir(
CamadaNegocio.Faturamento.Pedido.TCN_LanEntregaPedido.Busca(val.Id_entregastr,
string.Empty,
string.Empty,
string.Empty,
false,
string.Empty,
qtb_aloc.Banco_Dados)[0], qtb_aloc.Banco_Dados);
if (st_transacao)
{
qtb_aloc.Banco_Dados.Commit_Tran();
}
return("OK");
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_aloc.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro excluir registro: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_aloc.deletarBanco_Dados();
}
}
}
