Converting a number with decimal to word

hi
how to convert a number with decimal to words in oracle
to_char(to_date(1311,'J'), 'JSP') giving error with number having decimal

and very nls dependant ;-)nls-dependant because you used comma in the mask as a decimal delimiter?
but instead of
regexp_replace(n,'(\d*),(\d*)','\2')you can simply use:
regexp_substr(n,'\d*$')but in case there is no fractional part it would return the whole number, but still you can avoid usind delimiter as:
regexp_replace(n,'^\d*|(\d*)$|.','\1')PS
of course it is not really serious, cause you can get the fractional part, without using regular expressions at all, namely: val-trunc(val)

Similar Messages

Convert powerpoint slide with embedded file (word, excel, etc) to pdf

Hi all,
I have a word document or excel spreadsheet that I added as an object into the power point slide.
How can i convert powerpoint slide to PDF but still able to open the file when i click file icon.
So far the result I have once the slide is in PDF, I can't no longer click the file to open it.
Thank you.

Hi Joel,
The feature you are looking for, is currently not available in Acrobat.
But you can create an interactive link (to open Word/Excel) using Acrobat. Please look at the following link:
http://acrobatusers.com/tutorials/creating-and-editing-links
Regards,
Anoop

Comapre numbers with decimal

Hi,
I am using CP 5 advanced actions - conditional actions, trying to show the less number in the caption. However, seems CP assumes that a number with decimal is less than the number itself. For example, we have 5875.198.148 and 5875, then 5875.198.148 will be taken as the less number.
Best,
Ya

Hello,
I just checked this and for me the condition is evaluated correctly. Could you post perhaps a screenshot of your advanced action? This was my work flow:
created two user variables, one with a decimal value, the other with the same value but only the integer
had two rectangles, initially invisible, one for correct result, one for incorrect
on entering the slide I triggered a condition to compare the variables and show the appropriate rectangle; all worked fine
Just a tip: try if it works if you put the values themselves in the condition, like IF 15.5 is greater than 15
BTW: you seem to have two decimal points? That will not work, I suspect this will not be treated as a value because it isn't a value
Lilybiri

How to convert a number to FLOAT with 9 decimal values.

Hi all,
I need to convert a number like '10.02' to a floating point number with 9 decimal values like '10.022111221'. I think that the right function is TO_BINARY_FLOAT, but how can I obtain 9 decimal values? If I use the following syntax:
select TO_BINARY_FLOAT(num) from table
I obtain a floating point values with a variable number of decimal numbers after the ".", instead I need 9 number after ".".
Regards,
Maurizio.

Hi,
the number I need to select is the result of a product, for example:
select (Num_A * Num_B) from Table;
Num_A has 2 decimal numbers, like 12.01 and Num_B could be: 12.111111111.
Now, Num_A * Num_B = 653.999999994
but I issue:
select TO_BINARY_FLOAT(54.00 * 12.111111111) from Table
I obtain:
654, a rounded value, but I need 653.999999994.

Convert hexadecimal output to decimal (number)

I am reading hexadecimal format from the output of the VISA read block and I want to convert it to the decimal preferably exponential format.
Example of what I read is 76 00 02 (in dec: 7.600 E+2).
I know there is "type cast" block that converts nicelly but I am not sure what to specify for a type input.
Can you show me how to apply this type cast block for in my VI so that it converts hex string (76 00 02) into exponential string/number (7.600 E+2)?
I attached my VI so it is more clear.
Thanks everybody,
Pedja
Attachments:
MultiGauge.vi ‏64 KB

Coop wrote:
> I am reading hexadecimal format from the output of the VISA read block
> and I want to convert it to the decimal preferably exponential format.
> Example of what I read is 76 00 02 (in dec: 7.600 E+2).
> I know there is "type cast" block that converts nicelly but I am not
> sure what to specify for a type input.
> Can you show me how to apply this type cast block for in my VI so that
> it converts hex string (76 00 02) into exponential string/number
> (7.600 E+2)?
Looking at your code I see that you have not a hexadecimal string coming
back but instead a binary string. The fact that you display the string
as hexadecimal in the string indicator is just showing you the ASCII
codes of the string characters as hexadecimal numbers.
The funct
ion From Hexadecimal String expects a clear text string with
hexadecimal characters but that is something entirely different from a
binary string you choose to display as hexadecimal numbers.
An example: the binary string 7600 02 you receive from the device is in
fact the character 'v', a null character and a 02 character (or in ASCII
terms a start of text character).
So assuming your example is right (which I have to admit seems very
strange and therefore suspicious to me) you would have to do something
more like included example. But as I said I have little understanding
why the hexadecimal interpretation of the binary values should
correspond to the decimal value you want to have!
Also as you can see there is not really clear where the 00 character
belongs to. The two methods where it is either part of the multiplier or
the exponent both produce the same result for this particular example.
Which one is right if any, should be tested.
Rolf Kalbermatter
Rolf Kalbermatter
CIT Engineering Netherlands
a division of Test & Measurement Solutions
Attachments:
Binary_(Hex)_to_Decimal_Numeric.vi ‏51 KB

