Append 1 Line Example (:A)

 

Append 1 Line Example (:A)

 

 NAME

DIM

30

 ADDRESS

DIM

30

 CITY

DIM

17

>STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

:A

 

 

 

 

 

 

After command:

 

 

 

 

 ADDRESS

DIM

30

 CITY

DIM

17

>STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 STATE

DIM

2

Note the following:

  1. Prior to execution of the command, the pointed line was physical line number four on the screen.

  2. After execution of the command, the pointed line is changed to physical line number three on the screen as a result of the screen roll up one line.

  3. The line pointer moved up with the screen roll.

  4. The new line is on the bottom data line

 

Append 3 Lines Example (:A3)

 

 NAME

DIM

30

 ADDRESS

DIM

30

 CITY

DIM

17

>STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 

:A3

 

After command:

 

>STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 STATE

DIM

2

 STATE

DIM

2

 STATE

DIM

2

Note the following:

  1. Prior to execution of the command, the pointed line was physical line number four on the screen.

  2. After execution of the command, the pointed line is changed to physical line number one on the screen as a result of the screen roll up three lines.

  3. The line pointer moved up with the screen rolls.

  4. Since the command was to append three lines, the line is duplicated three times at the bottom of the screen.

The new lines are on the bottom data lines (21-23).

 

Append 1 Line Example (:A*)

 

 NAME

DIM

30

 ADDRESS

DIM

30

 CITY

DIM

17

>STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 

:A*

 

After command:

 

 ADDRESS

DIM

30

 CITY

DIM

17

 STATE

DIM

2

>ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 STATE

DIM

2

Note the following:

  1. Prior to execution of the command, the pointed line was physical line number four on the screen.

  2. After execution of the command, the pointed line remains physical line number four on the screen as a result of the '*' specified along with the :A command.

  3. The line pointer does not move up with the screen roll.

  4. The new line is on the bottom data line.

 

Append 3 Lines Example (:A*3)

 

 NAME

DIM

30

 ADDRESS

DIM

30

 CITY

DIM

17

>STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

 CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 

:A*3

 

After command:

 

 STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

>CITYSTZ

DIM

30

 .

 

 

 LOOP1

 

 

 

LOOP

 

 

 KEYIN

 *P01:04,"Full Name: ",*EDIT,NAME;

 

 STOP

 IF ESCAPE

 

 CMATCH

 " ",NAME

 

 CONTINUE

 IF EOS

 

 CONTINUE

 IF EQUAL

 

 CMATCH

 "A",NAME

 

 CONTINUE

 IF LESS

 

 CMATCH

 "Z",NAME

 

 CONTINUE

 IF GREATER

 

 BREAK

 IF DOWN

 

REPEAT

WHILE FKEY

 LOOP2

 

 

 STATE

DIM

2

 ZIP

DIM

5

 ROUTE

DIM

4

Note the following:

  1. Prior to execution of the command, the pointed line was physical line number four on the screen.

  2. After execution of the command, the pointed line remains physical line number four on the screen as a result of the '*' specified along with the :A3 command.

  3. The line pointer does not move up with the screen rolls.

  4. Since the command was to append three lines, lines four through six are appended to the bottom of the screen.

  5. The new lines are on the bottom data lines of the screen.

 

 

See Also: Append Commands, SUNEDIT Commands, Line Edit Mode, SUNEDIT

 


System Utilities Append Commands