Add CPUDT field (entry date) into FBL5N

Hello all,
I would like to add field entry date to show up in FBL5N report. Please can you guide ?
Thanks
Regards

Hi Tarik,
I didn't face any issue while adding this field.
Please refer these notes 215798 and 420591.
Rgds
Murali. N

Similar Messages

How to add additional field " SEGMENT" in the FBL5N Report

Hello ,
The Requirement is we need add the field " Segment" in the Report FBL5N.
Could you please advice How to add the field " Segment" to the FBL5N Report.
Thanx & Regards
Ramesh

Hi,
try SAPNET note 373268.
Best regards, Christian

Add input field with date salector inside a TableView

Im trying to build an user interface for my ones step-screen flow command, this user interface needs a TableView and for each row i need an input field with date selector.
Ive been trying to use de DefaultTableViewModel as the model for my TableView. I create a method to build my vector with the data for my DefaultTableViewModel as follow.
 private Vector createData() {
 Vector dataVec = new Vector();
 Vector retVector= new Vector();
 TextView text1 = new TextView("text1");
 dataVec.addElement(text1);
 TextView text2 = new TextView("text2");
 dataVec.addElement(text2);
 InputField date1 = new InputField("date1");
 date1.setType(DataType.DATE);
 dataVec.add(date1);
 retVector.add(dataVec);
 return retVector;
then i use the vector as follow:
Vector data=createData();
 Vector colName = new Vector();
 colName.addElement("Col1");
 colName.addElement("Col2");
 DefaultTableViewModel model = new DefaultTableViewModel(data, colName);
 TableView tabla = new TableView("tabla", model);
But when I Display my user interface the TableView shows a string that I thing is a reference of the Input and the TextView inside my TableView instead of showing the components.
Any Ideas?
Regards,
Orlando Covault

Hi Orlando,
 Check this thread on date selector in tableview.
<a href="https://www.sdn.sap.com/irj/sdn/thread?threadID=198839">Tableview</a>
Hope it helps.
Regards,
Saravanan

How to add a field in data entry section of cat2 transaction

hi friends,
i just want to know how i can add one more field in the data entry section of the cat2 transaction.would appreciate if u help me asap.
thanks,
sakshi

Did you solve this?

Please expose the employee ID field in ADUC in this version, also add a field for data of birth, and present both on the change password form so we can validate a user's identify when they ring up for a reset.

Considering Active Directory is supposed to be all about business, corporations and enterprises, I find it staggering that in 2015 the ADUC console STILL does not expose the Employee ID field in the default UI without having to dig into the attribute editor.
And then only if you browse to the user in their OU, the Attribute Editor tab is missing when you just search for the user. This isn't really helping our organisation. I've just setup the tech preview version of the new server version, and that doesn't expose
it either.
I'm not sure how other organisations handle this (suggestions please?), but when a user rings up the service desk for a password reset, we either have to keep them on the phone while we dig into their user account and look for the Employee ID for them to
then confirm on the phone, or just take it on blind faith that they are who they say there are.
Please for the love of all deities, can you expose the Employee ID field on the main user panel without having to dig into attribute editor. It would also be useful to show this information directly on the reset password dialog box so there's no looking
up required. While you're at it, please can you add a date of birth field (if it isn't already there, I never seen one), and expose this on the main screen for the user, as well as the reset password box. This would give us two pieces of information to verify
the identity of the user on the phone.
All that being said, if anybody has a better way of identifying users on the other end of the phone, I'm all ears.
Thanks in anticipation.

Personally we use the AD selfservice plugin for manageengines service desk plus.

Add formula field in data load rule

Hello,
I am trying to import data in Essbase from a txt file. The txt file contains data from an app with 12 dimensions and I want to load it into an app with 13 dimensions (View dimension for YTD is the extra dimension). Is that possible? I was thinking about adding an extra field in the data load rule which I would import as the sum of all other data fields. How would I do that?
Thank you,
Adina

Hi,
Thank you both for your answers. But what confuses me is this: I created a rules file using a file with 12 columns. I selected the appropriate member for each column in Field Properties, and added the View member in the data load header. Then I get the error message: "This field is also defined in the header definition" for all fields. However, if I don't set the members in Field Properties and just set them in the data load header, I get another error message: "There is an unknown member (or no member) in the field name."
Can you please help?
Thank you!

How to add attachment and export data into MS Access

Let's say that I use PDF file to capture data from users and import the data to MS Access database (via XML). I wonder if there is a way to let user add attachments in Acrobat Reader and when the data is exported, the attachments are kept separately in a new column in MS Access.

If you are trying to do this with script from within the PDF ...I do not think so. You woudl not be able to get the stream of bits that make up the attachment to be able to write it to the DB.
Paul

Search by entry date?

Hello all,
Is it possible to search all of the entries in a certain account by entry date? I need to find a specific entry that changed the monthly numbers although it was entered more than a few weeks after the books were closed.
Your help is appreciated, thanks!

Hi CeemoJenkins,
Try with t-code S_ALR_87012332 - G/L Account Statements
There is Icon "Dynamic Selections". This icon you can easily identify which is generally located either after "Execute" icon or "Get Variant" icon. These icons are available on top left of the S_ALR_87012332 screen. Click/Select Icon "Dynamic Selections", you will find fields "Entry date" and "posting Date".
Enter the date range for june in Entry date field
Enter the posting date range for May in Posting date field.
You will able to find the entries made in June for May.
You can also find the entry date date and posting date fields in t-code FB03.
You can also get these details from table e.g BKPF. Field names - BKPF-BUDAT, BKPF-CPUDT, BLPF-CPUTM.
Thanks & Regards,
ADI

ME23N purchase order history - add new fields (not in layout)

Hello,
I would like to expand the layout of Purchase order history (ME23N).
I would like to add the field MKPF-BKTXT into the purchase order history for more information.
Who can help? - Thank you. - Dietlinde

