MSI P965 + C2D E6400 - New PC with lots of Errors and Restart Randomly
My System:
CPU: Intel C2D E6400
MOBO: MSI P965 NEO-F
BIOS Ver: 1.5
RAM: TWINMOS 5300/667 DDR2 – 2x 512MB
HD: Seagate 160GB SATA II
VIDEO: ASUS EN7600GT
PSU: ACBEL I-Power 550w with Active PFC
OS: Win XP Pro SP2
NO OVER-CLOCKING!
My Problem
Immediately after installation, my will have lots of citrical errors and many times, the monitor just went blank and PC restart.
What I have done:
Updated BIOS to 1.6. THE SAME PROBLEM.
I suspect that it was the RAM, so using only 1x 512MB RAM, that system was Stable. (For Both my RAM – thus, RAM was good)
That makes me suspect that the MOBO. So I place Both the RAM from DIMM Slot 1 & 3 to Slot 2 & 4. The System was Stable.
Back to Slot 1 & 3, THE SAME PROBLEM.
To me, confirmed MOBO faulty and went to change the MOBO.
With the NEW MOBO (same model), THE SAME PROBLEM.
Now I am running my System with RAM in Slot 2 & 4 for 1 week and the System is Stable.
Can someone advise me what the problem? What if in the future I need to add more RAM?
Thanks
Quote from: Blazer on 29-December-06, 09:50:59
increase your ddr voltage, run memtest86+ and correct all memory errors.
list your power supply specs from label on psu.
Active PFC 550 Watts
Voltage Min Max
+5V 1.0A 30.0A
+3.3V 0.5A 28.0A
+12V1 1.0A 12.0A
+12V2 1.0A 22.0A
+12V3 1.0A 14.0A
-12V 0.0A 1.0A
+5Vs 0.05A 2.0A
Similar Messages
-
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.
-
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 -
I just got tOhe iPhone 4Gs today and had contacts and photos uploaded from another phone synced new phone with iTunes for music and accidentally restored it so all my old iPhone stuff is on the new one is there any way to fix this ?! Please help !!!!
Could you be more specific about what exactly do you want to fix now?
-
I just purchased a new PC with windows 8.1 and downloaded new itunes, but when I try to "restore" my music library from the DVDS i made from my old pc it doesn't automatically restore my library as it used to. How do I restore my music library from DVDS?
Thanks but I already did read all of the help notes, which aren't very helpful for this. I did find out the problem- Apple.....they evidently changed one of the major upsides to their old software- being able to back up your entire library onto dvd's- so you can longer do that or restore from the dvds created from older versions of itunes. I suspect greed is at play in that Apple now wants you to pay $24.95 per year to use a "cloud" service where they back it up for you. I can buy a lifetime supply of back up dvds for one year's worth of cloud. So I am now looking into other music software as I am Appled-out. There is no reason for them to take away the back up portion of the software other than to sell you thrir cloud service. As we have already given them a ton of money for 5 Ipods and a bunch of music, I think we have contributed enough. Time to look to solutions outside of the Apple money tree. But thank you for reading and replying.
-
Just bought new pc with Windows 8.1 and cannot re-install InDesign CS3. Can anyone help?
Hi Dale,
You can follow the article: System requirements | InDesign to check whether CS3 products can work on InDesign CS3.
Also please let me know what error message you are getting while re installing InDesign.
Thanks,
Ratandeep Arora -
Got new computer with windows 8.1 and installed latest itunes, went to update music library on my nano 5th gen and plugged in recognized in my library but when it synced , it said sync was complete but did not update at all, then reset the ipod to factory , BIG MISTAKE plugged in again and it did the same thing except now I have no music on at all it syncs but will not put any music on , previous computer had xp on it, what would the problem be and what would solution be????
Thanksc) unistalled and reinstalled iTunes
Doublechecking. Have you also tried a complete uninstall of both iTunes and all the other related software components and then a reinstall? If not, try the instructions from the following document:
Removing and reinstalling iTunes and other software components for Windows Vista, Windows 7, or Windows 8 -
I had an early version of Photoshop (2.0 I think) that worked perfect on windows vista. I bought a new laptop with windows 8.1 and the Photoshop won't install. Which version of Photoshop compatible with Windows 8.1 is closest to the older Photoshop?
I think you mean Photoshop CS2. Photoshop 2 is from around 1992. The old Adobe activation servers were taken down. CS2 is about a decade old Adobe made a new download for old customers that legal customers can download and install. Download Acrobat 7 and CS2 products
-
Im trying to install Photoshop Elements premier 12 on my new Mac with the latest update and i keep getting the same failed to initialise message. I was able to register the key code at first but now im not able to either open the program or reinstall it.
What is "Photoshop Elements Premier 12"? Do you mean Photoshop Elements or Premiere Elements? Were your files copied over from a previous mac that had PSE installed on it?
-
My daughter just synched her new iphone with her itunes account and it wiped out her contacts and pictures. Is there any way to recover them?
Sorry, unless she backup up the new phone before or is using iCloud to save the photos, the photos are gone.
-
new help with my mac air and airport extreme time capsule dont know how to save to time capsule and use as a external hd would like 2 store my home videos and pictures on the time machine (ONLY) as the MAC AIR has storage space limited space please help. THANK YOU.
See the info here about sharing or using the TC for data.
Q3 http://pondini.org/TM/Time_Capsule.html
It is extremely important you realise.. the Time Capsule was never designed for this.
It is a backup target for Time Machine.. that is the software on the computer that does backups.. it has no direct connection to the Time Capsule.
It has no ability to back itself up.. unlike all other NAS in the market. It is therefore likely one day you will lose all your files unless you seriously work out how to backup.
The TC is slow to spin up the hard disk and fast to spin down. iTunes and iPhoto will continually lose connection to their respective libraries.
iPhoto in particular is easy to corrupt when you move photos over wireless into the library.. once corrupted all is corrupt. A single photo will ruin it all.. so backup is utterly essential.
Time Machine cannot do backups of network drives. ie the TC. You will need a different backup software like CCC. You will then need another target to backup to.. -
Every time i try to update or restore my iPhone 4 (5.1) it tells me a lot of errors and it stuck in recovery mode :/ any help?
Well, if you want or need help, it would be a good idea to start with telling us what those errors are. We're not mind readers.
-
my ipod touch is not responding when i plugged it in even with a different cord and restarting my computer and i am using my moms itunes that she has had for a long time and so i cant uninstall itunes.
Try:
- iOS: Not responding or does not turn on
- Also try DFU mode after try recovery mode
How to put iPod touch / iPhone into DFU mode « Karthik's scribblings
- If not successful and you can't fully turn the iOS device fully off, let the battery fully drain. After charging for an least an hour try the above again.
- Try on another computer
- If still not successful that usually indicates a hardware problem and an appointment at the Genius Bar of an Apple store is in order.
Apple Retail Store - Genius Bar -
MSI P965 Neo motherboard New Bios version 1.7
Hi all,
I have notice that msi has release a new bios, version 1.7, for the p965 neo mobo. Has anybody tried it and has any info to share with us?
I want to upgrade but I am not sure if this is a good upgrade. Does anyone knows what is the "Intel Presler SL9QR CPU" fix so I choose to upgrade or not?
Thanks a lot,
PhanosQuote from: Phanos on 02-April-07, 03:26:51
Hi all,
I have notice that msi has release a new bios, version 1.7, for the p965 neo mobo. Has anybody tried it and has any info to share with us?
I want to upgrade but I am not sure if this is a good upgrade. Does anyone knows what is the "Intel Presler SL9QR CPU" fix so I choose to upgrade or not?
Thanks a lot,
Phanos
create a sig, https://forum-en.msi.com/index.php?topic=25959.0
never flash a bios that includes updates that donot apply to you, NEVER. -
Hi All
I have an account with USA adress ,asked to have anew one in my country , so I can add my visa card to it ,because my visa card not carry USA addrres,
my questions
how can I transfer all APPs, and my note ,and every thng to the new account ,is this easy ?
updating these APP trnsferd frome old account is it posiple later ?
all thischanges to buy storge on icloud wich I cant do on my old account, can I creat an accout only for Icloud to buy storge to use it in my old accout were I need it ?
Message was edited by: Nalharbyi think icloud should let you update your purchases so that the games will sync to your new computer and they will be backed up. i am not sure how to do this so you do not lose the levels you have completed.
if not can you export the game to the new computer with the current settings?
or another way is to sync to the new computer and redo all the levels you have completed again and it should take you less time?
Maybe you are looking for
-
Report Format... plz help
Hi All, I am facing a problem in getting the report in proper format. Can anyone help? Scenario: ODS 1 gives the following Data for Jan, 2010: Material--total Sale-- % of total sale M1--4000.00-- 40% M2--6000.00-- 60% ODS2 has the transaction perform
-
Does having a guest network decrease the power of the main network?
I set up a guest network when I set up my Airport Extreme ... not sure why I did this exactly. I have moved into a larger home and now have some issues with the router reaching the entire unit. (It does actually cover it all ... but very weak in the
-
Ipod touch 4th generation always zooming
My ipod touch 4th generation is always zooming ! Help please. many thanks.
-
Performance Appraisal documents display on portal
Hi All I am working on PMS in EHP 6 environment. We have implemented column layout configuration for documents. My query is in the attached screen shot , how can we reduce the blank space between two columns. Also , is there any way to increase the w
-
We create fillable forms for our clients using Adobe, when they bundle the forms, some fo the fillable fields are becomming non fillable. I think the problem has something to do with the compatability of the field names among the form bundle. Any i