Pls tell me how automatically delete the messages in trash i

Dear bro.
pls tell me how to delete the messages in trash if is there for more than 7 days. i want to enable the feature to delete the messages automatically from mailboxe's trash folders if it is there for more then 7 days help will be appreciated
with regards
shafat

Check out the documentation on "expire". Since I don't know what version Messaging server you're running, how can I point you to the right documentation?
Both Messaging 5.2 and 6.2 have a way to automatically expire messages.

Similar Messages

How to delete the messages from SXMB_MONI which are already cancelled .

Hi All,
The messages were earlier in System error(Red flag) state so i cancelled it manually.
I want to know how to delete the messages from sxmb_moni which are already cancelled manually using ctrl+f8.
if not possible , then i want to see them in earlier state i.e.., in System error(Red flag).
can any tell me the procedure of doing it.
thanks
Sai.

Hi AmitSri,
Thanks for u r reply,
What is retention period, where can i find this option.
And i don't have authorizations to sxmb_adm --> configure delete procedure
--> Define interfaces for archiving and retention period.
and to RSXMB_DELETE_MESSAGES in se38 , i don't have authorizations to run
Is there any way to delete the messages or make them to System error( Red flag) which are manually cancelled.
Thanks
Sai.
Edited by: sai_SHA on Aug 17, 2011 12:29 AM

Hi, since the last update i find my rented movies remained under rented although unplayable. now i find some, as before the update, are deleting fully - can anyone tell me how to delete the unwatchable covers that remain?

hi, since the last update i find my rented movies remained under rented although unplayable. now i find some, as before the update, are deleting fully - can anyone tell me how to delete the unwatchable covers that remain?

bunjamin wrote:
There is now a new line in BBM that wasn't there before which covers the message that I am typing, so I can't actually see what I am typing.
Hi bunjamin,
just go to BlackBerry World, and update all your apps including BBM.
bunjamin wrote:
Every time I unlock my phone, my screen enlarges so I can't really see much on the hub/notification screen and it defaults to the hub which it didn't do before).
you can turn off the magnifying glass :
device settings >> accessibility >> magnify mode >> OFF
you can deactivate the "reset to Hub view" :
hub >> overflow (bottom right button) >> Settings >> Display and actions >> Return to Default View When Idle >> OFF
bunjamin wrote:
my ringtone is much softer than it was previously
yes, BlackBerry has acknowledged this bug in this article from the public knowledge base:
KB36755 After upgrading BlackBerry 10 OS to version 10.3.1 the volume for notifications is noticed to be significantly lower than in the previous version
The search box on top-right of this page is your true friend, and the public Knowledge Base too:

How to delete the messages in the purges folder?

if the mailbox is enabled the single item recovery, then the messages would move from deletion folder to the purges folder After running the following script,
Search-Mailbox dave -searchdumpsteronly
-deletecontent
so my question is how to delete the messages in the purges folder with some script or retention policy?
Please click the Mark as Answer button if a post solves your problem!

Thank you all,
As the mailbox is enabled single item recovery.
I just want to make the items neither in deletion folder, nor in purges folder.
So I think there are two ways to achieve this.
Method 1,disabled the single item recovery. then delete the items in deletion folder ,so it wouldn't enter to the purges folder, it just deleted permanently. then enable the single item recovery
Method 2,delete the items in deletion folder,then the messages move to the purges folder, then delete the messages in purges folder.
the Method 1 is not so good ,as it need to disable the single item recovery firstly, then enable single item recovery .
So I want to use the Method 2
Please click the Mark as Answer button if a post solves your problem!

How to delete the messages from sxmb_moni with status cancelled

Hi ,
how to delete the messages from sxmb_moni with status cancelled
Is there any report for this
Regards
Suman

I think just for deleting the jobs you can do this only
Scheduling Delete Jobs
To schedule delete jobs, proceed as follows:
       1.      In the Integration Engine -
> Administration menu, choose Schedule Delete Jobs.
       2.      Select the job(s) to be scheduled.
       3.      Specify the start time and date.
       4.      Specify the period you want to use and choose Schedule.
For an overview of all jobs, choose Jobs.

How to delete the messages from JMS Queue

Hi,Can anybody help how to delete the messages from the JMS Queue.Thanks in advance.

You can dequeue the message using a JMS client or delete it using Weblogic Admin Console -
http://download.oracle.com/docs/cd/E17904_01/apirefs.1111/e13952/taskhelp/jms_modules/queues/ManageQueues.html
Regards,
Anuj

How to delete the messages in message monitoring

hi all,
can anyone tell me is there any way to delete the messages in message monitoring.

Hi,
Please Refer these Blogs
/people/prasad.illapani/blog/2007/03/08/performance-tuning-checks-in-sap-exchange-infrastructure
/people/prasad.illapani/blog/2007/04/20/performance-tuning-checks-in-sap-exchange-infrastructurexi-part-ii
/people/prasad.illapani/blog/2007/04/27/performance-tuning-checks-in-sap-exchange-infrastructurexi-part-iii
Reward Points if Helpful
Regards
sasi

How to delete the messages in clock-in/clock-out

Hi All,
I need to delete the messages in clock-in/clock-out which are appearing in portal, to delete this messages is there any report at R/3 side kindly suggest me help me in this
waiting for your responses .....
Regards,
Shilpa.

you can run the report RPUP1D00 for the periods that you need to delete
the messages without any problems, but please read the documentation
carefully before starting.
Please note, that RPTERR00 always reports ALL errors. It does not matter
in which period they appeared. Please destinguish between errors and
notes.
The errors which appear during a time evaluation run are stored in table
ERT in cluster B1 and in table FEHLER in cluster B2 are intended to
store and display those errors as long as the errors are not corrected.
If you don't want these errors to be displayed any more you either have
to correct the errors or you must delete Cluster B1 via report RPUP1D00.
The old NOTES are transferred from the ERT/B1 to FEHLER/B2 with each
subsequent run of time evaluation.
Your time administrators should normally work with PT40 and confirm
'I' messages or correct errors by using the error handling.
This report can be run like this
Relation ID   'B1'
Sort field    Pers.no. (eight-digit)
Delete?       X
Password      Username