Hello,
You might have to enhance the column set of the layout..I am not sure if it could be done.. but that's the way to go.. You might want to confirm this from your technical team.
Good Luck!!

FAGLL03- Entry Date showing blank in the report

Hi Gurus,
We have observed that the field "Entry Date" in the GL report FAGLL03 is not showing entry dates of documents posted . We are using ECC6.0 and CUPDT field is already there in the report FAGLL03.
Need advise how to achieve this? is there any sap note available for the same
Regards,
Vijay

Thanks for your quick responce.
I have one question.
The standard layout of report FAGLL03 is having the field ENTRY DATE.
Still is it require to maintain as special field in customization under below path? to get values(i.e. Entray Dates) in the report.
Path is: SPRO->Financial Accounting (New)->General Ledger Accounting (New)->Master Data->G/L Accounts->Line Items
->Define Special Fields for Line Item Display.
BKPF-CUPDT-Entry Date
Regards
Vijay.
Edited by: Vijaya kumar on Jun 24, 2010 7:19 AM

I would like to add a new card date field to my address Book Contacts. Is this possible? Thanks, Jeff

Hi,
I would like to add a new card date field to my Address Book Contacts. Is there any way to do this? I have a lot of contacts and it helps me remember who I talked to, if I had a new card date field in my contacts.
Thank you,
Jeff

Hi,
I found the applescript below from Michael Bach that works well.
(* Find recently modified entries in the Address Book
Input: a time interval (backwards from today) in the variable "daysBeforeToday"
Output: a string on the clipboard, format: YYYY-MM-DD (tab) Name (return)
Â©2009, Michael Bach, <www.michaelbach.de> *)
set daysBeforeToday to 7 -- <<< change as desired or read from a dialog
tell application "Address Book"
copy (current date) - daysBeforeToday * 24 * minutes * 60 to referenceDate
copy (every person whose (modification date > referenceDate)) to modifiedPersons
set s to ""
repeat with aPerson in modifiedPersons
 set d to ((modification date) of aPerson) -- now change to international format and forget the hours
 set dateString to (year of d as string) & "-" & (my twoDigits((month of d) as number)) & "-" & (my twoDigits(day of d) as string)
 set s to s & dateString & tab & (name of aPerson) & return
end repeat
set the clipboard to s --for pasting into other applications
s -- to view immediately in the script editor
end tell
on twoDigits(aNumber) -- trivial utility for formatting
if aNumber < 10 then return "0" & (aNumber as string)
return (aNumber as string)
end twoDigits
I changed the modification date to creation date.
Thanks for the replies.

How can i add two table data into third internal table see below

hi i insert diffferent table data into different internal table i did try to insert two different internal table data into third internal table by using move
but only single data is coming please help me
i want this two internal table data inot third internal table.
sELECT * FROM J_1IEXCHDR INTO CORRESPONDING FIELDS OF ITAB1 WHERE STATUS = 'P'.
SELECT * FROM J_1IEXCDTL INTO CORRESPONDING FIELDS OF ITAB2 WHERE LIFNR = J_1IEXCHDR-LIFNR.
                         AND DOCYR = J_1IEXCHDR-DOCYR,
                         AND DOCNO = J_1IEXCHDR-DOCNO.
WRITE: / ITAB1-LIFNR,
          ITAB1-DOCNO,
          ITAB1-EXYEAR,
          ITAB1-BUDAT,
          ITAB2-EXBED,
          ITAB2-RDOC,
          ITAB2-ECS.
ENDSELECT.
ENDSELECT.
thank you .

hi
Two add two internal tables data. first we need to create third internal table with all the fields of first two internal tables.
later u move the two internal tables data to third internal table
by looping the internal table which have more records or depending on the requirement and move the corresponding fields of first internal table to the third internal table and use the read statement with condition based on primary key of first itab and get the corresponding data of 2table into 3table.
i am sending the sample code to u.
check it out. i think u will understand how to move.
select vbeln waerk netwr erdat audat kunnr
   into table it_vbeln
   from vbak
   where vbeln in s_vbeln
     and erdat in s_erdat.
if not it_vbeln[] is initial.
select kunnr name1
   into table it_kunnr
   from kna1
   for all entries in it_vbeln
     where kunnr = it_vbeln-kunnr.
endif.
loop at it_vbeln.
clear it_final.
   it_final-vbeln = it_vbeln-vbeln.
   it_final-waerk = it_vbeln-waerk.
   it_final-netwr = it_vbeln-netwr.
   it_final-erdat = it_vbeln-erdat.
   it_final-audat = it_vbeln-audat.
read table it_kunnr with key kunnr = it_vbeln-kunnr.
   it_final-name1 = it_kunnr-name1.
append it_final.
endloop.

Update the data into the ZTABLE fields thru program logic ..?

hi all,
i have ZTABLE1,ZTABLE2,ZTABLE3, and this tables like ALV grids using object methods.
in the same table fields now i wanted to update the data into the ZTABLE fields thru program logic .
could anyone please help me ....
please provide if anyone of have any program logic that would be helpfull to me.
thanks in advance...
srinivas....

