Wrong format on text file using SO_NEW_DOCUMENT_ATT_SEND_API1 FM

Hi All!!
I've been looking in the forum but couldn't find the solution...
I'm using this FM to send a text file by email.
I got the email and the file attached but the file is not right
I shoud get:
texttexttexttext blablabla texttexttexttext
texttexttexttext blablabla texttexttexttext
texttexttexttext blablabla texttexttexttext
texttexttexttext blablabla texttexttexttext
but I'm getting
texttexttexttext blablabla texttexttexttext
. ...................................... texttexttexttext blablabla texttexttexttext
. ....................................... ...................................... texttexttexttext blablabla texttexttexttext
. ....................................... ....................................... ...................................... texttexttexttext blablabla texttexttexttext
(dots are not being displayed)
I've tried concatenating '0A' or '09' at the end of each line but I'm still getting the wrong alinegment.
Any idea?
Thanks.
Edited by: Ina on Sep 15, 2009 1:01 PM
Edited by: Ina on Sep 15, 2009 1:02 PM

***********Declarations *******************************
constants : c_cret(2)        TYPE c VALUE cl_abap_char_utilities=>cr_lf,
                    c_tab(2)         TYPE c VALUE cl_abap_char_utilities=>horizontal_tab,
DATA : i_objtxt            TYPE STANDARD TABLE OF solisti1,        " Internal table to hold Mail details
             i_objpack        TYPE STANDARD TABLE OF sopcklsti1,   " Internal table to hold Mail details
             i_objhead        TYPE STANDARD TABLE OF solisti1,        " Internal table for the Mail data
             i_objbin           TYPE STANDARD TABLE OF solisti1,        " Internal table to hold the Object text
             i_rcvrs            TYPE STANDARD TABLE OF somlreci1.
DATA : wa_objtxt        LIKE LINE OF i_objtxt,
            wa_objpack       LIKE LINE OF i_objpack,
            wa_objhead       LIKE LINE OF i_objhead,
            wa_objbin        LIKE LINE OF i_objbin,
             wa_rcvrs         LIKE LINE OF i_rcvrs.
********Send Mail***************************************
DATA : l_lines TYPE i.
DATA : l_attlines TYPE i.
Mail Body text
wa_objtxt-line = title
APPEND wa_objtxt TO i_objtxt.
DESCRIBE TABLE i_objtxt LINES l_lines.
*Document Attributes
i_doc_chng-obj_name = 'TEST'. " input contains the attributes of the document to be sent
i_doc_chng-obj_descr = 'bla bla bla'
Mail details
CLEAR wa_objpack.
wa_objpack-head_start = c_1.
wa_objpack-head_num   = c_0.
wa_objpack-body_start = c_1.
wa_objpack-body_num   = l_lines.
wa_objpack-doc_type   = 'RAW'.
APPEND wa_objpack TO i_objpack.
IF NOT i_output IS INITIAL.
    LOOP AT i_output INTO wa_output.
      CONCATENATE wa_output-matnr1 wa_output-text INTO wa_objbin SEPARATED BY c_tab.   "first line
      CONCATENATE c_cret wa_objbin INTO wa_objbin.
      APPEND wa_objbin TO i_objbin.
    ENDLOOP.
DESCRIBE TABLE i_objbin LINES l_attlines.
READ     TABLE i_objbin INTO wa_objbin INDEX l_attlines.
CLEAR wa_objpack.
wa_objpack-transf_bin = 'X'.
wa_objpack-head_start = c_1.
wa_objpack-head_num   = c_0.
wa_objpack-body_start = c_1.
wa_objpack-body_num   = l_attlines.
wa_objpack-doc_type   = 'TXT' .
wa_objpack-obj_name   = text-201.
wa_objpack-obj_descr = text-201.
wa_objpack-doc_size   = ( l_attlines - 1 ) * 255
                                            + STRLEN( wa_objbin ).
APPEND wa_objpack TO i_objpack.
MOVE p_list TO wa_rcvrs-receiver.
wa_rcvrs-rec_type = 'U'            " Internet ID
wa_rcvrs-rec_date = ''.
PERFORM touppercase CHANGING wa_rcvrs.
APPEND wa_rcvrs TO i_rcvrs.
CLEAR wa_rcvrs.
wa_objhead-line = text-201.
APPEND wa_objhead TO i_objhead.
Call function to send the mail
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
    EXPORTING
      document_data              = i_doc_chng
      put_in_outbox                = c_x
      commit_work                 = c_x
    TABLES
      packing_list                   = i_objpack
      object_header              = i_objhead
      contents_bin                = i_objbin
      contents_txt                 = i_objtxt
      receivers                      = i_rcvrs
    EXCEPTIONS
      too_many_receivers                  = 1
      document_not_sent                   = 2
      document_type_not_exist         = 3
      operation_no_authorization      = 4
      parameter_error                       = 5
      x_error                                     = 6
      enqueue_error                         = 7
      OTHERS                                   = 8.
CASE sy-subrc.
    WHEN '0'.
      WAIT UP TO 2 SECONDS.
      SUBMIT rsconn01 WITH mode = 'INT'
                      AND RETURN.
      MESSAGE s010(ad) WITH 'Mail Sent Successfully'(i50).
ENSCASE.
Try this code with your data, this should work.
Edited By Tejaswini Khante

Similar Messages

Attaching text file using SO_NEW_DOCUMENT_ATT_SEND_API1

