/********************************************************************************************************************************/ /* Created: 15-MAR-2001 23:37:21 by OpenVMS SDL EV1-33 */ /* Source: 15-MAR-2001 23:35:06 _$11$DUA933:[BUILD.SDL]LBR$ROUTINES.SDI;1 */ /********************************************************************************************************************************/ /*** MODULE LBR$ROUTINES IDENT X-1 ***/ #ifndef __LBR$ROUTINES_LOADED #define __LBR$ROUTINES_LOADED 1 #pragma nostandard #ifdef __cplusplus extern "C" { #define __unknown_params ... #else #define __unknown_params #endif #if !defined(__VAXC) && !defined(VAXC) #define __struct struct #define __union union #else #define __struct variant_struct #define __union variant_union #endif /* */ /* */ /* This package defines the interfaces to the Librarian utility */ /* routines as documented in the OpenVMS Utility Routines Reference */ /* Manual. */ /* */ /* */ /* LBR$CLOSE - CLose a library */ /* */ /* status = LBR$CLOSE (library_index) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* */ unsigned int lbr$close(__unknown_params); /* */ /* LBR$DELETE_DATA - Delete a module's data */ /* */ /* status = LBR$DELETE_DATA (library_index, txtrfa) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* txtrfa - RFA of module header for module to delete */ /* */ unsigned int lbr$delete_data(__unknown_params); /* */ /* LBR$DELETE_KEY - Delete a key */ /* */ /* status = LBR$DELETE_KEY (library_index, key_name) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* key_name - Key to be deleted - for binary keys, passed by */ /* reference, for string keys, by descriptor */ /* */ unsigned int lbr$delete_key(__unknown_params); /* */ /* LBR$FIND - Lookup a module by its RFA */ /* */ /* status = LBR$FIND (library_index, txtrfa) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* txtrfa - RFA of module to access */ /* */ unsigned int lbr$find(__unknown_params); /* */ /* LBR$FLUSH - Recover virtual memory */ /* */ /* status = LBR$FLUSH (library_index, block_type) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* block_type - Extent of the flush operation */ unsigned int lbr$flush(__unknown_params); /* */ /* LBR$GET_HEADER - Retrieve library header information */ /* */ /* status = LBR$GET_HEADER (library_index, retary) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* retary - Array of 128 longwords to receive library header */ /* */ unsigned int lbr$get_header(__unknown_params); /* */ /* LBR$GET_HELP - Retrieve help text */ /* */ /* status = LBR$GET_HELP (library_index [,line_width] [,routine] */ /* [,data] [,key_n...]) */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* line_width - Width of the help text line */ /* routine - Routine called to output text line */ /* data - User data passed to routine */ /* key_n - Zero or more key strings */ /* */ unsigned int lbr$get_help(__unknown_params); /* */ /* LBR$GET_HISTORY - Retrieve a library history update record */ /* */ /* status = LBR$GET_HISTORY (library_index, action_routine) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* action_routine - Routine to process history records */ /* */ unsigned int lbr$get_history(__unknown_params); /* */ /* LBR$GET_INDEX - Call routine for selected index keys */ /* */ /* status = LBR$GET_INDEX (library_index, index_number, routine_name */ /* [,match_desc]) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* index_number - Number of the index to search */ /* routine_name - User routine to process selections */ /* match_desc - Key matching string */ /* */ unsigned int lbr$get_index(__unknown_params); /* */ /* LBR$GET_RECORD - Read a data record */ /* */ /* status = LBR$GET_RECORD (library_index [,inbufdes] [,outbufdes]) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* inbufdes - Buffer to receive record */ /* outbufdes - Descriptor receiving information about record */ unsigned int lbr$get_record(__unknown_params); /* */ /* LBR$INI_CONTROL - Initialize a library control structure */ /* */ /* status = LBR$INI_CONTROL (library_index, func [,type] [,namblk]) */ /* */ /* library_index - Receives index value */ /* func - Function to be performed */ /* type - Type of library */ /* namblk - RMS NAM block for library */ /* */ unsigned int lbr$ini_control(__unknown_params); /* */ /* LBR$INSERT_KEY - Insert a new key */ /* */ /* status = LBR$INSERT_KEY (library_index, key_name, txtrfa) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* key_name - Name of key to insert (reference for binary key, */ /* descriptor for text key) */ /* txtrfa - RFA of module */ /* */ unsigned int lbr$insert_key(__unknown_params); /* */ /* LBR$LOOKUP_KEY - Look up a library key */ /* */ /* status = LBR$LOOKUP_KEY (library_index, key_name, txtrfa) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* key_name - Name of key to insert (reference for binary key, */ /* descriptor for text key) */ /* txtrfa - Receives RFA of module */ /* */ unsigned int lbr$lookup_key(__unknown_params); /* */ /* LBR$OPEN - Open or create a library */ /* */ /* status = LBR$OPEN (library_index [,fns] [,create_options] [,dns] */ /* [,rlfna] [,rns] [,rnslen]) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* fns - File specification of the library */ /* create_options - Library characteristics ($LBRDEF, $CREDEF) */ /* dns - Default file specification */ /* rlfna - Related file name block */ /* rns - Receives resultant file specification */ /* rnslen - Receives length of resultant file specification */ /* */ unsigned int lbr$open(__unknown_params); /* */ /* LBR$OUTPUT_HELP - Output help messages */ /* */ /* status = LBR$OUTPUT_HELP (output_routine [,output_width] [,line_desc] */ /* [,library_name] [,flags] [,input_routine]) */ /* */ /* output_routine - Routine called to output text lines */ /* output_width - Maximum width of output lines */ /* line_desc - Help request line */ /* library_name - Name of the help library */ /* flags - Flags to control operation */ /* input_routine - Routine used for prompting */ /* */ unsigned int lbr$output_help(__unknown_params); /* */ /* LBR$PUT_END - Write an end-of-module record */ /* */ /* status = LBR$PUT_END (library_index) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* */ unsigned int lbr$put_end(__unknown_params); /* */ /* LBR$PUT_HISTORY - Write an update history record */ /* */ /* status = LBR$PUT_HISTORY (library_index, record_desc) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* record_desc - History record */ /* */ unsigned int lbr$put_history(__unknown_params); /* */ /* LBR$PUT_RECORD - Write a data record */ /* */ /* status = LBR$PUT_RECORD (library_index, bufdes, txtrfa) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* bufdes - Record to be written */ /* txtrfa - Receives RFA of module */ /* */ unsigned int lbr$put_record(__unknown_params); /* */ /* LBR$REPLACE_KEY - Replace a library key */ /* */ /* status = LBR$REPLACE_KEY (library_index, key_name, oldrfa, newrfa) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* key_name - Name of key, passed by reference or descriptor */ /* oldrfa - RFA of old module header */ /* newrfa - RFA of new module header */ /* */ unsigned int lbr$replace_key(__unknown_params); /* */ /* LBR$RET_RMSSTV - Return VMS RMS status value */ /* */ /* status = LBR$RET_RMSSTV () */ /* */ unsigned int lbr$ret_rmsstv(void); /* */ /* LBR$SEARCH - Search an index */ /* */ /* status = LBR$SEARCH (library_index, index_number, rfa_to_find, */ /* routine_name) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* index_number - Number of index to search */ /* rfa_to_find - RFA of module to search for */ /* routine_name - Routine called to process keys */ unsigned int lbr$search(__unknown_params); /* */ /* LBR$SET_INDEX - Set the current index number */ /* */ /* status = LBR$SET_INDEX (library_index, index_number) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* index_number - New index number */ /* */ unsigned int lbr$set_index(__unknown_params); /* */ /* LBR$SET_LOCATE - Set record access to locate mode */ /* */ /* status = LBR$SET_LOCATE (library_index) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* */ unsigned int lbr$set_locate(__unknown_params); /* */ /* LBR$SET_MODULE - Read or update a module header */ /* */ /* status = LBR$SET_MODULE (library_index, rfa [,bufdesc] */ /* [,buflen] [,updatedesc]) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* rfa - RFA of module header */ /* bufdesc - Receives module header */ /* buflen - Receives length of module header */ /* updatedesc - Additional information to be stored in module header */ /* */ unsigned int lbr$set_module(__unknown_params); /* */ /* LBR$SET_MOVE - Set record access to move mode */ /* */ /* status = LBR$SET_MOVE (library_index) */ /* */ /* library_index - Index value returned by LBR$INI_CONTROL */ /* */ unsigned int lbr$set_move(__unknown_params); #ifdef __cplusplus } #endif #pragma standard #endif /* __LBR$ROUTINES_LOADED */