PDA

View Full Version : Numerische Felder in Alfa-Feldgruppe ausgeben



dino
29-08-06, 12:12
... Vielleicht eine blöde Frage: Kann ich ohne größeren Aufwand (über Konvertierung num --> alfa, Trennen Vorkomma- und Nachkommawerte, MOVEA Vorkommawert, Komma einfügen, MOVEA Dezimalwert) ein numerisches Feld -mit Aufbereitung - in eine Alfa-Feldgruppe mit einstelligen Elementen (an bestimmten Stellen) ausgeben, ähnlich wie eine Zeilenausgabe beim Drucker? Mit "MOVEA" ist das ja offenbar nicht möglich, wie das "A" hinter "MOVE" schon besagt.

B.Hauser
29-08-06, 12:45
Hallo,

ich bin nicht ganz sicher, ob ich genau verstehe, was Du willst.
Du willst einen numerischen Wert in einen alphanumerischen Wert inclusive Dezimal-Trennzeichen konvertieren und diesen Wert in eine Feldgruppe aus lauter einstelligen alphanumerischen Elementen verschieben. Wenn ja, kannst Du das folgende Ausprobieren:



D Numer S 15P 5 inz(123,45)
D DSZahl DS
D Alpha 16
D Array 1 Dim(16) Overlay(Alpha)
*----------------------------------------------------
/Free
EvalR Alpha = %Char(Numer);
/End-Free


Birgitta

dino
30-08-06, 14:40
Danke Birgitta, Free Form ist zwar für mich ein Buch mit 7 Siegeln, aber ich habs kapiert und es funktioniert sogar. Vielen Dank

dino
01-09-06, 12:51
Hallo Birgitte, hab noch was viel besseres zu dieser Problematik gefunden: "%editc" in Free Form:

eval alfafeld = %editc(Betrag:'K');

M.f.G. Hubert

Fuerchau
01-09-06, 12:54
Erinnere dich an deine Frage, die konnte so nie zu deiner Lösung führen.