EDIT Examples

Example 1:

 

  

EDIT

SENDING TO RECVING

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

12

4

8

A1B2C3D4E5F6

 

RECVING

10

1

9

XXXXXXXXX

 

After:

SENDING

12

4

8

A1B2C3D4E5F6

 

RECVING

10

1

9

2C3D4ˇˇˇˇˇ

 

No Condition Flags are set (all FALSE).

 

Example 2:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

12

1

7

A1B2C3D4E5F6

 

RECVING

12

1

12

XX00XXBB-999

 

After:

SENDING

12

1

7

A1B2C3D4E5F6

 

RECVING

12

1

12

A100B2ˇˇ-C3D

 

The OVER Condition Flag is set. The C3D mask was specified as digits only.

 

Example 3:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

6

1

6

101582

 

RECVING

8

1

8

99/99/99

 

After:

SENDING

6

1

6

101582

 

RECVING

8

1

8

10/15/82

 

No Condition Flags are set (all FALSE).

 

Example 4:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

8

 

 

ˇˇˇ11111

 

RECVING

10

1

9

ZZ999x999

 

After:

SENDING

8

 

 

ˇˇˇ11111

 

RECVING

10

1

9

ˇˇ011x111

 

No Condition Flags are set (all FALSE).

 

Example 5:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

9

 

 

ˇˇ1537.25

 

RECVING

12

1

10

$ZZ,ZZ9.99

 

After:

SENDING

8

 

 

ˇˇ1537.25

 

RECVING

12

1

10

ˇ$1,537.25

 

No Condition Flags are set (all FALSE).

 

Example 6:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

9

 

 

101537.25

 

RECVING

12

1

10

$ZZ,ZZ9.00ˇˇ

 

After:

SENDING

9

 

 

101537.25

 

RECVING

12

1

10

$01,537.25ˇˇ

 

The LESS Condition Flag is set. The $ overstored the first significant digit.

 

Example 7:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

8

 

 

ˇˇ111222

 

RECVING

12

1

7

ZZZ,ZZZˇˇˇˇˇ

 

After:

SENDING

8

 

 

ˇˇ111222

 

RECVING

12

1

7

ˇˇ1,112ˇˇˇˇˇ

 

The EOS Condition Flag is set. RECVING was too small.

 

Example 8:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

6

 

 

123.45

 

RECVING

12

1

8

99999.99ˇˇˇˇ

 

After:

SENDING

6

 

 

123.45

 

RECVING

12

1

8

12345.00ˇˇˇˇ

 

No Condition Flags are set (all FALSE). Note the decimal point in SENDING was ignored! Numeric fields are padded on the right with zeros.

 

Example 9:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

7

 

 

-123.45

 

RECVING

12

1

7

$999.99ˇˇˇˇˇ

 

After:

SENDING

7

 

 

-123.45

 

RECVING

12

1

7

$123.45ˇˇˇˇˇ

 

No Condition Flags are set (all FALSE). Minus sign (treated as a leading zero) was discarded.

 

Example 10:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

7

 

 

-123.45

 

RECVING

12

1

9

(ZZZ9.99) ˇˇ

 

After:

SENDING

7

 

 

-123.45

 

RECVING

12

1

9

(ˇ123.45) ˇˇ

 

No Condition Flags are set (all FALSE).

 

Example 11:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

7

 

 

ˇˇ12.34

 

RECVING

12

1

9

(ZZ99.99) ˇˇ

 

After:

SENDING

7

 

 

ˇˇ12.34

 

RECVING

12

1

9

ˇˇˇ12.34ˇˇˇˇ

 

No Condition Flags are set (all FALSE).

 

Example 12:

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

7

 

 

ˇˇˇ5.74

 

RECVING

12

1

7

****.99ˇˇˇˇˇ

 

After:

SENDING

7

 

 

ˇˇˇ5.74

 

RECVING

12

1

7

***5.74ˇˇˇˇˇ

 

No Condition Flags are set (all FALSE).

 

Example 13:

 

  

EDIT

SENDING INTO RECV(4)

 

 

Variable

PL

FP

LP

Contents

Before:

SENDING

7

 

 

ˇˇˇ5.74

 

RECV(4)

12

1

8

ZZZ9.99ˇˇˇˇˇ

 

After:

SENDING

7

 

 

ˇˇˇ5.74

 

RECV(4)

12

1

8

ˇˇˇ5.74ˇˇˇˇˇ

 

No Condition Flags are set (all FALSE).

 


PL/B Language Reference DRELEASE Examples ENABLEITEM Example