Add New value to the special reference indicator on the TO field

Can you please tell me how to add a new value to the special reference indicator dropdown which is on the transfer order.
LTAK->SPEZI ? Currently it is displaying values A & B in the drop down and want to add a new value to the indicator.
Thanks
John

Hi,
I dont think you will be able to add more values to this field from configuration.
If you check the data element and domain associated with this field (LTAK_SPEZI) in SE11. You can see that the value range for the domain has been defined there as A and B only.
So if you want to add a new value you can ask and ABAP/technical consulatnt to add new values to this Domain.
However i am not sure it will be useful (unless you have a specific requirement and want to modify the standard programs) as the field is checked in different program (eg in inculde LL03AF4V , LL03AF7F ) against these fixed values A and B.

Similar Messages

Urgent -Need to Add new values for the LOV field in forms

HI,
I am customizing an existing form. In that i need to add some values for the LOV fied which can be used during run time.
Please Can some one help me in doing this?
Thanks
Suresh P

Go to Navigator and edit the LOV or create a new one.
hope that helps!

Add new values to the Domain J_1BINDUS3 CFOP category of the material

Hello Gurus
I have a request from the business to include some new values in the domain J_1BINDUS3 CFOP category of the material.
Since is a standard object seems to be a work Basis team, however before requesting this I would like to get some advice from the experts to understand if adding new values to this domain can cause side effects or if I should maintain other objects as result of this request.
I know table J_1BAON has to be maintained to properly determine CFOPs for the new fields but along that is there any other one?
Is this the right process to include new CFOP categories?
The requirement is to properly identify Assets as Productive and Non Productive when making the PO, since this can help us to determine tax code automatically.

Have you tried using "Map published data" in the Utilities pane, mapping the department field to the corresponding security group.
http://codebeaver.blogspot.dk/

Add new line in the Flat file based on the field value

Hi,
Following is my Flat File -
Customer X Y
1001 1 2
1002 0 1
Based on the X and Y value I need to add new lines in the Flat file. If X>0 then add a new line with repeating row and Y>0 add again a new line with repeating row. If X or Y=0 then no need to add any repeating new line.
So, here for the above example I need output as-
Customer X Y
1001 1 2
1001 1 2
1001 1 2
1002 0 1
1002 0 1
Suggest how we can achieve this?
Regards,
Tridib Konwar

Hi Tridib,
I tried your scenario and You will have to use the custom xslt to get the expected result.
Please find bellow the xslt code which you can use in your map.
<?xml version="1.0" encoding="utf-16" ?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:msxsl="urn:schemas-microsoft-com:xslt" xmlns:var="http://schemas.microsoft.com/BizTalk/2003/var" exclude-result-prefixes="msxsl var" version="1.0" xmlns:ns0="http://PracticeAtul.XYFlatFileSchema">
<xsl:output omit-xml-declaration="yes" method="xml" version="1.0" />
<xsl:template match="/">
<xsl:apply-templates select="/ns0:XYComp" />
</xsl:template>
<xsl:template match="/ns0:XYComp">
<ns0:XYComp>
<XYComp_Child1>
<XYComp_Child1_Child1>
<xsl:value-of select="XYComp_Child1/XYComp_Child1_Child1/text()" />
</XYComp_Child1_Child1>
<XYComp_Child1_Child2>
<xsl:value-of select="XYComp_Child1/XYComp_Child1_Child2/text()" />
</XYComp_Child1_Child2>
<XYComp_Child1_Child3>
<xsl:value-of select="XYComp_Child1/XYComp_Child1_Child3/text()" />
</XYComp_Child1_Child3>
<xsl:value-of select="XYComp_Child1/text()" />
</XYComp_Child1>
<xsl:for-each select="XYComp_Child2">
<XYComp_Child2>
<XYComp_Child2_Child1>
<xsl:value-of select="XYComp_Child2_Child1/text()" />
</XYComp_Child2_Child1>
<XYComp_Child2_Child2>
<xsl:value-of select="XYComp_Child2_Child2/text()" />
</XYComp_Child2_Child2>
<XYComp_Child2_Child3>
<xsl:value-of select="XYComp_Child2_Child3/text()" />
</XYComp_Child2_Child3>
</XYComp_Child2>
<xsl:if test="XYComp_Child2_Child2/text()!=0">
<XYComp_Child2>
<XYComp_Child2_Child1>
<xsl:value-of select="XYComp_Child2_Child1/text()" />
</XYComp_Child2_Child1>
<XYComp_Child2_Child2>
<xsl:value-of select="XYComp_Child2_Child2/text()" />
</XYComp_Child2_Child2>
<XYComp_Child2_Child3>
<xsl:value-of select="XYComp_Child2_Child3/text()" />
</XYComp_Child2_Child3>
</XYComp_Child2>
</xsl:if>
<xsl:if test="XYComp_Child2_Child3/text()!=0">
<XYComp_Child2>
<XYComp_Child2_Child1>
<xsl:value-of select="XYComp_Child2_Child1/text()" />
</XYComp_Child2_Child1>
<XYComp_Child2_Child2>
<xsl:value-of select="XYComp_Child2_Child2/text()" />
</XYComp_Child2_Child2>
<XYComp_Child2_Child3>
<xsl:value-of select="XYComp_Child2_Child3/text()" />
</XYComp_Child2_Child3>
</XYComp_Child2>
</xsl:if>
</xsl:for-each>
</ns0:XYComp>
</xsl:template>
</xsl:stylesheet>
If this answers your question please mark it accordingly. If this post is helpful, please vote as helpful.
Atul Toke

I wnat to add new fieldtext in the alv list output plz tell me

hi,
i whant add new fieldtext in the list output, plz tell me where can i modify it.
CORRECTIONS
DATE CORRECTION NOTE AUTHOR DESCRIPTION
09.03.2001 L9CK045451 0388404 XSC Wrong list output for multiple Os
05.06.2001 AL0K023393 0410219 Lud Wrong keydate for search with
 Pchbegda and pchendda.
