topic Logical databse in repeat in Application Development and Automation Discussions

Logical databse in repeat

Former Member — Wed, 05 Mar 2014 16:28:16 GMT

I call in loop logical database by FM LDB_PROCESS in different parameters but only first step is return ok

next return error subrc = 1 LDB_NOT_REENTRANT

How to init this calling in second step?

Re: Logical databse in repeat

sreeramkumar_madisetty — Wed, 05 Mar 2014 16:30:42 GMT

Firstly why you are calling the LDB using FM instead mentioned that in Program attributes and call that using GET statement ?

Regards,

Sreeram

Re: Logical databse in repeat

Former Member — Wed, 05 Mar 2014 17:18:14 GMT

It is my need to execute like this

Re: Logical databse in repeat

sreeramkumar_madisetty — Wed, 05 Mar 2014 18:16:31 GMT

then which LDB you are using?

Re: Logical databse in repeat

Former Member — Thu, 06 Mar 2014 07:50:19 GMT

ADA but I think it doeasn't matter

Re: Logical databse in repeat

dream_woo2 — Wed, 04 Feb 2015 05:57:09 GMT

This message was moderated.

Re: Logical databse in repeat

former_member393881 — Thu, 03 Mar 2022 13:58:20 GMT

A necro post, but I've found a solution.

You need to initialize certain function group variables before next LDB_PROCESS call.

FORM ldb_init_ada.
 DATA:
 lt_fields TYPE STANDARD TABLE OF char40,
 ld_fname TYPE char20.

 FIELD-SYMBOLS:
 <ld_any> TYPE any,
 <ld_fld> LIKE LINE OF lt_fields.

 DEFINE mac_fld.
 concatenate '(SAPLABRA)' &1 into ld_fname.
 append ld_fname to lt_fields.
 END-OF-DEFINITION.

 mac_fld:
 'GD_INDEX',
 'GD_TFILL',
 'GD_ABRA',
 'GD_LAST_OBJ',
 'GD_ACT',
 'GD_SAV',
 'GD_OPEN_SUMANEP',
 'GD_NEW_TRIGGER',
 'GD_COMMIT',
 'GD_VORRAT',
 'GD_CURSOR',
 'GD_CURSOR_SUMANEP',
 'GD_SUMANEP_STOP',
 'GD_SUMANEP_STOP'.

 LOOP AT lt_fields ASSIGNING <ld_fld>.
 ASSIGN (<ld_fld>) TO <ld_any>.
 CHECK sy-subrc EQ 0.

 CLEAR <ld_any>.
 ENDLOOP.

 ASSIGN ('(SAPLSLDBFREE)BAD_LDBS[]') TO <ld_any>.
 CLEAR <ld_any>.
ENDFORM. "ldb_init_ada