Subject: Sample API program to write parts list to a text file
/*HEAD WRITE_PARTS_LIST_TO_A_TEXT_FILE CCC UFUN */
#include <stdio.h>
#include <string.h>
#include <uf.h>
#include <uf_ui.h>
#include <uf_cfi.h>
#include <uf_part.h>
#include <uf_plist.h>
#define UF_CALL(X) (report_error( __FILE__, __LINE__, #X, (X)))
static int report_error( char *file, int line, char *call, int irc)
{
if (irc)
{
char err[133],
msg[133];
sprintf(msg, "*** ERROR code %d at line %d in %s:\n+++ ",
irc, line, file);
UF_get_fail_message(irc, err);
/* NOTE: UF_print_syslog is new in V18 */
UF_print_syslog(msg, FALSE);
UF_print_syslog(err, FALSE);
UF_print_syslog("\n", FALSE);
UF_print_syslog(call, FALSE);
UF_print_syslog(";\n", FALSE);
if (!UF_UI_open_listing_window())
{
UF_UI_write_listing_window(msg);
UF_UI_write_listing_window(err);
UF_UI_write_listing_window("\n");
UF_UI_write_listing_window(call);
UF_UI_write_listing_window(";\n");
}
}
return(irc);
}
static void build_similar_filespec(char *fspec, int ftype)
{
tag_t
part = UF_PART_ask_display_part();
char
dspec[UF_CFI_MAX_PATH_NAME_SIZE],
part_name[UF_CFI_MAX_FILE_NAME_SIZE],
part_fspec[UF_CFI_MAX_PATH_NAME_SIZE];
UF_PART_ask_part_name(part, part_fspec);
UF_CALL(uc4576(part_fspec, 2, dspec, part_name));
UF_CALL(uc4578(part_name, 2, part_name));
UF_CALL(uc4575(dspec, ftype, part_name, fspec));
}
static void do_it(void)
{
int
ip3 = 0;
char
tfn[UF_CFI_MAX_PATH_NAME_SIZE];
build_similar_filespec(tfn, 79);
UF_CALL(uc4400(4, tfn, ip3));
UF_CALL(UF_PLIST_list(UF_PLIST_ask_tag()));
UF_CALL(uc4400(0, tfn, ip3));
}
/*ARGSUSED*/
extern void ufusr(char *param, int *retcode, int paramLen)
{
if (UF_CALL(UF_initialize())) return;
do_it();
UF_terminate();
}
int ufusr_ask_unload(void)
{
return (UF_UNLOAD_IMMEDIATELY);
}
-- End of document --
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP