Using Strobe for Adabas/Natural

Before you can use Strobe for Adabas/Natural, your Strobe system programmer must specify the appropriate configuration settings on the STRBANCE parameter in the Strobe PARMLIB dataset. For more information, refer to the Advanced-Configuration-Guide.

You can find detailed instructions for submitting measurement requests in the Strobe/ISPF Online Tutorials and in the User-Guide.

Invoking Strobe for Adabas/Natural

As described in Strobe-for-Adabas-Natural-Overview, you can obtain three categories of measurement data with Strobe for Adabas/Natural. One of three data collectors must be invoked depending on whether you want Natural, Adabas, or 3GL measurement data.

Invoking the Natural Data Collector

If you want to include Natural 4GL program measurement data in your Strobe Performance Profile, the Natural data collector must be operating. Use the Natural data collector when you want to measure:

  • Address space that is running a Natural batch program
  • CICS region in which Natural transactions are running
  • IMS region in which Natural transactions are running
  • TSO region that is running Natural.

Strobe automatically invokes the StrobeNatural data collector when you measure:

  • Target program whose name (as given in the PGM= operand of the EXEC statement that invokes the job step) begins with “NATL”.
  • CICS region.

Otherwise, you must specify the StrobeNatural data collector when you add a measurement request.

  • With Strobe/ISPF, you must enter Y in the DATA COLLECTORS field of the Strobe Add Active or Strobe Add Queued panel, then enter Y in the NATURAL field on the  Strobe- Data Collectors panel (See the following figure).
  • With Strobe command language, you must include the NATURAL operand when you submit an ADD operation.

Strobe- Data Collectors Panel

image2021-2-8_19-38-2.png

Invoking the Adabas Data Collector

If you want to include Adabas program measurement data in your Performance Profile, the Adabas data collector must be operating. Use the Adabas data collector when you want to measure the region that is running the Adabas database. Strobe automatically invokes the Strobe Adabas data collector when you measure a target program whose name (as given in the PGM= operand of the EXEC statement that invokes the job step) begins with “ADAB”, or “ADAR”.

Otherwise, you must specify the Strobe Adabas data collector when you add a measurement request:

  • With Strobe/ISPF, you must enter Y in the DATA COLLECTORS field of the Strobe Add Active or Strobe Add Queued panel, then enter Y in the ADABAS field on the Strobe - Data Collectors panel.
  • With Strobe command language, you must include the ADABAS operand when you submit an ADD operation.

Invoking the ADA3GL Direct Call and Adabas SQL Server Statement Call Data Collector

If you have an Adabas database that is accessed by direct calls or Adabas SQL Server statement calls from a 3GL program running in a batch environment, you can invoke the ADA3GL data collector to measure the wait the 3GL program incurred. The data collector for direct calls and Adabas SQL Server statement calls from an ADA3GL program cannot be invoked automatically. Instead you must do one of the following:

  • Specify Y in the ADA3GL field of the Strobe- Data Collectors panel
  • With Strobe command language, include the ADA3GL operand with the ADD operation.

The wait time measurement data is placed in the Attribution of CPU Wait Time Report (STROXNAT Procedure).

Note

If you specify ADA3GL attribution, the Strobe Adabas data collector is automatically invoked. You do not need to specify Y in both the ADA3GL and the ADABAS fields on the Strobe- Data Collectors panel. Strobegenerates an error message if you specify both options. To collect both 3GL and Natural information, you must specify both the ADA3GL and the Natural data collectors.

If you are not interested in the measurement data collected by Strobe for Adabas/Natural, you can disable it as follows:

  • With Strobe/ISPF:
    a. Enter Y in the DATA COLLECTORS field of the Strobe- Add Active Request or Strobe- Add Queued Request panel.
    b. Enter N in the NATURAL or ADABAS field on the Strobe- Data Collectors panel.
  • With Strobecommand language, include the operand NOADABAS or NONATURAL when you submit an ADD operation.

Indexing Natural Programs

