Server Guide

Example

Obtains CICS main storage.

| resultfromGetmain obtainedStorage |
 
resultfromGetmain := CICS getmain
                          length: 81;
                          initimg: 0;
                          shared;
                          exec.
obtainedStorage := resultfromGetmain set.


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]