COBOL์ ์ฌ๋ฌ ์ํฐํ๋ผ์ด์ฆ ์์คํ ์์ ํต์ฌ ํ๋ก์ธ์ค๋ฅผ ์ง์์ ์ผ๋ก ์ง์ํฉ๋๋ค. ์ต์ํ๊ณ ์ค๋ ์๊ฐ ๋์ ๊ฒ์ฆ๋ ๊ตฌ์กฐ์ด์ง๋ง, ์์คํ ์ด ๋ณํํ๋ ๋ฐ์ดํฐ ๋ชจ๋ธ, ํตํฉ ๊ณ์ธต ๋ฐ ๊ฐ๋ฐ ์ํฌํ๋ก์ ์ผ๋ง๋ ๋นจ๋ฆฌ ์ ์ํ๋์ง์ ์ ํ์ ์ค ์ ์์ต๋๋ค. ํ๋ํ ๋ ธ๋ ฅ์ด ์งํ๋จ์ ๋ฐ๋ผ, ํ์ฌ ํํ์ RPG๋ ํนํ IBM i ํ๊ฒฝ์์ ์์ฐ์ค๋ฝ๊ณ ํธํ ๊ฐ๋ฅํ ๋ฐ์ ๋ฐฉํฅ์ ์ ์ํฉ๋๋ค.
์์ ํ์ RPG๋ ๋ชจ๋์ ๋ก์ง, ๋์ฑ ๋ช ํํ ๊ตฌ๋ฌธ, ๊ทธ๋ฆฌ๊ณ ๋ฐ์ดํฐ๋ฒ ์ด์ค ๊ธฐ๋ฐ ๋์์ธ๊ณผ์ ํฅ์๋ ํธํ์ฑ์ ์ ๊ณตํฉ๋๋ค. ์ด๋ฅผ ํตํด ํ๋ก๊ทธ๋จ์ ๊ฐ๋ ์ฑ์ ๋์ด๊ณ , ๊ด์ฌ์ฌ๋ฅผ ๋์ฑ ๋ช ํํ๊ฒ ๋ถ๋ฆฌํ๋ฉฐ, ์ต์ ์ ํ๋ฆฌ์ผ์ด์ ํ์ค์ ๋ถํฉํ๋ ์๋น์ค ์งํฅ ํจํด๊ณผ์ ํตํฉ์ ๊ฐ๋ฅํ๊ฒ ํฉ๋๋ค.
COBOL ๋ง์ด๊ทธ๋ ์ด์ ๊ฐ์ํ
SMART TS XL ๊ธฐ์กด ์์คํ ์ ๋งคํํ์ฌ ์์ ๊ฐ๊ณผ ์ ํ์ฑ์ ๊ฐ์ง๊ณ ํ๋ํํ ์ ์์ต๋๋ค.
์ง๊ธ ํ์RPG ๊ด์ ์์ COBOL ์ํฌํ๋ก์ฐ๋ฅผ ์ฌ๊ตฌ์ฑํ๋ ๊ฒ์ ๋จ์ํ ์ฝ๋ ๊ตฌ์กฐ๋ฅผ ๋ณต์ ํ๋ ๊ฒ์ด ์๋๋๋ค. ๋ฐ์ดํฐ ํ๋ฆ, ์ ์ด ๊ฒฝ๋ก ์ ์, ๊ทธ๋ฆฌ๊ณ ์ฌ์ฌ์ฉ ๊ฐ๋ฅํ ๊ตฌ์ฑ ์์์ ๊ธฐ๋ฅ์ด ์ด๋ป๊ฒ ๋ถ์ฐ๋๋์ง๋ฅผ ์ฌํ๊ฐํ๋ ๊ฒ์ ๋๋ค. ๋ชฉํ๋ ๋ก์ง์ ์ ํํ๊ฒ ๋ณํํ๋ ๊ฒ๋ฟ๋ง ์๋๋ผ, ์ฅ๊ธฐ์ ์ผ๋ก ์ดํดํ๊ณ , ํ์ฅํ๊ณ , ์ง์ํ๊ธฐ ์ฌ์ด ์์คํ ์ ๋ง๋๋ ๊ฒ์ ๋๋ค.
COBOL๊ณผ ํ๋ RPG์ ์ฐจ์ด์ ์ดํด
์ฌ๋ฌ ์ธ์ด๋ก ์ฝ๋๋ฅผ ๋ง์ด๊ทธ๋ ์ด์ ํ๋ ๊ฒ์ ๋จ์ํ ๊ธฐ์ ์ ์ธ ๊ณผ์ ์ด ์๋๋๋ค. ์์คํ ์ ๋ชจ๋ธ๋งํ๊ณ , ์ ์ง ๊ด๋ฆฌํ๊ณ , ์ดํดํ๋ ๋ฐฉ์์ ๋ณํ์ ๋๋ค. ์ ํ ๊ณผ์ ์์ ์ ๋ณด์ ๊ธฐ๋ฐํ ์์ฌ ๊ฒฐ์ ์ ๋ด๋ฆฌ๊ธฐ ์ํด ํ์ COBOL๊ณผ ํ๋ RPG์ ๊ตฌ์กฐ, ๋์, ๊ทธ๋ฆฌ๊ณ ์ฒ ํ์ ์ฐจ์ด์ ์ ํ์ ํ๋ ๊ฒ์ด ์ค์ํฉ๋๋ค.
๋ณํํ๋ ๋์์ธ ์ฒ ํ
COBOL์ ๋น์ฆ๋์ค ๋ก์ง์ด ์ผ๋ จ์ ๋ฌธ๋จ๊ณผ ์น์ ์ ๋ฐ๋ผ ์ ํ์ ์ผ๋ก ํ๋ฅด๋ ์ ์ฐจ์ ํํฅ์ ์ค๊ณ๋ฅผ ์ฅ๋ คํฉ๋๋ค. ์ ์ด ํ๋ฆ์ ๋ช ์์ ์ด๊ณ ๋ช ๋ น ์ค์ฌ์ ์ด๋ฉฐ, ํ๋ก๊ทธ๋จ ๋จ๊ณ์ ์กฐ๊ฑด ๋ถ๊ธฐ์ ๋ก์ง์ด ๋ด์ฅ๋์ด ์๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค.
ํ๋ RPG, ํนํ ์์ ํ์ RPG๋ ๋ชจ๋์ ์ฌ๊ณ ๋ฐฉ์์ ์ฅ๋ คํฉ๋๋ค. ๋น์ฆ๋์ค ๋ก์ง์ ํ๋ก์์ , ์๋น์ค ํ๋ก๊ทธ๋จ, ๊ทธ๋ฆฌ๊ณ ๊ธฐ๋ฅ์ ๋ถ๋ฆฌํ๋ ์ฌ์ฌ์ฉ ๊ฐ๋ฅํ ๋ชจ๋๋ก ๋๋ ์ ์์ต๋๋ค. ๊ฐ๋ฐ์๋ ๊ณ ์ ๋ ์น์ ์ ์ค์ฌ์ผ๋ก ์ฝ๋๋ฅผ ๊ตฌ์ฑํ๋ ๋์ , ๋์์ ๋ช ํํ ์ ๋ ฅ๊ณผ ์ถ๋ ฅ์ ๊ฐ์ง ํจ์๋ก ๊ทธ๋ฃนํํฉ๋๋ค.
์ด๋ฌํ ๋ณํ๋ ๊ด์ฌ์ฌ ๋ถ๋ฆฌ๋ฅผ ์ด์งํฉ๋๋ค. ๊ฒ์ฆ ๋ฃจํด, ํ์ผ ์์ ๋ฐ ๊ณ์ฐ์ ํ ๋ฒ ์์ฑํ๋ฉด ์ฌ๋ฌ ์ ํ๋ฆฌ์ผ์ด์ ์์ ์ฌ์ฌ์ฉํ ์ ์์ต๋๋ค. ์ค๊ณ๋ ํ ์คํธ, ์์ ๋ฐ ํ์ฅํ๊ธฐ๊ฐ ๋ ์ฌ์์ง๋๋ค. COBOL ๊ตฌ์กฐ๋ ์ข ์ข ํ๊ฒฝ์ ํ๊ณ์ ์ํด ๊ฒฐ์ ๋๋ ๋ฐ๋ฉด, RPG ์ ํ๋ฆฌ์ผ์ด์ ์ ๋น์ฆ๋์ค ํ๋ก์ธ์ค๋ฅผ ๋์ฑ ๋ช ํํ๊ฒ ๋ฐ์ํ๊ณ ๊ด๋ฒ์ํ ์ฌ์์ ์์ด ๋ณํํ๋ ์๊ตฌ ์ฌํญ์ ๋์ํ ์ ์์ต๋๋ค.
์ธ์ด ๋ฐ ๋ฐํ์ ์ํคํ ์ฒ
COBOL๊ณผ RPG๋ ๋์ผํ ํ๋ซํผ์ ๊ณต์ ํ์ง๋ง ์๋ก ๋ค๋ฅธ ๋ชจ๋ธ ๋ด์์ ์๋ํฉ๋๋ค. COBOL ํ๋ก๊ทธ๋จ์ ์ผ๋ฐ์ ์ผ๋ก ์ค์ผ์คํธ๋ ์ด์ ์ ์ํด ์์ ์ ์ด์ ์์กดํ๋ฉฐ, ์คํ์ JCL ๋๋ ์ค์ผ์ค๋ฌ ๊ธฐ๋ฐ ๋ฐฐ์น ๋ก์ง์ ์ํด ์๋ด๋ฉ๋๋ค. ๋ฉ๋ชจ๋ฆฌ๋ ํ๋ซ ๋ ์ฝ๋์ ์์ ์ ์ฅ์๋ฅผ ํตํด ๊ด๋ฆฌ๋๋ฉฐ, ๋ณ์๋ ์ผ๋ฐ์ ์ผ๋ก ํ๋ก๊ทธ๋จ ์ ์ฒด์์ ์ ์ญ์ผ๋ก ์ ์ฉ๋ฉ๋๋ค.
๋ฐ๋ฉด, ํ๋ RPG๋ ํตํฉ๋ ์ธ์ด ํ๊ฒฝ์ ์ด์ ์ ๋๋ฆฝ๋๋ค. ํ๋ก์์ ๋ ๋ก์ปฌ ๋ฒ์, ๋งค๊ฐ๋ณ์ ์ ๋ฌ, ๊ทธ๋ฆฌ๊ณ ์ฌ์ฌ์ฉ ๊ฐ๋ฅํ ์๋ธ๋ฃจํด์ ํ์ฉํฉ๋๋ค. ๋ฉ๋ชจ๋ฆฌ ๊ตฌ์กฐ๋ ์ค์ฒฉ, ํ์ดํ, ๊ทธ๋ฆฌ๊ณ ๋์ฑ ์ ๋ฐํ๊ฒ ์ ์ด๋ ์ ์์ต๋๋ค. ์์ ํ์ ๊ตฌ๋ฌธ์ ํ๋ RPG๋ฅผ ๊ฒฝ์ง๋๊ณ ์ฅํฉํ๊ฒ ๋ง๋ค์๋ ๋ง์ ํ์์ ์ ์ฝ์ ์ ๊ฑฐํฉ๋๋ค.
์ค๋ฅ ์ฒ๋ฆฌ๋ ๋ค๋ฆ
๋๋ค. COBOL์ ์ข
์ข
ํ์ผ ์ํ ์ฝ๋์ ์ฌ์ฉ์ ์ ์ ๋
ผ๋ฆฌ๋ฅผ ์ฌ์ฉํ์ฌ ์ค๋ฅ๋ฅผ ๊ฐ์งํ๋ ๋ฐ๋ฉด RPG๋ ๊ตฌ์กฐํ๋ MONITOR ๋ธ๋ก ๋ฐ ๋ด์ฅ ์์ธ๋ฅผ ์ง์ํฉ๋๋ค. ์ด๋ฌํ ๋ณํ ๋๋ถ์ ๊ฐ๋ฐ์๋ ๋ฉ์ธ๋ผ์ธ ๋ก์ง์ ๋ฐฉํดํ์ง ์๊ณ ๋ ๋ ์ฝ๊ธฐ ์ฌ์ด ์ค๋ฅ ์ฒ๋ฆฌ ๋ฃจํด์ ์์ฑํ ์ ์์ต๋๋ค.
ํ๋ซํผ ์งํ ๋ฐ ์์คํ ํตํฉ
COBOL ์ ํ๋ฆฌ์ผ์ด์ ์ ํ์ผ ์ ์ก, ๋ฐฐ์น ํ ๋๋ ๋ฏธ๋ค์จ์ด ๊ณ์ธต์ ํตํด ์ธ๋ถ ์์คํ ๊ณผ ์ํธ ์์ฉํ๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ํตํฉ์ ์์ฝ๋๊ฑฐ๋, ๋จ๋ฐฉํฅ์ผ๋ก ์ด๋ฃจ์ด์ง๊ฑฐ๋, ์ฌ์ฉ์ ์ง์ ์คํฌ๋ฆฝํธ๋ฅผ ํตํด ์ค์ฌ๋๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ์ด ์ํคํ ์ฒ๋ ๊ฒฉ๋ฆฌ๋ ์ํฌ๋ก๋์๋ ์ ํฉํ์ง๋ง ์ค์๊ฐ ์ํธ์์ฉ์ด๋ ์ต์ ๋ฐ์ดํฐ ์ํฌํ๋ก๋ฅผ ์ง์ํ๋ ๋ฐ๋ ์ด๋ ค์์ด ์์ต๋๋ค.
RPG๋ ๋ ํฐ ์ ์ฐ์ฑ์ ์ ๊ณตํฉ๋๋ค. HTTP ํจ์, SQL ํ๋ก์์ ๋ฐ ๋ค์ดํฐ๋ธ ๋ช ๋ น์ ํตํด DB2, REST API ๋ฐ ์ธ๋ถ ์๋น์ค์์ ์ง์ ํตํฉ์ ์ง์ํฉ๋๋ค. RPG ํ๋ก๊ทธ๋จ์ ๋ค๋ฅธ ์ธ์ด๋ฅผ ํธ์ถํ๊ฑฐ๋ ๋ค๋ฅธ ์ธ์ด๋ก ํธ์ถ๋ ์ ์์ผ๋ฏ๋ก ์ ์ฒด ํ๋ซํผ์ ๋์ฒดํ์ง ์๊ณ ๋ ํ์ด๋ธ๋ฆฌ๋ ์์คํ ๊ฐ๋ฐ์ด ๊ฐ๋ฅํฉ๋๋ค.
์ด๋ฌํ ์ด์ ๋ก RPG๋ ์ปดํฌ๋ํธ ์์ค์์ ์๋น์ค ๊ธฐ๋ฐ ์ํธ์์ฉ๊ณผ ์ ํ๋ฆฌ์ผ์ด์ ํ๋ํ๋ฅผ ๊ฐ๋ฅํ๊ฒ ํฉ๋๋ค. ํ์ ์ ์ฒด ์ํ๊ณ๋ฅผ ์ฌ๊ตฌ์ถํ์ง ์๊ณ ๋ ์ ํ๋ฆฌ์ผ์ด์ ์ ์ ์ง์ ์ผ๋ก ๋ฐ์ ์ํฌ ์ ์์ต๋๋ค. ๊ฒฐ๊ณผ์ ์ผ๋ก ๋ ๊ฑฐ์ ์์คํ ์์ ๋ฏผ์ฒฉํ๊ณ ์ ์ง ๊ด๋ฆฌ๊ฐ ๊ฐ๋ฅํ ์๋ฃจ์ ์ผ๋ก์ ์ ํ์ด ๋์ฑ ์ํํด์ง๋๋ค.
COBOL ๋ ผ๋ฆฌ๋ฅผ ๋ชจ๋์ RPG์ ๋งคํ
COBOL์์ ์ต์ RPG๋ก ๋ง์ด๊ทธ๋ ์ด์ ํ๋ ๊ฒ์ ๋จ์ํ ์ฝ๋๋ฅผ ๋ค์ ์์ฑํ๋ ๊ฒ ์ด์์ ์๋ฏธ๋ฅผ ์ง๋๋๋ค. ๋ก์ง์ ๊ตฌ์กฐ, ๊ณต์ ๋ฐ ์ ์ง ๊ด๋ฆฌ ๋ฐฉ์์ ์ฌ๊ณ ํด์ผ ํฉ๋๋ค. ๊ธฐ์กด COBOL ํ๋ก๊ทธ๋จ์ ๋น์ฆ๋์ค ๊ท์น, ํ์ผ ์ก์ธ์ค ๋ฐ ์ ์ด ํ๋ฆ์ ๊ฒฐํฉํ๋ ํฌ๊ณ ์ ํ์ ์ธ ๋ธ๋ก์ผ๋ก ๊ตฌ์ฑ๋๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. RPG๋ ์ฌ์ฌ์ฉ ๊ฐ๋ฅํ๊ณ ํ ์คํธ ๊ฐ๋ฅํ ๊ตฌ์ฑ ์์๋ฅผ ์ฌ์ฉํ์ฌ ์ฅ๊ธฐ์ ์ธ ๋ช ํ์ฑ๊ณผ ์ผ๊ด์ฑ์ ํฅ์์ํค๋ ๋ชจ๋์ ์ค๊ณ๋ฅผ ์ฅ๋ คํฉ๋๋ค.
์ฌ์ฌ์ฉ ๊ฐ๋ฅํ ๋ ผ๋ฆฌ ๋จ์ ๋ฐ ํ์ ์ ์ฐจ ์๋ณ
๋ง์ COBOL ํ๋ก๊ทธ๋จ์ด ์๋ก ๋ค๋ฅธ ๊ณณ์์ ์ ์ฌํ ๋ก์ง์ ๋ฐ๋ณตํฉ๋๋ค. ๊ณ์ฐ, ๋ฐ์ดํฐ ํ์ ์ง์ ๋ฐ ๊ฒ์ฆ ๋ฃจํด์ด ๋จ๋ฝ์ด๋ ์น์ ์ ์ง์ ํฌํจ๋ ์ ์์ต๋๋ค. ์ด๋ฌํ ์ ๊ทผ ๋ฐฉ์์ ์ ์ง ๊ด๋ฆฌ๋ฅผ ์ด๋ ต๊ฒ ๋ง๋ค๊ณ ์ผ๊ด์ฑ์ ์ ํ์ํฌ ์ ์์ต๋๋ค.
์ต์ RPG์์๋ ๊ฐ๋ฐ์๊ฐ ๊ณตํต ๊ธฐ๋ฅ์ ๋ช ๋ช ๋ ํ๋ก์์ ๋ก ๋ถ๋ฆฌํ ์ ์์ต๋๋ค. ์ด๋ฌํ ํ๋ก์์ ๋ ๋งค๊ฐ๋ณ์๋ฅผ ๋ฐ๊ณ ๊ฐ์ ๋ฐํํ๋ฉฐ ๋ฉ์ธ๋ผ์ธ ์ฝ๋์ ๋ ๋ฆฝ์ ์ผ๋ก ์คํ๋ ์ ์์ต๋๋ค. ๋ง์ด๊ทธ๋ ์ด์ ์ ๊ฐ๋ฐ์๋ ์ค๋ณต๋ ๋ก์ง์ ๊ฒ์ฌํ๊ณ ์ด๋ฅผ ๊ฐ๋ณ ๋จ์๋ก ๋ฆฌํฉํ ๋งํด์ผ ํฉ๋๋ค. ์๋ฅผ ๋ค์ด, ๋ ์ฝ๋์ ๋ชจ๋ ํ์ ํ๋๊ฐ ํฌํจ๋์ด ์๋์ง ํ์ธํ๋ ๋จ๋ฝ์ ์ํ ํ์๊ธฐ๋ฅผ ๋ฐํํ๋ ์ ํจ์ฑ ๊ฒ์ฌ ํ๋ก์์ ๋ก ๋์ฒดํ ์ ์์ต๋๋ค.
์ด๋ฌํ ๋ถ๋ฆฌ๋ ๊ฐ๋ ์ฑ์ ํฅ์์ํฌ ๋ฟ๋ง ์๋๋ผ ์๋ํ๋ ํ ์คํธ๋ฅผ ์ํ ๊ธฐ๋ฐ์ ๋ง๋ จํฉ๋๋ค. ํ๋ก์์ ๋ ๋ ํฐ ์ ํ๋ฆฌ์ผ์ด์ ์ ํตํฉ๋๊ธฐ ์ ์ ๊ฒฉ๋ฆฌ๋ ์ํ์์ ๊ฒ์ฆ๋ ์ ์์ต๋๋ค. ์๊ฐ์ด ์ง๋จ์ ๋ฐ๋ผ ์ด๋ฌํ ๋ชจ๋์ ์ ๊ทผ ๋ฐฉ์์ ๋ ๋์ ์ฝ๋ ์ฌ์ฌ์ฉ๊ณผ ๋ ๋น ๋ฅธ ์ ๋ฐ์ดํธ๋ฅผ ์ง์ํฉ๋๋ค.
์์ ์ ์ด ๋ฐ ์ธ๋ถ ํตํ ๋ฒ์ญ
COBOL ์์คํ ์์ ์ํฌํ๋ก๋ ์์ ์ ์ด ์ธ์ด๋ ๋ฐฐ์น ์ค์ผ์ค๋ง์ผ๋ก ์ฐ๊ฒฐ๋ ๊ฐ๋ณ ํ๋ก๊ทธ๋จ๋ค๋ก ๊ตฌ์ฑ๋๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ๊ฐ ํ๋ก๊ทธ๋จ์ ๋ ํฐ ํ๋ก์ธ์ค์ ํ ๋ถ๋ถ์ ์ฒ๋ฆฌํ๊ณ ์ธ๋ถ ํธ๋ฆฌ๊ฑฐ๋ฅผ ํตํด ์คํ์ ์์ํฉ๋๋ค.
RPG๋ ์ด๋ฌํ ์ํฌํ๋ก์ฐ๋ฅผ ๊ตฌ์ฑํ๋ ๋ฐฉ์์ ๋ ๋ง์ ์ ์ฐ์ฑ์ ์ ๊ณตํฉ๋๋ค. ๊ฐ๋ฐ์๋ ๋ ๋ฆฝ์ ์ธ ์์ ์ ์ฒด์ธ์ผ๋ก ๋ฌถ๋ ๋์ , ๊ด๋ จ ์์ ์ ๋ชจ๋๋ก ๊ทธ๋ฃนํํ๊ฑฐ๋ ๋จ์ผ ํ๋ก๊ทธ๋จ ๋ด์์ ์ง์ ํ๋ก์์ ๋ฅผ ํธ์ถํ ์ ์์ต๋๋ค. ์ด๋ฅผ ํตํด ์ธ๋ถ ์ข ์์ฑ์ ์ค์ด๊ณ ์ ์ฒด ํ๋ฆ์ ์ถ์ ํ๊ธฐ ๋ ์ฌ์์ง๋๋ค.
COBOL์ ์ฌ์ฉํ๋ ๊ฒฝ์ฐ CALL ํ์ ํ๋ก๊ทธ๋จ์ ์คํํ๋ ๋ช
๋ น๋ฌธ๊ณผ ๋ฌ๋ฆฌ RPG๋ ์๋น์ค ํ๋ก๊ทธ๋จ์ด๋ ํ๋ก์์ ํฌ์ธํฐ๋ฅผ ์ฌ์ฉํ์ฌ ๋์ผํ ํจํด์ ์ง์ํฉ๋๋ค. ์ด๋ฌํ ๊ธฐ๋ฅ์ ํตํด ํ๋ก์์ ๋ฅผ ์ธ์์ ํจ๊ป ํธ์ถํ๊ณ , ๋ฐํ ์ฝ๋๋ฅผ ํ์ธํ๊ณ , ๋ก๊น
์ ๋ ์ฝ๊ฒ ์ํํ ์ ์์ต๋๋ค. COBOL์ด ํ์ผ ๊ธฐ๋ฐ ์กฐ์ ์ ์์กดํ๋ ๋ฐ๋ฉด, RPG๋ ์ค๋ฅ ์ฒ๋ฆฌ ๋ฐ ์ํ ๊ด๋ฆฌ๋ฅผ ๊ฐ์ํํ๋ ๋์ฑ ํตํฉ๋ ๋ฐํ์ ํ๊ฒฝ์ ์ ๊ณตํฉ๋๋ค.
๊ด๋ จ ์ ๋ฌด๋ฅผ ํตํฉ๋ ๋ชจ๋๋ก ์ ๋ฆฌํ๋ฉด ํ์ ์์ ์์๋ฅผ ๋ ์ ์ ์ดํ๊ณ ์ธ๋ถ ์์ ์กฐ์ ์ผ๋ก ์ธํ ๊ฐ์ ๋น๋ฅผ ์ค์ผ ์ ์์ต๋๋ค.
๋ฐ์ธ๋ ์ธ์ด๋ฅผ ์ฌ์ฉํ ๋ค์ค ๋ชจ๋ ์ปดํ์ผ ์ง์
COBOL ํ๋ก๊ทธ๋จ์ด ์ปค์ง์ ๋ฐ๋ผ ์ฌ๋ณธ์ด๋ ๊ณตํต ๋ธ๋ก์ ํตํด ๊ณต์ ์ฝ๋๊ฐ ํฌํจ๋๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. RPG๋ ๋ฐํ์์ ์ฐ๊ฒฐ๋๋ ์๋น์ค ํ๋ก๊ทธ๋จ๊ณผ ์ปดํ์ผ ๋จ์๋ฅผ ์ฌ์ฉํ์ฌ ๋ชจ๋ํ๋ฅผ ๋ค๋ฅด๊ฒ ์ฒ๋ฆฌํฉ๋๋ค.
RPG์ ๋ฐ์ธ๋ ์ธ์ด ํ์ผ์ ํตํด ๊ฐ๋ฐ์๋ ๋ค๋ฅธ ํ๋ก๊ทธ๋จ์์ ์ฌ์ฉํ ์ ์๋ ํ๋ก์์ ๋ฅผ ์ ์ํ ์ ์์ต๋๋ค. ์ด๋ฅผ ํตํด ๋ฒ์ ๊ด๋ฆฌ, ์บก์ํ, ๊ทธ๋ฆฌ๊ณ ๊ณต๊ฐ ๋ก์ง๊ณผ ๋น๊ณต๊ฐ ๋ก์ง์ ๋ถ๋ฆฌ๊ฐ ๊ฐ๋ฅํฉ๋๋ค. ๋ง์ด๊ทธ๋ ์ด์ ์ ํ์ ๋ฐ์ธ๋ ์ธ์ด๋ฅผ ์ฌ์ฉํ์ฌ ๊ณต์ ์นดํผ๋ถ์ ์ญํ ์ ์ฌํํ๋ ๋์์ ๋์ฑ ๊ฐ๋ ฅํ ๊ตฌ์กฐ์ ๊ฒฝ๊ณ๋ฅผ ํ๋ณดํ ์ ์์ต๋๋ค.
์๋ฅผ ๋ค์ด, ๊ฐ๊ฒฉ, ์ธ๊ธ, ํ ์ธ์ ๊ณ์ฐํ๋ ๋ฃจํด๋ค์ ํ๋์ ๋ชจ๋๋ก ์ปดํ์ผํ์ฌ ์๋น์ค ํ๋ก๊ทธ๋จ์ ํตํด ๋ฐฐํฌํ ์ ์์ต๋๋ค. ๊ทธ๋ฌ๋ฉด ๋ค๋ฅธ RPG ํ๋ก๊ทธ๋จ๋ค์ ๋ถํ์ํ ๋ก์ง์ ๊ฐ์ ธ์ค์ง ์๊ณ ํ์ํ ํน์ ํ๋ก์์ ์๋ง ์ ๊ทผํ ์ ์์ต๋๋ค.
์ด ๊ตฌ์กฐ๋ ์ ์ง์ ์ธ ๋ฆฌํฉํ ๋ง์ ์ง์ํฉ๋๋ค. ํ์ ์๊ฐ์ด ์ง๋จ์ ๋ฐ๋ผ ์ ํ๋ฆฌ์ผ์ด์ ์ ๊ฐ ๋ถ๋ถ์ ๋ถ๋ฆฌํ๊ณ , ๋ ๋ฆฝ์ ์ผ๋ก ๊ฒ์ฆํ๋ฉฐ, ๋ถ์์ฉ ๋ฐ์ ์ํ์ ์ค์ผ ์ ์์ต๋๋ค. ๋ฐ์ธ๋ ์ธ์ด๋ ๋ํ ์ด์ ๋ฒ์ ๊ณผ์ ํธํ์ฑ์ ์ง์ํ์ฌ ์ข ์ ์ฝ๋๋ฅผ ์์์ํค์ง ์๊ณ ํ๋ก์์ ๋ฅผ ์ฝ๊ฒ ๊ฐ๋ฐํ ์ ์๋๋ก ํฉ๋๋ค.
ํ์ผ ๊ตฌ์กฐ ๋ฐ I/O ๋ฃจํด ๋ณํ
ํ์ผ ์ฒ๋ฆฌ๋ COBOL์์ RPG๋ก ๋ง์ด๊ทธ๋ ์ด์ ํ ๋ ๊ฐ์ฅ ๋ฏผ๊ฐํ ๋ถ๋ถ ์ค ํ๋์ ๋๋ค. ๋ง์ ๊ธฐ์กด COBOL ํ๋ก๊ทธ๋จ์ VSAM ๋ฐ QSAM๊ณผ ๊ฐ์ ์ธ๋ฑ์ค ํ์ผ ์์คํ ๊ณผ ์์ฐจ ํ์ผ ์์คํ ์ ํฌ๊ฒ ์์กดํฉ๋๋ค. RPG์์ ๊ฐ๋ฐ์๋ ํค๊ฐ ์๋ ๋ฌผ๋ฆฌ์ ํ์ผ, ๋ ผ๋ฆฌ์ ๋ทฐ ๋๋ ๋ด์ฅ SQL์ ์ฌ์ฉํ์ฌ ์ด๋ฌํ ํจํด์ ํ๋ํํ ์ ์์ต๋๋ค. I/O ๋ง์ด๊ทธ๋ ์ด์ ์๋ ๊ตฌ์กฐ์ ์ ๋ ฌ๊ณผ ๋น์ฆ๋์ค ๋ก์ง์ด ๋ฐ์ดํฐ์ ์ํธ ์์ฉํ๋ ๋ฐฉ์์ ๋ํ ์ฃผ์๊ฐ ํ์ํฉ๋๋ค.
VSAM ํด๋ฌ์คํฐ์์ ๋ฐ์ดํฐ๋ฒ ์ด์ค ์ก์ธ์ค๊น์ง
VSAM ํ์ผ๊ณผ ์ํธ ์์ฉํ๋ COBOL ํ๋ก๊ทธ๋จ์ ์ข ์ข ํค ์๋ ์ฒ๋ฆฌ, ๋ ์ฝ๋ ์ ๊ธ, ์ํ ์ฝ๋ ํด์์ ํฌํจํฉ๋๋ค. ์ด๋ฌํ ํจํด์ ํ์ผ ๊ตฌ์กฐ์ ๋ฐ์ ํ๊ฒ ์ฐ๊ด๋์ด ์์ผ๋ฉฐ, ์๊ตฌ ์ฌํญ์ด ๋ณ๊ฒฝ๋๋ฉด ์ทจ์ฝํด์ง ์ ์์ต๋๋ค.
RPG๋ ํค๊ฐ ์๋ ๋ฌผ๋ฆฌ์ ํ์ผ๊ณผ ๋ ผ๋ฆฌ์ ํ์ผ์ ํตํด ์ ์ฌํ ์ธ๋ฑ์ค ํ์ผ ์ก์ธ์ค๋ฅผ ์ง์ํฉ๋๋ค. ํ์ง๋ง ๊ฐ๋ฐ์๋ VSAM ๋ก์ง์ SQL์ ์ฌ์ฉํ ๊ตฌ์กฐํ๋ ๋ฐ์ดํฐ๋ฒ ์ด์ค ์ก์ธ์ค๋ก ๋์ฒดํ ์๋ ์์ต๋๋ค. ์ด๋ฅผ ํตํด ๋ ๋์ ์ถ์ํ๋ฅผ ๊ตฌํํ๊ณ ๋ทฐ, ์กฐ์ธ ๋ฐ ์ ์ธ์ ํํฐ๋ง์ ์ง์ํ ์ ์์ต๋๋ค.
๋ง์ด๊ทธ๋ ์ด์ ์ค ํ ๊ฐ์ง ๋ฐฉ๋ฒ์ DDS ์ ์ ํ์ผ์ ์ฌ์ฉํ์ฌ VSAM ๊ตฌ์กฐ๋ฅผ ๋ณต์ ํ๋ ๊ฒ์ ๋๋ค. ๋์์ ์ ํจ์ฑ์ด ๊ฒ์ฆ๋๋ฉด ๋น์ฆ๋์ค ๋ก์ง์ ์ฌ์์ฑํ์ง ์๊ณ ๋ ํด๋น ์ ์๋ฅผ SQL ํ ์ด๋ธ๋ก ๋ฆฌํฉํ ๋งํ ์ ์์ต๋๋ค. ์ด๋ ์๊ฐ์ด ์ง๋จ์ ๋ฐ๋ผ ๋ ์ฝ๋ ์์ค ์์ ์์ ๊ด๊ณํ ๊ตฌ์กฐ ๋ฐ ์ฟผ๋ฆฌ ๊ธฐ๋ฐ ์ก์ธ์ค ๊ธฐ๋ฐ ๋ชจ๋ธ๋ก ์ ํํ๋ ๋ฐ ๋์์ด ๋ฉ๋๋ค.
QSAM ์คํ์ผ ์์ฐจ ์ฝ๊ธฐ ๊ฐ์ํ
COBOL์ ์์ฐจ ํ์ผ์ ๊ฐ ๋ ์ฝ๋๋ฅผ ํ ๋ฒ์ ํ๋์ฉ ์ฒ๋ฆฌํ๋ ๊ฐ๋จํ ์ฝ๊ธฐ ๋ฃจํ๋ฅผ ์ฌ์ฉํ๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ์ด๋ ๋ณด๊ณ , ์ผ๊ด ๊ณ์ฐ ๋๋ ๋ฐ์ดํฐ ๋ด๋ณด๋ด๊ธฐ ์์ ์์ ํํ ์ฌ์ฉ๋ฉ๋๋ค. ๋ง์ ๊ฒฝ์ฐ, ์ด ๋ก์ง์ ์ ๋ ฌ๋ ์ ๋ ฅ๊ณผ ์์ ํ๋์ ๋ํ ์ง์ ์ก์ธ์ค๋ฅผ ๊ฐ์ ํฉ๋๋ค.
RPG๋ ๋ค์ดํฐ๋ธ ํ์ผ I/O๋ฅผ ์ฌ์ฉํ์ฌ ์ ์ฌํ ๋์์ ์ง์ํ์ง๋ง, ์ด๋ฌํ ๋ฃจํ๋ฅผ ํํํ๋ ๋ ๊น๋ํ ๋ฐฉ๋ฒ๋ ์ ๊ณตํฉ๋๋ค. READ DOW ํจํด์ COBOL์ ๋ ๋ณต์กํ ๊ตฌ๋ฌธ์ ๋์ฒดํฉ๋๋ค. ์ ์ฒด๋ก ์ฒ๋ฆฌ๋๋ ๋ฐ์ดํฐ ์ธํธ์ ๊ฒฝ์ฐ, ๋ด์ฅ SQL์ ์ฌ์ฉํ๋ฉด ๋์ฑ ํํ๋ ฅ์ด ๋ฐ์ด๋ ์ ํ, ํํฐ๋ง ๋ฐ ์ ๋ ฌ์ด ๊ฐ๋ฅํฉ๋๋ค.
QSAM ๋ก์ง์ ๊ต์ฒดํ๋ ๋ฐ ๋๋์ ์ธ ์ฌ์ค๊ณ๊ฐ ํ์ํ์ง ์์ ์๋ ์์ต๋๋ค. ํ์ง๋ง ๊ตฌ์กฐ๋ฅผ ๊ฐ์ ํ๊ณ ๋ ์ฝ๋ ๋ ์ด์์์ด๋ ์ ๋ ฅ ์์์ ๋ํ ๊ณ ์ ๋ ๊ฐ์ ์ ์ ๊ฑฐํ ์ ์๋ ๊ธฐํ๋ฅผ ์ ๊ณตํฉ๋๋ค. ๋ํ ํ์ผ ์ ์๋ฅผ ์ค์์์ ๊ด๋ฆฌํ ์ ์์ผ๋ฏ๋ก ๋ฐ์ดํฐ๋ฅผ ์ฌ์ฉํ๋ ๋ชจ๋ ํ๋ก๊ทธ๋จ์ ํธ์งํ์ง ์๊ณ ๋ ํ์ ๋ณ๊ฒฝ์ ์ฝ๊ฒ ๊ด๋ฆฌํ ์ ์์ต๋๋ค.
์ปค๋ฐ ์ ์ด ๋ฐ ๊ฑฐ๋ ๊ฒฝ๊ณ ๊ตฌํ
๋ง์ COBOL ์์คํ ์ ํ์ผ ์ ๋ฐ์ดํธ๋ฅผ ์๋์ผ๋ก ๊ด๋ฆฌํ๋ฉฐ, ์ํ ํ์ธ์ด๋ ํ๋๊ทธ๋ฅผ ์ฌ์ฉํ์ฌ ์ค๋ฅ๋ฅผ ๊ฐ์งํฉ๋๋ค. ์ด๋ฌํ ๋ฐฉ์์ ํธ๋์ญ์ ์ ์ด๋ฅผ ์ด๋ ต๊ฒ ๋ง๋ค ์ ์์ผ๋ฉฐ, ํนํ ์ฌ๋ฌ ํ์ผ์ ๋์์ ์ ๋ฐ์ดํธํ๊ฑฐ๋ ์คํจ ์ ๋กค๋ฐฑํด์ผ ํ๋ ๊ฒฝ์ฐ ๋์ฑ ๊ทธ๋ ์ต๋๋ค.
RPG๋ ๋ค์ดํฐ๋ธ ๋ช
๋ น๊ณผ ๋ด์ฅ SQL์ ํตํด ์ปค๋ฐ ์ ์ด๋ฅผ ์ง์ํฉ๋๋ค. ๊ฐ๋ฐ์๋ ๋ค์์ ์ฌ์ฉํ์ฌ ํธ๋์ญ์
๊ฒฝ๊ณ๋ฅผ ์ ์ํ ์ ์์ต๋๋ค. COMMIT ROLLBACK์ฌ๋ฌ ํ์ผ ์
๋ฐ์ดํธ๋ฅผ ํ๋์ ๋
ผ๋ฆฌ์ ๋จ์๋ก ๊ทธ๋ฃนํํฉ๋๋ค. ์ด๋ ๊ฒ ํ๋ฉด ๋ชจ๋ ๋ณ๊ฒฝ ์ฌํญ์ด ์ ์ฅ๋๊ฑฐ๋ ์๋ฌด๊ฒ๋ ์ ์ฉ๋์ง ์์ ๋ฐ์ดํฐ ๋ถ์ผ์น ์ํ์ ์ค์ผ ์ ์์ต๋๋ค.
๋ง์ด๊ทธ๋ ์ด์
์ ํ์ ์ด ๊ธฐ๋ฅ์ ์ฌ์ฉํ์ฌ ๋ณต์กํ ์
๋ฐ์ดํธ ํ๋ฆ์ ๊ฐ์ํํ ์ ์์ต๋๋ค. ๊ฐ๋ฐ์๋ ํ์ผ ์ํ ํ์ธ์ ์ฝ๋ ์ ์ฒด์ ๋ถ์ฐํ๋ ๋์ , ๋ค์์ ํตํด ์์ธ๋ฅผ ์ฒ๋ฆฌํ ์ ์์ต๋๋ค. MONITOR ํ์ํ ๊ฒฝ์ฐ ์ฐจ๋จํ๊ณ ๋กค๋ฐฑํฉ๋๋ค. ์ด๋ฅผ ํตํด ๋ช
ํ์ฑ, ์์ ์ฑ ๋ฐ ์ต์ ๋ฐ์ดํฐ ๊ด๋ฆฌ ๊ดํ๊ณผ์ ์ผ์น์ฑ์ด ํฅ์๋ฉ๋๋ค.
๋ฐ์ดํฐ ์ ์ ๋ฐ ๋ฉ๋ชจ๋ฆฌ ๊ด๋ฆฌ ์ ๋ ฌ
COBOL์์ ๋ง์ด๊ทธ๋ ์ด์ ํ๋ ๊ฒ์ ๋จ์ํ ๊ตฌ๋ฌธ๋ง ๋ฐ๊พธ๋ ๊ฒ์ด ์๋๋๋ค. ํ๋ก์์ ๊ฐ์ ๋ฐ์ดํฐ๊ฐ ์ ์๋๊ณ ๊ณต์ ๋๋ ๋ฐฉ์์ ์ ํ๋ฆฌ์ผ์ด์ ์ ๋ฐ์ ์๋์ ์ํฅ์ ๋ฏธ์นฉ๋๋ค. ์ด ์น์ ์์๋ RPG ๊ท์น์ ์ฌ์ฉํ์ฌ ๊ธฐ์กด ๋ฐ์ดํฐ ๋ ์ด์์๊ณผ ๋ฉ๋ชจ๋ฆฌ ์ฒ๋ฆฌ๋ฅผ ํ๋ํํ๋ ๊ธฐ์ ์ ์ค์ ์ ๋ก๋๋ค.
์นดํผ๋ถ์ RPG ๋ฐ์ดํฐ ๊ตฌ์กฐ๋ก ๋ง์ด๊ทธ๋ ์ด์
์นดํผ๋ถ์ COBOL ๊ฐ๋ฐ์ ํต์ฌ ์์์ ๋๋ค. ๊ณตํต ๋ ์ฝ๋ ๋ ์ด์์, ์์ ์ ์ฅ ํ๋, ์ธํฐํ์ด์ค ๊ตฌ์กฐ๋ฅผ ์ ์ํฉ๋๋ค. ์ด๋ฌํ ์ ์์๋ ์ค์ฒฉ ๊ทธ๋ฃน, ์์ถ๋ ์ซ์, ๊ณ ์ ๊ธธ์ด ๋ฌธ์ ํ๋๊ฐ ํฌํจ๋๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ์นดํผ๋ถ์ ๋๋ฆฌ ์ฌ์ฌ์ฉ๋๊ธฐ ๋๋ฌธ์ ํ๋์ ์นดํผ๋ถ์ ๋ณ๊ฒฝํ๋ฉด ์ฌ๋ฌ ํ๋ก๊ทธ๋จ์ ์ํฅ์ ๋ฏธ์น ์ ์์ต๋๋ค.
RPG ์ฌ์ฉ DCL-DS ๋ฐ์ดํฐ ๊ตฌ์กฐ๋ฅผ ์ ์ํ๋ ๋ธ๋ก์
๋๋ค. ์ด ๋ธ๋ก์ ์ค์ฒฉ ํ๋, ๋ณ์ ์ด๋ฆ ์ง์ ๋ฐ ๊ฐ๋ ฅํ ํ์ ์ ์ธ์ ์ง์ํฉ๋๋ค. COBOL ๊ทธ๋ฃน ํญ๋ชฉ์ ์ค์ฒฉ๋ RPG ๋ฐ์ดํฐ ๊ตฌ์กฐ์ ๋งคํ๋ฉ๋๋ค. ์์ถ๋ ์์๋ ์ ํ์ผ๋ก ์ ์๋ฉ๋๋ค. PACKED, ๋ฌธ์์ด ์ฌ์ฉ CHAR, ๊ทธ๋ฆฌ๊ณ ์ด์ง ํ๋๋ ๋ค์์ ๋งคํ๋ฉ๋๋ค. INT, UNS, ๋๋ ์ ์ฌํ ์ ํ.
๊ณต์ ๋ ์ฌ์ฉ ํจํด์ ์ ์งํ๊ธฐ ์ํด ์ฌ๋ณธ์ RPG ์ฌ๋ณธ ๋ฉค๋ฒ๋ก ๋ณํํ๊ณ ๋ค์์ ์ฌ์ฉํ์ฌ ํฌํจํ ์ ์์ต๋๋ค. /COPY or /INCLUDE์ด๋ฌํ ์ ๊ทผ ๋ฐฉ์์ ์ต์ RPG ํ์ค์ ๋ง์ถฐ ๊ตฌ๋ฌธ์ ์กฐ์ ํ๋ ๋์์ ์ฌ์ฌ์ฉ์ฑ์ ์ ์งํฉ๋๋ค. ๋ํ, ํ์ ํ๋๋ฅผ ๋์ฑ ๋ช
ํํ๊ฒ ๋ฌธ์ํํ๊ณ ์ผ๊ด๋ ์์ ์ง์ ๋ฐฉ์์ ์ฑํํ ์ ์์ต๋๋ค.
๋์ ๋์์ ์ํ ํฌ์ธํฐ ๊ธฐ๋ฐ ๊ตฌ์กฐ ์ฌ์ฉ
COBOL ํ๋ก๊ทธ๋จ์ ์ข ์ข ์ ์ ์ผ๋ก ๋ฉ๋ชจ๋ฆฌ๋ฅผ ํ ๋นํฉ๋๋ค. ํ๋ ํฌ๊ธฐ๋ ๊ณ ์ ๋์ด ์์ผ๋ฉฐ, ๋๋ถ๋ถ์ ๋ ์ฝ๋๋ ์ ์ ์ธ ์ ํ์ ๊ฐ์ต๋๋ค. ์ด๋ ์์ธก ๊ฐ๋ฅํ ๋ฐ์ดํฐ์๋ ์ ํฉํ์ง๋ง, ๋์ ๋๋ ์ฌ์ฉ์ ์ ์ ์ฝํ ์ธ ๋ฅผ ์ฒ๋ฆฌํ๋ ๋ฐ๋ ์ ์ฐ์ฑ์ด ์ ํ๋ฉ๋๋ค.
RPG๋ ํฌ์ธํฐ๋ฅผ ์ฌ์ฉํ์ฌ ๋์ ๋ฉ๋ชจ๋ฆฌ ํ ๋น ๋๊ตฌ๋ฅผ ์ ๊ณตํฉ๋๋ค. ๊ฐ๋ฐ์๋ ๋ฐํ์์ ์ ์ฅ์๋ฅผ ํ ๋นํ ์ ์์ต๋๋ค. %ALLOC, ์ฐธ์กฐ๋ก ๋ฉ๋ชจ๋ฆฌ๋ฅผ ๊ด๋ฆฌํ๊ณ ํด์ ํฉ๋๋ค. %DEALLOC์ด๊ฒ์ ํนํ ๋ค์์ ์์กดํ๋ ๋
ผ๋ฆฌ๋ฅผ ๋ง์ด๊ทธ๋ ์ด์
ํ ๋ ์ ์ฉํฉ๋๋ค. OCCURS DEPENDING ON๋๋ ๋ฐํ์์ ํ๋ ํฌ๊ธฐ๊ฐ ๋ณ๊ฒฝ๋๋ ๋ค๋ฅธ ํจํด์
๋๋ค.
ํฌ์ธํฐ ๊ธฐ๋ฐ ๊ตฌ์กฐ์ฒด๋ฅผ ์ฌ์ฉํ๋ฉด ๊ฐ๋ฐ์๋ ์ต๋ ํฌ๊ธฐ๋ฅผ ํ๋์ฝ๋ฉํ๋ ๋์ ์ ๋ ฅ ๋ฐ์ดํฐ์ ๋ง์ถฐ ์กฐ์ ๋๋ ๋ก์ง์ ๊ตฌ์ถํ ์ ์์ต๋๋ค. ์ด๋ฅผ ํตํด ๋์ฑ ํ๋ ฅ์ ์ด๊ณ ์ ์๋ ฅ ์๋ ํ๋ก๊ทธ๋จ์ ์ง์ํ๊ณ ๋ฉ๋ชจ๋ฆฌ๋ฅผ ๋์ฑ ํจ์จ์ ์ผ๋ก ์ฌ์ฉํ ์ ์์ต๋๋ค.
RPG๋ ํฌ์ธํฐ ํ ํ๋ฆฟ์ ์ ์ํ๋ ์ต์ ๋ ์ ๊ณตํฉ๋๋ค. ์ด๋ฌํ ํ ํ๋ฆฟ์ ๊ตฌ์กฐ๋ฅผ ๊ฐํํ๊ณ ํฌ์ธํฐ ๋ก์ง์ ๊ด๋ฆฌํ๊ณ ์ฌ์ฌ์ฉํ๊ธฐ ์ฝ๊ฒ ๋ง๋ค์ด์ค๋๋ค.
์์ถ๋ 10์ง์, ์์ซ์ ๋ฐ 2์ง์ ํธํ์ฑ ๊ด๋ฆฌ
๋ค์ด์คํธ๋ฆผ ํ๋ก์ธ์ค ์ค๋จ์ด๋ ๋ฐ์ฌ๋ฆผ ์ค๋ฅ ๋ฐ์์ ๋ฐฉ์งํ๊ธฐ ์ํด ๋ฐ์ดํฐ ํธํ์ฑ์ ์ ์งํด์ผ ํฉ๋๋ค. ๋ค์๊ณผ ๊ฐ์ COBOL ํ๋ PIC S9(7)V99 ์์คํ
์ ๋ฐ์์ ์ถ๋ ฅ์ด ์์ ์ ์ผ๋ก ์ ์ง๋๋๋ก ํ๋ ค๋ฉด ์ ํํ ์ฒ๋ฆฌ๊ฐ ํ์ํฉ๋๋ค.
RPG๋ ํ๋ ํฌ๊ธฐ์ ์ ๋ฐ๋์ ๋ํ ๋ช ์์ ์ธ ์ ์ด๋ฅผ ์ง์ํฉ๋๋ค. ๊ฐ๋ฐ์๋ ์์ถ, ์์ญ ๋๋ ๋ฌธ์ ์ ํ์ ์ฌ์ฉํ์ฌ COBOL ์ ์๋ฅผ ์ผ์น์ํฌ ์ ์์ต๋๋ค. ์์์ ์๋ฆฟ์, ๋ถํธ ์ฒ๋ฆฌ ๋ฐ ์ ์ฅ ํ์์ ๋ชจ๋ ์์ค ์ฝ๋์ ๋ง์ถฐ ์ ๋ ฌํ ์ ์์ต๋๋ค.
์ด์ง ๋ฐ ๋ฌธ์ ์ธ์ฝ๋ฉ์๋ ์ฃผ์๊ฐ ํ์ํฉ๋๋ค. COBOL์ ์ข ์ข EBCDIC์ ์ฌ์ฉํ๋ ๋ฐ๋ฉด, RPG ์์คํ ์ ๊ตฌ์ฑ์ ๋ฐ๋ผ ASCII ๋๋ UTF-8๋ก ์๋ํ ์ ์์ต๋๋ค. ๋ง์ด๊ทธ๋ ์ด์ ๋ก์ง์ ์ธ์ฝ๋ฉ ๋ถ์ผ์น๋ฅผ ๊ณ ๋ คํด์ผ ํ๋ฉฐ, ํนํ ์ถ๋ ฅ์ด ์ธ๋ถ ์์คํ ์ด๋ ์ฌ์ฉ์ ์ธํฐํ์ด์ค๋ก ์ ๋ฌ๋ ๋ ๋์ฑ ๊ทธ๋ ์ต๋๋ค.
์ ์ ํ ํ๋ ๋งคํ๊ณผ ์ผ๊ด๋ ํ์์ ๋น์ฆ๋์ค ๊ท์น์ ์ ์งํ๊ณ , ์ํํ ํ ์คํธ๋ฅผ ๋ณด์ฅํ๋ฉฐ, ๋ง์ด๊ทธ๋ ์ด์ ๊ฒฐ๊ณผ์ ๋ํ ํ์ ์ ํค์ฐ๋ ๋ฐ ๋์์ด ๋ฉ๋๋ค.
ํ๋ RPG ๊ธฐ์ ์ ์ฉ
RPG๋ ๊น๋ํ๊ณ ๋ชจ๋ํ๋ ๋์์ธ๊ณผ ๋ฐ์ดํฐ ๊ธฐ๋ฐ ๊ฐ๋ฐ์ ์ง์ํ๋ ์ ์ฐํ๊ณ ํํ๋ ฅ์ด ํ๋ถํ ์ธ์ด๋ก ๋ฐ์ ํ์ต๋๋ค. ๊ตฌ๋ฌธ์ ๋ณํํ์ง๋ง, ๊ฐ์ฅ ์๋ฏธ ์๋ ๊ฐ์ ์ ํ๋ก๊ทธ๋จ์ ๊ตฌ์กฐ, ์ ์ง ๊ด๋ฆฌ ๋ฐ ํ์ฅ ๋ฐฉ์์์ ๋น๋กฏ๋ฉ๋๋ค. ๋ค์ ์ฌ๋ก๋ ํ์ด ๊ธฐ์กด COBOL ๋ก์ง์ ์ฌ์์ ํ ๋ ๋์ฑ ์ฝ๊ธฐ ์ฝ๊ณ ์ ์๋ ฅ ์๋ ์ฝ๋๋ฅผ ์์ฑํ๋ ๋ฐ ๋์์ด ๋ฉ๋๋ค.
๋ฐ์ดํฐ ์ค์ฌ ๊ฐ๋ฐ์ ์ํ ๋ด์ฅ SQL ํ์ฉ
ํ๋ RPG์์ ๊ฐ์ฅ ํจ๊ณผ์ ์ธ ๋ณํ ์ค ํ๋๋ ๋ด์ฅ SQL์ ์ฌ์ฉ์ ๋๋ค. ๋ ์ฝ๋๋ฅผ ํ๋์ฉ ์ฒ๋ฆฌํ๋ ๋์ , ํ๋ก๊ทธ๋จ์ ์ ์ธ์ ์ฟผ๋ฆฌ๋ฅผ ์ฌ์ฉํ์ฌ ๋ฐ์ดํฐ๋ฅผ ๊ฒ์, ํํฐ๋ง ๋ฐ ์ ๋ฐ์ดํธํ ์ ์์ต๋๋ค. ์ด๋ฌํ ๋ณํ๋ ํ์ํ ์ฝ๋ ์์ ์ค์ผ ๋ฟ๋ง ์๋๋ผ ๋น์ฆ๋์ค ๋ก์ง์ ํฌ๋ช ์ฑ๋ ํฅ์์ํต๋๋ค.
๋ด์ฅ SQL์ ์ฌ์ฉํ๋ฉด ๊ฐ๋ฐ์๋ ๋ค์์ ์ฌ์ฉํ ์ ์์ต๋๋ค. SELECT, UPDATE์์ฐ ๋ฐ DELETE RPG ํ๋ก์์ ์์ ์ง์ ๋ช
๋ น๋ฌธ์ ์คํํ ์ ์์ต๋๋ค. ์ด๋ฌํ ์ฟผ๋ฆฌ๋ ํธ์คํธ ๋ณ์ ๋ฐ ์ ์ด ํ๋ฆ ๊ตฌ์กฐ์ ํตํฉ๋์ด ๋
ผ๋ฆฌ์ ๋ฐ์ดํฐ ์ก์ธ์ค ๊ฐ์ ๊ธด๋ฐํ ์ ๋ ฌ์ ๊ฐ๋ฅํ๊ฒ ํฉ๋๋ค. ์ปค์ ์ฒ๋ฆฌ๋ ๊ฒฐ๊ณผ ์งํฉ์ ๋ํ ์ ์ด๋ฅผ ์ ๊ณตํ๊ณ , ํ์ ์ ํ์ ์ค์ฒฉ ๋ฃจํ ์์ด ๋ณต์กํ ์กฐ๊ฑด์ ๊ตฌํํ ์ ์๋๋ก ํฉ๋๋ค.
ํ์ผ ๊ธฐ๋ฐ ์ก์ธ์ค์์ ์ฟผ๋ฆฌ ๊ธฐ๋ฐ ๋ก์ง์ผ๋ก ์ ํํจ์ผ๋ก์จ ๋ฐ์ดํฐ๋ฒ ์ด์ค ๊ตฌ์กฐ๊ฐ ๋ณํํ ๋ ์ ํ๋ฆฌ์ผ์ด์ ์ ๋์ฑ ์ฝ๊ฒ ์กฐ์ ํ ์ ์์ต๋๋ค. ๋ํ ํํฐ๋ง๊ณผ ์ ๋ ฌ์ ๋ฐ์ดํฐ๋ฒ ์ด์ค ์์ง์ ์์ํ ์ ์์ผ๋ฏ๋ก ๋ง์ ๊ฒฝ์ฐ ์ฑ๋ฅ์ด ํฅ์๋ฉ๋๋ค.
๊ตฌ์กฐํ๋ ํ๋ฆ๊ณผ ์์ธ ์ฒ๋ฆฌ ํตํฉ
๋ ๊ฑฐ์ COBOL์ ๋ฐํ ์ฝ๋๋ ํ์ผ ์ํ ํ๋๋ฅผ ์ฌ์ฉํ์ฌ ์์ธ๋ฅผ ์ฒ๋ฆฌํ๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ์ด๋ก ์ธํด ํ๋ก๊ทธ๋จ ์ ์ฒด์์ ์ํ ํ์ธ์ด ๋ฐ๋ณต์ ์ผ๋ก ๋ฐ์ํ์ฌ ํ๋ฆ์ ๋ฐ๋ผ๊ฐ๊ธฐ ์ด๋ ค์์ง๊ณ ์กฐ๊ฑด์ ๋์น ๊ฐ๋ฅ์ฑ์ด ์ปค์ง๋๋ค.
ํ๋ RPG๋ ๋ค์์ ์ฌ์ฉํ์ฌ ์์ธ ์ฒ๋ฆฌ๋ฅผ ์ํ ๊ตฌ์กฐํ๋ ๋ชจ๋ธ์ ์ ๊ณตํฉ๋๋ค. MONITOR, ON-ERROR์์ฐ ๋ฐ ENDMON ๋ธ๋ก. ์ด๋ฌํ ๊ตฌ์กฐ๋ฅผ ํตํด ๊ฐ๋ฐ์๋ ์คํจํ ๊ฐ๋ฅ์ฑ์ด ์๋ ์ฝ๋ ์น์
์ ๋ถ๋ฆฌํ๊ณ ์ ์ฒด ํ๋ก๊ทธ๋จ์ ๋ก์ง์ ๋ถ์ฐ์ํค์ง ์๊ณ ๋ ์ ์ด๋ ๋ฐฉ์์ผ๋ก ์์ธ๋ฅผ ์ฒ๋ฆฌํ ์ ์์ต๋๋ค.
๋ชจ๋ํฐ๋ง๋๋ ๋ธ๋ก ๋ด์์ ๊ฐ๋ฐ์๋ ๊ฐ ์ค์ ๊ฒ์ฌ ์ฝ๋๋ก ๊ฐ์ธ์ง ์๊ณ ๋ ํ์ผ ์ก์ธ์ค, ๋ฐ์ดํฐ ๋ณํ ๋๋ ์ฐ์ ์ฐ์ฐ๊ณผ ๊ฐ์ ์์
์ ์ํํ ์ ์์ต๋๋ค. ์ค๋ฅ๊ฐ ๋ฐ์ํ๋ฉด ์ ์ด๊ฐ ๋ค์ ๋ธ๋ก์ผ๋ก ์ด๋ํฉ๋๋ค. ON-ERROR ๋ฌธ์ ๋ฅผ ๊ธฐ๋กํ๊ณ , ๋ฐํ ์ฝ๋๋ฅผ ์ค์ ํ๊ฑฐ๋ ์ ๋ฆฌ๋ฅผ ์ํํ ์ ์๋ ์น์
์
๋๋ค.
์ด ํจํด์ ๊ฐ๋ ์ฑ์ ํฅ์์ํค๊ณ ํนํ ์ฌ๋ฌ ํตํฉ ์ง์ ์ด๋ ๋ฐ์ดํฐ ์์ ์ด ์๋ ํ๋ก๊ทธ๋จ์์ ์ค๋ฅ์ ๋ํ ์ผ๊ด๋ ๋์์ ์ง์ํฉ๋๋ค.
๋ช ํ์ฑ๊ณผ ์ฌ์ฌ์ฉ์ ์ํด ๋ชจ๋์ ๋์์ธ ์ฌ์ฉ
์์ ํ์ RPG๋ ํ๋ก์์ ์ ์๋น์ค ๋ฃจํด์ ์ฌ์ฉํ์ฌ ํ๋ก๊ทธ๋จ์ ๋ชจ๋์ ๊ตฌ์ฑ์ ์ง์ํฉ๋๋ค. COBOL์ ๋ฌธ๋จ ๊ธฐ๋ฐ ํ๋ฆ๊ณผ ๋ฌ๋ฆฌ, RPG ํ๋ก์์ ๋ ๋งค๊ฐ๋ณ์ํ, ๋ช ํํ ์ด๋ฆ ์ง์ , ๊ทธ๋ฆฌ๊ณ ๋ ๋ฆฝ์ ์ธ ํ ์คํธ๊ฐ ๊ฐ๋ฅํฉ๋๋ค. ์ด๋ฅผ ํตํด ์ค๋ณต์ ์ค์ด๊ณ ์์ ์ ๋์ฑ ์ ์คํ๊ฒ ๋ถ๋ฆฌํ ์ ์์ต๋๋ค.
์ค์ ๋ก, ํ๋ ๋ฉ์ธ๋ผ์ธ ์ํ์ค ์ค๊ฐ์ ๋ด์ฅ๋์๋ ๋ก์ง์ ์ด์ ์ ์๋ ์ ๋ ฅ๊ณผ ์ถ๋ ฅ์ ๊ฐ๋ ์ฌ์ฌ์ฉ ๊ฐ๋ฅํ ํ๋ก์์ ๋ก ์์ฑ๋ ์ ์์ต๋๋ค. ๊ณ์ฐ, ๊ฒ์ฆ ๋๋ ์์ ์ง์ ๋ฃจํด์ ๋ ๋ฆฝํ ๋ธ๋ก์ผ๋ก ์ฎ๊ฒจ ๊ฐ๋ ์ฑ์ ๋์ด๊ณ ๋์ ๊ฒ์ฆ์ ๋ ์ฝ๊ฒ ํ ์ ์์ต๋๋ค.
๋ชจ๋์ ์ค๊ณ๋ ๋ ์๊ณ ์ง์ค์ ์ธ ์์ค ํ์ผ์ ์์ฑํ ์ ์๋๋ก ํฉ๋๋ค. ํ๋ก๊ทธ๋จ์ ๊ธฐ์ ์ ์ ์ฝ์ด ์๋ ๋น์ฆ๋์ค ํ๋์ ์ค์ฌ์ผ๋ก ๊ตฌ์ฑํ ์ ์์ผ๋ฏ๋ก ๊ฒํ ๋ฐ ์ ์ง ๊ด๋ฆฌ๊ฐ ๋ ์ฝ์ต๋๋ค. ์๊ฐ์ด ์ง๋จ์ ๋ฐ๋ผ ์ด๋ฌํ ๊ตฌ์กฐ๋ ํ์ฅ ๊ฐ๋ฅํ ๊ฐ๋ฐ์ ์ง์ํ๊ณ ์ ๊ท ๊ฐ๋ฐ์์ ์จ๋ณด๋ฉ ์๊ฐ์ ๋จ์ถํฉ๋๋ค.
๋ง์ด๊ทธ๋ ์ด์ ๋ ์ ํ๋ฆฌ์ผ์ด์ ํ ์คํธ ๋ฐ ๋ฒค์น๋งํน
COBOL ๋ก์ง์ด ์ต์ RPG๋ก ์ฌ๊ตฌ์ฑ๋๋ฉด, ๊ฒ์ฆ์ ์ ํ์ฑ, ์์ ์ฑ, ๊ทธ๋ฆฌ๊ณ ์ ๋ขฐ์ฑ์ ๋ณด์ฅํ๋ ํต์ฌ ์์๊ฐ ๋ฉ๋๋ค. ๋ง์ด๊ทธ๋ ์ด์ ๋ ์ฝ๋๋ ๋์ผํ ๋น์ฆ๋์ค ๊ธฐ๋ฅ์ ์ํํ ๋ฟ๋ง ์๋๋ผ ๋ค์ํ ๋ฐ์ดํฐ ์๋๋ฆฌ์ค์์ ์ผ๊ด๋๊ฒ ๋์ํด์ผ ํฉ๋๋ค. ์ ๊ตฌ์ฑ๋ ํ ์คํธ์ ๋ฒค์น๋งํน์ ํ๊ท๋ ๋ถํ์ค์ฑ ์์ด ์์ผ๋ก ๋์๊ฐ๋ ๋ฐ ํ์ํ ํ์ ์ ์ ๊ณตํฉ๋๋ค.
์์ ๊ฐ์ ์ํ ์ด์ค ๊ฒฝ๋ก ์์ฐ ์คํ
๊ธฐ๋ฅ์ ์ผ๊ด์ฑ์ ๊ฒ์ฆํ๋ ์ ๋ขฐํ ์ ์๋ ๋ฐฉ๋ฒ์ ๊ธฐ์กด COBOL ์์คํ ์ ๋์์ ์๋ก ๊ฐ๋ฐ๋ RPG ๋ฒ์ ๊ณผ ๋น๊ตํ๋ ๊ฒ์ ๋๋ค. ์ด๋ ๋ ํ๋ก๊ทธ๋จ์ ๋ณ๋ ฌ๋ก ์คํํ๊ณ ์ผ์นํ๋ ๋ฐ์ดํฐ์ธํธ์์ ์ถ๋ ฅ์ ํ๊ฐํจ์ผ๋ก์จ ์ํํ ์ ์์ต๋๋ค.
์ค์ ๋ก ์ด๋ ๋ ์์คํ ์ ํตํด ๋์ผํ ์ ๋ ฅ์ ์ฒ๋ฆฌํ๊ณ ๊ฒฐ๊ณผ๋ฅผ ๋ ์ฝ๋๋ณ๋ก ๋น๊ตํ๋ ๊ฒ์ ์๋ฏธํฉ๋๋ค. ๋ชจ๋ ์ฐจ์ด์ ์ ๊ธฐ๋ก, ์ถ์ ๋ฐ ๊ฒํ ํ์ฌ RPG ๋ก์ง์ด COBOL ๋์์ ์ ํํ๊ฒ ๋ณต์ ํ๋์ง ํ์ธํ ์ ์์ต๋๋ค. ์ด๋ฌํ ์ ๊ทผ ๋ฐฉ์์ ์ ์ฒด ์์ ์คํธ๋ฆผ์ ์ฌ์ฉ๋์ด ์ ์ ์๊ฐ์ ๋ฏธ๋ฌ๋งํ ์ ์๋ ์ผ๊ด ์ฒ๋ฆฌ ํ๋ก์ธ์ค์ ํนํ ์ ์ฉํฉ๋๋ค.
๋ ๋ฒ์ ์ ๋๋ํ ์คํํ๋ฉด ๋ถ๋ฆฌ๋ ํ ์คํธ์์๋ ๋ฐ๊ฒฌํ๊ธฐ ์ด๋ ค์ด ๋ฏธ๋ฌํ ๋ฌธ์ ๋ ๋ฐ๊ฒฌํ๋ ๋ฐ ๋์์ด ๋ฉ๋๋ค. ํน์ ์ํฉ์์๋ง ๋ฐ์ํ๋ ๋ฐ์ดํฐ ์ด์, ๊ฒฝ๊ณ ์กฐ๊ฑด ๋๋ ์กฐ๊ฑด ๊ฒฝ๋ก๋ ์ค์ ํ๊ฒฝ์์์ ๋น๊ต๋ฅผ ํตํด ๋ ์ฝ๊ฒ ํ์ ํ ์ ์์ต๋๋ค.
์ด ๋ฐฉ๋ฒ์ ์ธก์ ๊ฐ๋ฅํ ์ ๋ขฐ ๊ณ์ธต์ ์์ฑํ๋ฉฐ ๋ชจ๋์ด ๋ณํ๋จ์ ๋ฐ๋ผ ์ ์ง์ ์ผ๋ก ์ ์ฉํ ์ ์์ต๋๋ค.
๋ฐ์ดํฐ ๋ณํ์ ํตํ ๋น์ฆ๋์ค ๊ท์น ์ ์ฉ ๋ฒ์ ๊ฒ์ฆ
๋ง์ด๊ทธ๋ ์ด์ ๋ ์ฝ๋๋ ์๋ ๋ก์ง์ ๋ชจ๋ ๊ธฐ๋ฅ์ ์ธ๋ถ ์ฌํญ์ ์ ์งํด์ผ ํฉ๋๋ค. ์ฌ๊ธฐ์๋ ์์ธ ์ฒ๋ฆฌ, ๊ฒฝ๊ณ ์กฐ๊ฑด ๊ณ์ฐ, ์ ๋ ฅ ๊ตฌ์กฐ ๋ณํ์ ๋ํ ๋์ ๋ฐฉ์์ด ํฌํจ๋ฉ๋๋ค. ์ด๋ฅผ ์ํด ํ ์คํธ ๋ฐ์ดํฐ๋ ์ผ๋ฐ์ ์ธ ์ฌ๋ก ๊ทธ ์ด์์ ๋ฐ์ํด์ผ ํฉ๋๋ค.
๋ํ ๋ฐ์ดํฐ, ์ด์๊ฐ, ์๋ชป๋ ์ ๋ ฅ์ ๊ธฐ๋ฐ์ผ๋ก ๊ตฌ์ถ๋ ํ ์คํธ ์ ๋ต์ ๋น์ฆ๋์ค ๊ท์น์ด ์์๋์ง ์๋๋ก ๋ณด์ฅํฉ๋๋ค. ์ฌ๊ธฐ์๋ ํ๋๊ฐ ๋๋ฝ๋ ๋ ์ฝ๋, ์์ ๋ฒ์๋ฅผ ๋ฒ์ด๋ ๊ฐ, ์ด์ ์ ํน์ ๋ก์ง์ ํธ๋ฆฌ๊ฑฐํ๋ ์กฐํฉ์ด ํฌํจ๋ฉ๋๋ค.
๊ฒ์ฆ์ COBOL ์์คํ ์ ์๋ ค์ง ๋์์ ๊ธฐ๋ฐ์ผ๋ก ํ ์ ์์ต๋๋ค. ์๋ฅผ ๋ค์ด, ํน์ ์ ๋ ฅ ํจํด์ผ๋ก ์ธํด ์ธ๊ธ ๊ณ์ฐ์ด ๋ณ๊ฒฝ๋๋ ๊ฒฝ์ฐ, RPG ํ ์คํธ ์ค์ ์ด ์ฌ๋ก๋ฅผ ์ฌํํด์ผ ํฉ๋๋ค. ์ถ๋ ฅ์ด ์ผ์นํ๋ฉด ๋ ผ๋ฆฌ์ ์ ์ด ํ๋ฆ์ด ๋ชจ๋ ์ ์ง๋์์์ ํ์ธํ ์ ์์ต๋๋ค.
์ ํ๋ ์ดํ ๋ ์ ๋ ฅ ์ธํธ๋ฅผ ์ฌ์ฉํ์ฌ ํ์ ์๋ก์ด ๊ตฌํ์ด ์๋ ์ฝ๋ ๊ฒฝ๋ก์ ๋ด์ฅ๋ ์์ธ ์ฌ๋ก๋ฅผ ๊ฐ๊ณผํ์ง ์๋์ง ํ์ธํฉ๋๋ค.
ํจ์จ์ฑ ํ์ธ์ ์ํ ์ฑ๋ฅ ๋ฒค์น๋งํน ์ฌ์ฉ
๋ง์ด๊ทธ๋ ์ด์ ๋ ํ๋ก๊ทธ๋จ์ ๊ธฐ์กด ์์คํ ์ ๋์๋ฟ๋ง ์๋๋ผ ์ค์ ๋ถํ์์์ ์ฑ๋ฅ๊น์ง ์ผ์นํด์ผ ํฉ๋๋ค. ๋ฉ๋ชจ๋ฆฌ ์ฒ๋ฆฌ, ๋ฐ์ดํฐ ์ ๊ทผ ๋๋ ์ ์ด ํ๋ฆ์ ์ฐจ์ด๋ ์ ์ฝ๋์ ์คํ ํจ์จ์ ์ํฅ์ ๋ฏธ์น ์ ์์ต๋๋ค.
๋ฒค์น๋งํน์ ์คํ ์๊ฐ, ํ์ผ I/O ํ์, ๋ฐ์ดํฐ๋ฒ ์ด์ค ์๋ต ์๊ฐ๊ณผ ๊ฐ์ ์ฃผ์ ์งํ๋ฅผ ํ์ ํ๋ ๊ฒ์ ํฌํจํฉ๋๋ค. ์ด๋ฌํ ์งํ๋ COBOL ๋ฒ์ ๊ณผ RPG ๋ฒ์ ์ ๋น๊ตํ์ฌ ๊ฐ์ ๋์๊ฑฐ๋ ์ต์ ํ๊ฐ ํ์ํ ๋ถ๋ถ์ ํ์ ํ๋ ๋ฐ ์ฌ์ฉ๋ ์ ์์ต๋๋ค.
๋๊ท๋ชจ ๋ฐ์ดํฐ ์ธํธ ๋๋ ์ต๋ ๋ณผ๋ฅจ ์๋๋ฆฌ์ค์์ ์ฑ๋ฅ์ ํ๊ฐํ๋ฉด ๋ง์ด๊ทธ๋ ์ด์ ๋ ๋ก์ง์ด ํ๋ก๋์ ํ๊ฒฝ์ ์ ํฉํ์ง ํ์ธํ ์ ์์ต๋๋ค. RPG๊ฐ ํ๋ซ ํ์ผ ์ก์ธ์ค์์ SQL๋ก ์ ํํ๋ ๋ฑ ์ํคํ ์ฒ๋ฅผ ๋ณ๊ฒฝํ๋ ๊ฒฝ์ฐ, ์ด๋ฌํ ํ ์คํธ๋ฅผ ํตํด ๋ช ํ์ฑ ํฅ์์ด ์ฒ๋ฆฌ๋ ์ ํ๋ก ์ด์ด์ง์ง ์์์ ํ์ธํ ์ ์์ต๋๋ค.
๋ฐฉ๋ฒ SMART TS XL COBOL์์ RPG๋ก์ ๋ง์ด๊ทธ๋ ์ด์ ์ง์
๋๊ท๋ชจ ๋ง์ด๊ทธ๋ ์ด์ ์๋ ๋จ์ํ ์ค ๋จ์์ ๋ฒ์ญ๋ง์ผ๋ก๋ ๋ถ์กฑํฉ๋๋ค. ๋ ๊ฑฐ์ ์์คํ ์ ์ ์ฒด ์ด์ ๋ฐฉ์์ ์ดํดํ๋ฉด ํ์ด ๋์ฑ ๋ช ํํ๊ณ ์ ํํ ์ ํ์ ์ํํ๋ ๋ฐ ๋์์ด ๋ฉ๋๋ค. SMART TS XL COBOL ์์คํ ์ ๋ํ ์์ธํ ์๊ฐํ์ ์ฒด๊ณ์ ์ธ ํ์ ๊ธฐ๋ฅ์ ์ ๊ณตํ์ฌ ์ค๋๋ ๋ ผ๋ฆฌ๋ฅผ ํ๋ RPG์ ์ ์ฉํ๋ ๊ณผ์ ์ ๋จ์ํํฉ๋๋ค.
COBOL ์ ํ๋ฆฌ์ผ์ด์ ๊ตฌ์กฐ๋ฅผ ๋ช ํํ๊ฒ ํ์
์ํฐํ๋ผ์ด์ฆ COBOL ์ ํ๋ฆฌ์ผ์ด์ ์ ๊ณ์ธต์ ์ด๊ณ ๋ฐ๋ณต์ ์ด๋ฉฐ ์ํธ ์ฐธ์กฐ๋๋ ๊ฒฝ์ฐ๊ฐ ๋ง์ต๋๋ค. ํ๋ก๊ทธ๋จ์ ์ค์ฒฉ๋ include, ๋ด์ฅ๋ ์กฐ๊ฑด๋ฌธ ๋๋ ์ฌ๋ฌ ๋ชจ๋์ ๊ฑธ์ณ ์๋ ์ ์ด ํ๋ฆ์ ์์กดํ ์ ์์ต๋๋ค. ์ด๋ฌํ ๊ตฌ์กฐ๋ฅผ ์๋์ผ๋ก ์ถ์ ํ๋ ๊ฒ์ ์ด๋ ต๊ณ ์ข ์ข ๋ถ์์ ํฉ๋๋ค.
SMART TS XL ์ด๋ฌํ ์์คํ ์ ๋ฐ์ ๊ฑธ์น ์์ ํ ์ ์ด ๋ฐ ๋ฐ์ดํฐ ํ๋ฆ ๋งต์ ์ ๊ณตํฉ๋๋ค. ๊ฐ๋ฐ์๋ ์ด๋ค ์น์ ์ด ๋ค๋ฅธ ์น์ ์ ํธ์ถํ๋์ง, ์ด๋ค ํ์ผ์ ์ด๋์์ ์ก์ธ์คํ๋์ง, ๊ทธ๋ฆฌ๊ณ ํ๋ก๊ทธ๋จ ์ ์ฒด์์ ๊ฐ์ด ์ด๋ป๊ฒ ์ด๋ํ๋์ง ๊ด์ฐฐํ ์ ์์ต๋๋ค. ์ด๋ฌํ ํต์ฐฐ๋ ฅ์ ํตํด ๋ชจ๋์ ๊ฒฝ๊ณ์ ๋ํ ํ์ ์ ๋ฐํ์ผ๋ก RPG ์ ์ฐจ ๋ฐ ์๋น์ค ๋ฃจํด์ ์กฐ๊ธฐ์ ๊ณํํ ์ ์์ต๋๋ค.
๋จ์ผ ์์ค ํ์ผ์์ ์์ํ๋ ๋์ , ํ์ ๋ชฉ์ ์งํฅ์ ์ธ ๊ตฌ์ฑ ์์๋ฅผ ์ถ์ถํ ์ ์์ต๋๋ค. ๊ฐ ๋ถ๋ถ์ RPG์์ ๊ฒํ , ํ ์คํธ ๋ฐ ์ฌ๊ตฌ์ฑ๋ ์ ์์ผ๋ฉฐ, ๋ ํฐ ๊ตฌ์กฐ์์ ์ด๋ค ์์น์ ์๋์ง ๋ช ํํ๊ฒ ํ์ ํ ์ ์์ต๋๋ค.
ํ๋ก๊ทธ๋จ ์ถ์ ๋ฐ ๋ณ์ ์ถ์ ์๋ํ
์ฑ๊ณต์ ์ธ ๋ง์ด๊ทธ๋ ์ด์ ์ ๋ณ์์ ๋์์ ์ดํดํ๋ ๋ฐ ๋ฌ๋ ค ์์ต๋๋ค. COBOL์์๋ ๊ฐ์ ์ฌ์ ์ํ๊ฑฐ๋, ์ฐธ์กฐ๋ก ์ ๋ฌํ๊ฑฐ๋, ๊น์ด ์ค์ฒฉ๋ ๋ธ๋ก ๋ด์์ ์กฐ๊ฑด๋ถ๋ก ์์ ํ ์ ์์ต๋๋ค. ์ด๋ฅผ ์๋์ผ๋ก ์ถ์ ํ๋ฉด ๋ณต์ก์ฑ๊ณผ ์ํ์ด ์ฆ๊ฐํฉ๋๋ค.
SMART TS XL ๋ณ์ ์ํ์ ๋ํ ์ข ๋จ ๊ฐ ๊ฐ์์ฑ์ ์ ๊ณตํฉ๋๋ค. ๊ฐ๋ฐ์๋ ์ํ๋ ํ๋๋ฅผ ์ ํํ์ฌ ์์ , ์นดํผ๋ถ ๊ฐ ์ด๋ ๋๋ ๋ค๋ฅธ ๋ชจ๋๋ก ์ ๋ฌ ์ฌ๋ถ์ ๊ด๊ณ์์ด ์์คํ ์ ์ฒด์์ ์ฌ์ฉ ํํฉ์ ์ถ์ ํ ์ ์์ต๋๋ค. ์ด๋ฅผ ํตํด ๋ชจํธ์ฑ์ ์ค์ด๊ณ RPG์ ๋ณ์๊ฐ ์ ํํ ๋ฒ์, ๊ฐ ๋ฐ ์ปจํ ์คํธ๋ฅผ ์ ์งํ๋๋ก ๋ณด์ฅํฉ๋๋ค.
์ด๋ฌํ ๊ฐ์์ฑ์ ๋ชจ๋ํ์๋ ๋์์ด ๋ฉ๋๋ค. ๋ก์ง์ RPG ์ ์ฐจ๋ก ์ธ๋ถํํ๋ฉด ๋ณ์์ ์๋์ ์๋ช ์ด ๋์ฑ ๋ช ํํด์ ธ ๋ ์์ ํ ์ ํ๊ณผ ๋ ๋์ ๋งค๊ฐ๋ณ์ ์ค๊ณ๊ฐ ๊ฐ๋ฅํด์ง๋๋ค.
์ถ๋ ฅ ์ ๋ ฌ ๋ฐ ๊ธฐ๋ฅ์ ๋๋ฑ์ฑ ํ์ธ
๋ง์ด๊ทธ๋ ์ด์ ๋ ํ๋ก๊ทธ๋จ์ ๋น์ฆ๋์ค ์๋๋ฅผ ๋ณด์กดํด์ผ ํฉ๋๋ค. ์ถ๋ ฅ ๋น๊ต๋ COBOL๊ณผ RPG ๊ฐ์ ๊ธฐ๋ฅ์ ์ผ๊ด์ฑ์ ๊ฒ์ฆํ๋ ์ ๋ขฐํ ์ ์๋ ๋ฐฉ๋ฒ์ ๋๋ค. SMART TS XL ๊ฒฐ๊ณผ๋ฅผ ๋น๊ตํ๊ณ , ์ฐจ์ด์ ์ ํ์ํ๊ณ , ๊ฒฐ๊ณผ๊ฐ ์์ฑ๋ ๋ฐฉ์์ ๋ณด์ฌ์ฃผ๋ ๊ตฌ์กฐํ๋ ์ถ์ ์ ๋ ฌ์ ์ง์ํฉ๋๋ค.
์ด ์ ๊ทผ ๋ฐฉ์์ ๋ฐฐ์น ํ๋ก๊ทธ๋จ, ์ฌ๋ฌด ๊ณ์ฐ ๋๋ ์์ฌ ๊ฒฐ์ ํ ์ด๋ธ์ ์ด๋ํ ๋ ์ ์ฉํฉ๋๋ค. ๊ฐ๋ฐ์๋ RPG ์ถ๋ ฅ์ด COBOL๊ณผ ๋ค๋ฅธ์ง ํ์ธํ๊ณ ์์ค ๋ก์ง์ ์์ธํ ๋ถ์ํ์ฌ ์กฐ์ ์ด ํ์ํ ๋ถ๋ถ์ ํ์ ํ ์ ์์ต๋๋ค.
์ถ์ ๊ฒฝ๋ก์ ๊ฐ์ ์ง์ ์ ๋ ฌํจ์ผ๋ก์จ ํ์ ์ฌ์์ ์ ์ค์ด๊ณ ์ผ๊ด๋๊ณ ์ ๋ขฐํ ์ ์๋ ๋ง์ด๊ทธ๋ ์ด์ ์ ๋์ฑ ๊ฐ๊น์์ง๋๋ค. ์ด๋ฌํ ๊ฒ์ฆ์ ๊ธฐ์ ์น์ธ๊ณผ ๋น์ฆ๋์ค ๋ณด์ฆ์ ๋ชจ๋ ์ง์ํฉ๋๋ค.
์ฒด๊ณ์ ์ธ ์งํ๋ฅผ ํตํด ์ ์ฐ์์ ๋ช ํ์ฑ์ผ๋ก
๋ ๊ฑฐ์ COBOL ์ฝ๋์ ๋ชจ๋ ์ค์ ํ๋ ํน์ ๋ฌธ์ ๋ฅผ ํด๊ฒฐํ๋ ๋น์ฆ๋์ค ๊ท์น์ ๋ฐ์ํฉ๋๋ค. ์๊ฐ์ด ์ง๋จ์ ๋ฐ๋ผ ์ด๋ฌํ ๊ท์น์ ๊ฒฌ๊ณ ํ์ง๋ง ์ ์ ๋ ์ ์ํ๊ธฐ ์ด๋ ค์ด ์์คํ ์ผ๋ก ๋ฐ์ ํ์ต๋๋ค. ํ๋ RPG๋ ์ด๋ฌํ ๋ ผ๋ฆฌ๋ฅผ ์ ์งํ๋ฉด์๋ ์ ์ง ๊ด๋ฆฌ๊ฐ ์ฉ์ดํ๊ณ ๋ชจ๋ํ๋ ์ํคํ ์ฒ๋ก ์ ํํ ์ ์๋ ๋ฐฉ๋ฒ์ ์ ๊ณตํฉ๋๋ค.
COBOL์์ ๋ง์ด๊ทธ๋ ์ด์ ํ๋ ๊ฒ์ ๋จ์ํ ์๋ก์ด ๊ตฌ๋ฌธ์ ์ฑํํ๋ ๊ฒ๋ง์ด ์๋๋๋ค. ๋ฐ์ดํฐ ํ๋ฆ, ๋ชจ๋ ๊ฐ ๋ก์ง ๋์ ๋ฐฉ์, ๊ทธ๋ฆฌ๊ณ ๊ตฌ์กฐ๊ฐ ์ ํ์ฑ์ ์ ํดํ์ง ์์ผ๋ฉด์ ๋ช ํ์ฑ์ ์ ๊ณตํ๋ ๋ฐฉ๋ฒ์ ์ดํดํ๋ ๊ฒ์ด ํ์ํฉ๋๋ค. ๋ฆฌํฉํ ๋ง๋ ํ๋ก์์ ์ ์ฌ์ ์๋ ๋ฐ์ดํฐ ๊ตฌ์กฐ๋ฅผ ํตํด ๊ฐ๋ฐํ์ ํ ์คํธ, ํ์ฅ ๋ฐ ์ง์์ด ๋ ์ฌ์ด ์ฝ๋๋ฒ ์ด์ค์ ๋์ฑ ๊ฐ๊น์์ง๋๋ค.
๋ชจ๋์ ์ค๊ณ, ๋ด์ฅ SQL, ์ ์ด๋ ์์ธ ์ฒ๋ฆฌ, ๊ทธ๋ฆฌ๊ณ ํฅ์๋ ๋ฉ๋ชจ๋ฆฌ ๊ด๋ฆฌ ๋ฐฉ์์ ์ ์ฉํจ์ผ๋ก์จ, ๋ ๊ฑฐ์ ํ๋ก๊ทธ๋จ์ ํ์ฌ ๋น์ฆ๋์ค ์๊ตฌ ์ฌํญ์ ์ถฉ์กฑํ๋ ๋์์ ํฅํ ๋ณํ์ ๋๋นํ๋ ์์คํ ์ผ๋ก ๋ฐ์ ํ ์ ์์ต๋๋ค. ๊ทธ ๊ฒฐ๊ณผ๋ ๋ณต์ ๊ฐ ์๋ ๋ฐ์ ์ ๋๋ค. ๊ณผ๊ฑฐ๋ฅผ ์กด์คํ๋ ๋์์ ์ฅ๊ธฐ์ ์ธ ๋ฏผ์ฒฉ์ฑ์ ๊ตฌ์ถํ๋ ํ์ ์ ๋๋ค.


