Data Language Interface: Difference between revisions

Revision as of 19:03, 11 December 2008

Latest revision as of 23:37, 9 March 2025

(29 intermediate revisions by 27 users not shown)

Line 1:

'''Data Language One''' (Data Language/I, DL/I, Data Language/One, Data Language/One<ref>{{cite web|url=http://www-03.ibm.com/servers/eserver/zseries/zvse/products/database.html#dli|archive-url=https://web.archive.org/web/20060321113510/http://www-03.ibm.com/servers/eserver/zseries/zvse/products/database.html#dli|url-status=dead|archive-date=March 21, 2006|title=IBM z/VSE Products and components|publisher=[[IBM]]|accessdate=2009-06-27}}</ref>) is the language system used to access [[IBM]]'s [[IBM Information Management System|IMS]] [[database]]s and its [[data communication]] system.

{{Wikify|date=January 2008}}

'''Data Language/1''' (DL/1, DL/I) is the language system used to access [[International Business Machines|IBM]]’s [[Information Management System|IMS]] [[database]]s, and its data communication system.

It is implemented from anymany languagelanguages by making calls to a software stub, DFSLI000. This stub has entry points to handle a variety of programming languages, e.g., calling CBLTDLI from a [[COBOL]] program. This stub is linked to the calling program, passes on the request to the IMS system, and returns the results and a status code.

In any full-function IMS database, the smallest element that can be retrieved is a ''segment''. Each segment is made up of ''fields'', one of which, typically, will be a key field. The segments are arranged hierarchically in the database, the highest -level segment type being a root segment. 255 different segment types, on up to 15 levels, are allowed in any database. A database ''record'' consists of a specific root segment and all its dependent child segments &mdash;{{snd}} there is no limit to the number of segments in a record, or to the number of records in a database (apart from the physical limitations of storage space).

The structure of any database is presented to the application program as a ''PCB'' (Program ControlCommunication Block), and this is used as one of the [[parameterParameter (computer programming)|parameters]]s passed to the stub. Other types of PCB are used to send and receive [[transaction processing]] messages, access and write to the user’s [[computer displaymonitor|VDU]] screen, and to print reports, etc.

When accessing a database segment, the application program also uses an ''SSA'' (Segment Search Argument) as a parameter, to specify the segment or segments that it needs. This would typically contain the segment type required, and the contents of any key fields.

For all languages except [[PL/I]], the first parameter in a call is the ''Function Code'' &mdash;{{snd}} a four -character field, examples being: “GU“<code>GU&nbsp;&nbsp;</code>” (Get Unique), “GN“<code>GN&nbsp;&nbsp;</code>” (Get Next), “REPL”“<code>REPL</code>” (Replace), and “ISRT”“<code>ISRT</code>” (Insert). With PL/1I, due to the way this language does not mark the last parameter with a '1' in bit 0, the first parameter must instead be a fullword (Fixed Bin(31)) containing the number of following parameters.

A typical call from a [[COBOL]] program might be .<syntaxhighlight . .lang="cobolfree" inline>CALL “CBLTDLI” USING GU, Stores-Database-PCB, Stores-Segment-Area, Stores-Root-SSA</syntaxhighlight>. The program would then automatically wait till the requested data waswere retrieved and placed in the Segment-Area. The status code contained within the PCB would be updated with either blanks (if all went well) or some informational or error code.

A typical call from a PL/1I program might be .<syntaxhighlight . .lang="cobolfree" inline>CALL PLITDLI(FOUR, GU, Stores-Database-PCB, Stores-Segment-Area, Stores-Root-SSA);</syntaxhighlight>.

==References==

{{Reflist}}

==External links==

* [http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp Information Management Software for z/OS Solutions Information Center]

* [http://www.geocities.com/s_sunil_raju/ims.htm A full account]

* [http://publib.boulder.ibm.com/infocenter/iadthelp/v6r0/index.jsp?topic=/com.ibm.etools.egl.doc/topics/ceglasm0401.html Basic DL/I database concepts]

[[Category:Data-structured programming languages]]

[[Category:IBM software|Data Language One ]]

[[es:Data Language/Interface]]

[[it:IBM Data Language One (DL/1)]]

[[ja:DL/I]]