22.04.2004 S6BK024775 730486 PS Too many selection parameters in
 header
19.06.2006 S6BK035494 956731 JF No sorting by qualification
REPORT RHPK_FIND_PERS_WITH_EXPIRED_QU MESSAGE-ID PQ.
DATA AUFRUF(8).
TABLES : OBJEC, GDSET.
DATA LIST.
DATA MARKFIELD(1) TYPE C.
ALV_POOL
TYPE-POOLS SLIS.
INCLUDES
INCLUDE .
INCLUDE RHPEINI0.
TABLES
DATA: orgeh_BUFFER like hrobject OCCURS 1 WITH HEADER LINE.
DATA: OBJECTS LIKE HRSOBID OCCURS 1 WITH HEADER LINE.
DATA: h_OBJEC LIKE objec OCCURS 0 WITH HEADER LINE.
DATA: pers_objects LIKE HRSOBID OCCURS 1 WITH HEADER LINE.
DATA: QUALI_TAB LIKE QUALI_PROF OCCURS 1 WITH HEADER LINE.
DATA: PERSONS LIKE PERSQ_PROF OCCURS 1 WITH HEADER LINE.
DATA: H_PERSONS LIKE HRPE_PROFL OCCURS 1 WITH HEADER LINE.
DATA: LIST_OUTPUT LIKE PERSQ_PROF OCCURS 1 WITH HEADER LINE.
DATA: BOOK_EVENT_TAB LIKE PERSQ_PROF OCCURS 1 WITH HEADER LINE.
DATA: PLAN_EVENT_TAB LIKE PERSQ_PROF OCCURS 1 WITH HEADER LINE.
DATA H_SUITED LIKE DYNP_PCRIT-SUITED.
DATA: O_COLOR LIKE STREEATTR-COLOR.
DATA: O_INTENSIV LIKE STREEATTR-INTENSIV.
DATA SHOW_KEY.
DATA EVENT.
DATA: HTEXT LIKE P1000-STEXT.
DATA: EVENT_TAB LIKE PERSQ_PROF OCCURS 1 WITH HEADER LINE.
DATA: COLLECTED_EVENTS LIKE PERSQ_PROF OCCURS 1 WITH HEADER LINE.
DATA: SUBTY_TAB LIKE HRPE_OTYPE_SUBTY OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF HIDE_STRU,
 PERSTYPE LIKE HROTYPE-OTYPE,
 PERSOBID LIKE HRSOBID-SOBID,
 PERSTXT LIKE PERSQ_PROF-STEXT,
 SCALE_ID LIKE HRPE_PROFQ-SCALE_ID,
 TRAININGTYPE LIKE HRP1000-OTYPE,
 TRAININGID LIKE HRP1000-OBJID,
 TRAININGSTXT LIKE HRP1000-STEXT,
 QUALID LIKE QUALI_PROF-QUALID,
 QUALTEXT LIKE QUALI_PROF-QUALSTXT,
 END OF HIDE_STRU.
DATA: BEGIN OF EXTAB OCCURS 10,
 FCODE LIKE RSMPE-FUNC,
 END OF EXTAB.
DATA: CURRENT_QUALID LIKE QUALI_PROF-QUALID.
DATA: CURRENT_TRAININGSID LIKE HRP1000-OBJID.
DATA: CURRENT_TRAININGTYPE LIKE HRP1000-OTYPE.
DATA: SUBRC LIKE SY-SUBRC.
VARIABLES
DATA: OBJID LIKE P1000-OBJID.
DATA: H_LINE_COUNT TYPE I.
DATA: H_TABIX1 LIKE SY-TABIX.
ALV-Variables
DATA: alv_events_line TYPE slis_alv_event. "header line
DATA ALV_EVENTS TYPE SLIS_T_EVENT.
DATA GT_ALV_LIST_TOP_OF_LIST TYPE SLIS_T_LISTHEADER.
DATA: gt_events TYPE SLIS_T_EVENT.
DATA G_REPID LIKE SY-REPID.
DATA G_VARIANT LIKE DISVARIANT.
DATA ALV_USERCOMMAND TYPE SLIS_FORMNAME VALUE 'USER_COMMAND'.
DATA G_USERCOMMAND_FOR_RANKINGLIST TYPE SLIS_FORMNAME VALUE
'USER_COMMAND_FOR_RANKINGLIST'.
DATA ALV_LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA: GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: ALV_OUTPUT LIKE HRPDV_EXPIRED_Q OCCURS 0 WITH HEADER LINE.
DATA: Help_OUTPUT LIKE HRPDV_EXPIRED_Q OCCURS 0 WITH HEADER LINE.
begin of Dynpro 5020 - POPUP: WEITER
DATA: OK_CODE_5020 LIKE SY-UCOMM.
DATA: NO_ORG. "if no org selected
DATA: H_TABIX LIKE SY-TABIX.
begin of Dynpro 20nn - Header
TABLES: DYNP_RHPP.
SELECTION SCREEN
SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-005.
PARAMETERS:
 H_EVENTS LIKE DYNP_RHPP-GEN_TRAIN, "with training sugg
 H_QUAL LIKE DYNP_RHPP-EXPIRED_QUAL. "with Qual
SELECTION-SCREEN END OF BLOCK B3.
INITIALIZATION
INITIALIZATION.
PERFORM READ_T77S0_PARAMETERS_FOR_PE.
get user parameters/Planvariante und Beginndatum setzen:
PCHOTYPE = $ORGEH.
CALL FUNCTION 'RHP0_USER_PARAMETERS_GET'
 EXPORTING
 FILL_IF_INITIAL = 'X'
 IMPORTING
 PLVAR = PCHPLVAR
 BEGDA = PCHBEGDA
 endda = Pchendda "Correction 0410219
 WITH_KEY = SHOW_KEY
 SUBSTITUTE =
 ESSENTIAL = only_essential
 ORG_UNIT = PCHOBJID-LOW
 EXCEPTIONS
 OTHERS = 0.
