How to convert ## - character ?

Hello experts,
I'm reading the text of an incoming emai with method pdf_table = document->get_body_part_content( 1 )
where pdf_table is type bcss_dbpc with CONT_TEXT-Line of type SO_TEXT255 char.
But when I now have a look into this pdf_table I see a lot of this #### - characters.
How I can convert this character into space character ?
Thanks for help,
G.

Hello again,
this # - characters seems to be control chracters from line break in the email.
I've changed code settings in my gui, but this didn't help. (we also use unicode).
But the problem is still there.
How to change this # - control characters ?
Any ideas ?
Thanks G

Similar Messages

How to convert character into numeric

Pls suggest me how to convert character value into numeric value.

If you are looking for some FM then
USE
CALL FUNCTION 'CHAR_NUMC_CONVERSION'
EXPORTING
INPUT = 0
IMPORTING
NUMCSTR =
or use
Sample code below:
codeDATA: lv_chr(4) type c,
lv_num type p.
CALL FUNCTION 'MOVE_CHAR_TO_NUM'
EXPORTING
CHR = lv_chr
IMPORTING
NUM = lv_num
EXCEPTIONS
CONVT_NO_NUMBER = 1
CONVT_OVERFLOW = 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.[/code]
or USE
CONVERT_STRING_TO_INTEGER
or USE THESE FMs
MOVE_CHAR_TO_NUM
C14W_CHAR_NUMBER_CONVERSION
CHAR_NUMC_CONVERSION
reward if helpful

How to convert character sets???

I need to load a CLOB from a BFile, the BFile is in an (HP-UX) US7ASCII character set and the database is UTF8. I need to load the CLOB using dbms_lob.loadfromfile but can't find any info on how to convert the US7ASCII file into a UTF8 CLOB.
HELP!!!
--Joan Armstrong

Joan,
I don't know if this will help with conversion of you BFILE, but at
http://www.xml.com/lpt/a/2000/04/26/encodings/xmlparser.html
and at
http://xmlsoft.org/encoding.html
there is some information on conversion to UTF8.
Hope it helps. Let us know.
Dave

How to convert character streams to byte streams?

Hi,
I know InputStreamReader can convert byte streams to character streams? But how to convert the character streams back to byte streams? Is there a Java class for that?
Thanks in advance.

When do you have to do this? There's probably another way. If you just start out using only InputStreams you shouldn't have that problem.

How to convert character value to_date?

I want to change the time (hours) in sysdate to '10' and then save this new date into a date column for that i've written the following command
(TO_CHAR(SYSDATE,'DD-MON-RRRR')||' 10:'||TO_CHAR(SYSDATE,'MI:SS AM'))this command will remove the actual hours in sysdate and change it with the value '10'. but the result of this command is a character value. and i want a date value to insert into a date column. for that i've converted this command to_date as follows
TO_DATE(TO_CHAR(SYSDATE,'DD-MON-RRRR')||' 10:'||TO_CHAR(SYSDATE,'MI:SS AM'))but it gives the following error
ORA-01830: date format picture ends before converting entire input string
how to do this?

Gul wrote:
I want to change the time (hours) in sysdate to '10' and then save this new date into a date column for that i've written the following command
(TO_CHAR(SYSDATE,'DD-MON-RRRR')||' 10:'||TO_CHAR(SYSDATE,'MI:SS AM'))this command will remove the actual hours in sysdate and change it with the value '10'. but the result of this command is a character value. and i want a date value to insert into a date column. for that i've converted this command to_date as follows
TO_DATE(TO_CHAR(SYSDATE,'DD-MON-RRRR')||' 10:'||TO_CHAR(SYSDATE,'MI:SS AM'))but it gives the following error
ORA-01830: date format picture ends before converting entire input string
how to do this?TO_DATE(TO_CHAR(SYSDATE,'DD-MON-YYYY')||' 10:'||TO_CHAR(SYSDATE,'MI:SS AM'),'DD-MON-YYYY HH:MI:SS AM')

How to convert character to ascii

Hi i need to check the value of the character less than space so need to make calc based on ASCII values
can some one tell me how can i convert chars & numbers to ASCII

Hi,
Please check this code:
Below logic is for convert from character to ascii value :
report test.
*going from A to 65
data : c value 'A'.
field-symbols : <n> type x.
data : rn type i.
assign c to <n> casting.
move <n> to rn.
write rn.
Below logic is for convert from ascii tocharacter value :
*going from 66 to B
data : i type i value 66.
data : x type x.
field-symbols : <fc> type c.
move i to x.
assign x to <fc> casting type c.
move <fc> to c.
write c.
May it gives you some idea.
I hope it helps you.
Thanks.
Deepak Sharma.