For Natural 4GL programs, Strobe for Adabas/Natural can match CPU activity to statement number. You can create a Performance Profile that will display this information in the CPU Usage by Natural Program Statement report with Db2 Information (CPU Usage by Natural Program Statement Report with Db2 Information). Associating the reported statement number with the source code text is a two-step process. You must create:

  • Natural 4GL program listing dataset
  • Map dataset from the listing dataset.

Strobe provides a procedure named STROXNAT that executes both processes. Then you just need to specify the name of the map dataset when you create the Performance Profile.Strobe also provides a procedure named STROXN that only creates the Natural 4GL program listing dataset. Once you have created the listing dataset, you have two options to create a map dataset:

  • In batch, with the STROX procedure
  • In Strobe/ISPF, with Option 5.

These procedures are described in the sections that follow. If you do not have access to the Strobe procedures, see your Strobe system programmer. The installation of these procedures is described in the Advanced-Configuration-Guide.

Using the STROXNAT Procedure to Create a Map Dataset in Batch

The STROXNAT procedure (STROXNAT Procedure) creates a listing dataset that includes the Natural 4GL program source listing, the database identification number, and the file number. The procedure uses the listing dataset to create the map dataset.

Setting Default Parameters in the STROXNAT Procedure

Before you execute STROXNAT for the first time, specify default values for the parameters highlighted in STROXNAT Procedure. Once you have specified values, execute STROXNAT, supplying its run-time parameters as described in Executing the STROXNAT Procedure.

You can override any of the STROXNAT parameters at run time by specifying a new value for that parameter when you execute the procedure.

STROXNAT Procedure

image2021-2-8_19-42-50.png

Executing the STROXNAT Procedure

The following description and the example at the end of this section explain how to execute the STROXNAT procedure.

  • Invoke the STROXNAT procedure and supply the following run-time parameters:

    Parameter:

    Value:

    NATBNUC

    The name of your Natural batch nucleus

    NPARM

    Additional Natural utility parameters (Use the FUSER parameter to specify the Adabas database ID and file number of the Natural program library.)

    NINDX

    High-level qualifier of the Natural load library

    AINDX

    High-level qualifier of your Adabas load library

    ADAPARM

    The name of your Adabas parameters library

    MAPDSN

    The name of the output map dataset to be created by the STROXNAT procedure

  • In the UNLOAD.SYSIN dataset:
    • Specify the NATUNLD utility to include the database identification number and the file number in the listing dataset.
    • Specify the LIST system command to include the Natural 4GL program source listing in the listing dataset. STROXNAT uses the listing dataset to create the map dataset.
    • Replace natprog with the name of the Natural 4GL program to be included in the listing dataset.
    • Replace libname with the name of the Natural library in which the Natural 4GL program resides.

  • Execute the STROXNAT procedure as shown below:

    //NATURAL  EXEC STROXNAT,
    //         NATBNUC=NAT412BA,
    //         NPARM='FUSER=(1,9)',
    //         NINDX='NATURAL.NAT412',
    //         AINDX='ADABAS.V519',
    //         ADAPARM='NATURAL.NAT412.JCL(ADAPARM)',
    //         MAPDSN='NATURAL.NATPROG.MAPDSN'
    //UNLOAD.SYSIN   DD *

    NATUNLD SAVED natprog FM LIB libname WITH TYPE P
    .
    LOGON libname
    LIST natprog EXP C *

For more information on NATUNLD, see the Natural Utilities Manual. For more information on using the LIST system command, see the Natural Reference Manual specific to the release you are using.

Using the STROXN Procedure to Create a Listing Dataset in Batch

The STROXN procedure (STROXN Procedure) creates a listing dataset that includes the Natural 4GL program source listing, the database identification number, and the file number. After executing the STROXN procedure, you can either submit the listing dataset to Strobe/ISPF or run the STROX procedure to create a map dataset.

Setting Default Parameters in the STROXN Procedure

Before you execute STROXN for the first time, specify values for the default parameters highlighted in STROXN Procedure. Once you have specified values, execute STROXN, supplying its run-time parameters as described in Executing the STROXNAT Procedure.

You can override any of the STROXN parameters at run time by specifying a new value for that parameter when you execute the procedure.

STROXN Procedure

image2021-2-8_19-47-20.png

Executing the STROXN Procedure

