9 187 PUT_NUM_AREA

LANSA Technical

9.187 PUT_NUM_AREA

Þ Note: Built-In Function Rules.

Puts a numeric value into a numeric data area.

For use with

LANSA for i

YES

Visual LANSA for Windows

YES

Visual LANSA for Linux

YES

 

 

Arguments

No

Type

Req/ Opt

Description

Min Len

Max Len

Min Dec

Max Dec

1

N

Req

Value to put

1

15

0

0

2

A

Req

Data area name

1

10

 

 

3

A

Opt

Library name

Default: '*LIBL'

1

10

 

 

4

A

Opt

Unlock data area

'Y' - unlock data area

'N' - do not unlock data area

Default: 'N'

1

1

 

 

 

 

Return Values

No return values.

Example

Retrieve a batch number #BATCH from data area named NEXTBATCH which should be located via the job's library list.

Increment the batch number value and place the incremented value back into the data area.

Make sure that no 2 jobs can be assigned the same batch number by using the lock and unlock options.

USE      BUILTIN(GET_NUM_AREA)  
         WITH_ARGS(NEXTBATCH '''*LIBL''' 'Y') TO_GET(#BATCH)
CHANGE   FIELD(#BATCH) TO('#BATCH + 1')
USE      BUILTIN(PUT_NUM_AREA)  
         WITH_ARGS(#BATCH NEXTBATCH '''*LIBL''' 'Y')