Se cierra cursor en TGR_COMPRAS