free-format unterschiedliche Felddefinitionen

[RobertMack]

Interessehalber: was gefällt Dir an an
##bp=%Dec(%Subst(%Char(bper):1:6):6:0) nicht?

[andreaspr@aon.at]

Wieso überhaupt so kompliziert?

##BP = BPER / 100;

lg Andreas

[lucullus]

Moin, moin,

vielen Dank an Alle!

Der overlay ist mir nicht in den Sinn gekommen, aber das gefällt mir!

Am workaround gefällt mir "massive" Tiparbeit nicht -> Fehlerquelle

Schöness WE allen.

Gruß

Andreas

[Fuerchau]

@Andreas
Damit bekommst du nur den linken Teil, es soll aber der Rechte Teil ermittelt werden.

[andreaspr@aon.at]

@Andreas
Damit bekommst du nur den linken Teil, es soll aber der Rechte Teil ermittelt werden.

Ich dachte dass das die Anforderung ist?
Kann ja sein dass ich grad an legasthenie leide, aber %Subst(%Char(bper):1:6) liefert meines wissens den Linken Teil.

Außerdem

Der Inhalt von BPER soll jetzt linksbündig in ##BP eingestellt werden.

[Fuerchau]

Jepp, das habe ich ja doch überlesen .

[BenderD]

... das Problem ist doch das lesen, nicht das schreiben!!!
fixed format:
move tuch hut
dsply hut
* zeigt Kaninchen vor, erst zu verstehen, wenn man die Deklaration von tuch und hut liest!!!

Overlay ds noch schlimmer!!!
eval hut = tuch;
dsply kaninchen;

jetzt ist sogar der Zusammenhang zwischen kaninchen und hut nur noch in der Deklaration (an völlig anderer Stelle) zu finden.

D*B

der schon weiß, warum für ihn RPG keine ordentliche Programmiersprache ist!

[RobertMack]

Ähem,

wären wir zweisprachig, könnten wir durchaus Gefallen an der selbsterklärenden Schreibweise finden. Das läse sich dann so:

BuchungsPeriodeJ4M2 = %Ziffern(%TeilAus(%Zeichenfolge(Datum8nEur):1:6):6 :0);

[Fuerchau]

Nun ja, wenn man den 1. Beitrag genau liest, sieht man, dass auch der Schreiber da nicht sauber arbeitet:

a) per substr(xxx:1:6) wird der linksbündige teil genommen
b) per "move" wird der rechtsbündige Teil genommen.
Ich habe mich von b) leiten lassen.

@Dieter
Das kann man in anderen Sprachen ja genauso machen in dem man nur mehrere unterschiedlich benannte Zeiger auf den selben Inhalt verwendet, was auch oft genug gemacht wird.

[BenderD]

@Dieter
Das kann man in anderen Sprachen ja genauso machen in dem man nur mehrere unterschiedlich benannte Zeiger auf den selben Inhalt verwendet, was auch oft genug gemacht wird.

... das gehört auch da zu den Techniken, die dazu Anlass bieten dem Programmierer das Handbuch um die Ohren zu hauen (und das schreibe ich als politischer Pazifist!). Zudem gibt es Programmiersprachen wo zumindest der Compiler weiß auf was so ein Pointer da eigentlich zeigt und in Java hat man diesen Unfug gleich ganz unterbunden.
Sorry, das sind alles faule Ausreden! Gute Programme und sauberer Programmierstil kommt ohne solchen Unfug aus!!! Das ist nicht besonders clever, das ist Murks von der murksigsten Sorte!!!

D*B

[Fuerchau]

@Birgitta
Da es sich hier (erkennbar) um ein Datum handelt, gehe ich mal davon aus, dass kein Datum < als Jahr 1000 vorkommt .

[B.Hauser]

Vielleicht noch eine Anmerkung zu dem o.g. Statement:

##bp = %dec(%subst(%char(bper):1:6):6:0);

%CHAR richtet linksbündig aus und entfernt führende Nullen:
BPER = 20120810 --> ##BP = 201208
BPER = 123456 --> #BP = 123456
BPER = 123 --> Abbruch!

... habe zufällgi gerade eben einen solchen Fehler uns rausgefischt!

Besser wäre in diesem Fall:

##BP = %Int(%Subst(%EditC(BPER: 'X'): 1: 6));

Birgitta