In structured mode and in reporting mode using a DEFINE DATA
LOCAL
statement, the following syntax applies:
GET [IN ] [FILE ] view-name
|
|||||
[PASSWORD = operand1]
|
|||||
[CIPHER = operand2]
|
|||||
RECORDS |
operand3 | ||||
*ISN [(r) ]
|
In reporting mode using no DEFINE DATA LOCAL
statement,
the following syntax applies:
GET [IN ] [FILE ] ddm-name
|
||||||
[PASSWORD = operand1]
|
||||||
[CIPHER = operand2]
|
||||||
RECORDS |
operand3 | operand4 | ||||
*ISN [(r) ]
|
This document covers the following topics:
For an explanation of the symbols used in the syntax diagram, see Syntax Symbols.
Related Statements: ACCEPT/REJECT
|
AT BREAK
|
AT START OF DATA
|
AT END OF DATA
|
BACKOUT TRANSACTION
|
BEFORE BREAK PROCESSING
|
DELETE
|
END TRANSACTION
|
FIND
|
GET SAME
|
GET
TRANSACTION
| HISTOGRAM
|
LIMIT
|
PASSW
|
PERFORM BREAK PROCESSING
| READ
| RETRY
|
STORE
|
UPDATE
Belongs to Function Group: Database Access and Update
The GET
statement is used to read a record with a given
Adabas Internal Sequence Number (ISN).
For XML databases, the GET
statement is
used to read an XML object with a given object ID.
The GET
statement does not cause a processing loop to
be initiated.
The GET
statement cannot be used for SQL databases.
The GET
statement cannot be used with Entire System
Server.
Operand Definition Table:
Operand | Possible Structure | Possible Formats | Referencing Permitted | Dynamic Definition | |||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
operand1
|
C | S | A | yes | no | ||||||||||||||
operand2
|
C | S | N | no | no | ||||||||||||||
operand3
|
C | S | N | N | P | I | B * | yes | no | ||||||||||
operand4
|
S | A | A | N | P | I | F | B | D | T | L | yes | yes |
* Format B of operand3
may
be used only with a length of less than or equal to 4.
Syntax Element Description:
Syntax Element | Description |
---|---|
view-name
|
View Name:
In structured mode and in reporting mode using a
|
ddm-name |
DDM Name:
In reporting mode using no |
PASSWORD=operand1
|
PASSWORD Clause/CIPHER
Clause:
These clauses are applicable only to Adabas databases. The The |
CIPHER=operand2 |
|
*ISN /
operand3
|
Internal Sequence Number:
The ISN must be provided either in the form of a numeric
constant or user-defined variable
( |
(r) |
Statement Reference:
The notation
If
|
operand4
|
Reference to Database
Fields:
In reporting mode, subsequent references to database
fields that have been read with a |
** Example 'GETEX1': GET ************************************************************************ DEFINE DATA LOCAL 1 PERSONS VIEW OF EMPLOYEES 2 PERSONNEL-ID 2 NAME 2 FIRST-NAME 1 SALARY-INFO VIEW OF EMPLOYEES 2 NAME 2 CURR-CODE (1:1) 2 SALARY (1:1) * 1 #ISN-ARRAY (B4/1:10) 1 #LINE-NR (N2) END-DEFINE * FORMAT PS=16 LIMIT 10 READ PERSONS BY NAME MOVE *COUNTER TO #LINE-NR MOVE *ISN TO #ISN-ARRAY (#LINE-NR) DISPLAY #LINE-NR PERSONNEL-ID NAME FIRST-NAME /* AT END OF PAGE INPUT / 'PLEASE SELECT LINE-NR FOR SALARY INFORMATION:' #LINE-NR IF #LINE-NR = 1 THRU 10 GET SALARY-INFO #ISN-ARRAY (#LINE-NR) WRITE / SALARY-INFO.NAME SALARY-INFO.SALARY (1) SALARY-INFO.CURR-CODE (1) END-IF END-ENDPAGE /* END-READ END
Page 1 05-01-13 13:17:42 #LINE-NR PERSONNEL NAME FIRST-NAME ID -------- --------- -------------------- -------------------- 1 60008339 ABELLAN KEPA 2 30000231 ACHIESON ROBERT 3 50005800 ADAM SIMONE 4 20008800 ADKINSON JEFF 5 20009800 ADKINSON PHYLLIS 6 20012700 ADKINSON HAZEL 7 20013800 ADKINSON DAVID 8 20019600 ADKINSON CHARLIE 9 20008600 ADKINSON MARTHA 10 20005700 ADKINSON TIMMIE PLEASE SELECT LINE-NR FOR SALARY INFORMATION: 1 ABELLAN 1450000 PTA