Compaq DEC Text Processing Utility (DECTPU) Guide Manual page 7

A Sample DECTPU Procedures
A.1 Line-Mode Editor . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
A.2 Translation of Control Characters . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
A.3 Restoring Terminal Width Before Exiting from DECTPU . . . . . . . . . . . . .
Running DECTPU from an OpenVMS Subprocess . . . . . . . . . . . . . . . . . .
A.4
B DECTPU Terminal Support
B.1 Using Screen-Oriented Editing on Supported Terminals . . . . . . . . . . . . . .
B.1.1 Terminal Settings on OpenVMS Systems That Affect DECTPU . . . . .
SET TERMINAL Command . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
B.1.2
Using Line-Mode Editing on Unsupported Terminals . . . . . . . . . . . . . . . .
B.2
B.3 Using Terminal Wrap . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
C DECTPU Debugger Commands
Index
Examples
1-1 Sample User-Written Procedure . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
DCL Command Procedure FILENAME.COM . . . . . . . . . . . . . . . . . . . .
2-1
2-2 DCL Command Procedure FORTRAN_TS.COM . . . . . . . . . . . . . . . . .
DCL Command Procedure INVISIBLE_TPU.COM . . . . . . . . . . . . . . .
2-3
2-4 DECTPU Command File GSR.TPU . . . . . . . . . . . . . . . . . . . . . . . . . . .
Suppressing the Addition of Padding Blanks . . . . . . . . . . . . . . . . . . . .
3-1
4-1 Global and Local Variable Declarations . . . . . . . . . . . . . . . . . . . . . . . .
Global and Local Constant Declarations . . . . . . . . . . . . . . . . . . . . . . .
4-2
4-3 Procedure That Uses Relational Operators on Markers . . . . . . . . . . . .
4-4 Simple Procedure with Parameters . . . . . . . . . . . . . . . . . . . . . . . . . . .
4-5 Complex Procedure with Optional Parameters . . . . . . . . . . . . . . . . . . .
4-6 Procedure That Returns a Result . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
4-7 Procedure Within Another Procedure . . . . . . . . . . . . . . . . . . . . . . . . . .
4-8 Recursive Procedure . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
4-9 Procedure That Uses the CASE Statement . . . . . . . . . . . . . . . . . . . . .
4-10 Procedure That Uses the ON_ERROR Statement . . . . . . . . . . . . . . . .
Procedure with a Case-Style Error Handler . . . . . . . . . . . . . . . . . . . . .
4-11
4-12 Procedure That Returns a Value . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Procedure That Returns a Status . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
4-13
4-14 Using RETURN in an ON_ERROR Section . . . . . . . . . . . . . . . . . . . . .
Simple Error Handler . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
4-15
5-1 SHOW (SUMMARY) Display . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Syntax of a DECTPU Program . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
5-2
5-3 Sample DECTPU Programs . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
5-4 Sample Program for a Section File . . . . . . . . . . . . . . . . . . . . . . . . . . . .
5-5 Source Code for Minimal Interface to DECTPU . . . . . . . . . . . . . . . . . .
5-6 Command File for GOTO_TEXT_MARKER . . . . . . . . . . . . . . . . . . . . .
5-7 SHOW DEFAULTS BUFFER Display . . . . . . . . . . . . . . . . . . . . . . . . .
A-1
A-2
A-6
A-7
B-1
B-1
B-3
B-3
B-3
1-7
2-4
2-4
2-5
2-5
3-10
4-5
4-6
4-11
4-16
4-17
4-18
4-18
4-19
4-22
4-24
4-26
4-28
4-29
4-29
4-30
5-2
5-3
5-4
5-20
5-22
5-25
5-27
vii