Problem During Importing using DBMS_DATAPUMP

Question

Hi,
I am facing Problems while Importing usinf DBMS_DATAPUMP:
Its not showing any Error but the Tables not getting Imported.
Below is the Code whihc i have written for Import:
CREATE OR REPLACE PROCEDURE Data_Pump_Import_Load AS
ind NUMBER; -- Loop index
h1 NUMBER; -- Data Pump job handle
percent_done NUMBER; -- Percentage of job complete
job_state VARCHAR2(30); -- To keep track of job state
le ku$_LogEntry; -- For WIP and error messages
js ku$_JobStatus; -- The job status from get_status
jd ku$_JobDesc; -- The job description from get_status
sts ku$_Status; -- The status object returned by get_status
BEGIN
-- Create a (user-named) Data Pump job to do a schema export.
DBMS_OUTPUT.PUT_LINE('COMES HERE');
h1 := DBMS_DATAPUMP.OPEN(operation => 'IMPORT', job_mode =>
'TABLE',job_name => 'RET_IMPORT_TEST');
DBMS_OUTPUT.PUT_LINE('COMES HERE1111');
DBMS_DATAPUMP.ADD_FILE(handle => h1,filename =>
'MYEXPORTTEST.DMP', DIRECTORY => 'EXPORT_DIR',filetype=>1);
DBMS_OUTPUT.PUT_LINE('COMES HERE2222');
DBMS_DATAPUMP.ADD_FILE(handle => h1,filename =>
'MYEIMPORTTEST.LOG',DIRECTORY => 'EXPORT_DIR',filetype=>3);
DBMS_DATAPUMP.SET_PARAMETER (handle => h1,
NAME => 'INCLUDE_METADATA',
VALUE => 1);
DBMS_DATAPUMP.SET_PARAMETER(handle => h1,NAME =>
'DATA_ACCESS_METHOD', VALUE =>'AUTOMATIC');
DBMS_DATAPUMP.SET_PARAMETER(handle => h1,NAME =>
'TABLE_EXISTS_ACTION', VALUE =>'REPLACE');
DBMS_OUTPUT.PUT_LINE('COMES HERE3333');
-- Specify a single dump file for the job (using the handle just returned)
-- and a directory object, which must already be defined and accessible
-- to the user running this procedure.
-- Start the job. An exception will be generated if something is not set up
-- properly.
DBMS_DATAPUMP.START_JOB(h1);
-- The export job should now be running. In the following loop, the job
-- is monitored until it completes. In the meantime, progress information is
-- displayed.
percent_done := 0;
job_state := 'UNDEFINED';
WHILE (job_state != 'COMPLETED') AND (job_state != 'STOPPED') LOOP
dbms_datapump.get_status(h1,
dbms_datapump.ku$_status_job_error +
dbms_datapump.ku$_status_job_status +
dbms_datapump.ku$_status_wip,-1,job_state,sts);
js := sts.job_status;
-- If the percentage done changed, display the new value.
IF js.percent_done != percent_done
THEN
DBMS_OUTPUT.PUT_LINE('*** Job percent done = ' ||
TO_CHAR(js.percent_done));
percent_done := js.percent_done;
END IF;
-- If any work-in-progress (WIP) or error messages were received for the job,
-- display them.
IF (BITAND(sts.mask,dbms_datapump.ku$_status_wip) != 0)
THEN
le := sts.wip;
ELSE
IF (BITAND(sts.mask,dbms_datapump.ku$_status_job_error) != 0)
THEN
le := sts.error;
ELSE
le := NULL;
END IF;
END IF;
IF le IS NOT NULL
THEN
ind := le.FIRST;
WHILE ind IS NOT NULL LOOP
DBMS_OUTPUT.PUT_LINE(le(ind).LogText);
ind := le.NEXT(ind);
END LOOP;
END IF;
END LOOP;
-- Indicate that the job finished and detach from it.
DBMS_OUTPUT.PUT_LINE('Job has completed');
DBMS_OUTPUT.PUT_LINE('Final job state = ' || job_state);
dbms_datapump.detach(h1);
END;
/

Answer 1

Use metadata_remap proc with REMAP_SCHEMA option:
DBMS_DATAPUMP.METADATA_RAMAP(id, 'REMAP_SCHEMA', 'SOURCE_SCHEMA', 'DESTINATION_SCHEMA');