Tab delimeter in 4.6c

Hi Experts,
I want to put the fields in a file seperated by tab delimeter adn down load to application server.
unfortunately the class CL_ABAP_CHAR_UTILITIES is not availbe with 4.6c.
how to do this in 4.6c please help if any body knows.
Thanks and Regards,
Shashikumar.G

HI,
Use
CALL FUNCTION 'GUI_DOWNLOAD'
      EXPORTING
           filename                = w_filename
           filetype                = 'ASC'
WRITE_FIELD_SEPARATOR
= 'X'           mode                    = ' '
     IMPORTING
          filelength              = w_final
       TABLES
            data_tab                = t_output
        FIELDNAMES              =
      EXCEPTIONS
           file_open_error         = 1
           file_write_error        = 2
           invalid_filesize        = 3
           invalid_type            = 4
           no_batch                = 5
Regards
Raju Chitale

Similar Messages

Tab delimeted text file

Hi Group,
How to upload tab delimeted text file using FM KCD_CSV_FILE_TO_INTERN_CONVERT or is there any other way.
I am using text file with header text and the data will start from second row.

Hi ,
Use like this .
constants: c_hex_tab    type x value 9.
call function 'KCD_CSV_FILE_TO_INTERN_CONVERT'
     exporting
          i_filename      = filename
          i_separator     = l_separator
     tables
          e_intern        = l_intern
     exceptions
          upload_csv      = 1
          upload_filetype = 2
          others          = 3.
where l_separator = c_hex_tab. " for tab delimitter
Regards,
GSR.

BDC tab delimeter

Hey guys,
While writing the call function UPLOAD in BDC program if the text file has fields separated by a tab delimeter...
how should that be coded in the program?
Regards

Hi,
*Has_field_separator = 'X'* " for specifying that in the file field values separated by TAB space
[Sample code|GUI_UPLOAD;
Regards
Narin Nandivada

Tab Delimeter

Hi all,
I want to down load itab data into Text file.
After Downloading i want to put "|" delemeter after each field value.
This is urgent.Plz send me response.
Thanks, Rayeez.

hi,
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
BIN_FILESIZE =
 FILENAME = W_FILENAME
 FILETYPE = 'ASC'
APPEND = ' '
 WRITE_FIELD_SEPARATOR = 'X'
HEADER = '00'
TRUNC_TRAILING_BLANKS = ' '
WRITE_LF = 'X'
COL_SELECT = ' '
COL_SELECT_MASK = ' '
DAT_MODE = ' '
CONFIRM_OVERWRITE = ' '
NO_AUTH_CHECK = ' '
CODEPAGE = ' '
IGNORE_CERR = ABAP_TRUE
REPLACEMENT = '#'
WRITE_BOM = ' '
TRUNC_TRAILING_BLANKS_EOL = 'X'
WK1_N_FORMAT = ' '
WK1_N_SIZE = ' '
WK1_T_FORMAT = ' '
WK1_T_SIZE = ' '
IMPORTING
FILELENGTH =
TABLES
 DATA_TAB = itab
FIELDNAMES =
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 <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

Custom header delimeter

My company is used to exporting data from MAX using a custom header with the tab delimeter. I am trying to make a LabVIEW program that automatically writes the data and header to the file. My company already has software to make a custom header text file but the problem is that this file contains the text: {delimiter} where each tab should be. Is there a way when reading this custom header from the file to add a tab when this {delimiter} shows up such as MAX does?

Use "search and replace string",
search string= {delimiter}
replace string=tab diagram constant
replace all=true.
LabVIEW Champion . Do more with less code and in less time .

How to output tab character in c:out

Here is the problem, and I would appreciate your help. I am trying to output text data to Excel. The data must be tab-delimeted.
This works:
<%response.setContentType("application/vnd.ms-excel");
String sCsv = "aaa\tbbb\tccc\txxx ";
out.print(sCsv);%>
But when I try to use <c:out, it fails:
<c:out value="aaa\\tbbb2c	cc3x\txxg\\\taaaa"/>
As you see, I am trying to get tabulation in different ways, but all of them fail. Excel always reads the text in one column. Is there anyway I can insert tab-symbol and use it with <c:out?
Thank you

Unfortunately, this is not so simple. Normally, I could probably use an output stream in a servlet. But my environment is a report inside the Oracle Portal 10.2
And I am not even talking about OC4J server; it is a JSP file that Portal allows to use through its design UI, and which is stored somewhere in its medadata database (not a physical file). I needed a quick solution, and don't have time to dig deep into details how it all works together. Shortly, I cannot use servlets, just JSP

Separation of tab delimited string

Hello,
I want to separate a tab delimited field in a query. It consists of three names and I have to put each of these 3 names into a separate field. How can this be accomplished?
Example:
in field 1 we have the string 'John Anderson Smith'
in field 2 to filed 4 I want to see the following values:
field 2: John
field 3: Anderson
field 4: Smith
It has to be done with many names having different length.

Tab delimeted eh... ok, that's chr(9) in the ascii set...
SQL> ed
Wrote file afiedt.buf
1 with t as (select 'John    Anderson        Smith' as txt from dual)
2 --
3 -- end of test data
4 --
5 select regexp_substr(txt, '[^'||chr(9)||']+', 1, 1) as nm1
6        ,regexp_substr(txt, '[^'||chr(9)||']+', 1, 2) as nm2
7        ,regexp_substr(txt, '[^'||chr(9)||']+', 1, 3) as nm3
8        ,txt
9* from   t
SQL> /
NM1                 NM2                 NM3                 TXT
John                Anderson            Smith               John        Anderson        Smith
SQL>You just need to repeat the regexp_substr for the maximum number of names that can be in the string.

How to start a report on the reports server from a pl/sql procedure

I would like to start or queue a report on the reports server / cartridge from within a serverside pl/sql procedure along with passing report parameters.
Can I use the package utl_http and if yes, how?
null

Hi,
Before this you have to prepare your internal table with tab delimeter structure with data.
data: wa_appl_title like line of appl_title.
       concatenate fhdr '/file_details_'
                    sy-datum '_' sy-uzeit '.txt' into fhdr.
*MOD01 - start.
       open dataset fhdr for output in text mode." ENCODING DEFAULT.
        open dataset fhdr for output in text mode ENCODING DEFAULT.
*MOD01 - end.
        if sy-subrc = 0.
          clear wa_appl_title.
          read table appl_title into wa_appl_title index 1.
          if sy-subrc = 0.
            transfer wa_appl_title to fhdr.
          endif.
          loop at appl_it.
            transfer appl_it to fhdr.
          endloop.
          close dataset fhdr.
          write: / text-t05.
        else.
          write: / text-t04.
        endif.
After this you view in AL11 tranx.
let us know any thing else you need.
Thanks,
Deepak.

ALV Questions

Hi,
 Please answer the following questions.
1. What is the difference b/w classical report and ALV report and in classical report can we produce output more than 255 characters?
2. Did you used classes to create ALV reports and how is superior over using function modules in ALV report generation?
3. If we don't know the exact number of blocks to be generated then Can we generate the output with different number of blocks in
 ALV reports?
4. In report if we have write statements in initialization, top of page and in start of selection then which event is first excuted and what
 is the output?
5. In interactive report what is the use of exit key word?
6. what are nested structures and deep structures?
7. how can we write BDC program to upload data from CSV, XL, TAB delimeter type flat files?
8. In BDC if the flat file consist of header and multiple line items then how to upload the load, does we create a single internal table for
 both header and body or different internal tables?
9. In call transaction and session method which method is prefered one?
10. why can't we use call transaction method to upload large amount of data?
11.what is the use of standard text in sap scripts, why can't we hard code the same information in form itself?
12.what are user exits and how can we create them?
13. can we modify the sap provided code?
14. what are oss notes?
15. what are the different types of performance techniques?
16. can we do modifications on output of ALV reports, how?
17. what are the classes that are used in ALV reporting?
Thanks
Manju.
Points will be rewarded.

Hi manju
1.Diff b/w classical and interactive
 classical report
 1)complicated
 2)Logo is not possible
 3)sorting,total ,etc...we have to write code
