What are the ADABAS-DBIDs my current Natural session is connected to?
There's no USR-Subprogram giving the answer to that question.
Sample:
Imagine the following: Let's say my UDB is set to 001.
DEFINE DATA LOCAL
01 VIEW01 VIEW MYFILE1-DB12 /* DBID=012 is hardcoded in DDM
02 FIELD01
01 VIEW02 VIEW MYFILE2 /* DBID=014 manipulated by session Parameter TF
02 FIELD02
01 VIEW03 VIEW MYFILE3 /* DBID=0 in DDM, File is not in TF-Table, that means Parameter UDB would be taken
END-DEFINE
*
/* udb is 001 at the moment
*
GET VIEW01 1
/* Now I'm connected to DBID=012
*
GET VIEW02 2
/* Now I'm connected to DBID=014
*
*
/* I'm not connected to DBID=001 (which is my UDB) because I did no I/O on VIEW03
END
The correct answer to my sample would be 12 and 14, and not 001 (which is my udb).
Created on Brainstorm | 09/17/2018 01:43 AM |
Brainstorm ID | 6287 |
Hello Matthias, What is the use case of knowing the DBID numbers during runtime ?
This Idea will be check for Linux only.