Apr 17, 2013 at 10:25 AM

Unable to see long text in infotype text of infotype194

72 Views

Hi

I am using below code to update the text in infotype 194 . record is created in PCL1 but not able to see the text in infotype with PA30/PA20.

I had set field ITXEX = 'X' also .

DATA:
lc_pgmid TYPE old_prog VALUE 'ZKA_TEXT_UPDATE',
lr_upd_cluster TYPE REF TO cl_hrpa_text_cluster,
ls_text TYPE hrpad_text, "Workarea for text
ls_pskey type pskey,
lt_text_194 type hrpad_text_tab,
lv_text TYPE string,
oref TYPE REF TO cx_hrpa_invalid_parameter.

ls_pskey-pernr = '00000001'.
ls_pskey-infty = '0194'.
ls_pskey-objps = space .
ls_pskey-sprps = space.
ls_pskey-subty = '0003'.
ls_pskey-endda = '20120914'.
ls_pskey-begda = '20120910'.
ls_pskey-seqnr = '000'.

ls_text = 'TEXT'.
APPEND ls_text to lt_text_194 .
ls_text = 'TEXT'.
APPEND ls_text to lt_text_194 .
ls_text = 'TEXT'.
APPEND ls_text to lt_text_194 .
ls_text = 'TEXT'.
APPEND ls_text to lt_text_194 .
CREATE OBJECT lr_upd_cluster.

TRY.
CALL METHOD lr_upd_cluster->update
EXPORTING
tclas = 'A'
pskey = ls_pskey
histo = space "'X'
* uname = sy-uname
* aedtm = sy-datum
pgmid = lc_pgmid
text_tab = lt_text_194
no_auth_check = ' '. "'X'
.
CATCH cx_hrpa_missing_authorization .
lv_text = oref->get_text( ).
CATCH cx_hrpa_violated_assertion .
lv_text = oref->get_text( ).
ENDTRY.

I have gone through threads and i did not find any solution in any one of the threads .If some one has fixed the issue please respond back.

THanks

Kamesh