topic Re: Problem with export/import in back ground in Application Development and Automation Discussions

Problem with export/import in back ground

Former Member — Fri, 17 Apr 2009 12:55:39 GMT

Hi Experts,

I am having a requirement in which i am exporting an internal table to memory from one program and importing that in another program. in foreground it is working fine. But in background it is not working. Is there any work around.

Here is sample code.


Program1:

types:
  begin of tab_type,
    para type string,
    dobj type string,
  end of tab_type.

data:
  id    type c length 10 value 'TEXTS',
  text1 type string value `IKE`,
  text2 type string value `TINA`,
  line  type tab_type,
  itab  type standard table of tab_type,
    itab1  type standard table of tab_type.

line-para = 'P1'.
line-dobj = 'TEXT1'.
append line to itab.

line-para = 'P2'.
line-dobj = 'TEXT2'.
append line to itab.
free memory id 'TD'.
export itab to memory id 'TD'.


Program2:
types:
  begin of tab_type,
    para type string,
    dobj type string,
  end of tab_type.

data:
  id    type c length 10 value 'TEXTS',
  text1 type string value `IKE`,
  text2 type string value `TINA`,
  line  type tab_type,
  itab  type standard table of tab_type,
    itab1  type standard table of tab_type.
refresh itab.
import itab from memory id 'TD'.
free memory id 'TD'.
clear line.
loop at itab into line.
  write: / line-para, line-dobj.
  clear line.
endloop.

Thanks,

Jyothi

Re: Problem with export/import in back ground

KK07 — Fri, 17 Apr 2009 13:12:07 GMT

Hi Jyothi,

which Program You Are Executing in Background,First one or second one?

For Better result use SUBMIT and return before import.

Ex:SUBMIT PROGRAM1 AND RETURN(IN SECOND PROGRAM).

this should work..

Cheers,

Edited by: krishna kishore on Apr 17, 2009 6:42 PM

Re: Problem with export/import in back ground

Former Member — Fri, 17 Apr 2009 13:22:40 GMT

Thanks KK..

I missed some lines in the posted code. the issues is i am submitting a program in background, in that i am importing the eported data from memory. but the exported memory is not available inthe background running program.

Is there any way to get the exported memory data in the background job.

Here is the program.

Program1:

types:

begin of tab_type,

para type string,

dobj type string,

end of tab_type.

data:

id type c length 10 value 'TEXTS',

text1 type string value `IKE`,

text2 type string value `TINA`,

line type tab_type,

itab type standard table of tab_type,

itab1 type standard table of tab_type.

line-para = 'P1'.

line-dobj = 'TEXT1'.

append line to itab.

line-para = 'P2'.

line-dobj = 'TEXT2'.

append line to itab.

free memory id 'TD'.

export itab to memory id 'TD'.

DATA: number TYPE tbtcjob-jobcount,

name TYPE tbtcjob-jobname VALUE 'CRDR_ ',

print_parameters TYPE pri_params.

CONCATENATE name

sy-datum

INTO name .

CALL FUNCTION 'JOB_OPEN'

EXPORTING

jobname = name

IMPORTING

jobcount = number

EXCEPTIONS

cant_create_job = 1

invalid_job_data = 2

jobname_missing = 3

OTHERS = 4.

IF sy-subrc = 0.

SUBMIT ZPROGRAM2_BACKGROUND

TO SAP-SPOOL

SPOOL PARAMETERS print_parameters

WITHOUT SPOOL DYNPRO

VIA JOB name NUMBER number

AND RETURN.

IF sy-subrc = 0.

CALL FUNCTION 'JOB_CLOSE'

EXPORTING

jobcount = number

jobname = name

strtimmed = 'X'

EXCEPTIONS

cant_start_immediate = 1

invalid_startdate = 2

jobname_missing = 3

job_close_failed = 4

job_nosteps = 5

job_notex = 6

lock_failed = 7

OTHERS = 8.

ENDIF.

Program2: ZPROGRAM2_BACKGROUND

types:

begin of tab_type,

para type string,

dobj type string,

end of tab_type.

data:

id type c length 10 value 'TEXTS',

text1 type string value `IKE`,

text2 type string value `TINA`,

line type tab_type,

itab type standard table of tab_type,

itab1 type standard table of tab_type.

refresh itab.

import itab from memory id 'TD'.

free memory id 'TD'.

clear line.

loop at itab into line.

write: / line-para, line-dobj.

clear line.

endloop.

Thanks,

Jyothi

Re: Problem with export/import in back ground

KK07 — Fri, 17 Apr 2009 13:30:19 GMT

Hi Jyothi,

You are not getting any values because, there will be no values.

This is because in the second report you are using import which can have values only when

export is done!!

What i mean to say is submitting the second program(which has no output) in the first program

will not get any output.Insted try reverse that is call the first program in the second program like..

report program2.

types:

begin of tab_type,

para type string,

dobj type string,

end of tab_type.

data:

id type c length 10 value 'TEXTS',

text1 type string value `IKE`,

text2 type string value `TINA`,

line type tab_type,

itab type standard table of tab_type,

itab1 type standard table of tab_type.

refresh itab.

submit program1 and return.

import itab from memory id 'TD'.

