1. CRTLIB LIB(NARGSBATS) TEXT('bats test suite for named arguments') AUT(*LIBCRTAUT)
Library NARGSBATS created.
2. batsinstal nargsbats
Object BATSINFO type *FILE created in BATS library NARGSBATS.
Object Q5ATSTMD type *FILE created in BATS library NARGSBATS.
Object Q5ATSTFN type *FILE created in BATS library NARGSBATS.
Object MSGDATA type *FILE created in BATS library NARGSBATS.
Object PARSOUT type *FILE created in BATS library NARGSBATS.
Object DEMOSRC type *FILE created in BATS library NARGSBATS.
Printer device PRT01 not found. Output queue changed to QPRINT in library QGPL.
Object Q5ACMPNT type *FILE created in BATS library NARGSBATS.
Printer device PRT01 not found. Output queue changed to QPRINT in library QGPL.
Object Q5ASBCLS type *FILE created in BATS library NARGSBATS.
Printer device PRT01 not found. Output queue changed to QPRINT in library QGPL.
Object Q5AMODUL type *FILE created in BATS library NARGSBATS.
Printer device PRT01 not found. Output queue changed to QPRINT in library QGPL.
Object Q5AFUNCT type *FILE created in BATS library NARGSBATS.
Object SUBSYS type *FILE created in BATS library NARGSBATS.
Installation of required BATS objects in library NARGSBATS was successful.
3. write cases
1) CRTSRCPF FILE(NARGSBATS/TESTS) TEXT('a source phsical file for named arguments'''' tests')
File TESTS created in library NARGSBATS.
2) ADDPFM FILE(NARGSBATS/TESTS) MBR(L5VSBCL01) TEXT('test DSPFFD on system catalogs')
Member L5VSBCL01 added to file TESTS in NARGSBATS. 3) wm nargsbats/tests
4. run and prime a case
1) addlible nargsbats
2) strbats => 进入的是curlib的suite, for example current lib is nargsbats, then if you want to start hptbats, you need to use "chgcurlib hptbats", and excute strbats. Then you will work with hptbats suite.
3) F6 add case
After add test case, you can use F5 to refresh the list and get the newest information:
And you also can find this case in FATT:
You can use to get case from remote server, and use to upload the case to the server. You also can right-click case item and choose “Edit” to change case.
CRTJOBD JOBD(NARGSBATS/NARGSJOBD) TEXT('JOBD FOR NAMED ARGUMENTS') ENDSEV (50) INQMSGRPY(*SYSRPYL)
Job queue QBATCH found in library QGPL.
Job description NARGSJOBD created in library NARGSBATS.
BCHJOB JOB(L5VSBCL01) JOBD(NARGSBATS/NARGSJOBD) JOBQ(*JOBD) OUTQ (*JOBD) INQMSGRPY(*SYSRPYL)