HRP1001 B032 relations not visible in PA30 and PP01

[riesjardvv]

Dear community,

I have the following case, in our databse there are Q->P relations B032 where a qualification is linked to a personal number.

In SE16 i see the relations but in PA30 as well as PP01 transaction, the relations are not visible.

Also trying to delete the relation via function module RH_DELETE_INFTY result in sy-subrc = 1.

I suppose this is due some database inconsitancy but i got stuck at the moment.

Anyone who can point me in right direction?

Grtz Richard

[lucylan · Accepted solution]

Hello Richard,

How PLOGI QUALI is set in T77S0 ? Is it '1 A032 Q'? I think probably so.
Then debug FM RHPP_COMMON_QUALI_PROF_READ to check why the Q is not returned...

Best regards.

Lucy

[riesjardvv · Accepted solution]

Lucy,

RHPP_COMMON_QUALI_PROF_READ is not triggered in PP01 as well in RH_DELETE_INFTY.

grtz Richard

[riesjardvv · Accepted solution]

100 PLOGI QUALI 1 A032 Q Integratie-optie voor kwalificaties

[riesjardvv · Accepted solution]

Lucy,

in debuger FM RH_BASE_READ_ADATA which is called from within RHPP_COMMON_QUALI_PROF_READ i see following

SQL statement is not returning records,

************************** RH_BASE_READ_DATA ***************************

** PADDB-DBTAB ->> HRPAD31

IF PAD_COND_LINES EQ 0.
SELECT * FROM (PADDB-DBTAB) CLIENT SPECIFIED
* APPENDING TABLE ADATA "ANDUNI
APPENDING TABLE <dbtab> "ANDUNI
FOR ALL ENTRIES IN PAD_FOR
WHERE MANDT EQ RHDB_CLIENT
AND ADATANR EQ PAD_FOR-ADATANR.

************************** RH_BASE_BUILD_P1001 ***************************

The read statement is not returning any result because adata_tab was not populated in FM above therefor it1001 remains empty.

adata_key-mandt = rhdb_client.
adata_key-adatanr = t1001-adatanr.
READ TABLE adata_tab
WITH KEY mandt = adata_key-mandt
adatanr = adata_key-adatanr
BINARY SEARCH.
CHECK sy-subrc EQ 0.
it_1001-adata = adata_tab-adata.
ENDIF.

[riesjardvv]

Fix in DEV, issue not occuring on ACC and PRD.

Created record in HRPAD31 for missing ADATANR entries.

REPORT zrvv_fix_hrp1001_2_hrpadr31.

DATA lt_hrpad31 TYPE STANDARD TABLE OF hrpad31.
DATA lt_hrp1001 TYPE STANDARD TABLE OF hrp1001.

*-----------------------------------------------------------------------*
*-- Get all HRPADR31 records
*-----------------------------------------------------------------------*
SELECT * FROM hrpad31 INTO TABLE lt_hrpad31.

*-----------------------------------------------------------------------*
*-- Get all HRP1001 records relation B032
*-----------------------------------------------------------------------*
SELECT * FROM hrp1001 INTO TABLE lt_hrp1001
WHERE plvar = '01'
AND rsign = 'B'
AND relat = '032'.

LOOP AT lt_hrp1001 INTO DATA(ls_hrp1001).

READ TABLE lt_hrpad31 INTO DATA(ls_hrpad31) WITH KEY adatanr = ls_hrp1001-adatanr.

IF sy-subrc <> 0.
WRITE: / 'Not found'.
ENDIF.

ls_hrpad31-adatanr = ls_hrp1001-adatanr.
ls_hrpad31-chara = '003'.
ls_hrpad31-exper = '00'.
ls_hrpad31-zzcerti = 'Added because of incons'.

INSERT hrpad31 FROM ls_hrpad31.

ENDLOOP.

[lucylan]

Hello Richard,

Can you check whether the inverse P-A032-Q relationship for the relevant Q-B032-P also exists in HRP1001 ? I am thinking maybe this inverse relationship is missing.

Best regards.
Lucy

[riesjardvv]

Lucy,

P-A032-Q is present in SE16 table HRP1001.

Grtz Richard

[former_member182377]

Hi ,

What did you try to delete ? and why.. could you please throw some screenshots? if you are unable to see those , could be authorization issues..

Thanks

Sriram