WRITE INPUT ON lfimg data format issue

[Former Member]

Hi All,

.....................

I have the below peice of code to accept inputs from user for some of the fields

of type LIPS-LFIMG but the problem i am facing is <b>"if i enter 50 it converts that to 00.50 "</b> . How do i solve this problem ?

WRITE AT 1(183) sy-uline.

LOOP AT ilips ASSIGNING <row>.

*unit <row>-vrkme

WRITE:/1 sy-vline,

2(10) <row>-vbeln,

13 sy-vline,

14(6) <row>-posnr,

21 sy-vline,

22(9) <row>-matnr,

32(15) <row>-maktx,

48 sy-vline,

49(8) <row>-lfimg unit <row>-vrkme,

58(3) <row>-vrkme,

62 sy-vline,

63(8) <row>-bstnk,

72(8) <row>-vbelv,

81 sy-vline,

82(8) <row>-kunnr,

91 sy-vline,

92(15) <row>-zansicat,

108(15) <row>-zisocat,

124 sy-vline,

125(4) wa_lips-part1 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

129 sy-vline,

130(4) wa_lips-part2 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

135 sy-vline,

136(4) wa_lips-part3 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

141 sy-vline,

142(4) wa_lips-part4 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

147 sy-vline,

148(4) wa_lips-part5 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

153 sy-vline,

154(4) wa_lips-part6 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

159 sy-vline,

160(4) wa_lips-part7 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

165 sy-vline,

166(4) wa_lips-part8 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

171 sy-vline,

172(4) wa_lips-part9 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

177 sy-vline,

178(4) wa_lips-part10 unit <row>-vrkme INPUT ON LEFT-JUSTIFIED,

183 sy-vline.

<row>-index = sy-linno.

<row>-page = sy-pagno.

ENDLOOP.

&----

---

*& Form print_label

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM print_label.

CASE sy-ucomm.

WHEN 'LABEL'.

LOOP AT ilips ASSIGNING <row>.

READ LINE <row>-index OF PAGE <row>-page

FIELD VALUE wa_lips-part1 INTO <row>-part1

wa_lips-part2 INTO <row>-part2

wa_lips-part3 INTO <row>-part3

wa_lips-part4 INTO <row>-part4

wa_lips-part5 INTO <row>-part5

wa_lips-part6 INTO <row>-part6

wa_lips-part7 INTO <row>-part7

wa_lips-part8 INTO <row>-part8

wa_lips-part9 INTO <row>-part9

wa_lips-part10 INTO <row>-part10.

• ws-tot = <row>-part1 + <row>-part2 +

• <row>-part3 + <row>-part4 +

• <row>-part5 + <row>-part6 +

• <row>-part7 + <row>-part8 +

• <row>-part9 + <row>-part10.

*

• IF ws-tot NE <row>-lfimg.

*

• MESSAGE E999 WITH 'Please match break-up qtys with actuals'.

*

• ENDIF.

*

ENDLOOP.

SORT ilips BY vbeln posnr.

PERFORM download_file.

ENDCASE.

ENDFORM. " print_label

Any pointers will be rewarded ...

Thanks in advance

Jaman

Message was edited by:

ABAP Techie

Message was edited by:

ABAP Techie

[Former Member]

before passing convert it in to text...n then pass...

[Former Member]

Hi Jaman,

is that a input parameter on selection screen??

any how..LFIMG is of quntity field with length 13 decimals 3.

enter values as <b>50.00</b>..

[Former Member]

It is not in the selection-screen , it is in the output screen after selction-screen ....

Even if i enter the values in 50.00 format it takes it in this 00.50 format only...

Any other clues plz...?

Message was edited by:

ABAP Techie

[Former Member]

Hi , move lfimg value into another field of type char13..

and use this where u want..

Thanks .

[Former Member]

check if the <b>Fixed Point Arithmetic</b> attribute is checked in the Attributes of the program.

[Former Member]

.