PCHBEGDA = LOW_DATE. "Correction note: 0410219 / AL0K023393
get menu text for key on/off
PERFORM USER_MENU_TEXT_KEY(SAPLRHP0) USING G_MENU_TEXT_KEY.
start-of-selection
START-OF-SELECTION.
terminate the selection if objid isn't given
READ TABLE PCHOBJID INDEX 1 TRANSPORTING NO FIELDS.
IF SY-SUBRC <> 0
AND PCHOBJID IS INITIAL.
 PCHOBJID-SIGN = 'I'.
 PCHOBJID-OPTION = 'EQ'.
 PCHOBJID-LOW = '00000001'.
 APPEND PCHOBJID.
 NO_ORG = TRUE.
ELSE.
 NO_ORG = FALSE.
ENDIF.
GET OBJEC.
terminate the selection if objid isn't given
IF NO_ORG = TRUE.
 EXIT.
ENDIF.
OBJECTS-PLVAR = PCHPLVAR.
OBJECTS-OTYPE = PCHOTYPE.
OBJECTS-SOBID = OBJEC-REALO.
APPEND OBJECTS.
Für das lesen der Organisationseinheit
h_OBJEC-PLVAR = OBJEC-PLVAR.
h_OBJEC-OTYPE = OBJEC-OTYPE.
h_OBJEC-OBJID = OBJEC-objid.
append h_objec.
Read table h_objec index 1 transporting no fields.
if sy-subrc = 0.
Fill Buffer
 orgeh_BUFFER = h_OBJEC.
 orgeh_BUFFER[] = h_OBJEC[].
 CALL FUNCTION 'RH_TEXT_BUFFER_FILL'
 TABLES
 OBJECTS = orgeh_BUFFER.
 Loop at h_OBJEC.
 H_TABIX = SY-TABIX.
Read text of organisation
 CALL FUNCTION 'RH_READ_OBJECT'
 EXPORTING
 PLVAR = h_OBJEC-plvar
 OTYPE = h_OBJEC-otype
 OBJID = h_OBJEC-OBJID
 IMPORTING
 OBEG = h_objec-begda
 OEND = h_objec-endda
 SHORT = short
 STEXT = h_OBJEC-stext
 EXCEPTIONS
 NOT_FOUND = 1
 OTHERS = 2.
 IF SY-SUBRC = 0.
 modify h_OBJEC index H_TABIX.
 ENDIF.
 endloop.
endif.
end-of-selection
END-OF-SELECTION.
read objects of the organizational unit
OBJID = OBJECTS-SOBID.
CALL FUNCTION 'RHPH_PICK_UP_PERSONS'
 EXPORTING
 BEGDA = PCHBEGDA "Correction 0410219
 ENDDA = PCHENDDA "Correction 0410219
 STATUS = '1'
 WITH_STEXT = 'X'
 TABLES
 OBJECTS = OBJECTS
 PERSONS = H_PERSONS
 EXCEPTIONS
 UNDEFINED = 1
 OTHERS = 2.
IF SY-SUBRC = 0.
prepare objects !
 objects-otype = h_persons-ttype.
 objects-sobid = h_persons-tobid.
 append objects.
ELSE.
 EXIT.
ENDIF.
CLEAR OBJECTS. REFRESH OBJECTS.
prepare sel_objects !
pers_objects-PLVAR = PCHPLVAR.
LOOP AT H_PERSONS.
 pers_objects-OTYPE = H_PERSONS-TTYPE.
 pers_objects-SOBID = H_PERSONS-TOBID.
 APPEND pers_objects.
ENDLOOP.
sort objects and delete adjacent duplicates
SORT Pers_OBJECTS BY PLVAR OTYPE SOBID.
DELETE ADJACENT DUPLICATES FROM Pers_OBJECTS COMPARING PLVAR OTYPE
SOBID.
CALL FUNCTION 'RHPK_FIND_PERS_WITH_EXPIRED_Q'
 EXPORTING
 PLVAR = PCHPLVAR
 CHECK_BEGDA = PCHBEGDA
 CHECK_ENDDA = PCHENDDA
 SUBTY = $ownsb "'B032'
 only_essential =
 target_otype =
 target_ap_iea =
 TABLES
 IMP_PER_TAB = pers_objects
 QUALI_TAB = QUALI_TAB
 PERSONS = LIST_OUTPUT
 altq_tab =
 EXCEPTIONS
 NO_QUALIFICATION = 1
 NO_PERSON_FOUND = 2
 OTHERS = 3.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
100% case
READ TABLE pers_objects INDEX 1 TRANSPORTING NO FIELDS.
IF SY-SUBRC = 0.
 sort pers_objects by otype sobid.
check the selected persons: if org.unit was selected !
 Loop at pers_objects.
 H_TABIX = SY-TABIX.
 READ TABLE LIST_OUTPUT WITH KEY OTYPE = pers_objects-OTYPE
 SOBID = pers_objects-SOBID
 BINARY SEARCH.
 IF SY-SUBRC <> 0.
 person doesn't belong to the selected org.unit
 DELETE LIST_OUTPUT INDEX H_TABIX.
 ENDIF.
 ENDLOOP.