How do I get this program to automatically delete the messages it pulls from my online email off my online email?

When the emails get downloaded from my online email they stay on my online email causing it do past its storage limit. How can I set this to delete the emails from my online account once it has emailed?

Application Basics
Name: Thunderbird
Version: 24.5.0
User Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:24.0) Gecko/20100101 Thunderbird/24.5.0
Profile Folder: Show Folder
(Local drive)
Application Build ID: 20140424091057
Enabled Plugins: about:plugins
Build Configuration: about:buildconfig
Crash Reports: about:crashes
Memory Use: about:memory
Mail and News Accounts
account1:
INCOMING: account1, , (imap) mail.reforyou.net:143, alwaysSTARTTLS, passwordCleartext
OUTGOING: mail.reforyou.net:587, alwaysSTARTTLS, passwordCleartext, true
account2:
INCOMING: account2, , (none) Local Folders, plain, passwordCleartext
Extensions
Important Modified Preferences
Name: Value
browser.cache.disk.capacity: 358400
browser.cache.disk.smart_size.first_run: false
browser.cache.disk.smart_size.use_old_max: false
browser.cache.disk.smart_size_cached_value: 358400
extensions.lastAppVersion: 24.5.0
font.name.monospace.el: Consolas
font.name.monospace.tr: Consolas
font.name.monospace.x-baltic: Consolas
font.name.monospace.x-central-euro: Consolas
font.name.monospace.x-cyrillic: Consolas
font.name.monospace.x-unicode: Consolas
font.name.monospace.x-western: Consolas
font.name.sans-serif.el: Calibri
font.name.sans-serif.tr: Calibri
font.name.sans-serif.x-baltic: Calibri
font.name.sans-serif.x-central-euro: Calibri
font.name.sans-serif.x-cyrillic: Calibri
font.name.sans-serif.x-unicode: Calibri
font.name.sans-serif.x-western: Calibri
font.name.serif.el: Cambria
font.name.serif.tr: Cambria
font.name.serif.x-baltic: Cambria
font.name.serif.x-central-euro: Cambria
font.name.serif.x-cyrillic: Cambria
font.name.serif.x-unicode: Cambria
font.name.serif.x-western: Cambria
font.size.fixed.el: 14
font.size.fixed.tr: 14
font.size.fixed.x-baltic: 14
font.size.fixed.x-central-euro: 14
font.size.fixed.x-cyrillic: 14
font.size.fixed.x-unicode: 14
font.size.fixed.x-western: 14
font.size.variable.el: 17
font.size.variable.tr: 17
font.size.variable.x-baltic: 17
font.size.variable.x-central-euro: 17
font.size.variable.x-cyrillic: 17
font.size.variable.x-unicode: 17
font.size.variable.x-western: 17
mail.openMessageBehavior.version: 1
mail.winsearch.firstRunDone: true
mailnews.database.global.datastore.id: 75c6cfec-47f7-49fb-a319-566f5b216ec
network.cookie.prefsMigrated: true
places.database.lastMaintenance: 1401835389
places.history.expiration.transient_current_max_pages: 104858
plugin.importedState: true
Graphics
Adapter Description: Intel(R) HD Graphics
Vendor ID: 0x8086
Device ID: 0x0402
Adapter RAM: Unknown
Adapter Drivers: igdumdim64 igd10iumd64 igd10iumd64 igdumdim32 igd10iumd32 igd10iumd32
Driver Version: 9.18.10.3186
Driver Date: 5-17-2013
Direct2D Enabled: false
DirectWrite Enabled: false (6.2.9200.16571)
ClearType Parameters: ClearType parameters not found
WebGL Renderer: false
GPU Accelerated Windows: 0
AzureCanvasBackend: skia
AzureFallbackCanvasBackend: cairo
AzureContentBackend: none
JavaScript
Incremental GC: 1
Accessibility
Activated: 0
Prevent Accessibility: 0
Library Versions
Expected minimum version
Version in use
NSPR
4.10.2
4.10.2
NSS
3.15.4 Basic ECC
3.15.4 Basic ECC
NSS Util
3.15.4
3.15.4
NSS SSL
3.15.4 Basic ECC
3.15.4 Basic ECC
NSS S/MIME
3.15.4 Basic ECC
3.15.4 Basic ECC

Pls tell me how to check the errors in BDC CALL TRANSACTION

lemme know

HI ,
check for the bold part..
REPORT ZCONCUR_UPLOAD_TO_SAP NO STANDARD PAGE HEADING
 LINE-SIZE 170
 LINE-COUNT 58
 MESSAGE-ID ZM.
 Internal Table *
*-Internal table for the Header input data from the Comma Delimited file
DATA: BEGIN OF IT_DATA_HEADER OCCURS 0,
 ID TYPE C, "Identifier
 BUKRS(6), "Company Code
 WAERS(7), "Currency
 NEWKO(12), "Vendor
 XBLNR(16), "First Name
 XBLNR1(16), "Last Name
 BLDAT(12), "Document/Posting date
 PK(15), "Reference
 WRBTR(15), "Amount
 BKTXT(27), "Doc.header text
 BKTXT1(27), "Item text
 SELNO(8), "Serial No
 END OF IT_DATA_HEADER.
*-Internal table for the item input data from the Comma Delimited file
DATA: BEGIN OF IT_DATA_ITEM OCCURS 0,
 ID TYPE C, "Identifier
 NEWKO(19), "Vendor
 BUKRS(6), "Company Code
 KOSTL(12), "Cost center
 WRBTR(15), "Amount
 SGTXT(50), "Text
 SELNO(8), "Serial No Header
 SELNO1(8), "Serial No item
 END OF IT_DATA_ITEM .