hello guys, i'm a newbie here.
I'm having trouble attaching an existing text file using function 'SO_NEW_DOCUMENT_ATT_SEND_API1'. It seems i can't find the right combination of parameters that are being passed to this function.
first, i'm using WS_UPLOAD to upload the text file to an internal table then i'm creating all the neccessary internal tables that will be use by this function..
By the way, i'm trying to send mail w/ attachments to external mail and SAPids. Below is my code.
REPORT ZHR_TESTEMAIL .
TABLES: USR02, PA0105, SOSU, SOUC, RLGRAP, IBIPPARMS, DYNPREAD, RSCSEL.
DATA: FOLD_YR(2) TYPE C,
      FOLD_TYPE(3) TYPE C,
      G_HEADER LIKE SOOD2,
      G_FOLMAM LIKE SOFM2,
      METHOD1 LIKE SY-UCOMM,
      G_DOCUMENT LIKE SOOD4,
      G_USER LIKE SOUDNAMEI1,
      FOLD_NUMBER(12) TYPE C,
      G_NEW_PARENT LIKE SOODK,
      G_OWNER LIKE SOUD-USRNAM,
      G_REF_DOCUMENT LIKE SOOD4,
      G_USER_DATA LIKE SOUDATAI1,
      G_AUTHORITY LIKE SOFA-USRACC,
      G_OBJCNT LIKE SOLI OCCURS 0 WITH HEADER LINE,
      G_OBJHEAD LIKE SOLI OCCURS 0 WITH HEADER LINE,
      G_OBJPARA LIKE SELC OCCURS 0 WITH HEADER LINE,
      G_OBJPARB LIKE SOOP1 OCCURS 0 WITH HEADER LINE,
      G_RECIPIENTS LIKE SOOS1 OCCURS 0 WITH HEADER LINE,
      G_REFERENCES LIKE SOXRL OCCURS 0 WITH HEADER LINE,
      G_ATTACHMENTS LIKE SOOD5 OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF G_FILES OCCURS 10 ,
      TEXT(4096) TYPE C,
      END OF G_FILES.
DATA: BEGIN OF IT_WS_FILE OCCURS 0,
      WS_FILE LIKE RLGRAP-FILENAME,
      END OF IT_WS_FILE.
DATA: BEGIN OF IT_SAPID OCCURS 0,
      SAPID LIKE USR02-BNAME,
      END OF IT_SAPID.
DATA: BEGIN OF IT_EMAIL OCCURS 0,
      EMAILADD LIKE PA0105-USRID_LONG,
      END OF IT_EMAIL.
DATA: BEGIN OF IT_TSP01 OCCURS 0.
        INCLUDE STRUCTURE TSP01.
DATA: END OF IT_TSP01.
DATA: BEGIN OF TAB2 OCCURS 50,
      TEXT(200) TYPE C,
      END OF TAB2.
DATA: V_DOCDATA TYPE SODOCCHGI1,
      V_OBJPACK LIKE SOPCKLSTI1 OCCURS 0 WITH HEADER LINE,
      V_OBJHEAD LIKE SOLISTI1   OCCURS 0 WITH HEADER LINE,
      V_OBJTXT LIKE SOLISTI1   OCCURS 0 WITH HEADER LINE,
      V_OBJBIN LIKE SOLISTI1   OCCURS 0 WITH HEADER LINE,
      V_OBJHEX LIKE SOLIX      OCCURS 0 WITH HEADER LINE,
      IT_RECVRS TYPE SOMLRECI1 OCCURS 0 WITH HEADER LINE,
      IT_CONTNT TYPE SOLISTI1   OCCURS 0 WITH HEADER LINE,
      IT_BODY   LIKE SOLISTI1   OCCURS 10 WITH HEADER LINE,
      V_TLIN    TYPE I,
      V_LINE    TYPE I.
DATA: BEGIN OF IT_TEXTLINE OCCURS 500,
      TEXTLINE(5000),
      END OF IT_TEXTLINE.
DATA: FYL LIKE RLGRAP-FILENAME,
      GV_SUBNO LIKE SOSU-SUBNO,
      GV_EMAIL LIKE PA0105-USRID_LONG,
      GV_NEXTDAY LIKE SY-DATUM,
      YEAR(4) TYPE C,
      RECFLAG TYPE C.
SELECTION-SCREEN BEGIN OF BLOCK PARAM WITH FRAME TITLE TEXT-001.
PARAMETERS: SUBJ(254) TYPE C OBLIGATORY,            "Subject
            DESC(254) TYPE C.                       "Message
