Natural NSC Admin Overview Parm sets NSC Online

  • Slides: 75
Download presentation
Natural & NSC Admin.

Natural & NSC Admin.

Overview Parm sets NSC Online Driver NTPRM SYSPARM BP Shared Nucleus N Batch Driver

Overview Parm sets NSC Online Driver NTPRM SYSPARM BP Shared Nucleus N Batch Driver System FIles Batch Nucleus BP

The system files FNAT FSEC FUSER FDIC The basic, required system files. These can

The system files FNAT FSEC FUSER FDIC The basic, required system files. These can be the same physical file, but is not recommended. FNAT = Software AG modules. Fuser = Customer application modules. Scratch Pad Optional system files for Nat-Security, Predict, etc. Most commonly kept on ADABAS, but can be various file types, depending on your platform Operating System and database choice.

The system files INPL SYSUPD NE 414 I 4 Text Src Loaded SYSTEM INTSEC

The system files INPL SYSUPD NE 414 I 4 Text Src Loaded SYSTEM INTSEC Program Cat Loaded SYSLIBS NSCUS Subprogram Cat Replaced SYSSEC NSCLOGUT Program Cat Replaced SYSLIB LOGONUS Program Cat Replaced SYSTEM NSCC 0002 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?

The system files INPL (continued) Do you know the difference between these INPL methods?

The system files INPL (continued) Do you know the difference between these INPL methods? //NATINPL EXEC NAT 414 BA, PARM=‘STACK=INPL” 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.

System Files Example Configuration Experimental Development & QA Production New version ; FNAT (shared)

System Files Example Configuration Experimental Development & QA Production New version ; FNAT (shared) FNAT (Shared) FSEC 1 FSEC 2 FUSER FNAT (non NSC) Multiple FNAT; Allows flexibility, but is tough keeping profiles, patches & various products in sync. FSEC FUSER FNAT Single FNAT; possible 3009 issues & upgrade steps is difficult. Also 1 SYSPARM for all environments.

The Natural nucleus The Nucleus contains the basic logic components needed for a Natural

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 NAT 3270; Screen I/O handler NATPARM; default session parameters NATRPC; Remote Procedure Calls NATWTO; Write to Operator NATARI 2; Arithmetic handler NATWKFO; Workfile handler

The Natural nucleus The Drivers contain the basic logic components needed for the environmentspecific

The Natural nucleus The Drivers contain the basic logic components needed for the environmentspecific 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.

The Natural nucleus What does Natural look like? (Configurations; Option 1) TP-Specific Drivers Optional

The Natural nucleus What does Natural look like? (Configurations; Option 1) TP-Specific Drivers Optional parms Shared Nucleus Modules. 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 nucleus What does Natural look like? (Configurations; Option 2) Batch Drivers +

The Natural nucleus What does Natural look like? (Configurations; Option 2) Batch Drivers + Base Nucleus Optional Parms Optional, Specific Nuclei for special requirements; e. g. servers. TP-Specific Drivers + Base Nucleus Here you can see each nucleus is bigger, and each contains all components necessary to run Natural, rather than sharing a common “base” nucleus. Optional parms

The Natural nucleus What does Natural look like? (The sessions within) TP Monitor User

The Natural nucleus What does Natural look like? (The sessions within) TP Monitor User sessions Natural Nucleus Natural UCB (SCPCB) Threads TP Natural Driver Nucleus Could be from shared memory outside of TP monitor

The Natural nucleus What does Natural look like? (The sessions within) Has unique *USER

The Natural nucleus What does Natural look like? (The sessions within) Has unique *USER standard Batch job User session Natural Thread Batch Natural Driver Nucleus Could be from shared memory outside of TP monitor

The Natural nucleus What does Natural look like? (The sessions within) Has many User

The Natural nucleus What does Natural look like? (The sessions within) Has many User session Batch Server *USER values User session Natural Nucleus Separate TCBs Each a Single session Batch Natural Driver Nucleus Could be from shared memory outside of TP monitor

The Natural nucleus Language Environment Z/OS TP monitor, or Batch address space Nat Lang.

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

