|
Major Function Code |
Database Statement (in COBOL DML) |
(1) Calling Arguments (nn) |
(2) |
(3) |
(4) |
(5) |
|---|---|---|---|---|---|---|
|
03 |
FIND DB-KEY db-key |
75 |
db-key |
|
|
|
|
|
FIND record-name DB-KEY IS db-key |
06 |
record-name |
db-key |
|
|
|
|
FIND DB-KEY db-key PAGE_INFO page-info |
29 |
dbkey |
page-info |
|
|
|
|
FIND CURRENT |
30 |
|
|
|
|
|
|
FIND CURRENT record-name |
07 |
record-name |
|
|
|
|
|
FIND CURRENT WITHIN set-name |
08 |
set-name |
|
|
|
|
|
FIND CURRENT WITHIN area-name |
09 |
area-name |
|
|
|
|
|
FIND NEXT WITHIN set-name |
14 |
set-name |
|
|
|
|
|
FIND NEXT record-name WITHIN set-name |
10 |
record-name |
set-name |
|
|
|
|
FIND PRIOR WITHIN set-name |
16 |
set-name |
|
|
|
|
|
FIND PRIOR record-name WITHIN set-name |
12 |
record-name |
set-name |
|
|
|
|
FIND FIRST WITHIN set-name |
20 |
set-name |
|
|
|
|
|
FIND FIRST record-name WITHIN set-name |
18 |
record-name |
set-name |
|
|
|
|
FIND LAST WITHIN set-name |
24 |
set-name |
|
|
|
|
|
FIND LAST record-name WITHIN set-name |
22 |
record-name |
set-name |
|
|
|
|
FIND sequence-number WITHIN set-name |
78 |
set-name |
sequence-number |
|
|
|
|
FIND sequence-number record-name WITHIN set-name |
76 |
record-name |
set-name |
sequence-number |
|
|
|
FIND NEXT WITHIN area-name |
15 |
area-name |
|
|
|
|
|
FIND NEXT record-name WITHIN area-name |
11 |
record-name |
area-name |
|
|
|
|
FIND PRIOR WITHIN area-name |
17 |
area-name |
|
|
|
|
|
FIND PRIOR record-name WITHIN Area-name |
13 |
record-name |
area-name |
|
|
|
|
FIND FIRST WITHIN area-name |
21 |
area-name |
|
|
|
|
|
FIND FIRST record-name WITHIN area-name |
19 |
record-name |
area-name |
|
|
|
|
FIND LAST WITHIN area-name |
25 |
area-name |
|
|
|
|
|
FIND LAST record-name WITHIN area-name |
23 |
record-name |
area-name |
|
|
|
|
FIND sequence-number WITHIN area-name |
79 |
area-name |
sequence-number |
|
|
|
|
FIND sequence-number record-name WITHIN area-name |
77 |
record-name |
area-name |
sequence-number |
|
|
|
FIND OWNER WITHIN set-name |
31 |
set-name |
|
|
|
|
|
FIND CALC (ANY) record-name |
32 |
record-name |
|
|
|
|
|
FIND DUPLICATE record-name |
50 |
record-name |
|
|
|
|
|
FIND record-name WITHIN set-name USING sort-field-name |
33 |
record-name |
set-name |
sort-field-name |
|
|
|
FIND record-name WITHIN set-name CURRENT USING sort-field-name |
51 |
record-name |
set-name |
sort-field-name |
|
|
OBTAIN (any of the above FIND record selection expressions.) Call generated consists of arguments described above for the FIND in question plus an additional argument of IDBMSCOM (43) function. For example: |
||||||
|
|
OBTAIN CALC record
|
32 |
record-name |
IDBMSCOM (43) |
|
|
|
|
OBTAIN PRIOR record-name WITHIN set-name |
12 |
record-name |
|
|
|
|
KEEP/KEEP EXCLUSIVE (any of the above FIND/OBTAIN record selection expressions.) Call generated consists of arguments described above for the FIND/OBTAIN in question plus one of the following additional IDBMSCOM function: KEEP..............................IDBMSCOM(87) KEEP EXCLUSIVE...........IDBMSCOM(88) For example: |
||||||
|
|
OBTAIN KEEP CALC record-name |
32 |
record-name |
IDBMSCOM (43) |
IDBMSCOM (87) |
|
|
|
FIND KEEP EXCLUSIVE CURRENT |
30 |
IDBMSCOM (88) |
|
|
|
|
05 |
GET |
43 |
|
|
|
|
|
|
GET record-name |
34 |
record-name |
|
|
|
|
17 |
RETURN db-key FROM index-set-name CURRENCY KEY INTO symbolic-key |
81 |
index-set-name |
db-key |
symbolic-key |
|
|
|
RETURN db-key FROM index-set-name FIRST KEY INTO symbolic-key |
82 |
index-set-name |
db-key |
symbolic-key |
|
|
|
RETURN db-key FROM index-set-name LAST KEY INTO symbolic-key |
83 |
index-set-name |
db-key |
symbolic-key |
|
|
|
RETURN db-key FROM index-set-name NEXT KEY INTO symbolic-key |
84 |
index-set-name |
db-key |
symbolic-key |
|
|
|
RETURN db-key FROM index-set-name PRIOR KEY INTO symbolic-key |
85 |
index-set-name |
db-key |
symbolic-key |
|
|
|
RETURN db-key FROM index-set-name USING index-key-value KEY INTO symbolic-key |
86 |
index-set-name |
db-key |
index-key-key |
symbolic-key |
|
Copyright © 2014 CA.
All rights reserved.
|
|