SELECT-OPTIONS: SAPID FOR USR02-BNAME NO INTERVALS. "Recipient's SAP ID
SELECT-OPTIONS: EMAILADD FOR PA0105-USRID_LONG NO INTERVALS.
SELECTION-SCREEN END OF BLOCK PARAM.
SELECTION-SCREEN BEGIN OF BLOCK PARAM2 WITH FRAME TITLE TEXT-002.
SELECT-OPTIONS: WS_FILE FOR DYNPREAD-FIELDNAME NO INTERVALS.
SELECTION-SCREEN END OF BLOCK PARAM2.
SELECTION-SCREEN BEGIN OF BLOCK PARAM3 WITH FRAME TITLE TEXT-003.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: RBUT1 RADIOBUTTON GROUP A USER-COMMAND BUT. "Local PC
SELECTION-SCREEN COMMENT 5(20) FOR FIELD RBUT1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: RBUT2 RADIOBUTTON GROUP A.                  "Server
SELECTION-SCREEN COMMENT 5(20) FOR FIELD RBUT2.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: RBUT3 RADIOBUTTON GROUP A.                  "Spool
SELECTION-SCREEN COMMENT 5(20) FOR FIELD RBUT3.
PARAMETERS: SPOOLNUM LIKE RSPOTYPE-RQNUMBER.            "Spool Number
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK PARAM3.
SELECTION-SCREEN BEGIN OF BLOCK PROC WITH FRAME TITLE TEXT-004.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETER: BPROC AS CHECKBOX USER-COMMAND BCK. "Background Processing
SELECTION-SCREEN COMMENT 5(50) FOR FIELD BPROC.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK PROC.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR WS_FILE-LOW.
DATA: WS_FILE_TEMP TYPE IBIPPARMS-PATH.
CLEAR: WS_FILE_TEMP.
CALL FUNCTION 'F4_FILENAME'
       EXPORTING
            PROGRAM_NAME = SY-REPID
            DYNPRO_NUMBER = SY-DYNNR
            FIELD_NAME    = 'WS_FILE'
       IMPORTING
            FILE_NAME     = WS_FILE_TEMP.
WS_FILE-LOW = WS_FILE_TEMP.
AT SELECTION-SCREEN.
SELECT SAPNAM FROM SOUC
      INTO TABLE IT_SAPID
      WHERE SAPNAM IN SAPID
        AND DELETED = ''.
GV_NEXTDAY = SY-DATUM + 1.
LOOP AT EMAILADD.
    IT_EMAIL-EMAILADD = EMAILADD-LOW.
    APPEND IT_EMAIL.
    CLEAR: IT_EMAIL.
ENDLOOP.
IF NOT BPROC IS INITIAL.
    CLEAR: RBUT1, RBUT3.
    RBUT2 = 'X'.
ELSE.
    CLEAR: RBUT2.
ENDIF.
IF NOT RBUT3 IS INITIAL.
    REFRESH: WS_FILE.
ENDIF.
IF SAPID IS INITIAL AND EMAILADD IS INITIAL.
    MESSAGE E000(ZZ) WITH TEXT-201.
ELSEIF NOT SAPID IS INITIAL AND EMAILADD IS INITIAL.
    CLEAR IT_SAPID.
    READ TABLE IT_SAPID.
    SELECT SINGLE SUBNO FROM SOSU
      INTO GV_SUBNO
      WHERE USRNO IN ( SELECT USRNO FROM SOUC
                         WHERE SAPNAM = IT_SAPID-SAPID ).
    IF SY-SUBRC NE 0.
      MESSAGE E000(ZZ) WITH TEXT-202.
    ENDIF.
    CLEAR: IT_SAPID.
ELSEIF NOT SAPID IS INITIAL AND NOT EMAILADD IS INITIAL.
    CLEAR: IT_SAPID, IT_EMAIL.
    READ TABLE IT_SAPID.
    READ TABLE IT_EMAIL.
    SELECT SINGLE SUBNO FROM SOSU
      INTO GV_SUBNO
      WHERE USRNO IN ( SELECT USRNO FROM SOUC
                         WHERE SAPNAM = IT_SAPID-SAPID ).
    IF SY-SUBRC NE 0.
      SUBMIT RSSOADM0 WITH USRNAM EQ IT_SAPID-SAPID
                      WITH NEW_SUBS EQ IT_EMAIL-EMAILADD
                      WITH SUB_ESC EQ 'U'
                      WITH EDAT EQ SY-DATUM
                      WITH BDAT EQ SY-DATUM
                     WITH BDAT EQ GV_NEXTDAY
                     WITH EDAT EQ '99991231'
                      WITH BTIM EQ SY-UZEIT
                      WITH ETIM EQ '240000'
                      WITH FORW_ALL EQ 'X'
                      WITH PSTHR2 EQ ''
                      AND RETURN.
    ENDIF.
    CLEAR: IT_SAPID.
ELSEIF NOT EMAILADD IS INITIAL AND SAPID IS INITIAL.
    RECFLAG = 'X'.
ENDIF.
START-OF-SELECTION.
    PERFORM B_SENDMAIL.
FORM B_SENDMAIL.
YEAR = SY-DATUM+0(4).
LOOP AT WS_FILE.
    CLEAR: FYL.
    FYL = WS_FILE-LOW.
    REFRESH: TAB2.
    CALL FUNCTION 'WS_UPLOAD'
         EXPORTING
              FILENAME = FYL
              FILETYPE = 'BIN'
         TABLES
              DATA_TAB = TAB2.
    IT_TEXTLINE[] = TAB2[].
DOCUMENT_DATA (SUBJECT OF MAIL)
    V_DOCDATA-OBJ_NAME   = DESC.
    V_DOCDATA-OBJ_DESCR = SUBJ.
    V_DOCDATA-OBJ_LANGU = SY-LANGU.
    V_DOCDATA-SENSITIVTY = 'C'.
    V_DOCDATA-OBJ_PRIO   = '1'.
BODY OF MAIL
    IT_BODY-LINE = 'Collection Report'.
    APPEND IT_BODY.
CONTENTS_TXT (Attachments)
    IT_CONTNT[] = IT_TEXTLINE[].
    DESCRIBE TABLE IT_CONTNT LINES V_LINE.
    READ TABLE IT_CONTNT INDEX V_LINE.
