Rocket 204 - Echoing Examples; Examples Using LECHO and CECHO

Terminal Processing 15
Echoing examples
Echoing examples
Examples using LECHO and CECHO
In the first series of examples, LECHO and CECHO initially are set to 0, and no
echoing occurs. LECHO is then set to values of 1, 4, and 5.
Example 1
No echoing: LECHO = 0
BEGIN
PRINT ‘CASH’
END
CASH
INCLUDE 0
CASH
Example 2
Terminal echo, no procedure echo: LECHO = 1
BEGIN
BEGIN
PRINT ‘CASH ON HAND’
PRINT ‘CASH ON HAND’
END
END
CASH ON HAND
INCLUDE 0
INCLUDE 0
CASH ON HAND
Example 3
No terminal echo, procedure echo: LECHO = 4
INCLUDE 0
BEGIN
PRINT ‘CASH ON HAND’