The Natural nucleus Language Environment LE 370=ON Or, setup LE environment via CALL from

The Natural nucleus Language Environment LE 370=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

The Natural nucleus Language Environment CLER WTRMCICS WTRM Language Environment Region Level Runtime Options

The Natural nucleus Language Environment CLER WTRMCICS WTRM 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 ALL 31 ==> ON ON, OFF CBLPSHPOP ==> ON ON, OFF TERMTHDACT ==> TRACE QUIET, MSG, TRACE, DUMP, UAONLY, UATRACE, UADUMP, UAIMM When finished, press ENTER. PF 1=Help 3=Quit 5=Current Settings 9=Error List

The Natural nucleus Language Environment You can also directly invoke LE services from Natural:

The Natural nucleus Language Environment You can also directly invoke LE services from Natural: (Courtesy of SAG support in Denver) DEFINE DATA LOCAL 1 DSARPL 2 SEED (B 4) 2 RANDNUM (B 4) 2 DSAFDBK (B 12) /* LE FEEDBACK CODE 2 REDEFINE DSAFDBK 3 DSASVCD (I 2) /* SEVERITY CODE 3 DSAMSGNO (I 2) /* MESSAGE NUMBER 3 DSACSC (A 1) 3 DSAFACID (A 3) /* LE FACILITY ID 1 DSALEMSG (A 8) /* LE MESSAGE 1 REDEFINE DSALEMSG 2 MSGPFX (A 3) /* MESSAGE PREFIX 2 MSGNBR (N 4) /* MESSAGE NUMBER 2 MSGSFX (A 1) /* MESSAGE SUFFIX 1 MSGSVTY (A 5) INIT ‹''IWESC''› /* SEVERITY MNEMONICS 1 REDEFINE MSGSVTY 2 MSGSVCD (A 1/5) 1 I (P 3) END-DEFINE * ALL ''CEERANC 0'' SEED RANDNUM DSAFDBK IF DSAFDBK NE H''00'' DO MSGPFX : = DSAFACID MSGNBR : = DSAMSGNO MSGSFX : = MSGSVCD (DSASVCD) DOEND WRITE NOTITLE *PROGRAM 4 X DSAFDBK 2 X DSALEMSG 2 X SEED RANDNUM * END

The Natural nucleus Language Environment You can pass LE run-time options by providing the

The Natural nucleus Language Environment You can pass LE run-time options by providing the region-specific runtime 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: This is how I turned CEEROPT CSECT TRAP(OFF) for our CEEROPT AMODE ANY CICS regions. CEEROPT RMODE ANY CEEXOPT ALL 31=((OFF), OVR), X STACK=((128 K, BELOW, KEEP, 512 K, 128 K), OVR) END CEEROPT

The Natural nucleus Extending functionality Linking components to the Nucleus (CEERN 0, LPARINFO, etc.

The Natural nucleus Extending functionality Linking components to the Nucleus (CEERN 0, 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.

The Natural nucleus CICS; additional components CICS Driver & Nucleus Roll Server (optional) Threads

The Natural nucleus CICS; additional components CICS Driver & Nucleus Roll Server (optional) Threads SCB Swap pool NEP 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 3). Global; defined as backup 2 2). Local (default) defined as backup

Buffer Pools 3). Global; defined as backup 2 2). Local (default) defined as backup 1 Natural Drivers & Nucli [BPPROP] 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 Pools 3). Global; defined as backup 2 2). Local (default) defined as backup

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 Pools USR 0340 P USR 0340 N Natural Buffer Pool Interface 0340 USR

Buffer Pools USR 0340 P USR 0340 N Natural Buffer Pool Interface 0340 USR 0341 P USR 0341 N Natural Buffer Pool Interface 0341 USR 4340 P USR 4340 N 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 Order of precedence Nucleus: NATPARM module + any optional SYS= specified. Startup

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)

Session Parameters SYSPARM 1). Defined through online screens instead of assembling NTPRM. 2). Stored

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(A 9). Contains left parenthesis + profile name. Parameter string is LK(A 80). 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.

Natural & NSC Admin. Session Parms My front-end program takes the following values as

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

Natural & NSC Admin. SYSPARM does not keep track of maintenance to parms. It

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.

Natural & NSC Admin. SYSPARM 14: 48: 22 ***** NATURAL SYSPARM UTILITY ***** 10/05/2006

Natural & NSC Admin. SYSPARM 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, NATETB 23), 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=DARSEX 01, DISP=(NEW, KEEP), OPEN=ACC), < > WORK=((2), AM=CICS, DEST=DARWEX 01, DISP=(NEW, KEEP), OPEN=ACC), < > /* Original version of NT 2 X. Saved here as backup */ <