PACKING_LIST
    V_OBJPACK-DOC_SIZE = ( V_LINE - 1 ) * 255 + STRLEN( IT_CONTNT ).
    V_OBJPACK-TRANSF_BIN = 'X'.
    V_OBJPACK-HEAD_START = 1.
    V_OBJPACK-HEAD_NUM   = 0.
    V_OBJPACK-BODY_START = 1.
    V_OBJPACK-BODY_NUM   = V_LINE.
    V_OBJPACK-DOC_TYPE   = 'TXT'.
    V_OBJPACK-OBJ_NAME   = 'ATTACHMENT'.
    V_OBJPACK-OBJ_DESCR = 'Attached Document'.
    APPEND V_OBJPACK.
    CLEAR V_OBJPACK.
RECEIVERS of mail
    IF RECFLAG IS INITIAL.
      LOOP AT IT_SAPID.
        IT_RECVRS-RECEIVER   = IT_SAPID-SAPID.
        IT_RECVRS-REC_TYPE   = 'B'.
        IT_RECVRS-COM_TYPE   = ''.
        IT_RECVRS-EXPRESS    = 'X'.
        IT_RECVRS-NO_FORWARD = ''.
        IT_RECVRS-NO_PRINT   = ''.
        APPEND IT_RECVRS.
        CLEAR IT_RECVRS.
      ENDLOOP.
    ELSE.
      LOOP AT EMAILADD.
        IT_RECVRS-RECEIVER   = EMAILADD-LOW.
        IT_RECVRS-REC_TYPE   = 'U'.
        IT_RECVRS-COM_TYPE   = 'INT'.
        IT_RECVRS-EXPRESS    = 'X'.
        APPEND IT_RECVRS.
        CLEAR IT_RECVRS.
      ENDLOOP.
    ENDIF.
OBJECT_HEADER (Filename)
    CONCATENATE 'Collection Report' '_'
                 SY-DATUM+4(4) YEAR '.TXT'
                 INTO V_OBJHEAD-LINE.
   V_OBJHEAD-LINE = FYL+16(25).
    APPEND V_OBJHEAD.
    CLEAR V_OBJHEAD.
Function Module For Sending Mail with Attachment
    CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
         EXPORTING
              DOCUMENT_DATA              = V_DOCDATA
         TABLES
              PACKING_LIST               = V_OBJPACK
              OBJECT_HEADER              = V_OBJHEAD
              CONTENTS_HEX               = IT_CONTNT
              CONTENTS_TXT               = IT_BODY
              RECEIVERS                  = IT_RECVRS
         EXCEPTIONS
              TOO_MANY_RECEIVERS         = 1
              DOCUMENT_NOT_SENT          = 2
              DOCUMENT_TYPE_NOT_EXIST    = 3
              OPERATION_NO_AUTHORIZATION = 4
              PARAMETER_ERROR            = 5
              X_ERROR                    = 6
              ENQUEUE_ERROR              = 7
              OTHERS                     = 8.
    IF SY-SUBRC = 0.
      MESSAGE S000(ZZ) WITH TEXT-005.
    ELSE.
      MESSAGE S000(ZZ) WITH TEXT-006.
    ENDIF.
ENDLOOP.
end of my code *
please help me guys... when i run this program,    DOCUMENT_NOT_SENT is what i always get..
waiting for ur reply... thank you vey much and godbless.

Hi,
Try this sample code.
FORM SEND_TO_EMAIL USING zFName.
DATA: OBJPACK LIKE SOPCKLSTI1 OCCURS 2 WITH HEADER LINE.
DATA: OBJHEAD LIKE SOLISTI1 OCCURS 1 WITH HEADER LINE.
DATA: OBJBIN LIKE SOLISTI1 OCCURS 10 WITH HEADER LINE.
DATA: OBJTXT LIKE SOLISTI1 OCCURS 10 WITH HEADER LINE.
DATA: RECLIST LIKE SOMLRECI1 OCCURS 5 WITH HEADER LINE.
DATA: DOC_CHNG LIKE SODOCCHGI1.
DATA: TAB_LINES LIKE SY-TABIX.
DATA: ctmp(50) TYPE C.
Creation of the document to be sent
DOC_CHNG-OBJ_NAME = 'JOURNAL'.
CONCATENATE 'SAP Payroll Journal file Period' pybegda INTO ctmp
              SEPARATED BY SPACE.
DOC_CHNG-OBJ_DESCR = cTmp.
OBJTXT = 'SAP Payroll Journal'.
APPEND OBJTXT.
CONCATENATE 'For Period' pybegda INTO ctmp
              SEPARATED BY SPACE.
OBJTXT = ctmp.
APPEND OBJTXT.
CONCATENATE 'Attached File :' zFname INTO ctmp
              SEPARATED BY SPACE.
OBJTXT = ctmp.
APPEND OBJTXT.
OBJTXT = 'Please find the attachment.'.
APPEND OBJTXT.
DESCRIBE TABLE OBJTXT LINES TAB_LINES.
READ TABLE OBJTXT INDEX TAB_LINES.
DOC_CHNG-DOC_SIZE = ( TAB_LINES - 1 ) * 255 + STRLEN( OBJTXT ).
Creation of the entry for the compressed document
CLEAR OBJPACK-TRANSF_BIN.
OBJPACK-HEAD_START = 1.
OBJPACK-HEAD_NUM = 0.
OBJPACK-BODY_START = 1.
OBJPACK-BODY_NUM = TAB_LINES.
OBJPACK-DOC_TYPE = 'RAW'.
APPEND OBJPACK.
Creation of the document attachment
<b>LOOP AT xMail.
    CONDENSE xMail-aline.
    OBJBIN = xMail-aline.
    APPEND OBJBIN.
    CLEAR OBJBIN.
