Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Maintain infotype

Former Member
0 Likes
901

Hello people,

I need a fonction or a code to modify or update specific fields in an infotype !!!

Thanks.

7 REPLIES 7
Read only

Former Member
0 Likes
819

PA30 is the T-code to Create/Modify Infotypes records.

PA20 is to View Infotype Records.

Regards

Read only

Former Member
0 Likes
819

USE FM

HR_INFOTYPE_OPERATION ...

Read only

Former Member
0 Likes
819

Thanks but it is for infotype 1035 , so I need a general fonction or a code ! For example a fonction which use a table to update an infotype !!!

Read only

amit_khare
Active Contributor
0 Likes
819

For 1035 use RH_UPDATE_INFTY.

Read only

0 Likes
819

ok, I am going to try "RH_UPDATE_INFTY" do have a axemple with this fonction !!!

Read only

0 Likes
819

DATA: lt1035_mod LIKE p1035 OCCURS 0 WITH HEADER

LINE,

CALL FUNCTION 'RH_UPDATE_INFTY'

EXPORTING

vtask = 'D'

TABLES

innnn = lt1035_mod

EXCEPTIONS

OTHERS = 1.

Read only

0 Likes
819

Here is my code and I have this error RAPID FORM INITIAL !!!! What is wrong ?

DATA: li_schedule LIKE p1035 OCCURS 0 WITH HEADER LINE,

lw_schedule LIKE LINE OF li_schedule.

li_schedule-plvar = lw_course-plvar.

li_schedule-otype = lw_course-otype.

li_schedule-objid = lw_course-objid.

li_schedule-begda = lw_course-begda.

li_schedule-endda = lw_course-endda.

li_schedule-infty = '1035'.

li_schedule-ndays = '3'.

li_schedule-nhours = '10'.

Append li_schedule.

CALL FUNCTION 'RH_UPDATE_INFTY'

EXPORTING

vtask ='S'

* ORDER_FLG = 'X'

* COMMIT_FLG = 'X'

* AUTHY = 'X'

* PPPAR_IMP =

* OLD_TABNR_NEW_LANGU = ''

* REPID = ' '

* FORM = ' '

* KEEP_LUPD =

* WORKF_ACTV = 'X'

tables

innnn = li_schedule

* ILFCODE =

* EXCEPTIONS

* ERROR_DURING_UPDATE = 1

* NO_AUTHORIZATION = 2

* REPID_FORM_INITIAL = 3

* CORR_EXIT = 4

* OTHERS = 5

.

IF sy-subrc <> 0.

* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.