Monitoring/Logging Remote Data Collectors (Natural & Assembler language exits). Database calls, Page I/O, Errors,

Monitoring/Logging Remote Data Collectors (Natural & Assembler language exits). Database calls, Page I/O, Errors, Prog. Load/Start/stop, CALLs 3 rd party vendor (SYSVIEW) RDCSIZE session Parameter SYSTP Threads, Swap pools, Roll servers, User sessions. SYSMON (online and batch) Terminals or programs.

Monitoring/Logging RDC EXITS Database Natural Reports R D C Modules (load, start & stop)

Monitoring/Logging RDC EXITS Database Natural Reports R D C Modules (load, start & stop) User Exits RDC Buffer Errors Log

Monitoring/Logging 12: 20: 03 User DMDSAC ***** NATURAL SYSTP UTILITY ***** 2006 -10 -03

Monitoring/Logging 12: 20: 03 User DMDSAC ***** NATURAL SYSTP UTILITY ***** 2006 -10 -03 - Main Menu TID T 004 Code Function E M F S B R T ? . Code. . Environment-Dependent Functions Natural Monitoring (SYSMON) Natural Print/Work Files (SYSFILE) Natural Swap Information Buffer Usage Statistics (BUS) Natural Subsystems and Roll Server Information Natural Thread Usage Statistics Help Exit

Monitoring/Logging SYSMON The NATURAL Monitor also can be used within Batch applications. The administration

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 Deactivate NATURAL Monitor : SMNACT 01 : SMNDEA 01 To print the statistics the program SMPBAT 01 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.

Monitoring/Logging SYSMON The NATURAL Monitor is currently activated Code Function D Deactivate Monitor T

Monitoring/Logging SYSMON The NATURAL Monitor is currently activated Code Function D Deactivate Monitor T P Display Monitor Terminal Statistics Display Monitor Program Statistics ? Help. Exit Code. . _ Name of LTERM or Program. . : ____ Name of Library. . . : ____

Monitoring/Logging SYSMON LPFEXPRI: What is thing? DEFINE DATA LOCAL 1 PVALA (A 24/20) 1

Monitoring/Logging SYSMON LPFEXPRI: What is thing? DEFINE DATA LOCAL 1 PVALA (A 24/20) 1 REDEFINE PVALA 2 PVALB (B 24/20) 1 CO (P 2) 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 'LPFSUP 01' PVALA(*) INPUT 'USER-DEFINED-KEYS LOADED' END

Monitoring/Logging SYSMON SMPEXPRI: Name Library NATADAExt. Mean- Input/Output User Sys time No KB Acc

Monitoring/Logging SYSMON SMPEXPRI: Name Library NATADAExt. Mean- Input/Output User Sys time No KB Acc --------------------------------------SMMMEN 01 SYSTP 0 0. 0 2 3 2 0 S 2 MRAHM 1 SYSTP 0 0 0 S 2 SCOM 01 SYSTP 0 0 0 SMPMEN 01 SYSTP 0 0. 0 1 6 STPMNU 1 P SYSTP 0 0. 0 1 0 5 6 STPMMM 1 M SYSTP 0 0. 0 2 3 2 0 SYSMAP 0 M SYSTP 0 0 0 MENU SYSTP 0 0 0 1 3 STPGDA SYSTP 0 0 0 3 5 SYSSUBSU SYSTP 0 0 0 1 3 NSCA 0003 SYSTP 0 0 0 1 4 NSCC 0002 SYSTP 0 0 0 5 4 SECUA SYSTP 0 0 0 12 0 NAT 00029 SYSTP 0 0 0 S 2 SCENT 1 SYSTP 0 0 0 SMPEXPRI SYSTP 0 0 0 1 2 SMPBAT 01 SYSTP 0 0 4

