N2O

1
N2O
NATURAL Change Management with 3GL
Support, Source Compare, and N2OSCAN
Track and manage changes to business-critical
applications and installations
N2O is a product of Treehouse Software, Inc. All
rights reserved.
2
Introduction

• Migrates DDMs, Metadata, NATURAL objects,
  PREDICT objects, and SYSERR messages
• N2O/3GL migrates members stored in LIBRARIAN,
  PANVALET, ENDEVOR, or MVS PDSs
• Project Tracking maintains information about
  organizational activities
• N2OSCAN scans Natural objects for strings over
  a user specified object/library range.
• Extensive reporting features ease recovery and
  audit requirements.

3
Sample Environment 1
4
Sample Environment 2
5
N2O Subsystems

• Migrations
• Reporting
• Project Tracking
• Toolbox
• Environment (this is an N2O administrator
  function, and is shown last)

6
Migrations

• Accomplished Online or Batch
• Source, object or both
• Move or Copy
• DB2 Processing
• Verify object timestamps
• Autocompile, target compilation
• Stow, CAT
• Automatic Recovery
• XREF at the Target
• Verify existence of PREDICT Documentation

• Multiple target migrations
• Electronic authorization (up to 10 levels)
• Integrated with PREDICT XREF as an option
• Archive and Recovery
• Checkout/Checkin
• Emergency Recovery
• Audit trails and extensive reporting of migration
  activity

7
Add Migration Request
03-12-31 N-2-O REQUEST EVENT MENU
TSI0373 113800
TSI1 Code Function ---- ----
----------------------------- A Add an
Event C Copy an Event D Delete an
Event I Inquire an Event M Modify an
Event R Recovery from Archive S Select
Events for Processing . Terminate Request
Event Menu ---- ------------------------------
--- Enter Code A Event PAYROLL
Type N Sequence
_______ Status _
Direct Command _____________________
MIG REQ Enter-PF1---PF2---P
F3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF1
1--PF12- HELP ---- END ENV MIG REP
TOL USR PRJ ---- ---- EXIT

• Events are requested to build migration requests.
  Master Events (such as PAYROLL) are defined by
  the administrator as templates for use by the
  development teams.

8
NATURAL Migration Request
03-12-31 N-2-O ADD AN EVENT
TSI0373 113800
Event PAYROLL Sequence 17
TSI1 From Env TEST From
Library PAYTEST To Env PROD To
Library PAYPROD Process Date 03-12-31
Process Time 113800 Starting Pgm
FEDTAX Include Objects from UEX15N THIS
IS A SAMPLE MIGRATION REQUEST________________
C ________________________________________
__________ o _________________________
_________________________ m
__________________________________________________
m ___________________________________
_______________ e ____________________
______________________________ n
__________________________________________________
t ___________________________________
_______________ s ____________________
______________________________ Enter-PF1---PF2--
-PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--P
F11--PF12- HELP ---- END ---- ----
---- ---- ---- ---- ---- ---- ----

• This occurrence of the Event PAYROLL (sequence
  17), will migrate programs from Env. TEST,
  library PAYTEST to Env. PROD, library PAYPROD.

9
Program Selection List
Type A to Add Program to the Event, D to
Delete 03-12-31 N-2-O ADD AN
EVENT TSI0373 113800
Event PAYROLL Sequence 17
TSI1 From Env TEST From Library
PAYTEST To Env PROD To Library PAYPROD
Starting Program
FEDTAXC Object Object S Object
Type S/C Message S Object
Type S/C Message A FEDTAXC COPYCODE S _
FEDTAXL LOCAL S _ FEDTAXM MAP S A
FEDTAXP PROGRAM S _ FEDTAXS SUB-RTN
S _ FICAC COPYCODE S _ FICAL LOCAL
S _ FICAM MAP S _ FICAP PROGRAM S
_ FICAS SUB-RTN S _ LIFEINSC COPYCODE S _
LIFEINSL LOCAL S _ LIFEINSM MAP S A
LIFEINSP PROGRAM S _ LIFEINSS SUB-RTN S _
PENSIONC COPYCODE S _ PENSIONL LOCAL S _
PENSIONM MAP S _ PENSIONP PROGRAM S _
PENSIONS SUB-RTN S _ SALARYC COPYCODE S _
SALARYL LOCAL S _ SALARYM MAP S _
SALARYP PROGRAM S Enter-PF1---PF2---PF3---PF4---P
F5---PF6---PF7---PF8---PF9---PF10--PF11--PF12-
HELP ALL END ---- ---- TOP UP DOWN
BOT ---- ---- STOP

