-- ------------------------------------------------------------------ --
-- COPY a database with Dual Copy Based on Size information           --
-- ------------------------------------------------------------------ --
-- The following RXDB2I2 scripts generates DB2 COPY with              --
--    LISTDEF(CJOP02*) information generated from SIZEIT or SIZEITTP  --
--    together with predefined parmutil and template to generates     --
--    DB2 Image copy JCL the output are stored in db2i2.genjcl        --
--    with member name PC2INC##. Where ## starting from 11            --
-- ------------------------------------------------------------------ --
LINEOBJ ddname=LINEOBJ
dummy
END_LINEOBJ
db2i2rex "COPY",
         "parmutil='jrhj.parmutil(copy2)'",
         "template='jrhj.template(copy2)'",
         "listdef=listdef(CJOP*)",
         "odsn=db2i2.genjcl(*)",
         "jobnm=pc2inc##",
         "job#=10"
-- *** End of Routine