Configuring Library design Application library *STEPLIB (? ) Alternate DB & FNR (Test, Cert,

Configuring Library design Application library *STEPLIB (? ) Alternate DB & FNR (Test, Cert, QA, Prod) NSC steplib chain Alternate DB & FNR (Test, Cert, QA, Prod) SYSTEM

Exits Sort NATSREX 2; When Natural passes a record to SORT. NATSREX 3; When

Exits Sort NATSREX 2; When Natural passes a record to SORT. NATSREX 3; 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.

Exits/APIs Natural Security Example programs Pswd maint PGM----P PGM---SP PGM---P Use cmds? PGM---CS PGMDA-C

Exits/APIs Natural Security Example programs Pswd maint PGM----P PGM---SP PGM---P Use cmds? PGM---CS PGMDA-C Ck. Linked? PGM---L Ck. Obj? PGMCHCK Disp prof PGMDA-P PGMDA-S PGMDU Spl. Lnk PGMDAUC PGMDAUP PGMDAUS NSC known PGMDEF File maint PGMFI 001 Lib maint PGMLI 001 PGMLI 002 PGMLI 003 PGMLI 004 PGMLI 005 Mailbox maint: PGMMA 001 PGMMA 002 Ext. obj. maint PGMOB 001 PGMOB 002 User def maint PGMUS 001 PGMUS 002 PGMUS 003 PGMUS 004 User/lib/util maint PGMUT 001 List NSC errs PGMXRIER PGMXRUSE PGMXR 007 List obj. alpha PGMXR 001 Xref info PGMXR 002 PGMXR 003 PGMXR 004 PGMXR 005 Logon records PGMXR 006 PGMXR 008 PGMXR 009 PGMXR 010 PGMXR 011 PGMXR 012 PGMXR 013 Trans obj id/name PGMXR 014 PGMXR 016 Find orphan libs PGMXR 015

Exits Files: NSCFIEX 1 Natural Security Libraries: NSCLIEX 1 Example Exit: EXITMAP Ext. Objects:

Exits Files: NSCFIEX 1 Natural Security Libraries: NSCLIEX 1 Example Exit: EXITMAP Ext. Objects: NSCOBEX 1 NSCOBEX 2 NSC logon map: LOGONM 1 Users: NSCUSEX 1 Nat. PROFILE: APROFILE NSC mailbox: MAILEX 1 MAILMAP 2 NSC extentions: CUSTOM 1 CUSTOM 2 CUSTOM 3 CUSTOM 4 CUSTOM 5 Exmpl ERROR-TA ERROR MAP-ERR 0 MAP-ERR 1 At LOGON: LOGONEX 1 LOGONEX 2 LOGONEX 3 LOGONEX 4 LOGONM 1 RPC logons: LOGON 001 CALLNAT 'NAT 00029' CALLNAT 'NSCUTX 0 P' CALLNAT 'NAT 00030' Utility Library _ ________ _ NATUNLD <others> _ SYSDDM <others> _ SYSMAIN <others> _ SYSOBJH <others> _ SYSTRANS EXXCIS _ <others> Info ____________ Some functions allowed All functions allowed

Exits Natural Security 13: 40: 42 Co __ __ __ __ Example ____ PGM----P

Exits Natural Security 13: 40: 42 Co __ __ __ __ Example ____ PGM----P PGM---L PGM---P PGM---SP PGMCHCK PGMDA-C PGMDA-P PGMDA-S PGMDAUC PGMDAUP PGMDAUS PGMDEF PGMDU *** NATURAL SECURITY *** - Application Interfaces Subprogram _____ NSC----P NSC---L NSC---P NSC---SP NSCCHCK NSCDA-C NSCDA-P NSCDA-S NSCDAUC NSCDAUP NSCDAUS NSCDEF NSCDU 2006 -10 -12 FSEC (25, 177) Function ____________________________ Verify and change password Check if LOGON to a library is allowed Verify password Check NSC password Check if access to external objects is allowed Display library profile Display command editor restrictions of a library Display security profile of a library Display statement restrictions of a library Display special link profile Display command editor restrictions of special link Display security profile of a special link Display statement restrictions of a special link Check if an object is defined to Natural Security Display security profile of a user

Utilities Driving Utilities from batch jobs: SYSADA SYSUNLD/SYSOBJH SYSBPM SYSMAIN SYSERR SYSPARM SYSSEC SYSTP

Utilities Driving Utilities from batch jobs: SYSADA SYSUNLD/SYSOBJH SYSBPM SYSMAIN SYSERR SYSPARM SYSSEC SYSTP SYSUPD

Utilities Some have command interfaces, so it is easier. SYSOBJH: 14: 24: 54 10/10/200

Utilities Some have command interfaces, so it is easier. SYSOBJH: 14: 24: 54 10/10/200 User DMDSAC SYSOBJH ***** Natural Object Handler ***** - 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 ===> ?

Utilities SYSOBJH: 14: 27: 30 User DMDSAC ***** Natural Object Handler ***** - Commands

Utilities SYSOBJH: 14: 27: 30 User DMDSAC ***** Natural Object Handler ***** - 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 ===>

Utilities SYSOBJH: 14: 28: 07 10/10/200 User DMDSAC ***** Natural Object Handler ***** -

Utilities SYSOBJH: 14: 28: 07 10/10/200 User DMDSAC ***** Natural Object Handler ***** - GO Commands - Current command: GO Select a GO command: _ _ _ _ Command ===> HOME UNLOAD SCAN RESTART ADMIN VIEW FIND Go Go to to the the main menu unload function scan function restart load function administration functions view function find function

Utilities SYSOBJH. The “Wizard” will help you build the command(s). 14: 30: 14 10/10/2006

Utilities SYSOBJH. The “Wizard” will help you build the command(s). 14: 30: 14 10/10/2006 User DMDSAC ***** Natural Object Handler ***** - Unload Wizard - The following command will be processed. To change the settings, press PF 7 (Back). To confirm the settings and to execute the command, press ENTER or PF 8 (Next). UNLOAD * LIB XDMD OBJTYPE NE FMNUM 1 TONUM 9999 WHERE REPORT TRANSFER Please press PF 7 (Back) or ENTER/PF 8 (Next). Command ===>

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

Utilities Feeding data to Batch Utilities: Option 1: By Forms mode (%F) Program TSTINPUT: RESET #A (A 10) #B (A 5) INPUT #A / #B WRITE 'A=' #A / 'B=' #B END 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 Data must match the “form” exactly, line by line, field by field. Use commas and new lines to compensate form fields. (ugh).

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

Utilities Feeding data to Batch Utilities: Option 2 By keyword (variable name) Program TSTINPUT: RESET #A (A 10) #B (A 5) INPUT #A / #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 variables did Software AG use in the utility modules? How do I know what to put for the keywords?

Utilities Feeding data to Batch Utilities: By keyword (Header name) RESET #A (A 10)

Utilities Feeding data to Batch Utilities: By keyword (Header name) RESET #A (A 10) #B (A 5) 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. .

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

Utilities Feeding data to Batch Utilities: By keyword (Header name, cont. ) RESET #A (A 10) #B (A 5) 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 Natural ignores the special characters after the field title and uses the unique value to the left of the variale.

Utilities Still having trouble feeding in data? Try using recordings. %B=lib-name Sets destination library

Utilities Still having trouble feeding in data? Try using recordings. %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.

Utilities Feeding data to Batch Utilities: By recordings %BTESTINPT //NAT 2 STEP EXEC NATURAL

Utilities Feeding data to Batch Utilities: By recordings %BTESTINPT //NAT 2 STEP EXEC NATURAL 4 //DBPASSW DD * PASSWORDNOMAP //SYSIN DD * LOGON XDMD %B=XDMD %ATESTINPT TSTINPUT The batch job output: LOGON XDMD %B=XDMD A … THIS IS A B … AND B %B 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 Add-on Products, examples: The basic INPLs; NSC, PRD, NTC … Linked and

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 Dumps and Traces Library SYSEXTP & CMEDF DUMP [abend] Locating BB (prog, lib,

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=

Debugging A quick side note from recent SAG-L thread. Someone encountered a situation where

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.

Configuring Printers VTAM TCP/IP LPR & LPD JES PROFILE= configurations NTPRINT macro & PRINTER=

Configuring Printers VTAM TCP/IP LPR & LPD JES PROFILE= configurations NTPRINT macro & PRINTER= TSQ or TDQ Printer exit available for PM (print mode) parameter.

Application Admin. Software Life Cycle Backups a). Periodic FUSER backup b). ADABAS PLOG c).

