COBOLã¯ãå€ãã®éèŠãªãšã³ã¿ãŒãã©ã€ãºã·ã¹ãã ã®åºç€ãšããŠããµãŒãã¹ã¬ãã«å¥çŽïŒSLAïŒãšã³ã¹ãå¶çŽãæºããããã«å¹ççã«å®è¡ããå¿ èŠããã倧éã®ãããåŠçãžã§ããåŠçããŠããŸãããããã®ã·ã¹ãã ãé²åããã«ã€ããŠãã³ãŒãå ã®å°ããªéå¹çæ§ã§ãããç¹ã«CPUè² è·ã®é«ãã«ãŒããå«ãå Žåã«ã¯ãæ·±å»ãªããã©ãŒãã³ã¹åé¡ã«ã€ãªããå¯èœæ§ããããŸãã
COBOLããã°ã©ã ã§ã¯ãã«ãŒãã¯ã¬ã³ãŒãåŠçãèšç®å®è¡ã«äžå¯æ¬ ã§ãããèšèšãäžååãªã«ãŒããå¶åŸ¡ãããŠããªãã«ãŒãã¯ãCPUæéãéå°ã«æ¶è²»ããããããµã€ã¯ã«ãé å»¶ãããã¡ã€ã³ãã¬ãŒã ã®éçšã³ã¹ããå¢å ãããå¯èœæ§ããããŸããããã©ãŒãã³ã¹ã®äœäžã¯ãæ¥åžžæ¥åã«åœ±é¿ãäžãããŸã§æ°ã¥ãããªãããšãå€ããã·ã¹ãã ã®ä¿¡é Œæ§ãç¶æããããã«ã¯ãæ©æçºèŠãšäºé²çãªç®¡çãäžå¯æ¬ ã§ãã
CPUè² è·ã®é«ãã«ãŒããç¹å®ãæé©åããã«ã¯ããã®ç¹æ§ãæç¢ºã«çè§£ããéå¹ççãªãã¿ãŒã³ãèŠæãèœåããããŠæåãšèªåã®äž¡æ¹ã®åæææ³ã广çã«æŽ»çšããããšãå¿ èŠã§ããããŒã«ããã¹ããã©ã¯ãã£ã¹ããããŠèŠåŸããã³ãŒãã£ã³ã°æšæºã¯ãã¹ãŠãCOBOLã¢ããªã±ãŒã·ã§ã³ã®å¿çæ§ãå¹çæ§ããããŠä¿å®æ§ãé·æã«ããã£ãŠç¶æããäžã§éèŠãªåœ¹å²ãæãããŸãã
äžè¬çãªçç¶ãæ ¹æ¬åå ãæ€åºæŠç¥ãæé©åææ³ã調ã¹ãããšã§ãéçºããŒã ãšéçšããŒã ã¯ãããã·ã§ã³ã¯ãªãã£ã«ã«ãª COBOL ã·ã¹ãã ãæé«ã®ããã©ãŒãã³ã¹ã§çšŒåãããããã«å¿ èŠãªã¹ãã«ãšããã»ã¹ãæ§ç¯ã§ããŸãã
COBOL ã¢ããªã±ãŒã·ã§ã³ã«ããã CPU è² è·ã®é«ãã«ãŒãã®çè§£ãšç®¡ç
ã«ãŒãã¯å€ãã®COBOLããã°ã©ã ã®äžæ žãæãã倧éã®ã¬ã³ãŒãã®èªã¿åããèšç®ã®å®è¡ããããŠåºç¯ãªããŒã¿ã»ããå šäœã«ãããããžãã¹ã«ãŒã«ã®é©çšã«äžå¯æ¬ ã§ãããããããããã®ã«ãŒãããèšèšãäžååã§ãã£ãããé©åã«ç®¡çãããŠããªããšãæ·±å»ãªããã©ãŒãã³ã¹äœäžãåŒãèµ·ããå¯èœæ§ããããŸããCPUæéãéå°ã«æ¶è²»ããããããµã€ã¯ã«ãé å»¶ãããå ±æã¡ã€ã³ãã¬ãŒã ã·ã¹ãã ã®éçšã³ã¹ããå¢å€§ããããªã©ãé ããã³ã¹ããããããããšããããããŸãã
CPUè² è·ã®é«ãã«ãŒãããããããªã¹ã¯ãèªèããã«ã¯ãCOBOLã«ãããã«ãŒãã®åäœãéå¹çã«ãªãçç±ããããŠåé¡ã®çºçã瀺ãå åãçè§£ããããšããå§ããŸãããããã®èŠå ã詳现ã«èª¿æ»ããããšã§ãéçºããŒã ã¯ããå¹ççãªã³ãŒããäœæããæ¬çªç°å¢ã§ã®ã€ã³ã·ãã³ããåé¿ããããŒã¿éãå¢å ããŠãã³ã¹ãå¹çã®é«ãéçšãç¶æã§ããããã«ãªããŸãã
CPUè² è·ã®é«ãã«ãŒãã課é¡ãšãªãçç±
å¶åŸ¡ãäžååãªã«ãŒãã¯ãæéã®çµéãšãšãã«CPUã³ã¹ããåŸã ã«å¢å€§ãããå¯èœæ§ããããŸãã100ä»¶ã®ã¬ã³ãŒããåŠçããã«ãŒãã¯äºçްãªåŠçãããããŸããããæ°çŸäžä»¶ã«ã¹ã±ãŒã«ã¢ãããããšãããžãã¯ã®éå¹çæ§ãããã«é²åããŸããäŸãã°ãæ°çŸäžåå®è¡ãããã«ãŒãå ã«ãèšç®è² è·ã®é«ãæäœããã¡ã€ã«I/Oãé 眮ãããšãCPUæéãäœæéãç¡é§ã«ãªãããããåŠçã®æéã«éã«åããªããªãå¯èœæ§ããããŸãã
ã«ãŒãã¯ãçµäºæ¡ä»¶ãããŒã¿å質ãååã«æ€èšŒãããŠããªãåçãªèšç®ã«äŸåããå Žåãç¹ã«åé¡ãšãªããŸããéçºè ã¯ãååŸ©åæ°ãäºæããå¢å ãããšããžã±ãŒã¹ãèæ ®ããã«ãæ¡ä»¶ãæ°åã®ååŸ©ã§æºãããããšæ³å®ããŠããŸãå¯èœæ§ããããŸãããããã®åé¡ã¯ãå°èŠæš¡ãªããŒã¿ã§ã®ãã¹ãã§ã¯é ããŠããããšãå€ãã§ãããæ¬çªç°å¢ã®ãžã§ãã§ã¯é¡èã«çŸããŸãã
ãããåŠçãã¹ã±ãžã¥ãŒã«ãããæéæ å ã«å®äºããªãå Žåãäžæµã®ãžã§ãã¯é å»¶ãŸãã¯å®å šã«ã¹ããããããŸããããã¯ããµãŒãã¹ã¬ãã«å¥çŽã«éåãããã顧客察å¿ã·ã¹ãã ã«åœ±é¿ãäžããããã³ã¹ãã®ãããæåä»å ¥ãå¿ èŠã«ãªã£ããããå¯èœæ§ããããŸãããããã®èª²é¡ã¯ãæ éãªã«ãŒãèšèšãšããã¢ã¯ãã£ããªæ€åºã®å¿ èŠæ§ãæµ®ã圫ãã«ããŠããŸãã
ããã©ãŒãã³ã¹ãäœäžãããã«ãŒãã®çç¶ãèªèãã
CPUè² è·ã®é«ãã«ãŒãã®æ€åºã¯ãå€ãã®å Žåãã·ã¹ãã ã¬ãã«ã®çç¶ã«æ°ã¥ãããšããå§ãŸããŸããããããžã§ãã®ãã°ã«ã¯ãéå»ã®ããŒã¹ã©ã€ã³ãšæ¯èŒããŠãç°åžžãªå®è¡æéã®æ¥å¢ãç¶ç¶çãªãªãŒããŒã©ã³ãèšé²ãããå ŽåããããŸããéçšããŒã ã¯ãå€éãµã€ã¯ã«äžã«CPU䜿çšçã®ã¢ã©ãŒã ãããªã¬ãŒãããããç¹å®ã®ãžã§ãã宿çã«é ããŠçµäºãããããããšã«æ°ä»ããããããŸããã
ç£èŠããŒã«ã¯ããžã§ããããã®CPUæéãçµéå®è¡æéãæ¶è²»ããããµãŒãã¹ãŠãããæ°ãªã©ã®ææšãæäŸããããšã§ããããã®ãã¿ãŒã³ãæããã«ããã®ã«åœ¹ç«ã¡ãŸããæéã®çµéãšãšãã«ãã«ãŒãå ã®ããããªéå¹çæ§ã§ãããã¡ã€ã³ãã¬ãŒã ã®è«æ±æžã«é¡èãªã³ã¹ãå¢å ãããããå¯èœæ§ããããŸãã
ããžãã¹ã®æé·ã«åãããŠæ¡åŒµãããããŒã¿äŸåã«ãŒãã®ãªã¹ã¯ãæ€èšããŠãã ããã10,000äžä»¶ã®ã¬ã³ãŒãã§ã¯èš±å®¹ã§ããã«ãŒããã1äžä»¶ã®ã¬ã³ãŒãã§ã¯åé¡ã«ãªãå¯èœæ§ããããŸãããããããã¿ãŒã³ã¯åæãã¹ãã§ã¯èŠèœãšãããå®éã®æ¬çªç°å¢ã®ããŒã¿éã§ã®ã¿é¡åšåããå¯èœæ§ããããããããã¢ã¯ãã£ããªåæãäžå¯æ¬ ã§ãã
ãããåŠçãšã·ã¹ãã ãªãœãŒã¹ãžã®åœ±é¿
CPUè² è·ã®é«ãã«ãŒãã®åœ±é¿ã¯ãåé¡ãšãªã£ãŠããåäžã®ãžã§ããã¯ããã«è¶ ããŠããŸããŸããã¡ã€ã³ãã¬ãŒã ã¯CPUãšI/OãªãœãŒã¹ãè€æ°ã®ãžã§ãã§å ±æããããã«èšèšãããŠãããCPUã倧éã«æ¶è²»ããé·æéå®è¡ã¿ã¹ã¯ããä»ã®ãžã§ãã®ãªãœãŒã¹ãæ¯æžãããå¯èœæ§ããããŸãã
ãã®çµæãäŸååŠçã®é å»¶ãä»ã·ã¹ãã ãšã®çµ±åãã€ã³ãã®èŠéãããããŠé£éçãªã¹ã±ãžã¥ãŒã«éåãçºçããŸãããããåŠçã®ãŠã£ã³ããŠã¯ããªã³ã©ã€ã³ãã©ã³ã¶ã¯ã·ã§ã³åŠçãšã®ç«¶åãé¿ããããã«æ éã«èšç»ãããããšãå€ãããããã®ãŠã£ã³ããŠãè¶ éãããšãããžãã¹ã«é倧ãªåœ±é¿ãåãŒãå¯èœæ§ããããŸãã
äŸãã°ããã¹ãŠã®ãã©ã³ã¶ã¯ã·ã§ã³ãèªã¿åããæ·±ããã¹ããããã«ãŒãå ã§èšç®ãå®è¡ããŠé¡§å®¢ã®æ®é«ãæŽæ°ããCOBOLãžã§ããæ³åããŠã¿ãŠãã ãããåã ã®å埩åŠçã¯å°ããããã«èŠããŠããããŒã¿ãå¢ããã«ã€ããŠç·ã³ã¹ãã¯èšå€§ã«ãªãå¯èœæ§ããããŸãã
PERFORM VARYING I FROM 1 BY 1 UNTIL I > MAX-TRANSACTIONS
ADD TRANSACTIONS(I) TO CUSTOMER-BALANCE
END-PERFORM.
ã«ãŒããæé©åããã«ããŒã¿ã»ãããæ¡åŒµãããšããã®åçŽãªæ§é ãããã©ãŒãã³ã¹ã®ããã«ããã¯ã«ãªãå¯èœæ§ããããŸãããã®ãããªåé¡ã¯ãã«ãŒãèšèšã®èŠçŽããã€ã³ããã¯ã¹æŠç¥ã®è¿œå ããããŠå¯èœãªéãéèŠã§ãªãèšç®ãã«ãŒãã®å€åŽã«ç§»åããããšã§è»œæžã§ããŸãã
COBOL ããŒã ã¯ãCPU ã倧éã«äœ¿çšããã«ãŒãã®æ ¹æ¬åå ãçç¶ãããã³åºç¯ãªåœ±é¿ãçè§£ããããšã§ãæ å ±ã«åºã¥ããæææ±ºå®ãè¡ããéèŠãªã·ã¹ãã å šäœã§å¹ççã§ä¿¡é Œæ§ãé«ããã³ã¹ãå¹çã®é«ããããåŠçãç¶æã§ããŸãã
COBOLã«ãããCPUè² è·ã®é«ãã«ãŒãã®ç¹å®: äž»ãªææš
COBOLã«ãããCPUè² è·ã®é«ãã«ãŒãã®çºèŠãšä¿®æ£ã¯ãã³ãŒããå¿ èŠä»¥äžã«CPUã䜿çšããŠããããšã瀺ãä¿¡é Œã§ããææšãèªèããããšããå§ãŸããŸããéçºè ãšéçšããŒã ã¯ãçŽæã衚é¢çãªææšã ãã«é Œãããšã¯ã§ããŸãããããããã«ãŒããç¹å®ããã«ã¯ãã·ã¹ãã ã¬ãã«ã®äœ¿çšãã¿ãŒã³ãšå ·äœçãªããã°ã©ã ã®åäœã®äž¡æ¹ãæ³šææ·±ãåæããå¿ èŠããããŸããäœã«æ³šæãã¹ãããåŠã¶ããšã§ãããŒã ã¯ããããŠã£ã³ããŠã®é å»¶ãäºæãã¬ã³ã¹ããçºçããåã«åé¡ãç¹å®ã§ããŸãã
COBOLãžã§ãã«ãããCPU䜿çšçã®é«ããã¿ãŒã³
æãåãããããææšã®äžã€ã¯ãç¹å®ã®ããããžã§ãã«ãããCPUæ¶è²»éã®ç¶ç¶çãªé«æ°Žæºã§ããã·ã¹ãã ç£èŠããŒã«ã¯éåžžããžã§ãããšãŸãã¯ã¹ãããããšã«CPUæéãæäŸãããããæ¥ãé±ããŸãã¯æåäœã®åŸåã远跡ã§ããŸããCPU䜿çšçã®æ¥äžæã¯ãæè¿ã®ã³ãŒã倿ŽãããŒã¿ã®å¢å ããŸãã¯ã«ãŒãã®ã³ã¹ããå¢å€§ãããèšå®ã®åé¡ã瀺ããŠããå¯èœæ§ããããŸãã
æç¢ºãªããžãã¹äžã®çç±ããªããé·æéã«ããã£ãŠç¶ç¶çã«é«ã䜿çšçãç¶æããããšã¯ãå€ãã®å Žåãæ ¹æ¬çãªéå¹çæ§ã瀺åããŠããŸãããžã§ããã¹ã±ãžã¥ãŒã«ãããæéæ å ã«åãŸã£ãŠããå Žåã§ããCPUã³ã¹ããçå®ã«äžæãããšãç¹ã«åŸéå¶ã®ã¡ã€ã³ãã¬ãŒã ç°å¢ã§ã¯äºç®ãå§è¿«ããå¯èœæ§ããããŸããéçšããŒã ã¯ãSMFã¿ã€ã30ã¬ã³ãŒããããã©ãŒãã³ã¹ããã·ã¥ããŒããªã©ã®ã¬ããŒãã䜿çšããŠãã©ã®ãžã§ããCPUãéåºŠã«æ¶è²»ããŠãããã確èªããå éšã®ã«ãŒãããžãã¯ã調æ»ã§ããŸãã
SMF ããã³ RMF ã¬ã³ãŒãã® CPU æéã®åæ
ã¡ã€ã³ãã¬ãŒã ã®è©³çްãªããã©ãŒãã³ã¹ããŒã¿ã¯ãæ°ããªæŽå¯ãæäŸããŸããSMFïŒã·ã¹ãã ç®¡çæ©èœïŒããã³RMFïŒãªãœãŒã¹æž¬å®æ©èœïŒã¬ã³ãŒãã¯ãCPUæéãI/OåŸ æ©æéãåãžã§ãã¹ãããã®çµéæéã«é¢ãã詳现ãªçµ±èšæ å ±ãæäŸããŸãããããã®ã¬ã³ãŒãã¯ãCPUæéãèç©ãããŠããå Žæãããã詳现ãªèª¿æ»ãå¿ èŠãªãžã§ãã¹ããããç¹å®ããã®ã«åœ¹ç«ã¡ãŸãã
ããã©ãŒãã³ã¹ã¢ããªã¹ãã¯ãI/Oã¢ã¯ãã£ããã£ã«æ¯ã¹ãŠCPU䜿çšçãäžåè¡¡ã«é«ãã¹ããããæ¢ãããããžã§ããéå»ã®ããŒã¹ã©ã€ã³ãšæ¯èŒãããããŠãç°åžžãªãã¿ãŒã³ãæµ®ã圫ãã«ããããšããããããŸãããããã調æ»ã«ãã£ãŠãããŒã¿éã®å¢å ãããžãã¹ã«ãŒã«ã®å€æŽã«äŒŽã£ãŠã«ãŒããéå¹çã«ãªã£ãCOBOLããã°ã©ã ãç¹å®ãããå¯èœæ§ããããŸãã
SMF ããã³ RMF ããŒã¿ãè§£éããã«ã¯ãéçšããŒã ãšéçºè ã®é£æºãå¿ èŠã§ãããæè¡çãªèª¿æ»çµæãã³ãŒã ã¬ãã«ã®å€æŽã«å€æãããCPU ã³ã¹ããåæžãããããã«ããå¿ èŠããããŸãã
COBOLãããã¡ã€ã©ãšãããã°ããŒã«ã®äœ¿çš
ã·ã¹ãã ã¬ã³ãŒãã«å ããŠãéçºè ã¯COBOLãããã¡ã€ã©ãŒããããã°ããŒã«ã掻çšããŠã³ãŒãå®è¡ã詳现ã«åæã§ããŸããããŒã«ã䜿çšãããšããã°ã©ã ããžãã¯ãã¹ãããããšã«ãã¬ãŒã¹ã§ãããããå®éã®ããŒã¿ã»ããã§ã«ãŒããã©ã®ããã«åäœãããã容æã«èгå¯ã§ããŸãã
ãããã¡ã€ã©ãŒã¯å€ãã®å Žåãåã ã®ã¹ããŒãã¡ã³ããã»ã¯ã·ã§ã³ã®å®è¡åæ°ã枬å®ããã«ãŒããäºæ³ä»¥äžã«å埩åŠçãå®è¡ããããã³ã¹ãã®ãããåŠçãç¹°ãè¿ãå®è¡ããããããããã¹ããããè¿ éã«ç¹å®ããŸããäŸãã°ããã¹ããããã«ãŒããåå埩åŠçå ã§ããŒã¿ããŒã¹åŒã³åºããè€éãªèšç®ãå®è¡ããªãããäœçŸäžåãå®è¡ãããŠããããšããããã¡ã€ãªã³ã°ã§æããã«ãªãããšããããŸãã
cobolã³ããŒç·šéPERFORM VARYING I FROM 1 BY 1 UNTIL I > MAX-CUSTOMERS
PERFORM VARYING J FROM 1 BY 1 UNTIL J > MAX-ORDERS
CALL 'PROCESS-ORDER' USING CUSTOMER(I), ORDER(J)
END-PERFORM
END-PERFORM.
ãã®ãããªãã¿ãŒã³ãç¹å®ãããã°ãããŒã¿æ§é ã®èŠçŽããI/Oæäœã®ã«ãŒãå€ãžã®ç§»åãã€ã³ããã¯ã¹äœæããã£ã«ã¿ãªã³ã°ããžãã¯ã®å°å ¥ãšãã£ããªãã¡ã¯ã¿ãªã³ã°ãå¯èœã§ãããããã¡ã€ãªã³ã°ã¯ã倿ŽååŸã®ããã©ãŒãã³ã¹ãæ¯èŒããããšã§ãããã®å€æŽãæ€èšŒããæé©åã«ãã£ãŠæ¬çªç°å¢ã®ã¯ãŒã¯ããŒãã«ãããCPUãªãœãŒã¹ã®åæžãå®éã«å®çŸãããŠãããã確èªããã®ã«åœ¹ç«ã¡ãŸãã
éå¹ççãªã«ãŒããç¹å®ããããã®æåã³ãŒãã¬ãã¥ãŒãã¯ããã¯
COBOLããã°ã©ã ã«ãããCPUè² è·ã®é«ãã«ãŒããæ¬çªç°å¢ã§åé¡ãåŒãèµ·ããåã«çºèŠããããã®ãæã广çãªæŠç¥ã®äžã€ã¯ãæåã«ããã³ãŒãã¬ãã¥ãŒã§ããèªååããŒã«ããããã¡ã€ãªã³ã°ã¯è²ŽéãªæŽå¯ãæäŸããŸãããããžãã¹ããžãã¯ãçè§£ããç¶æ³ã«å¿ããŠåŸ®åŠãªéå¹çæ§ãèŠæãéçºè ã®èœåã«ä»£ãããã®ã¯ãããŸãããç¶¿å¯ãã€æ§é åãããã¬ãã¥ãŒãè¡ãããšã§ããªã¹ã¯ã®é«ãã«ãŒããã¿ãŒã³ãç¡å¶éã®å埩åŠçããããŠãã¹ããããæããŠããŸãå¯èœæ§ã®ããã³ã¹ãã®ãããæäœãçºèŠããããšãã§ããŸãã
ãã¹ããããã«ãŒããšéå¹ççãªããžãã¯ã®æ€åº
ãã¹ããããã«ãŒãã¯ãç¹ã«åéå±€ã§ååŸ©åæ°ãå¢å ããå ŽåãCPU䜿çšçãææ°é¢æ°çã«äžæããåå ãšãªãããšããããããŸããã¬ãã¥ãŒæ åœè ã¯ãå€åŽã®ã«ãŒããšæ¯èŒããŠå åŽã®ã«ãŒããäœåå®è¡ããããã远跡ãããã®ååŸ©åæ°ãæ¬åœã«ããžãã¯ã«å¿ èŠãªã®ããè©äŸ¡ããå¿ èŠããããŸãã
å éšã«ãŒããåé·ãªåŠçãå®è¡ããŠããªããããããã¯ããŒã¿ãäžæ¬åŠçã§ããããã«ãªãã¡ã¯ã¿ãªã³ã°ã§ãããã©ããã確èªããããšãéèŠã§ããéçºè ã¯ãã«ãŒããçµ±åããããã¹ã³ãŒããçž®å°ããããæ¡ä»¶ãæºãããããšãã«æ©æã«ãã¬ãŒã¯ããããããªã©ã®æ©äŒãæ¢ãããšãã§ããŸããäžèŠå°ããªãã¹ãã®å€æŽã§ãããCPUæ¶è²»éã«å€§ããªåœ±é¿ãäžããå¯èœæ§ããããŸãã
PERFORM VARYING I FROM 1 BY 1 UNTIL I > CUSTOMER-COUNT
PERFORM VARYING J FROM 1 BY 1 UNTIL J > ORDER-COUNT
COMPUTE WS-TOTAL = WS-TOTAL + ORDER-AMOUNT(I, J)
END-PERFORM
END-PERFORM.
ãã®å žåçãªãã¿ãŒã³ã¯ãå€§èŠæš¡ãªããŒã¿ã»ããã§ã¯CPUã³ã¹ããæ¥å¢ããå¯èœæ§ããããŸããå埩åŠçãå¶éããããããŒã¿ãäºåã«ãã£ã«ã¿ãªã³ã°ããããããªãã¡ã¯ã¿ãªã³ã°ãè¡ãããšã§ã圱é¿ãå€§å¹ ã«è»œæžã§ããŸãã
èŠå: ç¡å¶éã«ãŒããšã«ãŒãå ã®éå°ãªãã¡ã€ã«I/O
ã¬ãã¥ã¢ãŒã«ãšã£ãŠããäžã€ã®éèŠãªã¿ãŒã²ããã¯ãé©åã«å¶åŸ¡ãããŠããªãæ¡ä»¶ã«äŸåããç¡å¶éã®ã«ãŒãã§ããã«ãŒãã«ã¯åžžã«æç¢ºã§äºæž¬å¯èœãªçµäºæ¡ä»¶ãèšããCPUæ¶è²»ã®æŽèµ°ãé²ãå¿ èŠããããŸããèšå®ãããªãå¯èœæ§ã®ãããã©ã°ãåŸ æ©ããã«ãŒãããé©åãªã¬ãŒããªãã«ãã¡ã€ã«ã®çµç«¯ãŸã§èªã¿åãã«ãŒãã¯ãããã©ãŒãã³ã¹ãèããäœäžãããæéç匟ãšãªãå¯èœæ§ããããŸãã
åæ§ã«åé¡ãšãªãã®ã¯ãé«è² è·ãªãã¡ã€ã«I/OãããŒã¿ããŒã¹åŒã³åºããã¿ã€ããªã«ãŒãå ã«é 眮ããããšã§ããã«ãŒãèªäœãé©åã«å¢çä»ããããŠããŠããå€éšã·ã¹ãã ãžã®ç¹°ãè¿ãã®åŒã³åºãã¯CPUæéãå§è¿«ããI/Oããã«ããã¯ãåŒãèµ·ããå¯èœæ§ããããŸãããããã®åŒã³åºããã«ãŒãããžãã¯ã®ã©ãã§çºçãããã確èªããããšã¯ãããã©ãŒãã³ã¹ãç¶æããããã«äžå¯æ¬ ã§ãã
PERFORMæãšã«ãŒãçµäºæ¡ä»¶ã®ç¢ºèª
COBOLã®PERFORMæ§æã¯æè»æ§ã«åªããŠããŸãããæ³šææ·±ãèšè¿°ããªããšçµäºæ¡ä»¶ãäžæçã«ãªãå¯èœæ§ããããŸããã¬ãã¥ãŒã§ã¯ãçµäºæ¡ä»¶ãæå¹ãã€å°éå¯èœã§ãããããããçŸå®çãªããŒã¿ã·ããªãªãèæ ®ããŠããããšã確èªããå¿ èŠããããŸããé床ã«è€éãªæ¡ä»¶ãåçãªãã©ã°ã«äŸåããæ¡ä»¶ã¯ãç¹ã«ããŒã¿ã®å¢å ãããžãã¹ã«ãŒã«ã®é²åã«äŒŽãããªã¹ã¯ãããããå¯èœæ§ããããŸãã
äŸãã°ãéçºè ã¯ã«ãŠã³ã¿ãŒãæ£ããå¢å ããŠãããããã©ã°ã確å®ã«æŽæ°ãããŠãããããšããžã±ãŒã¹ãå®å šã«åŠçãããŠãããã確èªããå¿ èŠããããŸããMOVE ã COMPUTE ã1ã€ã§ãééãããšçµäºããžãã¯ãå£ããäžèŠãª CPU 䜿çšçãçºçããããç¹å®ã®ç¶æ³äžã§ã¯ç¡éã«ãŒãã«é¥ã£ããããå¯èœæ§ããããŸãã
ã«ãŒãæ§é ããã¹ããçµäºããžãã¯ãããã³ I/O é çœ®ã«æ³šæãæããªãããæåã³ãŒã ã¬ãã¥ãŒãè¡ããšãæãã³ã¹ãã®ããã CPU ã®éå¹çæ§ã®å€ããæ¬çªç°å¢ã«å°éããåã«æ€åºã§ãããããä¿¡é Œæ§ãé«ãä¿å®ãããã COBOL ã¢ããªã±ãŒã·ã§ã³ããµããŒãã§ããŸãã
CPUè² è·ã®é«ãã«ãŒãã«å¯ŸããããŒã«æ¯æŽæ€åºæ³
æäœæ¥ã«ããã³ãŒãã¬ãã¥ãŒã¯éåžžã«éèŠã§ãããæéãããããå€§èŠæš¡ãŸãã¯è€éãªCOBOLã·ã¹ãã ã§ã¯åŸ®åŠãªããã©ãŒãã³ã¹ã®åé¡ãèŠéããŠããŸãããšããããŸããããŒã«ã掻çšããã¢ãããŒãã¯ãCPUè² è·ã®é«ãã«ãŒããçºèŠããããã»ã¹ã®ç²ŸåºŠãšã¹ã±ãŒã«ãåäžãããŸãããããã®ææ³ã¯ãå°çšã®ã¡ã€ã³ãã¬ãŒã ããã©ãŒãã³ã¹ããŒã«ãåçãã¬ãŒã¹æ©èœãéçã³ãŒãã¢ãã©ã€ã¶ãŒã掻çšããæ¬çªç°å¢ãŸãã¯ãã¹ãç°å¢ã§åé¡ãšãªããã¿ãŒã³ãäœç³»çã«ç¹å®ããŸãã
ã¡ã€ã³ãã¬ãŒã ããã©ãŒãã³ã¹åæããŒã«
COBOLããã°ã©ã ã®äžã§ãªãœãŒã¹ã倧éã«æ¶è²»ããã»ã¯ã·ã§ã³ãç¹å®ããããã«ãã¡ã€ã³ãã¬ãŒã å°çšã®ããã©ãŒãã³ã¹åæããŒã«ãåºãå©çšãããŠããŸãããããã®ããŒã«ã¯ãžã§ãå®è¡äžã«è©³çްãªå®è¡ã¡ããªã¯ã¹ãåéããã©ã®è¡ã段èœãæãCPUæéãæ¶è²»ããŠããããæããã«ããŸãã
ããã©ãŒãã³ã¹ã¢ããªã¹ãã¯ãã©ã®ããã°ã©ã ãŸãã¯ãžã§ãã¹ããããæåŸ ãããããŒã¹ã©ã€ã³ããéžè±ããŠãããã確èªã§ããŸããCPU䜿çšçãéå°ãªCOBOL段èœã¯ãå€ãã®å Žåãèšèšãäžååãªã«ãŒããéå¹ççãªããžãã¯ãšçžé¢ããŠããŸãããã®ã¢ãããŒãã«ãããã³ã¹ããšå®è¡æéã®åæžã«æã广çãªç®æã«çãçµã£ãæé©åãå¯èœã«ãªããŸãã
ãããã®ããŒã«ã¯éåžžãã¡ã€ã³ãã¬ãŒã ã®ã¯ãŒã¯ãããŒãšçµ±åãããè±å¯ãªã¬ããŒããæäŸããããããšã³ã¿ãŒãã©ã€ãº ã¬ãã«ã®ããã©ãŒãã³ã¹ç®¡çã«äžå¯æ¬ ãªèŠçŽ ãšãªããŸãã
COBOLãã¬ãŒã¹æ©èœã«ããåçãã¬ãŒã¹
å€ãã®ã¡ã€ã³ãã¬ãŒã ç°å¢ã¯ãããã°ã©ã ã®å®è¡ããªã¢ã«ã¿ã€ã ã§ç£èŠã§ããåçãã¬ãŒã¹æ©èœããµããŒãããŠããŸãããã¬ãŒã¹æ©èœã¯ãã«ãŒãããµãããã°ã©ã åŒã³åºããæ¡ä»¶è©äŸ¡ã®ãããããšã³ããªãã€ã³ããšçµäºãã€ã³ãããã£ããã£ããå®è¡ãã¹ãæç¢ºã«ææ¡ã§ããŸãã
ãã¬ãŒã¹ã¯ãæ¬çªç°å¢ã«è¿ãã¯ãŒã¯ããŒããç¹å®ã®ããŒã¿ç¹æ§ãæã€å Žåã«ã®ã¿çºçããããã©ãŒãã³ã¹ã®åé¡ãåçŸããéã«ç¹ã«åœ¹ç«ã¡ãŸããå®éã®ååŸ©åæ°ãå¶åŸ¡ãããŒã®æ±ºå®ã確èªããããšã§ãããŒã ã¯ã«ãŒãåäœã«é¢ããæ³å®ãæ€èšŒããåçŽãªãã¹ãããŒã¿ã§ã¯çŸããªãå¯èœæ§ã®ãããç¡å¶éã®æ¡ä»¶ãéå°ãªãã¹ããè¿ éã«ç¹å®ã§ããŸãã
ãã¬ãŒã¹åºåã«ãããããŒã ã¯ããã©ãŒãã³ã¹ã®åäžãæã倧ããªéããçãã³ãŒãã®å Žæã«æ£ç¢ºã«çŠç¹ãçµãããšãã§ããŸãã
COBOLçšéçã³ãŒãã¢ãã©ã€ã¶ãŒã®äœ¿çš
éçã³ãŒãã¢ãã©ã€ã¶ãŒã¯ãCOBOLãœãŒã¹ã³ãŒããå®è¡ããã«ã¹ãã£ã³ããããšã§ãè£å®çãªã¢ãããŒããæäŸããŸããæ·±ããã¹ããããPERFORMæ§é ãçµäºæ¡ä»¶ã®æ¬ èœãæé©åãããŠããªãæ€çŽ¢ãã¿ãŒã³ãªã©ãCPUè² è·ã®é«ãã«ãŒãã«ã€ãªããããšãç¥ãããŠãããã¿ãŒã³ãæ€åºããããã«èšå®ã§ããŸãã
ãããã®ã¢ãã©ã€ã¶ãŒã¯ãããŒã ãé倧床ãšåœ±é¿åºŠã«åºã¥ããŠä¿®åŸ©äœæ¥ãåªå é äœä»ãããã®ã«åœ¹ç«ã€å®çšçãªã¬ããŒããçæããŸããéçºã¯ãŒã¯ãããŒãèªååããããã€ãã©ã€ã³ã«çµ±åããããšã§ãå€§èŠæš¡ãªã³ãŒãããŒã¹å šäœã§äžè²«ããæšæºãé©çšã§ããŸãã
éçè§£æã¯ãæ°ããã³ãŒãããã¹ããã©ã¯ãã£ã¹ã«æºæ ããŠããããšãä¿èšŒããéå¹ççãªã«ãŒããæ©æã«ç¹å®ããããšã§ãæ¬çªç°å¢ã§ã³ã¹ãã®ãããããã©ãŒãã³ã¹åé¡ãçºçããå¯èœæ§ãäœæžããŸããåçããã©ãŒãã³ã¹ããŒã¿ãšéçè§£æã®ç¥èŠãçµã¿åãããããšã§ãCOBOLã·ã¹ãã ã«ãããCPUè² è·ã®é«ãã«ãŒãåé¡ãæ€åºã»é²æ¢ããããã®åŒ·åãªæŠç¥ãæ§ç¯ã§ããŸãã
COBOLã«ãŒãã®ãããã¡ã€ãªã³ã°ãšãã³ãããŒã¯æŠç¥
CPUè² è·ã®é«ãã«ãŒããç¹å®ãã解決ããã«ã¯ãå ç¢ãªãããã¡ã€ãªã³ã°ãšãã³ãããŒã¯ã®å®è·µãäžå¯æ¬ ã§ãããããã®æŠç¥ã¯ãããŒã ãçŸå®çãªã¯ãŒã¯ããŒãäžã§ã®ã³ãŒãã®åäœã枬å®ããæé©åã«ããæ¹åãå®éåãã倿Žã«ãã£ãŠå®éã«CPUæ¶è²»éãåæžãããŠããããšãæ€èšŒããã®ã«åœ¹ç«ã¡ãŸãã广çãªãããã¡ã€ãªã³ã°ãšãã³ãããŒã¯ã¯ãæœè±¡çãªããã©ãŒãã³ã¹ç®æšãå ·äœçãã€è¿œè·¡å¯èœãªææãžãšå€æããç¶ç¶çãªã¡ã³ããã³ã¹ãšãã¥ãŒãã³ã°ã®æéãšãªããŸãã
ã¿ã€ãã³ã°ã«ãŠã³ã¿ã䜿çšããã³ãŒãã®èšæž¬
å®çšçãªææ³ã®äžã€ãšããŠãCOBOLããã°ã©ã ã®äž»èŠã»ã¯ã·ã§ã³ã®å®è¡æéãèšæž¬ããããã®ã¿ã€ãã³ã°ã«ãŠã³ã¿ã远å ããããšãæããããŸããã«ãŒããæ®µèœã®éå§æéãšçµäºæéãèšæž¬ããããšã§ãéçºè ã¯ãããã®ã»ã¯ã·ã§ã³ã®å®è¡æéãæ£ç¢ºã«ææ¡ã§ããŸãã
ãã®ã¢ãããŒãã¯ãã³ãŒããä¿®æ£ããŠè¿œå ã®èšºæãã£ãŒã«ãã远å ã§ããéçºç°å¢ããã¹ãç°å¢ã§æå¹ã§ããããŒã ã¯ã¿ã€ãã³ã°çµæãåæããããšã§ããããªãæé©åãå¿ èŠãªãããã¹ããããç¹å®ã§ããŸãããŸããã³ãŒããã€ã³ã¹ãã«ã¡ã³ãåããããšã§ãçµäºæ¡ä»¶ãæåŸ ã©ããã«æ©èœããŠããããšããããŠããŒã¿éã®å€åã«ãã£ãŠããã©ãŒãã³ã¹ãäœäžããªãããšãæ€èšŒããã®ã«ã圹ç«ã¡ãŸãã
ã¿ã€ãã³ã° ã«ãŠã³ã¿ãŒã¯ãã«ãŒã ããã©ãŒãã³ã¹ãæç¢ºã«ææ¡ããããã®ç°¡åã§äœã³ã¹ãã®æ¹æ³ãæäŸãããã¥ãŒãã³ã°äœæ¥ãã©ãã«éäžããããã«ã€ããŠããŒã¿ã«åºã¥ã決å®ããµããŒãããŸãã
æé©åååŸã®CPUæ¶è²»éã®æ¯èŒ
éå¹ççãªã«ãŒããç¹å®ããæ¹åãããããã®å€æŽã«ãã£ãŠå®éã«CPU䜿çšçãåæžãããããšã蚌æããããšãéèŠã§ããã³ãŒã倿ŽååŸã®CPU䜿çšçãæ¯èŒããããšã§ããªãã¡ã¯ã¿ãªã³ã°ã广çã§ããããšããããŠãªã°ã¬ãã·ã§ã³ãåé¿ã§ããããšãä¿èšŒãããŸãã
ããŒã ã¯ãããããžã§ãã®ã¢ã«ãŠã³ãã£ã³ã°ã¬ã³ãŒããã·ã¹ãã ããã©ãŒãã³ã¹ã¬ããŒãããŸãã¯å éšã«ãŠã³ã¿ãŒã䜿çšããŠãåã ã®ãžã§ãã®CPUæéã远跡ã§ããŸãã代衚çãªããŒã¿ã»ãããçšããŠè€æ°åã®å®è¡ãæ éã«æ¯èŒããããšã§ãå ¥åãµã€ãºãã·ã¹ãã è² è·ã®å€åãèæ ®ããããšãã§ããŸãã
ãã®æ€èšŒã¹ãããã¯ãæé©åãžã®ä¿¡é Œæ§ãé«ããé¢ä¿è ãšå ±æã§ããæç¢ºãªã³ã¹ãåæžèšé²ãæäŸããŸãããŸããã©ã®ãããªå€æŽãæã倧ããªã¡ãªãããããããããç¹å®ããããšã§ãå°æ¥ã®æ¹åã®æéã«ããªããŸãã
ããããžã§ãã¡ããªã¯ã¹ã䜿çšããŠåé¡ã®ããã»ã¯ã·ã§ã³ãç¹å®ãã
åã ã®ã«ãŒãã®ãããã¡ã€ãªã³ã°ã«å ããŠãããããžã§ãå šäœã®ã¡ããªã¯ã¹ãã¬ãã¥ãŒããããšã§ãããã©ãŒãã³ã¹ãæã广çã«æ¹åã§ããç®æãç¹å®ã§ããŸãããžã§ãã®å®è¡æéãšCPUæ¶è²»éã®å±¥æŽèšé²ã¯ãã©ã®ããã»ã¹ãåžžã«æããªãœãŒã¹ãæ¶è²»ããŠããããç¹å®ããã®ã«åœ¹ç«ã¡ãŸãããããã®é«ã³ã¹ããžã§ãã«æé©åãéäžãããããšã§ãããŒã ã¯ããå°ãªãåŽåã§ã·ã¹ãã å šäœã«ããããã倧ããªã¡ãªãããå®çŸã§ããŸãã
ãã®ããåºãèŠç¹ã¯ãå Žåœããçãªãã¥ãŒãã³ã°ã§ã¯ãªããæŠç¥çãªèšç»ãä¿ããŸãããŸããã¢ããªã·ãã¯ã«ãŒãã䞊åã¹ãããã«åå²ããããCPUç«¶åãåé¿ããããã«ãããã¹ã±ãžã¥ãŒã«ãåç·šæããããããªã©ãã¢ãŒããã¯ãã£å€æŽã®æ©äŒãæµ®ã圫ãã«ããŸããç¶¿å¯ãªãã³ãããŒã¯ã«åºã¥ããç¶ç¶çãã€æž¬å®å¯èœãªç®æšãšããŠããã©ãŒãã³ã¹ãæããããšã§ãçµç¹ã¯ããŒã¿éãããžãã¹éèŠã®å¢å€§ã«çŽé¢ããŠããä¿¡é Œæ§ãšå¹çæ§ã«åªããCOBOLåŠçãç¶æã§ããŸãã
COBOLã«ãããCPUè² è·ã®é«ãã«ãŒãã®äžè¬çãªåå
CPUè² è·ã®é«ãã«ãŒãã®æ ¹æ¬åå ãçè§£ããããšã¯ãå¹ççã§ä¿å®æ§ã®é«ãCOBOLã³ãŒããæžãäžã§äžå¯æ¬ ã§ãããããã®åå ã¯éçºåææ®µéã§ã¯èŠèœãšãããã¡ã§ãããããŒã¿éã®å¢å ããããã¹ã±ãžã¥ãŒã«ã®å³ãããå¢ããšãæ·±å»ãªããã©ãŒãã³ã¹åé¡ãåŒãèµ·ããå¯èœæ§ããããŸãããããã®ãã¿ãŒã³ãç¹å®ããããšã§ãéçºè ã¯æ°èŠã³ãŒãã§ã¯ããããåé¿ããã¬ãã¥ãŒããªãã¡ã¯ã¿ãªã³ã°äœæ¥ã§ããããç¹å®ããããšãã§ããŸãã
éå¹ççãªãœãŒãããã³æ€çŽ¢ã¢ã«ãŽãªãºã
CPU䜿çšçãé«ããªãåå ã®äžã€ãšããŠãå€§èŠæš¡ãªããŒã¿ã»ããã®ãœãŒããæ€çŽ¢ã«éå¹ççãªã¢ã«ãŽãªãºã ã䜿çšãããŠããããšãæããããŸããéçºè ã¯ãããåªããææ³ãååšããã«ãããããããããŒãã«å šäœãã¹ãã£ã³ããç·åœ¢æ€çŽ¢ãå®è£ ããããšããããŸãã
äŸãã°ããœãŒããããŠããªãããŒãã«ãã«ãŒãã§ç¹°ãè¿ãã¹ãã£ã³ããŠäžèŽãããã®ãæ¢ããšãããŒã¿ãå¢ããã«ã€ããŠã³ã¹ãã蚱容ã§ããªãã»ã©é«ããªãå¯èœæ§ããããŸããäºåã«ããŒãã«ããœãŒããããã€ããªãµãŒãæè¡ã䜿çšããããšã§ãå¿ èŠãªæ¯èŒåæ°ãå€§å¹ ã«åæžããããžãã¹ããžãã¯ã倿ŽããããšãªãCPUæéãç¯çŽã§ããŸãã
PERFORM VARYING I FROM 1 BY 1 UNTIL I > TABLE-SIZE
IF TABLE-ENTRY(I) = SEARCH-VALUE
MOVE I TO RESULT-IDX
EXIT PERFORM
END-IF
END-PERFORM.
ãã®ãããªç·åœ¢æ€çŽ¢ãã€ã³ããã¯ã¹æ€çŽ¢ãŸãã¯ãã€ããªæ€çŽ¢æ¹åŒã«çœ®ãæãããšãå€§èŠæš¡ãªãããå®è¡ã®ã¹ã±ãŒã©ããªãã£ãåäžããŸãã
ããŒãã«æ€çŽ¢ã«ãããã€ã³ããã¯ã¹ã®æ¬ åŠ
CPUæ¶è²»ãéå°ã«ãªãããäžã€ã®åå ã¯ãéèŠãªããŒãã«ãžã®ã€ã³ããã¯ã¹ã¢ã¯ã»ã¹ãç¶æãããŠããªãããšã§ããã€ã³ããã¯ã¹ããªããšãåæ€çŽ¢ã§ãã«ã¹ãã£ã³ãå¿ èŠã«ãªããã«ãŒãå ã§ãã®ãããªæ€çŽ¢ãçºçãããšãã³ã¹ããæ¥éã«å¢å€§ããŸãã
ããã¯ãè€æ°ã®ããŒã¿ãœãŒã¹ããã¹ããããã«ãŒãã§çµåããéã«ããçºçããŸããå åŽã®ã«ãŒãã¯å€åŽã®ã«ãŒãã®å埩åŠçããšã«ããŒãã«å šäœãã¹ãã£ã³ãããããå®è¡æéã2ä¹ãããã¯ãã以äžã«å¢å ããŸããã€ã³ããã¯ã¹ä»ãããŒãã«ãå°å ¥ããããã«ãŒãåŠçã®åã«ããŒã¿ãäºåã«ãã£ã«ã¿ãªã³ã°ãããããããšã§ãéçºè ã¯äžèŠãªå埩åŠçãåæžããåŠçé床ãå€§å¹ ã«åäžãããããšãã§ããŸãã
ã€ã³ããã¯ã¹ãäœæãããšãCPU ã®äœ¿çšéãåæžãããã ãã§ãªããå°æ¥ã³ãŒããã¬ãã¥ãŒããéçºè åãã«æå³ããããŒã¿ ã¢ã¯ã»ã¹ ãã¿ãŒã³ãæç¢ºã«ãªããã¡ã³ããã³ã¹ãç°¡çŽ åãããŸãã
ååž°åŒã³åºããŸãã¯å¶åŸ¡ãããŠããªãã«ãŒãå±é
COBOL ã¯äžéšã®ææ°èšèªãšåãããã«ååž°ã䜿çšããŸããããéçºè ã¯ãé©åã«å¶åŸ¡ãããŠããªã PERFORM åŒã³åºãããäºå®äžååž°åäœãäœæããã«ãŒãæ¡åŒµã䜿çšããŠãåæ§ã®ãã¿ãŒã³ã誀ã£ãŠã·ãã¥ã¬ãŒãããå¯èœæ§ããããŸãã
æç¢ºãªçµäºæ¡ä»¶ãªãã«ä»ã®ã«ãŒããåŒã³åºãã«ãŒãã¯ãæå³ãããããã¯ããã«å€ãã®å埩åŠçãç¬æã«çæããå¯èœæ§ããããŸããããã¯ãéå±€çãªããŒã¿æ§é ãå¯å€æ·±åºŠã®ãã¡ã€ã«åœ¢åŒãåŠçããå Žåã«ç¹ã«å±éºãšãªããŸãã
ã¬ãã¥ãŒæ åœè ã¯ãPERFORMæ§é ã«çްå¿ã®æ³šæãæããæå³ããªãéå±€çãªç¹°ãè¿ããçºçããªãããã«ããå¿ èŠããããŸããçµäºæ¡ä»¶ãæ éã«èšèšããçŸå®çãªããŒã¿ãµã€ãºã§å ç¢ãªãã¹ãã宿œããããšã§ããããã®ãã¿ãŒã³ãæ¬çªç°å¢ã§æ·±å»ãªCPUããã«ããã¯ãåŒãèµ·ããã®ãé²ãããšãã§ããŸãã
å¶åŸ¡ãããŠããªãæ¡åŒµãåé¿ããããšã§ãããã ãžã§ãã®äºæž¬å¯èœæ§ãç¶æãããããžãã¹èŠä»¶ãé²åããŠã COBOL ããã°ã©ã ãééçãä¿å®å¯èœããã€å¹ççã«èšèšãããšããååã«æºæ ã§ããŸãã
CPUè² è·ã®é«ãã«ãŒããåæžããæé©åãã¯ããã¯
CPUè² è·ã®é«ãã«ãŒããç¹å®ããããæ¬¡ã®ã¹ãããã¯ããããã«å¯ŸåŠããããã®å¹æçãªæé©åãèšèšããããšã§ããCOBOLéçºè ã¯ãååŸ©åæ°ã®åæžãããŒã¿ã¢ã¯ã»ã¹å¹çã®åäžãããžãã¯ã®ç°¡çŽ åãªã©ãæ§ã ãªææ³ã掻çšã§ããŸãããããã®ã¢ãããŒãã¯ãCPU䜿çšçãåæžããã ãã§ãªããã³ãŒãã®ä¿å®æ§ãé«ããå€åããããžãã¹ããŒãºãžã®é©å¿ã容æã«ããŸããç¶¿å¯ãã€çãçµã£ãæé©åãè¡ãããšã§ãã³ãŒãã®å šé¢çãªæžãæããå¿ èŠãšããã«ãå€§å¹ ãªããã©ãŒãã³ã¹åäžãå®çŸã§ããŸãã
æ©æçµäºãšããŒã¿ãã£ã«ã¿ãªã³ã°ã«ããã«ãŒãå埩ã®åæž
CPUã³ã¹ããåæžããæãã·ã³ãã«ãã€å¹æçãªæ¹æ³ã®äžã€ã¯ãã«ãŒããæ¬åœã«å¿ èŠãªåŠçã ããå®è¡ããããã«ããããšã§ããæ©æçµäºæ¡ä»¶ã远å ãããšãçµæãèŠã€ãã£ãæç¹ã§åŠçã忢ããäžèŠãªå埩åŠçãåé¿ã§ããŸãã
ã«ãŒãã«å ¥ãåã«ããŒã¿ããã£ã«ã¿ãªã³ã°ããããšã§ãåŠçãããã¬ã³ãŒãæ°ãåæžããããšãã§ããŸããå åŽã®ã«ãŒãå ã§æ¡ä»¶ãç¹°ãè¿ãé©çšãã代ããã«ãéçºè ã¯ã¬ã³ãŒããäžåºŠã ãäºåã«ã¹ã¯ãªãŒãã³ã°ããããšã§ãå šäœçãªäœæ¥è² è·ã軜æžã§ããŸãã
PERFORM UNTIL END-OF-FILE
READ TRANSACTION-FILE INTO WS-RECORD
AT END
SET END-OF-FILE TO TRUE
NOT AT END
IF WS-STATUS = 'ACTIVE'
PERFORM PROCESS-ACTIVE
END-IF
END-READ
END-PERFORM.
ãã®äŸã§ã¯ãã¹ããŒã¿ã¹ã«åºã¥ããŠãã£ã«ã¿ãªã³ã°ããããšã§ãéã¢ã¯ãã£ããªã¬ã³ãŒããäžå¿ èŠã«åŠçãããããšãé²ããŸãã
ããè¯ãã¢ã«ãŽãªãºã ã§ã«ãŒããæžãæãã
åºç€ãšãªãã¢ã«ãŽãªãºã ãæ¹åããããšã§ãå€ãã®å Žåããã倧ããªç¯çŽãå®çŸããŸããå€§èŠæš¡ãªããŒã¿ã»ããã§åçŽãªç·åœ¢æ€çŽ¢ã䜿çšãã代ããã«ããã€ããªãµãŒãããžãã¯ã«çœ®ãæããããšã§ãæ¯èŒåŠçãå€§å¹ ã«åæžã§ããŸããäºåã«ããŒãã«ãäžåºŠãœãŒããããšCPUè² è·ãå€å°é«ããªããŸãããç¹°ãè¿ãæ€çŽ¢ãè¡ãéã«ã¯å€§ããªã¡ãªããããããŸãã
åæ§ã«ãããã·ã¥æè¡ãã€ã³ããã¯ã¹ã¢ã¯ã»ã¹ãã¿ãŒã³ã䜿çšããããšã§ãåé·ãªã¹ãã£ã³ãå®å šã«æé€ã§ããŸããããŒã¿ã®éãšæ§é ã«é©ããã¢ã«ãŽãªãºã ãéžæããããšã«æéããããããšã§ãéçºè ã¯COBOLããã°ã©ã ã®ã¹ã±ãŒã©ããªãã£ãšå°æ¥ã®æé·ãžã®èæ§ãé«ããããšãã§ããŸãã
ã¢ã«ãŽãªãºã ã®æ¹åã¯ãç¹ã«æ¯æ©äœçŸäžãã®ã¬ã³ãŒããåŠçããããã ãžã§ãã§ã¯ãåŽåã«å¯ŸããŠæãé«ãåçãããããããšããããããŸãã
I/Oæäœãã«ãŒãå€ã«ç§»åãã
ã¡ã€ã³ãã¬ãŒã ã·ã¹ãã ã§ã¯ãã¡ã€ã«I/Oã®ã³ã¹ããç¹ã«é«ããREADãŸãã¯WRITEæäœãã¿ã€ããªã«ãŒãå ã«é 眮ãããšãCPUæéãæ¥éã«å§è¿«ãããå¯èœæ§ããããŸãããããããã¹ãšããŠãå åŽã®ã«ãŒãã®å埩åŠçããšã«ã¬ã³ãŒãã®èªã¿åããåºåã®æžã蟌ã¿ãè¡ããI/Oæäœãäžå¿ èŠã«å¢ãããŠããŸãããšãæããããŸãã
ãããã®ãã¿ãŒã³ãæé©åããã«ã¯ãå¯èœãªéãéèŠãªã«ãŒãã®å€åŽã§I/OãåŠçããããã«ã³ãŒããåæ§ç¯ããå¿ èŠããããŸããããã«ã¯ãåŠçåã«ã¬ã³ãŒããã¡ã¢ãªã«ãããã¡ãªã³ã°ããããéçŽåŸã«äžæ¬æžã蟌ã¿ããããããªã©ãå«ãŸããŸãã
éçºè ã¯ãããã°ã©ã å ã®ããŒã¿ã®æµããæ³šææ·±ãæ€èšŒããã«ãŒããé«ã³ã¹ãã®I/OåŒã³åºããç¹°ãè¿ãå®è¡ããã®ã§ã¯ãªããèšç®åŠçã«éäžããããã«ããå¿ èŠããããŸããI/Oãã«ãŒãã®å€ã«ç§»åããããšã§ãããã°ã©ã ã¯é«éåããå®è¡ã³ã¹ããåæžãããå°æ¥ã®ã¡ã³ããã³ã¹ã容æã«ãªããŸãã
ãããã®æé©åæè¡ãçµã¿åãããããšã§ãéå¹çç㪠COBOL ã³ãŒãããããŒã¿éãå¢å ãç¶ããŠããããåŠçã¹ã±ãžã¥ãŒã«ãæéã©ããã«å®è¡ããã³ã¹ããæå¶ã§ããä¿¡é Œæ§ã®é«ã髿§èœã·ã¹ãã ã«å€æã§ããŸãã
ã±ãŒã¹ã¹ã¿ãã£: CPUè² è·ã®é«ãã«ãŒããæé©åããå®éã®äŸ
æœè±¡çãªãã¹ããã©ã¯ãã£ã¹ã¯è²Žéã§ãããããŒã ãããããå®éã®åé¡è§£æ±ºã«ã©ã®ããã«é©çšããããèŠãããšã«åããã®ã¯ãããŸããã以äžã¯ãéçºè ãCOBOLããã°ã©ã å ã®CPUè² è·ã®é«ãã«ãŒããã©ã®ããã«ç¹å®ããæé©åãããã瀺ã3ã€ã®å®äŸã§ããåã·ããªãªã¯ãæ€åºããæ¹åãŸã§ã®ããã»ã¹ã瀺ããŠãããä»ã®ã·ã¹ãã ã«ãé©çšã§ããæç¢ºãªæŠç¥ã瀺ããŠããŸãã
äŸ1: åé·æ€çŽ¢ã䌎ããã¹ãã«ãŒã
ããéèãµãŒãã¹äŒç€ŸããååŒèšé²ãã顧客æ®é«ãæŽæ°ããå€éããããžã§ããå®è¡ããŠããŸãããç£èŠã¬ããŒãã«ãããšãCPUæéã®æ¥å¢ãå ±åããããžã§ãã®ã¹ã±ãžã¥ãŒã«ããããŠã£ã³ããŠãè ããããŠããŸããã
ã³ãŒãã¬ãã¥ãŒã«ãããå顧客ã®ãã©ã³ã¶ã¯ã·ã§ã³ããŒãã«å šäœãã¹ãã£ã³ãããã¹ããããã«ãŒããæããã«ãªããŸããã
PERFORM VARYING I FROM 1 BY 1 UNTIL I > CUSTOMER-COUNT
PERFORM VARYING J FROM 1 BY 1 UNTIL J > TRANSACTION-COUNT
IF TRANSACTION(J) = CUSTOMER(I)
ADD AMOUNT(J) TO BALANCE(I)
END-IF
END-PERFORM
END-PERFORM.
ããŒã ã¯ããã©ã³ã¶ã¯ã·ã§ã³ãäºåã«ãœãŒãããã€ã³ããã¯ã¹æ€çŽ¢ãå®è£ ããããšã§ãããæé©åããŸãããCPU䜿çšçã¯50%以äžäœäžãããžã§ãã¯å²ãåœãŠããããŠã£ã³ããŠã«åŸ©å ãããŸããã
äŸ2: ã¿ã€ãã«ãŒãå ã®ãã¡ã€ã«I/O
ããå°å£²äŒæ¥ã¯ã詳现ã¬ã³ãŒããèªã¿åã£ãŠåºèããšã®åèšãéèšãã売äžã¬ããŒããçæããCOBOLããããžã§ããéçšããŠããŸãããããã©ãŒãã³ã¹åæã®çµæãåŠçäžã«CPUæéãšI/OåŸ æ©æéãé·ããªãããšã倿ããŸããã
調æ»ã®çµæãåå埩å ã§ READ æäœãå®è¡ããã«ãŒããèŠã€ãããŸããã
PERFORM UNTIL EOF
READ SALES-FILE INTO WS-RECORD
AT END SET EOF TO TRUE
NOT AT END PERFORM PROCESS-RECORD
END-PERFORM.
圌ãã¯ãžã§ããåèšèšãããŸãã¬ã³ãŒããã¡ã¢ãªã«ãããã¡ãªã³ã°ãããã®åŸã¡ã€ã³I/Oã«ãŒãã®å€ã§äžæ¬åŠçããããã«ããŸãããããã«ãããã£ã¹ã¯ã¢ã¯ãã£ããã£ãå€§å¹ ã«åæžããããžã§ãã®å®è¡æéã40%ççž®ããããããåŠçã®ããŒã¯æã«ãããCPUè² è·ãå¹³æºåãããŸããã
äŸ3: å¶åŸ¡ãããŠããªãã«ãŒãçµäºæ¡ä»¶
æ¿åºæ©é¢ã®ããããžã§ãããCPU䜿çšçã®æŽèµ°ã«ããäºæãã¬å€±æãèµ·ãããŸãããåæã®çµæãåçã«èšå®ããããã©ã°ã«äŸåããã«ãŒãããç¹å®ã®å ¥åããŒã¿ã§ç¶æ ã倿Žã§ããªãããšãããããšã倿ããŸããã
PERFORM UNTIL WS-FLAG = 'Y'
PERFORM PROCESS-STEP
END-PERFORM.
ã¬ãã¥ãŒæ åœè ã¯ãç¹å®ã®ããŒã¿æ¡ä»¶ã«ããWS-FLAGããYãã«èšå®ããããã»ãŒç¡éã«ãŒããçºçããããšãçºèŠããŸãããçµäºæ¡ä»¶ãåžžã«æºããããããã«ããžãã¯ããªãã¡ã¯ã¿ãªã³ã°ããå埩åŠçã®åæ°ãå¶éããããã®é²åŸ¡ã«ãŠã³ã¿ãŒã远å ããŸãããCPUæéã¯å®å®ãããããå®è¡ã®å€±æãªã¹ã¯ã¯æé€ãããŸããã
ãããã®ãã¿ãŒã³ãæ€èšŒããããšã§ãããŒã ã¯å€§èŠæš¡ãªæžãæãã«é ŒãããšãªããææçŸ©ãªããã©ãŒãã³ã¹æ¹åãå®çŸããããšãã§ããŸããããããã®äºäŸã¯ãéçºè ãšéçšã¹ã¿ããã®ç·å¯ãªé£æºã宿çãªããã©ãŒãã³ã¹ã¬ãã¥ãŒããããŠCOBOLã·ã¹ãã ã®ä¿¡é Œæ§ãšã³ã¹ãå¹çãé·æã«ããã£ãŠäž¡ç«ããããšããã³ãããã¡ã³ãã®äŸ¡å€ãæµ®ã圫ãã«ããŠããŸãããããã®æèšãç¶ç¶çã«é©çšããããšã§ãããããžã§ãã®äºæž¬å¯èœæ§ãç¶æããããžãã¹ã¹ã±ãžã¥ãŒã«ãšã®æŽåæ§ãä¿ã¡ãé«å質ãªãšã³ã¿ãŒãã©ã€ãºã·ã¹ãã ãç¶æãããšããç¶ç¶çãªããã·ã§ã³ãæ¯ããããšãã§ããŸãã
COBOLã«ãããCPUè² è·ã®é«ãã«ãŒããé²ãããã®ãã¹ããã©ã¯ãã£ã¹
CPUè² è·ã®é«ãã«ãŒãã®é²æ¢ã¯ãæ¬çªç°å¢ã§ããã©ãŒãã³ã¹ã®åé¡ãçºçãããã£ãšåããå§ããããŸããæç¢ºãªã³ãŒãã£ã³ã°èŠçŽãé©çšãã宿çãªç£æ»ã宿œãã广çãªç£èŠæŠç¥ã掻çšããããšã§ãéçºããŒã ã¯ããããéå¹çæ§ãæåããåé¿ã§ããŸãããããã®ãã¹ããã©ã¯ãã£ã¹ã¯ãããŒã¿éãããžãã¹èŠä»¶ãå€åããŠããäžè²«ããå質ãç¶æããéçšãªã¹ã¯ã軜æžãããããåŠçã®ä¿¡é Œæ§ãç¶æããã®ã«åœ¹ç«ã¡ãŸãã
CPUè² è·ã®é«ãã«ãŒããé¿ããããã®ã³ãŒãã£ã³ã°æšæº
匷åãªã³ãŒãã£ã³ã°èŠçŽãæœè¡ããããšã¯ãéå¹ççãªã«ãŒããé²ãæã广çãªæ¹æ³ã®äžã€ã§ããèŠçŽã§ã¯ãã«ãŒãæ§é ãçµäºæ¡ä»¶ããã¹ãã®æ·±ãã«é¢ããæç¢ºãªæåŸ ãå®çŸ©ããå¿ èŠããããŸãã
äŸãã°ãããŒã ã¯å¯èœãªéãæ©æçµäºã矩åä»ããäžèŠãªãã¹ããããã«ãŒããæå¶ããäºåãã£ã«ã¿ãªã³ã°ãªãã§å€§èŠæš¡ãªããŒã¿ã»ãããå埩åŠçããã³ãŒãã«ã¯æ£åœæ§ãæ±ãããšãã£ãããšãå¯èœã§ããã¬ãã¥ã¢ãŒã¯ãCPUã®ç¡å¶éãªäœ¿çšãåé¿ããããã«ããã¹ãŠã®ã«ãŒããäºæž¬å¯èœã§ä¿¡é Œæ§ã®é«ãçµäºæ¡ä»¶ãåããŠããããšã確èªããå¿ èŠããããŸãã
ããã¥ã¡ã³ãäœæãšãã¬ãŒãã³ã°ãéèŠãªåœ¹å²ãæãããŸããéçºè ã«ããããèœãšã穎ãå®èšŒæžã¿ã®æé©åææ³ã«ã€ããŠæè²ããããšã§ãçµç¹ã¯æ°ããããŒã ã¡ã³ããŒã§ãã£ãŠãæåããå¹ççãªCOBOLã³ãŒããæžããããã«ããããšãã§ããŸãã
宿çãªããã©ãŒãã³ã¹ç£æ»
ããšãé©åã«èšèšãããã·ã¹ãã ã§ãã£ãŠããããžãã¹ã«ãŒã«ã®å€åãããŒã¿ã®å¢å€§ã«äŒŽããæéã®çµéãšãšãã«éå¹çæ§ãèç©ãããŠããå¯èœæ§ããããŸãã宿çãªããã©ãŒãã³ã¹ç£æ»ã¯ãããŒã ãæ°ããªåé¡ãæ·±å»åããåã«ç¹å®ããã®ã«åœ¹ç«ã¡ãŸãã
ç£æ»ã«ã¯ãããããžã§ãã®ã¢ã«ãŠã³ãã£ã³ã°èšé²ã®ç¢ºèªãCPUæéãšéå»ã®ããŒã¹ã©ã€ã³ãšã®æ¯èŒãã³ãŒãå ã®é«ã³ã¹ãã»ã¯ã·ã§ã³ã®ãã¬ãŒã¹ãªã©ãå«ãŸããŸãããããã®ã·ã¹ãã ã¬ãã«ã®ã¬ãã¥ãŒãšã察象ãçµã£ãã³ãŒãæ€æ»ãçµã¿åãããããšã§ãã«ãŒãã®å¹çæ§ãšã¹ã±ãŒã©ããªãã£ãç¶æãããŸãã
ããŒã ã¯ããªãœãŒã¹æ¶è²»éãæãå€ããžã§ããããããã¹ã±ãžã¥ãŒã«ã®éµå®ã«äžå¯æ¬ ãªãžã§ãã®ç£æ»ãåªå ã§ããŸããç£æ»ãæ¥åžžçãªæ¥åã«ããããšã§ãäºæãã¬ããã©ãŒãã³ã¹åé¡ã®çºçãªã¹ã¯ã軜æžã§ããŸãã
ããã¢ã¯ãã£ãæ€åºã®ããã®ç£èŠããŒã«
广çãªç£èŠã«ãããCPUè² è·ã®é«ãã«ãŒããæ©æã«çºèŠããããã«å¿ èŠãªç¶ç¶çãªå¯èŠæ§ã確ä¿ãããŸããã¡ã€ã³ãã¬ãŒã ç°å¢ã§ã¯ãè±å¯ãªãã°èšé²ãšããã©ãŒãã³ã¹ããŒã¿ãæäŸãããã©ã®ãžã§ããŸãã¯ã¹ããããCPUæéãéåºŠã«æ¶è²»ããŠããããæããã«ããããšãã§ããŸãã
ç£èŠããã·ã¥ããŒããšèªåã¢ã©ãŒãã¯ãéçšããŒã ããªãœãŒã¹äœ¿çšéã®ç°åžžãªåŸåãæ¥å¢ãç¹å®ããã®ã«åœ¹ç«ã¡ãŸãããããã®ã€ã³ãµã€ããéçºã¯ãŒã¯ãããŒã«çµ±åããããšã§ãããŒã ã¯åé¡ã®ããã«ãŒããè¿ éã«èª¿æ»ãã察åŠããããšãã§ããŸãã
ããã¢ã¯ãã£ããªç£èŠãšã¯ãåé¡ãçºçããåŸã«ãããææããã ãã§ãªããã·ã¹ãã å質ãç¶ç¶çã«åäžããããã£ãŒãããã¯ã«ãŒããæ§ç¯ããããšã§ããå ç¢ãªã³ãŒãã£ã³ã°èŠçŽãšå®æçãªç£æ»ãšçµã¿åãããããšã§ãç£èŠã¯CPUè² è·ã®é«ãã«ãŒãã鲿¢ããé«ããã©ãŒãã³ã¹ã®COBOLã¢ããªã±ãŒã·ã§ã³ãç¶æããããã®å æ¬çãªæŠç¥ã®åºç€ãšãªããŸãã
äœ¿ãæ¹ SMART TS XL COBOLããã©ãŒãã³ã¹åæçš
COBOLã·ã¹ãã ã«ãããé«ãããã©ãŒãã³ã¹ãšã³ã¹ãå¹çã®ç¢ºä¿ã¯ãå€ãã®çµç¹ã«ãšã£ãŠæ·±å»ãã€ç¶ç¶çãªèª²é¡ã§ãããããã®ã·ã¹ãã ã¯æ°å幎ã«ããã£ãŠé²åããŠãããããã¬ã¬ã·ãŒã³ãŒããæ°ããããžãã¹ã«ãŒã«ããããŠå¢ãç¶ããããŒã¿éãæ··åšããŠããããšããããããŸããããããè€éãã«ãã£ãŠãããããžã§ããæ¬çªç°å¢ã§å®è¡ããéã«ã®ã¿é¡åšåãã埮åŠãªéå¹çæ§ãé ããŠããŸãå¯èœæ§ããããåŠçæéã®é å»¶ãäºæãã¬CPUã³ã¹ããããã«ã¯å®å šãªé害ã«ã€ãªããããšããããŸãã
æåã¬ãã¥ãŒãåŸæ¥åã®ãã¹ãã¯éèŠã§ããããããã®åé¡ãæ©æã«çºèŠããããšãé£ããå Žåãå€ããããŸããéçºè ã¯ãçµäºæ¡ä»¶ãäžååãªæ·±ããã¹ããããã«ãŒããèŠèœãšããããã¿ã€ããªã€ãã¬ãŒã·ã§ã³å ã§æ°ååå®è¡ããããã¡ã€ã«I/Oã«æ°ä»ããªãã£ããããããšããããŸããå€å¿ãªã¡ã€ã³ãã¬ãŒã éçºã®äžçã§ã¯ããããããã¹ã¯èµ·ããããããéçšç°å¢ã«å ¥ããšè¿œè·¡ãå°é£ã«ãªããŸãã
SMART TS XL éå¹ççãªãã¿ãŒã³ã®èªåæ€åºãçµç¹çãªã³ãŒãã£ã³ã°æšæºã®é©çšããããŠéçºè ãåé¡ãæ·±å»åããåã«ä¿®æ£ããããã®æç¢ºã§å®çšçãªæŽå¯ãæäŸããããšã§ããããã®èª²é¡ã«å¯ŸåŠããããã®å æ¬çãªã¢ãããŒããæäŸããŸããéçè§£æãæ¢åã®ã¯ãŒã¯ãããŒã«çŽæ¥çµ±åããããšã§ã SMART TS XL ããŒã ã COBOL éçºã®ããããæ®µéã«ããã©ãŒãã³ã¹ãšå質ãçµã¿èŸŒãã®ãæ¯æŽããé·æçãªå®å®æ§ãä¿å®æ§ãéçšã³ã¹ãã®ç®¡çããµããŒãããŸãã
CPUè² è·ã®é«ãã«ãŒããšéå¹ççãªãã¿ãŒã³ã®èªåæ€åº
SMART TS XL COBOLã³ãŒãããŒã¹ãã¹ãã£ã³ããCPU䜿çšçã®éå°ãåŒãèµ·ããå¯èœæ§ã®ããäžè¬çãªãã¿ãŒã³ãæ€åºããããšã«åªããŠããŸããããã«ã¯ãæ·±ããã¹ããããã«ãŒããçµäºæ¡ä»¶ã®æ¬ èœãŸãã¯äžååãªçµäºæ¡ä»¶ãå埩åŠçå ã®ç¹°ãè¿ãI/Oãé«è² è·ãªèšç®ãªã©ãå«ãŸããŸãã
ããšãã°ã次ã®å±éºãªæ§é ãèããŠã¿ãŸãããã
PERFORM VARYING I FROM 1 BY 1 UNTIL I > MAX-CUSTOMERS
PERFORM VARYING J FROM 1 BY 1 UNTIL J > MAX-ORDERS
PERFORM PROCESS-ORDER
END-PERFORM
END-PERFORM.
ãã®ãããªã³ãŒãã¯ãããŒã¿éãå¢å ããã«ã€ããŠã管çå¯èœãªç¶æ ãã壿» çãªç¶æ ãŸã§æ¡å€§ããå¯èœæ§ããããŸãã SMART TS XL ãããã®ãã¿ãŒã³ã«èªåçã«ãã©ã°ãä»ããããããŒã ã¯å±éåã«å¯ŸåŠã§ããããã«ãªããŸãã
ããã©ãŒãã³ã¹ã®åé¡ãé²ãããã®ã³ãŒãã£ã³ã°æšæºã®é©çš
åã«åé¡ãæ€åºããã ãã§ãªãã SMART TS XL çµç¹ã¯ããã©ãŒãã³ã¹ã«éç¹ã眮ããã«ã¹ã¿ã ã³ãŒãã£ã³ã°æšæºãå®çŸ©ããé©çšã§ããŸããããã«ãããããŒã ã¯ãã¹ãã®æ·±ãã®å¶éãæ©æçµäºã®äœ¿çšãã«ãŒãå ã®åé·ãªI/Oã®åé¿ãšãã£ããã¹ããã©ã¯ãã£ã¹ãäžè²«ããŠé©çšã§ããããã«ãªããŸãã
æšå¥šãããæ§é ã®äŸ:
PERFORM UNTIL END-OF-FILE OR WS-FLAG = 'STOP'
READ FILE-INTO WS-RECORD
IF MATCH-CONDITION
MOVE 'STOP' TO WS-FLAG
END-IF
END-PERFORM.
å·è¡ãèªååããããšã§ã SMART TS XL æäœæ¥ã«ããã¬ãã¥ãŒã®è² æ ã軜æžããããŒã ã¡ã³ããŒå šå¡ãåãé«ãåºæºã«åŸãããšãä¿èšŒããŸãã
æ¢åã®ã¡ã€ã³ãã¬ãŒã éçºã¯ãŒã¯ãããŒãšã®çµ±å
SMART TS XL æ¢åã®ããŒã«ãããã»ã¹ãšé£æºããããã«æ§ç¯ãããŠãããããã¹ã ãŒãºãã€å®çšçã«å°å ¥ã§ããŸããããŒã ã¯CI/CDãã€ãã©ã€ã³ã«éçè§£æãçµã¿èŸŒã¿ãã³ãŒãã³ãããæã«èªåçã«ã¹ãã£ã³ãããªã¬ãŒããåé¡ãæ€åºãããå Žåã«ããŒãžããããã¯ã§ããŸãã
ãã®ç·å¯ãªçµ±åã«ãããããã©ãŒãã³ã¹ãã§ãã¯ã¯æçµæ®µéã«è¿œå ããããã®ã§ã¯ãªããæ¥ã ã®éçºã«äžå¯æ¬ ãªèŠçŽ ãšãªããŸããããã«ãããåé¡ãæ©æã«çºèŠã»ä¿®æ£ãããããã¢ã¯ãã£ããªæåãçãŸããå質ãšããŒã ã®çç£æ§ã®äž¡æ¹ãé·æçã«åäžããŸãã
ããã©ãŒãã³ã¹æé©åã®ããã®å®çšçãªã¬ããŒãã®çæ
ã©ã®ãããªã»ãã SMART TS XL åé¡ãçºèŠããèœåã ãã§ãªããã¬ããŒãã®æç¢ºããšæçšæ§ãéç«ã£ãŠããŸããæŒ ç¶ãšããèŠåã§éçºè ãå§åããã®ã§ã¯ãªããæ£ç¢ºã§çè§£ãããããã£ãŒãããã¯ãæäŸããŸãã
ãããã®ã¬ããŒãã¯ãåé¡ã®ãããã¿ãŒã³ãæ£ç¢ºãªè¡åç §ã§åè§£ãããã¿ãŒã³ãéå¹çãªçç±ã説æããæç¢ºãªæ¹åæŠç¥ãææ¡ããŸããããŒã ã¯ã圱é¿ã®å€§ããä¿®æ£ãåªå é äœä»ãããé²æç¶æ³ãçµæçã«è¿œè·¡ããå ·äœçãªäŸ¡å€ã®èšŒæ ãšãšãã«é¢ä¿è ã«æé©åãããžã§ã¯ãã®æ£åœæ§ã説æããããšãã§ããŸãã
éåãåã«åæããã®ã§ã¯ãªãã SMART TS XL ãå±ããŸã è¡åã®ããã®ç©èªéçè§£æçµæãããããã©ãŒãã³ã¹ãªã¹ã¯ã®æåšãšãã®æé©ãªå¯ŸåŠæ¹æ³ã«é¢ããå ±éçè§£ãå°ãåºããæ å ±ã«åºã¥ããèšç»ç«æ¡ãšããŒã éã®å¹æçãªã³ã©ãã¬ãŒã·ã§ã³ãæ¯æŽããŸãããã®ã¢ãããŒãã«ãããCOBOLã·ã¹ãã ã¯ãæãèŠæ±ã®å³ãããšã³ã¿ãŒãã©ã€ãºç°å¢ã«ãããŠããããã©ãŒãã³ã¹ãä¿¡é Œæ§ãæç¶å¯èœæ§ãç¶æã§ããŸãã
å¹ççã§ä¿¡é Œæ§ã®é«ãCOBOLã·ã¹ãã ã®ç¢ºä¿
COBOLã¢ããªã±ãŒã·ã§ã³ã®ããã©ãŒãã³ã¹ãæé©åããããšã¯ãCPUãµã€ã¯ã«ã®ç¯çŽã ãã«ãšã©ãŸããŸãããéèŠãªããããžã§ããæéã©ããã«å®è¡ãããããšãéçšã³ã¹ããåæžããããšããããŠããžãã¹ãæ¥ã äŸåããä¿¡é Œæ§ãç¶æããããšã«ãç¹ãããŸããCPUè² è·ã®é«ãã«ãŒãã¯ãã¬ã¬ã·ãŒCOBOLç°å¢ã«ãããŠæãæ ¹åŒ·ããã³ã¹ãã®ããã課é¡ã®äžã€ã§ãããæ±ºããŠé¿ããããªããã®ã§ã¯ãããŸããã
ã®çµã¿åãããéã㊠æ éãªã³ãŒãèšèš, æ§é åãããã¬ãã¥ãŒ, ææ°ã®éçè§£æããŒã«ããŒã ã¯ãããã®åé¡ãäœç³»çã«ç¹å®ãã察åŠããããšãã§ããŸããã«ãŒãå¹çã«éç¹ã眮ããã³ãŒãã£ã³ã°æšæºã¯ãéçºè ã«æç¢ºãªæåŸ ãèšå®ããã®ã«åœ¹ç«ã¡ãŸããæåããã³èªåã®ç£æ»ã«ããããããã®æšæºãäžè²«ããŠé©çšãããŠããããšã確èªããåçãã¬ãŒã¹ãšãããã¡ã€ãªã³ã°ã«ãããå®éã®åäœã詳现ã«å¯èŠåã§ããŸãã
COBOLã®ããã©ãŒãã³ã¹ã«å¯Ÿããæç¶å¯èœãªã¢ãããŒãã«ã¯ãäºåŸå¯Ÿå¿çãªä¿®æ£ã ãã§ã¯äžååã§ããéçºã®ãããããã§ãŒãºã«ãããŠæœåšçãªããã«ããã¯ãèªèããéçºè ãããã©ãŒãã³ã¹ã¢ããªã¹ããéçšããŒã éã®é£æºãä¿é²ããããšãäžå¯æ¬ ã§ããå¹çæ§ãå ±æè²¬ä»»ãšããŠæããããšã§ãçµç¹ã¯ãªãœãŒã¹æ¶è²»ãããé©åã«ç®¡çããã³ã¹ããåæžããããžãã¹ãæ¯ããä¿¡é Œæ§ã®é«ãã·ã¹ãã ãç¶æã§ããŸãã
ããã¢ã¯ãã£ããªããã©ãŒãã³ã¹ç®¡çãžã®åãçµã¿ã¯ãCOBOLã¢ããªã±ãŒã·ã§ã³ãä»åŸäœå¹Žã«ãããã£ãŠäŸ¡å€ãæäŸãç¶ããããšãä¿èšŒããŸããéçšã®äºæž¬å¯èœæ§ãšæ¡åŒµæ§ãç¶æããå€åããéèŠã«å¯Ÿå¿ã§ããããã«ããããšã§ãæè¡çãªç®æšã ãã§ãªããããåºç¯ãªããžãã¹äžã®åªå äºé ã«ã察å¿ããŸãã