• Objects to be included in this migration request
  are selected from a list of objects checked out
  to the user.

10
Selection List Confirmation
Programs selected for migration, Press ENTER
to proceed 03-12-31 N-2-O ADD
AN EVENT TSI0373 113800
Event PAYROLL Sequence 17
TSI1 From Env TEST From Library
PAYTEST To Env PROD To Library PAYPROD
Starting Program
FEDTAXC Object Object S Object
Type S/C Message S Object Type S/C Message
_ FEDTAXC COPYCODE S REPLACE _ FEDTAXL LOCAL S
_ FEDTAXM MAP S _ FEDTAXP PROGRAM S REP
LACE _ FEDTAXS SUB-RTN S
_ FICAC COPYCODE S _ FICAL LOCAL S
_ FICAM MAP S _ FICAP PROGRAM S
_ FICAS SUB-RTN S _ LIFEINSC COPYCODE S
_ LIFEINSL LOCAL S _ LIFEINSM MAP
S _ LIFEINSP PROGRAM S ADD _ LIFEINSS SUB-RTN
S _ PENSIONC COPYCODE S _
PENSIONL LOCAL S _ PENSIONM MAP S _
PENSIONP PROGRAM S _ PENSIONS SUB-RTN S
_ SALARYC COPYCODE S _ SALARYL LOCAL S _
SALARYM MAP S _ SALARYP PROGRAM S En
ter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8-
--PF9---PF10--PF11--PF12- HELP ---- END
---- ---- TOP UP DOWN BOT ---- ----
STOP

• The "Message" field indicates the action to be
  taken in the target Environment.

11
XREF Option
Programs selected for migration, Press ENTER
to proceed 03-12-31 N-2-O ADD
AN EVENT TSI0373 113800
Event PAYROLL Sequence 17
TSI1 From Env TEST From Library
PAYTEST To Env PROD To Library PAYPROD
Starting Program FEDTAXC
Object Object S Object
Type --------------------------------------
S/C Message A FEDTAXC COPYCODE
Select an Option S _ FEDTAXM
MAP
S REPLACE _ FEDTAXS SUB-RTN X Include
XREF objects in S ADD _ LIFEINSL
LOCAL the Event.
S A LIFEINSP PROGRAM
S _ Do not
include XREF objects in the
Event.

-------------------------------------- Ente
r-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---
PF9---PF10--PF11--PF12- ---- ---- END
---- ---- TOP UP DOWN BOT ---- ----
STOP

• The Cross Reference selection option is specified
  by the administrator to allow selection of cross
  referenced objects during the object selection
  process.

12
XREF Selection List
Type A to ADD program to the Event. 03-12-31
N-2-O XREF LISTING
TSI0373 113800
TSI1 From Env
TEST From Library PAYTEST To Env PROD To
Library PAYPROD S Object Explanation
Programs selected for migration -
-------- ----------------------
-------------------------------------- A
FEDTAXS Affected by changes to FEDTAXC A
FEDTAXM Invoked by FEDTAXP A
LIFEINSC Invoked by
LIFEINSP Enter-PF1---PF2---PF3---PF4---
PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12-
HELP ---- END ---- ---- ---- ----
---- ---- ---- ---- EXIT

• The XREF listing displays objects that could be
  impacted by changes to the objects selected
  (based on Predict XREF information).

13
Event Processing Screen
------------------------------
ENT PROCESSING SCREEN
TSI0373 Migration complete for
PAYROLL Sequence 17 TSI1
Event
PAYROLL PAYTEST To Env PROD To Library
PAYPROD Sequence 17 e
Control PAY1001
------------------------------
Migrated Archived
Source Object Source
Object --------------------------------
-------- -------- -------- --------


