public string GSub_ActualizaPantalla(string P_St_CodDoc, long P_Ln_Orden)
{
// P_Ln_Orden
// 1 Comprobantes generados
// 2 Firmados
// 3 Autorizados
// 4 No autorizados
//FACTURA
if (P_St_CodDoc == "01")
{
sTipoComprobanteVenta = "Fac";
sAyuda = "";
sAyuda = sAyuda + "select" + Environment.NewLine;
sAyuda = sAyuda + "NF.Numero_Factura," + Environment.NewLine;
if (conexion.GFun_St_Conexion() == "MYSQL")
{
sAyuda = sAyuda + "ltrim(concat(P.apellidos,' '," + conexion.GFun_St_esnulo() + "(P.nombres,''))) Cliente," + Environment.NewLine;
}
else
{
sAyuda = sAyuda + "ltrim(P.apellidos + ' ' + " + conexion.GFun_St_esnulo() + "(P.nombres,'')) Cliente," + Environment.NewLine;
}
sAyuda = sAyuda + "SubString(LOCALIDAD.valor_texto, 1, 25) Localidad,F.fecha_factura," + Environment.NewLine;
sAyuda = sAyuda + "F.id_factura," + Environment.NewLine;
sAyuda = sAyuda + "F.clave_acceso," + Environment.NewLine;
sAyuda = sAyuda + "L.establecimiento estab,isnull(L.punto_emision,'009') ptoEmi," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(autorizacion,'') autorizacion," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(CONVERT (nvarchar(19), fecha_autorizacion, 120),'') fecha_autorizacion," + Environment.NewLine;
sAyuda = sAyuda + "id_tipo_emision,id_tipo_ambiente" + Environment.NewLine;
sAyuda = sAyuda + "from" + Environment.NewLine;
sAyuda = sAyuda + "cv403_facturas F," + Environment.NewLine;
sAyuda = sAyuda + "cv403_numeros_facturas NF," + Environment.NewLine;
sAyuda = sAyuda + "tp_personas P," + Environment.NewLine;
sAyuda = sAyuda + "tp_localidades L," + Environment.NewLine;
sAyuda = sAyuda + "tp_codigos LOCALIDAD," + Environment.NewLine;
sAyuda = sAyuda + "vta_tipocomprobante TC" + Environment.NewLine;
sAyuda = sAyuda + "where" + Environment.NewLine;
sAyuda = sAyuda + "F.idempresa = " + Program.iIdEmpresa + Environment.NewLine;
sAyuda = sAyuda + "and F.estado = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "and F.estado in ('A','E')" + Environment.NewLine;
sAyuda = sAyuda + "and NF.estado = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "and NF.id_factura = F.id_factura" + Environment.NewLine;
sAyuda = sAyuda + "and F.id_persona = P.id_persona" + Environment.NewLine;
sAyuda = sAyuda + "and F.id_localidad = L.id_localidad" + Environment.NewLine;
// Generadas
if (P_Ln_Orden == 1)
{
sAyuda = sAyuda + "and F.clave_acceso is not null" + Environment.NewLine;
}
// Firmadas
else if (P_Ln_Orden == 2)
{
sAyuda = sAyuda + "and F.clave_acceso is not null" + Environment.NewLine;
}
// Autorizadas
else if (P_Ln_Orden == 3)
{
sAyuda = sAyuda + "and F.autorizacion is not null" + Environment.NewLine;
}
sAyuda = sAyuda + "and L.cg_localidad = LOCALIDAD.correlativo" + Environment.NewLine;
sAyuda = sAyuda + "and TC.idtipocomprobante=F.idtipocomprobante" + Environment.NewLine;
sAyuda = sAyuda + "and TC.codigo='" + sTipoComprobanteVenta + "'" + Environment.NewLine;
sAyuda = sAyuda + "order by F.id_factura desc";
}
//RETENCION
if (P_St_CodDoc == "07")
{
sAyuda = "";
sAyuda = sAyuda + "SELECT DISTINCT" + Environment.NewLine;
if (conexion.GFun_St_Conexion() == "MYSQL")
{
sAyuda = sAyuda + "convert(CABCR.NUMERO_PREIMPRESO,decimal) numero_secuencial," + Environment.NewLine;
sAyuda = sAyuda + "concat(PER.apellidos , ' ' , " + conexion.GFun_St_esnulo() + "(PER.nombres,'')) Razon_Social," + Environment.NewLine;
}
else
{
sAyuda = sAyuda + "convert(numeric,CABCR.NUMERO_PREIMPRESO) numero_secuencial," + Environment.NewLine;
sAyuda = sAyuda + "PER.apellidos + ' ' + " + conexion.GFun_St_esnulo() + "(PER.nombres,'') Razon_Social," + Environment.NewLine;
}
sAyuda = sAyuda + "CABM.numero_movimiento,CABM.FECHA_MOVIMIENTO," + Environment.NewLine;
sAyuda = sAyuda + "CABCR.ID_CAB_COMPROBANTE_RETENCION,CABCR.clave_acceso," + Environment.NewLine;
sAyuda = sAyuda + "EstabRetencion1, ptoEmiRetencion1," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(autorizacion,'') autorizacion," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(CONVERT (nvarchar(19), fecha_autorizacion, 120),'') fecha_autorizacion," + Environment.NewLine;
sAyuda = sAyuda + "id_tipo_emision,id_tipo_ambiente" + Environment.NewLine;
sAyuda = sAyuda + "from" + Environment.NewLine;
sAyuda = sAyuda + "cv405_comprobantes_retencion CR," + Environment.NewLine;
sAyuda = sAyuda + "cv405_c_movimientos CABM," + Environment.NewLine;
sAyuda = sAyuda + "cv404_auxiliares_contables AUX," + Environment.NewLine;
sAyuda = sAyuda + "tp_personas PER," + Environment.NewLine;
sAyuda = sAyuda + "cv405_cab_comprobantes_retencion CABCR" + Environment.NewLine;
sAyuda = sAyuda + "where" + Environment.NewLine;
sAyuda = sAyuda + "CABM.id_c_movimiento = CR.id_c_movimiento" + Environment.NewLine;
sAyuda = sAyuda + "and AUX.id_auxiliar = CABM.id_beneficiario" + Environment.NewLine;
sAyuda = sAyuda + "and PER.id_persona = CABM.id_persona" + Environment.NewLine;
sAyuda = sAyuda + "and CR.ID_CAB_COMPROBANTE_RETENCION = CABCR.ID_CAB_COMPROBANTE_RETENCION" + Environment.NewLine;
// Generadas
if (P_Ln_Orden == 1)
{
sAyuda = sAyuda + "and CABCR.clave_acceso is not null" + Environment.NewLine;
}
// Firmadas
else if (P_Ln_Orden == 2)
{
sAyuda = sAyuda + "and CABCR.clave_acceso is not null" + Environment.NewLine;
}
// Autorizadas
else if (P_Ln_Orden == 3)
{
sAyuda = sAyuda + "and CABCR.autorizacion is not null" + Environment.NewLine;
}
sAyuda = sAyuda + "AND CABM.ESTADO = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "AND CR.ESTADO = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "AND CABCR.ESTADO = 'A'" + Environment.NewLine;
if (conexion.GFun_St_Conexion() == "MYSQL")
{
sAyuda = sAyuda + "Order by convert(CABCR.NUMERO_PREIMPRESO, decimal) desc, CABM.FECHA_MOVIMIENTO desc";
}
else
{
sAyuda = sAyuda + "Order by convert(numeric,CABCR.NUMERO_PREIMPRESO) desc, CABM.FECHA_MOVIMIENTO desc";
}
}
//NOTA DE CREDITO
if (P_St_CodDoc == "04")
{
sAyuda = "";
sAyuda = sAyuda + "select" + Environment.NewLine;
sAyuda = sAyuda + "NNC.Numero_Nota," + Environment.NewLine;
if (conexion.GFun_St_Conexion() == "MYSQL")
{
sAyuda = sAyuda + "concat(P.apellidos,' '," + conexion.GFun_St_esnulo() + "(P.nombres,'')) Cliente," + Environment.NewLine;
}
else
{
sAyuda = sAyuda + "P.apellidos + ' ' + " + conexion.GFun_St_esnulo() + "(P.nombres,'') Cliente," + Environment.NewLine;
}
sAyuda = sAyuda + "SubString(LOCALIDAD.valor_texto, 1, 25) Localidad," + Environment.NewLine;
sAyuda = sAyuda + "N.fecha_vcto," + Environment.NewLine;
sAyuda = sAyuda + "N.Id_Nota_Credito,N.clave_acceso," + Environment.NewLine;
sAyuda = sAyuda + "L.establecimiento estab,isnull(L.punto_emision,'009') ptoEmi," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(autorizacion,'') autorizacion," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(CONVERT (nvarchar(19), fecha_autorizacion, 120),'') fecha_autorizacion," + Environment.NewLine;
sAyuda = sAyuda + "id_tipo_emision,id_tipo_ambiente" + Environment.NewLine;
sAyuda = sAyuda + "from" + Environment.NewLine;
sAyuda = sAyuda + "cv403_notas_credito N, tp_localidades L," + Environment.NewLine;
sAyuda = sAyuda + "tp_codigos LOCALIDAD," + Environment.NewLine;
sAyuda = sAyuda + "tp_personas P," + Environment.NewLine;
sAyuda = sAyuda + "cv403_numeros_notas_creditos NNC" + Environment.NewLine;
sAyuda = sAyuda + "where" + Environment.NewLine;
sAyuda = sAyuda + "N.estado = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "and N.id_persona = P.id_persona" + Environment.NewLine;
sAyuda = sAyuda + "and NNC.Id_Nota_Credito = N.Id_Nota_Credito" + Environment.NewLine;
//If G_Ln_Id_Servidor > 1 Then
// T_St_Sql = T_St_Sql & "and l.id_servidor = " & G_Ln_Id_Servidor & " "
//End If
sAyuda = sAyuda + "and N.id_localidad = L.id_localidad" + Environment.NewLine;
sAyuda = sAyuda + "and L.cg_localidad = LOCALIDAD.correlativo" + Environment.NewLine;
// Generadas
if (P_Ln_Orden == 1)
{
sAyuda = sAyuda + "and N.clave_acceso is not null" + Environment.NewLine;
}
// Firmadas
else if (P_Ln_Orden == 2)
{
sAyuda = sAyuda + "and N.clave_acceso is not null" + Environment.NewLine;
}
// Autorizadas
else if (P_Ln_Orden == 3)
{
sAyuda = sAyuda + "and N.autorizacion is not null" + Environment.NewLine;
}
sAyuda = sAyuda + "and NNC.estado = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "Order by N.Id_nota_credito desc";
}
//GUIA DE REMISION
if (P_St_CodDoc == "06")
{
sAyuda = "";
sAyuda = sAyuda + "select" + Environment.NewLine;
sAyuda = sAyuda + "NGR.Numero_Guia_Remision," + Environment.NewLine;
if (conexion.GFun_St_Conexion() == "MYSQL")
{
sAyuda = sAyuda + "concat(P.apellidos,' '," + conexion.GFun_St_esnulo() + "(P.nombres,'')) Cliente," + Environment.NewLine;
}
else
{
sAyuda = sAyuda + "P.apellidos + ' ' + " + conexion.GFun_St_esnulo() + "(P.nombres,'') Cliente," + Environment.NewLine;
}
sAyuda = sAyuda + "SubString(LOCALIDAD.valor_texto, 1, 25) Localidad," + Environment.NewLine;
sAyuda = sAyuda + "G.fecha_emision," + Environment.NewLine;
sAyuda = sAyuda + "G.Id_Guia_Remision,G.clave_acceso," + Environment.NewLine;
sAyuda = sAyuda + "L.establecimiento estab,";
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(L.punto_emision,'009') ptoEmi," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(G.autorizacion,'') autorizacion," + Environment.NewLine;
sAyuda = sAyuda + conexion.GFun_St_esnulo() + "(CONVERT (nvarchar(19), G.fecha_autorizacion, 120),'') fecha_autorizacion," + Environment.NewLine;
sAyuda = sAyuda + "G.id_tipo_emision,G.id_tipo_ambiente" + Environment.NewLine;
sAyuda = sAyuda + "from" + Environment.NewLine;
sAyuda = sAyuda + "cv403_guias_remision G, tp_localidades L," + Environment.NewLine;
sAyuda = sAyuda + "tp_codigos LOCALIDAD," + Environment.NewLine;
sAyuda = sAyuda + "tp_personas P," + Environment.NewLine;
sAyuda = sAyuda + "cv403_numeros_guias_remision NGR" + Environment.NewLine;
sAyuda = sAyuda + "where" + Environment.NewLine;
sAyuda = sAyuda + "G.estado = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "and G.id_destinatario = P.id_persona" + Environment.NewLine;
sAyuda = sAyuda + "and NGR.Id_Guia_Remision = G.Id_Guia_Remision" + Environment.NewLine;
//If G_Ln_Id_Servidor > 1 Then
// T_St_Sql = T_St_Sql & "and L.id_servidor = " & G_Ln_Id_Servidor & " "
//End If
sAyuda = sAyuda + "and G.id_localidad = L.id_localidad" + Environment.NewLine;
sAyuda = sAyuda + "and L.cg_localidad = LOCALIDAD.correlativo" + Environment.NewLine;
// Generadas
if (P_Ln_Orden == 1)
{
sAyuda = sAyuda + "and G.clave_acceso is not null" + Environment.NewLine;
}
// Firmadas
else if (P_Ln_Orden == 2)
{
sAyuda = sAyuda + "and G.clave_acceso is not null" + Environment.NewLine;
}
// Autorizadas
else if (P_Ln_Orden == 3)
{
sAyuda = sAyuda + "and G.autorizacion is not null" + Environment.NewLine;
}
sAyuda = sAyuda + "and NGR.estado = 'A'" + Environment.NewLine;
sAyuda = sAyuda + "Order by G.Id_Guia_Remision desc";
}
return(sAyuda);
}