This section provides examples for using Object Handler direct commands.
Tip
For additional examples, you can view the command generated for an Object Handler
function. This command is automatically displayed when you use a wizard. In advanced-user
mode, you can activate the display of the command by either entering the Object Handler
command SET ADVANCEDCMD ON
or setting the parameter
Display-Cmd-in-Advanced-Mode
to Y
(Yes) in the Object
Handler profile (see also Profile
Settings).
This section contains examples of how to unload objects in internal format to a work file in order to load them on the same platform, within either a local mainframe, UNIX or Windows environment:
Unload all Natural programming objects (source objects only) from library
ABC
:
UNLOAD * LIB ABC OBJTYPE N SCKIND S
Unload all Natural programming objects (cataloged objects only) from library
ABC
:
UNLOAD * LIB ABC OBJTYPE N SCKIND C
Unload all Natural programming objects (cataloged objects and source objects) from
library ABC
:
UNLOAD * LIB ABC OBJTYPE N SCKIND A
Unload all Natural programming objects (source objects only) from library ABC with date 2019-10-01 as the catalog date (if both source and cataloged object exist) and the source date (if only a source object exists):
UNLOAD * LIB ABC OBJTYPE N SCKIND S DATE 2019-10-01 DATECHECK C
Unload all Natural programming objects (source objects only) from library
ABC
to load in library ABCNEW
:
UNLOAD * LIB ABC OBJTYPE N SCKIND S WITH NEWLIBRARY ABCNEW
On a mainframe: Unload all DDMs whose names start with EMP
and which
point to database 88
:
UNLOAD EMP* LIB * OBJTYPE D DDMDBID 88
On UNIX or Windows: Unload all DDMs whose names start with EMP
and which
point to database 88
:
UNLOAD EMP* LIB * OBJTYPE N NATTYPE V DDMDBID 88
On UNIX or Windows: Unload all DDMs whose names start with EMP
from
library VLIB
to load in library VLIBNEW
:
UNLOAD EMP* LIB VLIB OBJTYPE N NATTYPE V WITH NEWLIBRARY VLIBNEW
Unload all user-defined error messages from library ERRLIB
to load in
library NEWERR
:
UNLOAD * LIB ERRLIB OBJTYPE E SLKIND A WITH NEWLIBRARY NEWERR
On Windows: Unload all Natural programming objects (cataloged objects and source
objects) from library ABC
to a portable work file on a PC:
UNLOAD * LIB ABC OBJTYPE N WHERE WORKFILE C:\WF1.SAG WORKFILETYPE PORTABLE
or
UNLOAD * LIB ABC OBJTYPE N WHERE WORK C:\WF1.SAG WFT P
This section contains command examples of how to unload objects in Transfer format to a work file in order to load them on a different platform such as unloading in a mainframe and loading in a UNIX or a Windows environment.
Unload all Natural programming objects (source objects only) from library
ABC
:
UNLOAD * LIB ABC OBJTYPE N WHERE TRANSFER
Unload all Natural programming objects (source objects only) and user-defined error
messages from library ABC
:
UNLOAD * LIB ABC WHERE TRANSFER
Unload all Natural programming objects (source objects only) from library
ABC
with fixed record length:
UNLOAD * LIB ABC OBJTYPE N WHERE TRANSFER FIXEDLENGTH
This section contains command examples of how to load objects from a work file in internal format.
Load all objects to library LIBNEW
and replace any that already exist:
LOADALL WITH NEWL LIBNEW WHERE REPLACE ALL
Load all object with target library TGTLIB
to the new target library
NEWTGT
:
LOAD * LIB TGTLIB WITH NEWLIBRARY NEWTGT
Load the user-defined error messages 1000
to 1500
from
library ERRLIB
only:
LOAD * LIB ERRLIB OBJTYPE E FMNUM 1000 TONUM 1500
This section contains command examples of how to load objects from a work file in Transfer format.
Load all objects to library LIBNEW
and replace any that already exist:
LOADALL WITH NEWL LIBNEW WHERE TRANSFER REPLACE ALL
Load all object with target library TGTLIB
to new target library
NEWTGT
:
LOAD * LIB TGTLIB WITH NEWLIBRARY NEWTGT WHERE TRANSFER