Hi Srinivas,
The following statements are used to upload the data into custom tables.
1. Modify
2. Update
3. Insert
if you are using OO ALV, you should enable the 'SAVE' button in the main toolbar. if the user press the save button, then you should upload the data to the custom table.
please find the example code, in this example 'PERFORM F_SAVE_DATA'(here i gave the message only, you write your own logic here) is used to save the data in custom table.
Report Program: ZB_ALVOOPS_TEST
Line:-----
REPORT ZB_ALVOOPS_TEST MESSAGE-ID ZCR_MESSAGES.
Top Include - Global Data Declaration *
INCLUDE ZB_ALVOOPS_TEST_TOP.
SEL Include - Selection Screen *
INCLUDE ZB_ALVOOPS_TEST_SEL.
AT SELECTION SCREEN *
Initialization Event *
INITIALIZATION.
Initialize Screen Number.
PERFORM F_INITIALIZE.
Initialize Field Catalog for ALV Grid.
PERFORM F_INITIALIZE_GRID.
END-OF-SELECTION.
Call Display Screen *
CALL SCREEN 9000.
Event Handler - Class Definition and Implementation *
INCLUDE ZB_ALVOOPS_TEST_CL01.
PBO Event - Module Implementation *
INCLUDE ZB_ALVOOPS_TEST_PBO.
PAI Event - Module Implementation *
INCLUDE ZB_ALVOOPS_TEST_PAI.
Subroutine Include *
INCLUDE ZB_ALVOOPS_TEST_F01.
Include: ZB_ALVOOPS_TEST_TOP
Line:-------
Type Declaration For Internal Tables *
Collection Data
TYPES: BEGIN OF TY_MARA ,
 MATNR TYPE MATNR , " Material
 VPSTA TYPE VPSTA , " Maintenance status of complete material
 MTART TYPE MTART , " Material Type
 MBRSH TYPE MBRSH , " Industry Sector
 MATKL TYPE MATKL , " Material Group
 BISMT TYPE BISMT , " Old material number
 MEINS TYPE MEINS , " Base Unit of Measure
 BSTME TYPE BSTME , " Order unit
 BRGEW TYPE BRGEW , " Gross weight
 MAKTX TYPE MAKTX , " Material Description
 ROWCOLOR TYPE CHAR4 , " Row Color
 END OF TY_MARA .
Flag *
DATA: FG_REFRESH TYPE XFLD , " Used to Refresh ALV
 FG_SAVE TYPE XFLD . " Data Saved Or Not.
Internal Table Declaration *
DATA: IT_MARA TYPE STANDARD TABLE OF TY_MARA , " Internal table for Material
 WA_MARA TYPE TY_MARA . " Workarea for Material
Variable Declaration For General Constants *
CONSTANTS: C_SCREEN_SELECT TYPE SYDYNNR VALUE '9001' , " Selection Screen Number
 C_SCREEN_SELECT_NIL TYPE SYDYNNR VALUE '9002' , " Empty Screen Number
 C_STATUS9000 TYPE CHAR10 VALUE 'STATUS9000' , " PF-Status
 C_TITLEBAR TYPE CHAR4 VALUE '9000' , " Title Bar
 C_ISSUE_CONTAINER TYPE SCRFNAME VALUE 'WORKCONTAINER', " Container Name (Screen Painter)
 C_BUTTON_TYPE TYPE CHAR1 VALUE '3' , " Button Type
 C_EXECUTE TYPE CHAR4 VALUE 'SELE' , " Functions 'SELE' -> Execute
 C_BACK TYPE CHAR4 VALUE 'BACK' , " Functions 'BACK' -> Back to main screen
 C_ENTER TYPE CHAR5 VALUE 'ENTER' , " Functions 'ENTER' -> No Action
 C_SEL01 TYPE CHAR5 VALUE 'SEL01' , " Functions 'SEL01' -> Toggle Function
 C_SAVE TYPE CHAR4 VALUE 'SAVE' , " Functions 'SAVE' -> Save Function
 C_REFRESH TYPE CHAR7 VALUE 'REFRESH' , " Functions 'REFRESH' -> Clear and Fres All objects
 C_ADD_MI TYPE CHAR6 VALUE 'ADD_MI' , " Functions 'ADD_MI' -> Add New Media Issue
 C_TRUE TYPE CHAR1 VALUE 'X' , " Set X value
 C_REQUIRED TYPE CHAR1 VALUE '1' , " Un-Confirmed Qty field obligatory or not.
 C_INPUT TYPE CHAR1 VALUE '0' , " Reason field should not be input.
 C_ALV_SAVE TYPE CHAR1 VALUE 'A' , " ALV
 C_ERROR TYPE CHAR1 VALUE 'E' , " Error Type
 C_SIGN TYPE CHAR1 VALUE 'I' , " Sign
 C_OPTION TYPE CHAR2 VALUE 'EQ' , " Option.
 C_COMMIT_WAIT TYPE CHAR1 VALUE '5' , " Waiting to update in DB
 C_TABNAME TYPE CHAR1 VALUE '1' , " Parameter (ALV)
 C_CANCEL TYPE CHAR1 VALUE 'N' , " Cancel
 C_YES TYPE CHAR1 VALUE 'J' . " Yes.
Variable Declaration For Container and ALV Grid *
DATA: OBJ_CUST_CONTAINER TYPE REF TO CL_GUI_CUSTOM_CONTAINER , " Container Class
 OBJ_CUST_GRID TYPE REF TO CL_GUI_ALV_GRID . " ALV Grid Class
Field Catalog Declaration For Container and ALV Grid *
DATA: IT_FIELDCAT TYPE LVC_T_FCAT , " Field Catalog
 IT_EXCLUDE TYPE UI_FUNCTIONS , " Standard Function Exclude from ALV
 WA_FIELDCAT TYPE LVC_S_FCAT , " For Field Catalog
 WA_LAYOUT TYPE LVC_S_LAYO . " ALV Layout
Global Variable Declaration *
DATA: OK_CODE TYPE SY-UCOMM , " OK CODE ( Screen Attribute Don't Change the var.name)
 G_SAVE_CODE TYPE SY-UCOMM , " OK CODE
 G_ANSWER TYPE CHAR1 , " OK or Cancel.
 G_SELECTION_DYNNR TYPE SYDYNNR , " Screen Number
 G_ERROR_TEXT TYPE CHAR128 , " Error Text
 G_SELECTION_TOGGLE_TEXT TYPE CHAR50 , " Toggle Text, Value: Hide Selection, Show Selection
 G_MATNR TYPE MATNR , " Material
 G_SMATNR TYPE MATNR , " Material
 G_SMTART TYPE MTART . " Material Type