ENDIF. "org.unit check needed ?
end-of-selection.
sort h_objec by otype objid.
sort list_output by otype sobid.
sort h_persons by ttype tobid.
ALV-Liste aufbauen
loop at h_objec.
 loop at h_persons where otype = h_objec-otype "XSC
 and sobid = h_objec-objid. "XSC
 Read table list_output with key
 otype = h_persons-ttype
 sobid = h_persons-tobid
 binary search.
 if sy-subrc = 0.
 h_tabix1 = sy-tabix.
 while sy-subrc = 0.
 clear alv_output. "XSC
 ALV_OUTPUT-otype = h_objec-otype.
 ALV_OUTPUT-sobid = h_objec-objid.
 ALV_OUTPUT-stext = h_objec-stext.
 ALV_OUTPUT-Ptype = LIST_OUTPUT-otype.
 ALV_OUTPUT-pobid = LIST_OUTPUT-sobid.
 ALV_OUTPUT-pshort = LIST_OUTPUT-short.
 ALV_OUTPUT-ptext = LIST_OUTPUT-stext.
 ALV_OUTPUT-qualid = LIST_OUTPUT-qualid.
 ALV_OUTPUT-qualstxt = LIST_OUTPUT-qualstxt.
 ALV_OUTPUT-expbegda = LIST_OUTPUT-vbegda.
 ALV_OUTPUT-expendda = LIST_OUTPUT-vendda.
 PERFORM FIND_TRAINING TABLES QUALI_TAB EVENT_TAB COLLECTED_EVENTS
 USING $PLVAR $GDATE H_EVENTS H_QUAL.
 IF NOT EVENT_TAB[] IS INITIAL.
 READ TABLE COLLECTED_EVENTS WITH KEY
 QUALID = LIST_OUTPUT-QUALID.
 IF SY-SUBRC = 0.
 ALV_OUTPUT-ICON_S_EVENTS = ICON_BOOKEVENT.
 endif.
 ENDIF.
 Append ALV_OUTPUT.
 h_tabix1 = h_tabix1 + 1.
 READ TABLE list_output INDEX h_tabix1
 COMPARING otype sobid.
 endwhile.
 endif.
 endloop.
endloop.
check if indicator for qualification view is set
IF h_qual = 'X'. "note 956731
 SORT alv_output by qualid OTYPE SOBID ptype pobid "note 956731
 expbegda expendda. "note 956731
ELSE. "note 956731
 SORT alv_output by OTYPE SOBID ptype pobid qualid expbegda expendda.
ENDIF. "note 956731
DELETE ADJACENT DUPLICATES FROM ALV_OUTPUT COMPARING OTYPE SOBID ptype
 pobid qualid expbegda expendda.