4. top-of-page will trigger when ever it find a write statement after that all the
 events get triggered
 initialization
 write :/ 'Hi i am below the top-of-page'.
 top-of-page
 write :/ 'Hi i am the top'.
 output
 Hi i am the top
 Hi i am below the top-of-page
5.we can use exit command inside a loop .
 if condition goes wrong straight away it comes out from the loop.
9.session
12. If we want to customize the SAP standard transaction that time we go for User exits
 There are
 screen exits,field exits,menu exits,and function module exits
Important transactions
 CMOD,SMOD
Important tables
 MODACT,MODSAP
13. we have to get the access key to modify the standard code
14. Online Service System - if we are not able to solve or we can find any complication in sap related issue we can raise a oss note ,the problem will be rectified by the SAP team and we have to pay for that.
15. SE30 - runtime analysis
 ST05 - SQL trace
Regards
P.Thangaraj

How to send a mail as .txt attachment ,As data is seperated by pipeline

Hi ,
I got a requirement to send a mail in .txt format (Using OOPS) and the data inside the mail is seperated by '|' Pls help me in this regard.
i have written a mail to send the mail in .xls it is working fine for me in .xls but i dont know how to write the same for txt where data should be seperated by '|'.
Regards
sas
Ps: i am attaching my code. and please specify where i need to modify to achieve the same. and any perfromance enhacements are also welcome.
*& Report ZGBTEST02
REPORT YSAS_MAIL2.
*Changes done by sas
*PARAMETERS: P_MAIL TYPE AD_SMTPADR OBLIGATORY, " G C by sas
*P_MAIL1 TYPE AD_SMTPADR OBLIGATORY." G by sas
tables: adr6.
SELECT-OPTIONS:p_eaddr FOR adr6-SMTP_ADDR NO INTERVALS .
*end of changes by sas
DATA: I_GLT0 TYPE STANDARD TABLE OF GLT0.
DATA: I_MARA TYPE STANDARD TABLE OF MARA. " MARA Entries
* I_MARC TYPE STANDARD TABLE OF MARC. " MARC Entries
DATA: L_TEXT TYPE CHAR255. " Text
DATA: L_LINES TYPE I,
 L_SIZE TYPE SOOD-OBJLEN.
