REFLEX Standard-Report Werkstatt-Rueck-Lieferschein: Unterschied zwischen den Versionen
Keine Bearbeitungszusammenfassung |
|||
| Zeile 91: | Zeile 91: | ||
* [[REFLEX Standard-Report Lieferschein]] | * [[REFLEX Standard-Report Lieferschein]] | ||
* [[REFLEX Standard-Report Fehlmaterial]] | |||
* [[REFLEX Standard-Report Bestellung]] | * [[REFLEX Standard-Report Bestellung]] | ||
| Zeile 105: | Zeile 107: | ||
* [[REFLEX Standard-Basis-Report]] | * [[REFLEX Standard-Basis-Report]] | ||
== Links == | == Links == | ||
Aktuelle Version vom 28. Dezember 2015, 22:07 Uhr
Allgemeines
Der Report "Werkstatt_RueckLieferschein_Standard_Vxx.fr3" wird für den Druck eines Lieferscheins an den Kunden nach durchgeführter Reparatur aus dem Werkstatt-Reparaturen-Programm heraus verwendet.
Verzeichnis, Basis-Report
Der Report verwendet als Basis für den Kopf- und Fuss-Bereich den Basis-Report "BasisReport_01.fr3". Dieser muss im Verzeichnis "Formular" liegen.
Vorschau
In der Vorschau sieht das Formular so aus:
Anschrift
Wenn eine Lieferanschrift im Werkstatt-Auftrag angegeben wurde, wird diese gedruckt. Wenn nicht, wird die Anschrift des Kunden gedruckt, die im Werkstatt-Auftrag angegeben wurde.
Wenn ein Ansprechpartner angegeben wurde, wird dieser unter dem Firmen-Namen gedruckt, wenn nicht, wird keine Zeile gedruckt (also keine "Zahnlücke").
Dazu wird ein Memo-Feld MemoAnschrift benutzt, das anfangs leer ist. Im Ereignis MemoAnschriftOnBeforePrint wird das Memo-Feld nun entsprechend gefüllt. Dazu wird dieser Code benutzt:
procedure MemoAnschriftOnBeforePrint(Sender: TfrxComponent);
begin
// Anschrift zusammenstellen:
if <Werkstattauftrag."LieferAnschr-Kurzname"> > '' then
begin
// Es gibt eine Liefer-Anschrift: Diese verwenden!
MemoAnschrift.Lines.Add(<Werkstattauftrag."LieferAnschr-NameFirma">);
if <Werkstattauftrag."LieferAnschr-AnsprechPartner"> > '' then
MemoAnschrift.Lines.Add(<Werkstattauftrag."LieferAnschr-AnsprechPartner">);
MemoAnschrift.Lines.Add(<Werkstattauftrag."LieferAnschr-Str">);
MemoAnschrift.Lines.Add('');
MemoAnschrift.Lines.Add(<Werkstattauftrag."LieferAnschr-PLZ"> + ' ' + <Werkstattauftrag."LieferAnschr-Ort">);
end
else
begin
// Es gibt KEINE Liefer-Anschrift: Kunden-Anschrift verwenden!
MemoAnschrift.Lines.Add( <Adresse."NameFirma"> );
if <Werkstattauftrag."Kunde-AnsprechPartner"> > '' then
MemoAnschrift.Lines.Add( <Werkstattauftrag."Kunde-AnsprechPartner"> );
MemoAnschrift.Lines.Add( <Adresse."Strasse"> );
MemoAnschrift.Lines.Add('');
MemoAnschrift.Lines.Add( <Adresse."PLZ"> + ' ' + <Adresse."Ort"> );
MemoAnschrift.Lines.Add('');
MemoAnschrift.Lines.Add(<Adresse."Landname">);
end;
end;
Updates
| Version | Datum | Beschreibung |
|---|---|---|