stext_AQ und icon-Feld noch nicht gefüllt
 perform PREPARE_TOP_OF_LIST.
 perform Build_FIELDCAT using GT_FIELDCAT[] H_EVENTS.
 perform ALV_LAYOUT USING alv_layout.
 G_REPID = SY-REPID.
 G_VARIANT-REPORT = G_REPID.
 PERFORM EVENTTAB_BUILD USING GT_EVENTS.
 CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = 'X'
 I_CALLBACK_PROGRAM = G_REPID
 I_CALLBACK_PF_STATUS_SET = 'SET_PF_STATUS'
 I_CALLBACK_USER_COMMAND = ALV_USERCOMMAND
 I_STRUCTURE_NAME = 'HRPDV_EXPIRED_Q'
 IS_LAYOUT = ALV_LAYOUT
 IT_FIELDCAT = GT_FIELDCAT[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = 'A'
 IS_VARIANT = G_VARIANT
 IT_EVENTS = GT_EVENTS
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = ALV_OUTPUT
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2 .
 IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
*& Form FIND_TRAINING
 text
 -->P_QUALI_TAB text
 -->P_EVENT_TAB text
 -->P_$PLVAR text
 -->P_GDATE text
 -->P_H_EVENT text
 -->P_H_QUAL text
FORM FIND_TRAINING TABLES P_QUALI_TAB STRUCTURE QUALI_TAB
 P_EVENT_TAB STRUCTURE EVENT_TAB
 P_COLLECTED_EVENTS STRUCTURE COLLECTED_EVENTS
 USING VALUE(P_$PLVAR) LIKE P1000-PLVAR
 VALUE(P_GDATE) LIKE P1000-GDATE
 VALUE(P_H_EVENT) TYPE ANY
 VALUE(P_H_QUAL) TYPE ANY.
IF NOT P_H_EVENT IS INITIAL.
 READ TABLE EVENT_TAB INDEX 1 TRANSPORTING NO FIELDS.
 IF SY-SUBRC <> 0.
 CLEAR P_EVENT_TAB. REFRESH EVENT_TAB.
 CLEAR P_COLLECTED_EVENTS. REFRESH P_COLLECTED_EVENTS.
 IF EVENT = FALSE.
 EVENT = TRUE.
 ELSE.
 EVENT = FALSE.
 ENDIF.
 CALL FUNCTION 'RHPH_FIND_TRAINING_FOR_QUAL'
 EXPORTING
 PLVAR = PCHPLVAR
 GDATE = SY-DATUM
 GET_NAME = 'X'
 TABLES
 QUALI_TAB = QUALI_TAB
 TO_Q_TAB = EVENT_TAB
 EXCEPTIONS
 NO_QUALIFICATION = 1
 NO_OBJECT_FOUND = 2
 TECHNICAL_ERROR = 3
 OTHERS = 4.
 IF SY-SUBRC = 0.
the found qualifications are picked up into table event_tab
 ENDIF.
 IF SY-SUBRC = 1.
 MESSAGE S015. "Zu den Eingaben wurden keine Daten gefunden
 ENDIF.
 IF SY-SUBRC > 2.
 EXIT.
 ENDIF.
collect events when there are double.
Veranstaltungen kollektieren, Können mehrfach auftauchen, da
verschiedenen Qualifikationen von gleichen Veranstaltungen vermittelt
 LOOP AT P_EVENT_TAB INTO P_COLLECTED_EVENTS.
 APPEND P_COLLECTED_EVENTS.
 ENDLOOP.
 SORT P_COLLECTED_EVENTS BY QUALID STEXT.
 ENDIF.
ENDIF.
ENDFORM. " FIND_TRAINING
*& Form PREPARE_TOP_OF_LIST
 text
--> p1 text
<-- p2 text
FORM PREPARE_TOP_OF_LIST.
DATA ALV_TOP_OF_LIST TYPE SLIS_LISTHEADER. "typ, key, info
DATA STEXT LIKE HRPDV_SUCCESSOR_VIEW-TTEXT.
DATA P_SUBRC LIKE SY-SUBRC.
DATA P_STEXT LIKE T777O-OTEXT.
DATA l_tabix like sy-tabix value 0.
DATA: h_counter TYPE i. "note 730486
ALV_TOP_OF_LIST-TYP = 'H'.
ALV_TOP_OF_LIST-INFO = TEXT-REQ.
APPEND ALV_TOP_OF_LIST TO GT_ALV_LIST_TOP_OF_LIST.
Organisationseinheit
ALV_TOP_OF_LIST-typ = 'S'.
Read text for organisationunit
PERFORM READ_TEXT_OTYPE_T777O(SAPLRHP0) USING SY-LANGU $ORGEH
 P_STEXT P_SUBRC.
ALV_TOP_OF_LIST-key = P_STEXT.
fill buffer for read organisation-text
CALL FUNCTION 'RH_TEXT_BUFFER_FILL'
 EXPORTING
 CHECK_STRU_AUTH = 'X'
 WITH_EXTINT = ' '
 TABLES
 OBJECTS = OBJECTS.
loop at objects for multipleselection
clear h_counter. "note 730486
LOOP AT OBJECTS.
 $OBJID = OBJECTS-SOBID.
 CALL FUNCTION 'RH_READ_OBJECT'
 EXPORTING
 PLVAR = OBJECTS-PLVAR
 OTYPE = OBJECTS-OTYPE
 OBJID = $OBJID
 IMPORTING
 SHORT = short
 STEXT = STEXT
 EXCEPTIONS
 NOT_FOUND = 1
 OTHERS = 2.
 IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 IF h_counter >= 15. "note 730486
 MOVE '( ... )' TO ALV_TOP_OF_LIST-INFO. "note 730486
 APPEND ALV_TOP_OF_LIST TO gt_alv_list_top_of_list.
 "note 730486
 EXIT. "note 730486
 ENDIF. "note 730486
 CONCATENATE $ORGEH OBJECTS-SOBID STEXT INTO
 ALV_TOP_OF_LIST-INFO SEPARATED BY SPACE.
 APPEND ALV_TOP_OF_LIST TO GT_ALV_LIST_TOP_OF_LIST.
 CLEAR ALV_TOP_OF_LIST.
 ALV_TOP_OF_LIST-typ = 'S'.
 l_tabix = l_tabix + 1.
 ADD 1 TO h_counter. "note 730486
ENDLOOP.
CLEAR ALV_TOP_OF_LIST.
ALV_TOP_OF_LIST-TYP = 'S'.
ALV_TOP_OF_LIST-key = TEXT-003.
WRITE PCHBEGDA TO ALV_TOP_OF_LIST-INFO.
APPEND ALV_TOP_OF_LIST TO GT_ALV_LIST_TOP_OF_LIST.
clear ALV_TOP_OF_LIST-INFO.
ALV_TOP_OF_LIST-key = TEXT-004.
WRITE PCHENDDA TO ALV_TOP_OF_LIST-INFO.
Append ALV_TOP_OF_LIST TO GT_ALV_LIST_TOP_OF_LIST.
ENDFORM. " PREPARE_TOP_OF_LIST
*& Form BUILD_FIELDCAT
 text
 -->P_GT_FIELDCAT[] text
FORM BUILD_FIELDCAT USING P_GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV
 P_H_EVENTS.
DATA: WA_FIELDCAT LIKE LINE OF P_GT_FIELDCAT.
DATA: P_REPNAME LIKE SY-REPID,
 L_TABIX LIKE SY-TABIX. "local variable for sy-tabix.
P_REPNAME = SY-REPID.
Erstellen des Feldkataloges
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 I_PROGRAM_NAME = P_REPNAME
 I_INTERNAL_TABNAME =
 I_STRUCTURE_NAME = 'HRPDV_EXPIRED_Q'
 I_CLIENT_NEVER_DISPLAY = 'X'
 I_INCLNAME = PRONAME
 CHANGING
 CT_FIELDCAT = P_GT_FIELDCAT
 EXCEPTIONS
 INCONSISTENT_INTERFACE = 0
 PROGRAM_ERROR = 0
 OTHERS = 0.
LOOP AT P_GT_FIELDCAT INTO WA_FIELDCAT.
 l_tabix = sy-tabix.
 CASE WA_FIELDCAT-FIELDNAME.
 when 'OTYPE'.
 WA_FIELDCAT-DDICTXT = 'L'.
 when 'SOBID'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'STEXT'.
 WA_FIELDCAT-DDICTXT = 'L'.
 when 'PTYPE'.
 WA_FIELDCAT-DDICTXT = 'L'.
 when 'POBID'.
 WA_FIELDCAT-DDICTXT = 'L'.
 when 'PSHORT'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'PTEXT'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'QUALID'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'QUALSTXT'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'EXPBEGDA'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'EXPENDDA'.
 WA_FIELDCAT-DDICTXT = 'L'.
 WHEN 'ICON_S_EVENTS'.
 IF P_H_EVENTS IS INITIAL.
 WA_FIELDCAT-NO_OUT = 'X'.
 else.
 WA_FIELDCAT-DDICTXT = 'X'.
 endif.
 ENDCASE.
 MODIFY P_GT_FIELDCAT FROM WA_FIELDCAT INDEX l_tabix.
ENDLOOP.
ENDFORM. " BUILD_FIELDCAT
*& Form ALV_LAYOUT
 text
 -->P_L_ALV_LAYOUT text
FORM ALV_LAYOUT USING P_ALV_LAYOUT TYPE slis_layout_alv.
build layout
P_LAYOUT-BOX_FIELDNAME = 'MARK_X'. "fieldname for checkbox
P_ALV_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
P_ALV_LAYOUT-BOX_TABNAME = ALV_OUTPUT. "tabname for checkbox
p_ALV_layout-info_fieldname = 'ALV_COLOR'.
ENDFORM. " ALV_LAYOUT
FORM eventtab_build USING
FORM EVENTTAB_BUILD USING RT_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
MOVE 'TOP_OF_PAGE' TO LS_EVENT-NAME.
MOVE 'TOP_OF_PAGE' TO LS_EVENT-FORM.
APPEND LS_EVENT TO RT_EVENTS.
ENDFORM. "EVENTTAB_BUILD
*FORM TOP_OF_PAGE
FORM TOP_OF_PAGE. "#EC CALLED
NEW-PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
 EXPORTING
 IT_LIST_COMMENTARY = GT_ALV_LIST_TOP_OF_LIST[].
ENDFORM. "TOP_OF_PAGE
 FORM USER_COMMAND *
USER_COMMAND for the list of successor view *
--> r_ucomm *
--> rs_selfield *
FORM USER_COMMAND USING ALV_UCOMM LIKE SY-UCOMM
 RS_SELFIELD TYPE SLIS_SELFIELD. "#EC CALLED
DATA: SELECTED_LINE LIKE HRPDV_expired_q.
DATA: SOBID_QUA LIKE P1000-OBJID.
DATA: LT_PERS_TAB LIKE HRSOBID OCCURS 0 WITH HEADER LINE.
CASE ALV_UCOMM.
 WHEN '&IC1'. "per Doppelklick auswählen
 READ TABLE ALV_OUTPUT INDEX
 RS_SELFIELD-TABINDEX INTO SELECTED_LINE.
 CASE RS_SELFIELD-FIELDNAME.
 WHEN 'POTYPE' or 'POBID' or 'PTEXT' or 'OTYPE' or 'SOBID' or
'STEXT' or 'QUALID' or 'QUALSTXT' or 'EXPBEGDA' or 'EXPENDDA'.
 READ TABLE ALV_OUTPUT INDEX RS_SELFIELD-TABINDEX INTO
 Help_output.
 IF SY-SUBRC <> 0.
 MESSAGE S027. "Bitte gültige Zeile auswählen
 EXIT.
 Endif.
 IF ALV_OUTPUT-SOBID IS INITIAL.
 MESSAGE S015. "Zu den Eingaben wurden keine Daten gefunden
 ELSE.
 converte the variable because of the different types
 SOBID_QUA = SELECTED_LINE-SOBID_QUA.
 CALL FUNCTION 'RHPP_SHOW_PROFILE'
 EXPORTING
 PLVAR = pchplvar
 OTYPE = SELECTED_LINE-PTYPE "XSC
 OBJID = SELECTED_LINE-POBID "XSC
 BEGDA = PCHBEGDA
 ENDDA = PCHENDDA
 MAINTAIN = ' '
 EXCEPTIONS
 NO_AUTHORITY = 1
 NOT_FOUND = 2
 OTHERS = 3.
 CASE SY-SUBRC.
 WHEN 0.
 All right.
 WHEN 1.
 MESSAGE S015.
 Zu Ihren Eingaben konnten keine Daten gefunden werden!
 WHEN 2.
 MESSAGE E000.
 Dazu haben sie keine berechtigung!
 WHEN OTHERS.
 MESSAGE E008.
 Es ist ein unvorhergesehener Fehler aufgetreten.
 ENDCASE. "sy-subrc.
 CLEAR ALV_OUTPUT.
 ENDIF. "IF ALV_OUTPUT-SOBID IS INITIAL.
 CLEAR ALV_OUTPUT-SOBID.
 when 'ICON_S_EVENTS'.
 IF SELECTED_LINE-ICON_S_EVENTS IS INITIAL.
 MESSAGE S027. "Bitte gültige Zeile auswählen
 EXIT.
 ENDIF.
 CLEAR LT_PERS_TAB.
 REFRESH LT_PERS_TAB.
 LT_PERS_TAB-PLVAR = pchPLVAR.
 LT_PERS_TAB-OTYPE = SELECTED_LINE-PTYPE. "XSC
 LT_PERS_TAB-SOBID = SELECTED_LINE-POBID. "XSC
 APPEND LT_PERS_TAB.
 SOBID_QUA = SELECTED_LINE-QUALID.
 CALL FUNCTION 'RHPP_SHOW_SUGGEST_EVENTS'
 EXPORTING
 P_PLVAR = pchPLVAR
 P_SOBID_QUA = SOBID_QUA
 P_PROFCY_REQ = SELECTED_LINE-RATING_REQ
 P_GDATE = sy-datum
 TABLES
 EVENT_TAB =
 PERS_TAB = LT_PERS_TAB.
 endcase.
 CLEAR SELECTED_LINE.
ENDCASE. "case sy-ucomm
CLEAR SY-UCOMM.
ENDFORM. "USER_COMMAND

Pls be more specific in your question. If you want to include an extra field in your alv output, then read the field catalog table you created through "Reuse_alv_fieldcatalog_merge" and then add an extra entry in it giving the details of the field you want to add.. and then call the "resuse_alv_grid_display",
Hope this helps. To be able to help you in a better way, kindly revert with any specific issue.
Reward if helpful,
Karan

To add new record into the table Data Service client

When I am trying to add new record into the table Employeedetails using Data Service client it is giving a sql exception: "java.sql.SQLException: Violation of PRIMARY KEY constraint 'PK__EmployeeDetails__6383C8BA'. Cannot insert duplicate key in object 'EmployeeDetails'. Severity 14, State 1, Procedure 'PC-P41403 null', Line 1."
Code:
DataService ds=DataServiceFactory.newDataService(getInitialContext(),"EmplDetApp","ld:EmplDetAppDataServices/EmployeeDetails");
EmployeeDetailsDocument edoc=EmployeeDetailsDocument.Factory.newInstance();
edoc.addNewEmployeeDetails();
//here I set the primary key value empid
edet.setEmpid("1212");
edet.setEmpname("manu");
ds.submit(edoc);
Error
EmpName 5 java.sql.SQLException: Violation of PRIMARY KEY constraint 'PK__EmployeeDetails__6383C8BA'. Cannot insert duplicate key in object 'EmployeeDetails'. Severity 14, State 1, Procedure 'PC-P41403 null', Line 1
com.bea.ld.dsmediator.DataServiceException: java.sql.SQLException: Violation of PRIMARY KEY constraint 'PK__EmployeeDetails__6383C8BA'. Cannot insert duplicate key in object 'EmployeeDetails'. Severity 14, State 1, Procedure 'PC-P41403 null', Line 1
     at com.bea.ld.dsmediator.update.JDBCAdaptor.save(JDBCAdaptor.java:247)
     at com.bea.ld.dsmediator.update.DataServiceMediator.submit(DataServiceMediator.java:528)
     at com.bea.ld.dsmediator.update.DataServiceMediator.submit(DataServiceMediator.java:245)
     at com.bea.ld.ServerBean.submit(ServerBean.java:529)
     at com.bea.ld.Server_ydm4ie_EOImpl.submit(Server_ydm4ie_EOImpl.java:910)
     at com.bea.ld.Server_ydm4ie_EOImpl_WLSkel.invoke(Unknown Source)
     at weblogic.rmi.internal.BasicServerRef.invoke(BasicServerRef.java:492)
     at weblogic.rmi.cluster.ReplicaAwareServerRef.invoke(ReplicaAwareServerRef.java:108)
     at weblogic.rmi.internal.BasicServerRef$1.run(BasicServerRef.java:435)
     at weblogic.security.acl.internal.AuthenticatedSubject.doAs(AuthenticatedSubject.java:363)
     at weblogic.security.service.SecurityManager.runAs(SecurityManager.java:147)
     at weblogic.rmi.internal.BasicServerRef.handleRequest(BasicServerRef.java:430)
     at weblogic.rmi.internal.BasicExecuteRequest.execute(BasicExecuteRequest.java:35)
     at weblogic.kernel.ExecuteThread.execute(ExecuteThread.java:224)
     at weblogic.kernel.ExecuteThread.run(ExecuteThread.java:183)
     at java.lang.Thread.startThreadFromVM(Unknown Source)
Caused by: java.sql.SQLException: Violation of PRIMARY KEY constraint 'PK__EmployeeDetails__6383C8BA'. Cannot insert duplicate key in object 'EmployeeDetails'. Severity 14, State 1, Procedure 'PC-P41403 null', Line 1
     at weblogic.jdbc.mssqlserver4.TdsStatement.processWarning(TdsStatement.java:1178)
     at weblogic.jdbc.mssqlserver4.TdsStatement.parseMsWarning(TdsStatement.java:1089)
     at weblogic.jdbc.mssqlserver4.TdsStatement.getMoreResults(TdsStatement.java:756)
     at weblogic.jdbc.mssqlserver4.TdsStatement.execute(TdsStatement.java:210)
     at weblogic.jdbc.mssqlserver4.TdsStatement.executeUpdate(TdsStatement.java:97)
     at weblogic.jdbc.mssqlserver4.TdsStatement.executeUpdate(TdsStatement.java:1455)
     at weblogic.jdbc.wrapper.PreparedStatement.executeUpdate(PreparedStatement.java:147)
     at com.bea.ld.dsmediator.update.JDBCAdaptor.save(JDBCAdaptor.java:151)
     ... 15 more
But I am not sure why it is giving an exception as Violation of PRIMARY KEY.
The update method works fine for the same client.
The exception only happens when I am trying to insert a new record.
Please help me to figure out this problem.

If you are absolutely sure that you do not have such a row already in your table, open a case with customer support and reference CR321312. I believe the work-around is to put ld-server-core.jar in your client classpath.
Correction: put ld-server-app.jar in the client classpath
Edited by mreiche at 09/17/2007 3:28 PM

Adding a new value at the beginning of the list

Hi,
I've a list of values which are hard coded in the 'Elements in List' property for a Combo Box. Now, I want to add a new value at the beginning of the list. It doesn't allow me to add one. I have to delete all values and re-enter from the first which includes the new one. Is there any way that I can add a new value at the beginning of the list without having to remove other values.
Thanks in advance.
-- Srinivas

Hi ,
In order to implement the appropriate moves you have to use the key combinations : 1) <shift>+<ctrl>+'<' for deletion of the current list item(where the cursor is located)
2)<shift>+<ctrl>+'>' for appending a blank row in order to add a new element...
Regards,
Simon