FEDTAXC
REPLACED ADDED FEDTAXP
REPLACED
ADDED LIFEINSP 3 out of 3
ADDED

• Online migrations display the objects migrated
  similar to the Natural CATALL Command execution.

14
Checkout/Checkin

• Base Environment usually the production
  environment (where the locked version of source
  code resides)
• Checkout occurs when an object migrates from a
  BASE environment to a non-base environment.
• Checkin occurs when a previously checked out
  object migrates from a non-base environment back
  to the original BASE environment.

15
Checkout/Checkin

• Protects the integrity of an object by
  restricting the migration process
• The levels of concurrent development can be
  specified
• N2OEDIT limits edit capability to the Checkout
  user
• SPoD connection to limit edit capability to the
  Checkout user
• Extract a program copy for reference purposes
  (migrate without a checkout)

16
Checkout/Checkin Utilities

• Checkout new objects for development
• Cancel a checkout
• Transfer ownership of a checked-out object
• Reject a checkout, returning to previous status

17
Autocompile

• Compiles objects in proper CAT/STOW order
• Optional compile of XREFd objects on the target
• Produces a complete compilation error report

18
Other Migration Types

• Data Definition Modules
• Metadata
• PREDICT Objects
• SYSERR User-Supplied Messages
• 3GL Programs and Other Objects

19
PREDICT Migration Request

• 03-12-31 N-2-O ADD AN EVENT
  TSI0373
• 113800 Event PAYROLL
  Sequence 18 TSI1
• From Env --------------------
  
• To Env Objects
  
• Process Date - ----- - ---
  113800
• _ DA _ PR
  
• _ DC _ RL
  
• Change Control _ ET _ RP
  
• Inclu _ FI _ RT
  N
• C ______________ _ KY _ SC
  ___________
• o ______________ _ LS _ SV
  ___________
• m ______________ _ MO _ SY
  ___________
• m ______________ _ NO _ US
  ___________
• e ______________ _ NW _ VE
  ___________
• n ______________ _ PG _ VM
  ___________
• t ______________ _ UDE
  ___________
• s ______________--------------------
  ___________

20
3GL Migration Request

• 03-12-31 N-2-O ADD AN EVENT
  TSI0373
• 113800 Event PAYROLL
  Sequence 19 TSI1
• From Env -------------------
  
• To Env
  
• Process Date S Categories
  113800
• - ----------
  
• _ ASMB
  
• _ COBOL
  
• THIS IS A SAMP _ FORT
  
• C _______________ _ PL/I
  ______________
• o _______________ _ RPG
  ______________
• m _______________ _ DATA
  ______________
• m _______________ _ JCL
  ______________
• e _______________ _ OTHER
  ______________
• n _______________-------------------
  ______________
• t ____________________________________
  ______________
• s ____________________________________
  ______________

21
Batch Migration

• Request initiated on-line
• Post dating
• Off-peak
• Required for remote nodes

22
Batch Migrations
23
Reporting Subsystem
24
History of an Object
03-12-31 N-2-O OBJECT REPORTING
TSIO373 113800
HISTORY OF AN OBJECT
TSI1 Object MENU
Page 1

Event/
From To Mig Arch Purg Added
X Date Utility Seq Env Env
Message S/C S/C S/C User-ID - --------
-------- ----- ---- ---- ------- ----
---- ---- ------- _ 99-10-16 PAYIN 67
TEST PROD REPLACE S S TSIO391
_ 99-10-14 EXTRACT 3209 PROD TEST
REPLACE S S TSIO517 _ 99-10-13
PAYQA 112 DEV TEST REPLACE S S
TSIO391 _ 99-08-13 PAYOUT 205
PROD DEV REPLACE S S TSIO391
_ 99-08-12 CANCEL PROD DEV
TSIO377 _ 99-08-11
CHECKOUT PROD DEV
TSIO376 _ 99-05-13 EXTRACT 3122
PROD TEST ADD S TSIO381
_ 99-05-08 EXTRACT 3116 PROD TEST
REPLACE C TSIO383 _ 99-05-03
PAYIN 20 TEST PROD REPLACE S S/C
TSIO387 _ 99-03-19 PAYQA 30
DEV TEST REPLACE S/C C TSIO387
_ 99-03-19 PAYOUT 99 PROD DEV
REPLACE S S TSIO387 _ 99-02-23
EXTRACT 2980 DEV TEST REPLACE C C
TSIO385 _ 99-02-22 EXTRACT 2978
PROD TEST REPLACE C C TSIO374