*-Internal table for the Header input data from the Comma Delimited file
*-Removing " " From Comma Delimited file
DATA: BEGIN OF IT_FINAL_HEADER OCCURS 0,
 ID TYPE C, "Identifier
 BUKRS LIKE BKPF-BUKRS, "Company Code
 WAERS LIKE BKPF-WAERS, "Currency
 NEWKO TYPE RF05A-NEWKO, "Vendor
 XBLNR LIKE BKPF-XBLNR,
 XBLNR1 LIKE BKPF-XBLNR,
 BLDAT(10), " LIKE BKPF-BLDAT, "Date
 PK(15), "Reference
 WRBTR(15), "Amount
 BKTXT LIKE BKPF-BKTXT, "Doc.header text
 BKTXT1 LIKE BKPF-BKTXT, "Item text
 SELNO TYPE I, "Serial No
 FLAG TYPE C,
 END OF IT_FINAL_HEADER.
*-Internal table for the Item input data from the Comma Delimited file
*-Removing " " From Comma Delimited file
DATA: BEGIN OF IT_FINAL_ITEM OCCURS 0,
 ID TYPE C, "Identifier
 NEWKO TYPE RF05A-NEWKO, "Account
 BUKRS LIKE BKPF-BUKRS, "Company Code
 KOSTL LIKE BSEG-KOSTL, "Cost Center
 WRBTR(15), "Amount
 SGTXT LIKE BSEG-SGTXT, "Text
 SELNO TYPE I, "Serial No
 SELNO1 TYPE I, "Serial No
 END OF IT_FINAL_ITEM.
**-Internal table for the input data from the file
DATA : BEGIN OF P_DOWNLOAD OCCURS 0,
 V_FILEREC(1000) TYPE C,
 END OF P_DOWNLOAD.
*--- Internal Table for Success messages
DATA : BEGIN OF I_SUCC OCCURS 0,
 HEADER(50),
 MSG(100), "SUCCESS message
 END OF I_SUCC.
*--- Internal Table for error messages
DATA : BEGIN OF I_ERROR_LOG OCCURS 0,
 HEADER(50),
 MSG(100), "Error message
 END OF I_ERROR_LOG.
*--- Internal table for getting the BDC data
DATA : BEGIN OF IT_BDCDATA OCCURS 0.
 INCLUDE STRUCTURE BDCDATA. " Table to hold BDC data
DATA : END OF IT_BDCDATA.
*--- Internal table for reading the messages of call transaction
DATA : BEGIN OF IT_MESSAGE_TAB OCCURS 0.
 INCLUDE STRUCTURE BDCMSGCOLL. "Table to hold messages
DATA : END OF IT_MESSAGE_TAB.
 DATA DECLARATIONS *
DATA:
 V_ERROR_COUNTER TYPE I, " error records counter
 V_MSG(100), " used for Error message
 V_LINES TYPE I, " used for format message
 V_HEAD LIKE SY-CPROG, " Heading for report
 XMODE VALUE 'N', " EXECUTION MODE
 V_SUCCESS_COUNTER TYPE I, " Success records counter
 V_UNAME LIKE APQI-USERID, " User Name
 V_TOTAL TYPE I. " Total records uploaded
DATA : V_SELNO TYPE I.
DATA : V_CHECK TYPE I.
DATA : V_HEADER(50) TYPE C. "Header Information
DATA : V_SUCC_MSG LIKE BDCMSGCOLL-MSGV1."Success Message
DATA : V_ZERO(4) VALUE '0.00'. "Checking Zero
DATA : V_CHECK_ZERO LIKE BSEG-WRBTR. "Checking Zero
DATA : V_CHECK_ZERO1 LIKE BSEG-WRBTR. "Checking Zero
DATA : V_SYSTEMDATE LIKE BKPF-BUDAT.
DATA : V_VALUE TYPE I.
DATA : V_VALUE1 TYPE I.
DATA : V_VALUE2 TYPE I.
Flags
DATA:
 F_BDC_OPEN, " BDC session open check.
 F_CONTINUE_PROCESSING. " To continue further processing
 CONSTANTS *
CONSTANTS:
 C_SESSION_NAME LIKE APQI-GROUPID VALUE 'F-43', "Session
 C_X VALUE 'X'. " Used for falgs
 SELECTION SCREEN *
*--- Selection Screen with Block and title
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-038.
PARAMETER: P_FNAME LIKE RLGRAP-FILENAME DEFAULT
 'C:\Concur.txt'.
SELECTION-SCREEN END OF BLOCK B1.
AT SELECTION SCREEN ON VALUE-REQUEST
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FNAME.
CALL FUNCTION 'F4_FILENAME'
 IMPORTING
 FILE_NAME = P_FNAME
 EXCEPTIONS
 OTHERS = 1.
IF SY-SUBRC <> 0.
 MESSAGE E999 WITH 'Error in opening a file'(009).
ENDIF.
 Top-of-page *
TOP-OF-PAGE .
*---perform to display the standard header
PERFORM STANDARD_HEADER.
--START OF SELECTION--
START-OF-SELECTION.
Upload data
PERFORM UPLOAD_DATA.
move data to bdcdata internal table
PERFORM MOVE_DATA_F43.
*--- Posting the valid data to F-43
IF F_BDC_OPEN = C_X.
*---perform to close bdc group
 PERFORM CLOSE_GROUP.
ENDIF.
 END OF SELECTION *
END-OF-SELECTION.
CHECK F_CONTINUE_PROCESSING IS INITIAL.
PERFORM DISPLAY_REPORT.
*& Form MESSAGE_FORMAT
 MESSAGE FORMAT
FORM MESSAGE_FORMAT.
CLEAR V_MSG.
CALL FUNCTION 'FORMAT_MESSAGE'
 EXPORTING
 ID = IT_MESSAGE_TAB-MSGID
 LANG = 'EN'
 NO = IT_MESSAGE_TAB-MSGNR
 V1 = IT_MESSAGE_TAB-MSGV1
 V2 = IT_MESSAGE_TAB-MSGV2
 V3 = IT_MESSAGE_TAB-MSGV3
 V4 = IT_MESSAGE_TAB-MSGV4
 IMPORTING
 MSG = V_MSG
 EXCEPTIONS
 NOT_FOUND = 1
 OTHERS = 2.
