The Retrieve Binder Source (RTVBNDSRC) command can automatically create a binder language source file. It retrieves the exports from a module, or a set of modules. It generates the binder language for these exports, and places exports and binder language in a specified file member. This file member can later be used as input to the EXPORT parameter of the Create Service Program (CRTSRVPGM) command.
The syntax for the RTVBNDSRC command is:
RTVBNDSRC MODULE(MYLIB/SEARCH) SRCFILE(MYLIB/QSRVSRC) SRCMBR(*DFT) MBROPT(*REPLACE)
For detailed information on the RTVBNDSRC command and its parameters enter RTVBNDSRC on a command line and press F1 for Help.
The following example shows how to create a binder language source file for module SEARCH, located in library MYLIB, using the RTVBNDSRC command. The source code for module SEARCH is shown in Source Code Files.
RTVBNDSRC MODULE(MYLIB/SEARCH) SRCFILE(MYLIB/QSRVSRC) SRCMBR(ONE)
This command automatically:
Member ONE in file MYLIB/QSRVSRC now contains the following binder language:
Figure 12. Binder Language Source File Generated for Module SEARCH
+--------------------------------------------------------------------------------+ | Columns . . . : 1 71 Browse MYLIB/QSRVSRC | | SEU==> ONE | | FMT ** ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 | | *************** Beginning of data ************************************ | |0000.01 STRPGMEXP PGMLVL(*CURRENT) | |0000.02 /*********************************************************************/ | |0000.03 /* *MODULE SEARCH MYLIB 95/06/10 17:34:41 */ | |0000.04 /*********************************************************************/ | |0000.05 EXPORT SYMBOL("__ct__6SearchFPc") | |0000.06 EXPORT SYMBOL("__ct__6SearchFPUc") | |0000.07 EXPORT SYMBOL("__ct__6SearchFPUci") | |0000.08 ENDPGMEXP | | ****************** End of data **************************************** | | | +--------------------------------------------------------------------------------+ |
(C) Copyright IBM Corporation 1992, 2005. All Rights Reserved.