Copy All tables with Data in Another Database

CREATE PROCEDURE [dbo].[uspCreateCopyTables]-- GOALTEST,GOAL
    -- parameters for the stored procedure here
    @toDatabase VARCHAR(100)
    ,@fromDatabase VARCHAR(100)
AS
BEGIN
    -- SET NOCOUNT ON added to prevent extra result sets from
    SET NOCOUNT ON;

    DECLARE @fullTableList VARCHAR(8000);
    DECLARE @idx INT;
    DECLARE @tableName VARCHAR(8000);
    DECLARE @SQLQuery NVARCHAR(500);
    DECLARE @ParameterDefinition NVARCHAR(100);

    -- this  query gives the list of table name existing in the database.
    SELECT @fullTableList = ISNULL(@fullTableList + ',' + TABLE_NAME, TABLE_NAME)
    FROM INFORMATION_SCHEMA.TABLES
    WHERE TABLE_TYPE = 'BASE TABLE';

    SELECT @idx = 1

    /* this section splits the table name from comma separated string and copies that table name from
        one database to another database*/
    IF LEN(@fullTableList) > 1
        OR @fullTableList IS NOT NULL
        WHILE @idx != 0
        BEGIN
            SET @idx = CHARINDEX(',', @fullTableList)

            IF @idx != 0
                SET @tableName = LEFT(@fullTableList, @idx - 1)
            ELSE
                SET @tableName = @fullTableList

            IF (LEN(@tableName) > 0)
                SET @SQLQuery = 'SELECT  * INTO [' + @toDatabase + '].[dbo].[' + @tableName + '] FROM [' + @fromDatabase + '].[dbo].[' + @tableName + ']'

            EXEC (@SQLQuery)

            SET @fullTableList = RIGHT(@fullTableList, LEN(@fullTableList) - @idx)

            IF LEN(@fullTableList) = 0
                BREAK
        END
END
GO