Include: ZB_ALVOOPS_TEST_SEL
Line:-------
Selection Screen
SELECTION-SCREEN BEGIN OF SCREEN 9001 AS SUBSCREEN .
SELECTION-SCREEN BEGIN OF BLOCK SELECTION WITH FRAME TITLE TEXT-001 .
SELECT-OPTIONS: S_MATNR FOR G_SMATNR , " Material
 S_MTART FOR G_SMTART . " Material Type
SELECTION-SCREEN END OF BLOCK SELECTION .
SELECTION-SCREEN END OF SCREEN 9001 .
Empty Selection
SELECTION-SCREEN BEGIN OF SCREEN 9002 AS SUBSCREEN .
SELECTION-SCREEN BEGIN OF BLOCK SELECTION_NIL WITH FRAME TITLE TEXT-002 .
Nil
SELECTION-SCREEN END OF BLOCK SELECTION_NIL .
SELECTION-SCREEN END OF SCREEN 9002 .
Include: ZB_ALVOOPS_TEST_CL01
Line:-------
CLASS lcl_event_handler DEFINITION *
Event Handler Class Definition *
CLASS LCL_EVENT_HANDLER DEFINITION.
PUBLIC SECTION.
 METHODS:
 HANDLER_TOOLBAR FOR EVENT TOOLBAR OF CL_GUI_ALV_GRID
 IMPORTING E_OBJECT E_INTERACTIVE ,
 HANDLER_USER_COMMAND FOR EVENT USER_COMMAND OF CL_GUI_ALV_GRID
 IMPORTING E_UCOMM .
ENDCLASS. "lcl_event_handler DEFINITION
CLASS lcl_event_handler IMPLEMENTATION *
Event Class Implementation. *
CLASS LCL_EVENT_HANDLER IMPLEMENTATION.
Toolbar -----Create 'Add Issue' button
METHOD HANDLER_TOOLBAR.
 DATA: L_WA_TOOLBAR TYPE STB_BUTTON. " Toolbar
 CLEAR: L_WA_TOOLBAR.
Button Type
 L_WA_TOOLBAR-BUTN_TYPE = C_BUTTON_TYPE . " 3.
 APPEND L_WA_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
Add Issue Button.
 CLEAR: L_WA_TOOLBAR.
 L_WA_TOOLBAR-FUNCTION = 'ADD_MI' . " 'ADD_MI' .
 L_WA_TOOLBAR-ICON = 'ICON_CREATE'.
 L_WA_TOOLBAR-QUICKINFO = 'CREATE' . " 'Add Issue'.
 L_WA_TOOLBAR-TEXT = 'CREATE' . " 'Add Issue'.
 L_WA_TOOLBAR-DISABLED = ''.
 APPEND L_WA_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
 CLEAR: L_WA_TOOLBAR.
ENDMETHOD. "handler_toolbar
User Actions Events-- Handle 'Add Issue' Button Click.
METHOD HANDLER_USER_COMMAND.
 CASE E_UCOMM.
Add Issue Button.
 WHEN C_ADD_MI.
 IF NOT G_MATNR IS INITIAL.
 FG_REFRESH = C_TRUE.
 PERFORM F_ADD_MEDIAISSUE.
 ENDIF.
 ENDCASE.
Refresh Control
 CALL METHOD CL_GUI_CFW=>FLUSH
 EXCEPTIONS
 CNTL_SYSTEM_ERROR = 1
 CNTL_ERROR = 2
 OTHERS = 3.
Handle Exceptions
 IF SY-SUBRC <> 0.
 CASE SY-SUBRC.
 WHEN 1.
 G_ERROR_TEXT = TEXT-026. " 'Control System Error'.
 WHEN 2.
 G_ERROR_TEXT = TEXT-027. " 'Control CL_GUI_CFW Has Raised Error'.
 ENDCASE.
 MESSAGE G_ERROR_TEXT TYPE 'E'.
 ENDIF.
Refresh Alv Grid.
 PERFORM F_REFRESH_GRID.
ENDMETHOD. "handler_user_command
ENDCLASS. "lcl_event_handler IMPLEMENTATION
Object Ref. Event Class.
DATA: OBJ_EVENT_HANDLER TYPE REF TO LCL_EVENT_HANDLER.
Include: ZB_ALVOOPS_TEST_PBO
Line:----
Module STATUS_9000 OUTPUT *
Set PF-Status *
MODULE STATUS_9000 OUTPUT.
PF Status
SET PF-STATUS C_STATUS9000 .
SET TITLEBAR C_TITLEBAR .
ENDMODULE. " STATUS_9000 OUTPUT
Module Create_Alvgrid OUTPUT *
Create Or Refresh ALV Grid *
MODULE CREATE_ALVGRID OUTPUT.
PERFORM F_PROCESS_ALV .
PERFORM F_REFRESH_GRID.
ENDMODULE. " create_alvgrid OUTPUT
Include: ZB_ALVOOPS_TEST_PAI
Line:----
Module exit_command INPUT *
Exit Command ( Cancel and Exit ) *
MODULE EXIT_COMMAND INPUT.
LEAVE PROGRAM.
ENDMODULE. " exit_command INPUT
Module user_command_9000 INPUT *
User Command - Process toolbar Events *
MODULE USER_COMMAND_9000 INPUT.
Take an Action based on user Input
G_SAVE_CODE = OK_CODE.
CLEAR OK_CODE.
CASE G_SAVE_CODE.
Back
 WHEN C_BACK .
Raise the Confirmation Message When User not saved the data.
 IF FG_SAVE = C_YES.
 PERFORM F_EXITCHECK CHANGING G_ANSWER .
 IF G_ANSWER = C_YES.
 PERFORM F_SAVE_DATA.
 ELSE.
 CLEAR G_SAVE_CODE.
 ENDIF.
 CLEAR: FG_SAVE.
 ENDIF.
 LEAVE PROGRAM.
Enter
 WHEN C_ENTER.
