Natural

1
Natural NSC Admin.
FNAT
FSEC
FUSER
Logging
Backups
Monitoring
Securing
SYSPARM
Customizing
2
Overview
Parm sets
NSC
Online Driver
BP
NTPRM
N
Shared Nucleus
SYSPARM
SYSPARM
Batch Driver
System FIles
Batch Nucleus
BP
3
The system files
The basic, required system files. These can be
the same physical file, but is not recommended.
FNAT Software AG modules. Fuser Customer
application modules.
FNAT
FUSER
Optional system files for Nat-Security, Predict,
etc.
FSEC
FDIC
Scratch Pad
Most commonly kept on ADABAS, but can be various
file types, depending on your platform Operating
System and database choice.
4
The system files

• INPL

SYSUPD NE414I4 Text Src Loaded
SYSTEM INTSEC Program Cat Loaded
SYSLIBS NSCUS Subprogram Cat Replaced
SYSSEC NSCUS Subprogram Cat Replaced
SYSSEC NSCLOGUT Program Cat Replaced
SYSLIB LOGONUS Program Cat Replaced
SYSTEM NSCC0002 Subprogram Cat Replaced
Look at the output of the INPL. You may see
secret libraries and features. Do you know
what SYSUPD is? Did you know SYSTEM is on both
FUSER and FNAT?
5
The system files

• INPL (continued)

Do you know the difference between these INPL
methods? //NATINPL EXEC NAT414BA,PARMSTACKI
NPL vs //CMSYNIN DD INPL
The first one does not need an existing Natural
FNAT, because INPL is a nucleus component. The
second must start a Natural session, which
requires at least a basic Natural FNAT loaded.
6
System Files

• Example Configuration

Experimental
Development QA
Production
New version FNAT (shared)
FNAT (Shared)
FSEC
FSEC 1
FSEC
FSEC 2
FUSER
FUSER
FNAT
FNAT
FNAT
Single FNAT possible 3009 issues upgrade steps
is difficult. Also 1 SYSPARM for all
environments.
FNAT (non NSC)
Multiple FNAT Allows flexibility, but is tough
keeping profiles, patches various products in
sync.
7
The Natural nucleus
The Nucleus contains the basic logic components
needed for a Natural session. It can be
customized to the needs of the customers
session(s) . For example, it can include or
exclude the editors. Some typical components are
NATADA interface to ADABAS NATEDT NATEDIT
Natural editor SAG editor NAT3270 Screen I/O
handler NATPARM default session
parameters NATRPC Remote Procedure Calls NATWTO
Write to Operator NATARI2 Arithmetic
handler NATWKFO Workfile handler
8
The Natural nucleus

• The Drivers

The Drivers contain the basic logic components
needed for the environment-specific requests,
like program management, and memory management.
For example, some typical CICS components (within
NCISTART) are
NCIPARM Contains names of threads control
blocks, and 3270 options. CMABEND abend
handler. NCIPCRQ Program Control LINK, XCTL,
LOAD, etc. non-Natural programs. NCISCRQ Storage
Requests GETMAIN, FREEMAIN, etc. CMSUBM submit
jobs to batch processing
You have the source to the driver modules. You
may customize them if needed. I prefer using the
RDC exits for site specific requirements.
9
The Natural nucleus

• What does Natural look like?
• (Configurations Option 1)

TP-Specific Drivers
Shared Nucleus Modules.
Optional parms
Batch Drivers
Optional Parms
Small driver modules share a common base
nucleus module. Can be loaded into shared memory,
or individually into each address space (batch
job or TP monitor).
10
The Natural nucleus

• What does Natural look like?
• (Configurations Option 2)

Batch Drivers Base Nucleus
TP-Specific Drivers Base Nucleus
Optional parms
Optional Parms
Optional, Specific Nuclei for special
requirements e.g. servers.
Here you can see each nucleus is bigger, and each
contains all components necessary to run Natural,
rather than sharing a common base nucleus.
11
The Natural nucleus

• What does Natural look like?
• (The sessions within)

Nucleus Could be from shared memory outside of TP
monitor
TP Monitor
User sessions
Natural Nucleus
Natural UCB (SCPCB)
TP Natural Driver
Threads
12
The Natural nucleus

• What does Natural look like?
• (The sessions within)

Nucleus Could be from shared memory outside of TP
monitor
Has unique USER
standard Batch job
User session
Natural Nucleus
Thread
Batch Natural Driver
13
The Natural nucleus

• What does Natural look like?
• (The sessions within)

Nucleus Could be from shared memory outside of TP
monitor
Batch Server
Has many USER values
User session
User session
Natural Nucleus
User session
Separate TCBs Each a Single session
Batch Natural Driver
User session
User session
14
The Natural nucleus

• Language Environment

Z/OS
TP monitor, or Batch address space
Non Nat
Lang. Env.
Nat
Non Nat
15
The Natural nucleus

• Language Environment

LE370ON Or, setup LE environment via CALL
from Natural program Compile RENT/REUS, remove
NCAL Link/bind with LEASM parm LE Maclib in
SYSLIB. SCEELKED in SYSLIB of final
link DELETEON/OFF what impact does this
have? Main module or sub-module what impact
does this have? PARMPOSIX(ON),TRAP(OFF)/natparm
s SET CONTROL PL or PLS CLER transaction
in CICS
16
The Natural nucleus

• Language Environment

CLER
WTRM WTRMCICS

Language Environment
Region Level Runtime Options



Type in your Choices.


Runtime option Choice
Possible choices.



TRAP gt ON ON, OFF
RPTOPTS
gt OFF ON, OFF
RPTSTG gt OFF
ON, OFF
ALL31 gt ON ON, OFF
CBLPSHPOP gt
ON ON, OFF
TERMTHDACT gt TRACE
QUIET,MSG,TRACE,DUMP,UAONLY,UATRACE,UADUMP,UAIMM



When finished, press ENTER.





PF1Help 3Quit 5Current Settings
9Error List
17
The Natural nucleus

• Language Environment

You can also directly invoke LE services from
Natural (Courtesy of SAG support in
Denver) DEFINE DATALOCAL1 DSARPL2 SEED (B4)2
RANDNUM (B4)2 DSAFDBK (B12) / LE FEEDBACK
CODE2 REDEFINE DSAFDBK3 DSASVCD (I2) /
SEVERITY CODE3 DSAMSGNO (I2) / MESSAGE NUMBER3
DSACSC (A1)3 DSAFACID (A3) / LE FACILITY ID1
DSALEMSG (A8) / LE MESSAGE1 REDEFINE DSALEMSG2
MSGPFX (A3) / MESSAGE PREFIX2 MSGNBR (N4) /
MESSAGE NUMBER2 MSGSFX (A1) / MESSAGE SUFFIX1
MSGSVTY (A5) INIT ''IWESC'' / SEVERITY
MNEMONICS1 REDEFINE MSGSVTY2 MSGSVCD (A1/5)1 I
(P3)END-DEFINE
ALL ''CEERANC0'' SEED RANDNUM DSAFDBKIF DSAFDBK
NE H''00''DOMSGPFX DSAFACIDMSGNBR
DSAMSGNOMSGSFX MSGSVCD (DSASVCD)DOENDWRITE
NOTITLE PROGRAM 4X DSAFDBK 2X DSALEMSG 2X SEED
RANDNUMEND
18
The Natural nucleus

• Language Environment

You can pass LE run-time options by providing
the region-specific run-time options load module
CEEROPT in your STEPLIB concatenation. In
addition, the LE library routine retention
initialization routine CEELRRIN must be present
on the PREINIT list of your region JCL. The
following is a sample definition of a CEEROPT
load module that allows the execution of
AMODE(24) subprograms CEEROPT CSECT CEEROPT
AMODE ANY CEEROPT RMODE ANY CEEXOPT
ALL31((OFF),OVR), X STACK((128K,128K,BELOW,KEEP,
512K,128K),OVR) END CEEROPT
This is how I turned TRAP(OFF) for our CICS
regions.
19
The Natural nucleus

• Extending functionality

Linking components to the Nucleus (CEERN0,
LPARINFO, etc.). C/C, COBOL, etc. (L.E.
languages) NATPARM CSTATIC subparameter L.E.
considerations (RENT, NCAL, etc). Assembler
370 NATPARM CSTATIC subparameter Natural (via
ULDOBJ in lib SYSMISC) NATCONFIG NTSTAT
parameter defines it. Still accessed via
PERFORM, CALLNAT, etc.
20
The Natural nucleus

• CICS additional components

