Aufruf statischer privater Attribute

Aufruf statischer privater Attribute

Hallo Leidensgenossen,
Habe zwei statische Klassen mit statischen privaten Attributen erstellt. Ein privates statisches Attribut habe ich nach fetch/ array mit Wert versorgt. Nun versuche ich aus der zweiten Klasse heraus eine public Method der ersten Klasse aufzurufen, um den Wert des vorherig versorgten privaten Attributes von Klasse 1 auszulesen. Das will mir leider nicht so recht gelingen.
Ich rufe also eine private Methode von Klasse 2 auf, in der wiederum ein Methodenaufruf aus Klasse 1 gerufen wird. Klappt leider nicht. Habe da diese zwei Varianten, welche jedoch beide nicht funktionieren:

lv_atttribut = lcl_klasse1=>export_kostenst( ex_kostenst )
Fehlermeldung:
Innerhalb einer statischen Methode ist ohne Zusatzangabe nur ein
Zugriff auf statische Attribute möglich.


CALL METHOD lcl_klasse1=>export_kostenst EXPORTING ex_kostenst.
Fehlermeldung:
Nach "EXPORTING" wurde "parameter = ..." erwartet.

Lasst den Räuber wissen, wenn er hier noch mehr an Info stecken soll.

Re: Aufruf statischer privater Attribute

Hallo Hotzenplotz,
der erste Fehler deutet an, dass Du lv_attribut nicht als statisches Attribut angelegt hast.

Es sollte mittels und nicht definiert werden.

MfG
Thomas R.

Re: Aufruf statischer privater Attribute

Für den geschilderten Fall halte ich das FRIENDS Konzept für nicht zielführend, weil man ohne Not die Kapselung durchlöchert, die der OP ja nicht aus Jux aufgebaut hat.


Ralf

Re: Aufruf statischer privater Attribute

Hallo zusammen!
Ich habe mich wieder dem Thema angenommen und glaube auch die Lösung gefunden zu haben. Ausgangssituation ist: Dann wollte ich von einer zweiten Klasse aus auf das vorherig deklariert und zugewiesene priv. Attribut lv_kostenst zugreifen:
Mein Fehler lag darin, dass ich die Statische Methode export_kostenst nicht mit einem Returning Parameter deklariert hatte.

Re: Aufruf statischer privater Attribute

Hotzenplotz hat geschrieben:Hallo zusammen!
Ich habe mich wieder dem Thema angenommen und glaube auch die Lösung gefunden zu haben. Ausgangssituation ist:

Code: Alles auswählen.

CLASS lcl_benutzerinfo DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS: select_userinfo.
    CLASS-METHODS: export_kostenst RETURNING value(re_kostenst) TYPE xubname.

  PRIVATE SECTION.
    CLASS-DATA: lv_benutzer TYPE xubname,
                lv_kostenst TYPE xukostl.

ENDCLASS.

*----------------------------------------------------------------------*
*       CLASS lcl_benutzerinfo IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_benutzerinfo IMPLEMENTATION.
  METHOD select_userinfo.
    lv_benutzer = sy-uname.
    SELECT SINGLE kostl FROM user_addr INTO lv_kostenst WHERE
      bname = lv_benutzer.
  ENDMETHOD. 

  METHOD export_kostenst.
    re_kostenst = lv_kostenst.
  ENDMETHOD.

ENDCLASS.

Dann wollte ich von einer zweiten Klasse aus auf das vorherig deklariert und zugewiesene priv. Attribut lv_kostenst zugreifen:

Code: Alles auswählen.

CLASS lcl_scanner DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS: get_kostenst.

  PRIVATE SECTION.
    CLASS-DATA: lv_kostenst TYPE xukostl.

ENDCLASS.                    "lcl_scanner DEFINITION

*----------------------------------------------------------------------*
*       CLASS lcl_scanner IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_scanner IMPLEMENTATION.
  METHOD get_kostenst.
    lv_kostenst = lcl_benutzerinfo=>export_kostenst( ).
  ENDMETHOD.                    "get_kostenstelle
ENDCLASS.

Mein Fehler lag darin, dass ich die Statische Methode export_kostenst nicht mit einem Returning Parameter deklariert hatte.

Also bis auf das gruselige lv_ ....

Als Tipp, verwende anstatt export_kostenst besser ein "get_kostenstelle". Denn es ist ein klassicher Getter und selbst nicht ABAP Programmierer verstehen das .

Wozu hier noch LV_Benutzer ? sy-uname kannst Du gleich angeben.
lv_benutzer = sy-uname.
SELECT SINGLE kostl FROM user_addr INTO lv_kostenst WHERE
bname = lv_benutzer.

Logischer wäre allerdings ein Importparameter mit DEFAULT sy-uname. Dann hätte man tatsächlich wiederverwendbares Coding, das alle Programme benutzen können, die diese Info zu einem und nicht nur dem ausführenden Benutzer wollen.