IBM Data Language One (DL/1)

IBM Data Language One (DL/1)

Data Language/1 (DL/1, DL/I) is the language system used to access IBM’s IMS databases, and its data communication system.

It is implemented from any language 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 — there is no limit to the number of segments in a record, or to the number of records in a database (apart from physical limitations of storage space).

The structure of any database is presented to the application program as a "PCB" (Program Control Block), and this is used as one of the parameters passed to the stub. Other types of PCB are used to send and receive transaction processing messages, access and write to the user’s 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, first parameter in a call is the "Function Code" — a four character field, examples being: “GU ” (Get Unique), “GN ” (Get Next), “REPL” (Replace), and “ISRT” (Insert). With PL/1, 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 . . . CALL “CBLTDLI” USING GU, Stores-Database-PCB, Stores-Segment-Area, Stores-Root-SSA. The program would then automatically wait till the requested data was 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/1 program might be . . . CALL PLITDLI(FOUR, GU, Stores-Database-PCB, Stores-Segment-Area, Stores-Root-SSA);

External links

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


Wikimedia Foundation. 2010.

Игры ⚽ Поможем сделать НИР

Look at other dictionaries:

  • Data Language Interface — (Data Language/I, DL/I, Data Language/Interface, Data Language/One [1]) is the language system used to access IBM’s IMS databases, and its data communication system. It is implemented from any language by making calls to a software stub, DFSLI000 …   Wikipedia

  • Data base management system — Ein Datenbanksystem (DBS) ist ein System zur elektronischen Datenverwaltung. Die wesentliche Aufgabe eines DBS ist es, große Datenmengen effizient, widerspruchsfrei und dauerhaft zu speichern und benötigte Teilmengen in unterschiedlichen,… …   Deutsch Wikipedia

  • Data General — Industry Computer Fate Acquired Successor EMC Corporation Founded 1968 …   Wikipedia

  • IBM DB2 — Developer(s) IBM Initial release 1983 (1983) …   Wikipedia

  • IBM mainframe utility programs — are supplied with IBM mainframe operating systems such as MVS to carry out various tasks associated with datasets, etc.History/Common JCLMany of these utilities were designed by IBM users, through the group SHARE, and then developed by IBM or… …   Wikipedia

  • IBM Information Management System — (IMS) is a joint hierarchical database and information management system with extensive transaction processing capabilities. History IBM designed IMS with Rockwell and Caterpillar starting in 1966 for the Apollo program. IMS s challenge was to… …   Wikipedia

  • IBM System/36 — The IBM System/36 was a minicomputer marketed by IBM from 1983 to 2000. It was a multi user, multi tasking successor to the System/34. Like the System/34 and the older System/32, the System/36 was primarily programmed in the RPG II language. One… …   Wikipedia

  • IBM System/34 — The IBM System/34 was a minicomputer marketed by IBM from 1978 to 1983. It was a multi user, multi tasking successor to the single user System/32. Most notably, it included two very different processors, one based on System/32 and the second… …   Wikipedia

  • IBM RPG — Infobox programming language name = RPG Report Program Generator paradigm = Multi paradigm year = 1959 designer = developer = IBM latest release version = RPG IV version 6 release 1 latest release date = release date|2008|1|29 latest test version …   Wikipedia

  • IBM 1401 — The IBM 1401, the first member of the IBM 1400 series, was a variable wordlength decimal computer that was announced by IBM on October 5, 1959. It was withdrawn on February 8, 1971.From the [http://www… …   Wikipedia

Share the article and excerpts

Direct link
Do a right-click on the link above
and select “Copy Link”