How to convert character string into ascii format correctly

dear all
I'm using encryption technique in my application(oracle formas 6i). character stream convert to the ascii format and add some numeric value and again convert to the character format
>>>>
here I'm using ASCII and CHR functions.
>>>>
.net program also using same algorithm to encrypt this password.....finally both the character strings are not equel.(This happens if the character string's ascii value greater than 127. otherwise both are equel).
pls give me a solution for this
thanks and regards
buddhike

hir dear
do u want to encrypt & dcrypt your password.which version of oracle you are using
first store these procedure in Oracle Databases: dbms_obfuscation_toolkit, dbms_crypto, Transparent Data Encryption
now u can use these procedure to encrypt & dcrypt your password
if you any query about those procedures you can ask me
best regard
amk

How to convert Character string to individual Numbers for IN clause?

Hi,
I'm using the following query but its throwing the error shown below. Please help.
declare
ln_UID VARCHAR2(200) := '21,24';
ln_NUM NUMBER;
begin
dbms_output.put_line('ln_UID ' || ln_UID);
   SELECT COUNT(USAGE_RESOURCE_PERMISSION_ID)
      INTO ln_NUM
    FROM S_USAGE_RESOURCE_PERMISSIONS SURP,
      S_USAGE_PROFILE SUP,
      S_RESOURCE_PERMISSIONS SRP,
      S_RESOURCE SR,
      S_RESOURCE_GROUP SRG
    WHERE SUP.USAGE_PROFILE_ID = SURP.USAGE_PROFILE_ID
      AND SURP.RESOURCE_PERMISSION_ID = SRP.RESOURCE_PERMISSION_ID
      AND SUP.USAGE_PROFILE_ID IN (ln_UID)
      AND SRP.RESOURCE_PERMISSION_VAL <> 3 --view
      AND SRP.RESOURCE_ID = SR.RESOURCE_ID
      AND SR.RESOURCE_GROUP_ID = SRG.RESOURCE_GROUP_ID
      AND SRG.PRODUCT_ID = (SELECT PRODUCT_ID FROM S_PRODUCTS WHERE PRODUCT_NAME='RBPS');
dbms_output.put_line('ln_NUM ' || ln_NUM);
end;
error-
Error starting at line 1 in command:
declare
ln_UID VARCHAR2(200) := '(21,24)';
ln_NUM NUMBER;
begin
dbms_output.put_line('ln_UID ' || ln_UID);
   SELECT COUNT(USAGE_RESOURCE_PERMISSION_ID)
      INTO ln_NUM
    FROM S_USAGE_RESOURCE_PERMISSIONS SURP,
      S_USAGE_PROFILE SUP,
      S_RESOURCE_PERMISSIONS SRP,
      S_RESOURCE SR,
      S_RESOURCE_GROUP SRG
    WHERE SUP.USAGE_PROFILE_ID = SURP.USAGE_PROFILE_ID
      AND SURP.RESOURCE_PERMISSION_ID = SRP.RESOURCE_PERMISSION_ID
      AND SUP.USAGE_PROFILE_ID IN ln_UID
      AND SRP.RESOURCE_PERMISSION_VAL <> 3 --view
      AND SRP.RESOURCE_ID = SR.RESOURCE_ID
      AND SR.RESOURCE_GROUP_ID = SRG.RESOURCE_GROUP_ID
      AND SRG.PRODUCT_ID = (SELECT PRODUCT_ID FROM S_PRODUCTS WHERE PRODUCT_NAME='RBPS');
dbms_output.put_line('ln_NUM ' || ln_NUM);
end;
Error report:
ORA-01722: invalid number
ORA-06512: at line 6
01722. 00000 - "invalid number"
*Cause:
*Action:Thanks.

u cant use ln_UID like that in IN. when you do that it checks for SUP.USAGE_PROFILE_ID = '21,24'
so you can try some thing like this.
Note: Code not tested as i dont have the required data structure.
WITH T AS
(select to_number(substr(','||ln_UID||',',val,val1-val)) col
    from (select instr(','||ln_UID||',',',',1,level)+1 val, instr(','||ln_UID||',',',',1,level+1) val1
            from dual
        connect by level <= length(replace(translate(ln_UID,'0123456789',' '),' ',''))+1))
SELECT COUNT(USAGE_RESOURCE_PERMISSION_ID)
      INTO ln_NUM
    FROM S_USAGE_RESOURCE_PERMISSIONS SURP,
      S_USAGE_PROFILE SUP,
      S_RESOURCE_PERMISSIONS SRP,
      S_RESOURCE SR,
      S_RESOURCE_GROUP SRG
    WHERE SUP.USAGE_PROFILE_ID = SURP.USAGE_PROFILE_ID
      AND SURP.RESOURCE_PERMISSION_ID = SRP.RESOURCE_PERMISSION_ID
      AND SUP.USAGE_PROFILE_ID IN (SELECT COL FROM T)
      AND SRP.RESOURCE_PERMISSION_VAL <> 3 --view
      AND SRP.RESOURCE_ID = SR.RESOURCE_ID
      AND SR.RESOURCE_GROUP_ID = SRG.RESOURCE_GROUP_ID
      AND SRG.PRODUCT_ID = (SELECT PRODUCT_ID FROM S_PRODUCTS WHERE PRODUCT_NAME='RBPS');Thanks,
Karthick.

Convert CHARACTER in Oracle to TIMESTAMP

Hi,
One of the mapping in which our team works has one of the source columns from Oracle with Data type as timestamp.One of the sample data looks like
13-OCT-06 03.10.52.448000 PM.
When we pull in the data structure of source in Informatica, this column appears as a 'LONG RAW'. And it is moved forward in transformation as 'BINARY'.
This mapping fails if we do no modification to the data types in Informatica. We manually edited it to 'DATE', it worked but the data comes out with no Millisecond value in the target; I.e. the data is truncated. We need to retain the milliseconds portion of the date as well.
can anyone guide us how to convert CHARACTER in Oracle to TIMESTAMP, as we find the conversion can help us if we can not do it within Informatica
thx

TO_TIMESTAMP('13-OCT-06 03.10.52.448000 PM', 'DD-MON-RR HH12.MI.SS.FF AM')Regards...

May i use nls_charset12 to convert character set before executeQuery()?

i got a problem for the db nls character set
isn't us7ascii, so while retreiving data from database the data stored in ResultSet is changed to UTF-8 format. thus, my question is - how to convert character set before my executuing the method
executeQuery() or any other methods would be appreciated.
thanks in advice,

This is Tommy. I saw your post on Oracle Forum. Can you give me the classes12.zip, classes12_g.zip, and nls_charset12.zip ?!
Thx in advance !!
Tommy fromTaiwan ( July 3, 2001 )

How to convert the character value to currency/numeric

Hi,
See the sample code here
data: v_qtr_field(7).
data: w_low_limit like glt0-kslvt,
      w_amount like glt0-hslvt.
w_low_limit = 02.
w_max_period = 3.
concatenate 'HSL' w_low_limit into v_qtr_field.
*comment
*I am looking for a field formation thru above code like in GLT0 table like HSL02,HSL03 *etc based on the value user entered in the selection *screen
DO w_max_period TIMES
VARYING w_amount FROM v_qtr_field NEXT v_qtr_field + 1.
   t_trans_values-dmbe2 = t_trans_values-dmbe2 + w_amount.
ENDDO.
I am facing problem in the Do loop as it wont allows multiple data types. can you suggest me how to convert the v_qtr_field whose data type is character to currency?

Hi,
Please check this code .
PERFORM write_currency
              USING buf_anla-urwrt t_dates-waers t_txw_anla-urwrt.
*       FORM WRITE_CURRENCY                                           *
*       convert currency amount to string                             *
*       - use decimal point                                           *
*       - remove separator characters                                 *
* --> P_AMOUNT                                                      *
* --> P_CURRENCY_UNIT                                               *
* --> P_STRING                                                      *
FORM WRITE_CURRENCY
     USING P_AMOUNT        TYPE P
           P_CURRENCY_UNIT LIKE TCURC-WAERS
           P_STRING        TYPE C.
DATA: DEC2POINT(2) TYPE C VALUE ',.'.
* convert separator to decimal point
WRITE P_AMOUNT TO P_STRING CURRENCY P_CURRENCY_UNIT
        NO-GROUPING
        NO-SIGN
        LEFT-JUSTIFIED.
TRANSLATE P_STRING USING DEC2POINT.
* put minus sign before number
IF p_amount < 0.
    SHIFT P_STRING RIGHT.
    P_STRING(1) = '-'.
ENDIF.
ENDFORM.
<i>Hope This Info Helps YOU.</i>
Regards,
Lakshmi

How to convert ascii to character

how to convert ascii to character is there any function module or any code.plz help me in finding this.

Hi,
please go through this
If I give input as 65 (ascill value) I want display 'A'.
Below logic is for convert from character to ascii value.
report Ascii_convert.
*Going from A to 65
data : c value 'A'.
field-symbols : <n> type x.
data : rn type i.
assign c to <n> casting.
move <n> to rn.
write rn.
*Going from 66 to B
data : i type i value 66.
data : x type x.
field-symbols : <fc> type c.
move i to x.
assign x to <fc> casting type c.
move <fc> to c.
write c.
i hope this will help you ,
Raja T

How to convert epoch time to datetime in sql*loader Oracle

Hello,
I wan't to question how to convert epoch time to datetime in sql*loader Oracle. I try this script for convert epoch time to datetime in sql*loader, but error:
Record 1: Rejected - Error on table TEMP_TEST_LANGY, column DATADATA.
ORA-01722: invalid number
Record 2: Rejected - Error on table TEMP_TEST_LANGY, column DATADATA.
ORA-01722: invalid number
Record 3: Rejected - Error on table TEMP_TEST_LANGY, column DATADATA.
ORA-01722: invalid number
This is my loader:
LOAD DATA INFILE 'C:\Documents and Settings\Administrator\My Documents\XL_EXTRACT_211\load.csv'
into table TEMP_TEST_LANGY append
FIELDS TERMINATED BY ','
TRAILING NULLCOLS
DATADATA CHAR "TO_DATE('01-JAN-1970','DD-MON-YYYY')+:datadata/86400"
This is my csv file:
79314313.7066667
79314336.2933333
79314214.3466667
This is my table:
CREATE TABLE TEMP_TEST_LANGY
DATADATA DATE
Thanks
Edited by: xoops on Sep 21, 2011 8:56 AM
Edited by: xoops on Sep 21, 2011 8:58 AM

thanks for your answer, but I asked to use sql loader instead of the external table, which so my question is why can not the epochtime converted to datetime, if there is no way to convert a datetime epochtime using sql loader, so I'm required to use the external table. thank you.
This is my error log:
Column Name Position Len Term Encl Datatype
DATADATA FIRST * , CHARACTER
SQL string for column : "TO_DATE('1-Jan-1970 00:00:00','dd-MM-YYYY hh24:mi:ss') + (:DATADATA/60/60/24)"
Record 1: Rejected - Error on table TEMP_TEST_LANGY, column DATADATA.
ORA-01722: invalid number
Record 2: Rejected - Error on table TEMP_TEST_LANGY, column DATADATA.
ORA-01722: invalid number
Record 3: Rejected - Error on table TEMP_TEST_LANGY, column DATADATA.
ORA-01722: invalid number
Edited by: xoops on Sep 21, 2011 12:33 PM

How to convert Classical Report into PDF format..........

Hi Experts,
I have written a classical report with write statements and when i am downloading in excel the format is mismatching and now i want to convert into PDF format.
How to convert into PDF format from Classical report ?
Yusuf

Hi yusuf,
please find the below report,,
please make two include programs before executing it,
there codes are pasted below,
INCLUDE zimpr_data_declaration.
INCLUDE zimpr_performs_wrap.
REPORT zimpr_word_wrap NO STANDARD PAGE HEADING LINE-SIZE 115..
            INCLUDE for DATA DECLARATION                               *
INCLUDE zimpr_data_declaration.
            INCLUDE for all performs.                                  *
INCLUDE zimpr_performs_wrap.
TOP-OF-PAGE--
TOP-OF-PAGE.
PERFORM f_top_page.                     "TOP OF THE REPORT PAGE,I.E. HEADER.
START-OF-SELECTION.
SET PF-STATUS 'SEL_SCREEN'.             "PF-STATUS OF THE SELECTION SCREEN.
PERFORM f_data_retrieval.               "PERFORM FOR ALL SELECT STATEMENTS.
PERFORM f_report_display.               "REPORT DISPLAY,WRITE STATEMENTS.
--Define the actions to be performed for pf-status-----
AT USER-COMMAND.
wf_ok_code = sy-ucomm.
wf_save_ok = wf_ok_code.
CLEAR wf_ok_code.
CASE wf_save_ok.
    WHEN 'PDF'.          "WHEN PDF ICON IS CLICKED,REPORT WILL CONVERT INTO PDF.
      loc_repid = sy-repid.   "PROGRAM NAME
--THIS FM SETS THE PARAMETERS FOR LAYOUT OF PDF OUTPUT--
      CALL FUNCTION 'GET_PRINT_PARAMETERS'
        EXPORTING
          layout                 = loc_paart             "LANDSCAPE LAYOUT
          line_size              = loc_linsz                  "CHARACTER WIDTH OF REPORT
          no_dialog              = 'X'
          user                   = sy-uname              "USERNAME
        IMPORTING
          out_parameters         = loc_print_parms        "OUTPUT PARAMETERS WILL BE COLLECTED HERE.
          valid                  = loc_valid
        EXCEPTIONS
          archive_info_not_found = 1
          invalid_print_params   = 2
          invalid_archive_params = 3
          OTHERS                 = 4.
--FOR GENERATING THE SPOOL NUMBER--
      NEW-PAGE PRINT ON NO DIALOG PARAMETERS loc_print_parms.                        " This allocates the spool no
      "to the screen without the dialog screen.
      PERFORM f_top_page.
      PERFORM f_report_display.
      NEW-PAGE PRINT OFF.                                                      "This marks the end of the screen for which the spool no was generated.
      wf_id = sy-spono.                                                      " This assign the spool no of the screen to the variable.
--PERFORM FOR GETTING THE PDF OUTPUT--
      PERFORM f_pdf_display.
--PERFORM FOR DOWLOADING FILE TO A LOCAL DISK--
      PERFORM f_download_local.
    WHEN 'BACK'.
      LEAVE PROGRAM.
ENDCASE.
include data declaration----
*& Include           ZIMPR_DATA_DECLARATION
TYPE-POOLS : shlp.
DATA : wf_ordert TYPE aufk-auart.                      "ORDER TYPE
DATA : wf_order TYPE aufk-aufnr.                       "ORDER NUMBER
DATA : wf_bdate TYPE afko-gstrp.                       "BASIC START DATE
DATA : wf_status(4) TYPE c ."rihea-i_astatin.                 "STATUS
DATA : wf_objnr TYPE jest-objnr VALUE 'OR%'.           "Object number
DATA : wf_aufnr TYPE aufk-aufnr.
DATA : wf_name TYPE thead-tdname.                      "NAME TO PASS IN FM READ_TEXT
DATA : wf_date1(12) TYPE c.                            "DATE
DATA : wf_i1(3) TYPE n,wc_i1(3) TYPE n VALUE '1'.      "COUNTERS FOR REPORT DISPLAY
DATA : wf_i2(3) TYPE n,wc_i2(3) TYPE n VALUE '1'.
DATA : wf_kopf TYPE tdid VALUE 'KOPF',wf_aufk TYPE tdobject VALUE 'AUFK'.
DATA : wf_save_ok TYPE sy-ucomm ,wf_ok_code TYPE sy-ucomm.
DATA: wf_id TYPE tsp01-rqident ,                         " For storing Spool request number
      wf_bytes TYPE i .                                  " For storing the bytes of data to be converted to PDF.
DATA : wf_langu(2) TYPE c VALUE 'EN'.
DATA: wf_pripar TYPE pri_params,                         " Structure for Passing Print Parameters
      wf_rcpar TYPE arc_params.                          " ImageLink structure
DATA : wf_statu TYPE dfies-fieldname VALUE 'STATUS',
       wf_field TYPE help_info-dynprofld VALUE 'S_STATUS'.
&--SELECTION SCREEN--
SELECTION-SCREEN BEGIN OF BLOCK b_1 WITH FRAME TITLE text-000.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS: s_ordert FOR wf_ordert .                  "ORDER TYPE
SELECT-OPTIONS: s_order FOR wf_order OBLIGATORY.          "ORDER NUMBER
SELECT-OPTIONS: s_bdate FOR wf_bdate.                      "BASIC START DATE
SELECT-OPTIONS: s_status FOR wf_status matchcode object zei_sys . "SYSTEM STATUS
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN END OF BLOCK b_1.
*--INTERNAL TABLES--
TYPES : BEGIN OF ty_aufk,
      aufnr TYPE aufk-aufnr,              "OREDR NUMBER
      auart TYPE aufk-auart,              "ORDER TYPE
      objnr TYPE aufk-objnr,              "OBJECT NUMBER
      ktext type aufk-ktext,              "SHORT TEXT
      gstrp TYPE afko-gstrp,              "BASIC START DATE
      END OF ty_aufk.
TYPES : BEGIN OF ty_tj02t,
      objnr TYPE aufk-objnr,              "OBJECT NUMBER
      txt04 TYPE tj02t-txt04,             "STATUS
      istat TYPE tj02t-istat,             "Object status
      spras TYPE tj02t-spras,             "LANGUAGE KEY
      END OF ty_tj02t.
TYPES : BEGIN OF ty_temp,
      objnr TYPE aufk-objnr,
      status(300) TYPE c,
       END OF ty_temp.
TYPES : BEGIN OF ty_wrap,
       line(54) TYPE c,                     "LONG TEXT
       END OF ty_wrap.
TYPES : BEGIN OF ty_wrap2,
       line(25) TYPE c,                     "STATUS
       END OF ty_wrap2.
TYPES : BEGIN OF ty_f4,
        txt04 TYPE tj02t-txt04,
        txt30 TYPE tj02t-txt30,
        END OF ty_f4.
types : begin of ty_sta,
        istat type tj02t-istat,
        objnr type jest-objnr,
        end of ty_sta.
data : int_sta type table of ty_sta with header line.
DATA : int_f4 TYPE TABLE OF ty_f4 WITH HEADER LINE.
DATA: int_pdf TYPE TABLE OF tline WITH HEADER LINE.            "TABLE FOR PDF CONVERSION
DATA: int_wrap TYPE TABLE OF ty_wrap WITH HEADER LINE.         "TABLE FOR LONGTEXT
DATA: int_wrap2 TYPE TABLE OF ty_wrap2 WITH HEADER LINE.       "TABLE FOR STATUS
DATA: int_temp TYPE TABLE OF ty_temp WITH HEADER LINE.         "Table for concatenation of system status.
DATA: int_aufk TYPE TABLE OF ty_aufk WITH HEADER LINE.
DATA: int_tj02t TYPE TABLE OF ty_tj02t WITH HEADER LINE.
DATA: int_tline TYPE STANDARD TABLE OF tline WITH HEADER LINE. "TABLE FOR READ_TEXT.
DATA : int_fld TYPE TABLE OF dfies ,wa_fld LIKE LINE OF int_fld.                     " Field Type for FM for F4 help
DATA :int_return   TYPE TABLE OF ddshretval WITH HEADER LINE .
DATA:
loc_print_parms LIKE pri_params,          "PRINT PARAMETERS
loc_valid(1)      TYPE c,
loc_file type SDOK_CHTRD,
loc_bytecount     TYPE i,                 "NUMBER OF BYTES TRANSFERRED
loc_length        TYPE i,                 "LINE-LENGTH
loc_rqident       LIKE tsp01-rqident,     "SPOOL NUMBER
loc_rq2name(12)   TYPE c.
DATA: loc_filename LIKE rlgrap-filename.     "FILENAME
DATA:loc_repid LIKE sy-repid,                    " Report to execute
     loc_linsz LIKE sy-linsz VALUE 115,          " Line size
     loc_paart LIKE sy-paart VALUE 'X_65_132'.   " Paper Format
Include           ZIMPR_PERFORMS_WRAP----
*& Include           ZIMPR_PERFORMS_WRAP
*&      Form f_top_page
     top-of the page
--> p1        text
<-- p2        text
FORM f_top_page .
*--HEADER--
FORMAT COLOR 1 .
WRITE : text-010.
FORMAT COLOR 1 OFF.
WRITE : / text-011,sy-datum NO-GAP.
WRITE : / text-012,sy-uzeit NO-GAP,90 text-013,101 sy-uname.
ULINE .
FORMAT COLOR 1 INTENSIFIED OFF .
WRITE : 1 sy-vline,                "HEADINGS
2 text-014 NO-GAP,
7 sy-vline,
8 text-015 NO-GAP,
20 sy-vline,
21 text-016 NO-GAP,
76 sy-vline,
77 text-017 NO-GAP,
88 sy-vline,
   89 text-018 NO-GAP,
115 sy-vline.
WRITE : /1 sy-vline,
    2 text-019 NO-GAP,7 sy-vline,
    20 sy-vline,76 sy-vline,77 text-020 NO-GAP,88 sy-vline,115 sy-vline.
ULINE.
FORMAT COLOR 1 OFF.
ENDFORM.                    " f_top_page
*&      Form f_data_retrieval
     select statements
--> p1        text
<-- p2        text
FORM f_data_retrieval .
SELECTING ORDER TYPE,ORDER NO.,OBJECT NO. AND BASIC START DATE
SELECT p~aufnr
           p~auart
           p~objnr
           p~ktext
           r~gstrp
           FROM ( aufk AS p INNER JOIN afko AS r ON raufnr = paufnr )
           INTO TABLE int_aufk
           WHERE p~aufnr IN s_order AND
                 p~auart IN s_ordert AND
                 r~gstrp IN s_bdate AND
                 p~objnr LIKE wf_objnr.
IF sy-subrc <> 0.
    MESSAGE s101(zipm).                "no values found for selection criteria.
    STOP.
ENDIF.
SORT int_aufk BY aufnr.
DELETE ADJACENT DUPLICATES FROM int_aufk.
SELECT q~istat
       p~objnr
       FROM ( jest AS p INNER JOIN tj02t AS q ON pstat = qistat )
       INTO TABLE int_sta
       FOR ALL ENTRIES IN int_aufk
       WHERE p~objnr = int_aufk-objnr
             AND q~txt04 IN s_status and
             q~spras = wf_langu and
             p~inact = ''.
IF sy-subrc <> 0.
    MESSAGE s101(zipm).                "no values found for selection criteria.
    STOP.
ENDIF.
SORT int_sta BY objnr.
DELETE ADJACENT DUPLICATES FROM int_sta.
*--SELECTING OBJECT NO.,STATUS AND LANGUAGE--
IF int_sta[] IS NOT INITIAL.
    SELECT p~objnr
           q~txt04
           q~istat
           q~spras
           FROM ( jest AS p INNER JOIN tj02t AS q ON pstat = qistat )
           INTO TABLE int_tj02t
           FOR ALL ENTRIES IN int_sta
           WHERE p~inact = '' AND
                 p~objnr = int_sta-objnr AND
                 q~spras = wf_langu AND
                q~txt04 IN s_status AND
                 p~objnr LIKE wf_objnr.
    IF sy-subrc <> 0.
      MESSAGE s101(zipm).               "no values found for selection criteria.
      STOP.
    ENDIF.
ENDIF.
ENDFORM.                    " f_data_retrieval
*&      Form f_report_display
      report display
--> p1        text
<-- p2        text
FORM f_report_display .
LOOP AT int_tj02t.              "concatenating the status into a internal table
    AT NEW objnr.
      CLEAR int_temp-status.
    ENDAT.
    CONCATENATE int_temp-status int_tj02t-txt04 INTO int_temp-status SEPARATED BY space.
    AT END OF objnr.
      int_temp-objnr = int_tj02t-objnr.       "key field.
      APPEND int_temp.
      CLEAR int_temp.
    ENDAT.
    CLEAR int_tj02t.
ENDLOOP.
LOOP AT int_aufk.
    CONCATENATE sy-mandt int_aufk-aufnr INTO wf_name .    "concatenating client number and order number
*--THIS FM CAPTURES THE LONG TEXT AND STORES IT IN INTERNAL TABLE--
    CALL FUNCTION 'READ_TEXT'
      EXPORTING
        id                      = wf_kopf         "TEXT ID
        language                = sy-langu       "LANGUAGE
        name                    = wf_name        "TEXT NAME
        object                  = wf_aufk         "TEXT OBJECT
      TABLES
        lines                   = int_tline      "LINES OF LONG TEXT.
      EXCEPTIONS
        id                      = 1
        language                = 2
        name                    = 3
        not_found               = 4
        object                  = 5
        reference_check         = 6
        wrong_access_to_archive = 7
        OTHERS                  = 8.
    IF sy-subrc <> 0.
      int_tline-tdline = int_aufk-ktext.
      APPEND int_tline.
      CLEAR :int_tline.
    ENDIF.
    LOOP AT int_tline.
*--THIS FM WRAPS THE LONG TEXT INTO 54 CHARACTERS EACH--
      CALL FUNCTION 'RKD_WORD_WRAP'
        EXPORTING
          textline            = int_tline-tdline          "LONG TEXT LINE
          outputlen           = 54                        "OUTPUT LENGTH
        TABLES
          out_lines           = int_wrap                  "INTERNAL TABLE
        EXCEPTIONS
          outputlen_too_large = 1
          OTHERS              = 2.
      IF sy-subrc <> 0.
        CLEAR :int_tline.
      ENDIF.
    ENDLOOP.
*-- THIS FM WRAPS THE STATUS INTO 25 CHARACTERS EACH--
    READ TABLE int_temp WITH KEY objnr = int_aufk-objnr.
    CALL FUNCTION 'RKD_WORD_WRAP'
      EXPORTING
        textline            = int_temp-status
        outputlen           = 25
      TABLES
        out_lines           = int_wrap2
      EXCEPTIONS
        outputlen_too_large = 1
        OTHERS              = 2.
    IF sy-subrc <> 0.
     CONTINUE.
    ENDIF.
    IF NOT int_wrap2[] IS INITIAL.
      ULINE AT (115).
    ENDIF.
    DESCRIBE TABLE int_wrap LINES wf_i2.         "COUNTING THE NO. OF LINES FOR TABLE INT_WRAP
    DESCRIBE TABLE int_wrap2 LINES wf_i1.        "COUNTING THE NO. OF LINES FOR TABLE INT_WRAP2
    WHILE ( wc_i1 LE wf_i1 OR wc_i2 LE wf_i2 ).
      IF ( wc_i2 LE wf_i2 ).
        READ TABLE int_wrap INDEX wc_i2 .        "READING THE INTERNAL TABLE INT_WRAP WITH INDEX
        wc_i2 = wc_i2 + 1.
      ENDIF.
      IF ( wc_i1 LE wf_i1 ).
        READ TABLE int_wrap2 INDEX wc_i1 .       "READING THE INTERNAL TABLE INT_WRAP2 WITH INDEX
        wc_i1 = wc_i1 + 1.
      ENDIF.
*--THIS FM CONVERTS THE DATE FROM SYSTEM FORMAT TO OUTPUT FORMAT--
      CALL FUNCTION 'CONVERSION_EXIT_SDATE_OUTPUT'
        EXPORTING
          input = int_aufk-gstrp
        IMPORTING
          output = wf_date1.
      IF NOT int_wrap2[] IS INITIAL .
*--REPORT DISPLAY--
        WRITE : /1 sy-vline, 2 int_aufk-auart COLOR = 4 INTENSIFIED OFF NO-GAP ,
                7 sy-vline ,8 int_aufk-aufnr COLOR = 4 INTENSIFIED OFF NO-GAP,
                20 sy-vline,21 int_wrap-line,
                76 sy-vline ,77 wf_date1 ,
                88 sy-vline ,89 int_wrap2-line,
                115 sy-vline.
*--CLEARING THE VARIABLES--
        wf_date1 = ''.
        CLEAR: int_aufk,int_temp,int_wrap2-line,int_wrap-line.
      ENDIF.
    ENDWHILE.
    wc_i1 = 1.
    wc_i2 = 1.
    CLEAR :int_wrap,int_wrap2.
    REFRESH : int_wrap,int_wrap2,int_tline.
ENDLOOP.
ULINE AT (115).
ENDFORM.                    " f_report_display
*&      Form F_PDF_DISPLAY
     pdf conversion
--> p1        text
<-- p2        text
FORM f_pdf_display .
*--THIS FM CONVERTS THE SPOOL REQUEST INTO PDF REPORT--
CALL FUNCTION 'CONVERT_ABAPSPOOLJOB_2_PDF'
    EXPORTING
      src_spoolid              = wf_id                 "SPOOL NUMBER
      no_dialog                = space
      pdf_destination          = 'X'
    IMPORTING
      pdf_bytecount            = loc_bytecount        "NUMBER OF BYTES TRANSFERRED
    TABLES
      pdf                      = int_pdf                                  "TABLE FOR PDF REPORT
    EXCEPTIONS
      err_no_abap_spooljob     = 1
      err_no_spooljob          = 2
      err_no_permission        = 3
      err_conv_not_possible    = 4
      err_bad_destdevice       = 5
      user_cancelled           = 6
      err_spoolerror           = 7
      err_temseerror           = 8
      err_btcjob_open_failed   = 9
      err_btcjob_submit_failed = 10
      err_btcjob_close_failed = 11
      OTHERS                   = 12.
ENDFORM.                    " F_PDF_DISPLAY
*&      Form f_download_local
     download to local system
--> p1        text
<-- p2        text
FORM f_download_local .
---------------------THIS FM DOWNLOADS THE PDF REPORT INTO LOCAL MACHINE
data loc_ret TYPE iwerrormsg.
CALL FUNCTION 'IW_C_GET_SAPWORKDIR'
   IMPORTING
     SAPWORKDIR       = loc_file
    ERROR_MSG        = loc_ret
loc_filename = loc_file.
if loc_ret is initial.
concatenate loc_filename '\work order header long text_ ' sy-timlo '.pdf' into loc_filename.
endif.
CALL FUNCTION 'DOWNLOAD'
    EXPORTING
      bin_filesize = loc_bytecount      "NO. OF BYTES
      filename     = loc_filename       "DEFAULT FILE NAME
      filetype     = 'BIN'
    IMPORTING
      act_filename = loc_filename
    TABLES
      data_tab     = int_pdf.
ENDFORM.                    " f_download_local
if you have any doubts,,
please revert
Regards,
Talwinder

Flat File Load Issue - Cannot convert character sets for one or more charac

We have recently upgraded our production BW system to SPS 17 (BW SP19)
and we have issues loading flat files (contain Chinese, Japanese and
Korean characters) which worked fine before the upgrade. The Asian
languages appear as invalid characters (garbled) as we can see in PSA. The Character Set
Settings was previously set as Default Setting and it worked fine until
the upgrade abd we referred to note 1130965 and with the code page 1100
the load went through (without the Cannot convert character sets for one or more characters error) however the Asian language characters will appear
as invalid characters. We tried all the code pages suggested in the note e.g.
4102, 4103 etc on the info packages but it did not work. Note that the
flat files are encoded in UTF-8.

I checked lower case option for all IO
When i checked the PSA failed log no of records processed is "0 of 0" my question is with out processing single record system is througing this error message.
When i use same file loading from local workstation no error message
I am thinking when I FTP the file from AS/400 to BI Application Server(Linex) some invalid characters are adding but how can we track that invalid char?
Gurus please share your thoughts on this I will assign full points.
Thanks,

How to convert ## - character ?

Similar Messages

Maybe you are looking for