NLM 1.1 documentation correction (Functions/Subroutines/Programs)

In the NLM 1.1 documentation, page 17, topic - Verifying the TSR is loaded, there is sample code for testing whether the TSR has been loaded. There is a mistake in the order of the parameters for the Index function. The correct order appears below:

* Now check if the VOC file is under the NLM's control.

*

OPEN "VOC" to VOC then

If Index( VOC, "FFFFFF", 1) ELSE

MsgTxt = "The VOC file is NOT under the NLM's"

MsgTxt := "Control.|"

MsgTxt := "Please contact the system"

MsgTxt := "administrator.||"

MsgTxt := "you will now be logged off."

IF @UserName NE "BACKDOOR" THEN

Msg(MsgTxt, "", "", "" )

PERFORM "OFF"

END

END

END

Thanks to Matthew Fields, A.Mus.D., U-Mich Medical Center, for pointing the error out to us.