The following description and the example at the end of this section explain how to execute the STROXN procedure.

  • Invoke the STROXN procedure and supply the following run-time parameters:

    Parameter:

    Value:

    NATBNUC

    The name of your Natural batch nucleus

    NPARM

    Additional Natural utility parameters (Use the FUSER parameter to specify the Adabas database ID and file number of the Natural program library.)

    NINDX

    High-level qualifier of the Natural load library

    AINDX

    High-level qualifier of your Adabas load library

    ADAPARM

    The name of your Adabas parameters library

    LISTDSN

    The name of the output dataset to be created by the STROXN procedure

  • In the UNLOAD.SYSIN dataset:
    • Specify the NATUNLD utility to include the database identification number and the file number in the listing dataset.
    • Specify the LIST system command to include the Natural 4GL program source listing in the listing dataset.
    • Replace natprog with the name of the Natural 4GL program to be included in the listing dataset.
    • Replace libname with the name of the Natural library in which the Natural 4GL program resides.

  • Execute the STROXN procedure as shown below:

    //NATURAL EXEC STROXN,
    //         NATBNUC=NAT412BA,
    //         NPARM='FUSER=(1,9)',
    //         NINDX='NATURAL.NAT412',
    //         AINDX='ADABAS.V519',
    //         ADAPARM='NATURAL.NAT412.JCL(ADAPARM)',
    //         LISTDSN='NATURAL.NATPROG.LISTING'
    //UNLOAD.SYSIN   DD *

    NATUNLD SAVED natprog FM LIB libname WITH TYPE P
    .
    LOGON libname
    LIST natprog EXP C *

For more information on NATUNLD, see the Natural Utilities Manual. For more information on using the LIST system command, see the Natural Reference Manual for the release you are using.

Using Strobe/ISPF to Create a Map Dataset

To create a map dataset with Strobe/ISPF, enter the following on the Strobe- Index to Create a Map Dataset panel (Strobe - Index to Create a Map Dataset Panel):

  • Y in the ADABAS/NATURAL PROGRAM LANGUAGE field
  • Name of the map dataset in the OUTPUT: Map dataset field
  • Name of the output listing dataset, created by the STROXN procedure, in one of the INPUT: Compiler SYSPRINT Datasets fields.

You can concatenate several listing datasets to produce one map dataset by entering more than one listing dataset name in the INPUT fields.

Strobe- Index to Create a Map Dataset Panel

image2021-2-8_19-50-51.png

Using the STROX Procedure to Create a Map Dataset

Execute the STROX procedure to index the program and create a map dataset, supplying these parameters:

Parameter:

Value:

MAPPGM

STRXNAT (the Natural Indexer program)

LISTDSN

The name of the listing dataset created by the STROXN procedure

MAPDSN

The name of the output map dataset


//INDEX    EXEC  STROX,
//               MAPPGM=STRXNAT,
//               LISTDSN='NATURAL.NATPROG.LISTING',
//               MAPDSN='MY.MAP.FILE'

To index several source listings and produce only one map dataset, override the LISTING DD statement in the STROX procedure with a concatenation of the sequential dataset names.

//INDEX    EXEC STROX,
//                  MAPPGM=STRXNAT,
//                  MAPDSN='MY.MAP.FILE'
//MAP.LISTING DD    DSN=NATURAL.NATPROG.LISTDSN1,DISP=SHR
//                  DSN=NATURAL.NATPROG.LISTDSN2,DISP=SHR

Indexing Performance Profiles

A Natural map dataset is identical in format to those produced by the other Strobe Indexers. When you produce a Performance Profile, you can concatenate Natural map datasets with each other and with map datasets produced by the other Strobe Indexers. The User-Guide explains how to produce Strobe reports.

Using AutoStrobe

You may also be interested in measuring multiple jobs at the same time, providing you with a broad picture of what is happening on a system at a given time. The Strobe AutoStrobe option enables you to measure jobs that are executing in different, but related, address spaces at the same time.

For example, you can measure a batch Natural program and the related Adabas region. By reviewing the Performance Profiles for the Natural program as well as the Adabas region, you can then analyze the complete performance impact of the application.

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*