Anlegen Infotyp 9500
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
6 Beiträge
•
Seite 1 von 1
6 Beiträge
Seite 1 von 1
Hallo zusammen,
ich habe Probleme den Infotyp 9500 mit Hilfe des Fuba's HR_INFOTYP_OPERATION anzulegen.
Folgenden Code verwende ich:
ls_pa9500-infty = '9500'.
ls_pa9500-pernr = trip_header-pernr.
lv_beg = trip_header-datv1+6(2) && trip_header-datv1+4(2) && trip_header-datv1+0(4).
lv_end = trip_header-datb1+6(2) && trip_header-datb1+4(2) && trip_header-datb1+0(4).
ls_pa9500-begda = trip_header-datv1+0(4) && trip_header-datv1+4(2) && trip_header-datv1+6(2).
ls_pa9500-endda = trip_header-datb1+0(4) && trip_header-datb1+4(2) && trip_header-datb1+6(2).
read table konti into ls_konti index 1.
if sy-subrc = 0.
if ls_konti-kostl is not initial.
else.
call function 'CONVERSION_EXIT_ABPSP_INPUT'
exporting
input = ls_konti-nplnr(7)
importing
output = lv_pspnr.
select single vbeln from vbap into lv_vbeln
where ps_psp_pnr eq lv_pspnr.
select single kunnr from vbak into ls_pa9500-kunnr
where vbeln eq lv_vbeln.
select single land1 ort01 name1 pstlz stras from kna1
into (ls_pa9500-country, ls_pa9500-city, ls_pa9500-kun_name, ls_pa9500-post_code, ls_pa9500-street )
where kunnr = ls_pa9500-kunnr.
endif.
endif.
ls_pa9500-activity = 'XX'.
ls_pa9500-aedtm = sy-datum.
ls_pa9500-uname = sy-uname.
ls_pa9500-days_92 = 1.
ls_pa9500-duration = ls_pa9500-endda+6(2) - ls_pa9500-begda+6(2).
""""""""""""""""
call function 'HR_INFOTYPE_OPERATION'
exporting
infty = '9500'
number = ls_pa9500-pernr
validityend = lv_end
validitybegin = lv_beg
dialog_mode = '0'
record = ls_pa9500
operation = 'INS'
* nocommit = " Kennzeichen der logischen Einheit
* view_identifier = " View-Kennzeichen
* secondary_record = " Rückgabesatz (sekundär)
importing
return = return
key = key.
Er bricht immer innerhalb des FuBa's ab und wirft eine Exception die nicht aufgefangen wird.
Kann mir jemand weiterhelfen?
ich habe Probleme den Infotyp 9500 mit Hilfe des Fuba's HR_INFOTYP_OPERATION anzulegen.
Folgenden Code verwende ich:
ls_pa9500-infty = '9500'.
ls_pa9500-pernr = trip_header-pernr.
lv_beg = trip_header-datv1+6(2) && trip_header-datv1+4(2) && trip_header-datv1+0(4).
lv_end = trip_header-datb1+6(2) && trip_header-datb1+4(2) && trip_header-datb1+0(4).
ls_pa9500-begda = trip_header-datv1+0(4) && trip_header-datv1+4(2) && trip_header-datv1+6(2).
ls_pa9500-endda = trip_header-datb1+0(4) && trip_header-datb1+4(2) && trip_header-datb1+6(2).
read table konti into ls_konti index 1.
if sy-subrc = 0.
if ls_konti-kostl is not initial.
else.
call function 'CONVERSION_EXIT_ABPSP_INPUT'
exporting
input = ls_konti-nplnr(7)
importing
output = lv_pspnr.
select single vbeln from vbap into lv_vbeln
where ps_psp_pnr eq lv_pspnr.
select single kunnr from vbak into ls_pa9500-kunnr
where vbeln eq lv_vbeln.
select single land1 ort01 name1 pstlz stras from kna1
into (ls_pa9500-country, ls_pa9500-city, ls_pa9500-kun_name, ls_pa9500-post_code, ls_pa9500-street )
where kunnr = ls_pa9500-kunnr.
endif.
endif.
ls_pa9500-activity = 'XX'.
ls_pa9500-aedtm = sy-datum.
ls_pa9500-uname = sy-uname.
ls_pa9500-days_92 = 1.
ls_pa9500-duration = ls_pa9500-endda+6(2) - ls_pa9500-begda+6(2).
""""""""""""""""
call function 'HR_INFOTYPE_OPERATION'
exporting
infty = '9500'
number = ls_pa9500-pernr
validityend = lv_end
validitybegin = lv_beg
dialog_mode = '0'
record = ls_pa9500
operation = 'INS'
* nocommit = " Kennzeichen der logischen Einheit
* view_identifier = " View-Kennzeichen
* secondary_record = " Rückgabesatz (sekundär)
importing
return = return
key = key.
Er bricht immer innerhalb des FuBa's ab und wirft eine Exception die nicht aufgefangen wird.
Kann mir jemand weiterhelfen?
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Beitrag
von DeathAndPain (Top Expert / 1952 / 259 /
413
)
»
Du hast ein Problem mit einer Exception und schreibst noch nicht mal, um welche Exception es sich handelt?!?
Ansonsten vorsichtiger Tipp: Deinen Feldnamen zufolge scheinst Du für den Parameter RECORD ein Feld der Struktur PA9500 zu übergeben. Erwartet wird jedoch ein Feld der Struktur P9500.
Kleiner aber feiner Unterschied.
Ansonsten vorsichtiger Tipp: Deinen Feldnamen zufolge scheinst Du für den Parameter RECORD ein Feld der Struktur PA9500 zu übergeben. Erwartet wird jedoch ein Feld der Struktur P9500.
Kleiner aber feiner Unterschied.
Beitrag
von DeathAndPain (Top Expert / 1952 / 259 /
413
)
»
Ist natürlich insofern nicht ganz einfach, als Dein Infotyp 9500 ein selbstgemachter (kundeneigener) Infotyp ist, also kein Standard-Infotyp. Dennoch gehe ich davon aus, dass in den Aufrufdaten was nicht stimmt.
Was Du als erstes versuchen kannst, ist auch noch das (triviale) Feld ls_pa9500-infty zu füllen. Bin jetzt nicht sicher, ob das relevant ist, aber ich mache es immer. Dafür kannst Du die Zuweisungen für die Felder ls_pa9500-aedtm und ls_pa9500-uname rausnehmen. Da weiß ich mit Sicherheit, dass SAP die automatisch pflegt. Und schau Dir (im Debugger direkt vor Aufruf des FB!) auch noch mal genau die Datümer an, die Du da übergibst. Bei Deinem Insert sollte ls_pa9500-begda = lv_beg und ls_pa9500-endda = lv_end sein und lv_end >= lv_beg sichergestellt sein! Und Empfehlung: Ein kompletter Search&Replace ls_pa9500 --> ls_p9500. Sonst stellst Du jedem, der später Deinen Code liest, eine gemeine Falle.
Wenn das nicht hilft, poste doch bitte mal den Codeausschnitt, der im Dump steht, dass man mal genau sieht, an welcher Stelle im Standard die Exception geworfen wird. Am besten auch den (gleichfalls im Dump vorhandenen) Block mit den Feldwerten zum Zeitpunkt des Aufrufs (kannste ja im Testsystem machen, damit Du hier keine produktiven Daten postest).
Was Du als erstes versuchen kannst, ist auch noch das (triviale) Feld ls_pa9500-infty zu füllen. Bin jetzt nicht sicher, ob das relevant ist, aber ich mache es immer. Dafür kannst Du die Zuweisungen für die Felder ls_pa9500-aedtm und ls_pa9500-uname rausnehmen. Da weiß ich mit Sicherheit, dass SAP die automatisch pflegt. Und schau Dir (im Debugger direkt vor Aufruf des FB!) auch noch mal genau die Datümer an, die Du da übergibst. Bei Deinem Insert sollte ls_pa9500-begda = lv_beg und ls_pa9500-endda = lv_end sein und lv_end >= lv_beg sichergestellt sein! Und Empfehlung: Ein kompletter Search&Replace ls_pa9500 --> ls_p9500. Sonst stellst Du jedem, der später Deinen Code liest, eine gemeine Falle.
Wenn das nicht hilft, poste doch bitte mal den Codeausschnitt, der im Dump steht, dass man mal genau sieht, an welcher Stelle im Standard die Exception geworfen wird. Am besten auch den (gleichfalls im Dump vorhandenen) Block mit den Feldwerten zum Zeitpunkt des Aufrufs (kannste ja im Testsystem machen, damit Du hier keine produktiven Daten postest).
Beitrag
von DeathAndPain (Top Expert / 1952 / 259 /
413
)
»
Das ist aber sehr schräg! Für mich klingt das so ein bisschen wie "Ich habe eine Variable umbenannt, und dann ging es.". An Deiner Stelle würde ich mich mit so einer Krückenlösung nicht zufriedengeben, sondern versuchen zu ergründen, was denn nun wirklich die Ursache (gewesen) ist. Ich setze den von Dir angesprochenen FB dutzendfach in verschiedensten Programmen ein und habe kein Problem. Eigentlich ist der ganz wunderbar nutzbar.
Seite 1 von 1
Vergleichbare Themen
1
Antw.
Antw.
715
Views
Views
Infotyp anlegen, Zeitpunkt: Infotyp gespeichert
von TomSpeed » 20.03.2023 10:29 • Verfasst in ABAP® für Anfänger
von TomSpeed » 20.03.2023 10:29 • Verfasst in ABAP® für Anfänger
1
Antw.
Antw.
233
Views
Views
FuBa für Personalentwicklung - Infotyp anlegen
von TomSpeed » 18.03.2023 11:54 • Verfasst in ABAP® für Anfänger
von TomSpeed » 18.03.2023 11:54 • 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
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.