Natural nsc admin
This presentation is the property of its rightful owner.
Sponsored Links
1 / 75

Natural & NSC Admin. PowerPoint PPT Presentation


  • 314 Views
  • Uploaded on
  • Presentation posted in: General

Natural & NSC Admin. FNAT. FSEC. FUSER. Logging. Backups. Monitoring. Securing. SYSPARM. Customizing. Parm sets. Overview. NSC. Online Driver. BP. NTPRM. Shared Nucleus. N. SYSPARM. SYSPARM. Batch Driver. System FIles. Batch Nucleus. BP. The system files.

Download Presentation

Natural & NSC Admin.

An Image/Link below is provided (as is) to download presentation

Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author.While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server.


- - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - -

Presentation Transcript


Natural nsc admin

Natural & NSC Admin.

FNAT

FSEC

FUSER

Logging

Backups

Monitoring

Securing

SYSPARM

Customizing


Overview

Parm sets

Overview

NSC

Online Driver

BP

NTPRM

Shared Nucleus

N

SYSPARM

SYSPARM

Batch Driver

System FIles

Batch Nucleus

BP


The system files

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.


The system files1

The system files

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

INPL

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?


The system files2

The system files

Do you know the difference between these INPL methods?

//NATINPL EXEC NAT414BA,PARM=‘STACK=INPL”

vs

//CMSYNIN DD *

INPL

INPL (continued)

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.


System files

System Files

Experimental

Development & QA

Production

New version ; FNAT (shared)

FNAT (Shared)

FSEC

FSEC 1

FSEC 2

FSEC

FUSER

Example Configuration

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.


The natural nucleus

The Natural nucleus

The Nucleus contains the basic logic components needed for a Natural session. It can be customized to the needs of the customer’s 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


The natural nucleus1

The Natural nucleus

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

The Drivers

You have the source to the driver modules. You may customize them if needed. I prefer using the RDC exits for site specific requirements.


The natural nucleus2

The Natural nucleus

TP-Specific

Drivers

Shared

Nucleus

Modules.

Optional

parms

What does Natural look like?

(Configurations; Option 1)

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).


The natural nucleus3

The Natural nucleus

Batch

Drivers

+

Base

Nucleus

TP-Specific

Drivers

+

Base

Nucleus

Optional

parms

Optional

Parms

What does Natural look like?

(Configurations; Option 2)

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.


The natural nucleus4

Nucleus Could be from shared memory outside of TP monitor

The Natural nucleus

TP Monitor

User sessions

Natural

Nucleus

What does Natural look like?

(The sessions within)

Natural

UCB

(SCPCB)

TP

Natural

Driver

Threads


The natural nucleus5

Nucleus Could be from shared memory outside of TP monitor

The Natural nucleus

Has unique *USER

standard Batch job

User session

Natural

Nucleus

What does Natural look like?

(The sessions within)

Thread

Batch

Natural

Driver


The natural nucleus6

Nucleus Could be from shared memory outside of TP monitor

The Natural nucleus

Has many

*USER

values

Batch Server

User session

User session

Natural

Nucleus

What does Natural look like?

(The sessions within)

User session

Separate TCBs

Each a

Single session

Batch

Natural

Driver

User session

User session


The natural nucleus7

The Natural nucleus

Z/OS

TP monitor, or Batch address space

Non

Nat

Lang. Env.

Nat

Language Environment

Non

Nat


The natural nucleus8

The Natural nucleus

LE370=ON

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

DELETE=ON/OFF… what impact does this have?

Main module or sub-module… what impact does this have?

PARM=‘POSIX(ON),TRAP(OFF)/natparms’

SET CONTROL ‘P=L’ or ‘P=LS’

CLER transaction in CICS

Language Environment


The natural nucleus9

The Natural nucleus

CLER WTRM WTRMCICS

Language Environment Region Level Runtime Options

Type in your Choices.

Runtime option Choice Possible choices.

TRAP ==> ON ON, OFF

RPTOPTS ==> OFF ON, OFF

RPTSTG ==> OFF ON, OFF

ALL31 ==> ON ON, OFF

