PROCEDURE getArrayElement PARAMETERS lnElement pcTheData = laWarnLbl[lnElement] RETURN pcTheData ENDPROC