Application Admin. Software Life Cycle Backups a). Periodic FUSER backup b). ADABAS PLOG c). ISPF versioning d). 3 rd 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?

Application Admin. Source Software What do you do with programs containing the following? FIND

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

Application Admin. Source Software Locked Objects See Library SYSLK 01 (? ) Write your

Application Admin. Source Software Locked Objects See Library SYSLK 01 (? ) Write your own to update FDIC record(s)

Application Admin. Software Life Cycle Catall and Date/time stamps Discussion or Philosopy of merits/problems.

Application Admin. Software Life Cycle Catall and Date/time stamps Discussion or Philosopy of merits/problems.

NSC Utilities 13: 22: 48 10 -12 *** NATURAL SECURITY *** - Utility Maintenance

NSC Utilities 13: 22: 48 10 -12 *** NATURAL SECURITY *** - Utility Maintenance - 2006 FSEC (25, 177) Co __ __ Utility ____ SYSDDM SYSMAIN SYSTRANS Default _______ YES YES User _______ YES YES Library _______ NO NO NO User-Lib. _____ NO NO YES Message ___________

NSC Utilities 13: 22: 48 *** NATURAL SECURITY *** +--------FUNCTION CODES--------+ ! ! Co

NSC Utilities 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 === +----------------------+

NSC Utilities PAGE 1 13: 24: 55 User ID: *** NATURAL SECURITY *** -

NSC Utilities PAGE 1 13: 24: 55 User ID: *** NATURAL SECURITY *** - User Profile for SYSMAIN Utility - 2006 -10 -12 DBA-GRP A/D Objects -----------A Programming Objects from library to library D Debug Environments from library to library A User Messages from library to library A DDMs from environment to environment Co De Fi Li Mo Re Im Rep FNAT FSEC FDIC --------------------A A A A D D D A A A A A A Status -----Allowed Disallowed Allowed

NSC Utilities PAGE 2 13: 25: 52 User ID: *** NATURAL SECURITY *** -

NSC Utilities PAGE 2 13: 25: 52 User ID: *** NATURAL SECURITY *** - User Profile for SYSMAIN Utility - 2006 -10 -12 DBA-GRP A/D Objects Co De Fi Li Mo Ren Rep FNAT FSEC FDIC ---------------------A Natural Messages A A A from environment A A A to environment A A Profiles A A A from environment A A A to environment A A A D Rules D D D from environment D D D to environment D D DL/I Subfiles D D D from environment D D to environment D D Status -----Allowed Disallowed

NSC Utilities 13: 26: 48 User ID: *** NATURAL SECURITY *** - User Profile

NSC Utilities 13: 26: 48 User ID: *** NATURAL SECURITY *** - User Profile for SYSMAIN Utility - 2006 -10 -12 DBA-GRP A/D Objects -----------A Resources from library to library Co De Fi Li Mo Re Im Rep FNAT FSEC FDIC --------------------A A A A ? What are “Resources” ? Status -----Allowed

NSC Utilities 13: 30: 01 *** NATURAL SECURITY *** - Administrator Services Menu 1

