FACT (počítačový jazyk) - FACT (computer language) - Wikipedia
![]() | Tento článek obsahuje seznam obecných Reference, ale zůstává z velké části neověřený, protože postrádá dostatečné odpovídající vložené citace.Leden 2014) (Zjistěte, jak a kdy odstranit tuto zprávu šablony) ( |
Paradigma | Procesní, rozkazovací způsob |
---|---|
Navrhl | Computer Sciences Corporation, Honeywell |
Poprvé se objevil | 1959 |
Ovlivněno | |
COBOL |
SKUTEČNOST je časně ukončený počítačový programovací jazyk, vytvořený Datamatic Division of Minneapolis Honeywell pro své obchodní počítače řady 800 v roce 1959. FACT byl zkratkou pro „Fully Automatic Compiling Technique“.[1] Byl to vliv na design COBOL programovací jazyk.
Některé z návrhů FACT byly založeny na jazykovém projektu Základní angličtina, vyvinut kolem roku 1925 C.K. Ogden.
Tento software skutečně navrhla společnost Computer Sciences Corporation (Fletcher Jones, Roy Nutt a Robert L. Patrick) na základě smlouvy s Richardem Clippingerem ze společnosti Honeywell.
Příspěvky do COBOLu
FACT byl vliv na design COBOL a je jedním ze tří jazyků předchůdců připisovaných ve všech příručkách COBOL.
Několik prvků FACT bylo začleněno do COBOLU:
- Definování dat jako úrovní se skupinovými položkami a základními položkami.
- Přiřazení počátečních hodnot k datům, jak jsou definována (
HODNOTA
doložka). - Zadání omezeného seznamu povolených hodnot literálu v konkrétním poli (
88
datové položky na úrovni). - Generátor neprocesních zpráv založený na specifikaci vzhledu požadovaného hlášení (Sekce hlášení v COBOL-66).
- Kvalifikace jmen údajů (
V
neboZ
doložka). - Skupinový přesun podobně pojmenovaných položek (
PŘESUNOUT KORESPONDENCI
). - Kontrola platnosti procesních prohlášení (
NA CHYBU
doložka). - Vestavěný
TŘÍDIT
funkce.
Implementace
Není jasné, zda Honeywell někdy vydal funkční verzi FACT. Byl navržen jazyk a vydána podrobná specifikace (viz odkazy), ale uvádí se v něm, že „Computer Sciences Corporation má také smlouvu na implementaci FACT“, což znamená, že v té době na implementaci ještě pracovali. V té době začal výbor krátkého dosahu vyvíjet COBOL a Roy Nutt, 1 ze 3 ředitelů CSC, začal s tímto výborem spolupracovat na COBOL. Není jasné, jestli se někdy vrátil implementovat FACT, nebo jestli Honeywell soustředil své programovací úsilí na kompilátor COBOL.
FACT byl implementován,[2] nicméně - to bylo používáno australským ministerstvem obrany v 60. a na začátku 70. let.[je zapotřebí objasnění ]
Ukázkový program
Následující ukázky kódu z jednoduché mzdové aplikace v Specifikace FACT ukázat pevnou formu povahy FACT a jeho podobnosti s COBOL.
Obrysy souboru:
Ó 1 RU DETAILNÍ SOUBOR, (DETAIL),(D)Ó 2 DATUMÓ 3 MĚSÍCÓ 4 DENÓ 5 ROKÓ 6 *ZÁZNAM ZAMĚSTNANCŮÓ 7 ZAMĚSTNANEC Č, (ZAMĚSTNANEC)Ó 8 *NOVÝ ZAMĚSTNANEC,(NW)Ó 9 NÁZEVÓ 10 HODNOTITÓ 11 VÝJIMKY,(VÝJIMKA)Ó 12 ODPOČET DLUHOPISŮ,(BONDEDUKT)Ó 13 DENOMINACE DLUHOPISU,(BONDENOM)Ó 30 Já VNITŘNÍ SOUBOR1Ó 31 PRACOVNÍ ÚDAJEÓ 32 11 D ČÁST ŠARŽEÓ 33 11 D ČÍSLO ŠARŽEÓ 34 11 D POČET DÁVEK ÓÓ 35 11 D 1 POČET HODINÓ 36 11 D KARTY V DÁVCE Ó
Zdrojová prohlášení:
P 85 POUTO POSTUP. PSÁT SI BONDORDER A ODČÍTAT 1 Z NUM.P 86P 87 POZNÁMKA. FÁZE Já Z VZOREK PROGRAM. THE NÁSLEDUJÍCÍ POSTUPY JSOU POUŽITÝ NAP 88 UDĚLAT ŠARŽE KONTROLY V DOBĚ THE KARTU ČTENÍ SLOŽIT.P 89P 90 SHRNUTÍ POSTUP. PŘIDAT RP HODINY NA POČET HODIN. PŘIDAT 1 NA KARTY-P 91 -ŠARŽE.P 92P 93 KONTROLA ŠARŽÍ POSTUP. LI ČÁST ŠARŽE JE NE ROVNAT SE NA POČET HODIN NEBO ŠARŽE-P 94 -POČET JE NE ROVNAT SE NA KARTY V DÁVCE VIDĚT ŠPATNÁ ŠARŽE. SOUBOR POČET HODINP 95 A KARTY V DÁVCE NA NULA.P 96P 97 ŠPATNÁ ŠARŽE POSTUP. ZVRÁTIT NOVINKA-MASTER. ZAVŘÍT STRANA Z ZPRÁVA O CHYBĚ.P 98P 99 L. DÁT NULY DO PRINTLINE. SOUBOR NUM NA 8.P 100P 101 STAVĚT. DÁT ZAMĚSTNANEC A RP HODINY DO (NUM)TH EN A EH. SUB-P 102 TRAKT 1 Z KARTY V DÁVCE A NUM. LI KARTY V DÁVCE JE NULA PSÁT SIP 103 ZPRÁVA O CHYBĚ, ZVRÁTIT NOVÝ MASTER, ODEJÍT POSTUP. DOSTAT DALŠÍ SKUPINA.P 104 LI NUM JE NULA PSÁT SI ZPRÁVA O CHYBĚ A JÍT NA L, V OPAČNÉM PŘÍPADĚ VRÁTIT SE NAP 105 STAVĚT. KONEC Z POSTUP.
Popisy hlášení:
R 1 40ZPRÁVA O CHYBĚA 2 HLAVA STRÁNKY HDEJ 2F 3 ČÍSLO ŠARŽE 24ŠARŽE NE. ^F 4 ČÍSLO STRÁNKY 1 43V CHYBA STRANA ^A 5 SLOUPCOVÉ OKRUHY HD 3F 6 30EMP.NE. HODINY EMP.NE.HODINY^F 7 60EMP.NE. HODINY EMP.NE.HODINY^F 8 90EMP.NE. HODINY EMP.NE.HODINY^F 9 120EMP.NE. HODINY EMP.NE.HODINY^A 10 ERROR-LINE OO 1F 11 1SVATÝ EN 8 ^F 12 1SVATÝ RH 14 .^F 13 2ND EN 23 ^F 14 2ND RH 29 .^F 15 3RD EN 38 ^F 16 3RD RH 44 .^R 101 4OBDAROVATELA 102 HLAVA HLAVY HDEJ 2F 103 BPAGE 1A 104 BONDORDER-LINE OO 1F 105 M ZAMĚSTNANECF 106 M NÁZEV
Rozvržení sestavy:
L 1 HLAVA STRÁNKY ŠARŽE NE. ^ V CHYBA STRANA ^L 2 SLOUPEC EMP.NE. HODINY EMP.NE. HODINY EMP.NE. HODINY EMP.NE. HODINY EMP.NE. HODINY EMP.NE. HODINY EMP.NE. HODINY EMP.NE. HODINYL 3 ERROR-LINE ^ .^ ^ .^ ^ .^ ^ .^ ^ .^ ^ .^ ^ .^ ^ .^L 4 HLAVA HLAVY POUTO OBJEDNÁVKY EMP. NE. NÁZEV DATUM POUTO STRANA ^L 5 BONDORDER-LINE ^ ^ ^- ^- ^ . ^L 6 DEL-HEADING UKONČENÍ EMP. NE. DATUM NÁZEV POUTO ČR. CELKEM.. HRUBÝ DAŇ FICA POJIŠTĚNÍ RET STRANA ^L 7 DELETIONS-LINE ^ ^- ^- ^ ^ . ^ . ^ . ^ . ^ . ^ . ^L 8 HLAVA CHYBY CHYBY... EMP. NE. DATUM TYP STRANA ^L 9 ERROR-LINE ^ ^- ^- ^ ^L 10 TITLE-LINE MÍSTO ŠEK FORMULÁŘ V TISKÁRNAL 12 1PAYLINE ^ ^/ ^/ ^ .^ ^/ ^/ ^L 13 2PAYLINE . ^ . ^ . ^ .^ . ^L 14 3PAYLINE ^ $****. ^ . ^ . ^
Zdroje
- PROGRAMOVACÍ JAZYKY: Historie a základy, Sammet 1969, str. 316–324.
- Computer Sciences Corporation (1960). FAKT Nový obchodní jazyk (PDF) (Technická zpráva). Honeywell. Vyvolány 19 January 2014.
Reference
- ^ FACT Plně automatická technika kompilace (PDF). Elektronické zpracování dat společnosti Honeywell. 1960. DSI-27.
- ^ Clippinger, R. F. (1. srpna 1962). "Skutečnost". Počítačový deník. 5 (2): 112–119 (118 - Zkušenosti s používáním FACT). doi:10.1093 / comjnl / 5.2.112. ISSN 0010-4620.