NLM 1.1 documentation correction (Functions/Subroutines/Programs) [Revelation On-Line Wiki]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

====== NLM 1.1 documentation correction (Functions/Subroutines/Programs) ======

======   ======

==== Created at 17 DEC 1996 03:14PM ====




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.