ENDLOOP.</b>
DESCRIBE TABLE OBJBIN LINES TAB_LINES.
OBJHEAD = zFname. APPEND OBJHEAD.
Creation of the entry for the compressed attachment
OBJPACK-TRANSF_BIN = 'X'.
OBJPACK-HEAD_START = 1.
OBJPACK-HEAD_NUM = 1.
OBJPACK-BODY_START = 1.
OBJPACK-BODY_NUM = TAB_LINES.
OBJPACK-DOC_TYPE = 'RAW'.
OBJPACK-OBJ_NAME = 'DATA'.
OBJPACK-OBJ_DESCR = 'SAP Payroll File'.
OBJPACK-DOC_SIZE = TAB_LINES * 255.
APPEND OBJPACK.
Completing the recipient list
LOOP AT PENERIMA.
    CONDENSE PENERIMA-PNRM.
    RECLIST-RECEIVER = PENERIMA-PNRM.
    RECLIST-REC_TYPE = 'U'.
    APPEND RECLIST.
ENDLOOP.
Sending the document
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
       EXPORTING
            DOCUMENT_DATA              = DOC_CHNG
            PUT_IN_OUTBOX              = ' '
       TABLES
            PACKING_LIST               = OBJPACK
            OBJECT_HEADER              = OBJHEAD
            CONTENTS_BIN               = OBJBIN
            CONTENTS_TXT               = OBJTXT
            RECEIVERS                  = RECLIST
       EXCEPTIONS
            TOO_MANY_RECEIVERS         = 1
            DOCUMENT_NOT_SENT          = 2
            OPERATION_NO_AUTHORIZATION = 4
            OTHERS                     = 99.
CASE SY-SUBRC.
    WHEN 0.
      WRITE: / 'Result of the send process:'.
      LOOP AT RECLIST.
        WRITE: / RECLIST-RECEIVER(48), ':'.
        IF RECLIST-RETRN_CODE = 0.
          WRITE / 'The document was sent'.
        ELSE.
          WRITE / 'The document could not be sent'.
        ENDIF.
      ENDLOOP.
    WHEN 1.
      WRITE: / 'Too many receiver'.
    WHEN 2.
      WRITE: / 'Document could not be sent to any recipient'.
    WHEN 4.
      WRITE: / 'No send authorization'.
    WHEN OTHERS.
      WRITE: / 'Error occurred while sending'.
ENDCASE.
ENDFORM.

How to format the spaces in a text file using bat file scripting

Currently the records in my text file are like this:
100239 0000015.00
QRP
I want them to be like this:
100266 0000015.00 QRP
There should be 6 spaces before the first column and 8 spaces after that. There should be 1 space between the second and third columns.
Generally this file contains approx 1000 records.
Any help is highly appreciated.
Thank you.