" Size of Attachment
* Mail related
DATA: I_CONTENT TYPE SOLI_TAB, " Mail content
 I_ATTACH TYPE SOLI_TAB, " Attachment
 I_ATTACH1 TYPE SOLIX_TAB. " Attachment
DATA: L_SEND_REQUEST TYPE REF TO CL_BCS,
 " E-Mail Send Request
 L_DOCUMENT TYPE REF TO CL_DOCUMENT_BCS,
 " E-Mail Attachment
 L_RECIPIENT TYPE REF TO IF_RECIPIENT_BCS,
 " Distribution List
 L_SENDER TYPE REF TO IF_SENDER_BCS,
 " Address of Sender
 L_UNAME TYPE SALRTDRCPT,
 " Sender Name(SY-UNAME)
 L_BCS_EXCEPTION TYPE REF TO CX_DOCUMENT_BCS,
 " BCS Exception
 L_ADDR_EXCEPTION TYPE REF TO CX_ADDRESS_BCS,
 " Address Exception
 L_SEND_EXCEPTION TYPE REF TO CX_SEND_REQ_BCS.
" E-Mail sending Exception
*Constants------------------------------------------------------------*
CONSTANTS: C_TAB(1) TYPE C VALUE
 CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB,
 " Tab Character
 C_CR(1) TYPE C VALUE CL_ABAP_CHAR_UTILITIES=>CR_LF,
 " Line Feed for End-Of_line
 C_EXT TYPE SOODK-OBJTP VALUE 'XLS'. " XLS Extension
START-OF-SELECTION.
SELECT * FROM MARA INTO TABLE I_MARA UP TO 20 ROWS.
IF SYST-SUBRC EQ 0.
* SELECT * FROM MARC INTO TABLE I_MARC FOR ALL ENTRIES IN I_MARA WHERE MATNR = I_MARA-MATNR.
ENDIF.
*select * from glt0 into table i_glt0.
* Preparing body of the Mail
MOVE 'SAP Material Master Records' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
CLEAR L_TEXT.
APPEND L_TEXT TO I_CONTENT.
MOVE 'Thanks,' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
MOVE 'SAP MM' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
* Creates persistent send request
TRY.
 L_SEND_REQUEST = CL_BCS=>CREATE_PERSISTENT( ).
* Creating Document
 L_DOCUMENT = CL_DOCUMENT_BCS=>CREATE_DOCUMENT(
 I_TYPE = 'RAW'
 I_TEXT = I_CONTENT[]
 I_SUBJECT = 'SAS MASTER Records' ).
* Preparing contents of attachment with Change Log
 PERFORM PREPARE_ATTACHMENT.
 DESCRIBE TABLE I_MARA LINES L_LINES.
* Size to multiplied by 2 for UNICODE enabled systems
 L_SIZE = L_LINES * 2 * 255.
* Adding Attachment
 CALL METHOD L_DOCUMENT->ADD_ATTACHMENT
 EXPORTING
 I_ATTACHMENT_TYPE = C_EXT
 I_ATTACHMENT_SIZE = L_SIZE
 I_ATTACHMENT_SUBJECT = 'MARA Details'
* i_att_content_hex = i_attach[].
 I_ATT_CONTENT_TEXT = I_ATTACH[].
* DESCRIBE TABLE I_MARC LINES L_LINES.
* Size to multiplied by 2 for UNICODE enabled systems
* L_SIZE = L_LINES * 2 * 255.
** Adding Attachment
* CALL METHOD L_DOCUMENT->ADD_ATTACHMENT
* EXPORTING
* I_ATTACHMENT_TYPE = C_EXT
* I_ATTACHMENT_SIZE = L_SIZE
* I_ATTACHMENT_SUBJECT = 'MARC Details'
* I_ATT_CONTENT_HEX = I_ATTACH1[].
** i_att_content_text = i_attach1[].
* Add document to send request
 CALL METHOD L_SEND_REQUEST->SET_DOCUMENT( L_DOCUMENT ).
 DATA:LR_SENDER TYPE REF TO IF_SENDER_BCS,
 LR_SEND TYPE REF TO CL_BCS.
* Preparing the sender object
* LR_SENDER = CL_CAM_ADDRESS_BCS=>CREATE_INTERNET_ADDRESS( sy-uname ).
 DATA: L1_UNAME TYPE SY-UNAME.
 L1_UNAME = SY-UNAME.
 LR_SENDER = CL_SAPUSER_BCS=>CREATE( L1_UNAME ).
* Setting the sender
 CALL METHOD L_SEND_REQUEST->SET_SENDER
 EXPORTING
 I_SENDER = LR_SENDER.
