Micro Focus COBOL

Fra DDHFwiki
Spring til navigation Spring til søgning
CIS COBOL, FORMS-2 og Animator på 8" disketter

Det engelske firma Micro Focus blev etableret i 1976, og tog initiativ til at skabe Compact Interactive Standard COBOL (CIS COBOL) for 8-bit mikrocomputere. Det eksisterede på næsten alt fra Apple II, OS-9, BASF OS, og var mest populær på CP/M og MP/M. COBOL Compileren fremstillede virtuel maskinkode pga. de ekstreme RAM begrænsninger. Maximum var 64 kilobytes for både program og data. Koden blev derefter eksekveret af et runtime system efter samme princip som Java. Produktet blev i nogle tilfælde solgt under andre navne, som f.eks. Digital Research COBOL.

COBOL compileren

Programmet overholder alle krav i ANSI-74 COBOL Level I og nogle Level II krav. Den primære forskel er, at CIS COBOL er designet til skærmterminal, og det er muligt at skrive tekst fra et specifikt koordinat på skærmen.

Man skriver sit COBOL program med sin foretrukne editor. På det tidspunkt var det ofte WordStar. Derefter eksekverer man COBOL.COM programmet til at oversætte kildekoden. Dette producere en .INT (intermediate) fil. Man bruger RUNA.COM programmet til at eksekvere filen. Det er muligt at konvertere .INT filen til en .COM fil ved at skrive RUNA = MITPRG.INT. Det der i virkeligheden sker er at fortolkeren lægges ind foran bytekoden og den gør sit normale arbejde. COBOL.COM er faktisk skrevet i COBOL, og fortolket på samme måde.

Eftersom produktet er udvidet til at være interaktivt, skal brugeren ved installationen konfigurere RUNA til den terminal type der er på den CP/M computer han/hun arbejder på. Det gøres med CONFIG programmet. Her kan man vælge mellem de mest populære typer eller beskrive dens skærmkoder.

Da 16-bit computere kom frem - primært IBM PCen - var der mulighed for Micro Focus at udbygge deres compiler til at overholde alle level 2 specifikationer. Dette produkt fik navnet "Level II COBOL". Grundlæggende virker det på samme måde.

Fase 2 af oprettelse af formular med FORMS-2

FORMS-2

FORMS-2-pakken er en udvidelse til COBOL-softwareudviklingssystemet, som muliggør interaktiv oprettelse og redigering af skærmformularer. Disse kan derefter inkluderes i COBOL kildetekster med COPY ordren.

Programmet starter med, at brugeren skriver ledeteksterne på skærmbilledet. Det anbefales at man har tegnet det på ternet papir inden for at vide hvordan teksterne skal placeres i forhold til hinanden. Editoren er semi-fuldskærm under CIS COBOL. Man kan bruge de horisontale piletaster til at flytte markøren, men ikke de vertikale. Der er istedet et kommandofelt i øverste venstre hjørne, markøren går til, når man taster Retur. Man kan derefter skrive en kommando, der flytter markøren op eller ned et antal linjer. Hvis man taster kommandoen mellemrum, skifter man over til at markere indtastningsområderne. 'X' er pladsholder til alfanumerisk tegn. '9' og 'Z' er numerisk. Det sidste angiver at '0' skal vises som blanktegn. Dette matcher præcist COBOL's syntax for variabler.

Til afslutning genereres skærmbilledets ledetekster og datafelter som en record og man kan også få fremstillet et simpelt program til visning af skærmbilleder i en sekvens, eller et program, der lader brugeren opdatere data i en indekseret fil på baggrund formularinput. Indekserede filer er en kernefunktionalitet i COBOL.

Level II Animator under MS-DOS

Animator

Dette er en debugger, hvor man kan undersøge variable og programtrin. Navnet "Animator" kommer fra at man kan animere ved at lade programmet køre meget langsomt.

Man oversætter først sit COBOL program med ANIM parameteren. Derefter eksekveres det med Animate fortolkeren. Programmet viser den første kodelinje der vil blive udført. F2-tasten skifter mellem programmets skærmudskrift og debuggeren. Når man taster G bliver programtrinene kørt i lav hastighed, og en markør viser hvilken linje der bliver eksekveret. Man kan sætte hastigheden med nummer-tasterne 0-9. Det er muligt at sætte break-points og undersøge værdien af variable.

Fileshare

Hvis man kørte COBOL programmer på MP/M (Multi-bruger CP/M) solgte Micro Focus Fileshare produktet, som sørgede for file- og record-locking, således at programmerne ikke overskrev hinandens data. Det fulgte IBM 8100 specifikationen.