I have a LO Basic function whose job is to collect a string from the user and then return it with a newline appended. This is it:
Function ReportGen_GenNotes() as string dim iResponse as Integer dim strNotes as String iResponse = MsgBox("Are there special notes that need to be added to this report?", 4, "Special Notes?") If iResponse = 6 Then 'The user clicked Yes.' strNotes = inputBox("Enter the special notes as they should appear, including punctuation:", "Special Notes") END IF ReportGen_GenNotes = strNotes & char(&h0a) End Function
When it runs, the last line before
End Function yields
BASIC runtime error.
Sub-procedure or function procedure not defined.
What is wrong with that line?