Skip to Content
author's profile photo Former Member
Former Member

issue about RFBIBL00

HI,

i am working with RFBIBL00 program to upload FI documents.

i have written the program like below.it is creating a session,after creating the session it is going to dump,i am not able to process that too.

<b>DUMP:</b>CONVT_NO_NUMBER

short text:unable to interpret '/' as a number.this is coming in include RFBIBL02

it is very urgent for me.can any body suggest me some ideas.

tables:BGR00,BBKPF,BBSEG.

DATA:CA_NODATA VALUE '/'.

DATA VA_FILE(128) VALUE 'myfile'.

DATA:p_name like BGR00-GROUP value 'ROSE'.

DATA:BEGIN OF itab OCCURS 0,

BUKRS like BKPF-BUKRS,

BELNR like BKPF-BELNR,

no(2),

GJAHR like BKPF-GJAHR,

BLART like BKPF-BLART,

BLDAT like BKPF-BLDAT,

BUDAT like BKPF-BUDAT,

MONAT like BKPF-MONAT,

XBLNR like BKPF-XBLNR,

BKTXT like BKPF-BKTXT,

WAERS like BKPF-WAERS,

BSCHL like BSEG-BSCHL,

HKONT like BSEG-HKONT,

WRBTR like BSEG-WRBTR,

ZUONR like BSEG-ZUONR,

SGTXT like BSEG-SGTXT,

KTOSL like BSEG-KTOSL,

AUFNR like BSEG-AUFNR,

PRCTR like BSEG-PRCTR,

IMKEY like BSEG-IMKEY,

PROJK like BSEG-PROJK,

END OF itab.

data:jtab like ALSMEX_TABLINE OCCURS 0 WITH HEADER LINE.

CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'

EXPORTING

filename = 'D:\BHARAT\specs\others\FI\gl_item.xls'

i_begin_col = '1'

i_begin_row = '2'

i_end_col = '21'

i_end_row = '90'

TABLES

intern = jtab

EXCEPTIONS

inconsistent_parameters = 1

upload_ole = 2

OTHERS = 3.

IF sy-subrc <> 0.

MESSAGE e001(ztmw).

ENDIF.

SORT jtab BY row col.

LOOP AT jtab.

  • write:/ jtab-row,jtab-col,jtab-value.

CASE jtab-col.

WHEN 1.

itab-bukrs = jtab-value.

WHEN 2.

itab-belnr = jtab-value.

WHEN 3.

itab-no = jtab-value.

WHEN 4.

itab-GJAHR = jtab-value.

WHEN 5.

itab-BLART = jtab-value.

WHEN 6.

itab-BLDAT = jtab-value.

WHEN 7.

itab-BUDAT = jtab-value.

WHEN 8.

itab-MONAT = jtab-value.

WHEN 9.

itab-XBLNR = jtab-value.

WHEN 10.

itab-BKTXT = jtab-value.

WHEN 11.

itab-WAERS = jtab-value.

WHEN 12.

itab-BSCHL = jtab-value.

WHEN 13.

itab-HKONT = jtab-value.

WHEN 14.

itab-WRBTR = jtab-value.

WHEN 15.

itab-ZUONR = jtab-value.

WHEN 16.

itab-SGTXT = jtab-value.

WHEN 17.

itab-KTOSL = jtab-value.

WHEN 18.

itab-AUFNR = jtab-value.

WHEN 19.

itab-PRCTR = jtab-value.

WHEN 20.

itab-IMKEY = jtab-value.

WHEN 21.

itab-PROJK = jtab-value.

ENDCASE.

at END OF row.

APPEND itab.

endat.

ENDLOOP.

LOOP AT itab.

write:/ itab-BUKRS,itab-BELNR,itab-no,itab-GJAHR,itab-BLART,

itab-BLDAT,itab-BUDAT,itab-MONAT,itab-XBLNR,itab-BKTXT,

itab-WAERS,itab-BSCHL,itab-HKONT,itab-WRBTR,itab-ZUONR,

itab-SGTXT,itab-KTOSL,itab-AUFNR,itab-PRCTR,itab-IMKEY,

itab-PROJK.

ENDLOOP.

LOOP AT itab.

  • Open file

OPEN DATASET VA_FILE FOR OUTPUT IN text mode

encoding UTF-8.

  • Transfer BGR00 data

BGR00-STYPE = '0'.

BGR00-GROUP = P_NAME.

BGR00-MANDT = SY-MANDT.

BGR00-USNAM = SY-UNAME.

  • BGR00-START = ' '.

BGR00-XKEEP = 'X'.

BGR00-NODATA = '/'.

TRANSFER BGR00 TO VA_FILE.

  • Transfer BBKPF data

PERFORM SET_NO_DATA USING BBKPF.

BBKPF-STYPE = '1'.

BBKPF-TCODE = 'FB01'.

BBKPF-BELNR = itab-BELNR.

BBKPF-BUKRS = itab-BUKRS.

BBKPF-BLART = itab-BLART.

BBKPF-WAERS = itab-WAERS.

BBKPF-BLDAT = itab-BLDAT.

BBKPF-BUDAT = itab-BUDAT.

BBKPF-XBLNR = itab-XBLNR.

BBKPF-BKTXT = itab-BKTXT.

BBKPF-SENDE = ca_nodata.

