Ako inicializovať Comp - 3 variabilný v COBOL

Pri poskytovaní číselné účinnosť a presnosť pri výpočte a skladovaní , COBOL ponúka spôsob , ako efektívne vám umožní vypočítať čísla rýchlo tým , že využije svoje vnútorné architektúry . Jedným z najčastejších je zabalený v sústave desiatkovej alebo COMP - 3 číselné pole , ktoré umožňuje uložiť dve číslice v každom bajte skladovanie . Pomocou tohto zápisu , môžete určiť , koľko číslic uložené číslo bude pridaním jednej na notated pole a vydelením výsledku dvomi . Napríklad pole PIC S9 ( 5 ) COMP - 3 má skladovania 3 bajty . Musíte inicializovať tieto polia pred tým , než manipulácia alebo výpočet sa vykonáva na tom , aby nedošlo k chybe spracovania . Pokyny dovolená 1

Určte poľa ( y ) , ktorú chcete inicializovať v COBOL kódu. Napríklad , môžete mať pole , ako je " 05 vyššie , dostal PIC S9 ( 5v99 ) COMP - 3 . " To je podpísaný zabalené desiatkovej pole a musíte sa najprv inicializovať ju pred tým , než môžu byť zapojené do ďalšieho spracovania .
2

Prejsť do sekcie pracovné - Storage svojho programu a určiť štruktúru súborov vášho premenné . Ak sa zostava - 3 polia sú podriadené vyšším štruktúry , jednoducho napíšte príkaz " Inicializácia " v riadení divízie . Ako príklad , pole , ako je " 01 - účtu typy " nasledovaný podriadené oblasti " 05 Acctype - fiškálnu Pic S9 ( 7 ) V99 " by mohol byť inicializovaný a sú nuly vstúpili do jeho poľa pomocou príkazu COBOL " Inicializácia účet - typy . " Každá ďalšia poľa nižšie v tejto " 01 " úrovni bude inicializovaný rovnako . Ďalším krokom ukazuje ďalší spôsob , ako to dosiahnuť .
3

Prejdite do časti pracovnej - Storage a zahŕňať " doložku " hodnota každej zostava - 3 premenné . Ako ďalší príklad , pole , ktoré znie " 05 Acctype - akruálne Pic S9 ( 5 ) V99 Hodnota nula " bude mať rovnaký výsledok . Pole bude automaticky inicializovaný pred prvým príkazu Postup divízie . Ak použijete príkaz inicializovať , uistite sa , že je vykonaný pred všetky ostatné príkazy programu odkazovať na vzorku - 3 polia .
4

spustiť kompilované verziu a skontrolovať stav kódy pre všetky chyby kompilácie . Obe metódy zaručí vaše balené desatinné hodnoty sa zodpovedajúcim spôsobom inicializovať .

• Predchádzajúca strana: Ako používať uložené procedúry v SSRS 
• Ďalšia strana: Ako napísať Cocoa aplikácie