IF SY-SUBRC <> 0.
 V_MSG = SPACE.
ENDIF.
ENDFORM. " MESSAGE_FORMAT
*& Form F4_HELP
FORM F4_HELP.
CALL FUNCTION 'WS_FILENAME_GET'
 EXPORTING
 DEF_FILENAME = ' '
 DEF_PATH = 'C:\'
 MODE = 'O'
 TITLE = TEXT-025 "'Upload File'
 IMPORTING
 FILENAME = P_FNAME
 EXCEPTIONS
 SELECTION_CANCEL = 3
 SELECTION_ERROR = 4.
CASE SY-SUBRC.
 WHEN 3.
 MESSAGE I000 WITH TEXT-007. " Selection Cancel.
 WHEN 4.
 MESSAGE I000 WITH TEXT-008. " Selection Error.
ENDCASE.
ENDFORM. " F4_HELP
*& Form STANDARD_HEADER
 STANDARD_HEADER
FORM STANDARD_HEADER.
FORMAT COLOR COL_HEADING INTENSIFIED OFF.
CASE V_HEAD.
 WHEN 'Summary Report'(001).
 WHEN 'SUCC_REPORT'.
**---To display the field headings for Success report.
 ULINE (154).
 WRITE : /001 SY-VLINE,
 002 'Header Details '(011),
 052 SY-VLINE,
 053 'Document Number'(036),
 154 SY-VLINE.
 ULINE (154).
 WHEN 'Error Report'.
**---To display the field headings for error report.
 ULINE (154).
 WRITE : /001 SY-VLINE,
 002 'Header Details '(011),
 052 SY-VLINE,
 053 'Error Message/Text'(035),
 154 SY-VLINE.
 ULINE (154).
ENDCASE.
ENDFORM. " STANDARD_HEADER
*& Form DISPLAY_REPORT
 Display Report Details
FORM DISPLAY_REPORT.
PERFORM SUMMARY_REPORT.
PERFORM SUCC_REPORT.
PERFORM ERROR_REPORT.
ENDFORM. " DISPLAY_REPORT
*& Form SUMMARY_REPORT
 Success & Error Count Number
FORM SUMMARY_REPORT.
WRITE : /030 SY-TITLE.
SKIP 1.
WRITE : /005 'Program Name : '(032),
 024 SY-REPID,
 080 'Date :'(033),
 088 SY-DATUM.
SKIP 1.
V_HEAD = 'Summary Report'(001).
ULINE (132).
WRITE : /1 SY-VLINE,
 5 'No. of Records read from the Data file'(014),
 45 ':', V_TOTAL LEFT-JUSTIFIED,
 132 SY-VLINE,
 /1 SY-VLINE,
 5 'No. of Records successfully posted'(015),
 45 ':', V_SUCCESS_COUNTER LEFT-JUSTIFIED,
 132 SY-VLINE,
 /1 SY-VLINE,
 5 'No. of Records Failed'(023),
 45 ':'(031), V_ERROR_COUNTER LEFT-JUSTIFIED,
 132 SY-VLINE.
IF NOT F_BDC_OPEN IS INITIAL.
 WRITE: /1 SY-VLINE,
 5 'Session Name'(022),
 45 ':'(031), C_SESSION_NAME LEFT-JUSTIFIED,
 132 SY-VLINE.
ENDIF.
ULINE (132).
IF NOT F_BDC_OPEN IS INITIAL.
 WRITE: /1 SY-VLINE,
 5 'Session Name'(022),
 45 ':'(031), C_SESSION_NAME LEFT-JUSTIFIED,
 132 SY-VLINE.
ENDIF.
ULINE (132).
ENDFORM. " SUMMARY_REPORT
*& Form ERROR_REPORT
 Error Report
FORM ERROR_REPORT.
IF NOT I_ERROR_LOG[] IS INITIAL.
 SORT I_ERROR_LOG. " by tcode.
 V_HEAD = 'Error Report'(013).
 NEW-PAGE.
 LOOP AT I_ERROR_LOG.
 WRITE: /001 SY-VLINE,
 002 I_ERROR_LOG-HEADER,
 052 SY-VLINE,
 053 I_ERROR_LOG-MSG,
 154 SY-VLINE.
 ULINE (154).
 ENDLOOP.
ENDIF.
ENDFORM. " ERROR_REPORT
*& Form ERROR_REPORT
 Success Report
FORM SUCC_REPORT.
IF NOT I_SUCC[] IS INITIAL.
 SORT I_SUCC. " by tcode.
 V_HEAD = 'SUCC_REPORT'(034).
 NEW-PAGE.
 LOOP AT I_SUCC.
 WRITE: /001 SY-VLINE,
 002 I_SUCC-HEADER,
 052 SY-VLINE,
 053 I_SUCC-MSG,
 154 SY-VLINE.
 ULINE (154).
 ENDLOOP.
ENDIF.
ENDFORM. " SUCC_REPORT
*& Form OPEN_SESSION
FORM OPEN_SESSION.
DATA : V_DATE LIKE SY-DATUM. " For Hold Date.
V_DATE = SY-DATUM - 1. " Hold date
V_UNAME = SY-UNAME. " User name
CALL FUNCTION 'BDC_OPEN_GROUP'
 EXPORTING
 CLIENT = SY-MANDT
 GROUP = C_SESSION_NAME
 HOLDDATE = V_DATE
 KEEP = 'X'
 USER = V_UNAME
 EXCEPTIONS
 CLIENT_INVALID = 1
 DESTINATION_INVALID = 2
 GROUP_INVALID = 3
 GROUP_IS_LOCKED = 4
 HOLDDATE_INVALID = 5
 INTERNAL_ERROR = 6
 QUEUE_ERROR = 7
 RUNNING = 8
 SYSTEM_LOCK_ERROR = 9
 USER_INVALID = 10
 OTHERS = 11.
