TECNOLOBO

No recuerdas tu codigo?
Se te olvido como se hace?

Aqui podras guardar lo que necesiten
Y cuando sea necesesario

Creado por julian gomez
iiiiii

KEY-EXEQRY



Descripcion

Crear filtros por defecto

otro


declare
	vcDefaulOrdeby VARCHAR2(1000);
	vcBlockName VARCHAR2(200);
	
begin
	vcBlockName := 'FACTURAS_GEN';
	vcDefaulOrdeby := ' '||Get_Block_Property(vcBlockName,Order_By);
	
	pb_seguimiento2('FFIN6004','Se va hacer consulta =>'||vcDefaulOrdeby);
		
	Set_Block_Property(vcBlockName,Order_By,' CTB_CONSEC,cpt_sigla Desc');
	
	EXECUTE_QUERY;
	
	--ponemos el order by como venia antes
	Set_Block_Property(vcBlockName,Order_By,vcDefaulOrdeby);
	
	vcDefaulOrdeby := ' '||Get_Block_Property(vcBlockName,Order_By);
	pb_seguimiento2('FFIN6004','finalizo la consulta con consulta =>'||vcDefaulOrdeby);
	
end;
						

html


x