GevitasFormPrint: Unterschied zwischen den Versionen

Version vom 11. März 2016, 22:26 Uhr

1 Allgemeines

Mit diesem Programm ("GevitasFormPrint.exe") werden Formulare gedruckt (bzw. angezeigt oder exportiert).

• Angebot
• Auftrag (auch Auftragsversionen!)
• Ladeliste/Packliste
• Lieferschein
• Abholschein
• Rechnung/Gutschrift
• Sammelrechnung (GEVAS-Professional)
• Mahnung
• Bestellung
• Werkstatt-Auftrag
• Werkstatt-KV
• Werkstatt-Lieferschein
• Werkstatt-Abholschein
• Fertigung

Damit GevitasFormPrint benutzt werden kann, müssen diese Voraussetzungen erfüllt sein:

• Die Programmdatei "GevitasFormPrint.exe" muss sich im Programmverzeichnis befinden. Um die Programmdatei zu verteilen, kopiert man sie am Besten in das Update-Verzeichnis. Das Update-Verzeichnis wird in der INI-Datei festgelegt.

• In den Programm-Parametern wurde die Report-Version für die Formular-Art auf FastReport eingestellt.

Hinweis

In REFLEX-Basic wird nur FastReport verwendet!

2 Aufruf des Programms

Das Programm wird "ganz normal" aus REFLEX bzw. GEVAS-Professional heraus aufgerufen, indem man im jeweiligen Programmteil auf Drucken klickt.

GevitasFormPrint wird gestartet und mit den notwendigen Parametern versorgt, z.B. zu druckende Auftragsnummer, Bestellnummer usw.

Je nachdem, was gedruckt werden soll, zeigt sich das zugehörige Druckfenster.

Beispiel:

3 Elemente des Druckfensters

3.1 Schaltflächen

3.1.1 Drucken

Druckt den ausgewählten Report auf den ausgewählten Drucker. Wenn kein Drucker ausgewählt wurde, wird auf dem Standard-Drucker ausgedruckt.

3.1.2 Voschau

Zeigt den ausgewählten Report im Vorschaufenster an.

Beispiel:

Mit der Button-Leist oben gibt es die Möglichkeiten:

• Report drucken
• Exportieren, speichern
• Mailen
• PDF-Datei erzeugen
• Zoomen (geht aus mit Strg+Mausrad)
• Seiteneinstellungen ändern
• Blättern in den Seiten

3.1.3 E-Mail

Sendet den ausgewählten Report per E-Mail.

Das Mail wird nicht vom Programm selbst verschickt sondern an den E-Mail-Client (z.B. Microsoft Outlook©) übergeben.

3.1.4 Export

Exportiert den Report in eines der unterstützten Formate:

3.1.5 Daten aktualisieren

Mit diesem Button

werden die Daten für den Report aktualisiert. Das macht man z.B. wenn man das Druckfenster nicht schließt, sondern zum Programm REFLEX bzw. GEVAS-Professional zurückkehrt, dort Änderungen vornimmt und dann den Report mit den geänderten Daten ausdrucken will.

3.1.6 Designer

Hier kann man den Designer öffnen, um den Report zu ändern oder einen neuen Report anzulegen.

• Abhängig von dem Benutzer-Recht "ReportDesigner" wird der Button Designer ein- oder ausgeblendet.

• Geöffnet wird der Report, der in der Auswahl Formularname ausgewählt wurde. Im Designer kann man aber auch andere Reports öffnen.

3.2 Kennzeichen

In manchen Fenstern gibt es die Kennzeichen, mit denen man den Formulardruck steuern kann.

Einzelheiten werden unter Steuerung des Report mit Auftragskennzeichen beschrieben.

3.3 Auswahl Druckformular

Hiermit kann man das Druckformular (den Report) auswählen. Es werden alle Report-Dateien angezeigt, die sich im zugehörigen Formular-Verzeichnis befinden.

Die Report-Dateien haben die Datei-Endung "fr3".

3.4 Auswahl Drucker

Hier kann man den gewünschten Drucker auswählen.

3.5 Optionen

3.5.1 Kopien

Hier kann man abgeben, wie viele Kopien gedruckt werden sollen.

0 bedeutet, dass keine Kopie gedruckt wird. 1 bedeutet, dass eine Kopie gedruckt wird usw.

• Funktioniert nur beim Drucken, nicht bei der Vorschau oder mailen.

3.5.2 Seiten

Hier kann man angeben, welche Seiten gedruckt werden sollen. Beispiele:

• Funktioniert nur beim Drucken, nicht bei der Vorschau, beim exportieren oder beim mailen.

3.5.3 Schacht

Hier kann man die Schacht-Nummer angeben.

3.5.4 Dokument als PDF speichern

Wenn diese Option eingeschaltet ist, wird der Report beim Drucken als PDF-Datei exportiert.

Der Pfad für die Datei und der Dateiname wird in den Programmparametern festgelegt.

Siehe auch:

• REFLEX Programm-Parameter Verzeichnisse,Dateinamen,Dokumente

3.5.5 Dateiname

Hier wird der Name der Export-Datei angezeigt.

Der Pfad für die Datei und der Dateiname wird in den Programmparametern festgelegt.

Siehe auch:

• REFLEX Programm-Parameter Verzeichnisse,Dateinamen,Dokumente

4 Variablen

Um die Report-Erstellung zu vereinfachen, stellt das Programm einige Variablen zur Verfügung:

Allgemeine Variablen:

Übersetzungsvariablen:

