HTML with lot of rows
Hi Guys,
In one of our web page we have lot of rows. (Around 600) in a table. As per the requirements, the first three columns should be frozen while scrolling. Totally there are around 30 columns.
When we tried with frames, we are facing performance related issues. (Like the page is getting refreshed only after few secs. during scrolling.)
How can we handle this situation?
Thanks in anticipation
Regards
Rajesh
Split the table into several pages. Large tables render horribly slow on some browsers, and only at below average speed on other browsers.
Similar Messages
-
Viewobject rows don't exist when creating a lot of rows at once
Hello,
I'm creating a lot of rows at once in a viewobject. Let's say between 100 and 700 rows. After that, I commit the transaction. After the creation of every row I do a postchanges().
When this is all done, a xml file is sent to another server and returns the same file with a bit more information. That file is parsed and every row will be searched in the Viewobject but then they don't exist!
When I try this with a couple of rows, 10 or something, everything goes well. Is this a known problem or am I doing something wrong? I don't want a commit after the creation of every row because sending must succeed before saving them.No off course.
I hoped that more people have problems with inserting a lot of rows at once. The code is quite simple, it looks a bit like this:
for ( about 500 elements )
Row row = voIterator.createRow();
row.setAttribute("...", "....");
voIterator.insertRow(row);
getDBTransaction().postChanges();
getDBTransaction().commit(); -
Need supplier name along with lot no.
hello sir,
i need to show supplier name along with lot no.
here is my query--
SELECT DISTINCT(b.vc_field1),a.vc_lot_no,a.nu_balance_qty--, c.VC_SUPPLIER_NAME
FROM STK_LOT_SUMMARY a, DT_RECEIPT b, makess.mst_supplier c, purchase.MST_SUP_ITEM d
WHERE a.vc_comp_code = '01'--:GLOBAL.vc_comp_code
AND a.vc_comp_code = b.vc_comp_code
AND b.VC_COMP_CODE=c.VC_COMP_CODE
AND c.VC_COMP_CODE=d.VC_COMP_CODE
AND c.NU_SUPPLIER_CODE=d.NU_SUPPLIER_CODE
AND a.VC_LOT_NO=b.VC_LOT_NO
AND a.vc_item_code=b.vc_item_code
AND b.vc_item_code=d.vc_item_code
AND a.vc_item_code = 'SYUWLNZXYWXXX00400100'--:HD_VERIFY.vc_item_code
--AND b.vc_field1 IS NOT NULL
AND a.vc_lot_no <> '0'
AND a.nu_balance_qty > 0
GROUP BY (a.nu_balance_qty,b.vc_field1, c.VC_SUPPLIER_NAME,a.vc_lot_no)
whose result is---
VC_FIELD1 VC_LOT_NO NU_BALANCE_QTY
11 48.00
22 B 8 192.00
181 A 3 200.00
54 F 13 244.50
143 10 400.00
1343 4 1,000.00
181 2 1,249.00
but when i include supplier name(removing comment) result would be....
VC_FIELD1 VC_LOT_NO NU_BALANCE_QTY VC_SUPPLIER_NAME
11 48.00 Chandak Wools
11 48.00 Somani Woollen Mills
11 48.00 Sonu Monu & Brothers
11 48.00 Somani Woolen Pvt. Ltd
181 A 3 200.00 Chandak Wools
181 A 3 200.00 Somani Woollen Mills
181 A 3 200.00 Sonu Monu & Brothers
181 A 3 200.00 Somani Woolen Pvt. Ltd
143 10 400.00 Chandak Wools
143 10 400.00 Somani Woollen Mills
143 10 400.00 Sonu Monu & Brothers
143 10 400.00 Somani Woolen Pvt. Ltd
1343 4 1,000.00 Chandak Wools
1343 4 1,000.00 Somani Woollen Mills
1343 4 1,000.00 Sonu Monu & Brothers
1343 4 1,000.00 Somani Woolen Pvt. Ltd
22 B 8 192.00 Chandak Wools
22 B 8 192.00 Somani Woollen Mills
22 B 8 192.00 Sonu Monu & Brothers
22 B 8 192.00 Somani Woolen Pvt. Ltd
181 2 1,249.00 Chandak Wools
181 2 1,249.00 Somani Woollen Mills
181 2 1,249.00 Sonu Monu & Brothers
181 2 1,249.00 Somani Woolen Pvt. Ltd
54 F 13 244.50 Chandak Wools
54 F 13 244.50 Somani Woollen Mills
54 F 13 244.50 Sonu Monu & Brothers
54 F 13 244.50 Somani Woolen Pvt. Ltd
please help me how could i write query to get lot no along with supplier name.
total no of rows is 7.but while adding supplier name it compare item code and executes 28 rows.
regardsHi Ishika,
Also check your Joins.
May be you are missing something else.
Thatz the reason all the four supplier combination are repeated.
Go through ur joins again.
Don't forget to use any number column as nvl(nu_balance_qty,0). -
Hi every body !
Can someone please tell me how I can manage HTML with a AWT component ?
With Swing, we for example use JEditorPane or JTextPane as I did for a JApplet (http://www.big-chat.com).
As it is for Applet, I want it to be avalaible in all browsers. But now, it is not the case !
Please help.
Thanks !Why won't JApplet work in all browsers? Every browser that I know (that is graphical) supports the Java plug-in.
If you want to support the MS JVM in IE users without the plugin, well there are some things you should know:
1) MS is not shipping this anymore for newer systems (Win 2003 and XP SP1a).
2) It's Java version 1.1.4, so there's a whole heck of a lot of stuff that won't work.
3) It's going to be officially retired in 2007 (was supposed to be in Sept 2004, actually).
I highly doubt that there's an AWT-based HTML display component out there. There's not one written in Swing that is a complete, up-to-date browser as it is.
Just stick with the plugin. -
Photoshop painfully slow with lots of layers.
I've seen this before with Photoshop. I have a pretty tame PSD file, 35mb. Web design file with lots of small layers. Photoshop will go from 20% to 105% in Apple's Activity Monitor—and I'm not doing anything in Photoshop. If I try to move a single type layer with the cursor keys, for example, I get the move dialog with a progress bar. Very unresponsive overall.
I'm about to make smart objects of all my layer grous, and see if this helps, but this is a file I've worked on in the past, and photoshop was very responsive.
Larger MB files with big images seem fine.
Details:
Photoshop 13.0.4
OS X 10.8.3
Freshly wiped drive with new install of OS X and CS6.
Macbook Pro 2010, 8gb ram, 500gb, 7200 drive.
Recently just reset PRAM, Booted in SAFE mode, reset the Macs SMC.
Ideas?Maybe you should check out this
http://helpx.adobe.com/photoshop/kb/troubleshoot-fonts-photoshop-cs5.html
No idea if it might help, but as you mentioned text layers … -
BDC with lots of validations and conversions
hi to all experts,
i need a sample bdc program with lots of validations and conversion.
thanksHi,
REPORT ZMMFTS01A_MAINTAIN_SOURCE_LIST NO STANDARD PAGE HEADING
LINE-SIZE 250.
TABLES eord.
***Types Declaration
**Type of Upload File
TYPES : BEGIN OF ty_final,
matnr(018), "Material No
werks(004), "Plant
vdatu(010), "valid From
bdatu(010), "valid To
lifnr(010), "Vendor
ekorg(004), "Purchase Org
reswk(004), "Plant from which material is procured
ebeln(010), "Agreement
ebelp(005), "Item
feskz(003), "Fix
notkz(003), "Blk
autet(003), "MRP
END OF ty_final.
**Type for Error Records
TYPES : BEGIN OF ty_errmsg,
matnr(018),
werks(004),
vdatu(010),
bdatu(010),
lifnr(010),
ekorg(004),
reswk(004),
ebeln(010),
ebelp(005),
feskz(003),
notkz(003),
autet(003),
messg(200),
END OF ty_errmsg.
**Type to get the existing no of records before comparison
TYPES : BEGIN OF ty_eord,
matnr LIKE eord-matnr,
werks LIKE eord-werks,
erdat LIKE eord-erdat,
vdatu LIKE eord-vdatu,
bdatu LIKE eord-bdatu,
lifnr LIKE eord-lifnr,
flifn LIKE eord-flifn,
ebeln LIKE eord-ebeln,
ebelp LIKE eord-ebelp,
febel LIKE eord-febel,
reswk LIKE eord-reswk,
notkz LIKE eord-notkz,
ekorg LIKE eord-ekorg,
autet LIKE eord-autet,
END OF ty_eord.
**Type to get the no of records in the Database after comparison
TYPES : BEGIN OF ty_eord1,
vdatu LIKE eord-vdatu,
bdatu LIKE eord-bdatu,
END OF ty_eord1.
***Data Declarations
DATA : v_repid LIKE sy-repid,
v_datfm LIKE usr01-datfm,
v_message(200),
v_err_rec TYPE i,
v_errors TYPE i,
v_updated TYPE i,
v_matnr TYPE matnr,
v_lines TYPE i,
v_eord_row TYPE i,
s_count(2) TYPE n,
v_fnam(20) TYPE c,
v_tabix(2) TYPE n,
v_vdatu(10),
v_bdatu LIKE eord-bdatu,
v_datum(10),
f_option type ctu_params.
****Begin of Changes by Pavan Ticket 648507 "D13K948908
DATA : s_vdatu TYPE sy-datum,
s_bdatu TYPE sy-datum.
****End of Changes By Pavan Ticket 648507 "D13K948908
***Internal Tables Declaration
DATA : it_eord TYPE STANDARD TABLE OF ty_eord WITH HEADER LINE, "Internal Table for Appending all the Rows of DB Table EORD
it_bdcdata TYPE STANDARD TABLE OF bdcdata WITH HEADER LINE,
it_final TYPE STANDARD TABLE OF ty_final WITH HEADER LINE,
it_err_rec TYPE STANDARD TABLE OF ty_final WITH HEADER LINE,
it_messtab TYPE STANDARD TABLE OF bdcmsgcoll WITH HEADER LINE,
it_errmsg TYPE STANDARD TABLE OF ty_errmsg WITH HEADER LINE,
it_eord1 TYPE STANDARD TABLE OF ty_eord1 WITH HEADER LINE,
it_ctu_params TYPE STANDARD TABLE OF ctu_params WITH HEADER LINE.
DATA : wa_final LIKE LINE OF it_final.
***Constants
CONSTANTS : c_1 TYPE i VALUE '1',
c_12 TYPE i VALUE '12',
c_x VALUE 'X'.
***Selection Screen
SELECTION-SCREEN : BEGIN OF BLOCK header WITH FRAME TITLE text-002.
SELECTION-SCREEN SKIP.
PARAMETERS P_FNAME LIKE RLGRAP-FILENAME OBLIGATORY.
SELECTION-SCREEN : END OF BLOCK header.
I N I L I T I A L I Z A T I O N *
INITIALIZATION.
it_ctu_params-updmode = 'S'.
it_ctu_params-defsize = 'X'.
it_ctu_params-dismode = 'N'.
APPEND it_ctu_params.
A T S E L E C T I O N S C R E E N *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FNAME.
PERFORM file_get.
S T A R T O F S E L E C T I O N *
START-OF-SELECTION.
PERFORM upload_xcel.
IF NOT it_final[] IS INITIAL.
SORT it_final BY matnr werks lifnr ekorg reswk ebeln ebelp.
DESCRIBE TABLE it_final LINES v_lines.
ENDIF.
**To Know the Date Format for the user name in user master record
SELECT SINGLE datfm FROM usr01
INTO v_datfm
WHERE bname = sy-uname.
**Updating the Database based on the Combinations of Vendor/PPL/Porg and Agreement/Item
LOOP AT it_final.
*****Begin of Changes By Pavan Ticket 648507 "D13K948908
CLEAR : s_vdatu, s_bdatu.
CONCATENATE it_final-vdatu6(4) it_final-vdatu0(2) it_final-vdatu+3(2) INTO s_vdatu.
CONCATENATE it_final-bdatu6(4) it_final-bdatu0(2) it_final-bdatu+3(2) INTO s_bdatu.
PERFORM plant_conversion USING it_final-werks.
*****End of Changes By Pavan Ticket 648507 "D13K948908
REFRESH it_eord[].
v_matnr = it_final-matnr.
**Adding preceeding Zeroes to the Material No
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
INPUT = v_matnr
IMPORTING
OUTPUT = v_matnr.
**Adding preceeding Zeroes to the Vendor
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
INPUT = it_final-lifnr
IMPORTING
OUTPUT = it_final-lifnr.
**Adding preceeding Zeroes to the Item
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
INPUT = it_final-ebelp
IMPORTING
OUTPUT = it_final-ebelp.
TRANSLATE it_final-feskz TO UPPER CASE.
TRANSLATE it_final-notkz TO UPPER CASE.
Select the Existing Records from EORD for the Combination of Material and Plant of New Record
SELECT matnr
werks
erdat
vdatu
bdatu
lifnr
flifn
ebeln
ebelp
febel
reswk
notkz
ekorg
autet FROM eord INTO corresponding fields of TABLE it_eord
WHERE matnr EQ v_matnr
AND werks EQ it_final-werks.
SORT it_eord BY matnr werks vdatu bdatu erdat lifnr ekorg reswk ebeln ebelp.
IF sy-subrc EQ 0.
LOOP AT it_eord.
If the Combination of Old Records Vendor/PPL/Porg is same and Agreement/Item
is also same then delete the Old Record and Upload the New Record
IF it_eord-MATNR = V_MATNR AND
it_eord-WERKS = IT_FINAL-WERKS AND
it_eord-LIFNR = IT_FINAL-LIFNR AND
it_eord-EKORG = IT_FINAL-EKORG AND
it_eord-RESWK = IT_FINAL-RESWK AND
it_eord-EBELN = IT_FINAL-EBELN AND
it_eord-EBELP = IT_FINAL-EBELP.
*****Begin of Changes By Pavan Ticket 648507 "D13K948908
IF s_vdatu GT it_eord-bdatu OR s_bdatu LT it_eord-vdatu.
ELSE.
*****End of Changes By Pavan Ticket 648507 "D13K948908
v_tabix = sy-tabix.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0200'.
PERFORM bdc_field USING : 'EORD-MATNR' it_final-matnr,
'EORD-WERKS' it_final-WERKS,
'BDC_OKCODE' '/00'.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
CONCATENATE 'RM06W-SELKZ(' v_tabix ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam 'X'.
PERFORM bdc_field USING 'BDC_OKCODE' '=LOES'.
PERFORM bdc_dynpro USING 'SAPLSPO1' '0200'.
PERFORM bdc_field USING 'BDC_OKCODE' '=YES'.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
PERFORM bdc_field USING 'BDC_OKCODE' '=BU'.
ENDIF.
ELSE.
If the Combination of Old Records Vendor/PPL/Porg is same and Agreement/Item
is different, if the FIX of the Existing one is X and also the FIX of the New one
is X then deselect the FIX of the Old one, if the MRP of the Old one is 1 and also
the MRP of the New one is 1 then delete the MRP of the Old one, if the FIX and MRP
of the Old one is X,1 and if it is same for the new one also, then delete the FIX
and MRP of the Old one and insert the new one also
IF it_eord-lifnr = it_final-lifnr AND
it_eord-ekorg = it_final-ekorg AND
it_eord-reswk = it_final-reswk AND
it_eord-ebeln NE '' AND it_final-ebeln NE ''.
IF it_eord-ebeln NE it_final-ebeln OR it_eord-ebelp NE it_final-ebelp.
IF it_eord-febel EQ 'X' OR it_eord-autet EQ '1'.
v_tabix = sy-tabix.
IF it_final-feskz = 'X' AND it_final-autet = '1'.
it_eord-febel = ''.
it_eord-autet = ''.
*****Begin of Changes By Pavan Ticket 648507 "D13K948908
IF s_vdatu GT it_eord-bdatu OR s_bdatu LT it_eord-vdatu.
ELSE.
*****End of Changes By Pavan Ticket 648507 "D13K948908
PERFORM bdc_dynpro USING 'SAPLMEOR' '0200'.
PERFORM bdc_field USING : 'EORD-MATNR' it_final-matnr,
'EORD-WERKS' it_final-WERKS,
'BDC_OKCODE' '/00'.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
CONCATENATE 'RM06W-FESKZ(' v_tabix ')' INTO v_fnam.
PERFORM bdc_field1 USING : v_fnam SPACE.
CONCATENATE 'EORD-AUTET(' v_tabix ')' INTO v_fnam.
PERFORM bdc_field1 USING : v_fnam SPACE.
PERFORM bdc_field USING 'BDC_OKCODE' '=BU'.
ENDIF.
ELSEIF
it_final-feskz = 'X'.
it_eord-febel = ''.
*****Begin of Changes By Pavan Ticket 648507 "D13K948908
IF s_vdatu GT it_eord-bdatu OR s_bdatu LT it_eord-vdatu.
ELSE.
*****End of Changes By Pavan Ticket 648507 "D13K948908
PERFORM bdc_dynpro USING 'SAPLMEOR' '0200'.
PERFORM bdc_field USING : 'EORD-MATNR' it_final-matnr,
'EORD-WERKS' it_final-WERKS,
'BDC_OKCODE' '/00'.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
CONCATENATE 'RM06W-FESKZ(' v_tabix ')' INTO v_fnam.
PERFORM bdc_field1 USING : v_fnam SPACE.
PERFORM bdc_field USING 'BDC_OKCODE' '=BU'.
ENDIF.
ELSEIF
it_final-autet = '1'.
it_eord-autet = ''.
*****Begin of Changes By Pavan Ticket 648507 "D13K948908
IF s_vdatu GT it_eord-bdatu OR s_bdatu LT it_eord-vdatu.
ELSE.
*****End of Changes By Pavan Ticket 648507 "D13K948908
PERFORM bdc_dynpro USING 'SAPLMEOR' '0200'.
PERFORM bdc_field USING : 'EORD-MATNR' it_final-matnr,
'EORD-WERKS' it_final-WERKS,
'BDC_OKCODE' '/00'.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
CONCATENATE 'EORD-AUTET(' v_tabix ')' INTO v_fnam.
PERFORM bdc_field1 USING : v_fnam SPACE.
PERFORM bdc_field USING 'BDC_OKCODE' '=BU'.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
CLEAR it_eord.
IF NOT it_bdcdata[] IS INITIAL.
CALL TRANSACTION 'ME01' USING it_bdcdata
OPTIONS FROM it_ctu_params.
REFRESH it_bdcdata[].
EXIT.
ENDIF.
ENDLOOP.
ENDIF.
ENDIF.
CLEAR : v_matnr, it_final.
ENDLOOP.
REFRESH : it_eord[].
FREE it_eord.
**Updating the Records of Upload File into ME01
LOOP AT it_final INTO wa_final.
it_final = wa_final.
CLEAR v_matnr.
TRANSLATE it_final-feskz TO UPPER CASE.
TRANSLATE it_final-notkz TO UPPER CASE.
*****Begin of Changes By Pavan Ticket 648507 "D13K948908
PERFORM plant_conversion USING wa_final-werks.
*****End of Changes By Pavan Ticket 648507 "D13K948908
**To convert the Valid From and Valid To into User's Format
CASE v_datfm.
WHEN 1.
CONCATENATE it_final-vdatu3(2) '.' it_final-vdatu0(2) '.' it_final-vdatu+6(4) INTO it_final-vdatu.
CONCATENATE it_final-bdatu3(2) '.' it_final-bdatu0(2) '.' it_final-bdatu+6(4) INTO it_final-bdatu.
WHEN 2.
CONCATENATE it_final-vdatu0(2) '/' it_final-vdatu3(2) '/' it_final-vdatu+6(4) INTO it_final-vdatu.
CONCATENATE it_final-bdatu0(2) '/' it_final-bdatu3(2) '/' it_final-bdatu+6(4) INTO it_final-bdatu.
WHEN 3.
CONCATENATE it_final-vdatu0(2) '-' it_final-vdatu3(2) '-' it_final-vdatu+6(4) INTO it_final-vdatu.
CONCATENATE it_final-bdatu0(2) '-' it_final-bdatu3(2) '-' it_final-bdatu+6(4) INTO it_final-bdatu.
WHEN 4.
CONCATENATE it_final-vdatu6(4) '.' it_final-vdatu0(2) '.' it_final-vdatu+3(2) INTO it_final-vdatu.
CONCATENATE it_final-bdatu6(4) '.' it_final-bdatu0(2) '.' it_final-bdatu+3(2) INTO it_final-bdatu.
WHEN 5.
CONCATENATE it_final-vdatu6(4) '/' it_final-vdatu0(2) '/' it_final-vdatu+3(2) INTO it_final-vdatu.
CONCATENATE it_final-bdatu6(4) '/' it_final-bdatu0(2) '/' it_final-bdatu+3(2) INTO it_final-bdatu.
WHEN 6.
CONCATENATE it_final-vdatu6(4) '-' it_final-vdatu0(2) '-' it_final-vdatu+3(2) INTO it_final-vdatu.
CONCATENATE it_final-bdatu6(4) '-' it_final-bdatu0(2) '-' it_final-bdatu+3(2) INTO it_final-bdatu.
***End of Changes by Pavan "D13K945062
WHEN 'A'.
CONCATENATE it_final-vdatu6(4) '/' it_final-vdatu3(2) '/' it_final-vdatu+0(2) INTO it_final-vdatu.
CONCATENATE it_final-bdatu6(4) '.' it_final-bdatu3(2) '.' it_final-bdatu+0(2) INTO it_final-bdatu.
WHEN 'B'.
CONCATENATE it_final-vdatu6(4) '/' it_final-vdatu3(2) '/' it_final-vdatu+0(2) INTO it_final-vdatu.
CONCATENATE it_final-bdatu6(4) '.' it_final-bdatu3(2) '.' it_final-bdatu+0(2) INTO it_final-bdatu.
WHEN 'C'.
CONCATENATE it_final-vdatu6(4) '/' it_final-vdatu3(2) '/' it_final-vdatu+0(2) INTO it_final-vdatu.
CONCATENATE it_final-bdatu6(4) '.' it_final-bdatu3(2) '.' it_final-bdatu+0(2) INTO it_final-bdatu.
ENDCASE.
AT NEW werks.
CLEAR s_count.
REFRESH : it_bdcdata[], it_eord1[].
PERFORM bdc_dynpro USING 'SAPLMEOR' '0200'.
PERFORM bdc_field USING : 'EORD-MATNR' it_final-matnr,
'EORD-WERKS' it_final-WERKS,
'BDC_OKCODE' '/00'.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
**Adding preceeding Zeroes to the Material No
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
INPUT = it_final-matnr
IMPORTING
OUTPUT = v_matnr.
**To know the Number of records in EORD after Updating with new records
SELECT vdatu
bdatu FROM EORD
INTO TABLE it_eord1
WHERE matnr = v_matnr
AND werks = it_final-werks.
DESCRIBE TABLE it_eord1 LINES v_eord_row.
s_count = v_eord_row + 1.
ENDAT.
CONCATENATE 'EORD-VDATU(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-VDATU.
CONCATENATE 'EORD-BDATU(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-BDATU.
CONCATENATE 'EORD-EKORG(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-EKORG.
CONCATENATE 'EORD-LIFNR(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-LIFNR.
CONCATENATE 'EORD-RESWK(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-RESWK.
CONCATENATE 'EORD-EBELN(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-EBELN.
CONCATENATE 'EORD-EBELP(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-EBELP.
CONCATENATE 'RM06W-FESKZ(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-FESKZ.
CONCATENATE 'EORD-NOTKZ(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-NOTKZ.
CONCATENATE 'EORD-AUTET(' s_count ')' INTO v_fnam.
PERFORM bdc_field USING : v_fnam it_final-AUTET.
AT END OF werks.
PERFORM bdc_field USING 'BDC_OKCODE' '=BU'.
REFRESH it_messtab[].
CALL TRANSACTION 'ME01' USING it_bdcdata
OPTIONS FROM it_ctu_params
MODE 'A'
UPDATE 'L'
MESSAGES INTO it_messtab.
IF SY-SUBRC NE 0.
it_err_rec-matnr = it_final-matnr.
it_err_rec-werks = it_final-werks.
it_err_rec-vdatu = it_final-vdatu.
it_err_rec-bdatu = it_final-bdatu.
it_err_rec-lifnr = it_final-lifnr.
it_err_rec-ekorg = it_final-ekorg.
it_err_rec-reswk = it_final-reswk.
it_err_rec-ebeln = it_final-ebeln.
it_err_rec-ebelp = it_final-ebelp.
it_err_rec-feskz = it_final-feskz.
it_err_rec-notkz = it_final-notkz.
it_err_rec-autet = it_final-autet.
APPEND it_err_rec.
CLEAR it_err_rec.
PERFORM format_message.
ENDIF.
ENDAT.
ENDLOOP.
**To Upload the Error Records into another Excel File
IF NOT it_err_rec[] IS INITIAL.
PERFORM errors_file.
DESCRIBE TABLE it_err_rec LINES v_err_rec.
v_errors = v_err_rec - 1.
ELSE.
v_errors = 0.
ENDIF.
v_updated = v_lines - v_errors.
WRITE : /2 'RUN DATE :' color COL_NORMAL, 20 sy-datum,
/2 'RUN TIME :' color COL_NORMAL, 20 sy-uzeit.
SKIP 2.
WRITE : /2 'FILE PATH :' color COL_NORMAL, 20 p_fname.
SKIP 2.
WRITE : /2 'RESULTS' color COL_NORMAL.
SKIP.
WRITE : /2 'Number of Rows in the Upload File :' color COL_NORMAL, v_lines,
/2 'Number of Rows Updated :' color COL_NORMAL, v_updated,
/2 'Number of Error Records :' color COL_NORMAL, v_errors.
IF it_errmsg[] IS NOT INITIAL.
SKIP 2.
WRITE : /2 'Details of the Error Records' color COL_NORMAL.
SKIP.
ULINE.
FORMAT COLOR COL_NORMAL.
WRITE : /2 'Material',
22 'Plant',
28 'Valid From',
40 'Valid To',
52 'Vendor',
64 'Porg',
70 'PPL',
76 'Agreement',
88 'Item',
94 'Fix',
98 'Blk',
102 'MRP',
106 'Err. Description'.
FORMAT COLOR OFF.
ULINE.
LOOP AT it_errmsg.
AT NEW autet.
WRITE : /2 it_errmsg-matnr,
22 it_errmsg-werks,
28 it_errmsg-vdatu,
40 it_errmsg-bdatu,
52 it_errmsg-lifnr,
64 it_errmsg-ekorg,
70 it_errmsg-reswk,
76 it_errmsg-ebeln,
88 it_errmsg-ebelp,
94 it_errmsg-feskz,
98 it_errmsg-notkz,
102 it_errmsg-autet.
ENDAT.
WRITE 106 it_errmsg-messg.
ENDLOOP.
ENDIF.
E N D O F S E L E C T I O N *
END-OF-SELECTION.
*& Form file_get
Selects the File Name and Path
FORM file_get .
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
EXPORTING
PROGRAM_NAME = v_repid
DYNPRO_NUMBER = SYST-DYNNR
FIELD_NAME = p_fname
CHANGING
FILE_NAME = p_fname
EXCEPTIONS
MASK_TOO_LONG = 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.
ENDFORM. " file_get
*& Form upload_xcel
Uploading data to an Internal Table
FORM upload_xcel .
DATA: BEGIN OF it_intern OCCURS 0.
INCLUDE STRUCTURE ALSMEX_TABLINE. " Rows for Table with Excel Data
DATA: END OF it_intern.
DATA v_no_rows TYPE i VALUE 9999.
FIELD-SYMBOLS : <fs1>.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
FILENAME = P_FNAME
I_BEGIN_COL = c_1
I_BEGIN_ROW = c_1
I_END_COL = c_12
I_END_ROW = v_no_rows
TABLES
INTERN = it_intern
EXCEPTIONS
INCONSISTENT_PARAMETERS = 1
UPLOAD_OLE = 2
OTHERS = 3.
IF SY-SUBRC NE 0.
MESSAGE text-016 TYPE 'I'.
ENDIF.
LOOP AT it_intern.
ASSIGN COMPONENT it_intern-col OF STRUCTURE
it_final TO <fs1>.
IF sy-subrc NE 0.
EXIT.
ENDIF.
<fs1> = it_intern-value.
AT END OF row.
APPEND it_final.
CLEAR it_final.
ENDAT.
Endloop.
FREE it_intern.
***To Delete the Headings from the Internal Table.
DELETE it_final WHERE matnr CA 'MATmat'.
ENDFORM. " upload_xcel
*& Form bdc_dynpro
Populate Screen Name
FORM bdc_dynpro USING PROGRAM
DYNPRO.
CLEAR it_bdcdata.
it_bdcdata-PROGRAM = PROGRAM.
it_bdcdata-DYNPRO = DYNPRO.
it_bdcdata-DYNBEGIN = 'X'.
APPEND it_bdcdata.
ENDFORM. " bdc_dynpro
*& Form bdc_field
Populate Screen Field
FORM bdc_field USING FNAM
FVAL.
IF FVAL <> SPACE.
CLEAR it_bdcdata.
it_bdcdata-FNAM = FNAM.
it_bdcdata-FVAL = FVAL.
APPEND it_bdcdata.
ENDIF.
ENDFORM. " bdc_field
*& Form bdc_field
Populate Screen Field
FORM bdc_field1 USING FNAM
FVAL.
CLEAR it_bdcdata.
it_bdcdata-FNAM = FNAM.
it_bdcdata-FVAL = FVAL.
APPEND it_bdcdata.
ENDFORM. " bdc_field
*& Form errors_file
Downloads the Error Records
FORM errors_file .
DATA : l_fname TYPE string,
l_var1 TYPE string,
l_var2 TYPE string.
l_fname = p_fname.
SPLIT l_fname at '.' into l_var1 l_var2.
CONCATENATE l_var1 '_error.' l_var2 INTO l_fname.
**To Write the Headings in the Excel File
it_err_rec-matnr = text-003.
it_err_rec-werks = text-004.
it_err_rec-vdatu = text-005.
it_err_rec-bdatu = text-006.
it_err_rec-lifnr = text-007.
it_err_rec-ekorg = text-008.
it_err_rec-reswk = text-009.
it_err_rec-ebeln = text-010.
it_err_rec-ebelp = text-011.
it_err_rec-feskz = text-012.
it_err_rec-notkz = text-013.
it_err_rec-autet = text-014.
INSERT it_err_rec INDEX 1.
CLEAR it_err_rec.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
FILENAME = l_fname
FILETYPE = 'DAT'
APPEND = ' '
CONFIRM_OVERWRITE = ' '
TABLES
DATA_TAB = it_err_rec
EXCEPTIONS
FILE_WRITE_ERROR = 1
NO_BATCH = 2
GUI_REFUSE_FILETRANSFER = 3
INVALID_TYPE = 4
NO_AUTHORITY = 5
UNKNOWN_ERROR = 6
HEADER_NOT_ALLOWED = 7
SEPARATOR_NOT_ALLOWED = 8
FILESIZE_NOT_ALLOWED = 9
HEADER_TOO_LONG = 10
DP_ERROR_CREATE = 11
DP_ERROR_SEND = 12
DP_ERROR_WRITE = 13
UNKNOWN_DP_ERROR = 14
ACCESS_DENIED = 15
DP_OUT_OF_MEMORY = 16
DISK_FULL = 17
DP_TIMEOUT = 18
FILE_NOT_FOUND = 19
DATAPROVIDER_EXCEPTION = 20
CONTROL_FLUSH_ERROR = 21
OTHERS = 22.
IF SY-SUBRC EQ 0.
MESSAGE text-015 TYPE 'S'.
ENDIF.
ENDFORM. " errors_file
*& Form format_message
To Write the Error Records
FORM format_message .
IF NOT it_messtab[] IS INITIAl.
LOOP AT it_messtab.
IF it_messtab-msgtyp = 'E'.
CALL FUNCTION 'FORMAT_MESSAGE'
EXPORTING
ID = it_messtab-msgid
LANG = sy-langu
NO = it_messtab-msgnr
V1 = it_messtab-msgv1
V2 = it_messtab-msgv2
V3 = it_messtab-msgv3
V4 = it_messtab-msgv4
IMPORTING
MSG = v_message
EXCEPTIONS
NOT_FOUND = 1
OTHERS = 2.
IF SY-SUBRC EQ 0.
it_errmsg-matnr = it_final-matnr.
it_errmsg-werks = it_final-werks.
it_errmsg-vdatu = it_final-vdatu.
it_errmsg-bdatu = it_final-bdatu.
it_errmsg-ekorg = it_final-ekorg.
it_errmsg-lifnr = it_final-lifnr.
it_errmsg-reswk = it_final-reswk.
it_errmsg-ebeln = it_final-ebeln.
it_errmsg-ebelp = it_final-ebelp.
it_errmsg-feskz = it_final-feskz.
it_errmsg-notkz = it_final-notkz.
it_errmsg-autet = it_final-autet.
it_errmsg-messg = v_message.
APPEND it_errmsg.
CLEAR : it_errmsg, v_message.
ENDIF.
ENDIF.
ENDLOOP.
ENDIF.
ENDFORM. " format_message
*& Form plant_conversion
Adding preceeding Zeroes
-->P_IT_FINAL_WERKS text
FORM plant_conversion USING P_VAR.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
INPUT = P_VAR
IMPORTING
OUTPUT = P_VAR.
ENDFORM. " plant_conversion
Hope it helps!!!
Regards,
Pavan -
Table Header not Recurring - when Generate PDF from HTML with tables
Hello, It is not working as expected...and I'm not sure if the functionality is supported. Want to create PDF from html document. The html document contains a html table that typically contains a large number of rows. To make reading easier the html table used thead and tbody elements, and their children, so that when the table extends across pages when printed the header element recurs on each page. However, the header element is not recurring in the generated PDF document (it only occurs in the first row of the table). Just wondering if you have tried or used this functionality (created PDF from html with table with headers and the PDF included the table with recurring table header. And if so, did you do anything special to make it work. Thanks for any insight.
If there's a problem with that package, I suggest you speak to the developer of that package and ask them to investigate. It's not an Oracle supplied package so you are wrong to look for help here.
-
Really need help with re-number rows
I am trying to update the Precedence value for each row based on its order in the ORDER BY clause. What I am doing is I allow users to insert rows above or below other rows. This is done by adding 0.5 or -0.5 to the PRECEDANCE value of the row they are inserting above or blow. Once this is done I need to update all rows with a new hole number PRECIDANCE value getting ready for the next insert.
Any help would be great, even an entirely different way!
UPDATE
TABLE_A TBL_A
SET
TBL_A.PRECEDENCE = (ROWNUM * 10)
WHERE
TBL_A.EMP_ID in
select
EMP_ID,
PRECEDENCE
from(
select
TBL_A.EMP_ID,
TBL_A.PRECEDENCE
from
TABLE_A TBL_A
where
TBL_A.OTHER_ID = :THIS_ID
order by
2,
1
)On average, though, Andrew's procedure will update half the rows in the table on every insert (assuming that your inserts occur between two rows at random). If there are a lot of rows in the table or if there are a lot of inserts, this may not scale particularly well. It may also cause problems if you have an optimistic locking mechanism in place to handle multiple users updating the table simultaneously.
I'd still do something like
CREATE OR REPLACE PROCEDURE insert_after( p_prior_precedence IN NUMBER,
p_row IN <<table name>>%rowtype )
AS
l_next_precedence NUMBER;
BEGIN
SELECT MIN(precedence)
INTO l_next_precedence
FROM <<table>>
WHERE precedence > p_prior_precedence;
p_row.precedence := (p_prior_preceddence + l_next_precedence) / 2;
INSERT INTO <<table>> VALUES p_row;
END;This way, you don't have to update any rows when you do an insert. You don't get integer precedence values, but this strikes me as a reasonable trade-off. If you want to re-number things either at query time
SELECT <<columns>>
RANK() OVER (PARTITION BY <<something>> ORDER BY precedence) pretty_precedence
FROM <table name>>or as a nightly job, that would work.
Justin
Distributed Database Consulting, Inc.
http://www.ddbcinc.com/askDDBC -
How to copy a record with an Automatic Row Processing (DML) ?
Hi,
I want to duplicate (to copy) a record.
I have a form, with an Automatic Row Processing (DML), looking for the PK stored into an item named P26_ID and populating the values into the corresponding items of the form.
I have an Automatic Row Processing (DML) which permit to update, delete and modify the row.
So far so good.
I thought it would be good if I calculate a new value for the PK and stored it into the P26_ID.
Then I thought the Automatic Row Processing (DML) would see that it is a new value for the PK and would "decide" insert a new record.
But it does not work like that. I thought it was because the item P26_ID is database column type; so I switched to another item named P26_ID_NEW and put this new pk into this item. I then created another Automatic Row Processing (DML), triggered by this button, and which will look into this new item. It does not work either.
Where do i go wrong ?
Thank you for your kind help !
ChristianChristian:
Assuming that the 'Duplicate' function is available only when the page is in 'Edit' mode, ie. a record has already been loaded into the form you can do the following to duplicate this record
1) Define a button named 'Duplicate'
2) Set the target of this button to be 'URL'
3) Set the URL for this button to be
javascript:duplicate();
4) Add this bit of JS into the page HTML header<script>
function duplicate() {
$s('<name_of_PK_page_item>','');
doSubmit('CREATE');
</script>Varad -
Generate XML report then display like HTML with specified formate
Hello,friends
I want to generate XML report then use XSL to parse it,report will display like HTML with specified formate like attachment,any ideas?
Thank you
AlbHi Ray,
I don't why I can not upload any format picture,so I listed the display as below:
Test Result Company Logo
SN 1111 User Operator
Status Fail Factory SE
Product xxx Tester xxx
Start time xxx Line xxx
Test time xxx
NAME STATUS VALUE LOW HIGH RULE
1.0 Pass/Fail Test Passed True True EQ
2.0 Less than Test Failed 15 10 LT
3.0 String Value Test Passed A string from the limit file A string
End of Report
Could you give me some suggestions?
Thanks a lot
Alb -
I've recently been given a macbook pro from uni, with lots of adobe software on. I want to pair it with my iMac which has music etc and is it possible to get the software to the imac and the files to the macbook?Giving me the best of both :-)
You would need the original installation disks or files for the Adobe software to get it onto your iMac, and having it on two computers may not be allowed by your university's licensing. Talk to whoever issued the MacBook.
As to the music, just copy it over to the MacBook, either via Home Sharing, file sharing, or an external storage medium (hard drive, USB flash drive, etc.).
Regards. -
Hello, I downloaded an ntfs systemfile from tuxera and used it to convert a usb stick so I could put more than the fat32 4gb on, my Imac froze a while after so I turned it off the on and now I have blue vertical lines on boot up and the a white screen with lots of tine blue symbols after, mouse pointer moves but thats about it.
Have used R and cmd to get a menu up but once I choose one of the four options my mouse is rendered useless and I cant get any further, have downloaded, to another usb stick recovery disk assisstant and am trying to use that in conjunction with the lion option on the previously mentioned screen, computer was responding really slowly and has now frozen on the terms of software license agreement (maybe the last hurdle!) can anyone pleeeeeease help!!!!!??????It's likely that the boot drive is failing, or that there's some other hardware fault. Run the Apple Hardware Test.
Intel-based Macs: Using Apple Hardware Test
Even if the test is negative, you should make a "Genius" appointment at an Apple Store to have the machine tested more thoroughly. -
I have a Word doc with lots of Excel/Pdf attached doc inside. Can I convert this word doc in PDF keeping the attached documents inside the PDF? or do I have to attach all af them again? thank in advance
Attach all of them again.
Be well... -
Can you share photos between computers on a local time machine network? I have iMac with lots of pictures I would like to view on my MacBook Air. Does anyone know how to do this?
Can you share photos between computers on a local time machine network? I have iMac with lots of pictures I would like to view on my MacBook Air. Does anyone know how to do this?
-
My iPad colors are fuzzy with lots of reds and purples. Looks like my digital camera when it needs to be recharged if that helps describe the issue. Can anyone help?
Next step is to back up and restore via iTunes. If the problem continues, restore as a new device and test. If the problem is solved, there is some kind of corruption in your backup file. If it continues, take it to an Apple store for evaluation of a possible hardware problem.
Maybe you are looking for
-
Multiple account assignment and copy of po line item quantity to x lines
Hi, I am wandering if it is possible to automate the copy of the first line presented for 10pc in multiple account assignment screen on PO line item level to 10 lines with quantity 1 in the same multiple account assignment screen. This is of course
-
I have had this problem several times lately: I cannot open a downloaded pdf file. The error message reads: "The file couldn't be opened because it isn't in the correct format." But, of course, it is a pdf file.
-
Can't start applications after sleep
Twice now, after waking from sleep, I have been unable to launch any applications. They will bounce endlessly in the dock and activity monitor, but never open correctly. Also, they are not force-quittable. Eventually I have to hard-reboot. On reboot,
-
Lightroom 3 forgets catalog location
Lightroom 3 on Snow Leopard forgets where my catalog is every time I restart my computer. LR remembers just fine if I shut LR down and re-open it, but once I re-boot the computer I receive an error message saying it can't find the default catalog an
-
Overwrite a single field entry in the ZTABLE
Hi ALL, I have to overwrite a single field entry in the ZTABLE . How can I do it so the previous field entry is replaced by new one. Thanks in ADVANCE!!!