Values in the table

Dear experts,
I had created a table in development client and inserted the values when we transport the table to the production system ,wheather the table along with values are be trasported or it will transport only table without values
thanks in advance
karthik

Hi,
You can transport the table contents only from customizing client but not from development client. After creating a table
Go to customization client --> use T-Code SM30 (Table maintenance), enter table name --> create new entries there --> save the records --> system will ask you for a new CR --> Create a new CR for table contents then an object with Program ID R3T3 and Object type TABU and table name will be added automatically in your CR. This will not work in case of development client.
Note: maintenance generator should be created choosing Recording routine as Standard recording routine.
While transporting, table should be transported from development client then the table contents should be transported from customizing client.
Cheers,
Venkat.

Similar Messages

How to display the values from the table in the screen

Hi,
I have created a screen where i will enter the values for the field treshold amount and desc and if i press update button .it will update the new values by overriting the existing values .
Now i have got requirement i need to create a button show which will display the existing value from the table. always there will be only one entry...in this table
Please can one give me idea...to do this
or sample code...thanks in advance
regards
paveeeeee

Define a function code 'SHOW' for your button. In your PAI module, when you check for various sy-ucomms, check for 'SHOW' also.
Your code will be like this:
Case sy-ucomm.
when 'SHOW'.
perform show_details.
endcase.
In the perform, you can fetch the data from the table and put it in global variables. In the PBO, move the data from the global variables to the screen fields so that they get displayed on the screen.
Hope this helps. Reward points for useful answers.
Regards
Nithya

How to display(binding) values in the table from more than one node?

Hi,
I have two nodes (TRIPS & AMOUNTS)in the context. How to bind these values into the table control?
When i bind second one, first one is getting replaced.

Hi Mog,
Of course it is possible to create a table from attributes of more than one node, and in some cases this is still necessary, but you have to do this the hard (manual) way.
If you have a table control, have a look at the properties and the elements belonging to it.
First of all, there is the property "dataSource", which binds to a multiple node (let's name it TableRootNode). This means that for each element of THIS node, one row is created. In each row the data of exactly one element of this TableRootNode is displayed.
Then you have columns in this table. Inside of the columns there is a header and an editor. The editor is the interesting part.
Normally the primary property of this editor is bound to an attribute of the TableRootNode. Then everything works as expected. If it binds to an attribute of a subnode (SUB) of TableRootNode, then in row i the data of the subnode of the i-th element of TableRootNode is displayed. There is no need for SUB to be a multiple node, but it must not be a singleton.
If you bind a property of the editor to an attribute, which does not lie in the subtree of TableRootNode, then you will see the same value in each row.
Now it depends on the structure of your context. Take the node, which is relevant for the change in each row (I assume it is TRIPS) and bind the table to the node as you are used to. Then for each additional column, you have to create a new column in the tree, create a new header element with a title and a new editor (e.g. textview or inputfield) and then bind the right property of the editor to the corresponding attribute in node AMOUNTS).
If these 2 nodes do not have parent-child-relationship, the tip to create a new node, which consists of the attributes of both nodes is the only solution.
Ciao, Regina

Old value in the table SETLEAF

Dear All,
Normally we take back up on every weekend. Due to some wrong transport request in production in last weekend, all the value in the table - SETLEAF has been overwriten. Is there any way in which we can read the value entry in the table -SETLEAF from the back up system befor the last week end ?
Please help immideate basis.
Regards,
sp sahu

Hello,
I think you will have to build another database to read the value from specific table.
Restore system to another server and check the table valaues.
Good Luck,
Atil

Exit in DP90 and how to get value in the table

Hi all,
My requirement is when execute DP90(create billing request), the amount in the table must be validated when I click the "Billing Request" button.
Please tell me the user_exit, BADI or any other enhancement which can I use to validate the amount in that transaction.
And how to get the amount(amount to be Billed, Amount rejected) value in the table after that??
Thanx