* E-Mail
 LOOP AT P_EADDR.
 TRANSLATE P_EADDR-LOW TO LOWER CASE.
 L_RECIPIENT = CL_CAM_ADDRESS_BCS=>CREATE_INTERNET_ADDRESS( P_EADDR-LOW ).
 CALL METHOD L_SEND_REQUEST->ADD_RECIPIENT
 EXPORTING
 I_RECIPIENT = L_RECIPIENT
 I_EXPRESS = 'U'
 I_COPY = ' '
 I_BLIND_COPY = ' '
 I_NO_FORWARD = ' '.
 IF SY-subrc EQ 0.
 WRITE:/'** SUCCESS: Email Sent to', p_eaddr-LOW COLOR COL_NORMAL.
 ELSE.
 WRITE:/'** ERROR: Failed to send Email to',p_eaddr-LOW COLOR COL_NEGATIVE .
 ENDIF.
 ENDLOOP.
*Trigger E-Mail immediately
 L_SEND_REQUEST->SET_SEND_IMMEDIATELY( ' ' ).
 CALL METHOD L_SEND_REQUEST->SEND( ).
 COMMIT WORK.
 CATCH CX_DOCUMENT_BCS INTO L_BCS_EXCEPTION.
 CATCH CX_SEND_REQ_BCS INTO L_SEND_EXCEPTION.
 CATCH CX_ADDRESS_BCS INTO L_ADDR_EXCEPTION.
ENDTRY.
*& Form PREPARE_ATTACHMENT
FORM PREPARE_ATTACHMENT .
FIELD-SYMBOLS: <LFS_TABLE>, " Internal table structure
 <LFS_CON>. " Field Content
DATA: L_TEXT TYPE CHAR1024. " Text content for mail attachment
DATA: L_CON TYPE STRING. "(50) TYPE c. " Field Content in character format
DATA: L_STR TYPE STRING,
 L_STR1 TYPE STRING.
DATA: LS_SOLIX TYPE SOLIX.
* Columns to be tab delimeted
LOOP AT I_MARA ASSIGNING <LFS_TABLE>.
 DO.
 ASSIGN COMPONENT SY-INDEX OF STRUCTURE <LFS_TABLE>
 TO <LFS_CON>.
 IF SY-SUBRC NE 0.
 CONCATENATE C_CR L_TEXT INTO L_TEXT.
* CONCATENATE l_str c_cr l_text INTO l_str.
* ls_solix-line = l_text.
* APPEND ls_solix TO i_attach.
 APPEND L_TEXT TO I_ATTACH.
 EXIT.
 ELSE.
 CLEAR: L_CON.
 MOVE <LFS_CON> TO L_CON.
 CONDENSE L_CON.
 IF SY-INDEX = 1.
 CLEAR: L_TEXT.
 MOVE L_CON TO L_TEXT.
 ELSE.
 CONCATENATE L_TEXT L_CON INTO L_TEXT
 SEPARATED BY C_TAB.
 ENDIF.
 ENDIF.
 ENDDO.
ENDLOOP.
** Columns to be tab delimeted
* LOOP AT I_MARC ASSIGNING <LFS_TABLE>.
* DO.
* ASSIGN COMPONENT SY-INDEX OF STRUCTURE <LFS_TABLE>
* TO <LFS_CON>.
* IF SY-SUBRC NE 0.
* CONCATENATE C_CR L_TEXT INTO L_TEXT.
** CONCATENATE l_str c_cr l_text INTO l_str1.
* LS_SOLIX-LINE = L_TEXT.
* APPEND LS_SOLIX TO I_ATTACH1.
* EXIT.
* ELSE.
* CLEAR: L_CON.
* MOVE <LFS_CON> TO L_CON.
* CONDENSE L_CON.
* IF SY-INDEX = 1.
* CLEAR: L_TEXT.
* MOVE L_CON TO L_TEXT.
* ELSE.
* CONCATENATE L_TEXT L_CON INTO L_TEXT
* SEPARATED BY C_TAB.
* ENDIF.
* ENDIF.
* ENDDO.
* ENDLOOP.
* i_attach1[] = i_attach[].
ENDFORM. " PREPARE_ATTACHMENT

Hi Sas,
I have copied the code and executed and it is working fine. I'm getting the text attachement in the email.
* Adding Attachment
 CALL METHOD L_DOCUMENT->ADD_ATTACHMENT
 EXPORTING
 I_ATTACHMENT_TYPE = 'TXT' " C_EXT My change
 I_ATTACHMENT_SIZE = L_SIZE
 I_ATTACHMENT_SUBJECT = 'MARA Details'
* i_att_content_hex = i_attach[].
 I_ATT_CONTENT_TEXT = I_ATTACH[].
CONCATENATE i_mara-MATNR
 i_mara-ERSDA
 i_mara-ERNAM
 i_mara-LAEDA
 INTO L_TEXT
 SEPARATED BY '|'.

How to send a mail as .txt attachment ?

Hi all,
I got a requirement to write code for sending mail in oops.
i have written code for .xls which is working fine. But requirement is to send the mail in the format of txt.
i just only chnge the .xls to .txt where i can see the output properly in sap but problem is that i am unable to get the proper alignment. when i execute the report and see the output in sost i can see the attachment.i am downloading the attachment there only(Our server is not configured to get the mails directly) .So when i open the saved text file on my pc the output is appearing as follows...
pernr nachn vorna
 0001 L0001 F0001
 0002 L0002 F0002
 0003 L0003 F0003
 0004 L0004 F0004...
