Forces the report print to stop. The page footer and the "end of document" block are printed.
Remark: This function can only be used in the reports created with the report editor.
// End of print if the text file is not found
GLOBAL
// Identifier of text file
gfnFileID is int = 0
LOCAL
sTextFile is string = fCurrentDir() + "\Reports\Product.txt"
// Open the text file
gfnFileID = fOpen(sTextFile, foRead)
IF gfnFileID = -1 THEN
Error(ErrorInfo())
iEndReport() // Stop printing the report
END
// End of print forced when printing a record
IF MySelf..Source.CustomerName = "SMITH" THEN
iEndReport()
END
Business / UI classification: Neutral code