InvokeSECCA Operation

This operation passes the value stored in the WrkString work field a commarea field in the SECCA program where it is modified and returned.

Create the InvokeSECCA Operation

1. From the Interface Mapper, click Operation > New.
2. In the Name field, type InvokeSECCA.
3. Under Select program/copybook, click SECCA.

   The Select input data area and Select output data area boxes each list two commareas from which to choose. This is because the Interface Mapper has found two candidate commareas in the SECCA program.

4. Click each of the commarea list entries to compare the two. From studying the code in the SECCA program, you know that the program moves the contents of dfhcommarea to wrkcommarea before performing business logic using the commarea fields. Therefore, you want this operation to use the wrkcommarea for both input and output.
5. Click SECCA(2) under both Select input data area and Select output data area.
6. Do not check Create Default Mappings. In this tutorial, you create the mappings manually.
7. Click OK to create the InvokeSECCA operation.

   The Interface Mapper shows the input and output data area fields in the left panes.

Create a Field Assignment

To pass the value you stored in the WrkString work field during the InvokeINCCA operation to the in-string commarea field, you need to create a field assignment.

1. In the Assignments pane, right-click and select New Assignment from the context menu.
2. From the Assign to drop-down list, select wrkcommarea.in-string.
3. From the Field/Operation1 drop-down list, select WrkString.
4. Click OK to save the assignment.

Map an Interface Output Field

The SECCA program logic takes the value of in-string, prepends "SECCA received: " to it and stores the result in out-string. To send the value back to your service interface, you need to map out-string to an output interface field.

1. Drag out-string from the Output Commarea pane to the Interface Fields pane.
2. From the Interface Fields pane, rename out_string to SECCAOutString.
3. Click File > Save CICSCommareaWS.svi to save the completed InvokeSECCA Operation.
4. Close the Interface Mapper.