CBLPSHPOP ==> ON ON, OFF

TERMTHDACT ==> TRACE QUIET,MSG,TRACE,DUMP,UAONLY,UATRACE,UADUMP,UAIMM

When finished, press ENTER.

PF1=Help 3=Quit 5=Current Settings 9=Error List

Language Environment


The natural nucleus10

The Natural nucleus

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 RANDNUM*END

Language Environment


The natural nucleus11

The Natural nucleus

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

Language Environment

This is how I turned TRAP(OFF) for our CICS regions.


The natural nucleus12

The Natural nucleus

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.

Extending functionality


The natural nucleus13

The Natural nucleus

Roll Server

(optional)

CICS

Driver &

Nucleus

Swap pool

Threads

CICS; additional components

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.


Buffer pools

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 [dis]advantages of a local BP over a local one?

Do you know the purpose of each of the special BPs (edit, sort and MON)?


Buffer pools1

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 module’s usage is high.


Buffer pools2

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.


Session parameters

Session Parameters

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)

Order of precedence


Session parameters1

Session Parameters

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; don’t do Recursion).

4). Profile types: Auto=*INIT-USER

Terminal=Terminal-ID,

Program=*INIT-PROGRAM

any other name is valid also.

5) Is loaded after sessions starts, but before LOGONEXn.

SYSPARM


Natural nsc admin1

Natural & NSC Admin.

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 user’s needs and location.

Session Parms


Natural nsc admin2

Natural & NSC Admin.

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.

Starting with Natural 4, you may place comments into the parameter text. Use /* to start a comment. Use */ to terminate it.

SYSPARM


Natural nsc admin3

Natural & NSC Admin.

14:48:22 ***** NATURAL SYSPARM UTILITY ***** 10/05/2006