Where it should come in straight line as follows in my o/p code..
pernr nachn vorna
0001 L0001 F0001
0002 L0002 F0002
0003 L0003 F0003
0004 L0004 F0004...
i am puttin g my code ..please correct me where i am wrong .....waiting for your valuabel inputs..
*& Report ZGBTEST02
REPORT YSAS_MAIL2.
*Changes done by sas
*PARAMETERS: P_MAIL TYPE AD_SMTPADR OBLIGATORY, " G C by sas
*P_MAIL1 TYPE AD_SMTPADR OBLIGATORY." G by sas
TABLES: ADR6.
SELECT-OPTIONS:P_EADDR FOR ADR6-SMTP_ADDR NO INTERVALS .
*end of changes by sas
DATA: I_GLT0 TYPE STANDARD TABLE OF GLT0.
*DATA: I_pernr TYPE STANDARD TABLE OF pa0002. " MARA Entries
DATA: BEGIN OF I_PERNR OCCURS 1 ,
PERNR TYPE PA0002-PERNR,
NACHN TYPE PA0002-NACHN,
VORNA TYPE PA0002-VORNA,
END OF I_PERNR..
* I_MARC TYPE STANDARD TABLE OF MARC. " MARC Entries
DATA: L_TEXT TYPE CHAR255. " Text
DATA: L_LINES TYPE I,
 L_SIZE TYPE SOOD-OBJLEN.
" Size of Attachment
* Mail related
DATA: I_CONTENT TYPE SOLI_TAB, " Mail content
 I_ATTACH TYPE SOLI_TAB, " Attachment
 I_ATTACH1 TYPE SOLIX_TAB. " Attachment
DATA: L_SEND_REQUEST TYPE REF TO CL_BCS,
 " E-Mail Send Request
 L_DOCUMENT TYPE REF TO CL_DOCUMENT_BCS,
 " E-Mail Attachment
 L_RECIPIENT TYPE REF TO IF_RECIPIENT_BCS,
 " Distribution List
 L_SENDER TYPE REF TO IF_SENDER_BCS,
 " Address of Sender
 L_UNAME TYPE SALRTDRCPT,
 " Sender Name(SY-UNAME)
 L_BCS_EXCEPTION TYPE REF TO CX_DOCUMENT_BCS,
 " BCS Exception
 L_ADDR_EXCEPTION TYPE REF TO CX_ADDRESS_BCS,
 " Address Exception
 L_SEND_EXCEPTION TYPE REF TO CX_SEND_REQ_BCS.
" E-Mail sending Exception
*Constants------------------------------------------------------------*
CONSTANTS: C_TAB(1) TYPE C VALUE
 CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB,
 " Tab Character
 C_CR(1) TYPE C VALUE CL_ABAP_CHAR_UTILITIES=>CR_LF,
 " Line Feed for End-Of_line
 C_EXT TYPE SOODK-OBJTP VALUE 'TXT'. " XLS Extension
START-OF-SELECTION.
SELECT PERNR NACHN VORNA FROM PA0002 INTO CORRESPONDING FIELDS OF TABLE I_PERNR UP TO 20 ROWS.
*select * from glt0 into table i_glt0.
* Preparing body of the Mail
* MOVE 'SAP Material Master Records' TO L_TEXT.
* APPEND L_TEXT TO I_CONTENT.
* CLEAR L_TEXT.
* APPEND L_TEXT TO I_CONTENT.
* MOVE 'Thanks,' TO L_TEXT.
* APPEND L_TEXT TO I_CONTENT.
* MOVE 'SAP MM' TO L_TEXT.
* APPEND L_TEXT TO I_CONTENT.
MOVE ' Attached is your HRIS report(s) generated from the Firm''s' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
MOVE ' Human Resources Information System (SAP).' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
MOVE ' ' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
MOVE ' This is an automated report.' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
* MOVE ' ' TO l_text.
* APPEND l_text TO i_content.
MOVE ' ' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
* MOVE ' Please do not reply to this email' TO l_text.
* APPEND l_text TO i_content.
* MOVE ' ' TO l_text.
* APPEND l_text TO i_content.
MOVE ' Thank you.' TO L_TEXT.
APPEND L_TEXT TO I_CONTENT.
* Creates persistent send request
TRY.
 L_SEND_REQUEST = CL_BCS=>CREATE_PERSISTENT( ).
* Creating Document
 L_DOCUMENT = CL_DOCUMENT_BCS=>CREATE_DOCUMENT(
 I_TYPE = 'RAW'
 I_TEXT = I_CONTENT[]
 I_SUBJECT = 'Automated HRIS (SAP) Report' ).
DATA: W_PERNR LIKE I_PERNR.
* Preparing contents of attachment with Change Log
 PERFORM PREPARE_ATTACHMENT.
 DATA: compressed like solisti1 occurs 10 with header line.
DATA: decompressed like solisti1 occurs 10 with header line.
 CALL FUNCTION 'TABLE_COMPRESS'
* IMPORTING
* COMPRESSED_SIZE =
 TABLES
