Previous Topic: GetMIFString - Retrieve the Value of a String AttributeNext Topic: SetComment - Copy the Text to UAM Job Comment Field


GetMIFValue - Retrieve the Value of an Attribute

Valid on UNIX and Windows

The GetMIFValue function retrieves the value of a specific attribute from a MIF file.

Function format:

GetMIFValue(Filename as string, GroupName as string, AttrName as string) as string
GetMIFValue(Filename as string, GroupID as integer, AttrID as integer) as string
GetMIFValue(Filename as string, GroupName as string, GroupID as integer, AttrName as string, AttrID as integer) as string
Filename

Identifies the file name of the MIF file.

GroupName

Specifies the name of the group in which the attribute is located.

GroupID

Specifies the ID of the group in which the attribute is located.

AttrName

Specifies the name of the attribute to retrieve the value from.

AttrID

Specifies the ID of the attribute to retrieve the value from. If the value is a text string, the returned string includes a quotation mark before and after the string.

If the attribute specified is found in the MIF file, GetMIFValue returns a string representing the value of the attribute; otherwise, returns an empty string.

Example:

The following is an example of the GetMIFComponent, GetMIFInteger, GetMIFString, GetMIFValue, and SetMIFValue functions.

Dim file, gname, aname as string
Dim gid as integer

ClrScr()
file = "h:\test\miffus\file.mif"

Print("Component of """ + file + """: """ + GetMIFComponent(file) + """")

gname = "Strings"
gId = 1
aname = "string_1"
Print(gname + "." + aname + " = " + GetMIFString(file, gname, gId, aname, 1))
aname = "string_2"
Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))

if SetMIFValue(file, gname, gId, aname, 2, "Text_new") then
	Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
else
	Print("1. SetMIFValue failed.")
	exit
endif

gname = "Numbers"
gId = 2
aname = "number_1"
Print(gname + "." + aname + " = " + Str(GetMIFInteger(file, gname, gId, aname, 1)))
aname = "number_2"
Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
if SetMIFValue(file, gname, gId, aname, 2, "999999") then

Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
else
	Print("2. SetMIFValue failed.")
	exit

endif