This transaction uses the summary function to show cumulated data for statistical purposes. The RPC Generation is executed in Direct Mode.
Your administrator has to set the Service Type of the Service Generation
Options in you user profile to R
.
If you Server is running under Natural Security, you have to set up your RPC example client to run this example correctly.
To set up the RPC sample client for Natural Security
Execute the Program USR1071P from the system library SYSEXT in your Natural for Windows.
Fill the following fields in the appearing screens as follows:
Set RPC Data field to
X
Set Code field to
T
Set User-ID field to the Logon-ID of Natural Mainframe
Set User ID's Password field to the Password of Natural Mainframe
Primary File | SAG-TOURS-E-CONTRACT |
Display System Functions | cnt DATE-BOOKING sum PRICE avg PRICE max PRICE min PRICE old BOOK-MONTH |
Control Field | C1: DATE-BOOKING |
Selection Criteria | DATE-BOOKING = 19910101 THRU 19911231 AND DATE-CANCELLATION EQ 0 |
This section covers the following topics:
To Add a Transaction
Issue the ADD TRANSACTION SAMPLE11
command.
The Add Transaction window appears with the transaction name already entered in the Transaction ID field.
To Choose File
The report requires data from the file SAG-TOURS-E-CONTRACT.
Type the file name SAG-TOURS-E-CONTRACT in the
File Name field. You can alternatively use the
Asterisk (*) List
function.
Press Enter.
The Worksheet appears.
To Choose Fields
The report requires data stored in the fields CONTRACT-ID, PRICE, DATE-BOOKING and DATE-CANCELLATION.
Choose the fields as described in Step 3 of Sample 1.
To Create the User Field BOOK-MONTH
Type BOOK-MONTH into the Field Name column and press Enter.
The Define User Field window appears:
Fill in the required information as shown in the following screen:
20:41 ***** SUPER NATURAL ***** 2000-10-17 SAMPLE11 - Worksheet - SN3011 !------------------------------------------------------! Ref DB Field Name ! Define User Field ! AA 1K CONTRACT-ID ... ! Field: BOOK-MONTH ! AC 1 PRICE ......... ! ! AF 1K DATE-BOOKING .. ! Name or value .. BOOK-MONTH______________________ ! AG 1K DATE-CANCELLATI ! Format ......... n ! AR BOOK-MONTH_____ ! Length ......... 6 _ ! AS _______________ ! Dec. places .... _ ! AT _______________ ! Subfield of .... DATE-BOOKING____________________ ! AU _______________ ! Offset ......... ___ ! AV _______________ ! Dynamic input .. _ ! AW _______________ !------------------------------------------------------! AX _______________ AY ________________________________ AZ ________________________________ BA ________________________________ Command ===> Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Exit Flip Canc |
Press Enter.
The Worksheet appears. The field BOOK-MONTH is inserted as a user field.
To Create the Control Break
Type "C1" in the Control column next to the field DATE-BOOKING.
To Define the System Function
Type "SF" in the Func column next to the field PRICE.
Press Enter.
The Specify System Functions screen appears.
Mark Sum, Avg, Max and Min next to the Control Field DATE-BOOKING.
Type "SF" in the Func column next to the field DATE-BOOKING.
Press Enter.
The Specify System Functions window appears.
Mark Cnt next to the Control Field DATE-BOOKING.
Press Enter.
The Worksheet appears.
To Determine Display Sequence
Type "1" in the Sequence column next to the field BOOK-MONTH.
Now your worksheet looks as follows:
10:46 ***** SUPER NATURAL ***** 2000-10-04 SAMPLE11 - Worksheet - SN3011 Ref DB Field Name Seq S/C Func Def Info Del AA 1K CONTRACT-ID .................... ___ ___ __ __ __ __ AC 1 PRICE .......................... ___ ___ >_ __ __ AF 1K DATE-BOOKING ................... ___ C1_ >_ __ __ AG 1K DATE-CANCELLATION .............. ___ ___ __ __ __ AR U BOOK-MONTH ..................... 1__ ___ __ __ __ AS ________________________________ AT ________________________________ AU ________________________________ AV ________________________________ AW ________________________________ AX ________________________________ AY ________________________________ AZ ________________________________ BA ________________________________ Enter "*" in Fieldname column to select fields or enter NEXT Command ===> Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Next Exit Field Incl Flip - + Sel Run Canc |
To Define Selection Criteria
The report requires information on the Date of booking and cancellation.
Press PF10.
The SELECTION
command is issued and the
Selection Editor appears.
Enter "DATE-BOOKING = 19910101 THRU 19911231 AND DATE-CANCELLATION EQ 0" in the editor area.
The Selection Editor has the following content:
10:49 ***** SUPER NATURAL ***** 2000-10-04 SAMPLE11 - Selection Editor - SNZUL-S 1 < DATE-BOOKING = 19910101 THRU 19911231 > 1 2 < AND DATE-CANCELLATION EQ 0 > 2 3 < > 3 4 < > 4 5 < > 5 6 < > 6 7 < > 7 8 < > 8 9 < > 9 10 < > 10 11 < > 11 12 < > 12 13 < > 13 14 < > 14 15 < > 15 Define selection lines or use CONTINUE Command ===> Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Next Exit Field Check Flip - + Cont Run Canc |
To Run the Transaction
Issue the RUN
command. This command is
allocated to PF11.
Press Enter.
The report is displayed.
2000-10-17 DATE-BOOKING = 19910101 THRU 19911231 1 20:55:09 AND DATE-CANCELLATION EQ 0 SAMPLE11 BOOK-MONTH ---------- ** Control Break (1) ** DATE-BOOKING : 19910127 Old 199101 Cnt DATE-BOOKING = 100 Sum PRICE = 415590.000 Avg PRICE = 4155.900 Max PRICE = 18700.000 Min PRICE = 1360.000 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Print Exit Flip + Canc |
Press PF3.
The Worksheet appears again.
To generate the RPC Service for the transaction SAMPLE11
Issue the command GENERATE RPC
in the
Worksheet of the transaction SAMPLE11 and press Enter.
The following window appears:
10:56 ***** SUPER NATURAL ***** 2000-10-04 SAMPLE11 - Worksheet - SN3011 !-----------------------------------------! Ref DB Field Name ! RPC-Service Generation ! AA 1K CONTRACT-ID ............. ! ! AC 1 PRICE ................... ! The RPC Service will be stored with ! AF 1K DATE-BOOKING ............ ! Object Name .............. ! AG 1K DATE-CANCELLATION ....... ! in Library ............... ! AR U BOOK-MONTH .............. ! with Generation Mode ..... Direct ! AS _________________________ ! and Result Record Limit .. 5 ! AT _________________________ ! ! AU _________________________ ! _ Generate with these options ! AV _________________________ ! X Change options before generation ! AW _________________________ ! _ Modify Transaction ! AX _________________________ !-----------------------------------------! AY _________________________ AZ ________________________________ BA ________________________________ Command ===> Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Flip Canc |
Mark the option Change options before generation and press Enter.
The following window appears:
20:57 ***** SUPER NATURAL ***** 2000-10-17 SAMPLE11 - Worksheet - SN3011 !---------------------------------------------! Ref DB Field Name ! RPC-Service - Modify Generation Options ! AA 1K CONTRACT-ID ......... ! ! AC 1 PRICE ............... ! RPC Service Object Name ........ ! AF 1K DATE-BOOKING ........ ! Library ............ ! AG 1K DATE-CANCELLATION ... ! ! AR U BOOK-MONTH .......... ! Generation Mode ................ D Direct ! AS _____________________ ! Limit of Result Records ........ 5______ ! AT _____________________ ! (Max. possible Result Records .. 714 ) ! AU _____________________ !---------------------------------------------! AV _____________________ ! ! AW _________________________ ! _ Modify Transaction ! AX _________________________ !--------------------------------! AY _________________________ AZ ________________________________ BA ________________________________ Command ===> Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Flip Canc |
Specify the RPC Service Object Name "RPCSMPL3" and the Library NSNSAMPL to generate the RPC Service.
Select Generation Mode Direct.
Set the Record Limit to "5" and press Enter to limit the number of retrieved records.
Press Enter.
The RPC Service is generated. You can view it by logging on to the respective library and choosing the RPC Service Object. You will find the description of the source in the Administration documentation.
To proceed the data on your PC
Before you can work with the generated RPC Service, you have to set up your Natural environment and load the example data from the Documentation CD to your Natural for Windows environment. You will find the description how to set up your environment for the RPC Service in Setting up Super Natural.
Open your Natural for Windows.
Execute Execute
button in
the symbol list.
The following dialog appears:
Select Sample 3 (Summary, Direct) in the Data Retrieval field.
Choose Get Data
to load the sample
data.
Select OK.
The data is loaded from your mainframe environment and displayed on your PC where you can browse the data.
In order to proceed with this data on your PC, send it to Excel by
selecting the Send to Excel
button.
The selected data is sent to Excel, inserted into a table and displayed as a chart.