Skip to Content

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 data set. 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 Using-Strobe-to-measure-online-applications-and-batch-programs.

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-8-11_12-31-35.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).

Warning

Important

If you specify ADA3GL attribution, the  Adabas data collector is automatically invoked. You do not need to specify Y in both the ADA3GL and the ADABAS fields on the - Data Collectors panel. generates 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 data set
  • Map data set from the listing data set.

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

  • 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 Data set in Batch

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

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 data set to be created by the STROXNAT procedure

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

  • Execute the STROXNAT procedure as shown in the following code block.

    //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 data set in Batch

The STROXN procedure (STROXN Procedure) creates a listing data set 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 data set to Strobe/ISPF or run the STROX procedure to create a map data set.

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 data set to be created by the STROXN procedure

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

  • Execute the STROXN procedure as shown in the following code block.

    //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 Data set

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

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

You can concatenate several listing data sets to produce one map data set by entering more than one listing data set 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 Data set

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

Parameter:

Value:

MAPPGM

STRXNAT (the Natural Indexer program)

LISTDSN

The name of the listing data set created by the STROXN procedure

MAPDSN

The name of the output map data set


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

To index several source listings and produce only one map data set, override the LISTING DD statement in the STROX procedure with a concatenation of the sequential data set 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 data set is identical in format to those produced by the other Strobe Indexers. When you produce a Performance Profile, you can concatenate Natural map data sets with each other and with map data sets produced by the other Strobe Indexers. The Using-Strobe-to-measure-online-applications-and-batch-programs 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*

BMC AMI Strobe 21.01