* in = eerec
 in = i_attach
 out = compressed.
 CALL FUNCTION 'TABLE_DECOMPRESS'
 TABLES
 in = compressed
 out = decompressed.
 DESCRIBE TABLE decompressed LINES L_LINES.
* Size to multiplied by 2 for UNICODE enabled systems
 L_SIZE = L_LINES * 2 * 255.
* Adding Attachment
 CALL METHOD L_DOCUMENT->ADD_ATTACHMENT
 EXPORTING
 I_ATTACHMENT_TYPE = C_EXT
 I_ATTACHMENT_SIZE = L_SIZE
 I_ATTACHMENT_SUBJECT = 'Hr Details'
* i_att_content_hex = i_attach[].
 I_ATT_CONTENT_TEXT = decompressed[].
* DESCRIBE TABLE I_MARC LINES L_LINES.
* Size to multiplied by 2 for UNICODE enabled systems
* L_SIZE = L_LINES * 2 * 255.
** Adding Attachment
* CALL METHOD L_DOCUMENT->ADD_ATTACHMENT
* EXPORTING
* I_ATTACHMENT_TYPE = C_EXT
* I_ATTACHMENT_SIZE = L_SIZE
* I_ATTACHMENT_SUBJECT = 'MARC Details'
* I_ATT_CONTENT_HEX = I_ATTACH1[].
** i_att_content_text = i_attach1[].
* Add document to send request
 CALL METHOD L_SEND_REQUEST->SET_DOCUMENT( L_DOCUMENT ).
 DATA:LR_SENDER TYPE REF TO IF_SENDER_BCS,
 LR_SEND TYPE REF TO CL_BCS.
* Preparing the sender object
* LR_SENDER = CL_CAM_ADDRESS_BCS=>CREATE_INTERNET_ADDRESS( sy-uname ).
 DATA: L1_UNAME TYPE SY-UNAME.
 L1_UNAME = SY-UNAME.
 LR_SENDER = CL_SAPUSER_BCS=>CREATE( L1_UNAME ).
* Setting the sender
 CALL METHOD L_SEND_REQUEST->SET_SENDER
 EXPORTING
 I_SENDER = LR_SENDER.
* E-Mail
 LOOP AT P_EADDR.
 TRANSLATE P_EADDR-LOW TO LOWER CASE.
 L_RECIPIENT = CL_CAM_ADDRESS_BCS=>CREATE_INTERNET_ADDRESS( P_EADDR-LOW ).
 CALL METHOD L_SEND_REQUEST->ADD_RECIPIENT
 EXPORTING
 I_RECIPIENT = L_RECIPIENT
 I_EXPRESS = 'U'
 I_COPY = ' '
 I_BLIND_COPY = ' '
 I_NO_FORWARD = ' '.
 IF SY-SUBRC EQ 0.
 WRITE:/'** SUCCESS: Email Sent to', P_EADDR-LOW COLOR COL_NORMAL.
 ELSE.
 WRITE:/'** ERROR: Failed to send Email to',P_EADDR-LOW COLOR COL_NEGATIVE .
 ENDIF.
 ENDLOOP.
*Trigger E-Mail immediately
 L_SEND_REQUEST->SET_SEND_IMMEDIATELY( ' ' ).
 CALL METHOD L_SEND_REQUEST->SEND( ).
 COMMIT WORK.
 CATCH CX_DOCUMENT_BCS INTO L_BCS_EXCEPTION.
 CATCH CX_SEND_REQ_BCS INTO L_SEND_EXCEPTION.
 CATCH CX_ADDRESS_BCS INTO L_ADDR_EXCEPTION.
ENDTRY.
*& Form PREPARE_ATTACHMENT
FORM PREPARE_ATTACHMENT .
FIELD-SYMBOLS: <LFS_TABLE>, " Internal table structure
 <LFS_CON>. " Field Content
DATA: L_TEXT TYPE CHAR1024. " Text content for mail attachment
DATA: L_CON TYPE STRING. "(50) TYPE c. " Field Content in character format
DATA: L_STR TYPE STRING,
 L_STR1 TYPE STRING.
*data: w_pernr type TABLE OF I_PERNR.
DATA: LS_SOLIX TYPE SOLIX.
* CONCATENATE 'PERNR' 'FIRST NAME' 'Last Name' C_CR INTO L_TEXT SEPARATED BY '|'.
* append l_text to i_attach.
* clear l_text.
* Columns to be tab delimeted
LOOP AT I_PERNR ASSIGNING <LFS_TABLE>.
 DO.
 ASSIGN COMPONENT SY-INDEX OF STRUCTURE <LFS_TABLE>
 TO <LFS_CON>.
 IF SY-SUBRC NE 0.
 CONCATENATE C_CR L_TEXT INTO L_TEXT.
* CONCATENATE l_str c_cr l_text INTO l_str.
* ls_solix-line = l_text.
* APPEND ls_solix TO i_attach.
 APPEND L_TEXT TO I_ATTACH.
 EXIT.
 ELSE.
 CLEAR: L_CON.
 MOVE <LFS_CON> TO L_CON.
 CONDENSE L_CON.
 IF SY-INDEX = 1.
 CLEAR: L_TEXT.
 MOVE L_CON TO L_TEXT.
 ELSE.
 CONCATENATE L_TEXT L_CON INTO L_TEXT
 SEPARATED BY C_TAB.
 ENDIF.
 ENDIF.
 ENDDO.
