I en värld av databehandling och programmering , är COBOL erkänd som en av de mest användbara verktygen på marknaden . Makten , utförlighet och vältalighet i detta språk att du kan utföra komplicerade uppgifter såsom bearbetning arrayer och flerdimensionella tabeller . Som ett exempel , tänk dig ett stort försäkringsbolag indelat i fyra regioner i landet , varje region delas in i fem städer , varje stad indelad i tre distrikt , varje distrikt har tre kontor och varje kontor kan ha fyra avdelningar . Du kan generera detaljerad redovisning och skatter rapporter med en array i COBOL att behandla dessa typer av förfrågningar Instruktioner
1
Bestäm hur du vill att format och struktur din rapport . I det givna exemplet , kanske du vill köra en månatlig rapport över antalet och summorna av dagliga krav behandlas och betalas inom varje avdelning med kontor inom distriktet , inom staden , inom regionen . Ingången rekord hierarkin är sorterade efter region .
2
Gå till " Working - Storage avsnitt " i programmet och definiera matrisen . Skivan struktur och syntax blir " 01 Array . " Det kommer att finnas fyra regioner : 05 Område pic x ( 10 ) . Inom varje region kommer att vara fem städer : 10 Stad Förekommer fem gånger indexeras av city - index pic x ( 25 ) . Inom varje stad kommer att vara tre distrikt : 15 Distrikt Förekommer tre gånger indexeras av dist - index pic x ( 25 ) . Underordnad District blir Kontor : 20 Office Förekommer tre gånger indexeras av kontors - index pic x ( 30 ) och inom Office är Avdelning : . 25 Institutionen Inträffar fyra gånger indexeras av inst - index pic x ( 30 )
Sida 3
kod läs uttalandet för din insats i Working - Storage avsnitt och fylla fälten därefter. I detta exempel kommer varje ingång post har en region av 10 byte i början , en uppsättning av fem städer i 25 byte vardera , tre distrikt i 25 byte vardera , tre kontor i 30 byte vardera och fyra avdelningar i 30 byte vardera .
4
Skapa en punkt med ett namn i Procedure Division . Som ett exempel : " Fylla - i - Array " och koden uttalanden enligt följande . " Utför Move - de - Cities varierande city - index från 1 av 1 tills city - index är större än 5 , Efter varierande District 1 av 1 tills dist - index är större än 3 , Efter Office från en av 1 tills Office är större än 4 , efter Department från 1 av 1 tills Institutionen är större än 4 . " Det är viktigt att notera att den innersta slingan kommer att utföras först . Det är , avdelningen , sedan Office , då distriktet och sedan City kommer att slinga och process i den ordningen .
5
Utför beräkningarna och hämta de värden du vill under looping som är avsedda för din rapport . Efteråt , kompilera programmet och se till noteringen är fri från eventuella syntaxfel .
6
Kör programmet som ett test och granska utdata .