IF SY-SUBRC <> 0.
 MESSAGE I000 WITH 'Session can not be opened'(019).
 STOP.
ENDIF.
F_BDC_OPEN = 'X'.
ENDFORM. " OPEN_SESSION
*& Form BDC_INSERT
FORM BDC_INSERT USING P_TCODE TYPE ANY.
CALL FUNCTION 'BDC_INSERT'
 EXPORTING
 TCODE = P_TCODE
 TABLES
 DYNPROTAB = IT_BDCDATA
 EXCEPTIONS
 INTERNAL_ERROR = 1
 NOT_OPEN = 2
 QUEUE_ERROR = 3
 TCODE_INVALID = 4
 PRINTING_INVALID = 5
 POSTING_INVALID = 6
 OTHERS = 7.
IF SY-SUBRC <> 0.
 MESSAGE I000 WITH 'Unable to insert, Error record'(037).
 STOP.
ENDIF.
ENDFORM. " BDC_INSERT
*& Form CLOSE_GROUP
FORM CLOSE_GROUP.
CALL FUNCTION 'BDC_CLOSE_GROUP'
 EXCEPTIONS
 NOT_OPEN = 1
 QUEUE_ERROR = 2
 OTHERS = 3.
IF SY-SUBRC <> 0.
 MESSAGE I000 WITH 'Session can not be closed'(021).
 STOP.
ENDIF.
ENDFORM. " CLOSE_GROUP
*& Form UPLOAD_DATA
 Upload Data From the text file
FORM UPLOAD_DATA.
CALL FUNCTION 'WS_UPLOAD'
 EXPORTING
 FILENAME = P_FNAME
 FILETYPE = 'DAT'
 TABLES
 DATA_TAB = P_DOWNLOAD
 EXCEPTIONS
 CONVERSION_ERROR = 1
 FILE_OPEN_ERROR = 2
 FILE_READ_ERROR = 3
 INVALID_TYPE = 4
 NO_BATCH = 5
 UNKNOWN_ERROR = 6
 INVALID_TABLE_WIDTH = 7
 GUI_REFUSE_FILETRANSFER = 8
 OTHERS = 10.
IF SY-SUBRC NE 0.
 MESSAGE E000 WITH 'File does not Exist'(003).
ELSEIF P_DOWNLOAD[] IS INITIAL.
 MESSAGE E000 WITH 'Input file is empty'(004).
ENDIF.
DATA: V_INDEX LIKE SY-TABIX.
IF NOT P_DOWNLOAD[] IS INITIAL.
 LOOP AT P_DOWNLOAD.
 V_INDEX = SY-TABIX.
*Removing double quotes
 DO.
 REPLACE '"' WITH '' INTO P_DOWNLOAD.
 IF SY-SUBRC NE 0.
 EXIT.
 ENDIF.
 ENDDO.
 MODIFY P_DOWNLOAD INDEX V_INDEX.
 CONDENSE P_DOWNLOAD.
 IF P_DOWNLOAD(1) = '1'.
*Finding the header information, creating key field
 V_SELNO = SY-TABIX.
 ENDIF.
WE ARE NOT HAVING KEY FIELD IN HEADER/ITEM IN THE FILE.
SO WE ARE CREATING MANUAL KEY FIELD IN INTERNAL TABLE (SELNO).
 IF P_DOWNLOAD(1) = '1'.
Moving header information into IT_DATA_HEADER Internal Table
 SPLIT P_DOWNLOAD AT ',' INTO
 IT_DATA_HEADER-ID
 IT_DATA_HEADER-BUKRS
 IT_DATA_HEADER-WAERS
 IT_DATA_HEADER-NEWKO
 IT_DATA_HEADER-XBLNR
 IT_DATA_HEADER-XBLNR1
 IT_DATA_HEADER-BLDAT
 IT_DATA_HEADER-PK
 IT_DATA_HEADER-WRBTR
 IT_DATA_HEADER-BKTXT
 IT_DATA_HEADER-BKTXT1.
 IT_DATA_HEADER-SELNO = V_SELNO.
 CONDENSE : IT_DATA_HEADER-ID, IT_DATA_HEADER-BUKRS,
 IT_DATA_HEADER-WAERS, IT_DATA_HEADER-NEWKO,
 IT_DATA_HEADER-XBLNR, IT_DATA_HEADER-XBLNR1,
 IT_DATA_HEADER-BLDAT, IT_DATA_HEADER-PK,
 IT_DATA_HEADER-WRBTR, IT_DATA_HEADER-BKTXT,
 IT_DATA_HEADER-BKTXT1, IT_DATA_HEADER-SELNO.
 APPEND IT_DATA_HEADER.
 CLEAR IT_DATA_HEADER.
 ELSEIF P_DOWNLOAD(1) = '2'.
Moving header information into IT_DATA_ITEM Internal Table
 SPLIT P_DOWNLOAD AT ',' INTO
 IT_DATA_ITEM-ID
 IT_DATA_ITEM-NEWKO
 IT_DATA_ITEM-BUKRS
 IT_DATA_ITEM-KOSTL
 IT_DATA_ITEM-WRBTR
 IT_DATA_ITEM-SGTXT.
 IT_DATA_ITEM-SELNO = V_SELNO.
 IT_DATA_ITEM-SELNO1 = SY-TABIX.
 CONDENSE: IT_DATA_ITEM-ID,IT_DATA_ITEM-NEWKO,IT_DATA_ITEM-BUKRS,
 IT_DATA_ITEM-KOSTL,IT_DATA_ITEM-WRBTR,
 IT_DATA_ITEM-SGTXT,IT_DATA_ITEM-SELNO,
 IT_DATA_ITEM-SELNO1.
 APPEND IT_DATA_ITEM.
 CLEAR IT_DATA_ITEM.
 ENDIF.
 ENDLOOP.
