COBOLã¯æ°åå¹Žã®æŽå²ãæã€èšèªã§ãããéè¡ãä¿éºãæ¿åºæ©é¢ãªã©ãæ§ã ãªæ¥çã®å€ãã®ããã·ã§ã³ã¯ãªãã£ã«ã«ãªã·ã¹ãã ã®ã€ã³ãã©ã«æ·±ãçµã¿èŸŒãŸããŠããŸãããããã®ã¬ã¬ã·ãŒã¢ããªã±ãŒã·ã§ã³ã¯ã瀟äŒä¿éçªå·ãå£åº§æ®é«ãå»çèšé²ãšãã£ãæ©å¯æ§ã®é«ãæ å ±ãåŠçããããšããããããŸããCOBOLã®èä¹ æ§ã¯ãã®èšèšã®èšŒã§ããã仿¥ã®ãµã€ããŒã»ãã¥ãªãã£ã®è åšããã©ã€ãã·ãŒèŠå¶ãèæ ®ããŠéçºãããããã§ã¯ãããŸããã
GDPRãHIPAAãPCI-DSSãšãã£ãèŠå¶æ çµã¿ãããŒã¿ã®åãæ±ããšæ å ±æŒæŽ©ã«å³æ ŒãªèŠä»¶ã課ãäžãCOBOLãå©çšããçµç¹ã¯å°é£ãªçŸå®ã«çŽé¢ããŠããŸããã¬ã¬ã·ãŒã³ãŒãããŒã¹ã¯åŸã ã«ããŠäžéæã§ãããã¥ã¡ã³ããäžååã§ãããæœåšçãªã»ãã¥ãªãã£ãªã¹ã¯ãæœãã§ããŸããæå·åãããŠããªãããŒã¿ç§»åããã¹ã¯ãããŠããªããã£ãŒã«ã衚瀺ãããŒãã³ãŒããããã¢ã¯ã»ã¹ãã¹ãå®å šã§ãªããã¡ã€ã«æžã蟌ã¿ãªã©ã¯ãããŒã¿æŒæŽ©ã«ã€ãªããäžè¬çãªåé¡ã®ã»ãã®äžäŸã§ãã
COBOLã«ãããæäœæ¥ã«ããã³ãŒãã¬ãã¥ãŒã¯ãå€å€§ãªåŽåãèŠããã ãã§ãªãããããã®ãªã¹ã¯ãäžè²«ããŠæ€åºããã®ã«å¹æçã§ã¯ãªãå Žåãå€ãã§ããå®è¡ããã«ãœãŒã¹ã³ãŒããèªåæ€æ»ããéçè§£æã¯ããã®ãããªè匱æ§ãç¹å®ãã察åŠããããã®ã¹ã±ãŒã©ãã«ã§äœç³»çãªã¢ãããŒããæäŸããŸããããããåŸæ¥ã®éçè§£æã¢ãããŒãã¯ãã³ããŒããã¯ãããŒã¿åå²ãããã°ã©ã å®è¡æ§é ãšãã£ãCOBOLç¹æã®æ§é ãšã»ãã³ãã£ã¯ã¹ãããŸãåŠçã§ããªãããšããããããŸãã
ããŒã¿æŒæŽ©ã®ãªã¹ã¯ã軜æžããããã«ãçµç¹ã¯COBOLç¹æã®åäœããã¿ãŒã³ã«åãããéçè§£æã«ãŒã«ãé©çšããå¿ èŠããããŸãããããã®ã«ãŒã«ã¯ãæ©å¯ããŒã¿ãå«ãå®å šã§ãªãæäœãæ€åºããèªå修埩ãšç¶ç¶çãªã³ã³ãã©ã€ã¢ã³ã¹ã®åºç€ãæäŸããŸãããããã®èª²é¡ã«å¹æçã«å¯ŸåŠããã«ã¯ãé©åãªæ¹æ³è«ã ãã§ãªããCOBOLãæ·±ãçè§£ããé©åãªããŒã«ãå¿ èŠã§ãã SMART TS XLè€éãªã¬ã¬ã·ãŒ ã¢ããªã±ãŒã·ã§ã³ã®å æ¬çãã€æ£ç¢ºãªåæããµããŒãããŸãã
COBOLã«ãããããŒã¿é²åºã®çè§£
COBOLã¢ããªã±ãŒã·ã§ã³ãéçåæã§ä¿è·ããåã«ãããããããŒã¿æŒæŽ©ãã©ã®ããã«çºçããããçè§£ããããšãéèŠã§ããCOBOLã¯ããžãã¹ããŒã¿åŠçã®ããã«æ§ç¯ããããã®ã§ãããçŸä»£ã®ã»ãã¥ãªãã£èŠä»¶ãæºãããã®ã§ã¯ãããŸãããé·å¹Žã«ããããããã°ã©ã ã«ã¯ããžãã¯ãããŒã¿å ±ææ¹æ³ããã¡ã€ã«åŠçã«ãŒãã³ãç©ã¿éããããæ©å¯æ å ±ã容æã«äŸµå®³ããå¯èœæ§ããããŸããCOBOLã«ãããããŒã¿æŒæŽ©ã¯å¿ ãããæçœã§ã¯ãããŸããã衚瀺ããžãã¯ã®èŠèœãšããã»ãã¥ãªãã£ä¿è·ãããŠããªãåºåãæ€èšŒãããŠããªãããŒã¿ç§»åãªã©ã«ãã£ãŠãæ°ã¥ããªããã¡ã«çºçããããšããããããŸãããã®ã»ã¯ã·ã§ã³ã§ã¯ãæãäžè¬çãªããŒã¿æŒæŽ©ãã¿ãŒã³ãä¿è·ãå¿ èŠãªè匱ãªããŒã¿ã®çš®é¡ããããŠã»ãã¥ãªãã£åé¡ãèŠãé ãå¯èœæ§ã®ããCOBOLããã°ã©ã ã®ããŒã¿åŠçæ¹æ³ã®ç¹åŸŽã«ã€ããŠèª¬æããŸãã
äžè¬çãªããŒã¿é²åºãã¿ãŒã³
COBOLããã°ã©ã ã¯ãç¹ã«ã埮åŠãªãããå±éºãªæ¹æ³ã§ããŒã¿æŒæŽ©ãèµ·ãããããåŸåããããŸãããããããã¿ãŒã³ãšããŠã瀟äŒä¿éçªå·ãå£åº§æ®é«ãªã©ã®æ©å¯ãã£ãŒã«ãããã¹ã¯ãªãã§è¡šç€ºãããããšãæããããŸãããããã®å€ã¯ã端æ«ã«è¡šç€ºããããããããã¬ããŒãã«å°å·ããããããã¹ã¯ããã£ã«ã¿ãªã³ã°ãé©çšãããã«ç»é¢ãã³ãã©ãŒã«æž¡ããããããããšããããããŸããå€ãã®å Žåãéçºè ã¯åºåãå éšçãªãã®ã§ãããšæ³å®ãããµãã¿ã€ãºåŠçãæ ããŸããããäžã€ã®ãã¿ãŒã³ã¯ãã»ãã¥ãªãã£ä¿è·ãããŠããªããã¡ã€ã«ãžã®ããŒã¿ã®æžã蟌ã¿ã§ããCOBOLã¢ããªã±ãŒã·ã§ã³ã§ã¯ãæ©å¯ãã£ãŒã«ããå«ãäœæ¥é åã¬ã³ãŒãå šäœããæå·åãã¢ã¯ã»ã¹å¶åŸ¡ããããŠããªããã©ãããã¡ã€ã«ã«æžã蟌ãããšããããããŸãã
äŸãã°ãããã°ã©ã ã§ã¯ WRITE 顧客ã¬ã³ãŒãå
šäœãåºåããåè©ã CUST-SSN ãã£ãŒã«ããæ¬¡ã®ãã¡ã€ã«ã«ã³ããŒããŸã CUSTDATA.OUTãã®ãã¡ã€ã«ãä¿è·ãããã«è»¢éãŸãã¯ã¢ãŒã«ã€ãããããšãã»ãã¥ãªãã£äžã®ãªã¹ã¯ãšãªããŸããåæ§ã«ãå€ãã®COBOLã·ã¹ãã ã«ã¯ããããã®ãã¡ã€ã«ãæå·åããã«ãªã¢ãŒãã·ã¹ãã ã«è»¢éããFTPãžã§ãã¹ããããããããŠãŒãã£ãªãã£ãããŒãã³ãŒããããŠããã転éäžã«ãã¡ã€ã«ãç¡é²åã«ãªãå¯èœæ§ããããŸãã
ãããã®ãã¿ãŒã³ã¯ã¡ã³ããã³ã¹äžã«èŠèœãšããããããææ°ã®ã»ãã¥ãªãã£æšæºãå°å ¥ãããåã«å®è£ ãããããšãå€ãããããã®ãŸãŸæ®ããŸãã
COBOL ã®è匱ãªããŒã¿å (äŸ: PIIã財åããŒã¿)
COBOLã¢ããªã±ãŒã·ã§ã³ã¯ãçŸä»£ã®ãã©ã€ãã·ãŒæ³ã§é«åºŠã«ä¿è·ãããã¹ãæ å ±ãšããŠåé¡ããããå€çš®å€æ§ãªæ©å¯ããŒã¿ãæ¥åžžçã«åŠçã»ä¿åããŠããŸããæ°åãçå¹Žææ¥ã瀟äŒä¿éçªå·ãçŽçšè çªå·ãäœæãªã©ã®å人è奿 å ±ïŒPIIïŒã¯ãCOBOLããŒã¿æ§é ã«åã蟌ãŸããããšããããããŸããããã«ãCOBOLã·ã¹ãã ã¯ãéè¡å£åº§çªå·ãã¯ã¬ãžããã«ãŒãæ å ±ãããŒã³ããŒã¿ãååŒãã°ãªã©ã®éèæ å ±ãæ±ãããšããããããŸããå»çãä¿éºãªã©ã®æ¥çã§ã¯ã蚺æã³ãŒããç æŽãæ£è èå¥ãã£ãŒã«ããªã©ãCOBOLã§åŠçããããšããããŸãã
ãããã®æ©å¯èŠçŽ ã¯éåžžãããŒã¿éšéã§æ¬¡ã®ããã«å®çŸ©ãããŸãã PIC å¥ãäŸãã°ïŒ
01 CUST-INFO.
05 CUST-NAME PIC X(30).
05 CUST-SSN PIC X(9).
05 CUST-ACCT PIC 9(10).
ãããã®å€æ°ã¯ãå€ãã®å Žåã COPY è€æ°ã®ããã°ã©ã ã«ãŸãããã¹ããŒãã¡ã³ãã¯ãæ©å¯ããŒã¿ãã©ãã§ã©ã®ããã«ã¢ã¯ã»ã¹ããããã远跡ããããšãå°é£ã«ããŸãã CUST-SSN ç»é¢è¡šç€ºãã¬ããŒãããœãŒãããŒããããŠæ°åã®ã¢ãžã¥ãŒã«ã«ãŸããããããã¯ãŒã¯è»¢éãªã©ã§äœ¿çšãããå¯èœæ§ããããŸãããããã®æ§é ã¯å
±æãããŠãããå¿
ãããæç¢ºã«ææžåãããŠãããšã¯éããªããããéçºè
ã¯ã¬ã³ãŒãã®ç§»åã衚瀺ããŸãã¯ãã°èšé²ã®éã«ãæå³ããæ©å¯æ§ã®é«ããã£ãŒã«ããå
¬éããŠããŸãå¯èœæ§ããããŸãã匷åãªåä»ããã¡ã¿ããŒã¿ã¢ãããŒã·ã§ã³ããªããã°ãããŒã¿ã®æ©å¯æ§ãçè§£ããè² æ
ã¯éçºè
ãšã¬ãã¥ãŒæ
åœè
ã«å®å
šã«è² ãããã人çãšã©ãŒã®ãªã¹ã¯ãé«ãŸããŸãã
COBOL ããã°ã©ã ã®ããŒã¿ãããŒãšã»ãã¥ãªãã£ãžã®åœ±é¿
COBOLããã°ã©ã ã«ãããããŒã¿ã®æµãã¯ãã»ãã¥ãªãã£äžã®è匱æ§ãç¹å®ããäžã§ç¹æã®èª²é¡ãçã¿åºããŸãããªããžã§ã¯ãã®ã«ãã»ã«åãšã¢ãžã¥ãŒã«ã¢ãŒããã¯ãã£ããµããŒãããçŸä»£ã®ããã°ã©ãã³ã°èšèªãšã¯ç°ãªããCOBOLã§ã¯ãæ·±ããã¹ããããå€§èŠæš¡ã§ã¢ããªã·ãã¯ãªæç¶ãã䜿çšãããããšãå€ãã§ãã PERFORM æãè€éãªå¶åŸ¡ãããŒãããŒã¿ã¯ãäŸãã°ä»¥äžã®ãããªã°ããŒãã«ã¹ãã¬ãŒãžé åãéããŠæé»çã«æž¡ãããã WORKING-STORAGEããããŠãã°ãã°æ¬¡ã®ããã«åå®çŸ©ãããã REDEFINESãã®ããããã®æ§é ã¯åçã§ããã远跡ãå°é£ã§ãã
次ã®ãã¿ãŒã³ãèããŠã¿ãŸãããã
01 WS-DATA-AREA.
05 CUST-RECORD.
10 CUST-NAME PIC X(30).
10 CUST-SSN PIC X(9).
05 LOG-BUFFER REDEFINES CUST-RECORD PIC X(39).
ãã®äŸã§ã¯ã顧客ããŒã¿ãä¿æããåãã¡ã¢ãªé åããã°èšé²ã«åå©çšãããŠããŸãã LOG-BUFFER ãã°ãã¡ã€ã«ã«æžã蟌ãŸãããšãæå³ãã CUST-SSNããã°ã©ã ããžãã¯ãã¡ã¿ããŒã¿ã®ã¿ãèšé²ããããšãæå³ããŠãããšããŠãããã®ãããªãµã€ã¬ã³ãããŒã¿äŒæã¯èªååæãªãã§ã¯æ€åºãå°é£ã§ããããã«ãCOBOLã§ã¯äžé倿°ãå€çšããããšãã§ããäŸãã°ããã°ã«ãŒãé
ç®ããå¥ã®ã°ã«ãŒãé
ç®ãžã®ããŒã¿ã®ç§»åãªã©ãããŒã¿ã®ç³»çµ±ãããã«äžæçã«ããå¯èœæ§ããããŸãã
ãããã®ããŒã¿ãããŒã¯ãæäœæ¥ã«ããã¬ãã¥ãŒãšã»ãã¥ãªãã£ç£æ»ã®äž¡æ¹ãè€éåãããŸããæ©å¯æ å ±ã¯ãã·ã¹ãã ããåºãŠããåã«ãè€æ°ã®å€æã¬ã€ã€ãŒãäžé倿°ããããŠåºåã¹ããããééããå¯èœæ§ããããŸããããŒã¿ã®æµããå®å šã«ææ¡ã§ããªããã°ãäœããã¹ã¯ãæå·åããããã¯ä¿è·ãã¹ããã«é¢ããããªã·ãŒãé©çšããããšã¯éåžžã«å°é£ã«ãªããŸããã ãããããã¬ã¬ã·ãŒã¢ããªã±ãŒã·ã§ã³ã®ã»ãã¥ãªãã£ã確ä¿ããã«ã¯ãCOBOLåºæã®éçè§£æãäžå¯æ¬ ãªã®ã§ãã
COBOLã»ãã¥ãªãã£ã«ãããéçè§£æã®åœ¹å²
COBOLã·ã¹ãã ãå€ããªããè€éåããã«ã€ããŠãæ°åè¡ã«åã¶ã³ãŒãå šäœã«ãããã»ãã¥ãªãã£ãªã¹ã¯ãæåã§ç¹å®ããããšã¯ããŸããŸãéçŸå®çã«ãªã£ãŠããŠããŸããéçè§£æã¯ãåé¡ãæ¬çªç°å¢ã«å°éããåã«ç¹å®ããããã®ãæ§é åãããèªååãããã¢ãããŒããæäŸããŸããã³ãŒããå®è¡ããã«è§£æããããšã§ãéçè§£æã¯ããŒã¿æŒæŽ©ã®è匱æ§ãçºèŠããã»ãã¥ãªãã£ããªã·ãŒãé©çšããå€§èŠæš¡ãªåæ£COBOLç°å¢å šäœã«ãããã³ã³ãã©ã€ã¢ã³ã¹ãžã®åãçµã¿ãæ¯æŽããŸããã¬ã¬ã·ãŒãã¿ãŒã³ãæé»çãªããŒã¿ãããŒãææžåãããŠããªãããžãã¯ãäžè¬çã§ããCOBOLã®ã³ã³ããã¹ãã§ã¯ãéçè§£æã¯åœ¹ç«ã€ã ãã§ãªããäžå¯æ¬ ã§ãããã®ã»ã¯ã·ã§ã³ã§ã¯ãéçè§£æãCOBOLã»ãã¥ãªãã£ã«ç¹ã«é©ããŠããçç±ãšããã®å¹æãé«ããããã«å æããªããã°ãªããªãç¹æã®èª²é¡ã«ã€ããŠèª¬æããŸãã
åçè§£æãããåªããå©ç¹
åçè§£æã¯ãã¢ããªã±ãŒã·ã§ã³ãå®è¡ããå®è¡äžã®æåãç£èŠããããšã«äŸåããŸãããã®ææ³ã¯ç¹å®ã®å®è¡æåé¡ãçºèŠã§ããäžæ¹ã§ãCOBOLç°å¢ã§ã¯å€§ããªå¶çŽããããŸããå€ãã®COBOLã·ã¹ãã ã¯ãããé§ååã§ãã£ãããè€éãªãžã§ãå¶åŸ¡ãšããŒã¿äŸåé¢ä¿ãæã€ã¡ã€ã³ãã¬ãŒã ç°å¢åãã«èšèšãããŠããŸããçŸå®çãªãã¹ãæ¡ä»¶ã®èšå®ã«ã¯éåžžã«æéãããããã»ãã¥ãªãã£åé¡ã®äžã«ã¯ãåçŸãå°é£ãªç¹å®ã®ããŒã¿æ¡ä»¶äžã§ã®ã¿çºçãããã®ããããŸãã
äžæ¹ãéçè§£æã¯ã³ãŒãèªäœãå®è¡ããã«æ€æ»ããŸããããã«ããããã¹ãã·ããªãªã§ããªã¬ãŒããããã®ã ãã§ãªããããããå®è¡ãã¹ã«ãããè匱æ§ãæ€åºã§ããŸããäŸãã°ãéçè§£æããŒã«ã¯æ¬¡ã®ãããªå€æ°ãååšãããã¹ãŠã®ã€ã³ã¹ã¿ã³ã¹ãã¹ãã£ã³ã§ããŸãã CUST-SSN ãããã®æäœãå¶åŸ¡ããã©ã³ã¿ã€ã ããžãã¯ã«é¢ä¿ãªãã衚瀺ããã¡ã€ã«ãžã®æžã蟌ã¿ããŸãã¯éä¿¡ãããŸãã
ã³ãŒãã¬ãã«ã®å¯èŠæ§ã«ãããéçè§£æã¯ããã¹ã¯ãããŠããªããã£ãŒã«ãåºåãæå·åãããŠããªãããŒã¿ç§»åãæ©å¯å€æ°ã®åå©çšãšãã£ãäœç³»çãªãªã¹ã¯ãç¹å®ããäžã§ç¹ã«æçšã§ãããŸããã³ãŒãããŒã¹å šäœã«ãããäžè²«ããã«ãŒã«é©çšãå¯èœã«ãªããŸããããã¯ãåçææ³ã§ã¯ä¿èšŒã§ããªããã®ã§ãããªãªãŒã¹ãµã€ã¯ã«ãé·ããç£æ»èŠä»¶ãå³ããCOBOLã·ã¹ãã ã§ã¯ãéçè§£æã«ãã£ãŠåé¡ãæ©æã«çºèŠããå®å šãªã¢ããã€ãŒãŒã·ã§ã³ãæ¯æŽããŸãã
COBOLã®éçè§£æã«ç¹æã®èª²é¡
COBOLãžã®éçè§£æã®é©çšã¯ããã®å©ç¹ã«ãããããããæ±ºããŠå®¹æã§ã¯ãããŸãããCOBOLã«ã¯ãå€§å¹ ãªã«ã¹ã¿ãã€ãºãè¡ããªãéããåŸæ¥ã®ã³ãŒãè§£æããŒã«ã®å¹æãäœäžãããããã€ãã®ç¹æ§ããããŸãã倧ããªèª²é¡ã®äžã€ã¯èšèªæ§é ã§ããCOBOLã§ã¯ãããŒã¿ãšããžãã¯ãå¥ã ã«åå²ããã倿°ã¯é«åºŠã«ãã¹ããããéå±€æ§é ã§å®çŸ©ãããŸãããã®ãããããŒã¿é¢ä¿ã¯ã³ãŒãã®è€æ°ã®ã¬ã€ã€ãŒã«ãŸããããäŸåé¢ä¿ã®è¿œè·¡ãè€éã«ãªããŸãã
ããäžã€ã®é£ããã¯ãã³ããŒããã¯ã®å€çšãš COPY æã¯ãç°ãªãããã°ã©ã ã«å
±æããŒã¿æ§é ãæ¿å
¥ããŸãããããã®åå©çšèŠçŽ ã¯ãæ©å¯æ§ã®é«ããã£ãŒã«ãããå¿
èŠã®ãªãå Žæãä¿è·ãããŠããªãå Žæã«æã¡èŸŒãå¯èœæ§ããããŸããéçè§£æããŒã«ã¯ããããã®æ¿å
¥ãæ£ãã解決ãã远跡ã§ããå¿
èŠããããŸãã
ããã«ãCOBOLã§ã¯ã REDEFINES ããŒã¯ãŒããæ©å¯æ
å ±ãå«ããã£ãŒã«ãã¯ããã°èšé²ãäžæä¿åã«äœ¿çšãããå¥ã®å€æ°ãšéè€ããŠããå¯èœæ§ããããŸãããã®ãããªã¡ã¢ãªã®éè€ãèªèããªããšãåæããŒã«ã¯éæ¥çãªããŒã¿æŒæŽ©ãèŠéããŠããŸãå¯èœæ§ããããŸãã
æåŸã«ãCOBOLããã°ã©ã ã¯ã次ã®ãããªæç¶ãåæ§é ã«ããäŸåããŠããŸãã PERFORM THRU, GOTOããããŠå€éšãã¡ã€ã«ã®çžäºäœçšã¯å¶åŸ¡ãããŒè§£æãè€éã«ããŸããããŒã¿ããã€ã©ã®ããã«ç§»åã衚瀺ããŸãã¯æžã蟌ãŸããããçè§£ããã«ã¯ãæç¢ºãªåŒã³åºãéå±€ã«åŸããªãå¯èœæ§ã®ããè€éãªå®è¡ãã¹ãè§£æããå¿
èŠããããŸãã
COBOLã广çã«éçã«è§£æããã«ã¯ãèšèªç¹æ§ãèæ ®ããå¿ èŠããããŸããCOBOLç¹æã®æ§æãã»ãã³ãã£ã¯ã¹ããããŠåŸæ¥ã®èšèšãã¿ãŒã³ãçè§£ããå¿ èŠããããŸããæ±çšããŒã«ã§ã¯ããã®ç¹ã«ãããŠååãªå¯Ÿå¿ãã§ããªãããšããããããŸããCOBOLã®ããŒã¿æ§é ãšåäœãèæ ®ããŠèšèšãããå°çšãœãªã¥ãŒã·ã§ã³ããããææçŸ©ãªè§£æã宿œããããŒã¿ã®æŒæŽ©ã確å®ã«é²æ¢ããããã«äžå¯æ¬ ã§ãã
ããŒã¿æŒæŽ©ãé²ãããã®äž»èŠãªéçè§£æã«ãŒã«
éçè§£æã¯ãæç¢ºã«å®çŸ©ããããçãçµã£ãã«ãŒã«ã«åºã¥ããŠè¡ãããããšã§ãæã广çã«ãªããŸãããããã®ã«ãŒã«ã¯ãã¢ãã©ã€ã¶ãŒãã©ã®ãããªãã¿ãŒã³ãæ¢ããã»ãã¥ãªãã£ã®èгç¹ããã©ã®ããã«è©äŸ¡ããããæç€ºããŸããCOBOLã§ã¯ãåŸæ¥ã®ãã©ã¯ãã£ã¹ãæé»çãŸãã¯ææžåãããŠããªãåäœã«ã€ãªããããšãå€ããããéçè§£æã«ãŒã«ã¯ãæŒæŽ©ã«ã€ãªããå¯èœæ§ã®ããçŸå®äžçã®ããŒã¿ç§»åãšäœ¿çšãã¿ãŒã³ã«çŠç¹ãåœãŠãå¿ èŠããããŸãããã®ã»ã¯ã·ã§ã³ã§ã¯ãçµç¹ãCOBOLã¢ããªã±ãŒã·ã§ã³ã«ãããããŒã¿æŒæŽ©ãæ€åºãã鲿¢ããã®ã«åœ¹ç«ã€ããã€ãã®éèŠãªã«ãŒã«ã«ã€ããŠèª¬æããŸããåã«ãŒã«ã¯ãäžè¬çãªè匱æ§ã誀çšã·ããªãªã«å¯Ÿå¿ããŠãããèªåã¬ãã¥ãŒããã»ã¹ã®äžéšãšããŠå®è£ ã§ããŸãã
ã«ãŒã«1: ãã¹ã¯ãããŠããªãããŒã¿ã®ç§»åãæ€åºãã
COBOLã·ã¹ãã ã«ãããŠæãäžè¬çãã€å±éºãªãã¹ã®äžã€ã¯ãæ©å¯æ å ±ããã¹ãã³ã°ããã«è¡šç€ºããããšã§ãã瀟äŒä¿éçªå·ãå£åº§æ®é«ãå人åãšãã£ããã£ãŒã«ãããç»é¢ãã¬ããŒãããã°ãã¡ã€ã«ã«ç·šéãããã«åºåãããããšããããããŸããéçè§£æã«ã¯ãæ©å¯ããŒã¿ãã£ãŒã«ããåºå倿°ãç»é¢ãããã¡ã«ç§»åãããããšãæ€åºããã«ãŒã«ãå«ããå¿ èŠããããŸãã
äŸãã°ãã«ãŒã«ã¯æ¬¡ã®ãããªãã£ãŒã«ãã CUST-SSN ç»é¢èšé²ãŸãã¯åºåãããã¡ã«çŽæ¥ç§»åãããŸãã
MOVE CUST-SSN TO DISP-SSN
If DISP-SSN ç»é¢è¡šç€ºãå°å·ã«é¢é£ããå Žåãããã¯æœåšçãªããŒã¿æŒæŽ©ãæå³ããŸããåªããéçè§£æã«ãŒã«ã¯ããã®ãã¿ãŒã³ããã©ã°ä»ãããã ãã§ãªããå®å
倿°ã®äœ¿çšç¶æ³ã远跡ããããšã§ã³ã³ããã¹ããèªèããŸããå€§èŠæš¡ãªã·ã¹ãã ã§ã¯ãæ©å¯æ§ã®é«ããã£ãŒã«ãã¯è¡šç€ºãããåã«äžé倿°ãééããå¯èœæ§ããããããã«ãŒã«ã¯ããŒã¿ãããŒãã§ãŒã³å
šäœã远跡ããå¿
èŠããããŸãã
ãã®ãããªçºçãèå¥ããŠå ±åããããšã§ãããŒã ã¯ãã¹ãŠã®æ©å¯ããŒã¿ã衚瀺ãããåã«ãã¹ã¯ãŸãã¯å¿ååãããããšãä¿èšŒã§ããéçšåºåãŸãã¯ãããã°åºåã§å人æ å ±ãå ¬éããããªã¹ã¯ã軜æžã§ããŸãã
ã«ãŒã«2: å®å šã§ãªããã¡ã€ã«I/Oæäœã®èå¥
COBOLã¢ããªã±ãŒã·ã§ã³ã¯ãåºåãã¡ã€ã«ã«æ§é åã¬ã³ãŒããé »ç¹ã«æžã蟌ã¿ãŸãããããã®ã¬ã³ãŒãã«æ©å¯ãã£ãŒã«ããå«ãŸããŠããå Žåããã¡ã€ã«ãä¿è·ãããŠããªããã£ã¬ã¯ããªã«ä¿åãããããæå·åãããã«è»¢éãããããããšãããŒã¿ãæŒæŽ©ããå¯èœæ§ããããŸããéçè§£æã§ã¯ãæ©å¯ããŒã¿ãã£ãŒã«ãããæç€ºçã«å®å šãŸãã¯æå·åãããŠãããšããŒã¯ãããŠããªããã¡ã€ã«ã«æžã蟌ãŸããããšãæ€åºããå¿ èŠããããŸãã
ããšãã°ãã«ãŒã«ã§ã¯æ¬¡ã®ãããªãã¿ãŒã³ãæ¢ãããšã«ãªããŸãã
WRITE CUSTOMER-RECORD TO CUST-FILE
If CUSTOMER-RECORD 次ã®ãããªãã£ãŒã«ããå«ãŸããŸã CUST-SSN, CUST-ACCTãŸã㯠CUST-NAMEãããã³ãã¡ã€ã« CUST-FILE ãã¬ãŒã³ããã¹ããŸãã¯éæ©å¯ãã¡ã€ã«ãšããŠèå¥ãããå Žåããã®æäœã¯ãã©ã°ä»ããããå¿
èŠããããŸããæ©å¯ãã£ãŒã«ãã¯åç
§ã«ãã£ãŠå«ãŸããããšãå€ããããã«ãŒã«ã§ã¯ã³ããŒããã¯ãå
±æã¬ã³ãŒãæ§é ãèæ
®ããå¿
èŠããããŸãã
ããã«ããã®ã«ãŒã«ãæ¡åŒµããŠãå®å šã§ãªããã¡ã€ã«åŠçæé ãæå®ãããžã§ãå¶åŸ¡èšèªïŒJCLïŒããã¡ã€ã«å²ãåœãŠããžãã¯ã®æç¡ããã§ãã¯ããããšãã§ããŸãããã¡ã€ã«ãFTPã§è»¢éãããããå¹³æã§ä¿åããããããå Žåããªã¹ã¯ã¯ããã«æ·±å»ã«ãªããŸãã
ãã®ã«ãŒã«ã¯ãæ©å¯ãã£ãŒã«ãã«é¢é£ãããã¡ã€ã« I/O æäœã匷調衚瀺ããããšã§ãéçºè ãšã»ãã¥ãªã㣠ããŒã ãããŒã¿ ã¹ãã¬ãŒãžã®æ £è¡ãç£æ»ãããããåŠçãã¢ãŒã«ã€ãããŸãã¯ã·ã¹ãã çµ±åäžã®æå³ããªãæŒæŽ©ãé²ãã®ã«åœ¹ç«ã¡ãŸãã
ã«ãŒã«3: æå·åãããŠããªãããŒã¿è»¢éã«ãã©ã°ãä»ãã
å€ãã®COBOLã·ã¹ãã ã¯ãããããã¡ã€ã«è»¢éããããã¯ãŒã¯ãžã§ãããŸãã¯ããã«ãŠã§ã¢ãšã®çµ±åãéããŠå€éšã·ã¹ãã ãšããŒã¿ã亀æããããã«èšèšãããŠããŸãããããã®ããŒã¿ã«æ©å¯ãã£ãŒã«ããå«ãŸããŠããã転éãæå·åãããŠããªãå Žåã転éäžã«ç°¡åã«ååãŸãã¯æŒæŽ©ãããå¯èœæ§ããããŸããéçè§£æã¯ãæ©å¯ãã£ãŒã«ãããå€éšã€ã³ã¿ãŒãã§ãŒã¹ãžã®ããŒã¿ç§»åã远跡ããããšã§ããããã®ãªã¹ã¯ãç¹å®ããã®ã«åœ¹ç«ã¡ãŸãã
ããšãã°ãããã°ã©ã ã顧客ã¬ã³ãŒãããã¡ã€ã«è»¢éçšãããã¡ã«ç§»åãããšã次ã®ããã«ãªããŸãã
MOVE CUST-RECORD TO TRANSFER-BUFFER
WRITE TRANSFER-BUFFER TO OUT-FILE
ãã®æäœã¯ã次ã®å Žåã«ã«ãŒã«ãããªã¬ãŒããŸãã CUST-RECORD ä¿è·ãããããŒã¿ãå«ãŸããŠããã OUT-FILE å€éšäœ¿çšã®ããã«æå®ãããŠããŸãããã®ã«ãŒã«ã§ã¯ãããŒã¿ã®ç§»åãŸãã¯æžã蟌ã¿åã«æå·åãŸãã¯ä¿è·ã«ãŒãã³ãé©çšãããŠãããã©ããã確èªããå¿
èŠããããŸãã
远å ã®ãã©ã°ã«ã¯ãå®å
šã§ãªã転éã瀺åãããã¡ã€ã«åïŒ .CSV, .TXTããŸãã¯æªåé¡ã®å®å
ãã©ã«ãïŒã«å ãããã¡ã€ã«ãå€éšåä¿¡è
åãã§ããããšã瀺ãã³ã¡ã³ããèå¥åãæ€åºãããŸãããã®ã«ãŒã«ã¯ãèšå®ãã¡ã€ã«ãJCLãã¡ã€ã«ã®ã¡ã¿ããŒã¿ãšçµã¿åãããããšã§ãå¹
åºããªã¹ã¯ã®ãã転éãã¿ãŒã³ãèå¥ã§ããŸãã
éçºãµã€ã¯ã«ã®æ©ã段éã§æå·åãããŠããªãããŒã¿ã®ç§»åãã¹ãã£ã³ããããšã«ãããããŒã 㯠SFTPãHTTPSãæå·åã©ãããŒãªã©ã®å®å šãªè»¢éãããã³ã«ãå®è£ ããŠæ©å¯ããŒã¿ãä¿è·ã§ããŸãã
ã«ãŒã«4ïŒæ©å¯ãã£ãŒã«ãã®äœ¿çšç¶æ³ã®ç£èŠ
ããäžã€ã®éèŠãªéçè§£æã«ãŒã«ã¯ãã¢ããªã±ãŒã·ã§ã³å
šäœã«ããã£ãŠç¹å®ã®æ©å¯ãã£ãŒã«ãã®äœ¿çšç¶æ³ã远跡ããããšã§ããäŸãã°ã SSN, TAX-ID, ACCT-NOãŸã㯠CARD-NUMBER é«ãªã¹ã¯ãšããŠæ±ãã峿 Œãªã¢ã¯ã»ã¹ããã³äœ¿çšå¶åŸ¡ã®å¯Ÿè±¡ãšããå¿
èŠããããŸããéçè§£æããŒã«ã¯ããããã®ãã£ãŒã«ããããŒã¯ãããã®äœ¿çšãç§»åããŸãã¯å€æã®ãã¹ãŠã®ã€ã³ã¹ã¿ã³ã¹ã远跡ããã«ãŒã«ãå®è£
ã§ããŸãã
ããšãã°ããã®ã«ãŒã«ã§ã¯æ¬¡ã®ãããªæäœã«ãã©ã°ãä»ããããŸãã
MOVE CUST-TAX-ID TO TEMP-VAR
DISPLAY TEMP-VAR
æ©å¯ãã£ãŒã«ããçŽæ¥å ¬éãããŠããªãå Žåã§ããäžé倿°ã®äœ¿çšã«ãã£ãŠããŒã¿ãããŒãäžæçã«ãªãå¯èœæ§ããããŸããããã¯ãéçºè ããã¬ãŒã¹åºåã«äžæå€æ°ã䜿çšããå¯èœæ§ã®ãããããã°ããã°èšé²ã®ã·ããªãªã§ã¯ç¹ã«å±éºã§ããã«ãŒã«ã§ã¯ããããã®ãã£ãŒã«ãããµãããã°ã©ã ã«æž¡ãããããé©åãªå¶åŸ¡ãªãã«ãã¡ã€ã«ããŒããœãŒãããã£ã«ã¿ãªã³ã°æäœã«äœ¿çšããããããŠããªãããæ€åºããå¿ èŠããããŸãã
æ©å¯ãã£ãŒã«ãã®å æ¬çãªéçåæã«ãŒã«ã¯ãããŒã¿ãããã°ã©ã ã«åºå ¥ããããã¹ãŠã®ãã€ã³ãã瀺ã䜿çšç¶æ³ããããäœæããã»ãã¥ãªã㣠ããŒã ãå¿ èŠã«å¿ããŠãã¹ãã³ã°ãæå·åããŸãã¯ããªã·ãŒã®é©çšãè¡ãããŠããããšãæ€èšŒã§ããããã«ããŸãã
ãã®çš®ã®å¯èŠæ§ã¯ãã³ã³ãã©ã€ã¢ã³ã¹èŠä»¶ãæºãããæ©å¯ããŒã¿ã瀟å ããã³èŠå¶åºæºã«åŸã£ãŠåŠçãããŠããããšã蚌æããããã«éèŠã§ãã
ã«ãŒã«5: æ©å¯ããŒã¿ã®ãã°èšé²ã®é²æ¢
COBOLã·ã¹ãã ã§ã¯ããããã°ãç£æ»ã容æã«ããããã«ãã°èšé²ãå®è£ ãããããšããããããŸãããããããã°èšé²ã«ãŒãã³ã¯æå³ããªãæ å ±ãååŸããããããããã°ãã¡ã€ã«ã«æ©å¯æ§ã®é«ããã£ãŒã«ããå«ãŸããŠãããšãããšãæå³ãããšããæš©éã®ãªãæ åœè ãå€éšã·ã¹ãã ã«æŒæŽ©ããŠããŸãå¯èœæ§ããããŸãã
ãã®åé¡ã察象ãšããéçè§£æã«ãŒã«ã¯ããã°èšé²ã«é¢é£ãã倿°ãŸãã¯ãã¡ã€ã«ã«æ©å¯ããŒã¿ãã£ãŒã«ããæžã蟌ãŸããããšãæ€åºããå¿ èŠããããŸããäŸïŒ
MOVE CUST-ACCT TO LOG-RECORD
WRITE LOG-RECORD TO LOG-FILE
If LOG-FILE ä¿è·ãæ¶æ¯ããããŠããªãããã㊠CUST-ACCT æ©å¯æ§ã®é«ããã£ãŒã«ãã§ããããããã®æäœã«ã¯ãã©ã°ãèšå®ããå¿
èŠããããŸããã«ãŒã«ã¯ãäžè¬çãªãã°æ§é ããã¡ã€ã«åã®åœåèŠåïŒäŸïŒ *.LOG, *.TRACE, *.DBGïŒãããã³ãã¬ãŒã¹ãŸãã¯ãããã°åºåã«é¢é£ä»ãããã倿°åã
å€ãã®ã·ã¹ãã ã§ã¯ããã°èšé²ã¯ãŠãŒãã£ãªãã£ããã°ã©ã ãåå©çšå¯èœãªã¢ãžã¥ãŒã«ãéããŠå®è£ ãããŠããŸããå ç¢ãªéçè§£æã«ãŒã«ã¯ããããã®ãŠãŒãã£ãªãã£ã«æž¡ãããããŒã¿ã远跡ããæ©å¯æ å ±ãé©åãªãã¹ãã³ã°ãåãæšãŠãªãã«ãã°èšé²ãããŠããªããã©ãããè©äŸ¡ããŸãã
ãã®ã«ãŒã«ã¯ãæ©å¯ããŒã¿ã®ãã°èšé²ãæ€åºããããšã§ãçµç¹ãå¶çºçãªäŸµå®³ãåé¿ããå®å šãªç£æ»ãã©ã¯ãã£ã¹ããµããŒãããŸãããŸããéææ§ãšãã©ã€ãã·ãŒã®ãã©ã³ã¹ãåããªãããæ§é åãããµãã¿ã€ãºããããã°èšé²æ¹æ³ã®æ¡çšãä¿é²ããŸãã
é©çš SMART TS XL COBOLããŒã¿ã»ãã¥ãªãã£
COBOLã·ã¹ãã ã«ãããããŒã¿æŒæŽ©ãé²ãã«ã¯ãéçè§£æã«ãŒã«ãå®çŸ©ããã ãã§ã¯äžååã§ããã«ãŒã«ã¯æ£ç¢ºã«å®è£ ãããäžè²«ããŠé©çšãããCOBOLç¬èªã®æ§æãšæ§é ãçè§£ããç°å¢ã«çµ±åãããªããã°ãªããŸããã SMART TS XL COBOLããã®ä»ã®ã¡ã€ã³ãã¬ãŒã èšèªåãã«ç¹å¥ã«èšèšãããéçè§£æãã©ãããã©ãŒã ã§ããå¹ åºãèšèªãµããŒãã匷åãªã«ã¹ã¿ãã€ãºãªãã·ã§ã³ããããŠãšã³ãããŒãšã³ãã®ãã¬ãŒãµããªãã£ãæäŸããå€§èŠæš¡ãªã¬ã¬ã·ãŒã·ã¹ãã ã«ãããããŒã¿æŒæŽ©ãªã¹ã¯ã®æ€åºãåæããããŠä¿®åŸ©ãæ¯æŽããŸãããã®ã»ã¯ã·ã§ã³ã§ã¯ããã®ä»çµã¿ã説æããŸãã SMART TS XL äž»èŠãªã»ãã¥ãªãã£äžã®èª²é¡ã«å¯ŸåŠããã«ãŒã«ããŒã¹ã®åæã宿œããCOBOL ã³ãŒãã®ã»ãã¥ãªãã£ä¿è·ã«çŸå®çãªäŸ¡å€ãæäŸããŸãã
ã®æŠèŠ SMART TS XL æ©èœ
SMART TS XL ã¯ããšã³ã¿ãŒãã©ã€ãºã»ã¡ã€ã³ãã¬ãŒã ã»ã¢ããªã±ãŒã·ã§ã³ã®è€éæ§ãšèŠæš¡ã«å¯Ÿå¿ããããã«æ§ç¯ããããCOBOL察å¿ã®éçè§£æãã©ãããã©ãŒã ã§ããæ±çšè§£æããŒã«ãšã¯ç°ãªããCOBOLæ§æãããŒã¿æ§é ãã³ããŒããã¯ãå¶åŸ¡ãããŒæ§é ããã€ãã£ãã«ãµããŒãããŠããŸããããã°ã©ã å šäœã®è§£æãå€éšã€ã³ã¯ã«ãŒãã®è§£æ±ºãã¢ãžã¥ãŒã«ãããã°ã©ã ãããŒã¿å®çŸ©éã®é¢ä¿è§£æãå¯èœã§ãã
ãã®ãã©ãããã©ãŒã ã®åŒ·ã¿ã®äžã€ã¯ãã¢ããªã±ãŒã·ã§ã³éã§ããŒã¿ã®ç³»çµ±ã远跡ã§ããããšã§ããããã¯ã SMART TS XL ææãªãã£ãŒã«ãã®æµãã远跡ããããšãã§ããŸã CUST-SSN ã³ããŒããã¯å
ã®å®çŸ©ããããžãã¹ããžãã¯ãåºåã«ãŒãã³ããã¡ã€ã«æžã蟌ã¿ããããã¯ãŒã¯ãããã¡ãŸã§ãCOBOLåºæã®æ§æèŠçŽ ãçè§£ããŸãã REDEFINES, PERFORM THRU, MOVE CORRESPONDINGãããã¯ãåŸæ¥ã®ããŒã«ã§ã¯èŠéããããã誀解ããããããããšããããããŸãã
SMART TS XL ã«ã¹ã¿ã ã«ãŒã«ã»ããã®äœæããµããŒãããŠããŸãããããã®ã«ãŒã«ã¯çµç¹ã®ããŒã¿ä¿è·ããªã·ãŒã«åãããŠã«ã¹ã¿ãã€ãºã§ããå人æ å ±ïŒPIIïŒã®ãã¹ã¯ãããŠããªã衚瀺ãä¿è·ãããŠããªããã¡ã€ã«ã®æžã蟌ã¿ããã°ã«æ©å¯ãã£ãŒã«ãã衚瀺ããããªã©ã®éåãèªåçã«ãã©ã°ä»ãã§ããŸããã¬ããŒãæ©èœãšç£æ»æ©èœãçµã¿èŸŒãŸããŠãããããã³ãŒãã»ãã¥ãªãã£ã®ç¶æ ãå®å šã«å¯èŠåããæ¹åçã®åªå é äœä»ãã«åœ¹ç«ã¡ãŸãã
COBOLããŒã¿ãããŒã®éçè§£æã«ãã¬ããž
ããŒã¿ã®æŒæŽ©ãé²ãããã®éèŠãªèŠä»¶ã® 1 ã€ã¯ãCOBOL ã¢ããªã±ãŒã·ã§ã³å ã§ããŒã¿ãã©ã®ããã«ç§»åããããå®å šã«çè§£ããããšã§ãã SMART TS XL çŽæ¥çããã³éæ¥çãªå€æ°å²ãåœãŠãèæ ®ããæ£ç¢ºãªããŒã¿ãããŒã¢ãã«ãæ§ç¯ããããšã§ããã®åéã§åªããæ§èœãçºæ®ããŸããããã°ã©ã å¢çãè¶ããããŒã¿ãã£ãŒã«ããå«ããç¹å®ã®ããŒã¿ãã£ãŒã«ãã«é¢é£ä»ãããããã¹ãŠã®ãœãŒã¹ã倿ãã·ã³ã¯ããããã³ã°ããŸãã
äŸãã°ã顧客ã®çŽçšè çªå·ãã°ããŒãã«æ§é ã§å®çŸ©ããã衚瀺ãŸãã¯ãã¡ã€ã«ã«æžã蟌ãŸããåã«è€æ°ã®äžé倿°ãééããå Žåã SMART TS XL å®å šãªãã¹ã远跡ã§ããŸããããããã®åããèå¥ããã³ã³ããã¹ããè©äŸ¡ããããŒã¿åŠçã«ãŒã«ã«éåããæäœããã€ã©ã€ã衚瀺ããŸãã
ããã°ã©ã éã®é¢ä¿ãåæãããã®ããŒã«ã®æ©èœã¯ãããŒã¿ããªã³ã±ãŒãž ã»ã¯ã·ã§ã³ãä»ããŠããã°ã©ã éãç§»åããããå ±éã®äœæ¥é åã§æž¡ããããããå¯èœæ§ãããå€§èŠæš¡ã·ã¹ãã ã§ç¹ã«åœ¹ç«ã¡ãŸãã SMART TS XL ãããã®çžäºäœçšãçžé¢ãããç£æ»äººãéçºè ã確èªã§ããèŠèŠçãŸãã¯ããã¹ãã«ãããã¬ãŒã¹ãäœæããŸãã
ãã®å æ¬çãªã«ãã¬ããžã«ãããæ·±ãåãããããããã¯éæ¥çãªããŒã¿æŒæŽ©ãªã¹ã¯ãããæããã«ããããšãã§ããŸãããŸããæ©å¯æ§ã®é«ããã£ãŒã«ãã®å€æŽãæ°ããã»ãã¥ãªãã£èŠä»¶ã«ãã£ãŠã¢ããªã±ãŒã·ã§ã³ã®ã©ã®éšåã圱é¿ãåãããã瀺ãããšã§ã圱é¿åæããµããŒãããŸãã
ã«ãŒã«ã®å®çŸ©ãšã«ã¹ã¿ãã€ãº SMART TS XL
çµç¹ããšã«ã»ãã¥ãªãã£èŠä»¶ãããã SMART TS XL æè»ãªã«ãŒã«ã«ã¹ã¿ãã€ãºã«ãããããããå€åæ§ã«å¯Ÿå¿ã§ããããæ§ç¯ãããŠããŸãããŠãŒã¶ãŒã¯ããã£ãŒã«ãåãããŒã¿åã䜿çšã³ã³ããã¹ããããã«ã¯èŠå¶åé¡ãããžãã¹ã¯ãªãã£ã«ã«ãªã¿ã°ãšãã£ãå€éšã¡ã¿ããŒã¿ã«åºã¥ããŠã«ãŒã«ãå®çŸ©ã§ããŸãã
äŸãã°ãçµç¹ã¯ãæ¥å°ŸèŸã -SSN or -TAX-ID 決ããŠçŸããŠã¯ãªããªã DISPLAY or WRITE æç€ºçã«ãã¹ã¯ãããªãéããã¹ããŒãã¡ã³ãã¯é©çšãããŸããããã®ã«ãŒã«ã¯ã SMART TS XLéåã®éå€§åºŠãšæšå¥šããã修埩æé ã説æããé¢é£ã¡ã¿ããŒã¿ã衚瀺ãããŸãã
ãã®ãã©ãããã©ãŒã ã§ã¯ããã°ä¿è·ããã¡ã€ã«I/Oå¶åŸ¡ãæå·åã®é©çšãšãã£ãã«ããŽãªããšã«ã«ãŒã«ãã°ã«ãŒãåããããšãå¯èœã§ãããã®ã¢ãžã¥ãŒã«åã«ãããããŒã ããããžã§ã¯ãéã§ã«ãŒã«ã»ããã®ç®¡çã容æã«ãªããŸãããŸããç¬èªã®ã³ããŒããã¯åœåèŠåãã¬ã¬ã·ãŒã³ãŒãã£ã³ã°ã¹ã¿ã€ã«ãªã©ãã¢ããªã±ãŒã·ã§ã³ã®ç¹å®ã®æ§é ã«åãããŠã«ãŒã«ã調æŽããããšãå¯èœã§ãã
ã«ãŒã«ãå®çŸ©ããããšã SMART TS XL ã³ãŒãããŒã¹å šäœã«èªåçã«é©çšãã詳现ãªéåã¬ããŒããçæããã»ãã¥ãªãã£ããã·ã¥ããŒãã«æ€åºçµæãçµ±åã§ããŸããããã«ãããäžè²«æ§ãšã³ã³ãã©ã€ã¢ã³ã¹ãåäžããã ãã§ãªããæåã«ããã³ãŒãã¬ãã¥ãŒã«ãããæéãšåŽåãåæžãããŸãã
ã®äŸ SMART TS XL ããŒã¿æŒæŽ©åé¡ã®ææ¡
SMART TS XL åŸæ¥ã®ã¬ãã¥ãŒã§ã¯çºèŠã§ããªãã£ããçŸå®äžçã®ã»ãã¥ãªãã£ã®ã£ãããç¹å®ããããã«ãçµç¹ã§æŽ»çšãããŠããŸããããäºäŸã§ã¯ã倧æéèæ©é¢ããæ©å¯æ§ã®é«ããã£ãŒã«ãã®ãã¹ã¯ãããŠããªã衚瀺ãã¹ãã£ã³ããããã«ãã®ããŒã«ã䜿çšããŸããã SMART TS XL å éšå ±åæžã«ç€ŸäŒä¿éçªå·ãç·šéãããã«å°å·ãããäºäŸãæ°å件確èªãããçµç¹ãã³ã³ãã©ã€ã¢ã³ã¹ãªã¹ã¯ã«ãããããŠããããšã倿ããŸããã
å¥ã®äŸã§ã¯ãæ¿åºæ©é¢ã SMART TS XL 絊ä»éèšé²ã®å®å šã§ãªãFTP転éãæ€åºããããŒã«ãéçºããŸããããã®ããŒã«ã¯ãCOBOLããã°ã©ã ãããããã¹ã¯ãªããããã©ãããã¡ã€ã«ãžã®æ©å¯ããŒã¿ãã£ãŒã«ãã®ç§»åã远跡ããæå·åãªãã§è»¢éãããããšãæ€åºããŸããããã®ç¥èŠã«ãããåœå±ã¯ããŒã¿åŠçã¯ãŒã¯ãããŒãåæ§æããSFTPãšãã¹ãã³ã°ããªã·ãŒãå°å ¥ããããšãã§ããŸããã
SMART TS XL ãŸããåå®çŸ©ããããã£ãŒã«ãã®äžæ£äœ¿çšãæ€åºããã®ã«ã圹ç«ã¡ãŸããããã¬ã¬ã·ãŒçµŠäžèšç®ã·ã¹ãã ã§ã¯ããã®ããŒã«ã«ãã£ãŠãæ©å¯ããŒã¿ãäžæžãããããã®åŸãã°ã«æžã蟌ãŸããŠããããšãçºèŠãããŸããã REDEFINES å
±æã¡ã¢ãªé åã«ãããã³ã°ãããæããããã®åé¡ã¯ãæããã«ãªã³ã¯ãããŠããªã倿°ã«é¢ä¿ããŠãããããé·å¹Žæ°ã¥ãããã«ããŸããã
ãã®ãããªäŸã¯ã SMART TS XL ã«ãŒã«ã®æœè¡ã ãã§ãªããæ·±å»ãªã»ãã¥ãªãã£ãšã³ã³ãã©ã€ã¢ã³ã¹ã®è åšãããããé ããé²åºãã¿ãŒã³ãçºèŠããããšã§ãå®éã®éçšäžã®äŸ¡å€ãæäŸããŸãã
ã®ã¡ãªãã SMART TS XL ã¬ã¬ã·ãŒã»ãã¥ãªãã£ã®æœè¡
COBOL ã·ã¹ãã ã®ä¿å®ãšã»ãã¥ãªãã£ä¿è·ã¯ããã®å€ããèŠæš¡ãããã¥ã¡ã³ãã®äžè¶³ã«ãããæ¬è³ªçã«å°é£ã§ãã SMART TS XL ãããã®èª²é¡ã«å¯ŸåŠãããããã¬ã¬ã·ãŒç°å¢åãã«ç¹å¥ã«èšèšããããã©ãããã©ãŒã ãæäŸããŠããŸããCOBOLãã€ãã£ãã®æ©èœãã«ãŒã«ã®æè»æ§ããããŠããŒã¿ãããŒã®å®å šãªå¯èŠæ§ã«ãããå€§èŠæš¡ãªã»ãã¥ãªãã£ããªã·ãŒã®é©çšã«æé©ã§ãã
倧ããªå©ç¹ã®äžã€ã¯ãåã ã®ããã°ã©ã ãšã·ã¹ãã å šäœã®äž¡æ¹ãåæã§ããããšã§ããåäžã®éèã¢ãžã¥ãŒã«ãæ±ãå Žåã§ããçžäºæ¥ç¶ãããã¢ããªã±ãŒã·ã§ã³ã¹ã€ãŒããæ±ãå Žåã§ãã SMART TS XL äžè²«ããåæãšã«ãã¬ããžãæäŸããŸãããã®ã·ã¹ãã å šäœã®ãã¥ãŒã¯é·æçãªã¢ããã€ãŒãŒã·ã§ã³ã®åãçµã¿ããµããŒãããããŒã ã¯å®éã®ãªã¹ã¯ã«åºã¥ããŠä¿®åŸ©ã®åªå é äœã決å®ã§ããŸãã
ãã 1 ã€ã®å©ç¹ã¯ãéçºã¯ãŒã¯ãããŒãšã®çµ±åã§ãã SMART TS XL ãããåŠçãããŒãžã§ã³è¿œè·¡ããããŠCI/CDãã€ãã©ã€ã³ãç£æ»ããŒã«ã倿Žç®¡çã·ã¹ãã ã«ãã£ãŒãã§ãããšã¯ã¹ããŒãå¯èœãªã¬ããŒãããµããŒãããŠããŸããããã«ãããã»ãã¥ãªãã£ã¯åŸãã远å ãããã®ã§ã¯ãªããéçºããã³ä¿å®ã©ã€ããµã€ã¯ã«å šäœã«çµã¿èŸŒãŸããŸãã
ã³ã³ãã©ã€ã¢ã³ã¹çŸ©åã®ããçµç¹ã®å Žåã SMART TS XL ã»ãã¥ã¢ã³ãŒãã£ã³ã°ã®å®è·µã«é¢ããæç¢ºã§ç£æ»å¯èœãªèšŒæ ãæäŸããŸããã¬ããŒãã¯ã瀟å åºæºãå€éšèŠå¶ãžã®æºæ ã蚌æããããã«äœ¿çšã§ãã眰éãéåã®ãªã¹ã¯ã軜æžããŸãã
æ·±ãèšèªçè§£ãšã«ã¹ã¿ãã€ãºå¯èœãªã«ãŒã«ããã³ã¹ã±ãŒã©ãã«ãªæœè¡ãçµã¿åãããããšã§ã SMART TS XL COBOL ã¢ããªã±ãŒã·ã§ã³ãä¿è·ããé·æã«ãããããŒã¿æŒæŽ©ãªã¹ã¯ã軜æžãã匷åãªãœãªã¥ãŒã·ã§ã³ãæäŸããŸãã
ã±ãŒã¹ã¹ã¿ãã£ãšäºäŸ
å®éã®äŸã§ã¯ãéçè§£æã«ãŒã«ãããŒã«ãã©ã®ããã« SMART TS XL æäœæ¥ã«ããæ€æ»ã§ã¯æããã«ãªããªãå¯èœæ§ã®ããããŒã¿æŒæŽ©ã®åé¡ãçºèŠã§ããŸããã¬ã¬ã·ãŒCOBOLã·ã¹ãã ã«ã¯ãæ°åè¡ãã®ã³ãŒãã«åã蟌ãŸããããžãã¹ã¯ãªãã£ã«ã«ãªããžãã¯ãå«ãŸããŠããããšãå€ããã»ãã¥ãªãã£äžã®æ¬ é¥ã¯ã³ã³ãã©ã€ã¢ã³ã¹éåãã€ã³ã·ãã³ãå ±åã«ã€ãªãããŸã§æ€åºãããªããŸãŸã«ãªãããšããããããŸãããã®ã»ã¯ã·ã§ã³ã§ã¯ãéçè§£æã«ãã£ãŠå®éã®ããŒã¿æŒæŽ©ãã©ã®ããã«æ€åºããã¿ãŒã²ãããçµã£ãã«ãŒã«ãé©çšããããšã§å°æ¥çã«åæ§ã®æŒæŽ©ãé²ãããšãã§ãããã瀺ãå ·äœçãªã±ãŒã¹ã¹ã¿ãã£ã玹ä»ããŸãã
å®éã®COBOLããŒã¿æŒæŽ©ã®äŸ
ããå šåœèŠæš¡ã®ä¿éºäŒç€Ÿãã»ãã¥ãªãã£ç£æ»ãåããçµæãææ¬¡å ±åæžãã¡ã€ã«ã«ãã¹ã¯ãããŠããªãå人ããŒã¿ãå«ãŸããŠããããšã倿ããŸããããããã®å ±åæžã¯COBOLããããžã§ãã§çæãããè«æ±åæã®ããã«ãµãŒãããŒãã£ã®ããã»ããµãšå ±æãããŠããŸãããç£æ»ã®çµæãæ°åã瀟äŒä¿éçªå·ãçå¹Žææ¥ãå¹³æã§å«ãŸããŠãããæå·åãã¢ã¯ã»ã¹å¶åŸ¡ãªãã«å ±æãã¡ã€ã«ãµãŒããŒã«ä¿åãããŠããããšã倿ããŸããã
調æ»ã®çµæããã®è匱æ§ã¯ã顧客ã¬ã³ãŒãããšã¯ã¹ããŒããã¡ã€ã«ã«ãã©ãŒãããããäžè¬çãªã«ãŒãã³ã«èµ·å ããŠããããšã倿ããŸããããã®ã«ãŒãã³ã¯ãæ©å¯ãã£ãŒã«ããå«ãã³ããŒããã¯ã䜿çšããå®å
šãªã¬ã³ãŒããã¬ããŒããããã¡ã«ç§»åãããããçŽæ¥ãã¡ã€ã«ã«æžã蟌ãã§ããŸããã .TXT ãã¡ã€ã«ã§ãããã®ããã»ã¹ã¯è€æ°ã®ãžã§ãã§åå©çšãããŠãããããæ°åã®ãããããã»ã¹ã«è匱æ§ãååšããŠããŸããã
æ¥æ SMART TS XL åŸã«ãã®ã³ãŒãããŒã¹ã«é©çšããã CUST-SSN ã®äžèãš CUST-DOB ã¬ããŒããããã¡ãšåºåãã¡ã€ã«ã«æž¡ããããã£ãŒã«ããè§£æããŸãããããŒã¿ãã¹å
šäœããã¬ãŒã¹ããæäœã«ãã©ã°ãä»ããç¹å®ã®ãšã¯ã¹ããŒãããã»ã¹ã«ãªã³ã¯ããŸããããã®ããŒã«ã«ãããçµç¹ã¯åé¡ãè¿
éã«åãåãããšã¯ã¹ããŒãããããã¹ãŠã®å人æ
å ±ïŒPIIïŒã«ãã¹ãã³ã°ãé©çšãããã¹ãŠã®å€éšè»¢éã§æå·åã確å®ã«å®æœããããšãã§ããŸããã
ãã®äŸã§ã¯ãé·æé䜿çšãããŠããã³ãŒãã§ã¯ãããŒã¿ã®é²åºãåé¡ã«ãªããŸã§æ°ä»ãããªãå¯èœæ§ãããããšããŸãéçåæã«ãã£ãŠãããã®ãªã¹ã¯ãäºåã«æ€åºããŠä¿®æ£ããæ¹æ³ã瀺ãããŠããŸãã
åæ§ã®ã·ããªãªãé²ãããã«éçã«ãŒã«ãé©çšãã
ããŒã¿æŒæŽ©åŸãä¿éºäŒç€Ÿã¯å
éšã«éçåæã«ãŒã«ãå®è£
ããŸããã SMART TS XL åæ§ã®åé¡ã®åçºãé²ããããã«ãŒã«ãäœæããŸãããããã«ãŒã«ã§ã¯ãç¹å®ã®æ©å¯ãã¿ãŒã³ã«äžèŽãããã£ãŒã«ãïŒäŸãã° -SSN, -DOBãŸã㯠-TAX-IDã¯ããã¹ãã³ã° ã«ãŒãã³ãééããªãéãããã¡ã€ã«åºåãŸãã¯ã¬ããŒãçæã«é¢é£ä»ãããã倿°ã«åºçŸããŠã¯ãªããŸããã
ãã®ã«ãŒã«ã¯ããã£ãŒã«ãã¬ãã«ã®ã¿ã°ä»ããšã³ã³ããã¹ããã§ãã¯ã«ãã£ãŠå®è£
ãããŸãããæ©å¯æ§ã®é«ããã£ãŒã«ããåºåãããã¡ã«ç§»åããããã WRITE ã¹ããŒãã¡ã³ãããã¹ã¯ãŸãã¯é£èªåãããŠãããã©ãããããŒã«ãæ€èšŒããæ¿èªãããããžãã¯ã䜿çšããŠãã¹ã¯ãŸãã¯é£èªåãããŠãããã©ãããæ€èšŒããŸãããã®ãããªå€æãæ€åºãããªãã£ãå Žåãæäœã¯ã¬ãã¥ãŒå¯Ÿè±¡ãšããŠãã©ã°ä»ããããŸãã
ããã«ãçµç¹ã¯ãã¹ãŠã®åºåãã¡ã€ã«å®çŸ©ãæ€æ»ããå®å šãªãã¡ã€ã«åŠçã確èªããã«ãŒã«ãäœæããŸãããå€éšè»¢éçšã®åºåãã¡ã€ã«ã¯ãå®çŸ©ãããæå·åã¢ãžã¥ãŒã«ã䜿çšããŠæžã蟌ãå¿ èŠããããŸããããããã®ã¢ãžã¥ãŒã«ããã€ãã¹ããçŽæ¥ãã¡ã€ã«æžã蟌ã¿ã¯ãã¹ãŠãããªã·ãŒéåãšããŠãã©ã°ä»ããããŸããã
æ°é±éã®ãã¡ã«ããããã®ã«ãŒã«ã«ãã£ãŠãæåã®ç£æ»ã§ã¯æ€åºãããªãã£ãè€æ°ã®ããŒã¿ãããŒãæããã«ãªããŸããããã®äžã«ã¯ã顧客åãå£åº§çªå·ã誀ã£ãŠèšé²ãããŠãããããã°ãã°ãå«ãŸããŠããŸããããã®åŸããããã®ã«ãŒã«ã¯çµç¹ã®ããŒã¹ã©ã€ã³å質ãã§ãã¯ã«è¿œå ãããä»åŸã®ãã¹ãŠã®COBOLãããžã§ã¯ãã§äœ¿çšãããŸããã
ãã®ã¢ãããŒãã¯ãæç¢ºã«å®çŸ©ããã匷å¶å¯èœãªã«ãŒã«ã«è£ä»ããããéçåæããé²åãã COBOL ã·ã¹ãã å šäœã§ã»ãã¥ãªãã£äœå¶ãæ¹åããã³ã³ãã©ã€ã¢ã³ã¹ãç¶æããããã®æç¶å¯èœãªæ¹æ³ãæäŸããæ¹æ³ã瀺ããŠããŸãã
ã¬ã¬ã·ãŒ COBOL ã³ãŒãããŒã¹ã®ãã¹ããã©ã¯ãã£ã¹
ã¬ã¬ã·ãŒCOBOLã¢ããªã±ãŒã·ã§ã³ã¯ãæ°å幎ã«ããã£ãŠèç©ãããããžãã¯ãæè¡çè² åµããããŠããžãã¹ã«ãŒã«ãåæ ãããã®ã§ããããšãå€ãããããã®ã·ã¹ãã ã®å€ãã¯æ©èœçã«ã¯ä¿¡é Œã§ãããã®ã®ã仿¥ã®ããŒã¿ãã©ã€ãã·ãŒãã»ãã¥ãªãã£ãã³ã³ãã©ã€ã¢ã³ã¹ã«å¯ŸããæåŸ ã«å¿ããããã«ã¯èšèšãããŠããªããéçè§£æã以äžã®ãããªããŒã«ãé©çšãããšã SMART TS XL ã¯äžå¯æ¬ ã§ãããCOBOLã·ã¹ãã ãé·æçã«çã«å®å šã«ä¿è·ããã«ã¯ãããŒã ã¯å®çšçã§æç¶å¯èœãªã³ãŒãã£ã³ã°ãšã¡ã³ããã³ã¹ã®ãã©ã¯ãã£ã¹ãæ¡çšããå¿ èŠããããŸãããã®ã»ã¯ã·ã§ã³ã§ã¯ããšã¯ã¹ããŒãžã£ãŒãªã¹ã¯ã®è»œæžãå¯èŠæ§ã®åäžããããŠã¬ã¬ã·ãŒCOBOLã¢ããªã±ãŒã·ã§ã³ã®å®å šãªéçºãšã¢ããã€ãŒãŒã·ã§ã³ãæ¯æŽããããã®éèŠãªãã¹ããã©ã¯ãã£ã¹ãæŠèª¬ããŸãã
ã³ãŒãã®ãªãã¡ã¯ã¿ãªã³ã°ãšã¢ãžã¥ãŒã«å
å€ãã®COBOLããã°ã©ã ã¯ãããžãã¯ãšããŒã¿å®çŸ©ã坿¥ã«çµåãããã巚倧ãªã¢ããªã·ãã¯ãªæç¶ããšããŠèšè¿°ãããŠããŸããæéã®çµéãšãšãã«ããã®æ§é ã¯ä¿å®ãšç£æ»ãå°é£ã«ãªããŸããããã°ã©ã ãããå°ããªã¢ãžã¥ãŒã«åäœã«ãªãã¡ã¯ã¿ãªã³ã°ããããšã§ãæ©å¯æ§ã®é«ãæäœãåé¢ããããæ£ç¢ºãªéçåæãå¯èœã«ãªããŸããäŸãã°ããã¡ã€ã«I/Oã«ãŒãã³ã衚瀺ããžãã¯ãæå·å颿°ãå¥ã ã®ãµãããã°ã©ã ã«ç§»åããããšã§ãçµç¹ã¯æ©å¯ããŒã¿ã®åãæ±ãå Žæã𿹿³ãããå³å¯ã«ç®¡çã§ããŸãã
éçè§£æããŒã«ã§ã¢ãžã¥ãŒã«ã³ãŒããã¹ãã£ã³ãããšãã«ãŒã«éåãããç°¡åã«ç¹å®ããå®çšçãªçµæãçæã§ããŸãããŸããã¢ãžã¥ãŒã«åãããããã°ã©ã ã¯ãã¿ãŒã²ãããçµã£ããã¹ããå¯èœã«ãããã¹ãã³ã°é¢æ°ããã°ãã£ã«ã¿ãŒãšãã£ãã»ãã¥ã¢ãªåŠçããžãã¯ã®åå©çšã容æã«ããŸãã
å®éã«ã¯ãããŒã ã¯ã¬ããŒãçæãããŒã¿è»¢éãšãã£ãå埩çãªãã¿ãŒã³ããæç¢ºã«å®çŸ©ãããå ¥åºåãæã€ã¹ã¿ã³ãã¢ãã³ã®æé ã«æœåºããããšã«éç¹ã眮ãã¹ãã§ããããããã°ããããã®æé ã¯ãåŒã³åºãå ã®ããã°ã©ã ããšã«éè€ããŠç£æ»ããã®ã§ã¯ãªããäžåºŠã§ã¬ãã¥ãŒããã¹ãã匷åããããšãã§ããŸãããªãã¡ã¯ã¿ãªã³ã°ã¯ãæçµçãªã¢ããã€ãŒãŒã·ã§ã³ãæ°ãããã©ãããã©ãŒã ãšã®çµ±åãžã®éãæããŸãã
æ©å¯ããŒã¿ã®åãæ±ãã«é¢ããææžå
ã¬ã¬ã·ãŒCOBOLã·ã¹ãã ã®å€§ããªèª²é¡ã®äžã€ã¯ãæ©å¯æ§ã®é«ããã£ãŒã«ãã«é¢ããä¿¡é Œã§ããããã¥ã¡ã³ããäžè¶³ããŠããããšã§ããéçºè ã¯ãä¿è·å¯Ÿè±¡ãšãªãããŒã¿ããã®äœ¿ç𿹿³ããããŠãã®åãæ±ãã«é©çšãããã«ãŒã«ã«ã€ããŠæç¢ºãªã¬ã€ãã©ã€ã³ããªããŸãŸãã·ã¹ãã ãåŒãç¶ãããšããããããŸãããã®çµæãæ©å¯ããŒã¿ãã¡ã³ããã³ã¹ãæ©èœå€æŽã®éã«ãæå³ããåå©çšãããããå ¬éãããããäžé©åã«æ±ããããããå¯èœæ§ããããŸãã
æ©å¯ãã£ãŒã«ãã®æ§é åãããã€ã³ãã³ããªã確ç«ããç¶æããããšã¯ãã»ãã¥ãªãã£ãåäžãããããã®éèŠãªã¹ãããã§ãããã®ããã¥ã¡ã³ãã«ã¯ããã£ãŒã«ãåãå®çŸ©ãã³ãŒãããŒã¹å
ã®å Žæãããã³åãã£ãŒã«ãã«é¢é£ä»ããããã»ãã¥ãªãã£ããªã·ãŒãå«ããå¿
èŠããããŸããäŸãã°ã次ã®ãããªãã£ãŒã«ã㯠EMPLOYEE-SSN, ACCT-NUMãŸã㯠CLAIM-ID 衚瀺åã«ãã¹ãã³ã°ããå¿
èŠãããããšã転éäžã«æå·åããå¿
èŠãããããšããã°ããé€å€ããå¿
èŠãããããšã瀺ãã¡ã¿ããŒã¿ã§ã¿ã°ä»ãããå¿
èŠããããŸãã
SMART TS XL åœåèŠåãã«ãŒã«ãã¿ãŒã³ã«åºã¥ããŠæ©å¯ãã£ãŒã«ããèªåçã«èå¥ããããšã§ããã®åãçµã¿ããµããŒãã§ããŸãããããã®ãã£ãŒã«ããã«ã¿ãã°åããããšãããŒã ã¯ã·ã¹ãã ããã¥ã¡ã³ããçµ±åãã§ãã¯ãªã¹ããã³ã³ãã©ã€ã¢ã³ã¹ç£æ»ã®äžéšãšããŠãããã管çã§ããŸãã
ããŒã¿åãæ±ãããªã·ãŒãææžåããããšã§ããªã³ããŒãã£ã³ã°ãã³ãŒãã¬ãã¥ãŒã倿Žç®¡çããã»ã¹ããµããŒããããŸããããã«ãããéçºè ã¯ä¿è·ãããããŒã¿ãæ±ãéã®è²¬ä»»ãæç¢ºã«çè§£ã§ããããã«ãªããã³ãŒãå€æŽæã«æ°ããªãªã¹ã¯èŠå ãçãããªã¹ã¯ã軜æžã§ããŸãã
éçè§£æãšæåã¬ãã¥ãŒãçµã¿åããã
éçè§£æã¯éåãæ€åºãã匷åãã€èªååãããææ®µãæäŸããŸããã人ã«ããç£èŠãå®å šã«ä»£æ¿ãããã®ã§ã¯ãããŸãããæåã«ããã³ãŒãã¬ãã¥ãŒã¯ãããžãã¯ã®èåŸã«ããæå³ã®è§£éããšããžã±ãŒã¹ã®ã¬ãã¥ãŒãããžãã¹ã³ã³ããã¹ããå¿ èŠãšããæææ±ºå®ã®æ€èšŒã«ãããŠäŸç¶ãšããŠéèŠãªåœ¹å²ãæãããŸããæã广çãªã»ãã¥ãªãã£ããã°ã©ã ã¯ãèªåæ€åºãšå¯Ÿè±¡ãçµã£ãæåæ€æ»ãçµã¿åãããŠããŸãã
COBOLç°å¢ã§ã¯ãè€éãªããžãã¹ã«ãŒã«ããéçåæã§ã¯å®å šã«çè§£ã§ããªãå¯èœæ§ã®ããç°åžžãªããŒã¿åŠçã·ããªãªãæ±ãå Žåãæåã¬ãã¥ãŒãç¹ã«éèŠã§ããäŸãã°ãããããã°ã©ã ãå éšã³ãŒãã䜿çšããŠããã¹ã¯ãã¹ãæ©å¯ã¬ã³ãŒãã«ãã©ã°ãä»ããŠããå Žåããã¹ã¯ãé©çšããããžãã¯ãäºæž¬å¯èœãªãã¿ãŒã³ã«åŸã£ãŠããªãå¯èœæ§ããããŸãã
éçè§£æã¯ãåºåæããã¡ã€ã«ãžã®æžã蟌ã¿ãæ©å¯æ§ã®é«ããã£ãŒã«ããå«ããã°åºåã«ãŒãã³ãªã©ããªã¹ã¯ã®é«ãé åããã€ã©ã€ãããããšã§ãã¬ãã¥ãŒæ åœè ã®äœæ¥å¹çãé«ããŸããããã«ãããã¬ãã¥ãŒæ åœè ã¯ã³ã³ããã¹ããæ€èšŒããé©åãªå€æãä¿è·ãé©çšãããŠããããšã確èªã§ããŸãã
ããŒã ã¯ãéçè§£æã第äžå±€ã®é²åŸ¡ãšããŠæŽ»çšãããã©ã°ä»ããããåé¡ãæåæ€æ»ã§ããªã¢ãŒãžã»æ€èšŒãããã€ããªãããªã¬ãã¥ãŒããã»ã¹ã確ç«ããå¿ èŠããããŸãããã®çµ±åã¢ãããŒãã«ãããç¶²çŸ æ§ãæ£ç¢ºæ§ããããŠæœåšçãªãšã¯ã¹ããŒãžã£ãŒãªã¹ã¯ã®ããæ·±ãçè§£ã確ä¿ãããŸãã
ã¬ã¬ã·ãŒã³ãŒãã«ææ°ã®ã»ãã¥ãªãã£ãå°å ¥
COBOLã¯å€ãã®ãšã³ã¿ãŒãã©ã€ãºã·ã¹ãã ã®äžæ žãæ ããæ©å¯ããŒã¿ãèŠå¶å¯Ÿè±¡ããŒã¿ãæ¥ã åãæ±ãæ¥åãæ¯ããŠããŸãããããã®ã¢ããªã±ãŒã·ã§ã³ã¯ä¿¡é Œæ§ãé«ããããžãã¹ã¯ãŒã¯ãããŒã«æ·±ãçµã¿èŸŒãŸããŠããã«ãããããããçŸä»£ã®ãœãããŠã§ã¢ã«æåŸ ãããã»ãã¥ãªãã£æ©èœãçµã¿èŸŒãŸããŠããªãã±ãŒã¹ãå°ãªããããŸãããããŒã¿ä¿è·æ³ã®é²åãšè åšã®å¢å€§ã«äŒŽãããããã®ã¬ã¬ã·ãŒã·ã¹ãã ã®ã»ãã¥ãªãã£ç¢ºä¿ã¯éèŠãªè²¬åãšãªã£ãŠããŸãã
éçè§£æã¯ãCOBOLã¢ããªã±ãŒã·ã§ã³ã«ãããæœåšçãªããŒã¿æŒæŽ©ãç¹å®ããä¿®æ£ããããã®æç¢ºã§ã¹ã±ãŒã©ãã«ãªãœãªã¥ãŒã·ã§ã³ãæäŸããŸããéçè§£æããŒã«ã¯ããœãŒã¹ã³ãŒããå®è¡ããã«è§£æããããšã§ãè€éãªããžãã¯ãã¹ãå ±æããŒã¿æ§é ããããŠæä»£é ãã®ããã°ã©ãã³ã°ãã¿ãŒã³ã«æœãè匱æ§ãæ€åºã§ããŸããCOBOLåãã«ç¹å¥ã«èšèšãããã«ãŒã«ã䜿çšããããšã§ããã¹ã¯ãããŠããªãåºåãå®å šã§ãªããã¡ã€ã«è»¢éãæ©å¯æ å ±ã®äžé©åãªãã°èšé²ãšãã£ãåé¡ãçºèŠããããšãå¯èœã«ãªããŸãã
SMART TS XL COBOLç°å¢åãã«æ§ç¯ããããã©ãããã©ãŒã ãæäŸããããšã§ããããã®æ©èœã«çŠç¹ãçµã£ãŠããŸããããŒã¿ãããŒã®è©³çŽ°ãªæ€æ»ãããã°ã©ã ã®å®å šãªãã¬ãŒã¹ããããŠç€Ÿå ããªã·ãŒãæ¥çèŠå¶ã«æºæ ããã«ã¹ã¿ãã€ãºå¯èœãªã«ãŒã«ãå¯èœã«ããŸããã¹ãã£ã³ãèªååããå®çšçãªçµæãçæããæ©èœã«ããã SMART TS XL å®å šãªéçºããµããŒãããã³ã³ãã©ã€ã¢ã³ã¹ ã¬ããŒããç°¡çŽ åããŸãã
ã¬ã¬ã·ãŒã³ãŒãã«ææ°ã®ã»ãã¥ãªãã£ãå°å ¥ãããšããããšã¯ããã¹ãŠã眮ãæãããšããæå³ã§ã¯ãããŸãããæ¢åã®ã»ãã¥ãªãã£ãçè§£ããé©åãªããŒã«ãé©çšããããžãã¹ã«ãããŠäŸç¶ãšããŠéèŠãªåœ¹å²ãæãããŠããã·ã¹ãã ã匷åããããšãæå³ããŸããäžè²«ããåæãå®çšçãªã«ãŒã«ããããŠé©åãªãã©ã¯ãã£ã¹ãå°å ¥ããããšã§ãçµç¹ã¯ãªã¹ã¯ã軜æžããæ©å¯ããŒã¿ãä¿è·ããCOBOLã¢ããªã±ãŒã·ã§ã³ã®ã»ãã¥ãªãã£å¯¿åœãå»¶ã°ãããšãã§ããŸãã