Hvordan skrive en Excel-fil fra COBOL Program

Hvordan skrive en Excel-fil fra COBOL Program


COBOL, i sin veltalenhet, har mange evner og versatilities. Blant dem er evnen til å sende ut ulike filtyper og strukturer. Du kan lage en Excel-fil fra COBOL programmet ganske raskt og enkelt. Fordi COBOL har lett-å-følge strømmen av det engelske språket, trinnene involvert her er enkle nok til å produsere og samtidig kan du også forbedre dem. Som et eksempel, kan du lage flere Excel-filer fra en COBOL program strukturert på ulike måter, for eksempel rapporter og tabeller. Excel-filer du lager, kan også være kommadelte (CSV) filer, plass avgrenset, tabulatordelt og så videre. Dette er nyttig for å forberede data som skal eksporteres til databaser som MS Access.

Bruksanvisning

1 Sett opp filstrukturen du ønsker å eksportere til MS Excel og definere det i "File-Control" fra "Input-output avsnittet" din COBOL programmet. Se tips. CSV-utvidelsen lar Excel til å identifisere filen som en kommadelte filer og tillate visning og redigering.

2 Opprett filen og rekord definisjoner på "File Section" av "Cobol data Division". Din "FD" statement vil definere "Extract-fil" som standard og "Record inneholder tegn" vil bli satt til lengden i byte av output file. Sørg for at feltbeskrivelsene nøyaktig matche innen ditt innspill posten (e). På slutten av hvert felt beskrivelse, bør det være og ekstra "Filler" som erklærer pic (x) verdien ','. Dette er separator for hvert felt. Du er nå klar til å skrive den nye filen.

3 Skriv inn "Extract-File" statement som output i "Prosedyre Division" sammen med de andre erklæringer du har.

4 Koden din sløyfe logikken til sekvensielt lese og skrive hver fil som du har det definert før inngangen er oppbrukt. Når filen er skrevet, kan du vise det ved hjelp av Microsoft Excel som det vil fremstå som en Excel-fil.

Hint

  • Som et eksempel, hvis du produserer en Excel-versjon av et navn og adresse fil med telefonnumre og e-postadresser, vil Excel-filen uttalelse se slik ut: velg extract-fil tildele til "g: \ ditt dir \ extract.csv. "