Execute ( F8 )
 WHEN C_EXECUTE .
 IF IT_MARA IS INITIAL.
 PERFORM F_SELECTMATERIAL.
 ENDIF.
Toggle Button
 WHEN C_SEL01.
 PERFORM F_TOGGLE_SELECTION_SCREEN. " USING ok_code.
SAVE ( CTRL+S )
 WHEN C_SAVE.
 IF NOT G_MATNR IS INITIAL.
 PERFORM F_SAVE_DATA.
 CLEAR: G_MATNR.
 ENDIF.
New Entry ( CTRL+F1 )
 WHEN C_REFRESH.
 PERFORM F_REFRESH_DATA.
ENDCASE.
ENDMODULE. " user_command_9000 INPUT
Include: ZB_ALVOOPS_TEST_F01
Line:----
Form f_toggle_selection_screen *
Toggle Function - Hide Selection / Show Selection *
FORM F_TOGGLE_SELECTION_SCREEN.
Toggle Function
IF G_SELECTION_DYNNR = C_SCREEN_SELECT.
 G_SELECTION_DYNNR = C_SCREEN_SELECT_NIL.
 G_SELECTION_TOGGLE_TEXT = TEXT-902.
ELSE.
 G_SELECTION_DYNNR = C_SCREEN_SELECT.
 G_SELECTION_TOGGLE_TEXT = TEXT-901.
ENDIF.
ENDFORM. " f_toggle_selection_screen
Form f_initialize
Initialize Screen Number and Text
FORM F_INITIALIZE .
Initialize Screen Number
G_SELECTION_DYNNR = C_SCREEN_SELECT.
G_SELECTION_TOGGLE_TEXT = TEXT-901.
ENDFORM. "f_initialize
Form f_selectmaterial *
FORM F_SELECTMATERIAL .
Select the data from Mara Table
SELECT A~MATNR
 A~VPSTA
 A~MTART
 A~MBRSH
 A~MATKL
 A~BISMT
 A~MEINS
 A~BSTME
 A~BRGEW
 B~MAKTX
 INTO TABLE IT_MARA
 FROM MARA AS A INNER JOIN MAKT AS B ON AMATNR = BMATNR
 WHERE A~MATNR IN S_MATNR
 AND A~MTART IN S_MTART
 AND B~SPRAS = 'EN'.
IF SY-SUBRC = 0.
 FG_REFRESH = C_TRUE.
 FG_SAVE = C_YES .
 G_MATNR = C_TRUE.
 LOOP AT IT_MARA INTO WA_MARA WHERE BRGEW >= 200.
 WA_MARA-ROWCOLOR = 'C310'.
 MODIFY IT_MARA FROM WA_MARA.
 ENDLOOP.
ELSE.
 MESSAGE 'No data Found' TYPE 'E'.
ENDIF.
ENDFORM. " f_selectmaterial
Form f_initialize_grid *
Initialize Field Catalog. *
FORM F_INITIALIZE_GRID .
field catalog
PERFORM F_ATTRFCAT USING :
 'MATNR' '1' '0' TEXT-005 '15' '0' 'X' ' ' ' ',
 'VPSTA' '1' '1' TEXT-006 '15' '0' 'X' ' ' ' ',
 'MTART' '1' '2' TEXT-007 '15' '0' ' ' ' ' ' ',
 'MBRSH' '1' '3' TEXT-008 '15' '0' ' ' ' ' ' ',
 'MATKL' '1' '4' TEXT-009 '15' '0' ' ' 'X' ' ',
 'BISMT' '1' '5' TEXT-010 '15' '0' ' ' ' ' ' ',
 'MEINS' '1' '6' TEXT-011 '15' '0' ' ' ' ' ' ',
 'BSTME' '1' '7' TEXT-012 '15' '0' ' ' ' ' ' ',
 'MAKTX' '1' '8' TEXT-013 '15' '0' ' ' ' ' 'C711',
 'BRGEW' '1' '9' TEXT-014 '15' '0' ' ' ' ' ' '.
Set Editable Fields in ALV.
PERFORM F_SETEDIT_FIELDS CHANGING IT_FIELDCAT.
ENDFORM. "f_initialize_grid
Form f_setedit_fields *
Set Editable Fields in ALV *
C_IT_FIELDCAT <-- Field Catalog *
FORM F_SETEDIT_FIELDS CHANGING C_IT_FIELDCAT TYPE LVC_T_FCAT.
Local Variable Declaration.
DATA: LS_FIELDCAT LIKE LINE OF C_IT_FIELDCAT. " Field Catalog
Create Editable Fields.
LOOP AT C_IT_FIELDCAT INTO LS_FIELDCAT.
 CASE LS_FIELDCAT-FIELDNAME.
 WHEN 'BRGEW'.
 LS_FIELDCAT-EDIT = C_TRUE.
 WHEN 'MAKTX'.
 LS_FIELDCAT-EDIT = C_TRUE.
 ENDCASE.
 MODIFY C_IT_FIELDCAT FROM LS_FIELDCAT.
ENDLOOP.
ENDFORM. " f_setedit_fields
Form f_attrfcat *
Update Field Catalog Internal Table *
U_FIELDNAME --> Field Name *
U_ROW_POS --> Row Position *
U_COL_POS --> Column Position *
U_SELTEXT_L --> Display Column Heading *
U_OUTPUTLEN --> Heading Output Length *
U_DECIMALS_OUT --> Number of decimal places in output *
U_KEY --> Key in ALV Display *
U_FIX --> Existence of fixed values *
FORM F_ATTRFCAT USING
 U_FIELDNAME TYPE SLIS_FIELDNAME
 U_ROW_POS TYPE SYCUROW
 U_COL_POS TYPE SYCUCOL
 U_SELTEXT_L TYPE SCRTEXT_L
 U_OUTPUTLEN TYPE OUTPUTLEN
 U_DECIMALS_OUT TYPE CHAR1
 U_KEY TYPE CHAR1
 U_FIX TYPE VALEXI
 U_COL_COLOR TYPE LVC_EMPHSZ.
