Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

indx table access using export statement

Former Member
0 Likes
689

Hi ,

Can any one help me to resolve this.

we are getting an error in the program enhancement include.

at line no 82 and its job is failing as this is running in back ground.

|>>>>>|export l_t_zzpstyp to database indx(D7) ID 'IWSZZPSTYP'.                           

---------------------------------------------------------------------------------------------

full code

Line |SourceCde                                                                               |

----------------------------------------------------------------------------------------------------

|   52|           <fs1> TYPE ANY.                                                          |
|   53|clear:l_t_zzpstyp,l_t_zzwerks,l_t_zzbsakz,""ST20499/D7AK9A0VR5                      |
|   54|  l_wa_zzpstyp,l_wa_zzwerks,l_wa_zzbsakz. ""ST20499/D7AK9A0VR5                      |
|   55|IF NOT i_ekko-ekorg IS INITIAL.                                                         |
|   56|                                                                                        |
|   57|  CALL FUNCTION 'Z_EXIT_CHECK_PURCHORG'                                                 |
|   58|EXPORTING                                                                           |
|   59|  ekorg      = i_ekko-ekorg                                                     |
|   60|  exitname   = 'ZXM06U41_D7'                                                    |
|   61|IMPORTING                                                                           |
|   62|  exit_active= zxm06u41d7_active                                                |
|   63|EXCEPTIONS                                                                          |
|   64|  exit_not_found = 1                                                                |
|   65|  OTHERS     = 2.                                                               |
|   66|  IF sy-subrc = 0 AND zxm06u41d7_active = 'X'.                                          |
|   67|                                                                                        |
|   68|*}   INSERT                                                                             |
|   69|                                                                                        |
|   70|DATA: xuekpo LIKE ekpo.                                                             |
|   71|DATA: xuekko LIKE ekko.                                                             |
|   72|                                                                                        |
|   73|CLEAR: xuekpo, xuekko.                                                              |
|   74|*{Begin of change                       ST20499/D7AK9A0VR5                          |
|   75|clear:l_t_zzpstyp,l_t_zzwerks,l_t_zzbsakz,                                          |
|   76|      l_wa_zzpstyp,l_wa_zzwerks,l_wa_zzbsakz.                                       |
|   77|xuekpo-pstyp = i_ekpo-pstyp.                                                        |
|   78|EXPORT zzpstyp = xuekpo-pstyp TO MEMORY ID 'ZZPSTYP'.                               |
|   79|*Import ID 'IWSZZPSTYP' in requirement routine  RV61B922                                |
|   80|l_wa_zzpstyp-ZZPSTYP = i_ekpo-pstyp.                                                |
|   81|append l_wa_zzpstyp to l_t_zzpstyp.                                                 |
|>>>>>|export l_t_zzpstyp to database indx(D7) ID 'IWSZZPSTYP'.                            |
|   83|                                                                                        |
|   84|xuekpo-werks = i_ekpo-werks.                                                        |
|   85|EXPORT zzwerks = xuekpo-werks TO MEMORY ID 'ZZWERKS'.                               |
|   86|*Import ID 'IWSZZWERKS' in requirement routine  RV61B922                                |
|   87|l_wa_zzwerks-zzwerks = i_ekpo-werks.                                                |
|   88|append l_wa_zzwerks to l_t_zzwerks.                                                 |
|   89|export l_t_zzwerks to database indx(D7) ID 'IWSZZWERKS'.                            |
|   90|                                                                                        |
|   91|xuekko-bsakz = i_ekko-bsakz.                                                        |
|   92|*{   REPLACE    D7EK905213                                    2                 |
|   93|*\EXPORT ZZBSAKZ = XUEKKO-BSAKZ TO MEMORY ID 'ZZBSAKZ'.                                 |
|   94|EXPORT zzbsakz = xuekko-bsakz TO MEMORY ID 'ZZBSAKZ'.                               |
|   95|*Import ID 'IWSZZBSAKZ' in requirement routine  RV61B922                                |
|   96|l_wa_zzbsakz-zzbsakz = i_ekko-bsakz.                                                |
|   97|append l_wa_zzbsakz to l_t_zzbsakz.                                                 |
|   98|export l_t_zzbsakz to database indx(D7) ID 'IWSZZBSAKZ'.                            |
|   99|*}End of change                        ST20499/D7AK9A0VR5                           |
|  100|  ENDIF.                                                " d7 active                 |
|  101|ENDIF.  "i_ekko-ekorg populated                  
1 REPLY 1
Read only

Private_Member_7726
Active Contributor
0 Likes
538

Hi,

An error, huh..? Of the "Siri, I have an Abap run time error, what do I do" kind?

Enter %pc in the command field while in dump display, save the dump as text file and attach it to message, please.

cheers

Janis