free memory id 'TD'.

clear line.

loop at itab into line.

write: / line-para, line-dobj.

clear line.

endloop.

This should work..

Cheers,

Re: Problem with export/import in back ground

former_member156446 — Fri, 17 Apr 2009 13:35:14 GMT

In a simpler way P1 > exports P2 > imports

you are submitting P2 in Bckd. when P1 did not do its work, how can P2 import it...

solution:>> submit P1 in P2 and then import in P2

P2 progra should look like this:

submit P1 with.....

import memory...'TD'..

Re: Problem with export/import in back ground

Former Member — Fri, 17 Apr 2009 14:10:12 GMT

Program 1 fucntionality.

1. Export the values to Memory ID and submits the Program2 in Background.

Program2 functionalidy.

1. Import the valules from memory ID exported and do the process.

But in the background job (program2) the values are not imported.

Any solution...

Thanks,

Jyothi

Re: Problem with export/import in back ground

Former Member — Fri, 17 Apr 2009 14:21:57 GMT

HI,

In background Export/Import will not work ..Instead you can try with Export/Import to database.

Refer to this link..

Re: Problem with export/import in back ground

KK07 — Fri, 17 Apr 2009 14:23:43 GMT

hi,

you have written the loop..endloop statement(write) in the second program,

thats you are not able to see the output.. insted it should be in the first report which you are executing..!

Cheers,

Edited by: krishna kishore on Apr 17, 2009 7:53 PM

Re: Problem with export/import in back ground

former_member203501 — Fri, 17 Apr 2009 14:24:06 GMT

hi see this ..

and

Re: Problem with export/import in back ground

Former Member — Fri, 17 Apr 2009 20:40:49 GMT

sol 1 ..try EXPORT a1 = b1 DATABASE dbtab(ar) [FROM wa] [CLIENT cl] ID id, (may not work in background)

sol 2...if the second program is a z program and a newly developed one, convert it into a FM so that we can use exporting and importing..

Re: Problem with export/import in back ground

Former Member — Sat, 18 Apr 2009 15:17:30 GMT

Thanks for your links Venkat.

My problem is solved by using the SHARED BUFFER.

Here is the code i used inthe first program

DATA: wa_invdata(10) TYPE c VALUE 'INVDATA'.

DATA: wa_month(10) TYPE c VALUE 'MONTH'.

DATA: wa_process(10) TYPE c VALUE 'PROCESS'.

EXPORT wa_month_end TO MEMORY ID 'MONTHEND'.

EXPORT e_process = it_inv_data[]

TO SHARED BUFFER indx(st) ID wa_process.

EXPORT e_month = wa_month_end

TO SHARED BUFFER indx(st) ID wa_month.

EXPORT e_invdata = it_tab[]

TO SHARED BUFFER indx(st) ID wa_invdata.

EXPORT it_inv_data TO MEMORY ID 'PROCESS'.

DATA: number TYPE tbtcjob-jobcount,

name TYPE tbtcjob-jobname VALUE 'CRDR_ ',

print_parameters TYPE pri_params.

CONCATENATE name

sy-datum

INTO name .

*CALL FUNCTION 'GET_PRINT_PARAMETERS'

EXPORTING
no_dailog = 'X'
archive_mode = '3'
IMPORTING
out_parameters = print_parameters
out_archive_parameters = archi_parameters
valid = valid_flag
EXCEPTIONS
invalid_print_params = 2
OTHERS = 4.

CALL FUNCTION 'JOB_OPEN'

EXPORTING

jobname = name

IMPORTING

jobcount = number

EXCEPTIONS

cant_create_job = 1

invalid_job_data = 2

jobname_missing = 3

OTHERS = 4.

IF sy-subrc = 0.

print_parameters-pdest = 'locl'.

SUBMIT zsd_crdr_monthend_back_process

TO SAP-SPOOL

SPOOL PARAMETERS print_parameters

WITHOUT SPOOL DYNPRO

VIA JOB name NUMBER number

AND RETURN.

IF sy-subrc = 0.

CALL FUNCTION 'JOB_CLOSE'

EXPORTING

jobcount = number

jobname = name

strtimmed = 'X'

EXCEPTIONS

cant_start_immediate = 1

invalid_startdate = 2

jobname_missing = 3

job_close_failed = 4

job_nosteps = 5

job_notex = 6

lock_failed = 7

OTHERS = 8.

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

Second Program

Program zsd_crdr_monthend_back_process.

DATA: wa_invdata(10) TYPE c VALUE 'INVDATA'.

DATA: wa_month(10) TYPE c VALUE 'MONTH'.

DATA: wa_process(10) TYPE c VALUE 'PROCESS'.

IMPORT e_invdata = it_tab[]

FROM SHARED BUFFER indx(st) ID wa_invdata.

IF sy-subrc NE 0 OR it_tab[] IS INITIAL..

No data found for the Month end processing

MESSAGE s398(00)

WITH 'No Data Found'.

STOP.

ELSE.

found the data

IMPORT e_process = it_inv_data[]

FROM SHARED BUFFER indx(st) ID wa_process.

IMPORT e_month = wa_month_end

FROM SHARED BUFFER indx(st) ID wa_month.

Thanks for your help.