===> CRTSRCPF FILE(YOURLIB/RPGUNIT1) RCDLEN(112) TEXT('RPGUnit - Framework.') ===> CRTSRCPF FILE(YOURLIB/RPGUNITC1) RCDLEN(112) TEXT('RPGUnit - Commands.') ===> CRTSRCPF FILE(YOURLIB/RPGUNITF1) RCDLEN(112) TEXT('RPGUnit - Test Fixtures.') ===> CRTSRCPF FILE(YOURLIB/RPGUNITT1) RCDLEN(112) TEXT('RPGUnit - Self-Test.') ===> CRTSRCPF FILE(YOURLIB/RPGUNITY1) RCDLEN(112) TEXT('RPGUnit - Prototypes.')
> cd THE/PATH/WHERE/YOU/EXTRACTED/THE/SOURCE/CODE/ARCHIVE > ftp your.iSeries.host ftp> ascii ftp> prompt ftp> cd /QSYS.LIB/YOURLIB.LIB ftp> mput *.FILE/*.MBR ftp> bye
===> CRTBNDCL PGM(QTEMP/MKMETADATA) SRCFILE(YOURLIB/RPGUNIT1) ===> CALL PGM(QTEMP/MKMETADATA) PARM(YOURLIB)
===> CRTBNDCL PGM(YOURLIB/MKRPGUNIT) SRCFILE(YOURLIB/RPGUNIT1) ===> SBMJOB CMD(CALL PGM(YOURLIB/MKRPGUNIT) PARM(YOURLIB)) JOB(MKRPGUNIT)
===> CRTBNDCL PGM(YOURLIB/MKRPGUNITT) SRCFILE(YOURLIB/RPGUNITT1)
===> SBMJOB CMD(CALL PGM(YOURLIB/MKRPGUNITT) PARM(QTEMP)) JOB(MKRPGUNITT)