All SYSMAIN functions can be performed on programming objects. Programming objects that can be maintained with SYSMAIN include the following types of Natural object: program, subprogram, subroutine, copycode, helproutine, map, local data area, global data area, parameter data area, class, text, recording, Natural command processor, dialog, function, ISPF macro, report, adapter and resource.
Programming objects are stored in the system files according to the name of the library in which they are contained: if the library begins with SYS (except for the library SYSTEM), objects are stored in the FNAT system file. In all other libraries, the objects are stored in the FUSER system file.
This section describes menu functions and selection list options provided to perform a SYSMAIN function on programming objects and the syntax that applies when using direct commands.
The Programming Objects menus contain all SYSMAIN functions required for the processing of programming objects. The fields that can be provided in a menu are described in the following table:
| Field | Explanation | ||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Recat: ON | Indicates that the profile parameter RECAT has been
set to ON: see Using Profile Parameter RECAT.
|
||||||||||||||||||
| Code |
|
||||||||||||||||||
| Sel. List |
|
||||||||||||||||||
| Name | The name of the object to be processed or a range of names: see also
Specifying a Range
of Names.
The default setting is an asterisk (*) which means that all names are selected. |
||||||||||||||||||
| New Name | The name to be given to an object when it is renamed with the rename function. | ||||||||||||||||||
| Type | The code that corresponds to the object type(s) to be processed such as
P for program and M for map: see TYPE Specification -
Programming Objects.
You can enter one or more codes
in any sequence. For example, if you enter |
||||||||||||||||||
| Set Number | The number of the retained set created with the Predict XRef save set option
of the LIST XREF command. You can apply all SYSMAIN
processing functions to the objects included in this set.
If any valid number is specified, SYSMAIN assumes a Predict set. If no number is specified, normal object processing is assumed. You can specify a library and a user ID for the Predict set by using the fields Set Library and Set User in the Additional Criteria window described in Specifying Additional Criteria. |
||||||||||||||||||
| XREF |
|
||||||||||||||||||
| Library | The name of a source or a target library.
The source library contains the object to be processed. The target library is the library to which the object is to be copied or moved, or where the object is renamed. See also Listing and Selecting Libraries. |
||||||||||||||||||
| Database | The database ID (DBID) of a source or a target database.
The source database contains the library and system file where the object to be processed is stored. The target database contains the library and system file to which the object is to be copied or moved, or where the object is renamed. Valid database IDs are |
||||||||||||||||||
| File | The file number (FNR) of a source or a target system file (FNAT or FUSER).
Valid file numbers are The source file contains the library where the object to be processed is stored. The target file contains the library to which the object is to be copied or moved, or where the object is renamed. |
||||||||||||||||||
| Replace |
|
||||||||||||||||||
| Criteria |
|
||||||||||||||||||
If the profile parameter RECAT has been set to ON at
session start, this is indicated in the Programming Objects menus and
on the Selection screens.
Using SYSMAIN functions with RECAT=ON, normal dynamic recatalog
rules apply as described in RECAT - Dynamic
Recataloging in the Parameter Reference
documentation. This means the following:
If an object exists as both a saved object and a cataloged object, neither the saved object nor the cataloged object can be processed independently.
If an object only exists as a cataloged object, you cannot perform a SYSMAIN function
that only processes cataloged objects (error message Invalid request with
dynamic recatalog appears) or select a cataloged object from a
Selection screen.
When automated processing is used, any object not satisfying these rules is ignored and processing continues with the next object.
If selective processing has been activated, a selection list of all programming objects that meet the specified selection criteria is displayed on a Selection screen.
This section describes the columns and fields contained on a Selection screen and the line commands provided to further process a programming object:
The following columns and fields are displayed on a Selection screen:
| Column/Field | Explanation |
|---|---|
| C | Input field for line commands (see below). |
| Name | The name of the programming object that meets the specified selection criteria. |
| Type | The code that corresponds to the type of object as listed in TYPE Specification - Programming Objects. |
| S/C | The object that exists for the programming object: a saved/source
(S) object and/or a cataloged (C) object.
|
| Message | The message that indicates the processing status of a programming object. For possible messages, see Status Messages. |
| Listed Library | The name of the library that contains the selected programming object(s). |
One of the following line commands can be entered in the C (Command) column of a Selection screen:
|
Line |
Function |
|---|---|
A
|
Process any object listed in the S/C
(Saved/Cataloged) column; that is, saved/source (S) objects and/or
cataloged (C) objects.
This command does not apply to the find or the list function. |
B
|
Delete the cataloged object from the Natural buffer pool. Deletion of the
specified object(s) must be confirmed by entering DELETE in a
window that appears once you have specified the object(s) and pressed
ENTER.
|
C
|
Process only the cataloged object, even if there is a corresponding saved
object. If C is specified for an object that exists
only as a saved object, an error occurs.
This command does not apply to the find or the list function. |
D
|
Only applies to a Library Selection screen (see also
Listing
and Selecting Libraries).
Display a short list of the objects contained in the specified library. The information contained in the list (name, type, source/cataloged object) is identical to the information displayed on the Selection screen shown in Selective Processing in Using Menu Functions and Commands. |
H
|
Produce a hardcopy of the saved (source) object.
The source code of the specified object is printed and displayed on the screen. |
I
|
Display directory information of an object.
This command is similar to
the system command |
L
|
Display the source code of a saved (source) object.
This command
corresponds to the system command |
| On a Library Selection screen (see also Listing and
Selecting Libraries):
Display an extended list of
the objects contained in the library. In addition to the information displayed
by using line command |
|
R
|
Display the long name of a Natural object of the type resource. |
| On a Library Selection screen (see also
Listing
and Selecting Libraries):
Verify use of external subroutines: For the library and object range specified, display the objects for which a cataloged object exists and indicate whether an object references an external subroutine. For each object that references an external subroutine, display the name of the external subroutine and the name of the cataloged object that exists for this subroutine if available. For an object of the type subroutine, the name of its equivalent alias long name is displayed. |
|
S
|
Process only the saved (source) object, even if there is a corresponding
cataloged object. If S is specified for an object
which exists only as a cataloged object, an error occurs.
This command does not apply to the find or the list function. |
| On a Library Selection screen (see also Listing and
Selecting Libraries):
List all external subroutines contained in the specified library by their alias long names and/or the short names of their equivalent cataloged objects. |
|
X
|
Only applies if Natural Connection and Entire Connection are installed.
Download saved (source) object(s) to a PC: see also Downloading Source Objects to a PC. |
Z
|
Calculate sizes: review the sizes of the saved (source) and cataloged
objects, for example, the DATSIZE, ESIZE and
MCG size.
|
The download option only applies if Natural Connection and Entire Connection are installed.
To download one or more source objects
Before you invoke SYSMAIN:
Define work files 6 and 7 as PC work files.
After session start, activate the PC connection by entering the following terminal command:
%+
(See also Enable/Disable Use of Natural Connection in the Terminal Commands documentation).
Invoke any Selection screen.
Next to the object(s) you want to download, enter the following line command:
X
and press ENTER.
A PC Download Options window similar to the example below appears:
13:23:15 ***** NATURAL SYSMAIN UTILITY ***** 2005-08-10
User SAG - Copy Selection -
COPY ALL * WITH XREF N FROM OLDLIB WHERE DBID 10 FNR 32 TO NEWLIB WHERE
DBID 10 FNR 32
C Name Type S/C Message C Name Type S/C Message
- -------- ------ --- ------------ - -------- ------ --- ------------
X SUB1 Subpgm S X SUB2 Subpgm S/C
X SUB3 Subpgm S/C X SUB4 Subpgm S
X SUB5 Subpgm S/C X SUB6 Subpgm S/C
+----------------- PC Download Options ------------------+ S/C
! Specify the relevant PC options ! S/C
! ! S
! Drive ...... C ! S/C
! Path ....... SOURCES/SUBPROGRAMS ! S/C
! Extension .. NS* ! S
! ! S
! ! S
! ! ed Library: OLDLIB
! Warning: This will overwrite any existing objects with !
! the same path, name and extension. ! Exit) _
+--------------------------------------------------------+ -PF10--PF11--PF12---
Help Menu Exit Copy Del Find List Move Ren Canc
|
In the Drive field, enter the name of the PC drive to which
you want the object(s) to be downloaded. The default setting is
C.
In the Path field, enter the name of the PC directory/subdirectory to which you want the object(s) to be downloaded (in the example above, subdirectory SUBPROGRAMS in directory SOURCES). Enter a slash (/) as the separator between a directory and subdirectory, and between subdirectories. If the specified directory/subdirectory does not exist, you will receive an appropriate error message.
In the Extension field, enter the extension of the text
file into which the source code of the object is to be loaded. If you specify
NS*, the asterisk (*) will be replaced by the specified object type
(see TYPE
Specification - Programming Objects).
For example: a subprogram with the name SUB1 will be loaded into a file with the name SUB1.NSN.
Press ENTER to download the object(s).
The following message appears in the message line: 4824:Requested
option(s) processed successfully.
Additionally, if the Message column is displayed on the
screen, the message Exported appears next to the object(s)
downloaded.
If desired, continue downloading other objects from this selection list.
The PC Download Options window will not appear again for
any further downloads from the current Selection screen. This
window only appears when the line command X is issued
for the first time after invoking a Selection screen, or
after executing the direct command SET PC.
The settings in the PC Download Options window remain active until you terminate SYSMAIN.
All cross-reference (XRef) data stored in the Predict system file can be processed with SYSMAIN. The XREF option indicates whether SYSMAIN should process XRef data. XRef data is always deleted if the delete or replace function is performed on a cataloged object.
If Predict has not been installed, set the XREF option to N and thus no
validation of Predict files is performed. If the XREF option is set to Y and
the FDIC file(s) being used is (are) not valid Predict file(s), an error message is
returned.
The rules for setting the XREF option are the same as the ones imposed by Natural Security. However, in a non-security environment there are no restrictions.
Consider the following settings for XREF:
If the XREF option is set to N, no XRef data is processed, but in
situations where a cataloged programming object is deleted or replaced, SYSMAIN deletes
the XRef data. The target Predict system file is determined according to the current
settings of the source or target FDIC system file. The default is the value assigned to
the profile parameter FDIC (see FDIC - Predict System File in the Parameter
Reference documentation) at the start of the Natural session.
If the XREF option is set to Y or F, the following actions
are applied during processing:
SYSMAIN verifies that XRef data already exists in the Predict system source file.
If the replace option is active (set to Y) and a programming object is
to be deleted from the target environment, XRef data is deleted from the Predict
system target file.
If a programming object is being copied to a new environment, the XRef data of the programming object is copied from the Predict system source file to the Predict system target file. The library name is changed accordingly and in the case of the rename function, the object name is also changed.
If the move function was requested, the XRef data of the programming object is deleted from the Predict system source file.
If the XREF option is set to F, SYSMAIN additionally checks that the
programming object (program, subroutine, subprogram, map or helproutine only) has a
Predict program entry defined on the Predict system target file. If not, processing of
the object is terminated.
If the XREF option is set to S, the special case applies where a range of
specified objects is processed with corresponding XRef data regardless of whether all of
the objects have cross-reference data or not: the objects that have cross-reference data
are processed with their cross-reference data, and the objects that have none are also
processed.
If the XREF option is set to D, SYSMAIN checks that the programming
object (program, subroutine, subprogram, map or helproutine only) has a Predict program
entry defined on the Predict system target file. If not, processing of the object is
terminated. Objects that have cross-reference data are processed with their
cross-reference data, and the objects that have none are also processed.
If any of the following inconsistencies occur during the SYSMAIN processing of XRef data, all processing for the object or function is terminated and an error message is displayed:
The value of the XREF option in Natural Security is F or
Y and you specified a value of Y or N
respectively.
The XREF option is set to F or D, and SYSMAIN finds no
documented program entry in Predict for the object being processed.
An invalid Predict file is specified.
The value of the XREF option in Natural Security is F, D
or Y and you specified a value of S.
The value of the XREF option in Natural Security is D and you
specified a value of N.
In addition to the selection criteria specified in the input fields in a Programming Object menu, you can select objects by a date/time, user ID and terminal ID that relates to their saving or cataloging.
You can also specify the user ID and the library for a Predict set. This option does not apply to the list and find functions.
For example, you can select only those objects that were cataloged on a specific day between 8:00 and 12:00 by a specific user on a specific terminal, which means that the processing of objects according to the selection criteria is based on all selected criteria as a whole, not on each condition.
To specify additional selection criteria
In the Criteria field of a Programming
Objects menu, replace N (default) by Y.
The Additional Criteria window similar to the example below appears:
15:24:55 ***** NATURAL SYSMAIN UTILITY ***** 2006-09-15
User MMO - Copy Programming Objects -
+------------------------------------------+
! --- Additional Criteria --- !
! !
! Object Type ..... PN__________________ !
! Date/Time From .. 2006-01-01 _____ !
! Date/Time To .... __________ _____ !
! User ID ......... SAG______ !
! Terminal ID ..... ________ !
! Set Library ..... ________ !
! Set User ........ ________ !
! !
Code .. ! Command ===> !
Object Name .. ! !
+------------------------------------------+ N
Source Library ... SYSTEM__ Database .... 10___ File .. 32___
Target Library ... ________ Database .... 10___ File .. 32___
Options Replace ... N + Criteria .... Y
Command ===>
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
Help Menu Exit Copy Del Find List Move Ren Fsec Fdic Fnat
|
Enter the required selection criteria. If one or more object-type codes have been entered in the Object Type field in the Additional Criteria window, the Type field in the Programming Objects menu is preset to the same object-type codes.
When you return to the Programming Objects menu, a plus sign
(+) in front of the Criteria field indicates that additional
object selection criteria have been specified; in the example above, user ID
SAG.
The plus character (+) is not displayed if only the Object Type field contains an entry since this entry already appears in the Type field in the Programming Objects menu.
This section shows the syntax that applies when performing a SYSMAIN function for programming objects by using direct commands in either online or batch mode. For general instructions on using direct commands, refer to Executing Commands.
For explanations of the keywords and variable values used in the syntax diagrams below, refer to Keywords and Variables in Direct Commands. The symbols in the syntax diagrams correspond to the syntax symbols used for system commands. These symbols are explained in System Command Syntax in the System Commands documentation.
The syntax of the where-clause and the with-clause are identical for each command.
This section covers the following topics:
|
|
|
|
|
|
|
||||||||
| name |
|
FM [LIBRARY] lib-name
|
|
[where-clause] | |||||||||
TO
[LIBRARY]
|
lib-name [where-clause] [with-clause] | ||||||||||||
COPY PROG1 FM TESTORD TO ORDERS DBID 1 FNR 6 REP
C PGM* WITH REP TYPE PNS FM PRODLIB TO TESTLIB
M PROG1 FM OLDLIB TO NEWLIB
MOVE STOWED * TO NEWLIB WHERE DBID 100 FNR 160 FMDATE 2007-01-01 FM OLDLIB WITH XREF Y
DELETE
|
|
|
|
|
name |
|
IN [LIBRARY] lib-name
|
|
[where-clause] | [with-clause] |
DELETE C M> IN LIB ORDERS
D * IN TESTLIB DBID 1 FNR 5 NAME SYSNAT
D SA * IN LIBTEST TYPE GLA
D * TYPE PM IN TESTORD FMDATE 2007-01-01 TODATE 2007-04-30
|
|
|
|
|
|
|
name |
|
IN [LIBRARY] lib-name
|
|
[where-clause] | [with-clause] |
Note:
The direct command LISTLIB is only available in batch
mode and is used to obtain a list of library names.
FIND SAVED MENU IN TESTLIB
FIND STOWED MAINMENU IN SYS* WHERE DBID 1 FNR 5
F ALL PROG2 IN PROD* FNR 27 DBID 1
LIST * IN TESTLIB
LIST DT* IN TESTLIB
L SAVED TEST* IN TESTLIB TYPE PNS FNR 6
L SA TEST* TYPE PM IN TESTLIB FNR 6 DBID 2 FMDATE 2007-01-01
LISTLIB ALL MENU IN SYS* DBID 10 FNR 44
RENAME
|
|
|
|
|
|||||||
name AS
new-name [with-clause]
|
|||||||||||
|
|
FM [LIBRARY] lib-name
|
|
[where-clause] | ||||||||
|
|
TO [LIBRARY] lib-name
|
[where-clause] |
|
||||||||
RENAME PGM1 AS PROG1 FM TESTLIB
R PGM1 AS PROG1 FM TESTLIB DBID 1 FNR 5 TO PRODLIB DBID 2 FNR 6
R PGM* TYPE PS RCOP FM TESTLIB TO PRODLIB
[WHERE] [DBID
dbid] [FNR
fnr] [NAME
vsam-name] [CIPHER
cipher]
|
|||||||||||||||||||
|
|
|
|
|
password |
|
||||||||||||||
[DIC (dbid,fnr,password,cipher)]
|
|||||||||||||||||||
[SEC (dbid,fnr,password,cipher)]
|
|||||||||||||||||||
Commas must be used as separators between the values following the DIC and
SEC keywords, or if a value is missing. For example: DIC
(10,,secret,2a).
If the session parameter ID (see ID - Input Delimiter Character in
the Parameter Reference documentation) has been set to a comma, use
a slash (/) as the separator between values.
[WITH]
|
[TYPE
type]
|
[FMDATE
date-from]
|
[TODATE
date-to]
|
[FMTIME
time-from]
|
||||||
[TOTIME
time-to]
|
[USER
user-id]
|
[TID
terminal-id]
|
[XREF
xref] [HELP]
|
|||||||
[REPLACE]
|
[RCOP]
|
[EXTEND]
|
|
|
|
|
||||
[SETUSER
set-user]
|
[SETNO
set-number]
|
[SETLIBRARY
set-library]
|
||||||||
