Seite 1 von 1
Lieferanschrift Adresse in Formular anpassen
Verfasst: Di 28. Sep 2010, 07:45
von Otto.Gluderer
Hallo,
Ich habe zu einem neuen Versandservice gewechselt und benötige jetz ein Formular mit der Lieferadresse in genau folgenden Format:
Name Nachname
Straße
PLZ Ort
Wen ich das Feld "Lieferanschrift Adresse" benutze steht die PLZ nach dem Ort und mit einem Beistrich getrennt.
Kann ich diese Feld anpassen?
Was ich noch versucht habe, ist die Anschrift mit den einzelnen Feldern wie "Lieferanschrift Ort" zusammen zu stellen.
Dabei gibt es das Problem, dass wen ein Kunde keine seperate Lieferanschrift angegeben hat das Formular leer bleibt, anstatt die Rechnungsadresse zu verwenden.
Jemand eine Idee wie ich das lösen könnte?
Mit Danke im Voraus,
Otto
Re: Lieferanschrift Adresse in Formular anpassen
Verfasst: Di 28. Sep 2010, 08:25
von redone
Hallo,
wenn du die K-Version nutzt, was man ohne Angaben nicht weiß, so kannst du das über ein Memofeld mit hinterlegter Programmierung lösen, z.B.
Code: Alles auswählen
Memo2.Lines.Clear;
if KopfDaten['Lieferanschrift Anrede'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Lieferanschrift Anrede']);
END ELSE
if KopfDaten['Kunde Anrede'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Kunde Anrede']);
END;
if KopfDaten['Lieferanschrift Name 1'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Lieferanschrift Name 1']);
END ELSE
if KopfDaten['Kunde Name 1'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Kunde Name 1']);
END;
if KopfDaten['Lieferanschrift Name 2'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Lieferanschrift Name 2']);
END ELSE
if KopfDaten['Kunde Name 2'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Kunde Name 2']);
END;
if KopfDaten['Lieferanschrift Name 3'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Lieferanschrift Name 3']);
END ELSE
if KopfDaten['Kunde Name 3'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Kunde Name 3']);
END;
if KopfDaten['Lieferanschrift Straße'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Lieferanschrift Straße']);
END ELSE
BEGIN
Memo2.Lines.Add(KopfDaten['Kunde Straße']);
END;
if KopfDaten['Lieferanschrift Land'] <> '' THEN
BEGIN
Memo2.Lines.Add(KopfDaten['Lieferanschrift PLZ']+' '+KopfDaten['Lieferanschrift Ort']);
END ELSE
BEGIN
Memo2.Lines.Add(KopfDaten['Kunde PLZ']+' '+KopfDaten['Kunde Ort']);
END;
Re: Lieferanschrift Adresse in Formular anpassen
Verfasst: Di 28. Sep 2010, 08:32
von Jost
Hi,
das sollte mit einer Anpassung des Adress Memofeldes gehen tun.
Der Formatstring, welcher die Zusammensetzung des Adressfeldes beim Ausdruck bestimmt, ist im Registrierungseditor zu finden:
Im Menü unter Modul | Registrierungs Editor , dort unter MAIN | ADRESSEN | FORMAT.
Ich meine Format_005 ist das richtige
Such mal im Forenarchiv (
http://www.cao-faktura.de/index.php?opt ... de=results ) mit dem Stichwort:
FORMAT_005, bzw. Adressformat.
PS: so wie das Thoren beschreibt geht's auch, der Lösungsansatz (ich erinnere mich noch
) stammt noch aus Zeiten, als CAO kein internes Adressmemofeld hatte. Damals hat man sich halt selbst eines im Reportbuilder zusammengebaut. Für komplexe Formatierungen kann man diese Methode nach wie vor nutzen.
[Edit] PSS: Sodele, jetzt bin ich ganz wach, die Anpassungen in der CAO-Registry hast Du ja schon durchprobiert - dann bleibt nur noch Thoren's Lösungsansatz über.
Re: Lieferanschrift Adresse in Formular anpassen
Verfasst: Di 28. Sep 2010, 19:30
von Otto.Gluderer
Hallo
Vielen vielen Dank für die schnelle Hilfe.
Hab ein neues Memo erstellt und den Code von oben noch ein wenig angepasst.
Hat echt super geklappt
Gruß,
Otto