Rechenausdruck auswerten
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
14 Beiträge
•
Seite 1 von 1
14 Beiträge
Seite 1 von 1
Hi Leute,
habe die Aufgabe bekommen ( zu Übungszwecken ), ein Programm zu schreiben, das einen beliebigen Rechenausdruck den man eingibt auswertet und anschließen das Ergebniss berechnet. Vorgabe ist auch, das Terme mindestens durch ein Leerzeichen voneinander getrennt sein sollen.
Eine mögliche Eingabe könnte z.B. : "1 + SQRT (3)" oder "1 + 3" sein.
Mein Problem ist jetzt das ich anfangs viele Ideen hatte wie ich das lösen könnte aber letztendlich nichts davon geklappt hat.
Könntet ihr mir vielleicht eine kleinen Tipp geben wie ich diese Aufgabe lösen kann oder was ich mal ausprobieren könnte?
habe die Aufgabe bekommen ( zu Übungszwecken ), ein Programm zu schreiben, das einen beliebigen Rechenausdruck den man eingibt auswertet und anschließen das Ergebniss berechnet. Vorgabe ist auch, das Terme mindestens durch ein Leerzeichen voneinander getrennt sein sollen.
Eine mögliche Eingabe könnte z.B. : "1 + SQRT (3)" oder "1 + 3" sein.
Mein Problem ist jetzt das ich anfangs viele Ideen hatte wie ich das lösen könnte aber letztendlich nichts davon geklappt hat.
Könntet ihr mir vielleicht eine kleinen Tipp geben wie ich diese Aufgabe lösen kann oder was ich mal ausprobieren könnte?
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Schade, dass Du keine Deiner vielen Ideen und die dabei aufgetretenen Probleme konkret benannt hast.Gast hat geschrieben:Mein Problem ist jetzt das ich anfangs viele Ideen hatte wie ich das lösen könnte aber letztendlich nichts davon geklappt hat.
Hi,
lg Andreas
Code: Alles auswählen.
REPORT zforum49 .
PARAMETERS: formel(50) obligatory default 'sqrt( 2 )'.
DATA : BEGIN OF prog OCCURS 0,
text(72),
END OF prog.
DATA genprog LIKE tadir-obj_name.
DATA line TYPE i.
DATA word(80) TYPE c.
DATA message(99) TYPE c.
DATA error.
DATA text(72).
DATA ergebnis(16) TYPE p DECIMALS 2.
APPEND 'report z1.' TO prog.
APPEND '*' TO prog.
APPEND 'form RECHNEN using formel ergebnis.' TO prog.
CONCATENATE 'ergebnis =' formel '.' INTO prog-text
SEPARATED BY space.
APPEND prog.
text = prog.
APPEND 'endform.' TO prog.
GENERATE SUBROUTINE POOL prog NAME genprog MESSAGE message
LINE line WORD word.
IF sy-subrc <> 0.
error = sy-subrc.
LOOP AT prog.
WRITE: / sy-tabix.
IF sy-tabix = line .
WRITE: prog COLOR 6.
WRITE:/ line , message COLOR 6 INTENSIFIED OFF.
ELSE.
WRITE: prog.
ENDIF.
ENDLOOP.
ENDIF.
IF NOT error IS INITIAL.
EXIT.
ENDIF.
PERFORM rechnen IN PROGRAM (genprog) USING formel ergebnis.
WRITE: / ergebnis, '=', formel.lg Andreas
Beitrag
von black_adept (Top Expert / 4086 / 126 /
940
)
»
Vielleicht könnte man ja auch ABAP den Großteil der Arbeit machen lassen und einfach einen FB geschickt füttern. Damit kann man dann fast zaubern...
FB: "EVAL_FORMULA"
FB: "EVAL_FORMULA"
Wenn ein Programm mit so einer Backdoor einmal im Produktivsystem ist, hat man verloren.PsychoMantis hat geschrieben:Nu hast du seine Hausaufgaben gemacht und der Lerneffekt ist flöten gegangenHätte ihm doch wesentlich weiter gebracht wenn wir ihm bei seinen Ideen geholfen hätten.
Dann kann keiner mehr sagen, welches SAP-Standard-Programm noch konsistent ist, welche Daten noch nicht manipuliert wurden usw.
Wenn das als Erfüllung der Hausaufgabe durchgeht, tauigt der Referent nichts.
Hi danke für eure Antworten.
Würde euch ja gern meine Versuche die ich so gestartet habe zeigen aber naja die haben immer irgendwann im nichts geendet und sind etwas zu peinlich *g*. Ok man muss dazu sagen ich bin n kompletter Anfänger in ABAP und bin grad dabei ABAP zu lernen....
@PsychoMantis das mit dem Lerneffekt stimmt eigentlich schon. Hab auch nicht vor jetzt einfach nur den Report zu kopieren und fertig... Zuerst werd ich mir das Teil mal so lange anschauen, bis ich ihn komplett verstehe. Und dann versuche ich nochmal die Aufgabe irgendwie zu lösen. Wenn ich es hin bekommen habe, zeig ich euch wie ich es gemacht habe.
Würde euch ja gern meine Versuche die ich so gestartet habe zeigen aber naja die haben immer irgendwann im nichts geendet und sind etwas zu peinlich *g*. Ok man muss dazu sagen ich bin n kompletter Anfänger in ABAP und bin grad dabei ABAP zu lernen....
@PsychoMantis das mit dem Lerneffekt stimmt eigentlich schon. Hab auch nicht vor jetzt einfach nur den Report zu kopieren und fertig... Zuerst werd ich mir das Teil mal so lange anschauen, bis ich ihn komplett verstehe
. Und dann versuche ich nochmal die Aufgabe irgendwie zu lösen. Wenn ich es hin bekommen habe, zeig ich euch wie ich es gemacht habe.Anonymous hat geschrieben:Wenn ein Programm mit so einer Backdoor einmal im Produktivsystem ist, hat man verloren.PsychoMantis hat geschrieben:Nu hast du seine Hausaufgaben gemacht und der Lerneffekt ist flöten gegangen
Dann kann keiner mehr sagen, welches SAP-Standard-Programm noch konsistent ist, welche Daten noch nicht manipuliert wurden usw.
Wenn das als Erfüllung der Hausaufgabe durchgeht, tauigt der Referent nichts.
ok,
..
war wohl mit Kanonen auf Spatzen
-zum Thema backdoor: es gibt aber auch einige Progrämmchen im Standard mit denen man manipulieren und zerstören könnte - sogar über rfc von einem fremden System
-zum eigentlichen Thema : Wenn es sich um einen Anfängerkurs handelt, sollte sich der Kandidat mal die case- und die split-Anweisung anschauen
nix für ungut
Andreas
Beitrag
von black_adept (Top Expert / 4086 / 126 /
940
)
»
Ich schreibe es gerne nochmal, wenn du die Antwort oben übersehen hast:
Funktionsbaustein : "EVAL_FORMULA"
Funktionsbaustein : "EVAL_FORMULA"
Beitrag
von thund3rbird (ForumUser / 3 / 0 /
0
)
»
hey danke für die schnelle antwort,
also den FB habe ich gefunden, aber so ganz verstehen was man mit dem machen kann, tuh ich noch net ....
Hab auch noch net so die Anung von ABAP ..
Vielleicht kann mir da ja einer weiter helfen ..
DANKE ...
Grüße
also den FB habe ich gefunden, aber so ganz verstehen was man mit dem machen kann, tuh ich noch net ....
Hab auch noch net so die Anung von ABAP ..
Vielleicht kann mir da ja einer weiter helfen ..
DANKE ...
Grüße
Beitrag
von black_adept (Top Expert / 4086 / 126 /
940
)
»
Das ist doch genau so wie man es erwartet.
In den Parameter "FORMULA" gibt man den auszuwertenden Ausdruck ein ( z.B. 13 / SIN( 3 * 4 ) ) und im Parameter VALUE bekommt man dann das Ergebnis zurück.
Allerdings sollte man in der SE37 ganz nach rechts blättern, da das Ausgabefeld 200 Zeichen lang ist und man das Ergebnis auf den meisten Bildschirmen nicht direkt ohne zu blättern sehen kann.
Der Baustein ist sowieso ganz nett - einfach mal debuggen und anschauen, wie er lehrbuchmäßig die eingegebene Formel abarbeitet .
In den Parameter "FORMULA" gibt man den auszuwertenden Ausdruck ein ( z.B. 13 / SIN( 3 * 4 ) ) und im Parameter VALUE bekommt man dann das Ergebnis zurück.
Allerdings sollte man in der SE37 ganz nach rechts blättern, da das Ausgabefeld 200 Zeichen lang ist und man das Ergebnis auf den meisten Bildschirmen nicht direkt ohne zu blättern sehen kann.
Der Baustein ist sowieso ganz nett - einfach mal debuggen und anschauen, wie er lehrbuchmäßig die eingegebene Formel abarbeitet .
Debug doch den FuBa mal, dann lernste erstens wie er arbeitet und zweitens kannste deine Frage dann selbst beantwortenthund3rbird hat geschrieben:d.h. der EVAL_FORMULA übernimmt schon meine eigentlich parser-Funktion ??
so dass ich mir über die Parsereigenschaften eigentlich garkeine gedanken mehr machen muss ??
Grüße
Gruß
Markus
Seite 1 von 1
Vergleichbare Themen
0
Antw.
Antw.
1448
Views
Views
1
Antw.
Antw.
4095
Views
Views
14
Antw.
Antw.
1641
Views
Views
0
Antw.
Antw.
652
Views
Views
Workflow Sachbearbeiterentscheidung auswerten
von brunsdo » 11.10.2017 10:26 • Verfasst in ABAP® für Anfänger
von brunsdo » 11.10.2017 10:26 • Verfasst in ABAP® für Anfänger
Frage die ABAP Experten
Über diesen Beitrag
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 5 Stunden von DeathAndPain 4 / 590
vor 5 Stunden von DeathAndPain 4 / 590
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 5 Stunden von DeathAndPain 4 / 590
vor 5 Stunden von DeathAndPain 4 / 590