> RPC=(SERVER=ON,SRVNODE='134.123.4.56:1971:TCP',SRVNAME=CICS,AUTO=ON, <

> SRVUSER=STARGATE,TRANSP=(ACI,TCP),MAXBUFF=280,TRACE=0,RPCSIZE=296, <

> ACIVERS=6,NTASKS=1),RCA=(BROKER),RCALIAS=(BROKER,NATETB23),ETID='''',MAI <

> NPR=10,PRINT=((10),AM=ESS,DEST=EXRPCICS,FORMS=TRAC),WORK=((10),AM=CICS,D <

> EST=EXRPCICS,DISP=(NEW,KEEP),OPEN=ACC),ADAMODE=0,UDB=35, <

> WORK=((1),AM=CICS,DEST=DARSEX01,DISP=(NEW,KEEP),OPEN=ACC), <

> WORK=((2),AM=CICS,DEST=DARWEX01,DISP=(NEW,KEEP),OPEN=ACC), <

> /* Original version of NT2X. Saved here as backup */ <

SYSPARM


Monitoring logging

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.


Monitoring logging1

Monitoring/Logging

R

D

C

Database

Natural

Reports

RDC EXITS

Modules (load, start & stop)

User

Exits

Errors

RDC Buffer

Log


Monitoring logging2

12:20:03 ***** 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 ..

Monitoring/Logging


Monitoring logging3

Monitoring/Logging

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

SYSMON

Set MONSIZE for monitoring buffer.


Monitoring logging4

Monitoring/Logging

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 ...........: ________

SYSMON


Monitoring logging5

Monitoring/Logging

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

SYSMON


Monitoring logging6

Monitoring/Logging

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

SYSMON


Configuring

Configuring

Application library

*STEPLIB (?)

Library design

Alternate DB & FNR (Test, Cert, QA, Prod)

NSC steplib chain

Alternate DB & FNR (Test, Cert, QA, Prod)

SYSTEM


Exits

Exits

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.

WRKSIZE=10,STORAGE=MAIN,EXT=OFF,EXTNAME=sort,EXTEOJ=OFF

~~~

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.

Sort


Exits apis

Exits/APIs

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

Natural Security


Exits1

Files:

NSCFIEX1

Libraries:

NSCLIEX1

Ext. Objects:

NSCOBEX1

NSCOBEX2

Users:

NSCUSEX1

Exits

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 <others> Some functions allowed

_ SYSDDM <others> Some functions allowed

_ SYSMAIN <others> Some functions allowed

_ SYSOBJH <others> Some functions allowed

_ SYSTRANS EXXCIS All functions allowed

_ <others> All functions allowed

Natural Security

Nat. PROFILE:

APROFILE

NSC extentions:

CUSTOM1

CUSTOM2

CUSTOM3

CUSTOM4

CUSTOM5

Exmpl ERROR-TA

ERROR

MAP-ERR0

MAP-ERR1


Exits2

Exits

13:40:42 *** 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

Natural Security


Utilities

Utilities

Driving Utilities from batch jobs:

SYSADA

SYSUNLD/SYSOBJH

SYSBPM

SYSMAIN

SYSERR

SYSPARM

SYSSEC

SYSTP

SYSUPD


Utilities1

Some have command interfaces, so it is easier.

SYSOBJH

Utilities

SYSOBJH:14:24:54 ***** 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 ===> ?


Utilities2

SYSOBJH:

Utilities

14:27:30 ***** 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 ===>


Utilities3

SYSOBJH:

Utilities

14:28:07 ***** 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 ===>


Utilities4

SYSOBJH. The “Wizard” will help you build the command(s).

Utilities

14:30:14 ***** 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 ===>


Utilities5

Feeding data to Batch Utilities: Option 1: By Forms mode (%F)

Utilities

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).


Utilities6

Feeding data to Batch Utilities: Option 2 By keyword (variable name)

Utilities

Logon accepted to library XDMD.

*CF* %D

NEXT TSTINPUT

#A

#B

DATA #B=BE B,#A=ITS 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?


Utilities7

Feeding data to Batch Utilities: By keyword (Header name)

Utilities

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 B=BE B,A=ITS AN A

Page 1

A= ITS AN A

B= BE B

Okay, but what if the headers are:

Name . . . .

Street . . . .


Utilities8

Feeding data to Batch Utilities: By keyword (Header name, cont.)

Utilities

Logon accepted to library XDMD.

*CF* %D

NEXT TSTINPUT

#A

#B

DATA B=BE B,A=ITS 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.


Utilities9

Still having trouble feeding in data? Try using recordings.

Utilities

%B=lib-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 %B=library-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.


Utilities10

Feeding data to Batch Utilities:

By recordings

//NAT2STEP EXEC NATURAL4

//DBPASSW DD *

PASSWORDNOMAP

//SYSIN DD *

LOGON XDMD

%B=XDMD

%ATESTINPT

Utilities

LOGON XDMD

%B=XDMD

%BTESTINPT

TSTINPUT

A … THIS IS A

B … AND B

%B

The batch job output:

Logon accepted to library XDMD

*CF* %B=XDMD

Logon accepted to library XDMD.

*CF* %ATESTINPT

Page 1

A= THIS IS A

B= AND B


Upgrading natural

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.


Debugging

Debugging

Dumps and Traces

Library SYSEXTP & CMEDF

DUMP [abend]

Locating BB (prog, lib, line, level, etc.). In a dump.

%TRE and %TRI

RDC & RDCSIZE=

%<TEST & TEST DBLOG

LOG=ON,DSIZE=


Debugging1

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.


Configuring1

Configuring

VTAM

TCP/IP LPR & LPD

JES

PROFILE= configurations

NTPRINT macro & PRINTER=

TSQ or TDQ

Printer exit available for PM (print mode) parameter.

Printers


Application admin

Application Admin.

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?

Software Life Cycle


Application admin1

Application Admin.

What do you do with programs containing the following?

FIND view-name

CIPHER=

Or

FIND view-name

PASSWORD=

Source Software


Application admin2

Application Admin.

Locked Objects

See Library SYSLK01 (?)

Write your own to update FDIC record(s)

Source Software


Application admin3

Application Admin.

Catall and Date/time stamps

Discussion or Philosopy of merits/problems.

Software Life Cycle


Natural nsc admin

NSC

13:22:48 *** 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

Utilities


Natural nsc admin

NSC

13:22:48 *** NATURAL SECURITY ***

+---------------FUNCTION 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 !

! !

! __ <== Select !

Command === +--------------------------------------------+

Utilities


Natural nsc admin

NSC

PAGE 1

13:24:55 *** 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

Utilities


Natural nsc admin

NSC

PAGE 2

13:25:52 *** 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

Utilities


Natural nsc admin

NSC

13:26:48 *** 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

Utilities

? What are “Resources” ?


Natural nsc admin

NSC

13:30:01 *** 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 ===>

Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---

Help Exit Flip Adm-2 Canc

Utilities


Natural nsc admin

NSC

13:32:24 *** 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 _

Utilities


Natural nsc admin

NSC

13:34:13 *** 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

Utilities


Natural nsc admin

NSC

13:34:13 *** 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 ! __ <== Select !

__ SYSPARM no ! !

__ SYSRPC no ! !

__ SYSSAFOS no ! !

__ SYSTRANS de +------------------------------------------+

Utilities


Natural nsc admin

NSC

13:37:39 *** 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

Utilities


Natural nsc admin

NSC

13:32:24 *** 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

Utilities


Natural nsc admin

NSC

13:43:05 *** 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

Utilities


Natural nsc admin

NSC

13:45:11 *** 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 <Obsolete>

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 <from manuals>

__ SYSEXPLG Plug-in Example undefined

__ SYSEXRM Natural Statements Examples undefined <Report mode>

Utilities


Natural nsc admin

NSC

13:46:30 *** NATURAL SECURITY *** 2006-10-12

- Define System Libraries - FSEC (25,177)

Co Library ID Library Name Message

__ __________ __________________________________ ____________________

__ NATURAL

SYSEXT Natural Appl. Interfaces Library defined < **USRs**>

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 <ULDOBJ>

SYSNCP Natural Command Processor defined

__ SYSOBJH Natural Object Handler undefined

SYSPARM Natural Profile Parameter Maint. defined

__ SYSPLCGC Program Generation undefined

Utilities


Natural nsc admin

NSC

13:47:31 *** NATURAL SECURITY *** 2006-10-12

- Define System Libraries - FSEC (25,177)

Co Library ID Library Name Message

__ __________ __________________________________ ____________________

__ NATURAL

__ SYSPLMAN Plug-in Manager undefined

__ SYSPLMFE Mainframe Navigation undefined

__ SYSPLNEE Metrics Calculation undefined

SYSPLPDC Object Description defined

__ SYSPLPGC Schema Generation undefined

__ SYSPLWEB Web Interface undefined

__ SYSPLWIZ Appliction Wizard undefined

__ SYSPLXRC XRef Evaluation undefined

SYSRDC Natural RDC Utility defined

SYSRPC Natural RPC Utility defined

SYSTEM Natural Default Steplib defined

SYSTP Natural TP-Monitor-Spec. Utility defined

SYSTRANS Natural Transfer Utility defined

SYSUNLD Natural Load/Unload Utility defined

Utilities


Natural nsc admin

NSC

13:48:53 *** NATURAL SECURITY *** 2006-10-12

- Define System Libraries - FSEC (25,177)

Co Library ID Library Name Message

__ __________ __________________________________ ____________________

__ NATURAL

SYSUTM BS2000 UTM-examples defined

SYSUPD Natural UPD Utility defined

NATURAL SECURITY

SYSSEC Natural Security Maintenance defined

__ NATURAL WEB Interface

SYSWEB Natural Web Interface defined

__ SYSHTML Natural NWW HTML API undefined

__ SYSHTMLD Natural NWW Documentation/Demo undefined

__ SYSHTTP Natural NWW HTTP API undefined

__ PREDICT

SYSDIC Predict defined

SYSDICBE Predict Migrate Utility defined

SYSDICCO Predict Conversion defined

SYSDICH Predict Example for Helproutine defined

SYSDICMA Predict Meta data maintenance defined

__ SYSDICTX Predict Internal use undefined

Utilities


  • Login