Enter-PF1---PF2---PF
3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11
--PF12--- ---- ---- END ---- ----
---- ---- ---- ---- ---- ---- STOP
25
Autocompile Summary for Events

• 03-12-31 N2O EVENT REPORTING
  TSI0373
• 113800 AUTOCOMPILE SUMMARY
  
• TSI01A
• Change --- Closed ---
  --- Autocompiled ----
• X Event Seq Control Date Time
  Date Time Warning
• - ------- --- ------- -------- --------
  -------- -------- --------
• _ PAY-IN 12 A12345 03-12-31 113800
  03-12-31 113800 AC-ERROR
• _ PAY-IN 13 A12345 03-12-31 113800
  03-12-31 113800
• _ PAY-IN 14 C67890 03-12-31 113800
  03-12-31 113800
• _ PAY-IN 15 A12345 03-12-31 113800
  03-12-31 113800
• _ PAY-IN 16 B45678 03-12-31 113800
  03-12-31 113800 AC-ERROR
• _ PAY-IN 17 A12345 03-12-31 113800
  03-12-31 113800
• _ PAY-OUT 24 B45678 03-12-31 113800
  03-12-31 113800
• _ PAY-OUT 25 C67890 03-12-31 113800
  03-12-31 113800
• _ PAY-OUT 26 C67890 03-12-31 113800
  03-12-31 113800
• _ PAY-OUT 27 B45678 03-12-31 113800
  03-12-31 113800
• _ PAY-OUT 28 A12345 03-12-31 113800
  03-12-31 113800
• _ PAY-OUT 29 A12345 03-12-31 113800
  Canceled Canceled

AC-ERROR indicates an object(s) failed compile
26
Autocompile Summary Details
03-12-31 N-2-O AUTOCOMPILE DETAILS
TSIO373 113800
Event PAYIN Sequence 3
TSI1 From Env TEST From Library PAYTEST
To Env PROD To Library PAYPROD
Target Object -------- Autocompiled
------ XREF Object Type Date
Time User-ID ------ --------
-------- -------- -------- --------
CINCLUDE COPYCODE 99-03-15 101732
TSIO373 PROGRAM1 PROGRAM
99-03-15 101735 TSIO373
LOCAL1 LOCAL 99-03-15 101740 TSIO373
SUBRTN1 SUB-RTN Error 82
1060Enter-PF1---PF2---PF3---PF4---
PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
---- ---- END ---- ---- ---- ----
---- ---- ---- ---- STOP
SUBRTN1 failed compile with a NAT0082 error on
line 1060
27
Project Tracking

• Collects requests for application modifications
  from
• Management
• Project Team
• End Users
• Documents each task in a project
• Tracks a task through its stages from definition
  through completion
• Allows the progress of a project to be assessed
  quickly through on-line and batch reports
• Reporting options available for History of a
  Task, Task Details, Project Status, Custom
  Reports

28
Integrated with N2O

• N2O Events can be associated with a Task to
• Provide extensive documentation for each
  migration request
• Supply a list of objects to be migrated in the
  request
• Prevent migration of objects based on the status
  of the Task

29
Toolbox

• 03-12-31 N-2-O PROGRAMMER TOOLS
  MENU TSIO373
• 113800
  TSI1
• Code Function
• ---- -------------------
  -------
• C Object Compare
• D Source Compare
• S N2OSCAN Utility
• . Terminate
  Programmer Tools
• ---- -------------------
  -------
• Enter Code _ Type _