How can I create accurate decimal dimensions when creating a new document or using the art board in Illustrator CS6? When I type in a number with a decimal, it automatically rounds the number up.

How can I create accurate decimal dimensions when creating a new document or using the art board in Illustrator CS6? When I type in a number with a decimal, it automatically rounds the number up.

For my part you are welcome, sdowers.
Unfortunately, the uncertainty arising from the rounding has been up several times here in this forum.
I just came to remember a warning that needs to be given:
The rounding of the representation of a numerical value may be harmless in itself, but if you use it for any operation that changes the value, such as multiplication or whatever, things will go wrong because the operation will be made on the basis of the rounded value instead of the true value. So, as in your first case in post #2, 39.625 rounded to 39.63 will become 79.26 instead of 79.25.

How do I convert a .pdf with columns into a word doc?

I know how to convert a regular .pdf to a word doc but when I try and convert one with columns it combines the columns as if it thinks it is all straight across lines with a big space in it.

In my experience, there's not much you can do outside of copying and pasting page by page.

Essbase 9.3 Calc scripts. Pb with dates. How to convert (string = number) ?

Hello,
I've a problem with Essbase(Planning?) Scripts on version 9.3. It looks simple but I do not find any (clean) solution :
On my Essbase database, I have a member called "Reference_Date" on my axis Indicators. It is a date data type, that is to say, it displays a number corresponding to a YYYYMMDD format. For example : 20091029 for October 29th 2009.
In calc scripts I often need to compare the month included in that "Reference_Date" with the current Member of my Time Axis (I have 12 Months members based on the format M02 for February for example). The final aim is to calculate a number of complete years since that "Reference_Date".
But theses two elements are not of the same "type" (one is a number value and the other is a "member" in Time Axis). So I'm forced to convert one of this two elements in order to compare it.
For example I can extract the month value of the "Reference_Date"' and put an "M" before it to have a Time member equivalent or I can convert the member Name M10 to a number (10))
in both cases I have the same type problem : I don't know how to convert a string into a number nor how to convert a number into a string.
(For example @CONCATENATE doesn't work with numbers). and that my only remaining problem.
I didn't find any Essbase Function which do this (conversion number <=>string).
Is anyone have an Idea ?
Thanks for your help
Best regards

I don't know any way for you to compare your data against your metadata. Not directly. To me it makes little enough sense to try that I'm not surprised the developers didn't provide for it.
I've converted member names to strings, manipulated the strings (calc script functions are not good at this), and turned them back into member names, but that's really the only use I've had for string manipulation. I don't think an equivalency operator even exists for string data. And I see no way to begin thinking of a member name, once converted to a string, as a number.
It makes even less sense to me to try thinking of a data value as a string. Even text values in Sys 11 are stored as numbers. Not encoded characters, but just a number to look up somewhere.
I think you can do what you want though, with something like this...
IF (@ISMBR("FY08"))
vYr = 2008;
ELSEIF (@ISMBR("FY09"))
vYr = 2009;
ENDIF;
IF (@ISMBR("M01"))
vMth = 1;
ELSEIF (@ISMBR("M02"))
vMth = = 2;
ENDIF;
"Years_Since_Reference" = ((vYr * 100) + Mth) - ("Reference_Date" / 12);
Obviously, the math will need some work, coz that doesn't actually work, but the logic above essentially turns your metadata into numbers, which is what you are after.
Good luck,
-- Joe

Convert any base number to decimal

Is there a way to convert any number of base 2-16 into decimal?
The numbers can be input using scanner
Anyone has any code for this?

Hey, guys this is what I got so far for this. But, of course there are issues
1. I'm not sure how to show "invalid" message if a character or floating point number is entered
2. I'm not sure about the code that will only allow the relevant numbers to be entered for each base.
E.g - If base = 2 then number == 1 || 0
This has to be repeated for all allowed base from 2-16
Please help!!!
import java.util.Scanner;
public class BaseConverter {
public static void main(String[] args) {
int base;
String number;
Scanner scanner = new Scanner(System.in);
System.out.print("Enter base value (Integer between 2 to 16): ");
base = scanner.nextInt();
if (base < 2 || base > 16) { // how to get same invalid message for character or float (e.g. -12.2)
System.out.println("Invalid base. Please retry");
return;
System.out.print("Enter the number in base : ");
number = scanner.next();
if (scanner.hasNext()) { // not sure how to validate in relation to entered base
} else {
System.out.println("Invalid number. Please retry");
return;
int decimalValue = 0;
int step = 0;
for (int i = number.length() - 1; i >= 0; i--) {
char c = number.charAt(i);
int cValue = Character.digit(c, base);
decimalValue = decimalValue + (cValue * (int) Math.pow(base, step));
step = step + 1;
System.out.println("Decimal value: " + decimalValue);
}

Regular Expression to Check number with at least one decimal point

Hi,
I would like to use the REGEX_LIKE to check a number with up to two digits and at least one decimal point:
Ex.
10.1
1.1
1
12
This is what I have so far. Any help would be appreciated. Thanks.
if regexp_like(v_expr, '^(\d{0,2})+(\.[0-9]{1})?$') t

Hi,
Whenever you have a question, post a little sample data (CREATE TABLE and INSERT statements, relevant columns only) for all the tables involved, and the results you want from that data.
Explain, using specific examples, how you get those results from that data.
Always say what version of Oracle you're using (e.g. 11.2.0.2.0).
See the forum FAQ: https://forums.oracle.com/message/9362002
SammyStyles wrote:
Hi,
I would like to use the REGEX_LIKE to check a number with up to two digits and at least one decimal point:
Ex.
10.1
1.1
1
12
This is what I have so far. Any help would be appreciated. Thanks.
if regexp_like(v_expr, '^(\d{0,2})+(\.[0-9]{1})?$') t
Do you really mean "up to two digits", that is, 3 or more digits is unacceptable? What if there are 0 digits? (0 is less than 2.)
Do you really mean "at least one decimal point", that is, 2, 3, 4 or more decimal points are okay? Include some examples when you post the sample data and results.
It might be more efficient without regular expressions. For example
WHERE   TRANSLATE ( str              -- nothing except digits and dots
                  , 'A.0123456789'
                  , 'A'
                  )   IS NULL
AND     str           LIKE '%.%'     -- at least 1 dot
AND     LENGTH ( REPLACE ( str       -- up to 2 digits
                )     <= 2

Attachments open with Micorsoft works word processer. I have to convert documents to microsoft word. How do I change this?

E Mail Attachments open with Micorsoft works word processor. This is done automatically. I have to convert documents to microsoft word to use them. How do I change this so that documents are opened by word??

Set Firefox to your default browser, by selecting, on the control panel,
Set Program Access and Defaults. On custom, set Firefox as the default browser.
And if that does not work, I don't know what...

Excel data issue of string mixed with number or decimal

I have an excel file (.xls) from the client. The file only has one column Name. For some reasons, a couple of data are number or decimal (see the following example).
Name
abc
xyz
123
3.98
When I tried to import data to the table (mssql 2008) (one column with nvarchar(255)), I got the error:
The column status returned was: "The value violated the integrity constraints for the column.".
I had to open the file and added ' before the number or decimal
Name
abc
xyz
'123
'3.98
Although it worked this way, it is not a good way. Any good suggestions to do it without modifying the file? Thanks.
A Fan of SSIS, SSRS and SSAS

That may be because you didnt set IMEX = 1
You have to set it to enable Excel to correctly determine data for intermixed datatypes
see
http://visakhm.blogspot.in/2013/01/excel-issues-in-handling-intermixed-data.html
http://blog.concentra.co.uk/2013/05/15/why-ssis-always-gets-excel-data-types-wrong-and-how-to-fix-it/
Please Mark This As Answer if it solved your issue
Please Vote This As Helpful if it helps to solve your issue
Visakh
My Wiki User Page
My MSDN Page
My Personal Blog
My Facebook Page

How to get number of pages in word document

I am developing an OCR application where I need to get number of pages of word documents. I am currently assuming that each page consists of 46 lines but some how, I am not getting convinced with this logic. Is there any simplest way to get this information?
Let me tell you that in the OCR system I am converting tiff iamges to .txt file and again reading txt file and counting number of pages based on number of lines.
regards,
Ranjan

The number of pages depends on the font size, length of each line and any page break in between.
You could just say, one page per 46 lines, it depends on how accurate you must be.
Why not count the number of pages you scanned?

Problem with decimal

Hi Experts,
I'm having a problem with decimal.
I have a alv data grid that can be edited.Once I press enter the value for the decimal fields are changed.
Example: If i input 5.00 in the field then I press enter it converts it to 0.05
And If I input 2.01 in the field it shows an error Too many decimal places(Maximum 0)
DATA INPUT for my internal table:
DATA: BEGIN OF it_data OCCURS 0,
   docno LIKE zit_haul_line-docno,
   line LIKE zit_haul_line-line,
   eqpno LIKE zit_haul_line-eqpno,
   rpt LIKE zit_haul_line-rpt,
   notrip LIKE zit_haul_line-notrip,
   trc LIKE zit_haul_line-trc,
   escfee LIKE zit_haul_line-escfee,
   tollfee LIKE zit_haul_line-tollfee,
   repr LIKE zit_haul_line-repr,
   others LIKE zit_haul_line-others,
   tba LIKE zit_haul_line-tba,
   dik LIKE zit_haul_line-dik,
   locorg LIKE zit_haul_line-locorg,
   locdes LIKE zit_haul_line-locdes,
END OF it_data.
DATA: wa_data LIKE it_data.
Here is my code in change ALV Change.
FORM data_changed USING ir_data_changed TYPE REF TO cl_alv_changed_data_protocol.
   DATA ls_modi TYPE lvc_s_modi.
   DATA: ratepertrip LIKE zit_haul_line-rpt,
         nooftrip LIKE zit_haul_line-notrip,
         lv_value TYPE lvc_value ,
         totalrent LIKE zit_haul_line-trc,
         escortfee LIKE zit_haul_line-escfee,
         tollfee LIKE zit_haul_line-tollfee,
         represent LIKE zit_haul_line-repr,
         others LIKE zit_haul_line-others,
         lv_value1 TYPE lvc_value,
         totalbill LIKE zit_haul_line-tba.
   DATA: eqpno LIKE equi-equnr,
         gv_equnr LIKE equi-equnr.
* Check each modification:
   LOOP AT ir_data_changed->mt_mod_cells INTO ls_modi.
      CASE ls_modi-fieldname.
       WHEN 'EQPNO'.
         CONDENSE ls_modi-value.
         SELECT SINGLE equnr
           INTO gv_equnr
           FROM equi
           WHERE equnr EQ ls_modi-value.
         IF sy-subrc NE 0.
           CALL METHOD ir_data_changed->add_protocol_entry
             EXPORTING
               i_msgid     = '00'
               i_msgty     = 'E'
               i_msgno     = '398'
               i_msgv1     = 'Equipment Number does not exist:'
               i_msgv2     = ls_modi-value
               i_msgv3     = ''
               i_msgv4     = ''
               i_fieldname = ls_modi-fieldname
               i_row_id    = ls_modi-row_id.
         ENDIF.
     ENDCASE.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'RPT'
     IMPORTING e_value = ratepertrip.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'NOTRIP'
     IMPORTING e_value = nooftrip.
   CLEAR totalrent.
     ls_modi-fieldname = 'TRC'.
     IF ratepertrip = ''.
       ratepertrip = 1.
     ELSEIF nooftrip = ''.
       nooftrip = 1.
     ENDIF.
     totalrent = ratepertrip * nooftrip.
     CALL METHOD ir_data_changed->modify_cell
       EXPORTING i_row_id = ls_modi-row_id
       i_fieldname = ls_modi-fieldname
       i_value = totalrent.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'ESCFEE'
     IMPORTING e_value = escortfee.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'TOLLFEE'
     IMPORTING e_value = tollfee.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'REPR'
     IMPORTING e_value = represent.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'OTHERS'
     IMPORTING e_value = others.
   CLEAR totalbill.
     ls_modi-fieldname = 'TBA'.
     totalbill = escortfee + tollfee + represent + others.
     totalbill = totalrent + totalbill.
     CALL METHOD ir_data_changed->modify_cell
       EXPORTING i_row_id = ls_modi-row_id
       i_fieldname = ls_modi-fieldname
       i_value = totalbill.
   ENDLOOP.
ENDFORM.                    "data_changed

Hi,
Can you check my code. I've tried changing the data types of my internal table and my output is stll same when I press enter.
The output should be 2.00 3.00 5.00 7.00
Also if I enter 12345.00 the output should be 12,345.00.
Thank you so much for the help.
* ALV required data objects.
TYPE-POOLS: sdydo, icon, slis.
DATA: w_title     TYPE lvc_title,
       w_repid     TYPE sy-repid,
       w_comm      TYPE slis_formname,
       w_status    TYPE slis_formname,
       x_layout    TYPE slis_layout_alv,
       ls_events   TYPE LINE OF slis_t_event,
       t_events    TYPE slis_t_event,
       t_fieldcat TYPE slis_t_fieldcat_alv,
       x_sort      type LINE OF slis_t_sortinfo_alv,
       t_sort      TYPE slis_t_sortinfo_alv,
       ls_heading TYPE slis_listheader,
       t_heading   TYPE slis_t_listheader,
       ls_fieldcat TYPE slis_fieldcat_alv,
       gs_variant LIKE disvariant,
        gt_events            TYPE slis_t_event,
        gs_events            TYPE slis_alv_event.
DATA:
   wa_layout     TYPE slis_layout_alv,
   wa_events         TYPE slis_alv_event,
   wa_sort TYPE slis_sortinfo_alv.
TYPES: BEGIN OF t_header,
        line01(555) TYPE c,
        line02(555) TYPE c,
        END OF t_header.
DATA: is_print TYPE slis_print_alv,
       gset TYPE lvc_s_glay,
       %runmode TYPE aqlimode.
data: it_sortcat   type slis_sortinfo_alv occurs 1.
DATA: gw_header TYPE t_header.
" END OF ALV DATA
"========================================================================================================================
DATA: BEGIN OF it_data OCCURS 0,
   docno LIKE zit_haul_line-docno,
   line LIKE zit_haul_line-line,
   eqpno LIKE zit_haul_line-eqpno,
   rpt TYPE p DECIMALS 2, "LIKE zit_haul_line-rpt,
   notrip TYPE p DECIMALS 2,
   trc TYPE p DECIMALS 2,
   escfee TYPE p DECIMALS 2,
   tollfee TYPE p DECIMALS 2,
   repr TYPE p DECIMALS 2,
   others TYPE p DECIMALS 2,
   tba TYPE p DECIMALS 2,
   dik LIKE zit_haul_line-dik,
   locorg LIKE zit_haul_line-locorg,
   locdes LIKE zit_haul_line-locdes,
END OF it_data.
DATA: wa_data LIKE it_data.
DATA: it_modified TYPE STANDARD TABLE OF zit_haul_line WITH HEADER LINE.
DATA: wa_modified TYPE STANDARD TABLE OF zit_haul_line WITH HEADER LINE.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
PARAMETERS: r_create RADIOBUTTON GROUP rad1 USER-COMMAND a DEFAULT 'X'.
   SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME.
   PARAMETERS: r_proj RADIOBUTTON GROUP rad2 MODIF ID A.
   PARAMETERS: r_cost RADIOBUTTON GROUP rad2 MODIF ID A.
   SELECTION-SCREEN END OF BLOCK b2.
PARAMETERS: r_post RADIOBUTTON GROUP rad1.
PARAMETERS: r_rev RADIOBUTTON GROUP rad1.
   SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME.
     PARAMETERS: p_docno LIKE mseg-belnr MODIF ID B,
                 p_post LIKE sy-datum MODIF ID B.
   SELECTION-SCREEN END OF BLOCK b3.
SELECTION-SCREEN BEGIN OF BLOCK b4 WITH FRAME.
PARAMETERS: p_trand LIKE sy-datum,
             p_cost LIKE csks-kostl,
             p_proj TYPE string,
             p_wbs TYPE string,
             p_nwa TYPE string.
SELECTION-SCREEN END OF BLOCK b4.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
   IF r_create = 'X'.
     IF screen-group1 = 'A'.
        screen-active = 1.
     ENDIF.
   ELSE.
     IF screen-group1 = 'A'.
        screen-active = 0.
     ENDIF.
   ENDIF.
   IF r_post = 'X' OR r_rev = 'X'.
     IF screen-group1 = 'B'.
        screen-active = 1.
     ENDIF.
   ELSE.
     IF screen-group1 = 'B'.
        screen-active = 0.
     ENDIF.
   ENDIF.
   MODIFY SCREEN.
ENDLOOP.
START-OF-SELECTION.
PERFORM get_data.
PERFORM display_report.
FORM get_data.
it_data-line = '001'.
APPEND it_data.
it_data-line = '002'.
APPEND it_data.
it_data-line = '003'.
APPEND it_data.
it_data-line = '004'.
APPEND it_data.
it_data-line = '005'.
APPEND it_data.
it_data-line = '006'.
APPEND it_data.
it_data-line = '007'.
APPEND it_data.
it_data-line = '008'.
APPEND it_data.
it_data-line = '009'.
APPEND it_data.
it_data-line = '010'.
APPEND it_data.
ENDFORM.
"ALV DISPLAY ====================================================================================================================================
"&      Form PF_WRITE_FIELDCAT
*&      Form pf_write_fieldcat
*       text
*      -->FNAME      text
*      -->TNAME      text
*      -->TEXT       text
*      -->LEN        text
FORM pf_write_fieldcat USING fname
                               tname
                               text
                               len
                               edt.
*                              key
*                              sum.
   ls_fieldcat-fieldname     = fname.
   ls_fieldcat-tabname       = tname.
   ls_fieldcat-seltext_l     = text.
   ls_fieldcat-outputlen     = len.
* ls_fieldcat-key           = key.
* ls_fieldcat-do_sum        = sum.
   ls_fieldcat-edit = edt.
   IF len = '0'.
     ls_fieldcat-outputlen     = '1'.
     ls_fieldcat-no_out = 'X'.
   ENDIF.
   APPEND ls_fieldcat TO t_fieldcat.
   CLEAR ls_fieldcat.
* To set ENTER Event!
   gs_events-name = 'CALLER_EXIT'.
   gs_events-form = 'CALLER_EXIT'.
   APPEND gs_events TO gt_events.
*   To change the ALV Changed Protocoll
   gs_events-name = 'DATA_CHANGED'.
   gs_events-form = 'DATA_CHANGED'.
   APPEND gs_events TO gt_events.
ENDFORM.                    " PF_WRITE_FIELDCAT
*&      Form display_report
FORM display_report.
   is_print-no_print_selinfos = 'X'.
   is_print-no_print_listinfos = 'X'.
   is_print-print_ctrl = 'X'.
   PERFORM pf_write_fieldcat USING:
* 'DOCNO'                  'IT_DATA' 'Line'                   ' ' '',
   'LINE'                  'IT_DATA' 'Line'                   ' ' '',
   'EQPNO'                 'IT_DATA' 'Equipment No.'          ' ' 'X',
   'RPT'           'IT_DATA' 'Rate per Trip'          ' ' 'X',
   'NOTRIP'              'IT_DATA' 'No of Trip'             ' ' 'X',
   'TRC'             'IT_DATA' 'Total Rental Charges'   ' ' '',
   'ESCFEE'             'IT_DATA' 'Escort Fee'             ' ' 'X',
   'TOLLFEE'               'IT_DATA' 'Toll Fee'               ' ' 'X',
   'REPR'             'IT_DATA' 'Representation'         ' ' 'X',
   'OTHERS'                'IT_DATA' 'Others'                 ' ' 'X',
   'TBA'               'IT_DATA' 'Total Billable Amount' ' ' '',
   'DIK'              'IT_DATA' 'Distance in KM'         ' ' 'X',
   'LOCORG'             'IT_DATA' 'Location Origin'        ' ' 'X',
   'LOCDES'             'IT_DATA' 'Location Destination'   ' ' 'X'.
* Layout
   x_layout-zebra = 'X'.
   x_layout-no_keyfix = ' '.
   x_layout-colwidth_optimize = 'X'.
* GUI Status
   w_status = 'SET_PF_STATUS'.
   w_repid = sy-repid.
* User commands
   w_comm = 'USER_COMMAND'.
* gs_variant-variant = p_var1.
* gs_variant-handle = space.
* gs_variant-report = sy-repid.
   gs_variant-report = sy-repid.
   gs_variant-username = sy-uname.
   gset-no_colwopt = 'X'.
* Displays the ALV grid
   CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
     EXPORTING
       i_callback_program = sy-repid
       it_fieldcat        = t_fieldcat
       is_layout          = x_layout
       "it_sort            = t_sort
       it_sort                 = it_sortcat
*      i_callback_pf_status_set = w_status
       "i_callback_user_command = w_comm
       I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
*      i_callback_html_top_of_page = 'TOP_OF_PAGE'
       i_callback_top_of_page = 'TOP-OF-PAGE'
*      i_callback_html_end_of_list = 'END-OF-PAGE'
       is_variant         = gs_variant
       i_save             = 'A'
       is_print           = is_print
       it_events          = gt_events
*      i_grid_title       = w_title
     TABLES
       t_outtab           = IT_DATA
     EXCEPTIONS
       program_error      = 1
       OTHERS             = 2.
ENDFORM.                    " display_report
FORM data_changed USING ir_data_changed TYPE REF TO cl_alv_changed_data_protocol.
   DATA ls_modi TYPE lvc_s_modi.
   DATA: ratepertrip LIKE zit_haul_line-rpt,
         nooftrip LIKE zit_haul_line-notrip,
         lv_value TYPE lvc_value ,
         totalrent LIKE zit_haul_line-trc,
         escortfee LIKE zit_haul_line-escfee,
         tollfee LIKE zit_haul_line-tollfee,
         represent LIKE zit_haul_line-repr,
         others LIKE zit_haul_line-others,
         lv_value1 TYPE lvc_value,
         totalbill LIKE zit_haul_line-tba.
   DATA: eqpno LIKE equi-equnr,
         gv_equnr LIKE equi-equnr.
* Check each modification:
   LOOP AT ir_data_changed->mt_mod_cells INTO ls_modi.
      CASE ls_modi-fieldname.
       WHEN 'EQPNO'.
         CONDENSE ls_modi-value.
         SELECT SINGLE equnr
           INTO gv_equnr
           FROM equi
           WHERE equnr EQ ls_modi-value.
         IF sy-subrc NE 0.
           CALL METHOD ir_data_changed->add_protocol_entry
             EXPORTING
               i_msgid     = '00'
               i_msgty     = 'E'
               i_msgno     = '398'
               i_msgv1     = 'Equipment Number does not exist:'
               i_msgv2     = ls_modi-value
               i_msgv3     = ''
               i_msgv4     = ''
               i_fieldname = ls_modi-fieldname
               i_row_id    = ls_modi-row_id.
         ENDIF.
     ENDCASE.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'RPT'
     IMPORTING e_value = ratepertrip.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'NOTRIP'
     IMPORTING e_value = nooftrip.
   CLEAR totalrent.
     ls_modi-fieldname = 'TRC'.
     IF ratepertrip = ''.
       ratepertrip = 1.
     ELSEIF nooftrip = ''.
       nooftrip = 1.
     ENDIF.
     totalrent = ratepertrip * nooftrip.
     CALL METHOD ir_data_changed->modify_cell
       EXPORTING i_row_id = ls_modi-row_id
       i_fieldname = ls_modi-fieldname
       i_value = totalrent.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'ESCFEE'
     IMPORTING e_value = escortfee.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'TOLLFEE'
     IMPORTING e_value = tollfee.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'REPR'
     IMPORTING e_value = represent.
   CALL METHOD ir_data_changed->get_cell_value
     EXPORTING i_row_id = ls_modi-row_id
     i_fieldname = 'OTHERS'
     IMPORTING e_value = others.
   CLEAR totalbill.
     ls_modi-fieldname = 'TBA'.
     totalbill = escortfee + tollfee + represent + others.
     totalbill = totalrent + totalbill.
     CALL METHOD ir_data_changed->modify_cell
       EXPORTING i_row_id = ls_modi-row_id
       i_fieldname = ls_modi-fieldname
       i_value = totalbill.
   ENDLOOP.
ENDFORM.                    "data_changed
FORM caller_exit USING is_data TYPE slis_data_caller_exit.
* Switch to OO_ALV:
   DATA: lr_alv TYPE REF TO cl_gui_alv_grid.
   CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
     IMPORTING
       e_grid = lr_alv.
* Register ENTER as edit event:
   CALL METHOD lr_alv->register_edit_event
     EXPORTING
       i_event_id = cl_gui_alv_grid=>mc_evt_enter.
* pls. use MC_EVT_MODIFIED if leaving the cell should trigger the edit event!
ENDFORM. "CALLER_EXIT
*&      Form TOP-OF-PAGE
*       text
FORM top-of-page.
*ALV Header declarations
   DATA: t_header TYPE slis_t_listheader,
         wa_header TYPE slis_listheader,
         t_line LIKE wa_header-info,
         ld_lines TYPE i,
         ld_linesc(10) TYPE c.
   DATA: text TYPE sdydo_text_element,
         a_right   TYPE REF TO cl_dd_area.
   DATA: tran TYPE string,
         send TYPE string,
         wbs TYPE string,
         nwa TYPE string.
   text = 'Create Hauling Charges for Project'.
   wa_header-typ = 'S'.
   wa_header-info = text.
   APPEND wa_header TO t_header.
   CLEAR: wa_header.
   gw_header-line01 = text.
   CONCATENATE 'Transaction Date: ' p_trand INTO tran SEPARATED BY space.
   text = tran.
   wa_header-typ = 'S'.
   wa_header-info = text.
   APPEND wa_header TO t_header.
   CLEAR: wa_header.
   gw_header-line01 = text.
   CONCATENATE 'Sender Cost Center: ' p_cost INTO send SEPARATED BY space.
   text = send.
   wa_header-typ = 'S'.
   wa_header-info = text.
   APPEND wa_header TO t_header.
   CLEAR: wa_header.
   gw_header-line01 = text.
   CONCATENATE 'Receiver WBS: ' p_wbs INTO wbs SEPARATED BY space.
   text = wbs.
   wa_header-typ = 'S'.
   wa_header-info = text.
   APPEND wa_header TO t_header.
   CLEAR: wa_header.
   gw_header-line01 = text.
   CONCATENATE 'Receiver Network and NWA: ' p_nwa INTO nwa SEPARATED BY space.
   text = nwa.
   wa_header-typ = 'S'.
   wa_header-info = text.
   APPEND wa_header TO t_header.
   CLEAR: wa_header.
   gw_header-line01 = text.
   CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
     EXPORTING
       it_list_commentary = t_header.
ENDFORM.                    "top-of-page
FORM pf_set_top_page_heading USING typ
                                     key
                                     info.
   ls_heading-typ = typ.
   ls_heading-key = key.
   ls_heading-info = info.
   APPEND ls_heading TO t_heading.
ENDFORM.                    " PF_SET_TOP_PAGE_HEADING
*&      Form PF_SET_TOP_PAGE_EVENTS
FORM pf_set_top_page_events USING name
                                    form.
   ls_events-name = name.
   ls_events-form = form.
   APPEND ls_events TO t_events.
   CLEAR ls_events.
ENDFORM.                    " PF_SET_TOP_PAGE_EVENTS
*&      Form REUSE_ALV_GET_VARIANT
FORM reuse_alv_get_variant
   USING    value(iv_repid)   TYPE sy-repid
            value(iv_handle) TYPE slis_handl
   CHANGING iv_variant        TYPE disvariant-variant.
   DATA: lv_exit(1) TYPE c,
         ls_variant TYPE disvariant.   " Structure for Variant
   MOVE: iv_variant TO ls_variant-variant,
         iv_handle TO ls_variant-handle,
         iv_repid   TO ls_variant-report.
   CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
     EXPORTING
       is_variant    = ls_variant
       i_save        = 'A'
     IMPORTING
       e_exit        = lv_exit
       es_variant    = ls_variant
     EXCEPTIONS
       not_found     = 1
       program_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.
   IF lv_exit = space.
     MOVE ls_variant-variant TO iv_variant.
   ENDIF.
ENDFORM.                    " REUSE_ALV_GET_VARIANT                 "
FORM user_command USING w_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.
CASE w_ucomm.
WHEN '&DATA_SAVE'.
* READ TABLE it_data INTO wa_data." INDEX rs_selfield-tabindex.
   DELETE it_data WHERE eqpno IS INITIAL.
   LOOP AT it_data INTO wa_data.
     CONDENSE wa_data-eqpno.
     MOVE-CORRESPONDING wa_data TO wa_modified.
     APPEND wa_modified TO it_modified.
   ENDLOOP.
   MODIFY zit_haul_line FROM TABLE it_modified.
ENDCASE.
ENDFORM. "user_command

Problem with decimal symbol

When I import in string format and after try to convert to number sometimes my procedure fails. I see that sometimes database need number string decimal symbol to be '.' and I replace ',' with '.' . But time after I find that I must change my procedure because system only acepts '.' like decimal symbol in to_number(str) operation. I think there could be two solutions I don't know how could be developed:
1) Control in de procedure which of the two symbols is accepted
2) Make Oracle database not to change decimal symbol setting
Any idea?
Thanks

That isn't a sql developer issue. You are not specifying the correct 'fmt' or nlsparam' parameters to the TO_NUMBER function.
>
When I import in string format and after try to convert to number sometimes my procedure fails. I see that sometimes database need number string decimal symbol to be '.' and I replace ',' with '.' . But time after I find that I must change my procedure because system only acepts '.' like decimal symbol in to_number(str) operation. I think there could be two solutions I don't know how could be developed:
1) Control in de procedure which of the two symbols is accepted
2) Make Oracle database not to change decimal symbol setting
Any idea?
>
Your statement that "system only acepts '.' like decimal symbol in to_number(str) operation" is misinformed.
Oracle's TO_NUMBER function will accept both a format string and an nslparam parameter and will handle that conversion for you.
See the TO_NUMBER function in the SQL Language Reference.
http://docs.oracle.com/cd/E14072_01/server.112/e10592/functions209.htm
More importantly see the TO_CHAR function in the same doc since the example for 'fmt' and 'nlsparam' are there
http://docs.oracle.com/cd/E14072_01/server.112/e10592/functions199.htm#i79330
There are examples in the TO_CHAR section and this introductory text should satisfy you that these parameters will do what you need.
>
TO_CHAR (number) converts n to a value of VARCHAR2 data type, using the optional number format fmt. The value n can be of type NUMBER, BINARY_FLOAT, or BINARY_DOUBLE. If you omit fmt, then n is converted to a VARCHAR2 value exactly long enough to hold its significant digits.
If n is negative, then the sign is applied after the format is applied. Thus TO_CHAR(-1, '$9') returns -$1, rather than $-1.
Refer to "Format Models" for information on number formats.
The 'nlsparam' argument specifies these characters that are returned by number format elements:
•Decimal character
•Group separator
•Local currency symbol
•International currency symbol
This argument can have this form:
'NLS_NUMERIC_CHARACTERS = ''dg''
NLS_CURRENCY = ''text''
NLS_ISO_CURRENCY = territory '
The characters d and g represent the decimal character and group separator, respectively. They must be different single-byte characters. Within the quoted string, you must use two single quotation marks around the parameter values. Ten characters are available for the currency symbol.
If you omit 'nlsparam' or any one of the parameters, then this function uses the default parameter values for your session.
>
Those comments appy to the parameters when used with TO_NUMBER also.

Converting a number with decimal to word

Similar Messages

Maybe you are looking for