/*---------------------------------------------------------------------+
|               Copyright (c) 1995, SAS Institute Inc.                 |
|                 Unpublished - All Rights Reserved                    |
|                      S A S / C   S A M P L E                         |
|                                                                      |
|                                                                      |
|         NAME: SASCMNU                                                |
|     LANGUAGE: C (CICS)                                               |
|      PURPOSE: Traditional CICS FILEA sample program used in          |
|                 Appendix 1, Second Edition, of the SAS/C CICS User's |
|                 Guide.  See this appendix for a more detailed        |
|                 explanation of the SASCALL, SASCMNU, SASCBRW samples |
|                 as well as the SASCAMA, SASCAMB, and SASCAMC BMS     |
|                 maps.                                                |
|   MVS -                                                              |
|      PREPROCESS, COMPILE, LINK: Submit prefix.SAMPLE.AUX(SASCMNU)    |
|                 where "prefix" is the installation defined           |
|                 high-level qualifier for the SAS/C product.          |
|      EXECUTE: See Appendix 1, Second Edition, of the SAS/C CICS      |
|                 User's Guide for additional information.  Use the    |
|                 sample PPT input (prefix.SAMPLE.AUX(SASCTBLS) to     |
|                 define the resources to CICS.                        |
|   TSO -                                                              |
|   PREPROCESS: LCCCP CLIST                                            |
|      COMPILE: LC370 CLIST using the RENT option.                     |
|         LINK: CLK370B CLIST using the CICS and RENT options.         |
|      EXECUTE: see EXECUTE under MVS above                            |
|   CMS -                                                              |
|   PREPROCESS: LCCCP EXEC                                             |
|      COMPILE: LC370 EXEC using the RENT option.                      |
|        CLINK: CLINK EXEC using the CICS option; resulting object code|
|                 must be ported to an MVS operating system for final  |
|                 link-editing with the CICS Execution Interface stub  |
|                 routines.                                            |
|         LINK: Use the LCCCXXL cataloged procedure using the NOCLINK  |
|                 and RENT options.  Input must be specified via the   |
|                 SYSLIN DD statement, not the SYSIN DD statement.     |
|      EXECUTE: see EXECUTE under MVS above                            |
|                                                                      |
+---------------------------------------------------------------------*/
#include <sascaga.h>
void main()
{
      EXEC CICS SEND MAP("SASCAGA") MAPONLY ERASE;
      EXEC CICS RETURN;
}