*SORT HEADER & ITEM INTERNAL Table
 SORT IT_DATA_HEADER BY SELNO.
 SORT IT_DATA_ITEM BY SELNO SELNO1.
*Header Information
 LOOP AT IT_DATA_HEADER.
 IT_FINAL_HEADER-ID = IT_DATA_HEADER-ID.
 IT_FINAL_HEADER-BUKRS = IT_DATA_HEADER-BUKRS.
 IT_FINAL_HEADER-WAERS = IT_DATA_HEADER-WAERS.
 IT_FINAL_HEADER-NEWKO = IT_DATA_HEADER-NEWKO.
 CONCATENATE IT_DATA_HEADER-XBLNR IT_DATA_HEADER-XBLNR1
 INTO IT_FINAL_HEADER-XBLNR.
 IT_FINAL_HEADER-BLDAT = IT_DATA_HEADER-BLDAT.
 IT_FINAL_HEADER-PK = IT_DATA_HEADER-PK.
 IT_FINAL_HEADER-WRBTR = IT_DATA_HEADER-WRBTR.
 IT_FINAL_HEADER-BKTXT = IT_DATA_HEADER-BKTXT.
 IT_FINAL_HEADER-BKTXT1 = IT_DATA_HEADER-BKTXT1.
 IT_FINAL_HEADER-SELNO = IT_DATA_HEADER-SELNO.
 APPEND IT_FINAL_HEADER.
 CLEAR IT_FINAL_HEADER.
 ENDLOOP.
*Item Information
 LOOP AT IT_DATA_ITEM.
CHECKING ZERO IN THE IT_DATA_ITEM-WRBTR FIELD
It will not append the IT_FINAL_ITEM
 V_CHECK_ZERO = IT_DATA_ITEM-WRBTR.
 IF V_CHECK_ZERO NE V_CHECK_ZERO1. "V_ZERO.
 IT_FINAL_ITEM-ID = IT_DATA_ITEM-ID.
 IT_FINAL_ITEM-NEWKO = IT_DATA_ITEM-NEWKO.
 IT_FINAL_ITEM-BUKRS = IT_DATA_ITEM-BUKRS.
 IT_FINAL_ITEM-KOSTL = IT_DATA_ITEM-KOSTL.
 IT_FINAL_ITEM-WRBTR = IT_DATA_ITEM-WRBTR.
 IT_FINAL_ITEM-SGTXT = IT_DATA_ITEM-SGTXT.
 IT_FINAL_ITEM-SELNO = IT_DATA_ITEM-SELNO.
 IT_FINAL_ITEM-SELNO1 = IT_DATA_ITEM-SELNO1.
 APPEND IT_FINAL_ITEM.
 CLEAR IT_FINAL_ITEM.
 CLEAR : V_CHECK_ZERO,V_CHECK_ZERO1.
 ENDIF.
 ENDLOOP.
 SORT IT_FINAL_HEADER BY SELNO.
 SORT IT_FINAL_ITEM BY SELNO.
ENDIF.
ENDFORM. " UPLOAD_DATA
*& Form MOVE_DATA_F43
 Call Transaction F-43
FORM MOVE_DATA_F43.
*MOVE THE SYSTEM DATE TO
CLEAR V_SYSTEMDATE.
V_SYSTEMDATE = SY-DATUM.
LOOP AT IT_FINAL_HEADER.
 CLEAR V_CHECK.
 V_CHECK = IT_FINAL_HEADER-SELNO.
MOVE HEADER DATA TO BDCDATA INTERNAL TABLE
 PERFORM BDC_BUILD_HEADER.
MOVE ITEM DATA TO BDCDATA INTERNAL TABLE
 PERFORM BDC_BUILD_ITEM.
* Call Transcation (F-43)
 CALL TRANSACTION 'F-43' USING IT_BDCDATA
 MODE XMODE
 UPDATE 'S'
 MESSAGES INTO IT_MESSAGE_TAB.
IF error record found, it will move to batch Input session
 IF SY-SUBRC <> 0.
 V_ERROR_COUNTER = V_ERROR_COUNTER + 1. " Inc the counter
 CLEAR V_LINES.
 DESCRIBE TABLE IT_MESSAGE_TAB LINES V_LINES.
 READ TABLE IT_MESSAGE_TAB INDEX V_LINES.
*--- Perform to read the messages
 PERFORM MESSAGE_FORMAT.*--- Appending the error records into error table
 CONDENSE IT_FINAL_HEADER-BUKRS.
 CONDENSE IT_FINAL_HEADER-NEWKO.
 CONDENSE IT_FINAL_HEADER-XBLNR.
 CONDENSE IT_FINAL_HEADER-BLDAT.
 CONCATENATE IT_FINAL_HEADER-BUKRS ','
 IT_FINAL_HEADER-NEWKO ','
 IT_FINAL_HEADER-XBLNR ','
 IT_FINAL_HEADER-BLDAT
 INTO V_HEADER.
 I_ERROR_LOG-HEADER = V_HEADER.
 I_ERROR_LOG-MSG = V_MSG.
 APPEND I_ERROR_LOG.
 CLEAR I_ERROR_LOG.
*-- Posting the error record to Session
 IF F_BDC_OPEN IS INITIAL.
 PERFORM OPEN_SESSION.
 ENDIF.
 PERFORM BDC_INSERT USING 'F-43'.
 ELSE.
 V_SUCCESS_COUNTER = V_SUCCESS_COUNTER + 1.
*-- READING ONLY SUCCESS MESSAGE(MSGNR 312)
 LOOP AT IT_MESSAGE_TAB WHERE MSGNR = '312'.
 V_SUCC_MSG = IT_MESSAGE_TAB-MSGV1.
 ENDLOOP.
*--- Perform to read the messages
 PERFORM MESSAGE_FORMAT.
