15. März 2011 10:27
15. März 2011 10:36
17. März 2011 09:09
IF NOT PrinterSelection.GET(USERID,ReportID) THEN
  IF NOT PrinterSelection.GET('',ReportID) THEN
    IF NOT PrinterSelection.GET(USERID,0) THEN
      IF PrinterSelection.GET('',0) THEN;
//neu ab hier -->
IF PrinterSelection."Printer Name" <> '' THEN
  IF NOT Printer.GET(PrinterSelection."Printer Name") THEN BEGIN
    Printer.RESET;
    Printer.SETRANGE(Name,SELECTSTR(1,PrinterSelection."Printer Name"));
    IF Printer.FIND('-') THEN
      IF Printer.COUNT = 1 THEN  // only if unique result
        PrinterSelection."Printer Name" := Printer.ID;
  END;
//neu bis hier <--
EXIT(PrinterSelection."Printer Name");