ENDLOOP.
* i_attach1[] = i_attach[].
ENDFORM. " PREPARE_ATTACHMENT
Please if any one having 6.0 version please upload it and see..
Regards
Sas

Hi ,
Did you downloaded from SOST using the display icon and inside that 4th tab for attachment ....
and see?
Regards
sas
pS: THE FIRST page is not allowing the spaces in sdn...
i am getting o/p as
pernr vochn norna
.........0001 f0001 l0001
.................0002 F0002 L0002
.......................0003 F0003 L0003.....
Please remove dots and understand that is the o/p i am getting in my presenation file
i just expecting the o/p as told earlier..
Regards
sas

Transfer palm data from PC to Mac without using the M100 - only exporting the data and importing?

I had an old Palm M100 that I haven't used in a while but I love the palm desktop app - my PC currently runs 4.1.4
I have a mac powerbook and I loaded 4.2.1
When I export my calendar and address book data in the .aba and .dba format from my PC - the Mac palm desktop app doesn't seem to recognize those file formats.
Are those not standard formats between the two platforms? It also looks like the Mac desktop app doesn't even recognize importing data from another Palm format? It just shows the other program formats.
Also, when importing as CSV or tab-delimeted those are extremely messed up also.
Any "easy" way to get the data off of my PC and onto my Mac without using the Palm M100 itself?
Thanks,
Dave
Post relates to: Palm m100

The suggestion is not accurate, at least with respect to calendar information. I'm in nearly the same situation, and just tried it. (Saving .dba file out of Windows Palm Desktop 4.1.0, importing into Mac Palm Desktop 4.2.1revD.)
First, the Mac program will not recognize the .dba as an importable format if one selects All Readable Documents.
Second, if one selects All Documents instead, you get the following error message:
The file could not be imported.
In order to import data from Windows Palm Desktop software, export the file in one of these formats: comma (.csv) or tab (.tab) delimited, vCard, or vCal.
The problem with this is that Windows Palm Desktop 4.1.0 offers only two options for exporting Date Book information:
1) the whole datebook as a .dba file.
2) individual calendar items as a vCal.
So far as I can see, there's no way to Select All so as to export all as a vCal, and no pre-set option to do so.
Post relates to: Palm m125
Post relates to: Palm m125

Problem to upload the data into internal table record length more than 6000

Hi all
I stuck with this problem from past 3 days. I have to upload the data from excel sheet. iam making it tab delimited and trying to upload from gui_upload. but in the structure of file, we have, one field of 4000 characters, and other fields of 255 characters.
how can i upload this into internal table . From excel sheet or from tab delimeted or any other format? or any special function module is there? while iam doing this its truncating the datat 255 characters and not uploading the other fields also...
can any one of you help me out. ASAP
thnks in advance

from one of the forum iam just pasting code which it is used in lsmw, try the same logic in ur code hope it can work.
you have to create multiple lines with do...enddo loop., like this:
(assuming excel_long_text-text is 924 characters long, 7 lines X 132 char)
__GLOBAL_DATA__
data: offset type i,
text_132(132) type c.
__BEGIN_OF_RECORD__ Before Using Conversion Rules
Rule : Default Settings Modified
Code: /sapdmc/ltxtl = init_/sapdmc/ltxtl.
CLEAR offset.
DO 7 TIMES.
text_132 = excel_long_text-text+offset(132).
offset = offset + 132.
__END_OF_RECORD__ After Using Conversion Rules
Rule : Default Settings Modified
Code: transfer_record.
ENDDO.
also check this
COMMIT_TEXT
To load long text into SAP
READ_TEXT
To load long text into SAP

Error in my BDC SESSION METHOD

Hi,
I was trying work on BDC SESSION METHOD AND MY TCODE IS XK01.
Here is my code can some one tell me where i am doing wrong becoz its not giving the output as I expected. And I am uploading a tab delimeter file.
report ZAN_BDCVENDOR
 no standard page heading line-size 255.
include bdcrecx1.
DATA: I_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF RECORD OCCURS 0,
LIFNR(016),
BURKS(004),
EKORG(004),
KTOKK(004),
AKONT(010),
FDGRV(010),
WAERS(005),
END OF RECORD.
start-of-selection.
perform open_group.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
 filename = 'C:\VENDOR.TXT'
FILETYPE = 'ASC'
tables
 data_tab = RECORD
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT RECORD.
perform bdc_dynpro using 'SAPMF02K' '0100'.
perform bdc_field using 'BDC_CURSOR'
 'USE_ZAV'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'RF02K-LIFNR'
 '8765'.
perform bdc_field using 'RF02K-BUKRS'
 '1000'.
perform bdc_field using 'RF02K-EKORG'
 '1000'.
perform bdc_field using 'RF02K-KTOKK'
 '0001'.
perform bdc_field using 'USE_ZAV'
 'X'.