FM - Add new value to WRTTP Field

Hi experts,
I would like to add a new value to the table Value types.
Currently this table contains values form 1- 3C.
Could Anybody tell me how I 'd add a new value?.
Thanks in advance,
Greetings,
Nachos

Hi,
I dont think you will be able to add more values to this field from configuration.
If you check the data element and domain associated with this field (LTAK_SPEZI) in SE11. You can see that the value range for the domain has been defined there as A and B only.
So if you want to add a new value you can ask and ABAP/technical consulatnt to add new values to this Domain.
However i am not sure it will be useful (unless you have a specific requirement and want to modify the standard programs) as the field is checked in different program (eg in inculde LL03AF4V , LL03AF7F ) against these fixed values A and B.

Bookmark: default filters lost when adding a new value on the filter

Dear all,
Sometime I need to go back to a bookmark and add extra GL accounts /or GL hierarchy node but I found that is often loses the original selection when I click the transfer button after select the new GL account/or GL hierarchy node. Is there any way to add a new value to the existing filter?
Best Regards


Hi 
1. Open the bookmark 
2. Click on any field from the context menu and create another bookmark 
3. Put additional filters and press the transfer button 
4. The data will be displayed for (old + new) selections 
5. Click on any field from the context menu and create another bookmark. Make a note of it 
 Step 2 should not really be required but I'm assuming that your internet session was expired or similar problem. Please try this and let us know what happens. 
 