*--- Appending the Success records into Success table
 CONDENSE IT_FINAL_HEADER-BUKRS.
 CONDENSE IT_FINAL_HEADER-NEWKO.
 CONDENSE IT_FINAL_HEADER-PK.
 CONDENSE IT_FINAL_HEADER-XBLNR.
 CONDENSE IT_FINAL_HEADER-BLDAT.
 CONCATENATE IT_FINAL_HEADER-BUKRS ','
 IT_FINAL_HEADER-NEWKO ','
 IT_FINAL_HEADER-PK ','
 IT_FINAL_HEADER-XBLNR ','
 IT_FINAL_HEADER-BLDAT
 INTO V_HEADER.
 I_SUCC-HEADER = V_HEADER.
 I_SUCC-MSG = V_SUCC_MSG.
 APPEND I_SUCC.
 CLEAR I_SUCC.
 ENDIF.
 V_TOTAL = V_TOTAL + 1.
 REFRESH: IT_BDCDATA,
 IT_MESSAGE_TAB.
 CLEAR: IT_BDCDATA,
 IT_MESSAGE_TAB.
ENDLOOP.
ENDFORM. " MOVE_DATA_F43
 Start new screen *
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.
 Insert field *
FORM BDC_FIELD USING FNAM FVAL.
CLEAR IT_BDCDATA.
IT_BDCDATA-FNAM = FNAM.
IT_BDCDATA-FVAL = FVAL.
APPEND IT_BDCDATA.
ENDFORM.
*& Form BDC_BUILD_HEADER
 Header Information
FORM BDC_BUILD_HEADER.
Header Details
PERFORM BDC_DYNPRO USING 'SAPMF05A' '0100'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '/00'.
PERFORM BDC_FIELD USING 'BKPF-BLDAT'
 IT_FINAL_HEADER-BLDAT.
PERFORM BDC_FIELD USING 'BKPF-BLART'
 'KR'.
PERFORM BDC_FIELD USING 'BKPF-BUKRS'
 IT_FINAL_HEADER-BUKRS.
Moveing System date to Posting date in the document
CLEAR IT_FINAL_HEADER-BLDAT.
CONCATENATE V_SYSTEMDATE4(4) V_SYSTEMDATE0(4)
 INTO IT_FINAL_HEADER-BLDAT.
PERFORM BDC_FIELD USING 'BKPF-BUDAT'
 IT_FINAL_HEADER-BLDAT.
PERFORM BDC_FIELD USING 'BKPF-WAERS'
 IT_FINAL_HEADER-WAERS.
PERFORM BDC_FIELD USING 'BKPF-XBLNR'
 IT_FINAL_HEADER-PK.
PERFORM BDC_FIELD USING 'BKPF-BKTXT'
 IT_FINAL_HEADER-BKTXT.
PERFORM BDC_FIELD USING 'FS006-DOCID' '*'.
IF IT_FINAL_HEADER-WRBTR CA '-'.
 REPLACE '-' WITH SPACE INTO IT_FINAL_HEADER-WRBTR.
 CONDENSE IT_FINAL_HEADER-WRBTR.
 PERFORM BDC_FIELD USING 'RF05A-NEWBS' '25'.
ELSE.
 PERFORM BDC_FIELD USING 'RF05A-NEWBS' '31'.
ENDIF.
PERFORM BDC_FIELD USING 'RF05A-NEWKO'
 IT_FINAL_HEADER-NEWKO.
*-- Item Vendor Details
PERFORM BDC_DYNPRO USING 'SAPMF05A' '0302'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '/00'.
PERFORM BDC_FIELD USING 'BSEG-WRBTR'
 IT_FINAL_HEADER-WRBTR.
PERFORM BDC_FIELD USING 'BSEG-SGTXT'
 IT_FINAL_HEADER-BKTXT1.
ENDFORM. " BDC_BUILD_HEADER
*& Form BDC_BUILD_ITEM
 Item Information
FORM BDC_BUILD_ITEM.
DATA L_FIRST TYPE C.
LOOP AT IT_FINAL_ITEM WHERE SELNO = V_CHECK.
 IF L_FIRST IS INITIAL.
 L_FIRST = C_X.
Line Item ( PstKy,Account & New Company Code)
 CONDENSE IT_FINAL_HEADER-BLDAT.
 IF IT_FINAL_ITEM-WRBTR CA '-'.
 REPLACE '-' WITH SPACE INTO IT_FINAL_ITEM-WRBTR.
 CONDENSE IT_FINAL_ITEM-WRBTR.
 PERFORM BDC_DYNPRO USING 'SAPMF05A' '0302'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' '/00',
 'RF05A-NEWBS' '50',
 'RF05A-NEWKO' IT_FINAL_ITEM-NEWKO,
 'RF05A-NEWBK' IT_FINAL_ITEM-BUKRS.
 ELSE.
 PERFORM BDC_DYNPRO USING 'SAPMF05A' '0302'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' '/00',
 'RF05A-NEWBS' '40',
 'RF05A-NEWKO' IT_FINAL_ITEM-NEWKO,
 'RF05A-NEWBK' IT_FINAL_ITEM-BUKRS.
 ENDIF.
Amount & Text
 PERFORM BDC_DYNPRO USING 'SAPMF05A' '0300'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' '/00',
 'BSEG-WRBTR' IT_FINAL_ITEM-WRBTR,
 'BSEG-SGTXT' IT_FINAL_ITEM-SGTXT,
 'DKACB-FMORE' 'X'.
Cost Center
 PERFORM BDC_DYNPRO USING 'SAPLKACB' '0002'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' 'ENTE',
 'COBL-KOSTL' IT_FINAL_ITEM-KOSTL.
 ELSE.
