private void afterGrava()
{
if ((bsOs.DataSource as CamadaDados.Servicos.TList_LanServico).Exists(p => p.St_Lote))
{
using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
{
fUser.Ds_regraespecial = "PERMITIR DEVOLUCAO ORDEM SERVICO";
if (fUser.ShowDialog() == DialogResult.OK)
{
(bsOs.DataSource as CamadaDados.Servicos.TList_LanServico).ForEach(p =>
{
if (p.St_Lote)
{
p.Logindevolucao = fUser.Login;
}
});
this.DialogResult = DialogResult.OK;
}
}
}
else
{
this.DialogResult = DialogResult.Cancel;
}
}
private void afterGrava()
{
if (string.IsNullOrEmpty(cd_clifor.Text))
{
MessageBox.Show("Obrigatório informar novo cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cd_clifor.Focus();
return;
}
if (string.IsNullOrEmpty(MotivoTroca.Text))
{
MessageBox.Show("Obrigatório informar motivo da troca.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
MotivoTroca.Focus();
return;
}
if (!CamadaNegocio.Diversos.TCN_Usuario_RegraEspecial.ValidaRegra(Utils.Parametros.pubLogin, "PERMITIR TROCAR CLIENTE PROPOSTA", null))
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Login = Utils.Parametros.pubLogin;
fRegra.Ds_regraespecial = "PERMITIR TROCAR CLIENTE PROPOSTA";
if (fRegra.ShowDialog() == DialogResult.Cancel)
{
MessageBox.Show("Obrigatório informar LOGIN com permissão para realizar troca", "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
else
{
Login = fRegra.Login;
}
}
}
DialogResult = DialogResult.OK;
}
private void ExcluirItem()
{
if (bsValeResgate.Current != null)
{
if (MessageBox.Show("Confirma cancelamento do vale selecionado?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question,
MessageBoxDefaultButton.Button1) == DialogResult.Yes)
{
if ((bsValeResgate.Current as CamadaDados.Faturamento.Fidelizacao.TRegistro_ValeResgate).St_impressobool)
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Ds_regraespecial = "PERMITIR CANCELAR VALE PONTOS FIDELIZAÇÃO";
if (fRegra.ShowDialog() == DialogResult.OK)
{
(bsValeResgate.Current as CamadaDados.Faturamento.Fidelizacao.TRegistro_ValeResgate).Logincanc = fRegra.Login;
}
else
{
return;
}
}
}
try
{
CamadaNegocio.Faturamento.Fidelizacao.TCN_ValeResgate.Excluir(bsValeResgate.Current as CamadaDados.Faturamento.Fidelizacao.TRegistro_ValeResgate, null);
MessageBox.Show("Vale cancelado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
private void emEntrega()
{
if (bsLocacao.Current == null)
{
MessageBox.Show("Necessário selecionar alguma locação para entregar.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
else if (bsColetaEntrega.Current == null)
{
MessageBox.Show("Necessário que locação selecionada tenha coleta/entrega.", "Informativo", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
using (Parametros.Diversos.TFRegraUsuario fUsuario = new Parametros.Diversos.TFRegraUsuario())
{
fUsuario.Ds_regraespecial = "PERMITIR EVOLUIR ENTREGA";
if (fUsuario.ShowDialog() == DialogResult.OK)
{
//Buscar código do usuário informado
object obj = new CamadaDados.Financeiro.Cadastros.TCD_CadClifor().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.loginvendedor",
vOperador = "=",
vVL_Busca = "'" + fUsuario.Login.Trim() + "'"
}
}, "a.cd_clifor");
if (obj == null || string.IsNullOrEmpty(obj.ToString()))
{
MessageBox.Show("Não foi possível obter o login de vendedor, certifique-se que o motorista tenha pré-cadastrado.");
return;
}
if (obj.ToString().Equals((bsColetaEntrega.Current as CamadaDados.Locacao.TRegistro_ColetaEntrega).Cd_motorista))
{
if (MessageBox.Show("Confirma evolução da locação? \nDe: Aguardando Entrega.\nPara: Em entrega. ", "Mensagem", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1).Equals(DialogResult.Yes))
{
(bsLocacao.Current as CamadaDados.Locacao.TRegistro_Locacao).St_registro = "E";
CamadaNegocio.Locacao.TCN_Locacao.Gravar((bsLocacao.Current as CamadaDados.Locacao.TRegistro_Locacao), null);
afterBuscar();
}
}
else
{
MessageBox.Show("O motorista informado não condiz com o explícito na locação.", "Erro", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
}
private void afterGrava()
{
if (!(bsEntregaPedido.DataSource as CamadaDados.Faturamento.Pedido.TList_EntregaPedido).Exists(p => p.St_recontar))
{
MessageBox.Show("Não existe conferência marcada para ser processada.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Pedir autenticacao de um usuario com acesso a fazer conferencia
using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
{
fUser.Ds_regraespecial = "PERMITIR PROCESSAR CONFERENCIA PEDIDO";
if (fUser.ShowDialog() == DialogResult.OK)
{
this.Login = fUser.Login;
this.DialogResult = DialogResult.OK;
}
}
}
private void AprovarNegociacao()
{
if (bsNegociacao.Current != null)
{
if ((bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).St_registro.Trim().ToUpper().Equals("F"))
{
using (TFListaFornecedor fLista = new TFListaFornecedor())
{
fLista.lItens = (bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).lItens;
if (fLista.ShowDialog() == DialogResult.OK)
{
//Pedir autenticacao de um usuario com acesso a fazer conferencia
using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
{
fUser.Ds_regraespecial = "PERMITIR APROVAR NEGOCIACAO";
if (fUser.ShowDialog() == DialogResult.OK)
{
(bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).Loginaprovareprova = fUser.Login;
try
{
CamadaNegocio.Compra.Lancamento.TCN_Negociacao.ProcessarNegociacao(bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao, null);
MessageBox.Show("Negociação Processada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_negociacao.Text = (bsNegociacao.Current as CamadaDados.Compra.Lancamento.TRegistro_Negociacao).Id_negociacao.Value.ToString();
this.afterBusca();
}
catch (Exception ex)
{
MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
}
}
}
}
else
{
MessageBox.Show("Permitido aprovar somente negociação com status <FECHADA>.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
private void DevolverOs()
{
if (bsOrdemServico.Current != null)
{
if ((bsOrdemServico.Current as TRegistro_LanServico).St_os.Trim().ToUpper().Equals("PR"))
{
using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
{
fUser.Ds_regraespecial = "PERMITIR DEVOLUCAO ORDEM SERVICO";
if (fUser.ShowDialog() == DialogResult.OK)
{
(bsOrdemServico.Current as TRegistro_LanServico).Logindevolucao = fUser.Login;
if ((bsOrdemServico.Current as TRegistro_LanServico).lAcessorios.Count > 0)
{
using (TFListaAcessorios fLista = new TFListaAcessorios())
{
fLista.lAcessorios = (bsOrdemServico.Current as TRegistro_LanServico).lAcessorios;
fLista.ShowDialog();
(bsOrdemServico.Current as TRegistro_LanServico).lAcessorios = fLista.lAcessorios;
}
}
try
{
CamadaNegocio.Servicos.TCN_LanServico.DevolverOS(bsOrdemServico.Current as TRegistro_LanServico, null);
MessageBox.Show("Ordem serviço devolvida com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_osbusca.Text = (bsOrdemServico.Current as TRegistro_LanServico).Id_osstr;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
else
{
MessageBox.Show("Permitido devolver somente OS PROCESSADA.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
private void BB_Desconto_Click(object sender, EventArgs e)
{
if (bsAssistente.Current == null)
{
return;
}
//Validar usuário para operação
if (!CamadaNegocio.Diversos.TCN_Usuario_RegraEspecial.ValidaRegra(Utils.Parametros.pubLogin, "PERMITIR DESCONTO NO ACESSORIO", null))
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Login = Utils.Parametros.pubLogin;
fRegra.Ds_regraespecial = "PERMITIR DESCONTO NO ACESSORIO";
if (fRegra.ShowDialog() == DialogResult.Cancel)
{
MessageBox.Show("Não será possível finalizar a operação, pois o usuário não possui permissão de desconto no acessório.", "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
}
}
//Informar valor do desconto
using (Componentes.TFQuantidade fQtde = new Componentes.TFQuantidade())
{
fQtde.Ds_label = "Valor:";
fQtde.Casas_decimais = 2;
fQtde.Vl_default = 1;
fQtde.Vl_Minimo = 1;
if (fQtde.ShowDialog() == DialogResult.OK)
{
(bsAssistente.Current as CamadaDados.Estoque.Cadastros.TRegistro_CadAssistenteVenda).Vl_desconto = fQtde.Quantidade;
bsAssistente.ResetCurrentItem();
}
}
}
private void btn_alterarSerie_Click(object sender, EventArgs e)
{
if (bsSerieProduto.Current != null)
{
if (!St_alterar)
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Ds_regraespecial = "PERMITIR CADASTRAR NUMERO DE SERIE";
fRegra.Login = Utils.Parametros.pubLogin;
if (fRegra.ShowDialog() == DialogResult.OK)
{
St_alterar = true;
}
}
}
if (St_alterar)
{
//Verificar se Nº Série já existe faturamento
if (new CamadaDados.Faturamento.NotaFiscal.TCD_LanFaturamento().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from TB_FAT_Ordem_X_Expedicao x " +
"inner join TB_FAT_ItensExpedicao y " +
"on x.cd_empresa = y.cd_empresa " +
"and x.id_expedicao = y.id_expedicao " +
"where a.cd_empresa = x.cd_empresa " +
"and a.nr_lanctofiscal = x.nr_lanctofiscal " +
"and isnull(a.st_registro, 'A') <> 'C' " +
"and y.id_serie = " + (bsSerieProduto.Current as CamadaDados.Producao.Producao.TRegistro_SerieProduto).Id_seriestr + ") "
}
}, "1") != null)
{
MessageBox.Show("Não é possível alterar Nº Série que possui faturamento!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Alterar Nº Série
using (Utils.InputBox ibp = new Utils.InputBox())
{
ibp.Text = "ALTERAR Nº SÉRIE";
string serie = ibp.ShowDialog();
if (!string.IsNullOrEmpty(serie))
{
try
{
//Verificar se já existe Nº Série cadastrado
if (new CamadaDados.Producao.Producao.TCD_SerieProduto().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.Nr_serie",
vOperador = "=",
vVL_Busca = "'" + serie.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'C'"
}
}, "1") != null)
{
MessageBox.Show("Já existe Nº Série cadastrado!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
(bsSerieProduto.Current as CamadaDados.Producao.Producao.TRegistro_SerieProduto).Nr_serie = serie;
CamadaNegocio.Producao.Producao.TCN_SerieProduto.Gravar(bsSerieProduto.Current as CamadaDados.Producao.Producao.TRegistro_SerieProduto, null);
MessageBox.Show("Nº Série alterado com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
}
private void EstornarConferencia()
{
if (tcPedidos.SelectedTab.Equals(tpPedidosEnt))
{
if (BS_PedidoEnt.Current != null)
{
if ((BS_PedidoEnt.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).lEntregaPedido.Count > 0)
{
if ((BS_PedidoEnt.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).lEntregaPedido.Exists(p => p.St_registro.Trim().ToUpper().Equals("P")))
{
if (MessageBox.Show("Confirma estorno das conferências processadas do pedido Nº " + (BS_PedidoEnt.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).Nr_pedido.ToString() + "?",
"Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
//Pedir autenticacao de um usuario com acesso a fazer conferencia
using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
{
fUser.Ds_regraespecial = "PERMITIR ESTORNAR CONFERENCIA PEDIDO";
if (fUser.ShowDialog() == DialogResult.OK)
{
try
{
CamadaNegocio.Faturamento.Pedido.TCN_LanEntregaPedido.EstornarConferenciaPedido(
(BS_PedidoEnt.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).lEntregaPedido, null);
MessageBox.Show("Conferência estornada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.afterBusca();
}
catch (Exception ex)
{
MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
}
}
else
{
MessageBox.Show("Permitido estornar somente conferência com status <PROCESSADA>.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
}
else if (tcPedidos.SelectedTab.Equals(tpPedidoSai))
{
if (bsPedidoSai.Current != null)
{
if ((bsPedidoSai.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).lEntregaPedido.Count > 0)
{
if ((bsPedidoSai.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).lEntregaPedido.Exists(p => p.St_registro.Trim().ToUpper().Equals("P")))
{
if (MessageBox.Show("Confirma estorno das conferências processadas do pedido Nº " + (bsPedidoSai.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).Nr_pedido.ToString() + "?",
"Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
//Pedir autenticacao de um usuario com acesso a fazer conferencia
using (Parametros.Diversos.TFRegraUsuario fUser = new Parametros.Diversos.TFRegraUsuario())
{
fUser.Ds_regraespecial = "PERMITIR ESTORNAR CONFERENCIA PEDIDO";
if (fUser.ShowDialog() == DialogResult.OK)
{
try
{
string retorno = CamadaNegocio.Faturamento.Pedido.TCN_LanEntregaPedido.EstornarConferenciaPedido(
(bsPedidoSai.Current as CamadaDados.Faturamento.Pedido.TRegistro_Pedido).lEntregaPedido, null);
MessageBox.Show(retorno.Trim() != string.Empty ? retorno.Trim() : "Conferência estornada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.afterBusca();
}
catch (Exception ex)
{
MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
}
}
else
{
MessageBox.Show("Permitido estornar somente conferência com status <PROCESSADA>.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
}
}
private void afterGrava()
{
if (bsItens.Current == null)
{
MessageBox.Show("Obrigatório informar novo item para realizar troca.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (string.IsNullOrEmpty(edtMotivoTroca.Text))
{
MessageBox.Show("Obrigatório informar motivo da troca.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
edtMotivoTroca.Focus();
return;
}
//Buscar local de armazenagem
object obj = new CamadaDados.Estoque.Cadastros.TCD_CadLocalArm_X_Produto().BuscarEscalar(
new TpBusca[] { new TpBusca {
vNM_Campo = "a.cd_produto", vOperador = "=", vVL_Busca = "'" + (bsItens.Current as TRegistro_Orcamento_Item).Cd_produto.Trim() + "'"
} },
"a.cd_local");
if (obj == null ? true : string.IsNullOrEmpty(obj.ToString()))
{
(bsItens.Current as TRegistro_Orcamento_Item).Cd_local =
new CamadaDados.Faturamento.Cadastros.TCD_CFGOrcamento().BuscarEscalar(
new TpBusca[] { new TpBusca {
vNM_Campo = "a.cd_empresa", vOperador = "=", vVL_Busca = "'" + rOrc.Cd_empresa.Trim() + "'"
} },
"a.cd_local")?.ToString();
}
else
{
(bsItens.Current as TRegistro_Orcamento_Item).Cd_local = obj.ToString();
}
if (rItemTroca.Vl_subtotalliq < (bsItens.Current as TRegistro_Orcamento_Item).Vl_subtotalliq)
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.vCd_empresa = rOrc.Cd_empresa;
fDup.vNm_empresa = rOrc.Nm_empresa;
fDup.vCd_clifor = rOrc.Cd_clifor;
fDup.vNm_clifor = rOrc.Nm_clifor;
fDup.vCd_endereco = rOrc.Cd_endereco;
fDup.vDs_endereco = rOrc.Ds_endereco;
fDup.vTp_mov = "R";
fDup.vNr_docto = rOrc.Nr_orcamentostr;
fDup.vVl_documento = (bsItens.Current as TRegistro_Orcamento_Item).Vl_subtotalliq - rItemTroca.Vl_subtotalliq;
fDup.cd_empresa.Enabled = false;
fDup.bb_empresa.Enabled = false;
fDup.cd_clifor.Enabled = false;
fDup.bb_clifor.Enabled = false;
fDup.cd_endereco.Enabled = false;
fDup.bb_endereco.Enabled = false;
fDup.vl_documento_index.Enabled = false;
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Current != null)
{
rDup = fDup.dsDuplicata.Current as TRegistro_LanDuplicata;
}
else
{
MessageBox.Show("Obrigatório gerar duplicata para saldo devedor.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
else
{
MessageBox.Show("Obrigatório gerar duplicata para saldo devedor.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
if (!CamadaNegocio.Diversos.TCN_Usuario_RegraEspecial.ValidaRegra(Utils.Parametros.pubLogin, "PERMITIR TROCA ITEM PROPOSTA", null))
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Login = Utils.Parametros.pubLogin;
fRegra.Ds_regraespecial = "PERMITIR TROCA ITEM PROPOSTA";
if (fRegra.ShowDialog() == DialogResult.Cancel)
{
MessageBox.Show("Obrigatório informar LOGIN com permissão para realizar troca", "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
else
{
pLogin = fRegra.Login;
}
}
}
DialogResult = DialogResult.OK;
}
private void bb_alterar_Click(object sender, EventArgs e)
{
if (bsItensExpedicao.Current != null)
{
string pLogin = Utils.Parametros.pubLogin;
if (!st_alterarserie)
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Ds_regraespecial = "PERMITIR ALTERAR Nº SÉRIE";
fRegra.Login = Utils.Parametros.pubLogin;
if (fRegra.ShowDialog() == DialogResult.OK)
{
st_alterarserie = true;
pLogin = fRegra.Login;
}
}
}
if (st_alterarserie)
{
if (string.IsNullOrEmpty((bsItensExpedicao.Current as TRegistro_ItensExpedicao).Nr_serie))
{
MessageBox.Show("Item não possui Nº Série para ser alterado!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
string vParam = "(|NOT EXISTS|(SELECT 1 FROM TB_FAT_ItensExpedicao x " +
"where a.id_serie = x.id_serie ) " +
"or exists (SELECT 1 FROM TB_FAT_ItensExpedicao x " +
"inner join TB_FAT_Ordem_X_Expedicao y " +
"on x.CD_Empresa = y.CD_Empresa " +
"and x.ID_Expedicao = y.id_expedicao " +
"inner join TB_FAT_CompDevol_NF w " +
"on y.CD_Empresa = w.CD_Empresa " +
"and y.Nr_lanctoFiscal = w.Nr_LanctoFiscal_Origem " +
"inner join TB_PRD_Seriedevolvida z " +
"on w.cd_empresa = z.cd_empresa " +
"and w.nr_lanctofiscal_destino = z.nr_lanctofiscal " +
"and w.id_nfitem_destino = z.ID_NFItem " +
"where a.id_serie = x.id_serie )); " +
"a.cd_empresa|=|'" + (bsItensExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao).Cd_empresa.Trim() + "';" +
"a.cd_produto|=|'" + (bsItensExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao).Cd_produto.Trim() + "';" +
"isnull(a.st_registro, 'P')|=|'P'";
Componentes.EditDefault id = new Componentes.EditDefault();
id.NM_CampoBusca = "ID_Serie";
Componentes.EditDefault ds = new Componentes.EditDefault();
ds.NM_CampoBusca = "Nr_serie";
FormBusca.UtilPesquisa.BTN_BUSCA("a.Nr_serie|Nº Série|200;" +
"a.Id_serie|ID|50",
new Componentes.EditDefault[] { id, ds },
new CamadaDados.Producao.Producao.TCD_SerieProduto(),
vParam);
if (!string.IsNullOrEmpty(id.Text))
{
try
{
InputBox ibp = new InputBox();
ibp.Text = "Motivo Cancelamento Locação";
string motivo = ibp.ShowDialog();
if (string.IsNullOrEmpty(motivo))
{
MessageBox.Show("Obrigatorio informar motivo de cancelamento da locação!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (motivo.Trim().Length < 10)
{
MessageBox.Show("Motivo de cancelamento deve ter mais que 10 caracteres!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
CamadaNegocio.Faturamento.Pedido.TCN_TrocaSerieExped.Gravar(
new TRegistro_TrocaSerieExped()
{
Cd_empresa = (bsItensExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao).Cd_empresa,
Id_expedicaostr = (bsItensExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao).Id_expedicaostr,
Id_itemstr = (bsItensExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao).Id_itemstr,
Id_SerieNewstr = id.Text,
Id_SerieOldstr = (bsItensExpedicao.Current as CamadaDados.Faturamento.Pedido.TRegistro_ItensExpedicao).Id_seriestr,
Login = pLogin,
Motivo = motivo
}, null);
MessageBox.Show("Nº Série alterado com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
bsExpedicao_PositionChanged(this, new EventArgs());
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Information); }
}
}
}
}
private void bb_resgatar_Click(object sender, EventArgs e)
{
if (lPontos.Sum(p => p.SD_Pontos) < rCfgPosto.Qt_pontosvale_fid)
{
MessageBox.Show("Saldo de pontos insuficiente para emitir VALE<Pontos necessários por vale: " + rCfgPosto.Qt_pontosvale_fid.ToString() + ">.",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
string loginautoriza = string.Empty;
if (rCfgPosto.Qt_maxvaledia > decimal.Zero)
{
if (rCfgPosto.Qt_maxvaledia <= vales_impressos.Value)
{
using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario())
{
fRegra.Ds_regraespecial = "AUTORIZA EMISSÃO VALE PONTOS FIDELIZAÇÃO";
if (fRegra.ShowDialog() == DialogResult.OK)
{
loginautoriza = fRegra.Login;
}
else
{
return;
}
}
}
}
CamadaDados.Faturamento.Fidelizacao.TRegistro_ValeResgate rVale = null;
try
{
rVale = CamadaNegocio.PostoCombustivel.TCN_Convenio_Clifor.ResgatarPontosFid(lPontos, rCfgPosto.Qt_pontosvale_fid, LoginPDV, loginautoriza, null);
lPontos.RemoveAll(p => p.SD_Pontos.Equals(decimal.Zero));
pontos_resgatar.Value = lPontos.Sum(p => p.SD_Pontos);
BuscarValesDia();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
try
{
//Imprimir Vale
List <string> Texto = new List <string>();
Texto.Add(" RESGATE PONTOS ");
Texto.Add("VALE Nr.: " + rVale.Id_valestr);
if (!string.IsNullOrWhiteSpace(pPlaca.Replace("-", string.Empty)))
{
Texto.Add("PLACA: " + pPlaca.Trim() + " VALE: " + rVale.Id_valestr);
}
else
{
Texto.Add("CLIENTE: " + pCd_clifor.Trim() + "-" + pNm_clifor.Trim());
}
Texto.Add("DATA EMISSAO: " + CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy HH:mm:ss"));
//Buscar Nº Dias Validade
if (rCfgPosto.diasValidadeVale > decimal.Zero)
{
Texto.Add("DT.VALIDADE: " + CamadaDados.UtilData.Data_Servidor().AddDays(int.Parse(rCfgPosto.diasValidadeVale.ToString())).ToString("dd/MM/yyyy"));
}
Texto.Add(string.Empty);
Texto.Add(string.Empty);
Texto.Add(string.Empty);
//Verificar se existe msg especifica para clifor do convenio
string Ds_msgVale_Clifor = string.Empty;
if (!string.IsNullOrEmpty(pId_Convenio))
{
object obj = new CamadaDados.PostoCombustivel.TCD_Convenio_Clifor().BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = string.Empty,
vVL_Busca = "a.cd_clifor = '" + pCd_clifor.Trim() +
"' or exists(select 1 from TB_PDC_Convenio_X_Placa x " +
"where a.id_convenio = x.id_convenio " +
"and a.cd_empresa = x.cd_empresa " +
"and a.cd_clifor = x.cd_clifor " +
"and a.cd_endereco = x.cd_endereco " +
"and a.cd_produto = x.cd_produto " +
"and x.placa = '" + pPlaca.Trim() + "')"
},
new TpBusca()
{
vNM_Campo = "a.id_convenio",
vOperador = "=",
vVL_Busca = pId_Convenio
}
}, "a.ds_msgvale");
Ds_msgVale_Clifor = obj == null ? string.Empty : obj.ToString();
}
else
{
object obj = new CamadaDados.PostoCombustivel.TCD_Convenio_Clifor().BuscarEscalar(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + rCfgPosto.Cd_empresa.Trim() + "'"
},
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = string.Empty,
vVL_Busca = "a.cd_clifor = '" + pCd_clifor.Trim() +
"' or exists(select 1 from TB_PDC_Convenio_X_Placa x " +
"where a.id_convenio = x.id_convenio " +
"and a.cd_empresa = x.cd_empresa " +
"and a.cd_clifor = x.cd_clifor " +
"and a.cd_endereco = x.cd_endereco " +
"and a.cd_produto = x.cd_produto " +
"and x.placa = '" + pPlaca.Trim() + "')"
},
new TpBusca()
{
vNM_Campo = "isnull(a.ds_msgvale, '')",
vOperador = "<>",
vVL_Busca = "''"
}
}, "a.ds_msgvale");
Ds_msgVale_Clifor = obj == null ? string.Empty : obj.ToString();
}
if (string.IsNullOrEmpty(Ds_msgVale_Clifor))
{
Texto.Add(rCfgPosto.Ds_msgvale.Trim().ToUpper());
}
else
{
Texto.Add(Ds_msgVale_Clifor);
}
Texto.Add(string.Empty);
Texto.Add(string.Empty);
Texto.Add("PONTOS RESGATAR: " + lPontos.Sum(p => p.SD_Pontos).ToString());
ImprimirVale(Texto);
//Marcar vale como impresso
try
{
rVale.St_impresso = "S";
CamadaNegocio.Faturamento.Fidelizacao.TCN_ValeResgate.Gravar(rVale, null);
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
catch { }
}