Hope it helps. 
Cheers Abhijit 

removed

How can I add new value in a list box in a screen

Hi All ,
 In transaction CRMD_BUS2000120 (CRM Server), I need to add one value to the list box. Already 4 values are coming. How can I add 1 more value.
any suggestion is very appreciated.
Thanks & Regards,
Shekar.

Hi,
Check you have any exits to do that, if there are no exits then you can Copy the program and change the code.
to add the extra value in list box, you just have to append the new line to the internal table which you are passing to VRM_SET_VALUES FM.
some thing like this..
wa_list-key = sy-tabix.
wa_list-text = itab1-vbeln.
Append wa_list to It_list.
v_name = 'P_VBELN'.
call function 'VRM_SET_VALUES'
exporting
 id = v_name
 values = It_list
EXCEPTIONS
 ID_ILLEGAL_NAME = 1
 OTHERS = 2
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
Regads
vijay

How can I add new values only to a column of a spreadsheet?

I have three "while loops" that are executed in parallel, two generate values and the third while loop write the values in a spreadsheet.
The run time of each while loop is different, to synchronize the three while loops I use a "Wait Until Next ms Multiple", but sometimes the same value is kept twice.
I think that a solution would be to add a "Write To Spreadsheet File" in the blocks that generate values, adding a new value in the wished column in each cycle, but I do not know like doing this.
I could keep the values in two arrays and add them in a same spreadsheet in different rows or columns, but I need save values in spreadsheet in each loop and not all values at the end of cycle.
Thanks.
German Garrigos.