Hi Teja,
Check the BADI (SE18) - BADI_SD_DPBP - Extensions in SD for DP90 with Billing Plan

How to find the value in the table in database ?

Hi, Could you please advise me, How to findout the data-value in the table in database ?

what do you mean by value ?
--Girish

Find second Biggest and second smallest values in the table

Hi guys
I am new to oracle - sql and pl/sql
I need u r help
My question is i have a table with columns s.no, emp name, salary etc.,
how can i get the second largest and smallest value in the table (based on salary)
Any one pls give the queries (pls the query is used in oracle 8i)
Regards
Marimuthu.N

You only need to use max and min. Once you have it, select the max lower than max and the min biggest than min.

How to pass line item values in the table paramer of FM

Hi all,
When i will give the import of the FM as VBELN"sales order number.
I want to display all the line items for "PO Quantity in the out put of the FM.
For this i thnk i have to pass the line item values in the table parameter of the FM.
Can any body please tell me how to pass the values for the line items in the table parameter fo teh FM.
Please give a example.
Thanks

Sub pLoopThroughPivotFields()
Dim oItem As Excel.PivotItem
Dim oField As Excel.PivotField
Set oField = ThisWorkbook.Worksheets("Sheet1").PivotTables("Pivot Table name").PivotFields("field name")
For Each oItem In oField.PivotItems
oField.CurrentPage = oItem.Name
'Put your copy code here
DoEvents
Next oItem
End Sub
Felipe Costa Gualberto - http://www.ambienteoffice.com.br

How to Maintain Values in the Table control?

Hi,
I'm Saikumar.
I've done a table control program.
When I click SAVE or ENTER Button, the values are getting saved into the database(This is working alright)......but when I click those buttons, The values entered in the table control are getting cleared.
What should I do in order to have those values in the table control itself when I click SAVE/ENTER? (I need to create multiple records at a time)
What I've done is:
IF sy-ucomm = 'SAVE' OR sy-ucomm = 'ENTR'.
INSERT into <database table> values wa_matgl.
MODIFY it_matgl from wa_matgl INDEX tc1-current_line. "tc1 is the table control name.
Refresh it_matgl.
endif.
I tried many ways but the vales are getting cleared in the table control? (I need to create multiple records at a time).
Please suggest a way to overcome it.
Thanks in advance,
saikumar

Hi ...
Just to add...
were there any values in the internal table it_matgl initially in the PBO screen to be shown to the users ?
if the answer is no...then......
i came across the same coding in DEMO_DYNPRO_TABCONT_LOOP_AT.....
here also in PAI..when we press enter..the values are not retained...
MODIFY it_matgl from wa_matgl INDEX tc1-current_line. "tc1 is the table control name.
because i believe the modify statement is not working.coz the it_matgl is empty..pls check if sy-subrc = 0....after the modify statement....if it is not...then we need to insert the data into the it_matgl using an append statement
for this it_matgl needs to be with header line...
Pls explore the following....
data : it_matgl type table of XXXX with header line.
in the section
IF sy-ucomm = 'SAVE' OR sy-ucomm = 'ENTR'.
INSERT into <database table> values wa_matgl.
MODIFY it_matgl from wa_matgl INDEX tc1-current_line. "tc1 is the table control name.
if sy-subrc <> 0.
move corresponding wa_matgl to it_matgl.
append it_matgl.
clear it_matgl.
endif.
endif.
Pls check and revert
Regards
Byju

How to update values in the table control at Cat2 transaction,

Hi,
i am working on cat2 transaction, here
i am using the exit_saplcats_006 and updating values at catsdb table, but i want to display this values at the table control in the cat2 transaction.
   can any one provide me solution for this same.
Regards

Hi Suresh
this is actual requirement
in the CAT2.
1. Add a new column for WBS description and derive the value as per the FS
2. Retrieve project number and description and update in the column specified
3. When a service order is selected it should do the same for 2.
4. Finally repeat for the worklist view (which is the section above)
   here i am able to display values at data entry area
