Content deleted Content added
m width |
m v2.05b - Bot T20 CW#61 - Fix errors for CW project (Reference before punctuation) |
||
(24 intermediate revisions by 14 users not shown) | |||
Line 1:
{{Infobox programming language
| name
| logo =
| paradigm
| year
| designers
| developers
| latest release version
| latest release date
| typing
| implementations = DB/C DX, DATABUS, and
| dialects
| influenced_by
| influenced
| file_ext
<!--| wikibooks = Programming Language for Business --><!-- No page in wikibooks as of 2023-0802
}}
'''Programming Language for Business''' or '''PL/B''' is a business-oriented [[programming language]] originally called '''DATABUS''' and designed by [[Datapoint]] in 1972<ref name="sysmaker">{{cite web | url=http://www.sysmaker.com/infopro/x3j15/ | title=J15 - Programming Language PL/B | publisher=sysmaker.com | accessdate=10 June 2016}}</ref> as an alternative to [[COBOL]] because Datapoint's [[8-bit computer]]s could not fit COBOL into their limited memory, and because COBOL did not at the time have facilities to deal with Datapoint's built-in keyboard and screen.
A version of DATABUS became an [[American National Standards Institute|ANSI]] standard, and the name PL/B came about when Datapoint
== Functionality ==
Much like [[Java (programming language)|Java]] and [[Microsoft .NET|.NET]], PL/B programs are compiled into an intermediate [[byte-code]], which is then interpreted by a runtime library. Because of this, many PL/B programs can run on [[DOS]], [[Unix]], [[Linux]], and [[Microsoft Windows|Windows]] [[operating system]]s.<ref name="sunbelt">{{cite web | url=http://www.sunbelt-plb.com/show.php?Page=aboutplb.shtml | title=About PL/B | publisher=Sunbelt Computer Systems, Inc. | accessdate=10 June 2016}}</ref>
Several implementations of the language are capable of running as an Application Server like [[Citrix]], and connecting to remote databases through a data manager.{{cn|date=February 2025}}
== Source code example ==
IF (DF_EDIT[ITEM] = "PHYS")
== External links == ▼
STATESAVE MYSTATE
IF (C_F07B != 2)
DISPLAY *SETSWALL 1:1:1:80:
*BGCOLOR=2,*COLOR=15:
*P49:1," 7-Find "
ELSE
DISPLAY *SETSWALL 1:1:1:80:
*BGCOLOR=7,*COLOR=0:
*P49:1," 7-Find "
ENDIF
STATEREST MYSTATE
TRAP GET_PRO NORESET IF F7
ENDIF
IF (SHOW_FILTER AND THIS_FILTER AND C_CUSTNO <> "MAG")
LOADMOD "filter"
PACK PASS_ID WITH "QED ",QED_ID1,BLANKS
MOVE " FILTER DISPLAY (F6) " TO PASS_DESC
SET C_BIGFLT
CALL RUN_FILT USING PASS_ID,PASS_DESC,"432"
UNLOAD "filter"
CLEAR THIS_FILTER
ENDIF
== References ==▼
{{reflist|30em}}▼
{{Portal|Computer programming}}
* [http://www.sunbelt-plb.com Sunbelt implementation of PL/B]
* [http://www.sysmaker.com/infopro/x3j15 ANSI PL/B Standards Committee]
* [http://www.mmcctech.com/pl-b/plb-0010.htm MMCC PL/B programming notebook]
* [http://www.dbcsoftware.com/dbcov.html DB/C DX, DATABUS, and PL/B Overview]
* [http://bitsavers.trailing-edge.com/pdf/datapoint/software/50004_databusSimpUG_Feb76.pdf Databus Simplified User Guide]
▲== References ==
▲{{reflist|30em}}
{{Major programming languages}}
Line 50 ⟶ 72:
[[Category:Procedural programming languages]]
[[Category:Programming languages created in the 1970s]]▼
[[Category:Cross-platform software]]
[[Category:Structured programming languages]]
|