Appendix A. Sample programs

GDDM-PGF V2R1.3 Programming Guide and Reference

Appendix A. Sample programs

GDDM-PGF V2R1.3 Programming Guide and Reference
SC33-0333-01

This appendix contains listings of the following sample PGF programs supplied on the installation tape. The statements listed are those of the sample programs initially supplied with Version 2 Release 1 of PGF. Sample programs shipped with subsequent PTFs may differ from these listings.

The sample programs shown in this appendix are:

A program that uses PG routines to draw a simple histogram. The same program is given in three languages, with the following names:
COBOL
ADMUSC5
FORTRAN
ADMUSF5
PL/I
ADMUSP5
The IMS version of this program is distributed as ADMUSP5I. However, its main entry point is still ADMUSP5.
A C/370 version of this program, called ADMUSB5, is supplied with GDDM-PGF 2.1.2. ADMUSB5 is not listed in this appendix.
Programs that call the Interactive Chart Utility (ICU) using the CHART call to plot supplied data that is built into the programs. The programs are given in three languages, with the following names:
COBOL
ADMUSC6
FORTRAN
ADMUSF6
PL/I
ADMUSP6
No version of this program is provided for IMS.
A C/370 version of this program, called ADMUSB6, is supplied with GDDM-PGF 2.1.2. ADMUSB6 is not listed in this appendix.

Sample program ADMUSP7, which is supplied in PL/I only, performs translation of chart objects from one country-extended code page (CECP) to another. ADMUSP7 displays a panel on which the user specifies the names and types of chart objects that are to undergo code-page conversion. The user can specify whether characters in the chart data, the chart format, or in both are to be represented by code points on the country extended code page (CECP) shown on the panel.

When the user presses the ENTER key, the translation starts. The program translates all character strings in the chart objects from the object code page to the application code page. If the translation is successful, the program replaces the chart objects, overwriting previous versions saved under the same name. If any of the chart objects is not found, or if the chart type is invalid, the program issues an error message. If any other errors occur, the program does not save the translated chart but issues the appropriate GDDM message instead.

ADMUSP7 is not listed in this appendix.

Subtopics:

Notices | Terms of use | Support | Contact z/OS