by Katrin5344 » Fri Jun 03, 2011 8:40 am
Nein - TBTCP-PRREC wäre zwar einfach, ist es aber leider nicht.
Die Outlook-Addresse (EMAIL) kann ich inzwischen auslesen über den Weg :
begin of L_RECOBJKEY,
RCP_ID_TP like SOMG-RCP_ID_TP,
RCP_ID_YR like SOMG-RCP_ID_YR,
RCP_ID_NO like SOMG-RCP_ID_NO,
RCP_SND_TP like SOMG-RCP_SND_TP,
RCP_SEQ_NO like SOMG-RCP_SEQ_NO,
OBJYR like SOMG-OBJYR,
OBJNO like SOMG-OBJNO,
end of L_RECOBJKEY,
move : IT_TBTCO-RECOBJKEY to L_RECOBJKEY,
case L_RECOBJKEY-RCP_ID_TP.
when '&AD'. "EMAIL
select single * from SOMG
where OBJTP = L_OBJTP
and OBJYR = L_RECOBJKEY-OBJYR
and OBJNO = L_RECOBJKEY-OBJNO.
*ADRVP hinzulesen
move:
SOMG-MANDT to L_RCP_ID_NO-MANDT1,
SOMG-MANDT to L_RCP_ID_NO-MANDT2,
SOMG-OBJTP to L_RCP_ID_NO-OBJTP,
SOMG-OBJYR to L_RCP_ID_NO-OBJYR,
SOMG-OBJNO to L_RCP_ID_NO-OBJNO.
select single * from ADRVP
where APPL_KEY = L_RCP_ID_NO.
if sy-subrc = 0.
move: ADRVP-PERSNUMBER to RESULT-PERSNUMBER.
endif.
*Namen aus Personalnummer lesen
select single * from ADRP
where PERSNUMBER = RESULT-PERSNUMBER
and DATE_FROM le sy-datum
and DATE_TO ge sy-datum.
if sy-subrc = 0.
concatenate ADRP-NAME_FIRST ADRP-NAME_LAST
into RESULT-NAME
separated by SPACE.
Dann habe ich - wenn auch Umständlich - die EMAIL-Adresse.
Wenn es aber eine SAP-Business-Workplace-Adresse ist, funktioniert das nicht. Da habe ich noch keine Referenz gefunden.
mfg zdago