Lines Matching defs:fab
40 #include <fab.h> /* Needed only in old environments. */
103 struct FAB fab;
126 fab = cc$rms_fab;
129 fab.FAB_NAM = &nam;
130 fab.fab$l_xab = (char*)(&fhc);
134 fab.fab$l_dna = (char *) -1; /* Using NAML for default name. */
135 fab.fab$l_fna = (char *) -1; /* Using NAML for file name. */
139 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNA = file;
140 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNS = strlen( file);
142 fab.fab$b_fac = FAB$M_GET;
144 status = sys$open(&fab);
145 fab.fab$l_xab = (char*)0L;
146 sys$close(&fab);
152 else if( fab.fab$b_org == FAB$C_IDX
153 || fab.fab$b_org == FAB$C_REL
154 || fab.fab$b_org == FAB$C_HSH )
396 struct FAB fab; /* FAB structure. */
422 fab = cc$rms_fab;
424 fab.FAB_NAM = &nam;
430 fab.fab$l_dna = (char *) -1; /* Using NAML for default name. */
431 fab.fab$l_fna = (char *) -1; /* Using NAML for file name. */
436 FAB_OR_NAML( fab, nam).FAB_OR_NAML_DNA = zip;
437 FAB_OR_NAML( fab, nam).FAB_OR_NAML_DNS = strlen( zip);
440 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNA = zip_tmp_nam;
441 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNS = strlen( zip_tmp_nam);
449 sts = sys$parse( &fab, 0, 0); /* Parse the name(s). */
509 struct FAB fab;
515 fab = cc$rms_fab; /* Initialize FAB. */
517 fab.FAB_NAM = &nam; /* FAB -> NAM[L] */
521 fab.fab$l_dna =(char *) -1; /* Using NAML for default name. */
522 fab.fab$l_fna = (char *) -1; /* Using NAML for file name. */
527 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNA = s;
528 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNS = strlen( s);
531 FAB_OR_NAML( fab, nam).FAB_OR_NAML_DNA = DEF_DEVDIRNAM;
532 FAB_OR_NAML( fab, nam).FAB_OR_NAML_DNS = sizeof( DEF_DEVDIRNAM)- 1;
539 status = sys$parse(&fab);
559 status = sys$search(&fab);
590 struct FAB fab;
597 fab = cc$rms_fab; /* Initialize FAB. */
599 fab.FAB_NAM = &nam; /* FAB -> NAM[L] */
603 fab.fab$l_dna =(char *) -1; /* Using NAML for default name. */
604 fab.fab$l_fna = (char *) -1; /* Using NAML for file name. */
609 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNA = s;
610 FAB_OR_NAML( fab, nam).FAB_OR_NAML_FNS = strlen( s);
617 status = sys$parse(&fab);
644 * fab$w_deq default extension quantity (blocks) (write).
789 * fab$w_deq default extension quantity (blocks).
795 * for read versus write access. (I assume that specifying fab$w_deq,
809 int acc_cb( int *id_arg, struct FAB *fab, struct RAB *rab)
826 fab-> fab$w_deq = rms_ext_active;
831 fab-> fab$v_tef = 1;
844 *id_arg, fab-> fab$w_deq, rab-> rab$b_mbc, rab-> rab$b_mbf);