for service order and network but not worklist area ?
    updation is not coming, can u plz go throw it..
Thanks
Chinna

Hardcode the values in the table

Hiii
Iam developing a web dynpro application.With out writing the code i can able to deploy and run the application.In that i want to hardcode values in the table for demo purpose.how i can get those values.
Is there any property in web dynpro to do that,,,,,,,, or else,,,,,,,,, we have to write the code in the application.
If thats the case,,,,Please provide the code to get the values in the table.
Regards
Sushma

Hi
For different data,,,,,in what way i have to do.
Like this your saying
IPrivateEtrecEmpView.IEmployeeElement element4 = wdContext.nodeEmployee().createEmployeeElement();
               element4.setDesignation("Software Engineer");
               element4.setDepartment("Basis");
               element4.setEmailID("");
                              element4.setEmpCode("0011579");
                              element4.setEmpName("");
                              element4.setMobileNo("");
                              element4.setSlno("4");
                              element4.setLocation("Bangalore");
                    wdContext.nodeEmployee().addElement(element4);
     IPrivateEtrecEmpView.IEmployeeElement element3 = wdContext.nodeEmployee().createEmployeeElement();
                         element3.setDesignation("Software Engineer");
                         lement3.setDepartment("Web dynpro");
                         element3.setEmailID("");
                         element3.setEmpCode("0011579");
                         element3.setEmpName("");
                         element3.setMobileNo("");
                              element3.setSlno("4");
                              element3.setLocation("Bangalore");
               wdContext.nodeEmployee().addElement(element3);

Update the values in the table on select of a particular row

hi
I want to update the values in the table on selecting the particular row.
im able to select the particular row using Leadselect.
can any one help me in updating the values in the table?
regards
raji

hi,
values are coming from my database ( SQLServer.)
on click of the button i am able to display the values from the database.
My problem is on selection of any row , i should be able to edit/update the values in the table .
regards
raji

Executed Step outcome value from the table

Hi,
   How to get the Step outcome value from the table for the executed workitem.
Regards,
Rani.

Hi Rani,
For database tables you can refer to tables:
SWWLOGHIST -      History of a work item
SWWORGTASK -      Assignment of WIs to Org.Units and Tasks
SWWUSERWI -      Current Work Items Assigned to a User
SWWWIHEAD -      Header Table for all Work Item Types
SWWWIAGENT -      Gets agents assigned to a workitem
You can you FMs like SAP_WAPI_GET_WORKITEM_DETAIL, SAP_WAPI_CREATE_WORKLIST as per your requirement.
Hope this helps!
Regards,
Saumya

SQL Server 2012 Management Studio: Creating a Database and a dbo Table. Inserting VALUES into the table. How to insert 8 Values for future use in XQuery?