30
Source Compare
01-01-15 N-2-O SOURCE COMPARE
UTILITY Report Page 1 140800
Source Code Object
Page 1 Base gtgtgtgt Env Def D230 Library
LIB-ONE PROGRAM PGM-ONE Mode REPORT gtgtgtgt
Comp Env Def D230 Library LIB-TWO PROGRAM
PGM-TWO Mode REPORT
........1........2........3........4........5
........6....... 0010 0010 THIS IS A PROGRAM
IN THE PAYROLL SYSTEM WHICH.... ....
ltltlt MATCHING BLOCK gtgtgt0050 0050 MOVE 1 TO
INDEX0060 ---- ADD 3 TO TOTAL0070 ---- IF
TAX-1 TAX-20080 ---- DO0090 ----
WRITE 'THE FIGURES DO NOT MATCH' DOEND---- 0060
ADD 2 TO TOTAL 0100 0070 CALCULATION
ROUTINE... ... ltltlt MATCHING
BLOCK gtgtgt0140 0110 SUBTRACT 1 FROM
REMAINDER0150 ---- RESET I J 0160
0120 Enter-PF1---PF2---PF3---PF4---PF5---
PF6---PF7---PF8---PF9---PF10--PF11--PF12---
---- ---- END INFO ---- ---- ----
---- ---- LEFT RIGHT ----
Lines 10 - 50 are identical
Lines 60 90 have been deleted from the
version in LIB-TWO
Lines 60 in LIB-TWO has no match in LIB-ONE
Lines 100 - 140 in LIB-ONE match 70 110 in
LIB-TWO

• This screen shows the differences found between a
  pair of objects.

31
Compare Source Programs
01-12-31 N-2-O SOURCE
COMPARE UTILITY Report Page 4
113800 Range Statistics
Object Page 1

Env Dbid Fnr Library
Object Type Date Time Ver
---- ----- ----- -------- -------- --------
---------- -------- ----- Base D230
230 54 LIB-ONE PGM-ONE PROGRAM 2001/01/13
104754 2.2.8 Compare D230 230 54
LIB-TWO PGM-TWO PROGRAM 2001/02/08 092321
2.2.8 Mode Terminal Userid OS
TP Mon Trans Size
-------- -------- -------- -------- --------
-------- ------ Base STRUCT TSITERM
TSI300C MVS/ESA TSO TDEV 1,470 Bytes
Compare STRUCT TSITERM TSI300D MVS/ESA
TSO TPRD 1,873 Bytes
Source Comment Total Lines Lines
Lines ------ ------- -----
Base 7 9 16 Compare 4
8 12 11 Lines match in both
objects Options were as follows Ignore
Comments - Y Ignore Positions - 123
Ignore Spacing - Y Ignore
Identical Objects - Y Enter-PF1---PF2---PF3---PF4
---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12-
-- ---- ---- END ---- ---- ----
---- ---- ---- ---- ---- ----

• Range Statistics include the total number of
  identical, changed, and total unique NATURAL
  objects.

32
N2OSCAN

• A single scan
• Searches NATURAL code in a user-specified range
  of objects and libraries
• May search for up to 50 user-specified strings
• Example Scan Parm Set
• This example specifies to include DATE, while
  excluding UPDATE
• Scan output
• Stored in an ADABAS file
• May be viewed in reports on-line and in batch

ENVPROD,START-LIBPAYROLL,START-OBJPAY,END-OBJP
AYPGM6 I,Y,DATE E,N,UPDATE
33
N2OSCAN - Select Object Scan Output Set
Valid Values LList strings found, SSource
View 03-12-31 N-2-O SELECT OBJECT SCAN
OUTPUT SET TSI004 113800

