Jump to content

Cerner CCL

From Wikipedia, the free encyclopedia

This is an old revision of this page, as edited by 159.140.254.10 (talk) at 15:57, 7 May 2012. The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.

Cerner CCL (Cerner Command Language) is the Cerner Corporation fourth-generation programming language, which is expressed in the Cerner Discern Explorer solution. CCL is patterned after the Structured Query Language (SQL). All Cerner Millennium health information technology solutions use CCL/Discern Explorer to select from, insert into, update into and delete from a Cerner Millennium database. Usage of CCL allows Cerner Millennium to remain independent of database-specific nuances of SQL syntax. CCL provides unlimited possibilities for using Discern Explorer to query and report on the Cerner Millennium data. CCL allows a programmer to fetch data from an Oracle database and display it as the user wants to see. With features like, Record Structure and subroutines, it allows us to get data from database and manipulate it by storing in a temporary structure; execute a particular section of the code, if required using a subroutine.

Discern Explorer provides several applications that can be used to create, execute, and analyze ad hoc queries, reports and programs. These applications provide flexibility in the skill set needed to build programs and design reports. Discern Explorer programs can be written using, VisualExplorer.exe (VE), DiscernVisualDeveloper.exe (DVDev), an operating system command-line editor, or any other text editor. ExplorerMenu.exe (EM) is used to execute Discern Explorer programs on demand. ExplorerAnalyzer.exe (EA) allows its users to analyze the system resources used by RDBMS queries.

CCL Hello World examples:

Example 1
call echo("Hello World!") go
Example 2
drop program helloworld2 go
create program helloworld2
   call echo("Hello World!")
end go
Example 3
drop program helloworld3 go
create program helloworld3
 PAINT 
 call TEXT(1,1, "Hello World!")
end go