Hi all,
In my SQL Server 2012 Management Studio (SSMS2012), I tried to create a Database (MacLochainnsDB) and a dbo Table (marvel). then I wanted insert 8 VALUES into the Table by using the following code:
USE master
IF EXISTS
(SELECT 1
FROM sys.databases
WHERE name = 'MacLochlainnsDB')
DROP DATABASE MacLochlainnsDB
GO
CREATE DATABASE MacLochlainnsDB
GO
CREATE TABLE [dbo].[marvel] (
[avenger_name] [char] (30) NULL)
INSERT INTO marvel
(avenger_name)
VALUES
('Hulk', 1),
('Iron Man', 2),
('Black Widow', 3),
('Thor', 4),
('Captain America', 5),
('Hawkeye', 6),
('Winter Soldier', 7),
('Iron Patriot', 8)
I got the following error Message:
Msg 110, Level 15, State 1, Line 5
There are fewer columns in the INSERT statement than values specified in the VALUES clause. The number of values in the VALUES clause must match the number of columns specified in the INSERT statement.
How can I correct this problem?
Please kindly help and advise.
Thanks in advance,
Scott Chang
P. S.
The reason I tried to create the Database, dbo Table, and then to insert the VALUES is to learn the following thing:
You can query the entire node tree with the following xquery statement because it looks for the occurrence of any node with the /* search string:
DECLARE @x xml;
SET @x = N'<marvel>
<avenger_name>Captain America</avenger_name>
</marvel>';
SELECT @x.query('/*');
You can query the avenger_name elements from the marvel_xml table with the following syntax:
SELECT xml_table.query('/marvel/avenger_name')
FROM marvel_xml;
It returns the following set of avenger_name elements:
<avenger_name>Hulk</avenger_name>
<avenger_name>Iron Man</avenger_name>
<avenger_name>Black Widow</avenger_name>
<avenger_name>Thor</avenger_name>
<avenger_name>Captain America</avenger_name>
<avenger_name>Hawkeye</avenger_name>
<avenger_name>Winter Soldier</avenger_name>
<avenger_name>Iron Patriot</avenger_name>
You can query the fourth avenger_name element from the marvel_xml table with the following xquery statement:
SELECT xml_table.query('/marvel[4]/avenger_name')
FROM marvel_xml;
It returns the following avenger_name element:
<avenger_name>Thor</avenger_name>

Hi Scott,
The master database records all the system-level information for a SQL Server system, so best practise would be not to create any user-defined
object within it.
To change your default database(master by default) of your login to another, follow the next steps so that next time when connected you don't have to use "USE dbname" to switch database.
Open SQL Server Management Studio
--> Go to Object explorer(the left panel by default layout)
--> Extend "Security"
--> Extend "Logins"
--> Right click on your login, click "propertites"
--> Choose the "Default database" at the bottom of the pop-up window.
--or simply by T-SQL
Exec sp_defaultdb @loginame='yourLogin', @defdb='youDB'
Regarding your question, you can reference the below.
SELECT * FROM master.sys.all_objects where name ='Marvel'
--OR
SELECT OBJECT_ID('master.dbo.Marvel') --if non empty result returns, the object exists
--usually the OBJECT_ID is used if a if statement as below
IF OBJECT_ID('master.dbo.Marvel') IS NOT NULL
PRINT ('TABLE EXISTS') --Or some other logic
What is the sys.all_objects? See
here.
If you have any question, feel free to let me know.
Eric Zhang
TechNet Community Support

Getting values from the table control to the program

Hi Gurus,
i created a program for sales order creation to transfer order creation and to insert multiple values i defined my own selection screen by inserting table control before that the code executed succesfully but after inserting the table control it is not creating any documents
code before inserting table control:-
REPORT zcl120_sales_n_delivery.
 SALES DOCUMENT CREATION
PARAMETERS: p_auart TYPE auart OBLIGATORY.
PARAMETERS: p_vkorg TYPE vkorg OBLIGATORY.
PARAMETERS: p_vtweg TYPE vtweg OBLIGATORY.
PARAMETERS: p_spart TYPE vtweg OBLIGATORY.
PARAMETERS: p_sold TYPE kunnr OBLIGATORY.
PARAMETERS: p_ship TYPE kunnr OBLIGATORY.
*ITEM
PARAMETERS: p_matnr TYPE matnr OBLIGATORY.
PARAMETERS: p_menge TYPE kwmeng OBLIGATORY.
PARAMETERS: p_plant TYPE werks_d OBLIGATORY.
PARAMETERS: p_itcat TYPE pstyv OBLIGATORY.
DATA DECLARATIONS.
DATA: v_vbeln LIKE vbak-vbeln.
DATA: header LIKE bapisdhead1.
DATA: headerx LIKE bapisdhead1x.
DATA: item LIKE bapisditem OCCURS 0 WITH HEADER LINE.
DATA: itemx LIKE bapisditemx OCCURS 0 WITH HEADER LINE.
DATA: partner LIKE bapipartnr OCCURS 0 WITH HEADER LINE.
DATA: return LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
DATA: lt_schedules_inx TYPE STANDARD TABLE OF bapischdlx
WITH HEADER LINE.
DATA: lt_schedules_in TYPE STANDARD TABLE OF bapischdl
WITH HEADER LINE.
HEADER DATA
header-doc_type = p_auart.
headerx-doc_type = 'X'.
header-sales_org = p_vkorg.
headerx-sales_org = 'X'.
header-distr_chan = p_vtweg.
headerx-distr_chan = 'X'.
header-division = p_spart.
headerx-division = 'X'.
headerx-updateflag = 'I'.
partner-partn_role = 'AG'.
partner-partn_numb = p_sold.
APPEND partner.
partner-partn_role = 'WE'.
partner-partn_numb = p_ship.
APPEND partner.
item-material = p_matnr.
item-plant = p_plant.
item-target_qty = p_menge.
item-target_qu = 'ST'.
item-item_categ = p_itcat.
APPEND item.
itemx-updateflag = 'I'.
itemx-material = 'X'.
itemx-plant = 'X'.
itemx-target_qty = 'X'.
itemx-target_qu = 'X'.
itemx-item_categ = 'X'.
APPEND itemx.
Fill schedule lines
lt_schedules_in-itm_number = '000010'.
lt_schedules_in-sched_line = '0001'.
lt_schedules_in-req_qty = p_menge.
APPEND lt_schedules_in.
Fill schedule line flags
lt_schedules_inx-itm_number = '000010'.
lt_schedules_inx-sched_line = '0001'.
lt_schedules_inx-updateflag = 'X'.
lt_schedules_inx-req_qty = 'X'.
APPEND lt_schedules_inx.
Call the BAPI
CALL FUNCTION 'BAPI_SALESDOCU_CREATEFROMDATA1'
EXPORTING
 sales_header_in = header
 sales_header_inx = headerx
IMPORTING
 salesdocument_ex = v_vbeln
TABLES
 return = return
 sales_items_in = item
 sales_items_inx = itemx
 sales_schedules_in = lt_schedules_in
 sales_schedules_inx = lt_schedules_inx
 sales_partners = partner.
LOOP AT return WHERE type = 'E' OR type = 'A'.
EXIT.
ENDLOOP.
IF sy-subrc = 0.
WRITE / return-message.
WRITE: / 'Error in creating document'.
ELSE.
COMMIT WORK AND WAIT.
WRITE: / 'Document ', v_vbeln, ' created'.
ENDIF.
 DELIVERY ORDER CREATION
*PARAMETERS: p_vbeln LIKE vbak-vbeln.
DATA: BEGIN OF t_vbap OCCURS 0,
 vbeln LIKE vbap-vbeln,
 posnr LIKE vbap-posnr,
 kwmeng LIKE vbap-kwmeng,
 matnr LIKE vbap-matnr,
 werks LIKE vbap-werks,
 END OF t_vbap.
DATA: t_request TYPE STANDARD TABLE OF bapideliciousrequest
 WITH HEADER LINE.
DATA: t_created TYPE STANDARD TABLE OF bapideliciouscreateditems
 WITH HEADER LINE.
DATA: t_return TYPE STANDARD TABLE OF bapiret2 WITH HEADER LINE.
SELECT vbeln posnr kwmeng matnr werks
 INTO TABLE t_vbap
 FROM vbap
 WHERE vbeln = v_vbeln
LOOP AT t_vbap.
t_request-document_numb = t_vbap-vbeln.
t_request-document_item = t_vbap-posnr.
t_request-quantity_sales_uom = t_vbap-kwmeng.
t_request-id = 1.
t_request-document_type = 'A'.
t_request-delivery_date = sy-datum.
t_request-material = t_vbap-matnr.
t_request-plant = t_vbap-werks.
t_request-date = sy-datum.
t_request-goods_issue_date = sy-datum.
t_request-goods_issue_time = sy-uzeit.
APPEND t_request.
ENDLOOP.
CALL FUNCTION 'BAPI_DELIVERYPROCESSING_EXEC'
TABLES
 request = t_request
 createditems = t_created
 return = t_return.
READ TABLE t_return WITH KEY type = 'E'.
IF sy-subrc = 0.
MESSAGE e208(00) WITH 'Delivery creation error'.
ENDIF.
COMMIT WORK.
READ TABLE t_created INDEX 1.
WRITE: / 'Delivery Number : ',
 t_created-document_numb.
 CREATE TRANSFER ORDER
DATA: w_tanum TYPE ltak-tanum.
CALL FUNCTION 'L_TO_CREATE_DN'
EXPORTING
 i_lgnum = '010'
 i_vbeln = t_created-document_numb
IMPORTING
 e_tanum = w_tanum
EXCEPTIONS
 foreign_lock = 1
 dn_completed = 2
 partial_delivery_forbidden = 3
 xfeld_wrong = 4
 ldest_wrong = 5
 drukz_wrong = 6
 dn_wrong = 7
 squit_forbidden = 8
 no_to_created = 9
 teilk_wrong = 10
 update_without_commit = 11
 no_authority = 12
 no_picking_allowed = 13
 dn_hu_not_choosable = 14
 input_error = 15
 OTHERS = 16
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
COMMIT WORK AND WAIT.
WRITE: / 'Transfer order number',
 w_tanum.
Code after inserting table control:-
REPORT zcl120_sales_n_delivery.
 SALES DOCUMENT CREATION
DATA: p_auart TYPE auart .
DATA: p_vkorg TYPE vkorg .
DATA: p_vtweg TYPE vtweg .
DATA: p_spart TYPE vtweg .
DATA: p_sold TYPE kunnr .
DATA: p_ship TYPE kunnr .
*ITEM
data:
begin of it_item occurs 0,
 p_matnr TYPE matnr,
 p_menge TYPE kwmeng,
 p_plant TYPE werks_d,
 p_itcat TYPE pstyv,
end of it_item.
DATA DECLARATIONS.
DATA: v_vbeln LIKE vbak-vbeln.
DATA: header LIKE bapisdhead1.
DATA: headerx LIKE bapisdhead1x.
DATA: item LIKE bapisditem OCCURS 0 WITH HEADER LINE.
DATA: itemx LIKE bapisditemx OCCURS 0 WITH HEADER LINE.
DATA: partner LIKE bapipartnr OCCURS 0 WITH HEADER LINE.
DATA: return LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
DATA: lt_schedules_inx TYPE STANDARD TABLE OF bapischdlx
WITH HEADER LINE.
DATA: lt_schedules_in TYPE STANDARD TABLE OF bapischdl
WITH HEADER LINE.
DATA:
W_COUNTER TYPE I,
IT_NUM(6) TYPE C value '000010',
IT_LINE(4) TYPE C value '0001'.
CALL SCREEN 100.
HEADER DATA
header-doc_type = p_auart.
headerx-doc_type = 'X'.
header-sales_org = p_vkorg.
headerx-sales_org = 'X'.
header-distr_chan = p_vtweg.
headerx-distr_chan = 'X'.
header-division = p_spart.
headerx-division = 'X'.
headerx-updateflag = 'I'.
partner-partn_role = 'AG'.
partner-partn_numb = p_sold.
APPEND partner.
partner-partn_role = 'WE'.
partner-partn_numb = p_ship.
APPEND partner.
loop at it_item.
CLEAR ITEM.
item-material = it_item-p_matnr.
item-plant = it_item-p_plant.
item-target_qty = it_item-p_menge.
item-target_qu = 'ST'.
item-item_categ = it_item-p_itcat.
APPEND item.
W_COUNTER = W_COUNTER + 1.
endloop.
DO W_COUNTER TIMES.
itemx-updateflag = 'I'.
itemx-material = 'X'.
itemx-plant = 'X'.
itemx-target_qty = 'X'.
itemx-target_qu = 'X'.
itemx-item_categ = 'X'.
APPEND itemx.
ENDDO.
Fill schedule lines
LOOP AT IT_ITEM.
CLEAR lt_schedules_in.
lt_schedules_in-itm_number = IT_NUM.
lt_schedules_in-sched_line = IT_LINE.
lt_schedules_in-req_qty = IT_ITEM-p_menge.
APPEND lt_schedules_in.
IT_NUM = IT_NUM + 10.
IT_LINE = IT_LINE + 1.
ENDLOOP.
IT_NUM = '000010'.
IT_LINE = '0001'.
Fill schedule line flags
LOOP AT IT_ITEM.
CLEAR lt_schedules_inx.
lt_schedules_inx-itm_number = IT_NUM.
lt_schedules_inx-sched_line = IT_LINE.
lt_schedules_inx-updateflag = 'X'.
lt_schedules_inx-req_qty = 'X'.
APPEND lt_schedules_inx.
IT_NUM = IT_NUM + 10.
IT_LINE = IT_LINE + 1.
ENDLOOP.
Call the BAPI
CALL FUNCTION 'BAPI_SALESDOCU_CREATEFROMDATA1'
EXPORTING
 sales_header_in = header
 sales_header_inx = headerx
IMPORTING
 salesdocument_ex = v_vbeln
TABLES
 return = return
 sales_items_in = item
 sales_items_inx = itemx
 sales_schedules_in = lt_schedules_in
 sales_schedules_inx = lt_schedules_inx
 sales_partners = partner.
LOOP AT return WHERE type = 'E' OR type = 'A'.
EXIT.
ENDLOOP.
IF sy-subrc = 0.
WRITE / return-message.
WRITE: / 'Error in creating document'.
ELSE.
COMMIT WORK AND WAIT.
WRITE: / 'Document ', v_vbeln, ' created'.
ENDIF.
 DELIVERY ORDER CREATION
*PARAMETERS: p_vbeln LIKE vbak-vbeln.
DATA: BEGIN OF t_vbap OCCURS 0,
 vbeln LIKE vbap-vbeln,
 posnr LIKE vbap-posnr,
 kwmeng LIKE vbap-kwmeng,
 matnr LIKE vbap-matnr,
 werks LIKE vbap-werks,
 END OF t_vbap.
DATA: t_request TYPE STANDARD TABLE OF bapideliciousrequest
 WITH HEADER LINE.
DATA: t_created TYPE STANDARD TABLE OF bapideliciouscreateditems
 WITH HEADER LINE.
DATA: t_return TYPE STANDARD TABLE OF bapiret2 WITH HEADER LINE.
SELECT vbeln posnr kwmeng matnr werks
 INTO TABLE t_vbap
 FROM vbap
 WHERE vbeln = v_vbeln
LOOP AT t_vbap.
t_request-document_numb = t_vbap-vbeln.
t_request-document_item = t_vbap-posnr.
t_request-quantity_sales_uom = t_vbap-kwmeng.
t_request-id = 1.
t_request-document_type = 'A'.
t_request-delivery_date = sy-datum.
t_request-material = t_vbap-matnr.
t_request-plant = t_vbap-werks.
t_request-date = sy-datum.
t_request-goods_issue_date = sy-datum.
t_request-goods_issue_time = sy-uzeit.
APPEND t_request.
ENDLOOP.
CALL FUNCTION 'BAPI_DELIVERYPROCESSING_EXEC'
TABLES
 request = t_request
 createditems = t_created
 return = t_return.
READ TABLE t_return WITH KEY type = 'E'.
IF sy-subrc = 0.
MESSAGE e208(00) WITH 'Delivery creation error'.
ENDIF.
COMMIT WORK.
READ TABLE t_created INDEX 1.
WRITE: / 'Delivery Number : ',
 t_created-document_numb.
 CREATE TRANSFER ORDER
DATA: w_tanum TYPE ltak-tanum.
CALL FUNCTION 'L_TO_CREATE_DN'
EXPORTING
 i_lgnum = '010'
 i_vbeln = t_created-document_numb
IMPORTING
 e_tanum = w_tanum
EXCEPTIONS
 foreign_lock = 1
 dn_completed = 2
 partial_delivery_forbidden = 3
 xfeld_wrong = 4
 ldest_wrong = 5
 drukz_wrong = 6
 dn_wrong = 7
 squit_forbidden = 8
 no_to_created = 9
 teilk_wrong = 10
 update_without_commit = 11
 no_authority = 12
 no_picking_allowed = 13
 dn_hu_not_choosable = 14
 input_error = 15
 OTHERS = 16
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
COMMIT WORK AND WAIT.
WRITE: / 'Transfer order number',
 w_tanum.
*&SPWIZARD: DECLARATION OF TABLECONTROL 'TAB_CON1' ITSELF
CONTROLS: TAB_CON1 TYPE TABLEVIEW USING SCREEN 0100.
*&SPWIZARD: OUTPUT MODULE FOR TC 'TAB_CON1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: UPDATE LINES FOR EQUIVALENT SCROLLBAR
MODULE TAB_CON1_CHANGE_TC_ATTR OUTPUT.
DESCRIBE TABLE IT_ITEM LINES TAB_CON1-lines.
ENDMODULE.
*& Module STATUS_0100 OUTPUT
 text
module STATUS_0100 output.
 SET PF-STATUS 'MENU'.
SET TITLEBAR 'xxx'.
endmodule. " STATUS_0100 OUTPUT
*& Module USER_COMMAND_0100 INPUT
 text
module USER_COMMAND_0100 input.
IF SY-UCOMM EQ 'START'.
LEAVE to screen 0 .
ENDIF.
endmodule. " USER_COMMAND_0100 INPUT
*& Module APPEND_IT_ITEM INPUT
 text
module APPEND_IT_ITEM input.
APPEND IT_ITEM.
CLEAR IT_ITEM.
endmodule. " APPEND_IT_ITEM INPUT
plz help me where the error is

Hi,
Do same as suggested by Ramesh. Add one user command button after clicking that do the looping and call new screen.
Ashven.

How to truncate the values from the table

Hi All,
I am working on an issue..where we are first deleting all the records from the table and then based on few conditions we are putting the records back in that table...when we tried to run this program along with few others those who are doing almost the same stuff we are having issues...we tried to schedule few jobs related to these programs only...but after a ceratin amount of time couple of jobs got canceled...I was talking to my basis guy and he said the problem is ratehr then truncating the records from the table we are deleting the records and it's taking lots and lots of space to execute...so we need to truncate the records from the table insted of deleting it...we are using the following the statement right now:
    DELETE FROM ZTUS_PG.
    COMMIT WORK.
So can you please tell me how can we truncate the values from this table instead of just deleting them and what would be effect of this.
Thanks,
Rajeev Gupta

I don't think basis is saying you should delete all the records from the table. They are saying remove the table and it's contents (a much faster thing to do). I'm not sure this the right thing to do, but you can have a look at:
http://publib.boulder.ibm.com/infocenter/db2luw/v9/index.jsp?topic=/com.ibm.db2.udb.apdv.sample.doc/doc/admin_scripts/s-truncate-db2.htm
Something like:
EXEC SQL.
TRUNCATE TABLE ZTUS_PG REUSE STORAGE
ENDEXEC.
COMMIT WORK.                      "Empty table is committed here
Rob
Edited by: Rob Burbank on Dec 1, 2008 4:06 PM

Values in the table

Similar Messages

Maybe you are looking for