TSI019 User ID TREE18
Environment PROD Scan Parm Set SCPRD1
Start Library PAYROLL Start Object PAY
End Library
End Object PAYPGM6 Library
PAYROLL Start List at Object ________
Obj Lines Lines Lns NonCom NonCom
NonC S Object Type Hit Total Hit
LnsHit LnsTot LnHit - -------- ------
------ ------ ----- ------ ------ ----- _
PAYCALC N 10 49 20.4 9 48
18.8 _ PAYPGM1 P 15 632
2.4 11 621 1.7 _ PAYPGM2 M
1 111 0.9 1 98 1.0 _
PAYPGM4 C 12 57 21.1 11 56
19.6 _ PAYPGM5 N 26 391
6.6 8 385 2.1 Enter---PF1---PF2---PF3
---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11-
-PF12 HELP ----- END ----- ----- -----
UP DOWN ----- gtZERO ----- ----

• Note the number of hits for comment and
  non-comment lines for each program, subprogram,
  etc.

34
N2OSCAN - Object Source View
gt SUB-PGM PAYCALC Lib PAYROLL
.......1........2........3........4........5.
......Mode STRUCT 0010 DEFINE DATA 0020
PARAMETER 0030 01 NAME (A30) 0040
LOCAL USING EMPVIEW 0050 LOCAL 0060
01 CURRENT-DATE (A6) 0070 END DEFINE 0080
0090 MOVE EDITED DATX (EMYYMMDD) TO
CURRENT-DATE 0100 0110 FIND EMP-INFO BY KEY
WHERE EMP-NAME NAME 0120 ACCEPT IF EMP-RAISE
'Y' 0130 REJECT IF EMP-HIRE-DATE gt
CURRENT-DATE 0140 IF CURRENT-DATE GE
EMP-RAISE-DATE 0150 COMPUTE EMP-SALARY
EMP-SALARY EMP-SALARY 0.05 0160
UPDATE 0170 ELSE 0180 INPUT WITH TEXT
'RAISE DATE FOR THIS EMPLOYEE NOT REACHED' 0190
USING MAP INVALID-DATE-MAP 0200
END-IF PF3-EXIT
PF4-UPDATE INFO
Strings found are highlighted
Note that UPDATE is not highlighted on line 160
35
N2OSCAN - Scan Output Detail Function
03-12-31 N-2-O SCAN OUTPUT DETAIL
TSI004 113800

TSI019 User ID TREE18 Environment
PROD Scan Parm Set SCPRD1 Start Library
PAYROLL Start Object PAY
End Library End Object
PAYPGM6 Library PAYROLL Object
PAYCALC Type N Line Nbr C String Found ---- -
--------------------------------------------------
-------------- 0060 CURRENT-DATE 009O
CURRENT-DATE 0130 EMP-HIRE-DATE 0130
CURRENTDATE 0140 CURRENT-DATE 0140
EMPRAISEDATE 0180 DATE 0190
INVALIDDATEMAP 0210 DATE 0300 DATE 0410
EMP-RAISE-DATE Enter---PF1---PF2---PF3---PF4---PF
5---PF6---PF7---PF8---PF9---PF10--PF11--PF12
HELP ----- END ----- ----- ----- UP DOWN
----- ----- ----- ----
Lists the strings found in a specific object
36
Documentation Tools

• Assists in documentation and debugging NATURAL
  applications by providing utilities to
  display/print
• NATURAL Objects
• File Layouts
• Descriptor X-REF Information
• Object Flow Analysis
• Object X-REF
• Archived 3GL Objects

