//FORMPGC  EXEC CTDFRPGC,

//   DISP1=NEW,     1. DISP PARAMETER

//   DISP2=CATLG,   2. DISP PARAMETER

//   DISP3=DELETE,  3. DISP PARAMETER

//   PGCSIZE=3      SIZE PARAMETER --> PGCSIZE parameter is changed.

//