// Name des Reports: if CompareText(VarName, 'ReportName') = 0 then //JC//160222// begin if iFormularArt = FORM_BESTELLUNG then Value := StringReplace(cboDruckformularBestellung.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_ANGEBOT) or (iFormularArt = FORM_AUFTRAG) then Value := StringReplace(cboDruckformularAngAuftr1.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_LADELISTE) then Value := StringReplace(cboDruckformularLadeliste.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_RUECKSCHEIN) then Value := StringReplace(cboDruckformularLadeliste.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_LIEFERSCHEIN) then Value := StringReplace(cboDruckformularLieferschein.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_RECHNUNG) or (iFormularArt = FORM_GUTSCHRIFT) then Value := StringReplace(cboDruckformularRechnung1.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_MAHNUNG) then Value := StringReplace(cboDruckformularMahnung.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_WERKSTATT) then Value := StringReplace(cboDruckformularWerkstatt.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_FERTAUFTR) then Value := StringReplace(cboDruckformularFertAuftr.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

if (iFormularArt = FORM_SAMMRECHGPRO) then Value := StringReplace(cboDruckformularSammRechGPro.Text,'.fr3',, [rfReplaceAll, rfIgnoreCase]);

exit; end;

// Titel des Formulares ("Miet-Angebot", "Verkaufs-Auftrag" usw. Wird anhand Programm-Parametern geholt.) if CompareText(VarName, 'Titel') = 0 then begin Value := labTitel.Caption; exit; end;

if CompareText(VarName, 'AusgabeZiel') = 0 then begin Value := iAktuellesZiel; end;

if (iFormularArt = FORM_MAHNUNG) then begin if CompareText(VarName, 'MahngebuehrSumme') = 0 then // JC//160105// begin Value := fMahngebuehrSumme; // JC//160105// Summe Mahngebühr pro Mahnung, wird als Report-Variable an den Report übergeben. end; end;

if (iFormularArt = FORM_LIEFERSCHEIN) then begin if CompareText(VarName, 'DruckOptPosBetr') = 0 then // JC//151119// begin if chkLiefSch_DRUCKOPTPOSBETR.Checked then Value := 1 else Value := 0; end;

if CompareText(VarName, 'DruckOptGesBetr') = 0 then // JC//151119// begin if chkLiefSch_DRUCKOPTGESBETR.Checked then Value := 1 else Value := 0; end;

if CompareText(VarName, 'DruckOptBezeichnung') = 0 then // JC//151119// begin if chkLiefSch_DRUCKOPT_BEZEICHNUNGEN.Checked then Value := 1 else Value := 0; end;

if CompareText(VarName, 'DruckOptUrsprLand') = 0 then // JC//151119// begin if chkLiefSch_DRUCKOPT_URSPRLAND.Checked then Value := 1 else Value := 0; end;

if CompareText(VarName, 'DruckOptNachdruck') = 0 then // JC//151119// begin if chkLiefSch_Nachdruck.Checked then Value := 1 else Value := 0; end;

end;

(* Ladeliste/Lieferschein: Jede Obergruppe auf eine neue Seite:

Der Report hat diesen Code:

procedure GroupObergruppeOnBeforePrint(Sender: TfrxComponent); begin if <ObergruppeNeueSeite>=1 then GroupObergruppe.StartNewPage := True else GroupObergruppe.StartNewPage := False; end; *) // JC//150905// if CompareText(VarName, 'ObergruppeNeueSeite') = 0 then begin if (iFormularArt = FORM_LADELISTE) then // JC//150904// begin if chkObergruppeNeueSeiteLadeliste.Checked then Value := 1 else Value := 0; end; end;

if CompareText(VarName, 'KapitelNeueSeite') = 0 then // JC//150917// begin if (iFormularArt = FORM_LADELISTE) then begin if chkKapitelNeueSeiteLadeliste.Checked then Value := 1 else Value := 0; end; if (iFormularArt = FORM_ANGEBOT) or (iFormularArt = FORM_AUFTRAG) then // JC//151223// begin if chkKapitelNeueSeiteAngebotAuftrag.Checked then Value := 1 else Value := 0; end;

end;

// Ladeliste/Lieferschein: Sortierung: 0=Kapitel+Positionen 1=Artikelgruppen //JC//150906// if CompareText(VarName, 'Sortierung') = 0 then begin if (iFormularArt = FORM_LADELISTE) then // JC//150904// Value := cboSortLadeliste.ItemIndex; if (iFormularArt = FORM_MAHNUNG) then Value := cboSortMahnung.ItemIndex; end;

// Abteilungsnamen und Kennzeichen als Formeln übergeben: if CompareText(VarName, 'AbteilungName') = 0 then Value := GetParamText1(DM.qry1Ado, 'Abteilung', '1', ); // Text3 --> 1. In 3 steht aber nur "Kostüm" (ohne "fundus") ???

if CompareText(VarName, 'AbteilungTelFax') = 0 then Value := GetParamText1(DM.qry1Ado, 'Abteilung', 'Tel', ); // JC//160202// GetParamText1(DM.qry1Ado, 'Abteilung', '1', );

if CompareText(VarName, 'AbteilungKurzzeichen') = 0 then Value := GetParamText2(DM.qry1Ado, 'Abteilung', '1', );

Diese müssen über Report ⇒ Variablen angelegt werden.

5 Updates

Mit diesen Links kommen zu den Update-Beschreibungen der Druckprogramme, die mit FastReport funktionieren:

• GEVITAS FormPrint Updates

• GEVITAS LabelPrint Updates

• GEVITAS ListPrint Updates

6 Links