TRANSFER BBKPF TO VA_FILE.

  • Transfer BBSEG data

PERFORM SET_NO_DATA USING BBSEG.

BBSEG-STYPE = '2'.

BBSEG-TBNAM = 'BBSEG'.

BBSEG-NEWKO = itab-no.

BBSEG-NEWBS = itab-BSCHL.

BBSEG-HKONT = itab-HKONT.

BBSEG-WRBTR = itab-WRBTR.

BBSEG-ZUONR = itab-ZUONR.

BBSEG-SGTXT = itab-SGTXT.

  • BBSEG-KOSTL = itab-KOSTL.

BBSEG-AUFNR = itab-AUFNR.

BBSEG-PRCTR = itab-PRCTR.

BBSEG-PROJK = itab-PROJK.

BBSEG-IMKEY = itab-IMKEY.

BBSEG-SENDE = ca_nodata.

TRANSFER BBSEG TO VA_FILE.

CLOSE DATASET VA_FILE.

ENDLOOP.

SUBMIT RFBIBL00 WITH DS_NAME = VA_FILE

WITH CALLMODE = 'B' AND RETURN.

FORM SET_NO_DATA USING P_STRUCT.

DATA: COUNTER TYPE I.

FIELD-SYMBOLS : <FS>.

CLEAR COUNTER.

DO.

ADD 1 TO COUNTER.

ASSIGN COMPONENT COUNTER OF STRUCTURE P_STRUCT TO <FS>.

IF SY-SUBRC NE 0.

EXIT.

ENDIF.

IF <fs> is not initial.

MOVE CA_NODATA TO <FS>.

ENDIF.

ENDDO.

ENDFORM.

thanks & regards,

nag.

Add a comment
10|10000 characters needed characters exceeded

Assigned Tags

Related questions

7 Answers

  • Best Answer
    author's profile photo Former Member
    Former Member
    Posted on Nov 21, 2007 at 12:44 PM

    Hi Nagarjuna,

    In SAP genarated BDC programs I've been observed NODATA indicator is declared as '/' lower case. I'm not sure why lower case... so you can try in your program like this..

    *DATA:CA_NODATA VALUE '/'.
    PARAMETERS : NODATA DEFAULT '/' LOWER CASE NO-DISPALY. 
    "replace all CA_NODATA with NODATA
    "please let me know..it's only trail n error.. :)
    

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Nov 21, 2007 at 11:52 AM

    Hi,

    Where exactly the processing was stopped check in st22

    it points at wat pont it stopped in your code

    Regards,

    siva.

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Nov 21, 2007 at 12:12 PM

    HI,

    Ok thanks for your answer

    Regards.........................

    Add a comment
    10|10000 characters needed characters exceeded

  • Posted on Nov 21, 2007 at 01:06 PM

    hi Nag,

    replace this line:

    DATA:CA_NODATA VALUE '/'.

    with:

    DATA:CA_NODATA VALUE ' '.

    so instead / there should be only <i>space</i>

    hope this helps

    ec

    Add a comment
    10|10000 characters needed characters exceeded

    • Former Member Eric Cartman

      Eric,

      thanks for the reply.

      here in my program i am using this <b>BBSEG-SENDE = ca_nodata."ca_nodata = '/'</b>this is for mentioning the end of the segment.can u pls tell me some more tips.

      using this program.if possible send me some example code.

      rgds,

      nag.

  • author's profile photo Former Member
    Former Member
    Posted on Nov 21, 2007 at 01:59 PM

    u might want to put a break point in program : <b>RFBIBL01</b>and the include u r looking for is called in this and check at what field the short dump occurs.

    Also ur saying that the dump occurs after creating session. the session is created in the POSTING INTERFACE fms POSTING_INTERFACE_START /

    POSTING_INTERFACE_DOCUMENT you might want to check these also.

    Add a comment
    10|10000 characters needed characters exceeded

  • Posted on Nov 21, 2007 at 03:03 PM

    Problem lies here:

    FORM SET_NO_DATA USING P_STRUCT.
    DATA: COUNTER TYPE I.
    FIELD-SYMBOLS : <FS>.
    CLEAR COUNTER.
    DO.
    ADD 1 TO COUNTER.
    ASSIGN COMPONENT COUNTER OF STRUCTURE P_STRUCT TO <FS>.
    IF SY-SUBRC NE 0.
    EXIT.
    ENDIF.
    *IF <fs> is not initial.
    IF <FS> IS INITIAL.   " <<<<  You have to move CA_NODATA when you have field empty
    MOVE CA_NODATA TO <FS>.
    ENDIF.
    ENDDO.
    ENDFORM.

    Regards,

    Naimesh Patel

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Nov 21, 2007 at 03:06 PM

    It's because somewhere in your program you are putting the nodata character '/' in the wrong position of your field. check your output data.

    Rob

    Add a comment
    10|10000 characters needed characters exceeded

Before answering

You should only submit an answer when you are proposing a solution to the poster's problem. If you want the poster to clarify the question or provide more information, please leave a comment instead, requesting additional details. When answering, please include specifics, such as step-by-step instructions, context for the solution, and links to useful resources. Also, please make sure that you answer complies with our Rules of Engagement.
You must be Logged in to submit an answer.

Up to 10 attachments (including images) can be used with a maximum of 1.0 MB each and 10.5 MB total.