Bull DPX/20 Guía de instalación descargar pdf (Pagina 291)

High-Level Language Application Programming Interface

4-91

if (rc == 0){

printf(”Press ENTER to search for string ’”);

printf(host_text);

printf(”’ on Host Presentation Space...”);

fgetc(stdin); /*Make user press enter */

rc = search_str_on_host(); /* Routine to search for */

/* string on host session */

}

if (rc == 0){

printf(”Press ENTER to display 1920 bytes of presentation

space...”);

fgetc(stdin); /*Make user press ENTERCS2C */

rc = disp_host_scr(); /* Call routine to display */

/* Host session screen */

}

if (rc == 0){

fflush(stdin); /* Flush input buffer */

printf( ”\nSAMPLE PROGRAM DONE. To Exit Program Press

ENTER...” );

fgetc(stdin); /* Make user press ENTER */

}

/******************************************************************

/* DISP_HLLAPI_INFO – CALLs HLLAPI QUERY_SYSTEM and then displays

/* the requested info.

/******************************************************************

int disp_hllapi_info(){

struct qsys_struct dsp_struct;

struct qsys_struct * data_ptr;

/* assign pointer */

/* HLLAPI data string. */

unsigned int rc = 0; /* return code */

data_ptr = &dsp_struct;

hfunc_num = HA_QUERY_SYSTEM; /* Issue query system */

hllc(&hfunc_num, (char * )data_ptr, &hds_len, &hrc);

/* Call HLLAPI */

if (hrc == HARC_SUCCESS){ /* If good rc */

printf(” HLLAPI INFORMATION\n\n”);

printf(” HLLAPI version : ”);

1 2 ... 286 287 288 289 290 291 292 293 294 295 296 ... 333 334

Sin comentarios

Bull DPX/20 Guía de instalación Pagina 291