perform bdc_dynpro using 'SAPMF02K' '0210'.
perform bdc_field using 'BDC_CURSOR'
 'LFB1-FDGRV'.
perform bdc_field using 'BDC_OKCODE'
 '=UPDA'.
perform bdc_field using 'LFB1-AKONT'
 '160000'.
perform bdc_field using 'LFB1-FDGRV'
 'A1'.
perform bdc_dynpro using 'SAPMF02K' '0310'.
perform bdc_field using 'BDC_CURSOR'
 'LFM1-WAERS'.
perform bdc_field using 'BDC_OKCODE'
 '=UPDA'.
perform bdc_field using 'LFM1-WAERS'
 'usd'.
perform bdc_transaction using 'XK01'.
ENDLOOP.
perform close_group.
 CALL FUNCTION 'BDC_OPEN_GROUP'
 EXPORTING
 CLIENT = SY-MANDT
 DEST = FILLER8
 GROUP = 'SESSION1'
 HOLDDATE = FILLER8
 KEEP = FILLER1
 USER = SY-UNAME
 RECORD = FILLER1
 PROG = SY-CPROG
 IMPORTING
 QID =
 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.
 WRITE 'ERROR IN OPEN_GROUP'.
 ENDIF.
 CALL FUNCTION 'BDC_INSERT'
 EXPORTING
 TCODE = TCODE
 POST_LOCAL = NOVBLOCAL
 PRINTING = NOPRINT
 SIMUBATCH = ' '
 CTUPARAMS = ' '
 TABLES
 dynprotab = I_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 ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 CALL FUNCTION 'BDC_CLOSE_GROUP'
 EXCEPTIONS
 NOT_OPEN = 1
 QUEUE_ERROR = 2
 OTHERS = 3
 IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
I appreciate

Hi,
i guess, the error is due to, u didnt pass the TCODE parameter in BDC_INSERT FM.
Try by passing it...
CALL FUNCTION 'BDC_INSERT'
EXPORTING
TCODE = TCODE*
POST_LOCAL = NOVBLOCAL
PRINTING = NOPRINT
SIMUBATCH = ' '
CTUPARAMS = ' '
TABLES
dynprotab = I_BDCDATA
EXCEPTIONS
INTERNAL_ERROR = 1
NOT_OPEN = 2
QUEUE_ERROR = 3
TCODE_INVALID = 4
PRINTING_INVALID = 5
POSTING_INVALID = 6
OTHERS = 7
Hope it works!!
Regards,
Pavan

Problem in uploading a file

Hi All,
I did one application on file upload using the tutorial given in the ****************.
But i am unable to run my application due to the function module 'HR_KR_XSTRING_TO_STRING'
that does not exist.Can anybody plz tell me the name of the function module to convert xstring to string or an idea to solve this problem.
Thanks in Advance.

If you want to upload an EXCEL file. you can achive it by first saving excel as
tab delimeted text file. This is simple open excel from save as choose
save as type Text( Tab delimeted).txt.
Now use file upload UI element from webdynpro abap. within the context declare
a context node lets call it NODE with attribute File type XSTRING. Bind
the data property of file upload UI element to the attribute 'File'.
Create a button upload and on its action write the following code.
Data: s_cont type string,
 x_cont type xstring,
 convt type ref to cl_abap_conv_in_ce,
 item_file type xstringval.
data: input_string type string,
 fields type string_table,
 fields2 type string_table,
 tbl_fields type string_table,
 s_table type string_table,
 ls_table like line of s_table,
 ls like line of fields,
 lv_kunnr type kunnr,
 lv_ret type boolean,
 lv_num_cols type i.
 field-symbols: <wa_table> like line of s_table.
 DATA:
 node_file TYPE REF TO if_wd_context_node,
 elem_file TYPE REF TO if_wd_context_element,
 stru_file TYPE if_v_upload=>element_file ,
 item_file LIKE stru_file-file.
* navigate from <CONTEXT> to <NODE> via lead selection
 node_file = wd_context->get_child_node( name = if_v_upload=>wdctx_node ).
* get element via lead selection
 elem_file = node_file->get_element( ).
* get single attribute
 elem_file->get_attribute(
 EXPORTING
 name = `FILE`
 IMPORTING
 value = item_file ).
convt = cl_abap_conv_in_ce=>create( input = item_file ).
convt->read( importing data = s_cont ).
"Column headers
split s_cont at cl_abap_char_utilities=>cr_lf into table s_table.
read table s_table into ls_table index 1.
" delete column header
delete s_table index 1.
loop at s_table assigning <wa_table>.
 split <wa_table> at cl_abap_char_utilities=>horizontal_tab into : ls_data-recordid
 ls_data-candno
 ls_data-fname
 ls_data-inits
 ls_data-lname
 ls_data-gesch
 ls_data-gbdat
 ls_data-uln.
 append ls_data to lt_data.
 clear ls_data.
 endloop.
wd_this->m_node_data->bind_table(
 exporting
 new_items = lt_data
 set_initial_elements = abap_true ).
endmethod.
Greetings Prashant
P.S. Points welcome

Tab delimeter in 4.6c

Similar Messages

Maybe you are looking for