Update field catalog.
WA_FIELDCAT-FIELDNAME = U_FIELDNAME.
WA_FIELDCAT-ROW_POS = U_ROW_POS.
WA_FIELDCAT-COL_POS = U_COL_POS.
WA_FIELDCAT-COLTEXT = U_SELTEXT_L.
WA_FIELDCAT-SELTEXT = U_SELTEXT_L.
WA_FIELDCAT-OUTPUTLEN = U_OUTPUTLEN.
WA_FIELDCAT-DECIMALS_O = U_DECIMALS_OUT.
WA_FIELDCAT-KEY = U_KEY.
WA_FIELDCAT-VALEXI = U_FIX.
WA_FIELDCAT-EMPHASIZE = U_COL_COLOR.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
CLEAR WA_FIELDCAT.
ENDFORM. "ATTR_FCAT
Form f_refresh_data *
Clear All the objects used in the program ( Data Related ) *
FORM F_REFRESH_DATA .
Clear All the Objects Used in Our Program.
CLEAR: S_MATNR ,
 S_MTART ,
 IT_MARA ,
 OK_CODE ,
 FG_REFRESH ,
 FG_SAVE ,
 G_SAVE_CODE ,
 G_MATNR .
FREE: S_MATNR ,
 S_MTART ,
 IT_MARA ,
 OK_CODE ,
 FG_REFRESH ,
 FG_SAVE ,
 G_SAVE_CODE ,
 G_MATNR .
Refresh Alv.
FG_REFRESH = C_TRUE.
ENDFORM. " f_refresh_data
Form f_process_alv *
1. Create Custom Container *
2. Create ALV Grid *
3. Exclude Standard Functions *
4. Display the ALV *
5. Register the Events. *
FORM F_PROCESS_ALV .
Display ALV
Custom Container
IF OBJ_CUST_CONTAINER IS INITIAL.
 CREATE OBJECT OBJ_CUST_CONTAINER
 EXPORTING
 CONTAINER_NAME = C_ISSUE_CONTAINER.
ALV Grid
 IF OBJ_CUST_GRID IS INITIAL.
 CREATE OBJECT OBJ_CUST_GRID
 EXPORTING
 I_PARENT = OBJ_CUST_CONTAINER.
 ENDIF.
Exclude Standard Functions
 PERFORM F_EXCLUDETOOLBAR USING OBJ_CUST_GRID
 CHANGING IT_EXCLUDE.
Layout.
 WA_LAYOUT-CWIDTH_OPT = C_TRUE.
 WA_LAYOUT-INFO_FNAME = 'ROWCOLOR'.
ALV Grid Display
 CALL METHOD OBJ_CUST_GRID->SET_TABLE_FOR_FIRST_DISPLAY
 EXPORTING
 IS_LAYOUT = WA_LAYOUT
 IT_TOOLBAR_EXCLUDING = IT_EXCLUDE
 I_SAVE = C_ALV_SAVE
 CHANGING
 IT_FIELDCATALOG = IT_FIELDCAT[]
 IT_OUTTAB = IT_MARA.
ENDIF.
Register Editable ALV Events
CALL METHOD OBJ_CUST_GRID->REGISTER_EDIT_EVENT
 EXPORTING
 I_EVENT_ID = CL_GUI_ALV_GRID=>MC_EVT_MODIFIED
 EXCEPTIONS
 ERROR = 1
 OTHERS = 2.
*Create Object for Custom Event Handler Class if the ref. object is
*initial.
IF OBJ_EVENT_HANDLER IS INITIAL.
 CREATE OBJECT OBJ_EVENT_HANDLER.
ENDIF.
Register Events
SET HANDLER: OBJ_EVENT_HANDLER->HANDLER_TOOLBAR FOR
OBJ_CUST_GRID,
 OBJ_EVENT_HANDLER->HANDLER_USER_COMMAND FOR
 OBJ_CUST_GRID.
Set Toolbar
CALL METHOD OBJ_CUST_GRID->SET_TOOLBAR_INTERACTIVE.
ENDFORM. " f_process_alv
Form f_excludetoolbar *
Exclude Standard Functions from ALV *
U_OBJ_CUST_GRID --> Instant for CL_GUI_ALV_GRID *
C_IT_EXCLUDE <-- Internal table for Exclude *
FORM F_EXCLUDETOOLBAR USING U_OBJ_CUST_GRID TYPE REF TO CL_GUI_ALV_GRID
 CHANGING C_IT_EXCLUDE TYPE UI_FUNCTIONS.
Exclude Standard Functions
CLEAR: C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_CHECK TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_REFRESH TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_COPY TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_COPY_ROW TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_CUT TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_DELETE_ROW TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_APPEND_ROW TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_INSERT_ROW TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_MOVE_ROW TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_PASTE TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_PASTE_NEW_ROW TO C_IT_EXCLUDE.
APPEND U_OBJ_CUST_GRID->MC_FC_LOC_UNDO TO C_IT_EXCLUDE.
ENDFORM. " f_excludetoolbar
Form f_create_returnrequest *
Create Return Request based on the Work container ( ALV Grid Data) *
FORM F_CREATE_RETURNREQUEST.
Message to save
ENDFORM. " f_create_returnrequest
Form f_add_mediaissue *
Create New Media Issue if the user click 'ADD ISSUE' Button. *
1. Get the Input From User *
2. Get Total Delivery and Return Quantity *
3. Append to Final internal table *
FORM F_ADD_MEDIAISSUE .
Local Variable Declaration.
MESSAGE 'Add Button Clicked' TYPE 'I'.
ENDFORM. " f_add_mediaissue
Form f_refresh_grid *
Refresh ALV Grid *
FORM F_REFRESH_GRID .
Refresh ALV Grid.
IF FG_REFRESH IS NOT INITIAL.
 CALL METHOD OBJ_CUST_GRID->REFRESH_TABLE_DISPLAY.
 CLEAR: FG_REFRESH.