Roll Server (optional)
CICS Driver Nucleus
Swap pool
Threads
NEP
SCB
For Coupling LPARS Too.
Threads are where each user session executes.
The thread may swap to alternate memory when
inactive, then later roll out. The SCB keeps
track of sessions. The NEP is the error recovery
program for CICS sessions.
21
Buffer Pools
3). Global defined as backup 2
BPPROP
2). Local (default) defined as backup 1
Natural Drivers Nucli
Natural BP 1). Global (optional) defined as
default.
Editor BP (optional)
Sort BP (optional)
MON BP (optional)
A Global BP may be shared by all Natural (batch
online). You may define other BPs (up to 9 )
as backups. What are the disadvantages of
a local BP over a local one? Do you know the
purpose of each of the special BPs (edit, sort
and MON)?
22
Buffer Pools
3). Global defined as backup 2
2). Local (default) defined as backup 1
BPPROP
Natural BP 1). Global (optional) defined as
default.
At startup, if the first BP cannot be located it
will use the next definition. With multiple GBP,
you may automatically propagate (BPPROP) the
delete/refresh commands. A Natural session may
specify which BP it wishes to use with the BPNAME
parameter ( local blank). Limiting a BPs use
(e.g. for servers only) means shorter search
chains, and they may be maintained without impact
to other unrelated applications. Larger BPs tend
to load once and keep the modules but this may
be accomplished with RESIDENT lists, if you know
the modules usage is high.
23
Buffer Pools
USR0340P USR0340N Natural Buffer Pool
Interface 0340 USR0341P USR0341N Natural
Buffer Pool Interface 0341 USR4340P USR4340N
Natural Buffer Pool Interface 4340
There are several Natural API programs in library
SYSEXT to help you. You may force a deletion of
modules that have been previously marked for
deletion and which have been unused for 30
minutes. (garbage collection). You may list the
contents of the BP, or just get counts, or issue
delete requests, or mark/unmark objects for
residency. You may get the general (overall) BP
statistics.
24
Session Parameters

• Order of precedence

Nucleus NATPARM module any optional SYS
specified. Startup program may pass session
parameters. E.G. CICS Current Trans-ID , 4
bytes Address of dynamic parm string, 4
bytes Length of parm string, 4 bytes Natural
transaction ID, 4 bytes Backend Program, 8
bytes SYSPARMs (from FNAT) Natural Security
Parameters (within library) Globals (within
library) Format (within programs)
25
Session Parameters

• SYSPARM

1). Defined through online screens instead of
assembling NTPRM. 2). Stored on FNAT. (and yet
may contain an FNAT parameter) Key field is
LO(A9). Contains left parenthesis profile
name. Parameter string is LK(A80). 3). A
profile may reference another profile (Careful
dont do Recursion). 4). Profile types
AutoINIT-USER TerminalTerminal-ID,
ProgramINIT-PROGRAM any other name is valid
also. 5) Is loaded after sessions starts, but
before LOGONEXn.
26
Natural NSC Admin.

• Session Parms

My front-end program takes the following values
as keys for SYSPARM profiles and combines them
into a single parameter for the session. The
Environment (Development/QA/Production) The CICS
transaction ID for the target Natural
session. The Name of the destination Natural
library. The name of the user (their individual
profile) If authorized, dynamic parameters for
the user. This allows optimal buffer usage by
having very specific values, depending on the
users needs and location.
27
Natural NSC Admin.

• SYSPARM

SYSPARM does not keep track of maintenance to
parms. It would be nice to know who changed the
parms and when, and also to have a comment area
to describe what changed and why. Since the
parameters are stored on FNAT, you may write your
own programs to provide such additional
information . I also wrote a program called
PARMSCAN that allows me to scan all SYSPARM
profiles for a string, so I can find all the
places that may be in need of maintenance. Startin
g with Natural 4, you may place comments into the
parameter text. Use / to start a comment. Use
/ to terminate it.
28
Natural NSC Admin.

• SYSPARM

