Lohnarten aus dem Infotyp 0008 (SAP HCM)

[Maxi1051]

Hallo zusammen,

ich bin komplett neu in der ABAP Welt und versuche gerade ein Zusatzfeld anzulegen mitdem ich bestimmte Lohnarten aus dem Infotyp 0008 (SAP HCM) auslesen kann.

Mein Coding sieht wie folgt aus:

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. DATA: axa_wagetype LIKE p0008-lga01,
2.       axa_value TYPE STRING,
3.       counter Type i.
4.  
5. counter = 00.
6.  
7. DO 40 TIMES
8.   VARYING axa_wagetype FROM p0008-lga01 NEXT p0008-lga02.
9.  
10.   Add 1 to counter.
11.   axa_value = 'p0008-BET0' && counter.
12.  
13.   IF axa_wagetype EQ '0610'.
14.     AXA_LA0612_IT0008 = axa_value.
15.     EXIT.
16.   ENDIF.
17.  
18. ENDDO.
19.  

GeSHi ©

Aber diese Zeile " AXA_LA0612_IT0008 = axa_value." funktioniert nicht. Wenn ich direkt ein Feld, z.B. p0008-bet01 anstatt axa_value eintarge funktioniert es. Aber ich will ja den Betrag an der Stelle auslesen wo ich die Lohnart gefunden habe. Das funktioniert aber leider nicht da die Variable nicht als Zahl interpretiert werden kann.

Dann hätte ich noch eine Frage, wie kann ich den eine Prüfung einbauen ob die Personalnummer auch wirklich eingesehen werden kann und ggf. wie kann sie über das Selektionsbild selektiert werden?

Kann mir hier jemand helfen? Ich bin schon die ganze Zeit dabei eine Lösung zu finden, habe aber noch nichts gefunden.

Viele Grüße

Axel

[Lasse815]

Hallo Axel,

zukünftig würde ich Fragen zum HCM eher im Forum Human Resources platzieren, da passt es tematisch besser hin...

Und von was für einem Zusatzfeld sprichst Du? Im InfoSet, oder wo hast Du das Zusatzfeld angelegt?

Also ganz grundsätzlich kannst Du bei VARYING mehrere Variablen angeben... versuch's mal so:

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. DATA: axa_wagetype LIKE p0008-lga01,
2.       axa_value LIKE p0008-bet01.
3.  
4. DO 40 TIMES
5.   VARYING axa_wagetype FROM p0008-lga01 NEXT p0008-lga02
6.   VARYING axa_value FROM p0008-bet01 NEXT p0008-bet02.
7.  
8.   IF axa_wagetype EQ '0610'.
9.     AXA_LA0612_IT0008 = axa_value.
10.     EXIT.
11.   ENDIF.
12.  
13. ENDDO.

GeSHi ©

Viele Grüße
Chris