ENDIF.
ENDFORM. " f_refresh_grid
Form f_getcollectissue *
FORM F_GETCOLLECTISSUE .
Collection Plan Data
ENDFORM. " f_getcollectissue
Form f_perpare_final *
FORM F_PERPARE_FINAL .
Perpare Final Internal table
ENDFORM. " f_perpare_final
Form f_validate_data *
FORM F_VALIDATE_DATA.
Message if any data validation.
ENDFORM. " f_validate_data
Form f_modify_final *
Update Actual Delivery Qty and Return Qty in Final Internal table *
Form f_save_data *
Save the Data When User Click 'Save' Button *
FORM F_SAVE_DATA .
Message
MESSAGE 'Save Button Clicked' TYPE 'I'.
ENDFORM. "f_save_data
Form f_exitcheck *
When User Exit from the Transaction then Raise Confirmation message*
C_ANSWER <-- OK or Cancel. *
FORM F_EXITCHECK CHANGING C_ANSWER TYPE CHAR1.
Security Check.
C_ANSWER = C_CANCEL.
CALL FUNCTION 'POPUP_TO_CONFIRM_DATA_LOSS'
 EXPORTING
 TITEL = TEXT-039
 IMPORTING
 ANSWER = C_ANSWER.
ENDFORM. "f_exitcheck
Screen Numer : 9000
Line:------
PROCESS BEFORE OUTPUT.
MODULE STATUS_9000.
CALL SUBSCREEN: SELECTIONSCREEN INCLUDING SY-CPROG G_SELECTION_DYNNR.
MODULE CREATE_ALVGRID.
PROCESS AFTER INPUT.
MODULE EXIT_COMMAND AT EXIT-COMMAND.
CALL SUBSCREEN: SELECTIONSCREEN.
MODULE USER_COMMAND_9000.
pls reward if it is useful

How to add data into a List box

CS3 SDk:Windows Hi all, I am trying to add data into a basic List box in CS3?? // .fr GenericPanelWidget ( // CControlView properties kInvalidWidgetID, // widget ID kPMRsrcID_None, // PMRsrc ID kBindNone, // frame binding Frame(0,0,250,90) // left, top, right, bottom kTrue, // visible kTrue, // enabled // GroupPanelAttributes properties "", // header widget ID { WidgetListBoxWidgetN ( kWFPListBoxWidgetID, kSysListBoxPMRsrcId, // WidgetId,RsrcId kBindAll, // Frame binding Frame(0,0,250,90) // Frame kTrue, kTrue, // Visible, Enabled 1,0, // List dimensions 19, // Cell height 1, // Border width kFalse,kTrue, // Has scroll bar (h,v) kTrue, // Multiselection kTrue, // List items can be reordered kTrue, // Draggable to new/delete buttons kFalse, // Drag/Dropable to other windows kTrue, // An item always has to be selected kFalse,// Don't notify on reselect kFalse, { } ), }, ), //-------ID.h-------- DECLARE_PMID(kWidgetIDSpace, kWFPListBoxWidgetID, kWFPPrefix + 2) //observer.cpp-----------WFPDialogObserver::Update //get currently selected/active widget WidgetID theSelectedWidget = controlView->GetWidgetID(); // ist it the text edit field? if (theSelectedWidget == kWFPInsertButtonWidgetID && theChange == kTrueStateMessage) { IControlView* listBox = panelControlData->FindWidget(kWFPListBoxWidgetID); InterfacePtr<IListControlData> listControlData(listBox, UseDefaultIID()); //Insert the string into listbox PMString strText = dialogCtrl->GetTextControlData(kWFPTextEditBoxWidgetID); // obviously there can't be a translation for text entered by user strText.SetTranslatable(kFalse); listControlData->Add(strText,kWFPTextEditBoxWidgetID); dialogCtrl->SetTextControlData(kWFPTextEditBoxWidgetID, ""); break; I am not able to Add items into list box. I tried based on Discussion http://www.adobeforums.com/webx/.3bc43877 but not able to locate SDKListBoxHelper file .it is not available in SDK. Please , Tell me Where I am going wrong. Thanks, Adil

resource VSPDialogWidget (kSDKDefDialogResourceID + index_enUS)
 __FILE__,
 __LINE__,
 kVSPDialogWidgetID, // WidgetID
 kPMRsrcID_None, // RsrcID
 kBindNone, // Binding
 Frame(5,0,491,266) // Frame (l,t,r,b)
 kTrue,
 kTrue, // Visible, Enabled
 kVSPDialogTitleKey, // Dialog name
 DefaultButtonWidget
 kOKButtonWidgetID, // WidgetID
 kSysButtonPMRsrcId, // RsrcID
 kBindNone, // Binding
 Frame(9,234,89,254) // Frame (l,t,r,b)
 kTrue,
 kTrue, // Visible, Enabled
 kSDKDefOKButtonApplicationKey, // Button text
 CancelButtonWidget
 kCancelButton_WidgetID, // WidgetID
 kSysButtonPMRsrcId, // RsrcID
 kBindNone, // Binding
 Frame(394,234,474,254) // Frame (l,t,r,b)
 kTrue,
 kTrue, // Visible, Enabled
 kSDKDefCancelButtonApplicationKey, // Button name
 kTrue, // Change to Reset on option-click.
 WLBCmpListBox //Tree view
 kWLBCmpListBoxWidgetID, kPMRsrcID_None, // WidgetId, RsrcId
 kBindAll, // Frame binding
 Frame(299,49,475,170) // Frame
 kTrue, kTrue, // Visible, Enabled
 kTrue, // EraseBeforeDraw
 kInterfacePaletteFill, // InterfaceColor
 kHideRootNode | kDrawEndLine, // Options. Display root node
 kFalse, // Use H Scroll bar
 kTrue, // Use V scroll bar
 20, // fVScrollButtonIncrement
 20, // fVThumbScrollIncrement
 0, // fHScrollButtonIncrement
 0, // fHThumbScrollIncrement
 2, // Items selectable, 0 = No Selection, 1 = Single Selection, 2 = Multiple Selection
 kFalse, // Allow children from multiple parents to be selected
 kTrue, // Allow discontiguous selection
 //The tree view is dynamically created.