So far it's like this:
for /f "skip=2 delims=*" %%a in (C:\Bonus_File_Export.txt) do (
echo %%a >>C:\newfile.txt
xcopy C:\newfile.txt C:\Bonus_File_Export.txt /y
del C:\newfile.txt /f /q
I've to format a text file generated by the tool Microstrategy and it feed it to another system in a specific format. Ihave removed the headers with the above script but was unable to remove the spaces between those columns.
You can use this code as a basis for your script:
@echo off
set Line=
if exist d:\temp\newfile.txt del d:\temp\newfile.txt
for /F "skip=2 tokens=1-2" %%a in (d:\temp\test.txt) do call :Sub %%a %%b
goto :eof
:Sub
if not "%2"=="" (
set Line= %1 %2
) else (
echo %Line% %1>>d:\temp\newfile.txt
It works provided that your input file uses this format:
Header line
Header line
100239 0000015.00
QRP
100240 0000016.00
QRR
100241 0000017.00
QRS
100242 0000018.00
QRT
100243 0000019.00
QRU
100244 0000020.00
QRV

How to print a text file using Java

How can I print a text file using Java without converting the output to an image format. Is there anyway I can send the characters in the text file as it is for a print job? I did get a listing doing this ... but that converted the text to an image format before printing....
THanks,.

Hi I had to write a print api from scratch, and I did not convert the output to image. Go and read up on the following code. I know there is a Tutorial on Sun about the differant sections of the snippet.
private void printReport()
     Frame tempFrame = new Frame(getName());
     PrintJob printerJob = Toolkit.getDefaultToolkit().getPrintJob(tempFrame, "Liesltext", null);
     Graphics g = printerJob.getGraphics();
                //I wrote the method below for calculations
     printBasics(g);
     g.dispose();
     printerJob.end();
}This alone wont print it you have to do all the calculations in the printBasics method. And as I said I wrote this from scratch and all I did was research first the tutorial and the white papers
Ciao

How to read some lines from a text file using java.

hi,
i m new to java and i want to read some lines from a text file based on some string occurrence in the file. This file to be read in steps.
we only want to read the file upto the first Occurrence of "TEXT" string.
How to do it ,,,
Kinldy give the code
Regards,
Sagar
this is the text file
dfgjdjj
sfjhjkd
ghjkdg
hjkdgh TEXT
ikeyt
ujt
jk
tyk TEXT
rukl
r

Hendawy wrote:
Since the word "TEXT" is formed of 4 letters, you would read the text file 4 bytes by four bytes. Wrong on two counts. First, the file may not be encoded 1 byte per character. It could be utf-16 in which case it would be two byte per character. Second, even if it were 1 byte per character, the string "Text" may not start on a 4 byte boundary.
Consider a FileInputStream object "fis" that points to your text file. use fis.read(byte[] array, int offset, int len) to read every four bytes. Convert the "TEXT" String into a byte array "TEXT".getBytes(), and yous the Arrays class to compare the equality of the read bytes with your "TEXT".getBytes()Wrong since it relies on my second point and will fail when fis.read(byte[] array, int offset, int len) does not read 4 bytes (as is no guaranteed to). Check the Javadoc. Also, the file may not be encoded with the default character encoding.
The problem is easily solved by reading a line at a time using a BufferedReader wrapping an InputStreamReader wrapping a FileInputStream and specifying the correct character encoding.
Edited by: sabre150 on Apr 29, 2009 2:13 PM

How to call text file using Script in Data Integrator

Dear All,
Can any one assit me in how to call a text file using script with the help of Data Integrator.
and one question ?
M having 32 csv files i want to club thos 32 csv files into one table with the help of Data Integrator, can
any one assist me.

mary,
since you knew the file name ,when clicked in name send to server,read the file and write to servlet outputstream.
I think this would help you.
If anything wrong in mycode ..forums will help you further
BufferedInputStream bis=null;
BufferedOutputStream bos=null;
int bytesRead=0;
byte buff[]=new byte[1024];
File f=new File(test.txt);
try{
     bis= new BufferedInputStream(new FileInputStream(f));
     bytesRead=bis.read(buff,0,buff.length);
     if(bytesRead!=-1){
          // create a BufferedOutputStream from ServletOutputStream
          bos=new BufferedInputStream(response.getOutputStream());
          do{
               bos.write(buff,0,bytesRead);
          }while((bytesRead=bis.read(buff,0,buff.length))!=-1)
}catch(Exception e){
     ////error handling
     }

I was given an assingment, but have no idea where to begin. The assingment is to create a text file using notepad with all of my digital inputs and some how make those imputs show up on my digital indicators on my control pannel

I was given an assingment, but have no idea where to begin. The assingment is to create a text file using notepad with all of my digital inputs and some how make those imputs show up on my digital indicators on my control pannel.
When it was explained to me it didn't sound to hard of a task, I have no LabVIEW experience and the tutortial sucks.

StevenD: FYI, I did NOT give you the one star rating. I would never do that!
StevenD wrote:
Ow. Someone is grumpy today.
Well, this is an assignment, so it is probably homework.
Why else would anyone give HIM such an assigment, after all he has no LabVIEW experience and the tutorials are too hard for him?
This would make no sense unless all of it was just covered in class!
This is not a free homework service with instant gratification.
OK! Let's do it step by step. I assume you already have a VI with the digital indicators.
"...but have no idea where to begin".
open notepad.
decide on a format, possibly one line per indicator.
type the document.
close notepad.
open LabVIEW.
Open the existing VI with all the indicators.
(are you still following?)
look at the diagram.
Who made the program?
Does the code make sense so far?
Is it a statemachine or just a bunch of crisscrossed wires?
Where do you want to add the file read?
How should the file be read (after pressing a read button, at the start of the program ,etc.)
See how far you get!
Message Edited by altenbach on 06-24-2008 11:23 AM
LabVIEW Champion . Do more with less code and in less time .

Formatting the text file

hi folks,
I have an text file with records, each record has several field values and there is blank space between them, I need to remove the blank spaces, is there a way that i can do with all records at one stretch? Instead doing it for each record.
I know it is not related to SAP but I need some help in this regard as there are a lot of records and formatting each record manually is extremely painful. This is a corrected file manually on a spreadsheet and converted into the text file from thereon.
Any help is really appreicated.
Thanks,
SK

Hi,
What you are trying to do with the text file after removing the spaces?
Are you going to use in SAp Upload? or just to remove the spaces in text fiel?
If you are using it for other purposes, you should not remove the spaces, because for that particular field no data will be entered.
(generally we remove the other chars's like " by Find and Replace method)
Generally we format the text files from the Excel to utilise it somewhere?
And we won't remove the spaces for surther uses.
Regards,
Anji

Report the size of all SharePoint Databases in a text file using PowerShell?

I am new to Powershell. please help me for following question with step by step process.
How to report the size of all SharePoint Databases in a text file using PowerShell?

Hi Paul,
Here is the changed script, which will also include the size for the Config DB.
Please let me know if it worked:
#Get SharePoint Content database sizes
Add-PSSnapin Microsoft.SharePoint.PowerShell -ErrorAction SilentlyContinue
$date = Get-Date -Format "dd-MM-yyyy"
#Variables that you can change to fit your environment
$TXTFile = "D:\Reports\SPContentDatabase_$date.txt"
$SMTPServer = "yourmailserver"
$emailFrom = "[email protected]"
$emailTo = "[email protected]"
$subject = "Content & Config Database size reports"
$emailBody = "Daily/Weekly/Monthly report on Content & Config databases"
$webapps = Get-SPWebApplication
$configDB = Get-SPDatabase | ?{$_.Name -eq ((Get-SPFarm).Name)}
$ConfigDBSize = [Math]::Round(($configDB.disksizerequired/1GB),2)
Add-Content -Path $TXTFile -Value "Config Database size: $($ConfigDBSize)GB"
Add-Content -Path $TXTFile -Value ""
foreach($webapp in $webapps)
$ContentDatabases = $webapp.ContentDatabases
Add-Content -Path $TXTFile -Value "Content databases for $($webapp.url)"
foreach($ContentDatabase in $ContentDatabases)
$ContentDatabaseSize = [Math]::Round(($ContentDatabase.disksizerequired/1GB),2)
Add-Content -Path $TXTFile -Value "- $($ContentDatabase.Name): $($ContentDatabaseSize)GB"
if(!($SMTPServer) -OR !($emailFrom) -OR !($emailTo))
Write-Host "No e-mail being sent, if you do want to send an e-mail, please enter the values for the following variables: $SMTPServer, $emailFrom and $emailTo."
else
Send-MailMessage -SmtpServer $SMTPServer -From $emailFrom -To $emailTo -Subject $subject -Body $emailBody -Attachment $TXTFile
Nico Martens - MCTS, MCITP
SharePoint 2010 Infrastructure Consultant / Trainer

How to read a text file using Java

Guys,
Good day!
Please help me how to read a text file using Java and create/convert that text file into XML.
Thanks and God Bless.
Regards,
I-Talk

     public void fileRead(){
             File aFile =new File("myFile.txt");
         BufferedReader input = null;
         try {
           input = new BufferedReader( new FileReader(aFile) );
           String line = null;
           while (( line = input.readLine()) != null){
         catch (FileNotFoundException ex) {
           ex.printStackTrace();
         catch (IOException ex){
           ex.printStackTrace();
     }This code is to read a text file. But there is no such thing that will convert your text file to xml file. You have to have a defined XML format. Then you can read your data from text files and insert them inside your xml text. Or you may like to read xml tags from text files and insert your own data. The file format of .txt and .xml is far too different.
cheers
Mohammed Jubaer Arif.

Why this error in writing string to text file using utl_file?

HI Friends,
Iam trying to write procedure to add one line of text in text file using UTIL package. But getting error.
create or replace procedure Add_To_File() is
OutFile utl_file.file_type;
l_err_code NUMBER(10);
l_err_msg VARCHAR2(2000);
vNewLine VARCHAR2(4000);
vdir varchar2(200):='UTIL_DIR';
begin
OutFile:=utl_file.fopen(vdir,'out.txt','w','32000');
vNewLine:='Loading is successfull';
utl_file.put_line(OutFile,vNewLine);
EXCEPTION
WHEN OTHERS THEN
l_err_code := SQLCODE;
l_err_msg := SUBSTR(SQLERRM,1,128);
Dbms_output.put_line(l_err_code || l_err_msg);
end;
when i execute above procedure iam getting this error.
LINE/COL ERROR
1/23 PLS-00103: Encountered the symbol ")" when expecting one of the
following:
<an identifier> <a double-quoted delimited-identifier>
current delete exists prior
Please suggest me where iam wrong.
Thanks,
Venkat Vadlamudi

868591 wrote:
HI Friends,
Iam trying to write procedure to add one line of text in text file using UTIL package. But getting error.
create or replace procedure Add_To_File() is
OutFile utl_file.file_type;
l_err_code NUMBER(10);
l_err_msg VARCHAR2(2000);
vNewLine VARCHAR2(4000);
vdir varchar2(200):='UTIL_DIR';
begin
OutFile:=utl_file.fopen(vdir,'out.txt','w','32000');
vNewLine:='Loading is successfull';
utl_file.put_line(OutFile,vNewLine);
EXCEPTION
WHEN OTHERS THEN
l_err_code := SQLCODE;
l_err_msg := SUBSTR(SQLERRM,1,128);
Dbms_output.put_line(l_err_code || l_err_msg);
end;
when i execute above procedure iam getting this error.
LINE/COL ERROR
1/23 PLS-00103: Encountered the symbol ")" when expecting one of the
following:
<an identifier> <a double-quoted delimited-identifier>
current delete exists prior
Please suggest me where iam wrong.
Thanks,
Venkat Vadlamudibelow works for me
1 CREATE OR replace PROCEDURE Add_to_file
2 IS
3    outfile       utl_file.file_type;
4    l_err_code NUMBER(10);
5    l_err_msg VARCHAR2(2000);
6    vnewline   VARCHAR2(4000);
7    vdir       VARCHAR2(200) := 'UTIL_DIR';
8 BEGIN
9    outfile := utl_file.Fopen(vdir, 'out.txt', 'w', '32000');
10    vnewline := 'Loading is successfull';
11    utl_file.Put_line(outfile, vnewline);
12 EXCEPTION
13    WHEN OTHERS THEN
14            l_err_code := SQLCODE;
15            l_err_msg := Substr(sqlerrm, 1, 128);
16            dbms_output.Put_line(l_err_code
17                           || l_err_msg);
18* END;
SQL> /
Procedure created.

Spool SQl data into text file using dynamic sql

Hi,
I am spooling output data into text file using command
select 'select t.mxname,bo.lxtype,t.mxrev'||chr(10)||'from mx_1234567'||chr(10)||
'where <condition>';
here mxname varchar(128),lxtype(128),mxrev(128) all are of varchar type.I want the output in format
e.g Part|1211121313|A
but due to column width the output,I am getting is with spaces.
"Part then blank spaces |1211121313 then blank spaces |A"
how can I remove these spaces between columns.I used set space 0 but not working.
Thanks in advance.
Your help will be appreciated.

Hi Frank,
I have seen your reply for SET LINE SIZE function. But, I could not be able to understand it.
I am facing similar kind of issue in my present project.
I am trying spool more than 50 columns from a table into flat file. Because of more column lengths in few columns, i am getting space. There are so many columns with the same issue. I want to remove that space.so that, data can fit perfectly in one line in .txt file without any wrap text.
Below is my sample query.sql. Please let me know the syntax. My mail id : [email protected]
--Created : Sep 22,2008, Created By : Srinivasa Bojja
--Export all Fulfillments
--Scheduled daily after 1:00am and should complete before 3:30am
WHENEVER SQLERROR EXIT SQL.SQLCODE
SET LINESIZE 800
SET WRAP OFF
SET PAGESIZE 800
SET FEEDBACK OFF
SET HEADING ON
SET ECHO OFF
SET CONCAT OFF
SET COLSEP '|'
SET UNDERLINE OFF
SPOOL C:\Fulfillment.txt;
SELECT SRV.COMM_METHOD_CD AS Method,
SRV.SR_NUM AS "Fulfillment Row_Id",
CON.LAST_NAME AS "Filled By"
SRV.SR_TITLE AS Notes,
SRVXM.ATTRIB_04 AS "Form Description"
FROM SIEBEL.S_SRV_REQ SRV,
SIEBEL.S_SRV_REQ_XM SRVXM,
SIEBEL.S_USER USR,
SIEBEL.S_CONTACT CON
WHERE SRV.ROW_ID = SRVXM.PAR_ROW_ID AND
SRV.OWNER_EMP_ID = USR.ROW_ID AND
CON.ROW_ID= SRV.CST_CON_ID;
SPOOL OFF;
EXIT;

How to Run a text files using UNIX

Hi,
I have 10 text files in my project my task is to load all the text files data into Relational Database so i can use sql*loader to load all the text files data into a Database.
but the thing is another project i have 200 text files so i need to run these text files using UNIX script could anyone tell me how to load all the text files using UNIX
Thank's
Edited by: Lavanya on Sep 5, 2012 3:09 PM

Lavanya,
This question relates to shell scripting and in IMO it is not an oracle question.
I have made some initial assumptions before my proposed solution.
PLEASE note that this is untested, but can just guide you as a template for solving your problem.
Assuming that you have properly set up the control file and mapped each and every table in it as per the file information which you have..
Assuming the text file to be in the format of : ------ (as suggested by other posters earlier, this file holds instructions about the file and table mapping which shall be used by your sqlldr process.)
tmp.txt:
text_file_1-------------should goes to----customer_info_table
text_file_2------------should goes to------customer_address_table
text_file_3-----------should goes to-------customer_order_table
while read line
do
SQLLDR CONTROL=`echo $line | sed 's/should goes to/ /g' | sed 's/-//g' | awk -F " " '{print $1}'`.ctl,
LOG=`echo $line | sed 's/should goes to/ /g' | sed 's/-//g' | awk -F " " '{print $1}'`.log,
BAD=`echo $line | sed 's/should goes to/ /g' | sed 's/-//g' | awk -F " " '{print $1}'`.bad,
DATA=`echo $line | sed 's/should goes to/ /g' | sed 's/-//g' | awk -F " " '{print $1}'`.txt
USERID=scott/tiger
done <tmp.txtAll I am trying to run from the above shell script is : -- PLEASE TEST it if it matches your requirement.
SQLLDR CONTROL=text_file_1.ctl, LOG=text_file_1.log, BAD=text_file_1.bad, DATA=text_file_1.txt USERID=scott/tiger
SQLLDR CONTROL=text_file_2.ctl, LOG=text_file_2.log, BAD=text_file_2.bad, DATA=text_file_2.txt USERID=scott/tiger
SQLLDR CONTROL=text_file_3.ctl, LOG=text_file_3.log, BAD=text_file_3.bad, DATA=text_file_3.txt USERID=scott/tigerRepeating my assumptions, I assume you have all those files required for SQLLDR process to run (ctl file, data file...)
Cheers,
Manik

Downloading two different text files using gui_download

Hi Folks,
I have two internal tables.itab1 and itab2.Generally in most cases I have to download only the data in itab1 as a text file using Gui_download.In some cases if a particular condition is satisfied I need to download both itab1 and itab2 data as two different text files using gui_download.To achieve this I had called the gui_download twice as I have to pass two different internal tables.
But I am getting only itab1 textfile and not itab2 textfile.
In the selection screen I am giving the path as c:\..
Kindly let me know where I am going wrong.
K.Kiran.

Hi
You keep the both files in a ITAB and in the loop of that Itab use GUI_DOWNLOAD to download the two files
data: begin of itab,
file like rlgrap-filename,
end of itab.
In initialization event
put the two files into this ITAB.
loop at itab
call function gui_download.
endloop.
check like this
Regards
Anji

How to download a text file using classes

Hi Guys
I want to download a text file using classes.
Any idea how to do it ?
Thanks
Sameer

HI sameer,
   It is no different from using a Function module.
example:
CALL METHOD cl_gui_frontend_services=>gui_download
    EXPORTING
      filename                  = w_fpath
    append                    = SPACE
      write_field_separator     = 'X'
    CHANGING
      data_tab                  = it_download
    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
      not_supported_by_gui      = 22
      error_no_gui              = 23
      OTHERS                    = 24
Regards,
ravi

Wrong format on text file using SO_NEW_DOCUMENT_ATT_SEND_API1 FM

Similar Messages

Maybe you are looking for