Skip to main content

RENUMBER Change Program Line Numbers

Format

RENUMBER [new_line1[,step_val[,range_start][,range_end]]]

Where:

new_line1

New starting line number (default is 0010). Prefacing this line number with a ^ (caret) character results in a starting line number that is the next highest multiple of the number.

range_start

(Optional) Starting line number or label at which to begin renumbering. Use to define the start of an existing range in the program for renumbering.

range_end

(Optional) Ending line number or label with which to stop renumbering. Use to define the end of an existing range in the program for renumbering.

step_val

Increment or step value between line numbers (default is 10). Numeric expression.

Description

Use the RENUMBER directive to assign new line numbers to the current program. During the renumbering process, PxPlus adjusts all references to the lines being renumbered (e.g. GOTO, ERR= option, etc.) to reflect the new line number.

By default, the complete program is renumbered. You can choose to resequence only selected ranges of the program. All references (GOTO, etc.) are adjusted in either case.

Use embedded REM statements in the program to control renumbering. If a remark line starts with a number (e.g. 4000 REM 4000), PxPlus uses the number as the absolute line number (assuming it is less than or equal to the current resequence number). The following table shows some REM examples:

REM Example

Description

100  REM 500

Start at line 500 and increment each subsequent line number by 10 (default).

100  ! 500

Same as above.

100  REM 500,2

Begin at line 500 and increment each line number by 2.

100  REM ^100

Start at the next highest multiple of 100 and increment each line number by 10.

100  REM ^1000,5

Start at the next highest multiple of 1000 and increment each line number by 5.

Example

list
0001 for I =1 to 40
0002 read (1,err=0018)A,B
0003 print A,B
0007 next I
0010 stop
0014 rem 100 - Error procedure
0018 exitto 0008
renumber
list
0010 for I=1 to 40
0020 read (1,err=0110)A,B
0030 print A,B
0040 next I
0050 stop
0100 rem 100 - Error procedure
0110 exitto 0045

In line 0110 (renumbered version), PxPlus generated line number 0045 in the EXITTO statement since no line number 0008 existed in the original version.