// added to support the list elements in the list box
resource LocaleIndex (kWLBCmpListElementRsrcID)
 kViewRsrcType,
 kWildFS, k_Wild, kWLBCmpListElementRsrcID + index_enUS
resource WLBCmpNodeWidget (kWLBCmpListElementRsrcID + index_enUS)
 __FILE__, __LINE__,
 kWLBCmpListParentWidgetId, kPMRsrcID_None, // WidgetId, RsrcId
 kBindLeft | kBindRight, // Frame binding
 Frame(0, 0, 194, 20), // Frame
 kTrue, kTrue, // Visible, Enabled
 "", // Panel name
 // Just a info-static text widget with about-box text view to get white bg.
 WLBCmpTextWidget
 kWLBCmpTextWidgetID, kPMRsrcID_None, // WidgetId, RsrcId
 kBindLeft | kBindRight, // Frame binding
 Frame(45,1,194,18) // Frame
 kTrue, kTrue, kAlignLeft,kEllipsizeEnd // Visible, Enabled, Ellipsize style
 "", // Initial text
 0, // Associated widget for focus
 kPaletteWindowSystemScriptFontId, // default font
 kPaletteWindowSystemScriptHiliteFontId, // for highlight state.
If you still got problems, post you email here - I'll send you the complete project/code then.
-Marc

How to add appointment date into CRMD_ORDER TCODE

Hello i am trying to add 3 dates into the appointment area of the TCODE CRMD_ORDER,i am making this action into de BADI ORDER SAVE, and depents of a specific date of the TCODE i make the 3 differs dates after that ,i fill the input fields tables and of course the appointment tables too, after of that i call the function module CRM_ORDER_MAINTAIN and i send the both table to the this Fucntion module, and when go out of the ORDER_SAVE BADI i am expecting to have the result into the CRMD_ORDER TCODE, but i coudn´t save these dates. (in this example i send only one date)
InputFields
ls_input_field-ref_handle = lv_handle_h.
ls_input_field-ref_guid = iv_guid. "Guid del Documento
ls_input_field-ref_kind = 'A'.
ls_input_field-objectname = 'APPOINTMENT'.
ls_input_field-logical_key = 'ZV01'. "Indica que la fecha es Presentacion de proyecto
ls_fielname-fieldname = 'DOMINANT'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'DURATION'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'RULE_NAME'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'SHOW_LOCAL'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'TIMESTAMP_FROM'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'TIMESTAMP_TO'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'TIMEZONE_FROM'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'TIMEZONE_TO'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
ls_fielname-fieldname = 'TIME_UNIT'.
ls_fielname-changeable = 'X'.
INSERT ls_fielname INTO TABLE ls_input_field-field_names.
INSERT ls_input_field INTO TABLE et_input_fields.
appointment table
wa_appointment-ref_guid = iv_guid.
wa_appointment-ref_kind = 'A'.
wa_appointment-timezone_from = 'CST'.
wa_appointment-timestamp_to = '0'.
wa_appointment-timezone_to = 'CST'.
wa_appointment-appt_type = 'ZV01'.
wa_appointment-timestamp_from = lv_timestamp.
APPEND wa_appointment TO it_appointment.
CALL FUNCTION 'CRM_ORDER_MAINTAIN'
EXPORTING
it_appointment = it_appointment
CHANGING
ct_input_fields = it_input_fields
EXCEPTIONS
error_occurred = 1
document_locked = 2
no_change_allowed = 3
no_authority = 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.
So does anybody have any idea how to make this?
Thanks a lot for you help.

You can modify the following coding which is working fine for me...
ls_field_names-fieldname = 'DOMINANT'.
INSERT ls_field_names INTO TABLE lt_field_names.
ls_field_names-fieldname = 'DURATION'.
INSERT ls_field_names INTO TABLE lt_field_names.
ls_field_names-fieldname = 'RULE_NAME'.
INSERT ls_field_names INTO TABLE lt_field_names.
ls_field_names-fieldname = 'SHOW_LOCAL'.
INSERT ls_field_names INTO TABLE lt_field_names.
ls_field_names-fieldname = 'TIMESTAMP_FROM'.
INSERT ls_field_names INTO TABLE lt_field_names.
ls_field_names-fieldname = 'TIMEZONE_FROM'.
INSERT ls_field_names INTO TABLE lt_field_names.
ls_field_names-fieldname = 'TIME_UNIT'.
INSERT ls_field_names INTO TABLE lt_field_names.
 CLEAR lt_appointment.
 ls_appointment-ref_handle = '0000000001'.
 ls_appointment-appt_type = 'REQ_DLV_DATE'.
 ls_appointment-ref_kind = 'A'.
 ls_appointment-ref_guid = <lf_order_data>-guid.
 ls_appointment-timestamp_from = lv_timestamp.
 ls_appointment-timezone_from = sy-zonlo.
 APPEND ls_appointment TO lt_appointment.
 CLEAR ls_input_fields.
 ls_input_fields-ref_guid = <lf_order_data>-guid.
 ls_input_fields-ref_kind = 'A'.
 ls_input_fields-ref_handle = '0000000001'.
 ls_input_fields-objectname = 'APPOINTMENT'.
 ls_input_fields-logical_key = 'REQ_DLV_DATE'.
 ls_input_fields-field_names = lt_field_names.
 INSERT ls_input_fields INTO TABLE lt_input_fields.

Add CPUDT field (entry date) into FBL5N

Similar Messages

Maybe you are looking for