hi Bala krishna,
this is my PO Header text extraction code: 

please go thru this and revert in case of any problem.

take one internal table with two items like this:

data: begin of t_remarks_text,
       remark1(130) type c,
       remark2(130) type c,
       end   of t_remarks_text.



DATA:   L_NAME  LIKE THEAD-TDNAME.
  DATA: L_TXT(255) TYPE C,
        L_CNT      TYPE I.
  DATA: BEGIN OF T_TLINE OCCURS 0.
          INCLUDE STRUCTURE TLINE.
  DATA: END   OF T_TLINE.

  REFRESH: T_TLINE.
  CLEAR:   T_TLINE, L_NAME,T_REMARKS_TEXT.
  L_NAME = ST_EKKO-EBELN.
  CALL FUNCTION 'READ_TEXT'
    EXPORTING
      CLIENT                  = SY-MANDT
      ID                      = 'K01'
      LANGUAGE                = SY-LANGU
      NAME                    = L_NAME
      OBJECT                  = 'EKKO'
    TABLES
      LINES                   = T_TLINE
    EXCEPTIONS
      ID                      = 1
      LANGUAGE                = 2
      NAME                    = 3
      NOT_FOUND               = 4
      OBJECT                  = 5
      REFERENCE_CHECK         = 6
      WRONG_ACCESS_TO_ARCHIVE = 7
      OTHERS                  = 8.
  CASE SY-SUBRC.
    WHEN 0.
      CLEAR: L_TXT.
      LOOP AT T_TLINE.
        IF L_TXT IS INITIAL.
          L_TXT = T_TLINE-TDLINE.
        ELSE.
          CONCATENATE L_TXT T_TLINE-TDLINE
          INTO        L_TXT
          SEPARATED   BY SPACE.
        ENDIF.
        CLEAR: L_CNT.
        L_CNT = STRLEN( L_TXT ).
        IF L_CNT GE 255.
          EXIT.
        ENDIF.
      ENDLOOP.
      CLEAR: T_REMARKS_TEXT.
      T_REMARKS_TEXT-REMARK1 = L_TXT+0(110).
      CONCATENATE 'SPECIAL REMARKS :' T_REMARKS_TEXT-REMARK1
                  INTO T_REMARKS_TEXT-REMARK1
                  SEPARATED BY SPACE.

      IF NOT L_TXT+110(130) IS INITIAL.
        T_REMARKS_TEXT-REMARK2 = L_TXT+110(130).
      ENDIF.

    WHEN OTHERS.
  ENDCASE.





On Thu, 30 Dec 2004 10:48:46 +0000 (GMT), Bala krishna
<[EMAIL PROTECTED]> wrote:
>
> i had a doubt in purchase order text
>
> when i extract data of long text i get only one line
> upto 72 fields
>
> in mm02 the text contins 4 lines
>
> how can i get those 4 lines in the output field "long
> text"
>
> even i get only one line
>
> i want to get all the 4 lines in my outpult field long
> text
>
> howit is ...
>
> its very urgent
>
> regards
> Balakrishna
>
> --- krishna malyala <[EMAIL PROTECTED]>
> wrote:
> > loop at screen.
> > if screen name ='XYZ'.
> >   input = 0.(check it is 0 or 1, i dont remember
> > exactly....)
> > endif.
> > endloop.
> >
> > Amol Sonaikar <[EMAIL PROTECTED]> wrote:
> > Hello Everybody
> >
> > I have Input Boxes in my dialog screen from where
> > data is inserted in Ztable.
> > I have an Index Unique created on ID column.
> > I want to Disable Input Output Box when user tries
> > to enter Duplicate record.
> > And enable it when another Button is Pressed.
> >
> > But I want to know 2 things.
> >
> > 1. How to trap the error whenever duplicate record
> > is tried on DB Table.
> > 2. How to Enable / Disable Input Boxes at a
> > particular event.
> >
> > Regards
> >
> > Amol Sonaikar
> > --
> > India.com free e-mail - www.india.com.
> > Check out our value-added Premium features, such as
> > an extra 20MB for mail storage, POP3, e-mail
> > forwarding, and ads-free mailboxes!
> >
> > Powered by Outblaze
> >
> >
> > To unsubscribe from this list, send a to mail to
> > [EMAIL PROTECTED] or go to
> > http://groups.yahoo.com/group/ABAP
> >
> > Comments about the list can be sent to
> > [EMAIL PROTECTED]
> >
> >
> > Yahoo! Groups SponsorADVERTISEMENT
> >
> >
> > ---------------------------------
> > Yahoo! Groups Links
> >
> >    To visit your group on the web, go to:
> > http://groups.yahoo.com/group/ABAP/
> >  
> >    To unsubscribe from this group, send an email to:
> > [EMAIL PROTECTED]
> >  
> >    Your use of Yahoo! Groups is subject to the
> > Yahoo! Terms of Service.
> >
> >
> >            
> > ---------------------------------
> > Do you Yahoo!?
> >  Yahoo! Mail - Helps protect you from nasty viruses.
>
>
>      
>      
>            
> ___________________________________________________________
> ALL-NEW Yahoo! Messenger - all new features - even more fun!
> http://uk.messenger.yahoo.com
>
>
> To unsubscribe from this list, send a to mail to
> [EMAIL PROTECTED] or go to http://groups.yahoo.com/group/ABAP
>
> Comments about the list can be sent to [EMAIL PROTECTED]
>
>
> Yahoo! Groups Sponsor
> ADVERTISEMENT
>
> ________________________________
> Yahoo! Groups Links
> To visit your group on the web, go to:
> http://groups.yahoo.com/group/ABAP/
>  
> To unsubscribe from this group, send an email to:
> [EMAIL PROTECTED]
>  
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


--
As Always
Ajaye


To unsubscribe from this list, send a to mail to
[EMAIL PROTECTED] or go to http://groups.yahoo.com/group/ABAP

Comments about the list can be sent to [EMAIL PROTECTED]



Yahoo! Groups Sponsor
ADVERTISEMENT
click here


Yahoo! Groups Links

Reply via email to