intn DFANputlabel(char *filename, uint16 tag, uint16 ref, char *label)
filename
IN:
Name of the file
tag
Tag of the data object to be assigned the label
ref
Reference number the data object to be assigned the label
label
Null-terminated label string
Purpose
Assigns a label to the data object with the given tag/reference number pair.
Return value
Returns SUCCEED (or 0) if successful and FAIL (or -1) otherwise.
FORTRAN
integer function daplab(filename, tag, ref, label)
character*(*) filename, label
integer tag, ref