NSC Utilities 13: 30: 01 *** NATURAL SECURITY *** - Administrator Services Menu 1 Code ---G P E L N ? . ---- 2006 -10 -12 FSEC (25, 177) Function --------------------General options PF-keys Logon/countersign errors Logon records Maintenance log records Help Exit -------------------- Code _ Command ===> Enter-PF 1 ---PF 2 ---PF 3 ---PF 4 ---PF 5 ---PF 6 ---PF 7 ---PF 8 ---PF 9 ---PF 10 --PF 11 --PF 12 --Help Exit Flip Adm-2 Canc

NSC Utilities 13: 32: 24 *** NATURAL SECURITY *** - Administrator Services Menu 2

NSC Utilities 13: 32: 24 *** NATURAL SECURITY *** - Administrator Services Menu 2 Code ---1 U Y D X S I ? . ---Code _ 2006 -10 -12 FSEC (25, 177) Function --------------------Environment profiles User default profiles Library and user preset values Utility defaults/templates System-library definitions Application interfaces Help Exit --------------------

NSC Utilities 13: 34: 13 Co __ __ __ Utility ____ NATLOAD NATUNLD SYSBPM

NSC Utilities 13: 34: 13 Co __ __ __ Utility ____ NATLOAD NATUNLD SYSBPM SYSDDM SYSERR SYSMAIN SYSOBJH SYSPARM SYSRPC SYSSAFOS SYSTRANS *** NATURAL SECURITY *** - Define Utility Defaults/Templates - Message ___________ nothing defined nothing defined default defined 2006 -10 -12 FSEC (25, 177)

NSC Utilities 13: 34: 13 Co __ __ AD __ __ Utility ____ NATLOAD

NSC Utilities 13: 34: 13 Co __ __ AD __ __ Utility ____ NATLOAD NATUNLD SYSBPM SYSDDM SYSERR SYSMAIN SYSOBJH SYSPARM SYSRPC SYSSAFOS SYSTRANS *** NATURAL SECURITY *** - Define Utility Defaults/Templates - Me __ no no no de +--- Define Utility Defaults/Templates ----+ ! ! ! AD Add ! ! MO Modify ! ! DE Delete ! ! DI Display ! ! __ <== Select ! ! ! ! +---------------------+ 2006 -10 -12 FSEC (25, 177)

NSC Utilities 13: 37: 39 *** NATURAL SECURITY *** - Template for SYSOBJH Utility

NSC Utilities 13: 37: 39 *** NATURAL SECURITY *** - Template for SYSOBJH Utility - A/D --D Unload Nat Err CPr NRe Ext FDT Mf. D Mf. R --- --- --D D D D 2006 -10 -12 Par Rep Status --- -----D Disallowed D Load D D Delete D D D D D General Admin D FSEC D FDIC D Transfer only Y (Y/N) N Applies as default profile D Disallowed

NSC Utilities 13: 32: 24 *** NATURAL SECURITY *** - Administrator Services Menu 2

NSC Utilities 13: 32: 24 *** NATURAL SECURITY *** - Administrator Services Menu 2 Code ---1 U Y D X S I ? . ---Code S 2006 -10 -12 FSEC (25, 177) Function --------------------Environment profiles User default profiles Library and user preset values Utility defaults/templates System-library definitions Application interfaces Help Exit --------------------

NSC Utilities 13: 43: 05 *** NATURAL SECURITY *** - Define System Libraries -

NSC Utilities 13: 43: 05 *** NATURAL SECURITY *** - Define System Libraries - Co Library ID Library Name __ _____________________ __ ADABAS ONLINE SERVICES SYSAOS Adabas Online Services __ SYSAEO Adabas Cache Services __ NATURAL ISPF SYSISPS 1 ISPF Internal tables/menus SYSISPH 1 ISPF Help data SYSISPFU ISPF User menus/tables __ SYSISPHU ISPF User defined help __ SYSISPIU ISPF User defined information SYSISPX ISPF User exit sources SYSISPE ISPF Examples SYSISPI ISPF Interfaces SYSISPXU ISPF User-modified exit sources __ SYSISPXC ISPF Example User exit sources __ SYSISPDB ISPF Incore Database Modules 2006 -10 -12 FSEC (25, 177) Message __________ defined undefined defined undefined

