Die24all - Homepage

Betreff: Re: Per Info: Zwei Felder verknüpfen

---

Danke, danke, danke für die vielen Tips.

Ich bin mittlerweile erfolgreich gewesen.

Die hier genannten Beispiele werde ich mir gut abspeichern.

Grüße
C. W.

Betreff: Re: Per Info: Zwei Felder verknüpfen

---

Hallo,
wenn das der Text im Feld1 eine konstante Länge hat ist es einfach.
Hier ein Beispiel:

TITEL 'ZTST001 Test'
AUSWAHL FIRMA
FIRMA EQ '10'

*/ Einfach Konstante Länge /*
RECHNE FELD1 FORMAT(30 C) = 'Der Text ist 30 Zeichen lang: '
RECHNE FELD2 FORMAT( 6 C) = '112567'
RECHNE FELD3 FORMAT(50 C) = FELD1 LAENGE=30
RECHNE FELD3 STELLE=31 = FELD2 LAENGE=6

*/ Mehr Arbeit variable Länge /*
RECHNE FELD10 FORMAT(30 C) = 'Nur 9 Z:'
RECHNE FELD30 FORMAT(50 C) = FELD10 LAENGE=30
RECHNE L FORMAT(2 0) = 0
RECHNE L = 1 (FELD10 STELLE=1 EQ ' ')
RECHNE L = 2 (FELD10 STELLE=2 GT ' ')
RECHNE L = 3 (FELD10 STELLE=3 GT ' ')
RECHNE L = 4 (FELD10 STELLE=4 GT ' ')
RECHNE L = 5 (FELD10 STELLE=5 GT ' ')
RECHNE L = 6 (FELD10 STELLE=6 GT ' ')
RECHNE L = 6 (FELD10 STELLE=6 GT ' ')
RECHNE L = 7 (FELD10 STELLE=7 GT ' ')
RECHNE L = 8 (FELD10 STELLE=8 GT ' ')
RECHNE L = 9 (FELD10 STELLE=9 GT ' ')
RECHNE L = 10 (FELD10 STELLE=10 GT ' ')
*/ etc. /*

RECHNE L = L + 2 */ Ein Leerzeichen dazischen /*
RECHNE FELD30 STELLE=1 = FELD2 LAENGE=6 (L EQ 1)
RECHNE FELD30 STELLE=2 = FELD2 LAENGE=6 (L EQ 2)
RECHNE FELD30 STELLE=3 = FELD2 LAENGE=6 (L EQ 3)
RECHNE FELD30 STELLE=4 = FELD2 LAENGE=6 (L EQ 4)
RECHNE FELD30 STELLE=5 = FELD2 LAENGE=6 (L EQ 5)
RECHNE FELD30 STELLE=6 = FELD2 LAENGE=6 (L EQ 6)
RECHNE FELD30 STELLE=7 = FELD2 LAENGE=6 (L EQ 7)
RECHNE FELD30 STELLE=8 = FELD2 LAENGE=6 (L EQ
RECHNE FELD30 STELLE=9 = FELD2 LAENGE=6 (L EQ 9)
RECHNE FELD30 STELLE=10 = FELD2 LAENGE=6 (L EQ 10)
RECHNE FELD30 STELLE=11 = FELD2 LAENGE=6 (L EQ 11)
*/ etc. /*

AUSGABE LISTE
SORT FIRMA

LEVEL FIRMA
ZEILE 'Feld1 : ' FELD1
ZEILE 'Feld2 : ' FELD2
ZEILE 'Feld3 : ' FELD3
ZEILE 'L : ' L
ZEILE 'Feld10: ' FELD10
ZEILE 'Feld30: ' FELD30

Grüße
R.P.S.

Betreff: Re: Per Info: Zwei Felder verknüpfen

---

Hallo, hier ein Vorschlag.

*/--- Text ---/*
RECHNE FELD1 FORMAT (10 C) = PLZLANG

*/--- Kostenstelle ---/*
RECHNE FELD2 FORMAT (6 C) = ABKOSTST

RECHNE FELD3 FORMAT (17 C) = '-----------------'
RECHNE FELD3 STELLE = 1 = FELD1 STELLE = 1 LAENGE = 10
RECHNE FELD3 STELLE = 11 = '/'
RECHNE FELD3 STELLE = 12 = FELD2 STELLE = 1 LAENGE = 6

Viel Erfolg

Betreff: Re: Per Info: Zwei Felder verknüpfen

---

Vielen Dank für das Beispiel. Jetzt wird es deutlich für mich.

Danke für die Hilfe.

Betreff: Re: Per Info: Zwei Felder verknüpfen

---

Hier ein Beispiel :

RECHNE AUS-TT FORMAT (2 0) = AUSDATUM
RECHNE AUS-MM FORMAT (2 0) = AUSDATUM * 0,01
RECHNE AUS-JJ FORMAT (2 0) = AUSDATUM * 0,0001
RECHNE AUS-TTC FORMAT (2 C) = AUS-TT
RECHNE AUS-MMC FORMAT (2 C) = AUS-MM
RECHNE AUS-JJC FORMAT (2 C) = AUS-JJ
RECHNE AUSTRITT FORMAT (8 C) = '00000000'
RECHNE AUSTRITT STELLE = 1 ='20' AUSDATUM NE 0
RECHNE AUSTRITT STELLE = 3 = AUS-JJC
RECHNE AUSTRITT STELLE = 5 = AUS-MMC
RECHNE AUSTRITT STELLE = 7 = AUS-TTC

Gruß

H.-H. Müller