-+-+-+-+-+-+-+-+ START OF PART 148 -+-+-+-+-+-+-+-+ X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqinvisfilter(wkid, isbsz, esbsz, errind, isn, is, esn, es) XPint wkid, isbsz, esbsz, *errind, *isn, *is, *esn, *es; X`7B X Pintlst inlst, exlst; X X inlst.integers = is; X exlst.integers = es; X pinqinvisfilter(wkid, isbsz, 0, esbsz, 0, errind, &inlst, isn, &exlst, X esn); X`7D /* pc_inqinvisfilter */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqgse(wtype, num, errind, ngse, gsel) XPint wtype, num, *errind, *ngse, *gsel; X`7B X Pintlst gses; X X pinqgse(wtype, 0, 0, errind, &gses, ngse); X gses.integers = (Pint *)calloc(ngse, sizeof(Pint)); X pinqgse(wtype, *ngse, 0, errind, &gses, ngse); X *gsel = gses.integers`5Bnum - 1`5D; X free(gses.integers); X`7D /* pc_inqgse */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqwstypes(num, errind, number, wktyp) XPint num, *errind, *number, *wktyp; X`7B X Pwstypelst wslist; X X pinqwstypes(0, 0, errind, &wslist, number); X wslist.ws_types = (Pint *)calloc(*number, sizeof(Pint)); X pinqwstypes(*number, 0, errind, &wslist, number); X *wktyp = wslist.ws_types`5Bnum - 1`5D; X free(wslist.ws_types); X`7D /* pc_inqwstypes */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqcolourind(wkid, num, errind, ol, coli) XPint wkid, num, *errind, *ol, *coli; X`7B X Pintlst inds; X X pinqcolourind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqcolourind(wkid, *ol, 0, errind, &inds, ol); X *coli = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqcolourind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqedgeind(wkid, num, errind, ol, edi) XPint wkid, num, *errind, *ol, *edi; X`7B X Pintlst inds; X X pinqedgeind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqedgeind(wkid, *ol, 0, errind, &inds, ol); X *edi = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqedgeind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqintind(wkid, num, errind, ol, ii) XPint wkid, num, *errind, *ol, *ii; X`7B X Pintlst inds; X X pinqintind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqintind(wkid, *ol, 0, errind, &inds, ol); X *ii = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqintind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqlineind(wkid, num, errind, ol, pli) XPint wkid, num, *errind, *ol, *pli; X`7B X Pintlst inds; X X pinqlineind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqlineind(wkid, *ol, 0, errind, &inds, ol); X *pli = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqlineind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqmarkerind(wkid, num, errind, ol, pmi) XPint wkid, num, *errind, *ol, *pmi; X`7B X Pintlst inds; X X pinqmarkerind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqmarkerind(wkid, *ol, 0, errind, &inds, ol); X *pmi = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqmarkerind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqtextind(wkid, num, errind, ol, txi) XPint wkid, num, *errind, *ol, *txi; X`7B X Pintlst inds; X X pinqtextind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqtextind(wkid, *ol, 0, errind, &inds, ol); X *txi = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqtextind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqviewind(wkid, num, errind, ol, viewi) XPint wkid, num, *errind, *ol, *viewi; X`7B X Pintlst inds; X X pinqviewind(wkid, 0, 0, errind, &inds, ol); X inds.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqviewind(wkid, *ol, 0, errind, &inds, ol); X *viewi = inds.integers`5Bnum - 1`5D; X free(inds.integers); X`7D /* pc_inqviewind */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqlinefacil(wtype, num, errind, nlt, lt, nldw, nomlw, X rlwmin, rlwmax, nppli) XPint wtype, *errind, *nlt, *lt, *nldw; XPfloat *nomlw, *rlwmin, *rlwmax; XPint *nppli; X`7B X Plnfac facil; X X pinqlinefacil(wtype, 0, 0, errind, nlt, &facil); X facil.types.integers = (Pint *)calloc(*nlt, sizeof(Pint)); X pinqlinefacil(wtype, *nlt, 0, errind, nlt, &facil); X *lt = facil.types.integers`5Bnum - 1`5D; X *nldw = facil.widths; X *nomlw = facil.nom_width; X *rlwmin = facil.min_width; X *rlwmax = facil.max_width; X *nppli = facil.predefined; X free(facil.types.integers); X`7D /* pc_inqlinefacil */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqlinerep(wkid, pli, type, errind, ltype, lwidth, coli) XPint wkid, pli, type; XPint *errind, *ltype; XPfloat *lwidth; XPint *coli; X`7B X Plnbundl rep; X X pinqlinerep(wkid, pli, type, errind, &rep); X *ltype = rep.type; X *lwidth = rep.width; X *coli = rep.colour; X`7D /* pc_inqlinerep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqlocst() X`7B X Pint ws, dev, err, totsize; X Pchar *buffer; X Plocst state; X Pinqtype type; X X pinqlocst(ws, dev, type, 0, &err, buffer, &totsize, &state); X buffer = (Pchar *)malloc(totsize); X pinqlocst(ws, dev, type, totsize, &err, buffer, &totsize, &state); X X free(buffer); X`7D /* pc_inqlocst */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqlocst3() X`7B X Pint ws, dev, err, totsize; X Pchar *buffer; X Plocst3 state; X Pinqtype type; X X pinqlocst3(ws, dev, type, 0, &err, buffer, &totsize, &state); X buffer = (Pchar *)malloc(totsize); X pinqlocst3(ws, dev, type, totsize, &err, buffer, &totsize, &state); X X free(buffer); X`7D /* pc_inqlocst3 */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqmarkerfacil(wtype, num, errind, nmt, mt, nms, nomms, X rmsmin, rmsmax, nppmi) XPint wtype, *errind, *nmt, *mt, *nms; XPfloat *nomms, *rmsmin, *rmsmax; XPint *nppmi; X`7B X Pmkfac facil; X X pinqmarkerfacil(wtype, 0, 0, errind, nmt, &facil); X facil.types.integers = (Pint *)calloc(*nmt, sizeof(Pint)); X pinqmarkerfacil(wtype, *nmt, 0, errind, nmt, &facil); X *mt = facil.types.integers`5Bnum - 1`5D; X *nms = facil.sizes; X *nomms = facil.nom; X *rmsmin = facil.min; X *rmsmax = facil.max; X *nppmi = facil.predefined; X free(facil.types.integers); X`7D /* pc_inqmarkerfacil */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqmarkerrep(wkid, pmi, type, errind, mtype, mszsf, coli) XPint wkid, pmi, type; XPint *errind, *mtype; XPfloat *mszsf; XPint *coli; X`7B X Pmkbundl rep; X X pinqmarkerrep(wkid, pmi, type, errind, &rep); X *mtype = rep.type; X *mszsf = rep.size; X *coli = rep.colour; X`7D /* pc_inqmarkerrep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqnuminput(wtype, errind, nlcd, nskd, nvld, nchd, npkd, nstd V) XPint wtype, *errind, *nlcd, *nskd, *nvld, *nchd, *npkd, *nstd; X`7B X Pnumdev numbers; X X pinqnuminput(wtype, errind, &numbers); X *nlcd = numbers.locator; X *nskd = numbers.stroke; X *nvld = numbers.valuator; X *nchd = numbers.choice; X *npkd = numbers.pick; X *nstd = numbers.string; X`7D /* pc_inqnuminput */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqphigsfacil(ncs, errind, simopw, simopa, olcs, cs) XPint ncs, *errind, *simopw, *simopa, *olcs, *cs; X`7B X Pintlst charsets; X X pinqphigsfacil(0, 0, errind, simopw, simopa, &charsets, olcs); X charsets.integers = (Pint *)calloc(*olcs, sizeof(Pint)); X pinqphigsfacil(*olcs, 0, errind, simopw, simopa, &charsets, olcs); X *cs = charsets.integers`5Bncs - 1`5D; X free(charsets.integers); X`7D /* pc_inqphigsfacil */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpickst() X`7B X Pint ws, dev, err, totsize, i; X Pchar *buffer; X Ppickst state; X Pinqtype type; X X pinqpickst(ws, dev, type, 0, &err, buffer, &totsize, &state); X buffer = (Pchar *)malloc(totsize); X pinqpickst(ws, dev, type, totsize, &err, buffer, &totsize, &state); X X free(buffer); X`7D /* pc_inqpickst */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpickst3() X`7B X Pint ws, dev, err, totsize, i; X Pchar *buffer; X Ppickst3 state; X Pinqtype type; X X pinqpickst3(ws, dev, type, 0, &err, buffer, &totsize, &state); X buffer = (Pchar *)malloc(totsize); X pinqpickst3(ws, dev, type, totsize, &err, buffer, &totsize, &state); X X free(buffer); X`7D /* pc_inqpickst3 */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpostedstruct(wkid, num, errind, number, strid, priort) XPint wkid, num, *errind, *number, *strid; XPfloat *priort; X`7B X Pstructpostlst list; X X pinqpostedstruct(wkid, 0, 0, errind, &list, number); X list.postings = (Pstructpost *)calloc(*number, sizeof(Pstructpost)); X pinqpostedstruct(wkid, *number, 0, errind, &list, number); X *strid = list.postings`5Bnum - 1`5D.id; X *priort = list.postings`5Bnum - 1`5D.priority; X free(list.postings); X`7D /* pc_inqpostedstruct */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpredcolourrep(wtype, pci, errind, c1, c2, c3) XPint wtype, pci, *errind; XPfloat *c1, *c2, *c3; X`7B X Pcobundl rep; X X pinqpredcolourrep(wtype, pci, errind, &rep); X *c1 = rep.rgb.r; X *c2 = rep.rgb.g; X *c3 = rep.rgb.b; X`7D /* pc_inqpredcolourrep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqprededgerep(wtype, pedi, errind, edflag, edtype,`20 X ewidth, coli) XPint wtype, pedi; XPint *errind, *edflag, *edtype; XPfloat *ewidth; XPint *coli; X`7B X Pedgebundl rep; X X pinqprededgerep(wtype, pedi, errind, &rep); X *edflag = rep.flag; X *edtype = rep.type; X *ewidth = rep.scale; X *coli = rep.colour; X`7D /* pc_inqprededgerep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpredintrep(wtype, pii, errind, ints, istyli, coli) XPint wtype, pii; XPint *errind, *ints, *istyli, *coli; X`7B X Pinterbundl rep; X X pinqpredintrep(wtype, pii, errind, &rep); X *ints = rep.style; X *istyli = rep.index; X *coli = rep.colour; X`7D /* pc_inqpredintrep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpredlinerep(wtype, pli, errind, ltype, lwidth, coli) XPint wtype, pli; XPint *errind, *ltype; XPfloat *lwidth; XPint *coli; X`7B X Plnbundl rep; X X pinqpredlinerep(wtype, pli, errind, &rep); X *ltype = rep.type; X *lwidth = rep.width; X *coli = rep.colour; X`7D /* pc_inqpredlinerep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpredmarkerrep(wtype, pmi, errind, mtype, mszsf, coli) XPint wtype, pmi; XPint *errind, *mtype; XPfloat *mszsf; XPint *coli; X`7B X Pmkbundl rep; X X pinqpredmarkerrep(wtype, pmi, errind, &rep); X *mtype = rep.type; X *mszsf = rep.size; X *coli = rep.colour; X`7D /* pc_inqpredmarkerrep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpredtextrep(wtype, txi, errind, font, prec, chxp, chsp, X coli) XPint wtype, txi, *errind, *font, *prec; XPfloat *chxp, *chsp; XPint *coli; X`7B X Ptxbundl rep; X X pinqpredtextrep(wtype, txi, errind, &rep); X *font = rep.font; X *prec = rep.precision; X *chxp = rep.exp; X *chsp = rep.space; X *coli = rep.colour; X`7D /* pc_inqpredtextrep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqpredviewrep(wtype, viewi, errind, vwupd, vwormt, X vwmpmt, vwcplm, xyclpi, bclipi, fclipi) XPint wtype, viewi, *errind, *vwupd; XPmatrix3 vwormt, vwmpmt; XPlimit3 *vwcplm; XPint *xyclpi, *bclipi, *fclipi; X`7B X Pviewrep3 rep; X X pinqpredviewrep(wtype, viewi, errind, &rep); X memcpy(vwormt, rep.orientation_matrix, sizeof(Pmatrix3)); X memcpy(vwmpmt, rep.mapping_matrix, sizeof(Pmatrix3)); X *vwcplm = rep.clip_limit; X *xyclpi = rep.clip_xy; X *bclipi = rep.clip_back; X *fclipi = rep.clip_front; X`7D /* pc_inqpredviewrep */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqsetopenws(num, errind, ol, wkid) XPint num, *errind, *ol, *wkid; X`7B X Pintlst wsids; X X pinqsetopenws(0, 0, errind, &wsids, ol); X wsids.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqsetopenws(*ol, 0, errind, &wsids, ol); X *wkid = wsids.integers`5Bnum - 1`5D; X free(wsids.integers); X`7D /* pc_inqsetopenws */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqsetwsposted(strid, num, errind, ol, wkid) XPint strid, num, *errind, *ol, *wkid; X`7B X Pintlst wsids; X X pinqsetwsposted(strid, 0, 0, errind, &wsids, ol); X wsids.integers = (Pint *)calloc(*ol, sizeof(Pint)); X pinqsetwsposted(strid, *ol, 0, errind, &wsids, ol); X *wkid = wsids.integers`5Bnum - 1`5D; X free(wsids.integers); X`7D /* pc_inqsetwsposted */ X X/*-------------------------------------------------------------------------- V*/ X Xextern void pc_inqstringst() X`7B X Pint ws, dev, err, totsize; X Pchar *buffer; X Pstringst state; X +-+-+-+-+-+-+-+- END OF PART 148 +-+-+-+-+-+-+-+-