NSC Utilities 13: 45: 11 Co Library ID __ _____ __ NATURAL SYSADA SYSBPM

NSC Utilities 13: 45: 11 Co Library ID __ _____ __ NATURAL SYSADA SYSBPM SYSDBA SYSDDM SYSEDT SYSERR __ SYSEXCOC __ SYSEXCOM __ SYSEXDDM __ SYSEXINS __ SYSEXNGR __ SYSEXPG __ SYSEXPLG __ SYSEXRM *** NATURAL SECURITY *** - Define System Libraries - 2006 -10 -12 FSEC (25, 177) Library Name _________________ Message __________ Natural Adacall Utility Natural Buffer Pool Maintenance Natural Administrator Utility Natural View Maintenance Utility Natural EDT Utility Natural Error Text Maintenance Natural. X Client Examples Natural. X Server Examples Natural View Examples Natural Tamino Examples Natural Graphics Examples Natural Prog. Guide Examples Plug-in Example Natural Statements Examples defined defined undefined undefined <Obsolete> <from manuals> <Report mode>

NSC Utilities 13: 46: 30 Co Library ID __ _____ __ NATURAL SYSEXTP __

NSC Utilities 13: 46: 30 Co Library ID __ _____ __ NATURAL SYSEXTP __ SYSEXUEX __ SYSEXV SYSEXXT __ SYSINPL SYSMAIN __ SYSMAP SYSMENU SYSMISC SYSNCP __ SYSOBJH SYSPARM __ SYSPLCGC *** NATURAL SECURITY *** - Define System Libraries - 2006 -10 -12 FSEC (25, 177) Library Name _________________ Message __________ Natural Natural Natural Natural Program defined < **USRs**> defined undefined defined <ULDOBJ> defined undefined Appl. Interfaces Library TP-specific Functions Examples for 3 GL Calls Examples of New Features XML Toolkit application INPL Utility Object Maintenance Mapbox Various map sources Miscellaneous Command Processor Object Handler Profile Parameter Maint. Generation

NSC Utilities 13: 47: 31 Co Library ID __ _____ __ NATURAL __ SYSPLMAN

NSC Utilities 13: 47: 31 Co Library ID __ _____ __ NATURAL __ SYSPLMAN __ SYSPLMFE __ SYSPLNEE SYSPLPDC __ SYSPLPGC __ SYSPLWEB __ SYSPLWIZ __ SYSPLXRC SYSRDC SYSRPC SYSTEM SYSTP SYSTRANS SYSUNLD *** NATURAL SECURITY *** - Define System Libraries - 2006 -10 -12 FSEC (25, 177) Library Name _________________ Message __________ Plug-in Manager Mainframe Navigation Metrics Calculation Object Description Schema Generation Web Interface Appliction Wizard XRef Evaluation Natural RDC Utility Natural RPC Utility Natural Default Steplib Natural TP-Monitor-Spec. Utility Natural Transfer Utility Natural Load/Unload Utility undefined undefined defined defined

NSC Utilities 13: 48: 53 *** NATURAL SECURITY *** - Define System Libraries -

NSC Utilities 13: 48: 53 *** NATURAL SECURITY *** - Define System Libraries - Co Library ID Library Name __ _____________________ __ NATURAL SYSUTM BS 2000 UTM-examples SYSUPD Natural UPD Utility NATURAL SECURITY SYSSEC Natural Security Maintenance __ NATURAL WEB Interface SYSWEB Natural Web Interface __ SYSHTML Natural NWW HTML API __ SYSHTMLD Natural NWW Documentation/Demo __ SYSHTTP Natural NWW HTTP API __ PREDICT SYSDIC Predict SYSDICBE Predict Migrate Utility SYSDICCO Predict Conversion SYSDICH Predict Example for Helproutine SYSDICMA Predict Meta data maintenance __ SYSDICTX Predict Internal use 2006 -10 -12 FSEC (25, 177) Message __________ defined undefined defined undefined