I think your three loops solution is probably better than putting different kinds of functions into one loop. Keeping data acquisition/generation separate from file i/o is usually better because the OS can interfere with timing on the file operations.
If you pass the data to the file loop via queues, place the data into shift registers, and only write to the file when you have equal amounts of data from each generator you should be able to keep things synchronized. You can write larger or smaller amounts as necessary to keep pace with the generators. If one of the generators gets way ahead of the other, you have to decide how to deal with that issue.
Writing to the second column of a three column spreadsheet can be tricky. It involves keeping pointers to the portions written and not written, reading the entire file into memory and overwriting the cells where new data goes and rewriting the entire file. This can get very slow for large files. If the file and data structures are simple enough it might be feasible to read only a portion of the file and overwrite it with new data, but that approach has lots of risks to the data.
Wait until next ms multiple is only reliable if the wait interval is sufficiently longer than the execution time (including random OS delays) of each loop. Look at the synchronization functions such as notifiers to synchronize your loops.
If you still have problems, post a simplified version of your program and someone will probably be able to suggest solutions.
Lynn

How can i add two values under the same property?

Hi all,
How can i add two values under the same property name in a
prop list? For example:
[question1: "item1","item2", question2: "item3","item4"]
To be more precise, i am creating a property list and I want
whenever a two values have the same property name to be added int
he list under the same property. For example:
gMyList.AddProp (#""&question&"" & x,
member("input").text)
question is a variable that is updated fromt he user's input.
Now, whenever somethign like this happens:
question = "question1"
member("input").text = "five"
question = "question1"
member("input").text = "six"
I want to output list to be:
[question1: "five","six"] and so on
Any ideas?

Maybe you could make each property a list (so you have a
property list full
of lists), and add multiple values to the list held in a
particular
property?
Cheers
Richard Smith

Add a value from the cloud or internet in a cell

How to add a value from the web,
need to add the value of the conversion of € to $

Is it possible to do it now?
That depends on what the "it" is. You can automate the data "scraping" part but you can't (until AppleScript support is restored) automate the "pushing" of the retrieved data to designated cells in Numbers 3.
Right now the best you can do is have AppleScript arrange the data in a specific format (the tab-separated flavor of "csv" character-separated-values currently works best) on the system clipboard and then you manually paste that where you want it in a Numbers 3.0 table.
If the data is already in table form on a website you can often (but not always) just copy-paste. Where AppleScript can be useful, even now, is where the data you want to retrieve is not already in tabular form.
SG

How can I add new songs to the top (not the bottom) of my playlist in iTunes?

How can I add new songs to the top of my playlist in iTunes?
I thought thats what it did before but now it automatically adds new songs to the bottom of the list.
Not a huge issue but an annoyance.

Go to your Music library
Then, Click Playlist
Then, Click the sort arrow until it points down.

Can I add new job in the existing Job

Hi Gurus,
There is a job which loads data from 4 ODS to respective Infocubes. Now we are adding new infocube and new ODS to the existing layout so can we add 1 more job which loads data from that ODS to corresponding Infocube. If so how??? Can u give me detailed steps to add new job in the existing job...
Thanks in advance

is the previous loads done through a job or a process chains???
Go to RSPC > check what process chains are there and in case if you find one > log you will see when it was last run and stuff.
But if it is a job in SM37, it is a different story, u might have to create a variant of that job and create events to trigger the job in sequence depending on ur scenario..
give more details. like when is that job triggered, if any events used.

Add New value to the special reference indicator on the TO field

Similar Messages

Maybe you are looking for