37
Documentation ToolsNATURAL Object Listing
Function
03-12-31 N-2-O DOCUMENTATION
TOOLS REPORT PAGE 1 113800
NATURAL OBJECT LISTING
OBJECT PAGE 1 Env Def
B1 Library Paytest PROGRAM FEDTAXP
Mode Struct BATCH02 ---------------------
--------------------------------------------------
----- Type Date Time User-ID Terminal
Ver OS TP Mon Trans ----
-------- -------- -------- -------- ------
-------- -------- -------- Src 97-12-04
111026 TREE06 TSI01D 2.1.6 CMS VM/CMS
NT216 Obj 97-12-04 111026 TREE06
TSI01D 2.1.6 CMS VM/CMS NT216
-----------------------------------------------
----------------------------- Source Size
452 Bytes
User Area (USIZE) 370 Bytes
Buffer Pool Size 1148 Source
Area (ESIZE) 10 Bytes Number Subroutines
1 ------------------------------
---------------------------------------------- 00
10 DEFINE DATA 0020 GLOBAL USING PAYROLLG
N 10 gt 1 TOTAL 0030
0040 LOCAL USING FEDTAXL gt 1 SALARY
N 6 gt 1
TAX-RATE
N .2 gt 1 DECISION
A 1 0050 END DEFINE
(Continued on next page)
38
Documentation Tools NATURAL Object Listing
Function (continued)
0060 0070 REPEAT 0080 0090 INPUT USING MAP
FEDTAXM 0100 WRITE TOTAL TAXES DUE FOR SOCIAL
SECURITY SS 0140 INCLUDE FEDTAXC gt 0010 gt
0020 WILL CALCULATE THE TOTAL TAXES OWED gt 0030
gt 0040 COMPUTE TOTAL TAX-RATE
SALARY 0150 PERFORM FEDTAXS 0160 0170 IF
DECISION N 0180 INPUT FUNCTION
TERMINATED 0190 ESCAPE BOTTOM 0200
END-IF 0210 END-REPEAT 0220 END
INCLUDE FEDTAXC is expanded
39
Security

• Function Profile Functional access to screens
• Approval Profile Migration profiles (paths)
  allowed
• PREDICT Profile PREDICT migrations allowed
• 3GL Profile 3GL migrations allowed
• SECURITRE Interface

40
N2O Summary

• Adapts to your environment
• Provides control over NATURAL application
  development
• Enhances program integrity
• Features simple installation and use
• Provides valuable tools
• Offers extensive reporting and audit tracking

41
Environment ConsiderationsEnvironment Definition
03-12-31 N-2-O ENVIRONMENT
DEFINITION TSI0371 113800

TSI1 Env Def PROD
Updated TSI0371 03-12-31
113800 Desc PAYROLL PRODUCTION
ENVIRONMENT ________ Base Env
YES Auth Required YES_
Archive ARC1 3GL Node ____
3GL Interface __________
NODE DBID
FNR Password Cipher Code
---- ---- --- --------
----------- FUSER CPU1 200
201 ________ ________ FDIC
CPU1 200 202 ________ ________
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---
PF8---PF9---PF10--PF11--PF12 HELP ----
END ---- ---- ---- ---- ---- ---- ----
---- ----
Multiple "Environment definitions" can be defined
for each Natural Environment.
42
Environment ConsiderationsAdd a Migration
Profile
03-12-31 N-2-O ADD A MIGRATION
PROFILE TSIO373 113800

TSI1

From Env TEST To Env
PROD Updated
TSI1 99-05-01 104940
Desc TEST TO PROD
MIG PROF

Mode BOTH DB2 Processing
N Type
BOTH Verify Object NO_
Migrate XREF N
Program Doc NO_

Autocompile
NO__ Migration Method COPY
Auto Rec N
Deferred Time 0___ hrs.
XREF Target ACGHLMNPST4

Delay AUTH
Levels of Auth 3_

JCL
Library N2OBATCH 3GL JCL Lib
________ JCL Program
N2OMIGR 3GL JCL Pgm ________
PREDICT JCL Pgm ________ 3GL
JCL Arch ________

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

• Multiple "migration profiles," or standard paths
  of migration, can be defined.

43
Environment ConsiderationsMaster Event
03-12-31 N-2-O ADD A MASTER EVENT
TSIO373 113800

TSI1 Event CHECKOUT
Updated TSIO373 03-12-31
113800 Desc
______________________________
From Env TEST From Library
PAYT To Env PROD To
Library PAYP Starting Pgm
________ Ending Pgm ________
Change Cntl N Project Tracking
N Lock Event NO_
Extract Event NO_ Comments
NO_ Extract Rename NO_
Event Purge 180 Enter-PF1---PF2---PF3---PF4-
--PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--
- HELP ---- END ---- ---- ---- ----
---- ---- ---- ---- ----

• An Event name identifies a standard migration
  process.

44
Sampling of User-Exits

• When user enters MENU
• When migration is first requested
• When objects are selected
• When a migration is ready for authorization
• At completion of migration

45
Questions