144822 NATURAL SYSPARM
UTILITY 10/05/2006 gt
RPC(SERVERON,SRVNODE'134.123.4.561971TCP',SRV
NAMECICS,AUTOON, lt gt SRVUSERSTARGATE,TRAN
SP(ACI,TCP),MAXBUFF280,TRACE0,RPCSIZE296,
lt gt ACIVERS6,NTASKS1),RCA(BROKER),RCALIAS(
BROKER,NATETB23),ETID'''',MAI lt gt
NPR10,PRINT((10),AMESS,DESTEXRPCICS,FORMSTRAC
),WORK((10),AMCICS,D lt gt ESTEXRPCICS,DISP(NE
W,KEEP),OPENACC),ADAMODE0,UDB35,
lt gt WORK((1),AMCICS,DESTDARSEX01,DISP(NEW,
KEEP),OPENACC), lt gt
WORK((2),AMCICS,DESTDARWEX01,DISP(NEW,KEEP),OP
ENACC), lt gt / Original version
of NT2X. Saved here as backup /
lt
29
Monitoring/Logging
Remote Data Collectors (Natural Assembler
language exits). Database calls, Page I/O,
Errors, Prog. Load/Start/stop, CALLs 3rd party
vendor (SYSVIEW) RDCSIZE session
Parameter SYSTP Threads, Swap pools, Roll
servers, User sessions. SYSMON (online and
batch) Terminals or programs.
30
Monitoring/Logging

• RDC EXITS

R D C
Database
Natural
Reports
Modules (load, start stop)
User Exits
Errors
RDC Buffer
Log
31
Monitoring/Logging
122003 NATURAL SYSTP UTILITY
2006-10-03 User DMDSAC
- Main Menu - TID
T004


Code
Function


E Environment-Dependent Functions
M Natural
Monitoring (SYSMON)
F Natural Print/Work Files
(SYSFILE)
S Natural Swap Information
B Buffer Usage
Statistics (BUS)
R Natural Subsystems and Roll
Server Information T
Natural Thread Usage Statistics
? Help

. Exit


Code ..
32
Monitoring/Logging

• SYSMON

The NATURAL Monitor also can be used within Batch
applications. The administration
is realized by corresponding callnats and
programs, which must be activated by user
written programs

Activate
NATURAL Monitor SMNACT01


Deactivate NATURAL Monitor SMNDEA01


To print the statistics the program
SMPBAT01 has to be called.



You will find examples within the library SYSTP


SMPEXACT - usage of callnat and
returncodes for activation
SMPEXDEA - usage of callnat and returncodes
for deactivation SMPEXPRI -
usage of starting printout for statistical data
Set MONSIZE for monitoring buffer.
33
Monitoring/Logging

• SYSMON

The NATURAL Monitor is currently activated



Code Function


D Deactivate Monitor

T
Display Monitor Terminal Statistics
P Display Monitor Program
Statistics

? Help
. Exit



Code .. _ Name of LTERM or
Program .. ________
Name of Library ........... ________
34
Monitoring/Logging

• SYSMON

LPFEXPRI What is this thing?
DEFINE DATA LOCAL 1
PVALA (A24/20) 1
REDEFINE PVALA 2
PVALB (B24/20) 1 CO
(P2) END-DEFINE
COMPRESS '/STA L'
H'2786' INTO PVALA(1) COMPRESS '/STA P'
H'2786' INTO PVALA(10) COMPRESS '/FS ,R'
H'2786' INTO PVALA(17) CALLNAT 'LPFSUP01'
PVALA() INPUT 'USER-DEFINED-KEYS
LOADED' END
35
Monitoring/Logging

• SYSMON

SMPEXPRI
Name Library NAT- ADA- Ext- Mean-
Input/Output User Sys
time time time time No KB Acc
Acc ------------------------------------------
---------------------------------- SMMMEN01
SYSTP 0 0 0 0.0 2 3
2 0 S2MRAHM1 SYSTP 0 0
0 0.0 0 0 0 0
S2SCOM01 SYSTP 0 0 0 0.0 0
0 0 0 SMPMEN01 SYSTP 0
0 0 0.0 1 0 1
6 STPMNU1P SYSTP 0 0 0
0.0 1 0 5 6 STPMMM1M SYSTP
0 0 0 0.0 2 3
2 0 SYSMAP0M SYSTP 0 0 0
0.0 0 0 0 0 MENU
SYSTP 0 0 0 0.0 0 0
1 3 STPGDA SYSTP 0 0
0 0.0 0 0 0 0
SYSTP SYSTP 0 0 0 0.0 0
0 3 5 SYSSUBSU SYSTP 0
0 0 0.0 0 0 1
3 NSCA0003 SYSTP 0 0 0
0.0 0 0 1 4 NSCC0002 SYSTP
0 0 0 0.0 0 0
5 4 SECUA SYSTP 0 0 0
0.0 0 0 12 0 NAT00029
SYSTP 0 0 0 0.0 0 0
0 0 S2SCENT1 SYSTP 0 0
0 0.0 0 0 0 0
SMPEXPRI SYSTP 0 0 0 0.0 0
0 1 2 SMPBAT01 SYSTP 0
0 0 0.0 0 0 0
4
36
Configuring

• Library design

Application library
STEPLIB (?)
Alternate DB FNR (Test, Cert, QA, Prod)
NSC steplib chain
Alternate DB FNR (Test, Cert, QA, Prod)
SYSTEM
37
Exits

• Sort

NATSREX2 When Natural passes a record to
SORT. NATSREX3 When Natural retrieves a record
from SORT. Example source (assembler) is
delivered with Natural. Once they are linked as
part of the nucleus, they are automatically
activated. The NTSORT macro in the NATPARM
module. WRKSIZE10,STORAGEMAIN,EXTOFF,EXTNAMEso
rt,EXTEOJOFF system function
SORTKEY(character-string) to convert "incorrectly
sorted" characters (or combinations of
characters) into other characters (or
combinations of characters) that are "correctly
sorted alphabetically by the sort program or
database system.
38
Exits/APIs

• Natural Security

Example programs
List NSC errs PGMXRIER PGMXRUSE
PGMXR007 List obj. alpha PGMXR001 Xref info
PGMXR002 PGMXR003 PGMXR004 PGMXR005 Logon
records PGMXR006 PGMXR008 PGMXR009
PGMXR010 PGMXR011 PGMXR012 PGMXR013 Trans
obj id/name PGMXR014 PGMXR016 Find orphan
libs PGMXR015
Pswd maint PGM----P PGM---SP PGM---P Use
cmds? PGM---CS PGMDA-C Ck. Linked?
PGM---L Ck. Obj? PGMCHCK Disp prof
PGMDA PGMDA-P PGMDA-S PGMDU
Spl. Lnk PGMDAU PGMDAUC PGMDAUP PGMDAUS
NSC known PGMDEF File maint PGMFI001 Lib
maint PGMLI001 PGMLI002 PGMLI003
PGMLI004 PGMLI005
Mailbox maint PGMMA001 PGMMA002 Ext. obj.
maint PGMOB001 PGMOB002 User def maint
PGMUS001 PGMUS002 PGMUS003
PGMUS004 User/lib/util maint PGMUT001
39
Exits

• Natural Security

Files NSCFIEX1 Libraries NSCLIEX1 Ext.
Objects NSCOBEX1 NSCOBEX2 Users NSCUSEX1
Example Exit EXIT EXITMAP NSC logon map
LOGONM1 NSC mailbox MAILEX MAILEX1
MAILMAP1 MAILMAP2 At LOGON LOGONEX1
LOGONEX2 LOGONEX3 LOGONEX4 LOGONM1 RPC
logons LOGON001
CALLNAT 'NAT00029' CALLNAT 'NSCUTX0P'
CALLNAT 'NAT00030' Utility Library Info
_ ________ ________
_______________________ _ NATUNLD ltothersgt
Some functions allowed _ SYSDDM ltothersgt
Some functions allowed _ SYSMAIN ltothersgt
Some functions allowed _ SYSOBJH ltothersgt
Some functions allowed _ SYSTRANS EXXCIS All
functions allowed _ ltothersgt All
functions allowed
Nat. PROFILE APROFILE NSC extentions
CUSTOM1 CUSTOM2 CUSTOM3 CUSTOM4
CUSTOM5 Exmpl ERROR-TA ERROR MAP-ERR0
MAP-ERR1
40
Exits

• Natural Security

134042 NATURAL SECURITY
2006-10-12
- Application Interfaces -
FSEC (25,177)
Co
Example Subprogram Function
__ ________ __________
__________________________________________________
______ __ PGM----P NSC----P Verify and change
password __ PGM---L
NSC---L Check if LOGON to a library is
allowed __ PGM---P NSC---P
Verify password
__ PGM---SP NSC---SP Check NSC password
__ PGMCHCK
NSCCHCK Check if access to external objects is
allowed __ PGMDA NSCDA Display
library profile
__ PGMDA-C NSCDA-C Display command and
editor restrictions of a library __ PGMDA-P
NSCDA-P Display security profile of a library
__ PGMDA-S NSCDA-S Display
statement restrictions of a library
__ PGMDAU NSCDAU Display special link
profile __ PGMDAUC
NSCDAUC Display command and editor
restrictions of special link __ PGMDAUP NSCDAUP
Display security profile of a special link
__ PGMDAUS NSCDAUS Display
statement restrictions of a special link
__ PGMDEF NSCDEF Check if an object is
defined to Natural Security __ PGMDU
NSCDU Display security profile of a user
41
Utilities
Driving Utilities from batch jobs SYSADA SYSUNL
D/SYSOBJH SYSBPM SYSMAIN SYSERR SYSPARM SYSSE
C SYSTP SYSUPD
42
Utilities
Some have command interfaces, so it is easier.
SYSOBJH
SYSOBJH142454 Natural
Object Handler 10/10/200 User
DMDSAC - Main Menu -


Select the desired function


-----------------------
Command Line ----------------------- onment
!
! ! The command
line can be used to enter internal commands or !
! external (Natural) commands.
! !

! ! External commands have
to be preceded by '//'. !
! Any external command stops the Object
Handler utility. ! !

! ! To invoke the commands menu,
enter the command 'COMMAND'. ! !

! !
!
Ma -------------------------------------------
-----------------

_ Advanced user




Command gt ?
43
Utilities
SYSOBJH
142730 Natural Object
Handler User DMDSAC
- Commands -

Select a command group


_ GO Navigation commands

_
SET Internal settings

_ SHOW
Display commands

_ Others Different
Object Handler commands

_ HELP Object Handler help
information









Command gt
44
Utilities
SYSOBJH
142807 Natural Object
Handler 10/10/200 User DMDSAC
- GO Commands -


Current command GO


Select a GO command


_ HOME Go to the main
menu
_ UNLOAD Go to the unload function
_ LOAD Go to
the load function
_ SCAN Go to the scan function
_ RESTART
Go to the restart load function
_ ADMIN Go to the
administration functions
_ VIEW Go to the view function
_ FIND
Go to the find function









Command gt
45
Utilities
SYSOBJH. The Wizard will help you build the
command(s).
143014 Natural Object
Handler 10/10/2006 User DMDSAC
- Unload Wizard -


The following command will be processed.
To change the
settings, press PF7 (Back). To confirm the
settings and to execute the command,
press ENTER or PF8 (Next).

UNLOAD LIB
XDMD OBJTYPE NE FMNUM 1 TONUM 9999 WHERE REPORT
TRANSFER


















Please press PF7 (Back)
or ENTER/PF8 (Next).
Command gt
46
Utilities
Feeding data to Batch Utilities Option 1 By
Forms mode (F)
Logon accepted to library XDMD. CF F
NEXT TSTINPUT A
B
DATA ITS AN A BE B Page 1
A ITS AN A B BE B
Program TSTINPUT RESET A (A10) B (A5)
INPUT A / B WRITE 'A' A / 'B' B
END
Data must match the form exactly, line by line,
field by field. Use commas and new lines to
compensate for form fields. (ugh).
47
Utilities
Feeding data to Batch Utilities Option 2 By
keyword (variable name)
Logon accepted to library XDMD. CF D
NEXT TSTINPUT
A B
DATA BBE B,AITS AN A
Page 1 A ITS AN A
B BE B
Program TSTINPUT RESET A (A10) B (A5)
INPUT A / B WRITE 'A' A / 'B' B
END
Okay, but what variables did Software AG use in
the utility modules? How do I know what to put
for the keywords?
48
Utilities
Feeding data to Batch Utilities By keyword
(Header name)
RESET A (A10) B (A5) INPUT A A /
B B WRITE 'A' A / 'B' B END
Logon accepted to library XDMD. CF D
NEXT TSTINPUT
A B
DATA BBE B,AITS AN A
Page 1 A ITS AN A
B BE B
Okay, but what if the headers are Name . . . .
Street . . . .
49
Utilities
Feeding data to Batch Utilities By keyword
(Header name, cont.)
Logon accepted to library XDMD. CF D
NEXT TSTINPUT
A B
DATA BBE B,AITS AN A
Page 1 A ITS AN A
B BE B
RESET A (A10) B (A5) INPUT A A /
B B WRITE 'A' A / 'B' B END
Natural ignores the special characters after the
field title and uses the unique value to the left
of the variale.
50
Utilities
Still having trouble feeding in data? Try using
recordings.
Blib-name Sets destination library for
recording to be saved. Brecording-name Sets name
of member for saved recording. Do your
activity. B Deactivates recording mode
(and saves recording). Then in batch job just do
Arecording-name For example, See next
slide. Beware the Blibrary-name does not check
for valid libraries and will record into any name
you type. With NSC, you cannot delete the
recording (via SYSMAIN, or Natural commands)
unless the library exists.
51
Utilities
Feeding data to Batch Utilities By recordings
//NAT2STEP EXEC NATURAL4 //DBPASSW DD
PASSWORDNOMAP //SYSIN DD
LOGON XDMD BXDMD
ATESTINPT
LOGON XDMD BXDMD BTESTINPT TSTINPUT A THIS
IS A B AND B B
The batch job output Logon accepted to library
XDMD CF BXDMD Logon
accepted to library XDMD. CF ATESTINPT
Page 1
A THIS IS A B AND B
52
Upgrading Natural
Add-on Products, examples The basic INPLs NSC,
PRD, NTC Linked and parmed ESS, EXX, SPF,
NDV, NOC Synching compatible versions Keeping
up with zaps (what is applied to each
environ?). Using SMA? What to do with the FNAT
(new or overlayed shared or unique)? Rebuild
renumber, or overlay existing, or ? How to
promote customized exits and programs EX.
LOGONEXn, USR modules, etc.
53
Debugging
Dumps and Traces Library SYSEXTP CMEDF DUMP
abend Locating BB (prog, lib, line, level,
etc.). In a dump. TRE and TRI RDC
RDCSIZE ltTEST TEST DBLOG LOGON,DSIZE
54
Debugging
A quick side note from recent SAG-L thread.
Someone encountered a situation where the
customer accidentally entered followed by the
CICS transaction name and it threw them out of
CICS. Their solution was to tell the customer
not to do that anymore. But this is a
configurable parameter. You can turn off this
behavior in the NCIPARM macro when building your
Natural CICS Driver portion of the nucleus.
55
Configuring

• Printers

VTAM TCP/IP LPR LPD JES PROFILE
configurations NTPRINT macro PRINTER TSQ or
TDQ Printer exit available for PM (print mode)
parameter.
56
Application Admin.

• Software Life Cycle

Backups a). Periodic FUSER backup b). ADABAS
PLOG c). ISPF versioning d). 3rd party
lifecycle software (e.g. Endevor) e). Locally
developed system (SYSUNLD, SYSOBJH, etc.) Number
of versions? Length of retention? Offsite
storage? Do you have a secured source library?
57
Application Admin.

• Source Software

What do you do with programs containing the
following? FIND view-name CIPHER Or FIND
view-name PASSWORD
58
Application Admin.

• Source Software

Locked Objects See Library SYSLK01 (?) Write
your own to update FDIC record(s)
59
Application Admin.

• Software Life Cycle

Catall and Date/time stamps Discussion or
Philosopy of merits/problems.
60
NSC

• Utilities

132248 NATURAL SECURITY
2006-10-12
- Utility Maintenance -
FSEC (25,177)
Co
Utility Default User Library User-Lib.
Message __ ________ _______
_______ _______ _________ ____________________
_ __ SYSDDM YES YES NO
NO __ SYSMAIN
YES YES NO NO
__ SYSTRANS YES YES
NO YES


61
NSC

• Utilities

132248 NATURAL SECURITY
---------------FUNC
TION CODES--------------- !
!
Co Utility ! DD Display default profile or
template ! __ ________ !
! _______ __ SYSDDM
! User-specific utility profiles !
?_ SYSMAIN ! DU Display
! __ SYSTRANS ! AU Add or
maintain !
! MU Maintain !
!
! !
Library-specific utility profiles !
! DL Display
! ! AL Add or
maintain !
! ML Maintain !
!
! !
User-library-specific utility profiles !
! DX Display
! ! AX Add or
maintain !
! MX Maintain !
!
! ! __ lt
Select !
Command ------------------------------------
--------
62
NSC

• Utilities

PAGE 1
132455 NATURAL SECURITY
2006-10-12
- User Profile for SYSMAIN Utility -

User
ID DBA-GRP


A/D Objects Co De Fi Li Mo Re Im
Rep FNAT FSEC FDIC Status ---
------------------- ------------------------------
---------- ---------- A Programming Objects
A A A A
Allowed from library A A A A
A A
to library A A A A
D Debug Environments
D D D
Disallowed from library D D D
D D
to library D D D
A User Messages
A A A Allowed
from library A A A A A A
to
library A A A
A DDMs
A A A A Allowed
from environment A A A A
to
environment A A A
63
NSC

• Utilities

PAGE 2
132552 NATURAL SECURITY
2006-10-12
- User Profile for SYSMAIN Utility -

User
ID DBA-GRP


A/D Objects Co De Fi Li Mo Ren
Rep FNAT FSEC FDIC Status ---
----------------- --------------------------------
---------- ---------- A Natural Messages
A A A
Allowed from environment A A A A
A A
to environment A A A
A Profiles
A A A Allowed
from environment A A A A A
to
environment A A A
D Rules
D D D Disallowed
from environment D D D D D
to
environment D D D
D DL/I Subfiles
D D D Disallowed
from environment D D D D
to
environment D D
64
NSC

• Utilities

132648 NATURAL SECURITY
2006-10-12
- User Profile for SYSMAIN Utility -

User
ID DBA-GRP


A/D Objects Co De Fi Li Mo Re Im
Rep FNAT FSEC FDIC Status ---
------------------- ------------------------------
---------- ---------- A Resources
A A A
Allowed from library A A A A
A A
to library A A A A
? What are Resources ?
65
NSC

• Utilities

133001 NATURAL SECURITY
2006-10-12
- Administrator Services Menu 1 -
FSEC (25,177)


Code
Function
---- -------------------
---------------------
G General options
P PF-keys

E Logon/countersign errors
L
Logon records
N Maintenance log
records
? Help
. Exit

---- --------------------------
--------------

Code _


Command gt

Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---P
F8---PF9---PF10--PF11--PF12--- Help
Exit Flip Adm-2
Canc
66
NSC

• Utilities

133224 NATURAL SECURITY
2006-10-12
- Administrator Services Menu 2 -
FSEC (25,177)


Code
Function
---- -------------------
---------------------
1 Environment profiles
U User
default profiles
Y Library default profiles

D Library and user preset values
X Utility
defaults/templates
S System-library definitions
I
Application interfaces
? Help

. Exit
----
----------------------------------------



Code _

67
NSC

• Utilities

133413 NATURAL SECURITY
2006-10-12
- Define Utility Defaults/Templates -
FSEC (25,177)




Co Utility Message
__ ________
______________________
__ NATLOAD nothing defined
__
NATUNLD nothing defined
__ SYSBPM nothing
defined
__ SYSDDM default defined
__ SYSERR
nothing defined
__ SYSMAIN default defined

__ SYSOBJH nothing defined
__ SYSPARM
nothing defined
__ SYSRPC nothing defined
__
SYSSAFOS nothing defined
__ SYSTRANS default
defined

68
NSC

• Utilities

133413 NATURAL SECURITY
2006-10-12
- Define Utility Defaults/Templates -
FSEC (25,177)




Co Utility Me --- Define Utility
Defaults/Templates ---- __
________ __ !
! __ NATLOAD no !
!
__ NATUNLD no ! AD Add
! __ SYSBPM
no ! MO Modify !
__ SYSDDM de ! DE Delete
! __
SYSERR no ! DI Display
! __ SYSMAIN de !
!
AD SYSOBJH no ! __ lt Select
! __ SYSPARM
no ! !
__ SYSRPC no !
! __
SYSSAFOS no !
! __ SYSTRANS de
------------------------------------------
69
NSC

• Utilities

133739 NATURAL SECURITY
2006-10-12
- Template for SYSOBJH Utility -





A/D Nat Err CPr NRe Ext FDT MfD MfR
Par Rep Status ---
--- --- --- --- --- --- --- --- --- ---
---------- D Unload D D D D D
D D D D Disallowed

D Load D D
D D D D D D D D
Disallowed
D
Delete D D D D D D D D
D Disallowed

General Admin D FSEC D FDIC D Transfer
only Y (Y/N)








N Applies as default profile

70
NSC

• Utilities

133224 NATURAL SECURITY
2006-10-12
- Administrator Services Menu 2 -
FSEC (25,177)


Code
Function
---- -------------------
---------------------
1 Environment profiles
U User
default profiles
Y Library default profiles

D Library and user preset values
X Utility
defaults/templates
S System-library definitions
I
Application interfaces
? Help

. Exit
----
----------------------------------------



Code S

71
NSC

• Utilities

134305 NATURAL SECURITY
2006-10-12
- Define System Libraries -
FSEC (25,177)
Co
Library ID Library Name
Message __ __________
__________________________________
____________________ __ ADABAS ONLINE
SERVICES
SYSAOS Adabas Online
Services defined
__ SYSAEO Adabas Cache Services
undefined __ NATURAL ISPF

SYSISPS1 ISPF Internal
tables/menus defined
SYSISPH1 ISPF Help data
defined SYSISPFU
ISPF User menus/tables defined
__ SYSISPHU ISPF User defined
help undefined __
SYSISPIU ISPF User defined information
undefined SYSISPX ISPF
User exit sources defined
SYSISPE ISPF Examples
defined
SYSISPI ISPF Interfaces
defined SYSISPXU ISPF
User-modified exit sources defined
__ SYSISPXC ISPF Example User exit
sources undefined __
SYSISPDB ISPF Incore Database Modules
undefined
72
NSC

• Utilities

134511 NATURAL SECURITY
2006-10-12
- Define System Libraries -
FSEC (25,177)
Co
Library ID Library Name
Message __ __________
__________________________________
____________________ __ NATURAL

SYSADA Natural Adacall Utility
defined
SYSBPM Natural Buffer Pool Maintenance
defined SYSDBA
Natural Administrator Utility defined
ltObsoletegt SYSDDM
Natural View Maintenance Utility defined
SYSEDT Natural EDT Utility
defined
SYSERR Natural Error Text Maintenance
defined __ SYSEXCOC
NaturalX Client Examples undefined
__ SYSEXCOM NaturalX Server
Examples undefined
__ SYSEXDDM Natural View Examples
undefined __ SYSEXINS
Natural Tamino Examples undefined
__ SYSEXNGR Natural Graphics
Examples undefined
__ SYSEXPG Natural Prog. Guide Examples
undefined ltfrom manualsgt __
SYSEXPLG Plug-in Example
undefined __ SYSEXRM
Natural Statements Examples undefined
ltReport modegt
73
NSC

• Utilities

134630 NATURAL SECURITY
2006-10-12
- Define System Libraries -
FSEC (25,177)
Co
Library ID Library Name
Message __ __________
__________________________________
____________________ __ NATURAL

SYSEXT Natural Appl. Interfaces
Library defined lt USRsgt
SYSEXTP Natural TP-specific Functions
defined __ SYSEXUEX
Natural Examples for 3GL Calls undefined
__ SYSEXV Natural Examples of
New Features undefined
SYSEXXT Natural XML Toolkit application
defined __ SYSINPL
Natural INPL Utility undefined
SYSMAIN Natural Object
Maintenance defined
__ SYSMAP Natural Mapbox
undefined SYSMENU
Natural Various map sources defined
SYSMISC Natural
Miscellaneous defined ltULDOBJgt
SYSNCP Natural Command
Processor defined
__ SYSOBJH Natural Object Handler
undefined SYSPARM
Natural Profile Parameter Maint. defined
__ SYSPLCGC Program Generation
undefined
74
NSC

• Utilities

134731 NATURAL SECURITY
2006-10-12
- Define System Libraries -
FSEC (25,177)
Co
Library ID Library Name