Hispanopedia WikiFACT fue un lenguaje de programación informático antiguo, ya descontinuado , creado por la División Datamatic de Minneapolis Honeywell para sus computadoras comerciales de la serie 800 en 1959. FACT era un acrónimo de "Fully Automatic Compiling Technique" (Técnica de Compilación Totalmente Automática). [ 1 ] Influyó en el diseño del lenguaje de programación COBOL .
Parte del diseño de FACT se basó en el proyecto lingüístico Basic English , desarrollado alrededor de 1925 por CK Ogden .
El software fue diseñado por Computer Sciences Corporation ( Fletcher Jones , Roy Nutt y Robert L. Patrick) bajo contrato con Richard Clippinger de Honeywell.
Contribuciones a COBOL
FACT influyó en el diseño de COBOL y es uno de los tres lenguajes predecesores que se mencionan en todos los manuales de COBOL.
Varios elementos de FACT se incorporaron a COBOL:
- Definir los datos como niveles, con elementos de grupo y elementos elementales.
- Asignación de valores iniciales a los datos a medida que se definen (
VALUEcláusula). - Especificar una lista limitada de valores literales permitidos en un campo específico (
88elementos de datos de nivel). - Un generador de informes no procedimental basado en la especificación del aspecto del informe deseado (Sección de Informes en COBOL-66).
- Calificación de nombres de datos (
INoOFcláusula). - Movimiento de grupo de elementos con el mismo nombre (
MOVE CORRESPONDING). - Verificaciones de validez en declaraciones de procedimiento (
ON ERRORcláusula). - Función integrada
SORT.
Implementaciones
FACT se implementó en la década de 1960. "Cinco clientes de FACT desarrollan todas sus aplicaciones con FACT" y "otra docena de clientes de Honeywell utilizan FACT en distintos grados". [ 2 ] Esto incluía un banco y un sistema de gestión de inventario militar . El Departamento de Defensa australiano lo utilizaba en las décadas de 1960 y 1970.
Programa de ejemplo
Los siguientes ejemplos de código de la aplicación de nómina simple de la especificación FACT muestran la naturaleza de formato fijo de FACT y sus similitudes con COBOL.
Esquemas de archivos:
O 1 RU DETALLE-ARCHIVO , ( DETALLE ), ( D ) O 2 FECHA O 3 MES O 4 DÍA O 5 AÑO O 6 * REGISTRO-EMPLEADO O 7 NÚMERO-EMPLEADO , ( EMPLOYNO ) O 8 * NUEVO-EMPLEADO , ( NW ) O 9 NOMBRE O 10 TARIFA O 11 EXENCIONES , ( EXEMPLEADO ) O 12 DEDUCCIÓN-BONO , ( BONDEDUCT ) O 13 DENOMINACIÓN-BONO , ( BONDENOM )O 30 I ARCHIVO INTERNO1 O 31 DATOS DE TRABAJO O 32 11 D SUMA DEL LOTE O 33 11 D NÚMERO DE LOTE O 34 11 D RECUENTO DEL LOTE O O 35 11 D 1 SUMA DE HORAS O 36 11 D TARJETAS EN EL LOTE ODeclaraciones de origen:
P 85 PROCEDIMIENTO DE BONO . ESCRIBA LA ORDEN DE BONO Y RESTE 1 DE NUM . P 86 P 87 NOTA . FASE I DEL PROGRAMA DE EJEMPLO . LOS SIGUIENTES PROCEDIMIENTOS SE UTILIZAN PARA P 88 REALIZAR COMPROBACIONES DE LOTE DURANTE EL PASO DE LECTURA DE TARJETAS . P 89 P 90 PROCEDIMIENTO DE SUMA . SUMAR HORAS RP A SUMA DE HORAS . SUMAR 1 A TARJETAS EN - P 91 - LOTE . P 92 P 93 PROCEDIMIENTO DE COMPROBACIÓN DE LOTE . SI LA SUMA DEL LOTE NO ES IGUAL A LA SUMA DE HORAS O EL LOTE - P 94 - CONTEO NO ES IGUAL A TARJETAS EN LOTE, CONSULTE LOTE INCORRECTO . ESTABLECER SUMA DE HORAS P 95 Y TARJETAS EN LOTE A CERO . P 96 P 97 PROCEDIMIENTO DE LOTE DEFECTUOSO . REVERSE NEW-MASTER . CERRAR PÁGINA DE INFORME DE ERROR . P 98 P 99 L. PONER CEROS EN PRINTLINE . ESTABLECER NUM A 8. P 100 P 101 CONSTRUIR . PONER EMPLOYNO Y HORAS RP EN ( NUM ) EN Y EH . SUB - P 102 TRACT 1 DE CARDS-IN-BATCH Y NUM . SI CARDS -IN-BATCH ES CERO ESCRIBIR P 103 INFORME DE ERROR , REVERSENUEVO-MAESTRO , SALIR DEL PROCEDIMIENTO . OBTENER EL SIGUIENTE GRUPO . P 104 SI NUM ES CERO ESCRIBIR INFORME DE ERROR E IR A L , DE LO CONTRARIO REGRESAR A P 105 CONSTRUIR . FIN DEL PROCEDIMIENTO .Descripción de los informes:
R 1 40 INFORME DE ERROR A 2 ENCABEZADO DE PÁGINA HDEJ 2 F 3 NÚMERO DE LOTE 24 NÚMERO DE LOTE ^ F 4 NÚMERO DE PÁGINA 1 43 EN LA PÁGINA DE ERROR ^ A 5 ENCABEZADOS DE COLUMNA HD 3 F 6 30 NÚM . DE EMPLEADO HORAS NÚM . DE EMPLEADO HORAS ^ F 7 60 NÚM . DE EMPLEADO HORAS NÚM . DE EMPLEADO HORAS ^ F 8 90 NÚM . DE EMPLEADO HORAS NÚM . DE EMPLEADO HORAS ^ F 9 120 NÚM . DE EMPLEADO HORAS NÚM . DE EMPLEADO HORAS ^ A 10 LÍNEA DE ERROR OO 1 F 11 1 ST EN 8 ^ F 12 1 ST RH 14 . ^ F 13 2 ND EN 23 ^ F 14 2 ND RH 29 . ^ F 15 3 RD EN 38 ^ F 16 3 RD RH 44 . ^R 101 4 ORDEN DE BONO A 102 ENCABEZADO DE BONO HDEJ 2 F 103 PÁGINA 1 A 104 LÍNEA DE ORDEN DE BONO OO 1 F 105 M NÚMERO DE EMPLEADO F 106 M NOMBREDiseños de informes:
L 1 ENCABEZADO DE PÁGINA NÚMERO DE LOTE ^ EN PÁGINA DE ERROR ^ L 2 ENCABEZADO DE COLUMNA NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS NÚMERO DE EMPLEADO HORAS L 3 LÍNEA DE ERROR ^ . ^ ^ . ^ ^ . ^ ^ . ^ ^ . ^ ^ . ^ ^ . ^ ^ . ^ L 4 ENCABEZADO DE BONO ÓRDENES DE BONO NÚMERO DE EMPLEADO NOMBRE FECHA PÁGINA DE BONO ^ L 5 LÍNEA DE ORDEN DE BONO ^ ^ ^ - ^ - ^ . ^ L 6 ENCABEZADO DEL TERMINACIONES NÚMERO DE EMPLEADO FECHA NOMBRE BONO CR . TOTALES .. IMPUESTO BRUTO FICA SEGURO RET PÁGINA ^ L 7 LÍNEA DE ELIMINACIONES ^ ^ - ^ - ^ ^ . ^ . ^ . ^ . ^ . ^ . ^ L 8 ENCABEZADO DE ERROR ERRORES ... NÚM . DE EMPLEADO FECHA TIPO PÁGINA ^ L 9 LÍNEA DE ERROR ^ ^ - ^ - ^ ^ L 10 LÍNEA DE TÍTULO COLOQUE EL FORMULARIO DE CHEQUE EN LA IMPRESORA L 12 1 LÍNEA DE PAGO ^ ^ /^ / ^ . ^ ^ / ^ / ^ L 13 2 LÍNEA DE PAGO . ^ . ^ . ^ . ^ . ^ L 14 3 LÍNEA DE PAGO ^ $ **** . ^ . ^ . ^Fuentes
Referencias
- Lenguajes de programación procedimental
- Lenguajes de programación creados en 1959
