ADMIN_INFO_SYSPARM stored procedure

 #include    <stdio.h>
 #include    <stdlib.h>
 #include    <string.h>

 /******************** DB2 SQL Communication Area ********************/
 EXEC SQL INCLUDE SQLCA;

 int main( int argc, char *argv[] )    /* Argument count and list    */
 {
   /****************** DB2 Host Variables ****************************/
   EXEC SQL BEGIN DECLARE SECTION;

   /* SYSPROC.ADMIN_INFO_SYSPARM parameters                          */
   char          db2_member[9];        /* Data sharing group member  */
   short int     ind_db2_member;       /* Indicator variable         */
   long int      retcd;                /* Return code                */
   short int     ind_retcd;            /* Indicator variable         */
   char          errmsg[1332];         /* Error message              */
   short int     ind_errmsg;           /* Indicator variable         */
   /* Result set locators                                            */
   volatile SQL TYPE IS RESULT_SET_LOCATOR VARYING *rs_loc1;           
   /* Result set row                                                 */
   long int      rownum;               /* Sequence number of the     */
                                       /* table row (1,...,n)        */
   char          macro[9];             /* Macro that contains the    */
                                       /* system parameter, or       */
                                       /* DSNHDECP parameter, or the */
                                       /* name of the IRLM procedure */
                                       /* that z/OS invokes if IRLM  */
                                       /* is automatically started   */
                                       /* by DB2                     */
   char          parameter[41];        /* Name of the system         */
                                       /* parameter, DSNHDECP        */
                                       /* parameter, or IRLM         */
                                       /* parameter                  */
   char          install_panel[9];     /* Name of the installation   */
                                       /* panel where the parameter  */
                                       /* value can be changed when  */
                                       /* installing or migrating DB2*/
   short int     ind_install_panel;    /* Indicator variable         */
   char          install_field[41];    /* Name of the parameter on   */
                                       /* the installation panel     */
   short int     ind_install_field;    /* Indicator variable         */
   char          install_location[13]; /* Location of the parameter  */
                                       /* on the installation panel  */
   short int     ind_install_location; /* Indicator variable         */
   char          value[2049];          /* Value of the parameter     */
   char          additional_info[201]; /* Reserved for future use    */
   short int     ind_additional_info;  /* Indicator variable         */

   EXEC SQL END DECLARE SECTION;
   /******************************************************************/
   /* Set the db2_member indicator variable to -1 to get the DB2     */
   /* subsystem parameters, DSNHDECP values, and IRLM parameters of  */
   /* the connected DB2 subsystem.                                   */
   /******************************************************************/
   ind_db2_member = -1;
   /******************************************************************/
   /* Call stored procedure SYSPROC.ADMIN_INFO_SYSPARM               */
   /******************************************************************/
   EXEC SQL CALL SYSPROC.ADMIN_INFO_SYSPARM
                        (:db2_member :ind_db2_member,
                         :retcd      :ind_retcd,
                         :errmsg     :ind_errmsg);
   /******************************************************************/
   /* Retrieve result set when the SQLCODE from the call is +446,    */
   /* which indicates that result sets were returned                 */
   /******************************************************************/
   if (SQLCODE == +466)               /* Result sets were returned   */
   {
     /* Establish a link between the result set and its locator      */
     EXEC SQL ASSOCIATE LOCATORS (:*rs_loc1)
              WITH PROCEDURE SYSPROC.ADMIN_INFO_SYSPARM;
     /* Associate a cursor with the result set                       */
     EXEC SQL ALLOCATE C1 CURSOR FOR RESULT SET :*rs_loc1;
     /* Perform fetches using C1 to retrieve all rows from the       */
     /* result set                                                   */
     EXEC SQL FETCH C1
                  INTO :rownum, :macro, :parameter,
                       :install_panel          :ind_install_panel,
                       :install_field          :ind_install_field,
                       :install_location :ind_install_location,
                       :value,
                       :additional_info        :ind_additional_info;
     while(SQLCODE==0)
     {
       EXEC SQL FETCH C1
                  INTO :rownum, :macro, :parameter,
                       :install_panel          :ind_install_panel,
                       :install_field          :ind_install_field,
                       :install_location :ind_install_location,
                       :value,
                       :additional_info        :ind_additional_info;
     }

     EXEC SQL CLOSE C1;
   }
   return(retcd);
 }