Bueno, ya lo he solucionado. Explico como:
-Debéis de adjuntar al módulo la librería D2KWUTIL.
-Este es el código que he usado:
Win_Api_Dialog.Select_Printer(v_printer_name,v_print_queue,FALSE);
if v_printer_name is not null then
:usuarios.impresora_etiq := v_printer_name;
end if;
En v_printer_name es donde se retorna el nombre de la impresora elegida al darle a aceptar. Si se le da a Cancelar, devuelve la cadena vacía. Yo lo he utilizado para imprimir las etiquetas directamente a la impresora de etiquetas ZEBRA. Al report le paso por parámetro, en el DESNAME, el valor de v_printer_name si no es null y en DESTYPE le paso Printer, para que las imprima directamente en la impresora.
Un saludo.
