private void Busca_Itens_Pedido()
{
TCN_Pedido.Busca_Pedido_Itens(BS_Pedido.Current as TRegistro_Pedido);
TCN_Pedido.Totaliza_Itens(BS_Pedido.Current as TRegistro_Pedido);
TCN_Pedido.Busca_Valores_Faturamento(BS_Pedido.Current as TRegistro_Pedido);
BS_Pedido.ResetBindings(true);
}
private void BS_Pedido_PositionChanged(object sender, EventArgs e)
{
if (BS_Pedido.Current != null)
{
//Buscar Expedição
(BS_Pedido.Current as TRegistro_Pedido).lExpedicao =
new TCD_Expedicao().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from TB_FAT_ItensExpedicao x " +
"where a.cd_empresa = x.cd_empresa " +
"and a.id_expedicao = x.id_expedicao " +
"and x.nr_pedido = " + (BS_Pedido.Current as TRegistro_Pedido).Nr_pedido + ") "
}
}, 0, string.Empty);
//Buscar lista de itens
(BS_Pedido.Current as TRegistro_Pedido).Pedido_Itens =
new TCD_LanPedido_Item().Select(new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = (BS_Pedido.Current as TRegistro_Pedido).Nr_pedido.ToString()
},
new TpBusca()
{
vNM_Campo = "a.quantidade - a.qtd_expedida",
vOperador = ">",
vVL_Busca = "0"
}
}, 0, string.Empty, string.Empty, string.Empty);
//Buscar Acessórios
(BS_Pedido.Current as TRegistro_Pedido).lAcessorios =
new TCD_AcessoriosPed().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = (BS_Pedido.Current as TRegistro_Pedido).Nr_pedido.ToString()
},
new TpBusca()
{
vNM_Campo = "a.quantidade - a.qtd_expedida",
vOperador = ">",
vVL_Busca = "0"
}
}, 0, string.Empty);
BS_Pedido.ResetCurrentItem();
bsExpedicao_PositionChanged(this, new EventArgs());
BS_Itens_PositionChanged(this, new EventArgs());
}
}
private void InserirItem()
{
//Verificar se o pedido tem conferencia processada
object obj = new CamadaDados.Faturamento.Pedido.TCD_EntregaPedido().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.nr_pedido",
vOperador = "=",
vVL_Busca = (BS_Pedido.Current as TRegistro_Pedido).Nr_pedido.ToString()
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "=",
vVL_Busca = "'P'"
}
}, "1");
if (obj != null)
{
if (obj.ToString().Trim().Equals("1"))
{
MessageBox.Show("Não é permitido adicionar item no pedido com conferência processada.",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
using (TFLan_Itens_Faturamento Lan_Itens = new TFLan_Itens_Faturamento())
{
Lan_Itens.st_servico = (BS_Pedido.Current as TRegistro_Pedido).St_servicobool;
Lan_Itens.st_valoresfixos = (BS_Pedido.Current as TRegistro_Pedido).St_valoresfixosbool;
Lan_Itens.CD_TabelaPreco = (BS_Pedido.Current as TRegistro_Pedido).Cd_tabelapreco;
Lan_Itens.CD_Empresa = CD_Empresa.Text;
Lan_Itens.st_Commodities = false;
Lan_Itens.Cfg_pedido = (BS_Pedido.Current as TRegistro_Pedido).CFG_Pedido;
Lan_Itens.Comissionar_pedido = (BS_Pedido.Current as TRegistro_Pedido).St_comissaovendedorbool;
Lan_Itens.Comissionar_Produto = TCN_Pedido.Busca_Comissao_Vendedor(BS_Pedido.Current as TRegistro_Pedido).Trim().ToUpper().Equals("P");
Lan_Itens.Pc_desconto = (BS_Pedido.Current as TRegistro_Pedido).Pc_descgeral;
Lan_Itens.pTp_movimento = (BS_Pedido.Current as TRegistro_Pedido).TP_Movimento;
if (Lan_Itens.ShowDialog() == DialogResult.OK)
{
if (Lan_Itens.rItem != null)
{
(BS_Pedido.Current as TRegistro_Pedido).Pedido_Itens.Add(Lan_Itens.rItem);
BS_Pedido.ResetCurrentItem();
this.TotalizarPedido();
}
}
};
}
private void AjustarDadosFinanceiros()
{
if (BS_Pedido.Current != null)
{
Habilita_Data_Financeiro();
if (!(Parcelas_Entrada.Text.Trim() == "S"))
{
TCN_Pedido.Calcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido);
BS_Pedido.ResetCurrentItem();
}
}
}
private void VL_Entrada_Leave(object sender, EventArgs e)
{
decimal _VL_Entrada = VL_Entrada.Value;
TCN_Pedido.Calcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido);
for (int x = 0; x < (BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto.Count; x++)
{
(BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto[x].VL_Entrada = VL_Entrada.Value;
if (x == 0)
{
(BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto[x].VL_Parcela = VL_Entrada.Value;
}
}
TCN_Pedido.Recalcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido, 0);
BS_Pedido.ResetCurrentItem();
}
private void Novo()
{
DT_Inicial.Text = "";
DT_Final.Text = "";
RG_Movimento_Busca.NM_Valor = "T";
cck_Todos.Checked = true;
cck_Cancelado.Checked = false;
cck_Fechado.Checked = false;
cck_Ativo.Checked = false;
cck_Encerrado.Checked = false;
CD_Empresa_Busca.Text = "";
NM_Empresa_Busca.Text = "";
CFG_Pedido_Busca.Text = "";
DS_CFG_Pedido_Busca.Text = "";
CD_Clifor_Busca.Text = "";
NM_Clifor_Busca.Text = "";
BS_Pedido.Clear();
}
private void g_Consulta_Pedido_ColumnHeaderMouseClick(object sender, DataGridViewCellMouseEventArgs e)
{
if (g_Consulta_Pedido.Columns[e.ColumnIndex].SortMode == DataGridViewColumnSortMode.NotSortable)
{
return;
}
if (BS_Pedido.Count < 1)
{
return;
}
PropertyDescriptorCollection lP = TypeDescriptor.GetProperties(new TRegistro_Pedido());
TList_Pedido lComparer;
SortOrder direcao = SortOrder.None;
if ((g_Consulta_Pedido.Columns[e.ColumnIndex].HeaderCell.SortGlyphDirection == SortOrder.None) ||
(g_Consulta_Pedido.Columns[e.ColumnIndex].HeaderCell.SortGlyphDirection == SortOrder.Descending))
{
lComparer = new TList_Pedido(lP.Find(g_Consulta_Pedido.Columns[e.ColumnIndex].DataPropertyName, true), SortOrder.Ascending);
foreach (DataGridViewColumn c in g_Consulta_Pedido.Columns)
{
c.HeaderCell.SortGlyphDirection = SortOrder.None;
}
direcao = SortOrder.Ascending;
}
else
{
lComparer = new TList_Pedido(lP.Find(g_Consulta_Pedido.Columns[e.ColumnIndex].DataPropertyName, true), SortOrder.Descending);
foreach (DataGridViewColumn c in g_Consulta_Pedido.Columns)
{
c.HeaderCell.SortGlyphDirection = SortOrder.None;
}
direcao = SortOrder.Descending;
}
(BS_Pedido.List as TList_Pedido).Sort(lComparer);
BS_Pedido.ResetBindings(false);
g_Consulta_Pedido.Columns[e.ColumnIndex].HeaderCell.SortGlyphDirection = direcao;
}
private void VL_Parcela_Leave(object sender, EventArgs e)
{
(BS_Pedido.Current as TRegistro_Pedido).Pedidos_DT_Vencto[BS_Parcelas.Position].VL_Parcela = VL_Parcela.Value;
TCN_Pedido.Recalcula_Parcelas(BS_Pedido.Current as TRegistro_Pedido, BS_Parcelas.Position);
BS_Pedido.ResetCurrentItem();
}
private void dt_vencto_Leave(object sender, EventArgs e)
{
TCN_Pedido.Valida_Datas(BS_Pedido.Current as TRegistro_Pedido, BS_Parcelas.Position);
BS_Pedido.ResetCurrentItem();
}
private void BB_Buscar_Click(object sender, EventArgs e)
{
Busca_Pedidos();
BS_Pedido.ResetBindings(true);
}