Line Item ( PstKy,Account & New Company Code)
 IF IT_FINAL_ITEM-WRBTR CA '-'.
 REPLACE '-' WITH SPACE INTO IT_FINAL_ITEM-WRBTR.
 CONDENSE IT_FINAL_ITEM-WRBTR.
 PERFORM BDC_DYNPRO USING 'SAPMF05A' '0300'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' '/00',
 'RF05A-NEWBS' '50',
 'RF05A-NEWKO' IT_FINAL_ITEM-NEWKO,
 'RF05A-NEWBK' IT_FINAL_ITEM-BUKRS.
 ELSE.
 PERFORM BDC_DYNPRO USING 'SAPMF05A' '0300'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' '/00',
 'RF05A-NEWBS' '40',
 'RF05A-NEWKO' IT_FINAL_ITEM-NEWKO,
 'RF05A-NEWBK' IT_FINAL_ITEM-BUKRS.
 ENDIF.
 PERFORM BDC_DYNPRO USING 'SAPLKACB' '0002'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' 'ENTE'.
Amount & Text
 PERFORM BDC_DYNPRO USING 'SAPMF05A' '0300'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' '/00',
 'BSEG-WRBTR' IT_FINAL_ITEM-WRBTR,
 'BSEG-SGTXT' IT_FINAL_ITEM-SGTXT,
 'DKACB-FMORE' 'X'.
Cost Center
 PERFORM BDC_DYNPRO USING 'SAPLKACB' '0002'.
 PERFORM BDC_FIELD USING: 'BDC_OKCODE' 'ENTE',
 'COBL-KOSTL' IT_FINAL_ITEM-KOSTL.
 ENDIF.
ENDLOOP.
*Save Details
PERFORM BDC_DYNPRO USING 'SAPMF05A' '0300'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
 '=BU'.
PERFORM BDC_DYNPRO USING 'SAPLKACB' '0002'.
PERFORM BDC_FIELD USING: 'BDC_OKCODE' 'ENTE'.
ENDFORM. " BDC_BUILD_ITEM
Thanks
Mahesh

How to delete the deployed composite in weblogic server 11g

Can someone tell me how to delete the deployed composite in weblogic server 11g ?I'm facing an issue where the weblogic server is getting started and immediately after sometime the server changes to "Force shutdown"..When i checked the logs,there is an error in one of the composite i deployed..So now i wanted to delete the deployed composite?Please help ....
Thanks

Hi
1. Deleting a domain will not hold any references. But make sure that under your user_projects/applications also remove the folder that matches with your domain. Basically under user_projects folder you will see 2 folders named applications and domains. When you create a domain say mySoaDomain, it will crate a folder with the same name under applications folder also with few files like em.ear. If you do this, then you can crate a new soa domain and use the same old name.
2. NOW comes the most important thing. If you create a new SOADomain, at one point, you had to give details for soainfra and mds schemas. If you give your current existing db details (that was used for your old deleted domain), then you may still have the issues. Because the soainfra db may still have the instances for your old process.
3. If you really want to have a full clean soa domain, here is what you do:
a) Run rcu and drop the existing schemas for soainfra and mds.
b) Run rcu again and create above schemas again.
c) Now create SOADomain using config wizard and refer above clean rcu db and you are all set.
3. Under your domain root folder, just searh for files named with your workflow and you should see the .jar location.
Thanks
Ravi Jegga

How to delete the complete contents of database table ? should be empty !!

Hi Guys,
I have requirement where i have delete the contents of database table..i have make it empty (no records at all) and then i have to fill it with the records from the excel sheet.
I can upload data from the excel sheet.
Please tell me how to delete the complete contents of the database table ??
Regards
Rahul

hi ,
just write like this,
delete from <database table>.
commit work.
sample code, here edpar is database table.
delete from edpar." FROM TABLE g_tab_delete.
call function 'DB_COMMIT'.
loop at g_tab_edpar into g_wa_edpar.
 insert into edpar values g_wa_edpar.
 if sy-subrc eq 0.
 move-corresponding g_wa_edpar to g_wa_edpar1.
 append g_wa_edpar1 to g_tab_edpar1.
 else.
 move-corresponding g_wa_edpar to g_wa_edpar2.
 append g_wa_edpar2 to g_tab_edpar2.
 endif.
endloop.
that's all it works.
reward points if helpful.
regards,
seshu.

IMP: How to delete the service order

Hey Experts,
Can you tell me how to delete the service order which was created in IW31..? or we have any Functions Module to delete the service order?
and one more question is I have more than 100 service order in the table ,but it will display only 50 order when i execute this Functions Module BAPI_ALM_ORDERHEAD_GET_LIST
can you tell me how to solve this problem...?
Thanking you in advance,
Regards
J Sarathi

This is what the BAPI_ALM_ORDERHEAD_GET_LIST documentation says
"You can use this method to determine a list of orders according to a list of selection criteria. The number of hits that are produced for the person calling up the list, can be specifically reduced; without further parameter transfers, the first 50 hits are displayed. A complete list of the hits is stored internally. If you call up the selection again within a Logical Unit of Work (LUW) without changing the selection parameters, but with other refurbishment parameters, then you receive further partial quantities of the selection result, as specified by you."
and for deletion
check whether you can set any deletion status through the fm BAPI_ALM_ORDER_MAINTAIN
Also check the business objects BUS2007, BUS2088

How to delete the production order in mass?

Dear Experts
Please tell me how to delete the old production orders?

Raja,
CO78 is a one stop transaction for production order setting deletion flag, deletion indicator, archiving and finally deleting.
Generally we schedule the following programs in background in the sequence below,
1. PPARCHP1 for Setting Deletion Flag
2. PPARCHP1 for Setting Deletion Indicator (Once set cannot be revoked- so care should be taken in selection of orders)
3. PPARCHA1 for archiving the production order with Deletion Indicator active. Basis should set the database/storage space for archiving/storing the records.
4. PPARCHD1 for Deleting the records from SAP database.
Regards,
Prasobh

How to delete the listener service?

Dear All,
I want to delete the service of listener, because that service is not required.
Please tell me how to delete the service.
Oracle version is 9.2.0.5
and os is windows 2003 server.
Thanks In advance,
Prathamesh.

Use the Net Configuration Assistant. Start -> Programs -> Oracle Home -> Configuration and Migration Tools -> Net Configuration Assistant
Or from the commandline: c:> netca

Pls tell me how automatically delete the messages in trash i

Similar Messages

Maybe you are looking for