CICS ํŠธ๋žœ์žญ์…˜ ๋ณด์•ˆ ์ทจ์•ฝ์  ํƒ์ง€๋ฅผ ์œ„ํ•œ ์ •์  ๋ถ„์„

CICS ํŠธ๋žœ์žญ์…˜ ๋ณด์•ˆ ์ทจ์•ฝ์  ํƒ์ง€๋ฅผ ์œ„ํ•œ ์ •์  ๋ถ„์„

CICS ์‹œ์Šคํ…œ์€ ์„ธ๊ณ„์—์„œ ๊ฐ€์žฅ ๋ฏผ๊ฐํ•˜๊ณ  ๋Œ€์šฉ๋Ÿ‰์˜ ํŠธ๋žœ์žญ์…˜ ์ฒ˜๋ฆฌ ํ™˜๊ฒฝ์„ ์ง€์›ํ•ฉ๋‹ˆ๋‹ค. ์€ํ–‰ ๋ฐ ๋ณดํ—˜๋ถ€ํ„ฐ ๋ฌผ๋ฅ˜ ๋ฐ ๋ฐฉ์œ„ ์‚ฐ์—…์— ์ด๋ฅด๊ธฐ๊นŒ์ง€ ์ด๋Ÿฌํ•œ ํ”Œ๋žซํผ์€ ๋ณด์•ˆ ๊ฐ๋…์ด ๊ฐ๋‹นํ•˜๊ธฐ ์–ด๋ ค์šด ์›Œํฌ๋กœ๋“œ๋ฅผ ์ฒ˜๋ฆฌํ•ฉ๋‹ˆ๋‹ค. ์šด์˜ ๊ฐ€๋™ ์‹œ๊ฐ„์ด ๊ฐ€์žฅ ์ค‘์š”ํ•œ ์š”์†Œ์ด์ง€๋งŒ, CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์˜ ๊ตฌ์กฐ๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์€ ์ด์ ์„ ์ œ๊ณตํ•ฉ๋‹ˆ๋‹ค. ์ˆจ๊ฒจ์ง„ ์œ„ํ—˜ ์ผ์ƒ์ ์ธ ๊ฒ€ํ†  ์ค‘์— ๋†“์น˜๊ธฐ ์‰ฌ์šด ์‚ฌํ•ญ์ž…๋‹ˆ๋‹ค.

์ด๋Ÿฌํ•œ ์œ„ํ—˜์˜ ๋Œ€๋ถ€๋ถ„์€ ๋ ˆ๊ฑฐ์‹œ ์ฝ”๋“œ์—์„œ ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค. ์ค‘์ฒฉ๋œ COBOL ๋ชจ๋“ˆ, ํŠธ๋žœ์žญ์…˜ ํ”„๋กœ๊ทธ๋žจ ๋ฐ”์ธ๋”ฉ, ๋™์  ํ”„๋กœ๊ทธ๋žจ ํ˜ธ์ถœ, ๊ทธ๋ฆฌ๊ณ  ์žฌ์‚ฌ์šฉ๋œ ์‰ผํ‘œ(command)๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๋ฌธ์ œ๋ฅผ ์•ผ๊ธฐํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ทจ์•ฝ์  ํ‘œ๋ฉด์ ์œผ๋กœ๋Š” ๋ณด์ด์ง€ ์•Š๋Š” ์ทจ์•ฝ์ ์ž…๋‹ˆ๋‹ค. ์ผ๋ฐ˜์ ์ธ ์˜ˆ๋กœ๋Š” ๊ฒ€์ฆ๋˜์ง€ ์•Š์€ ํ„ฐ๋ฏธ๋„ ์ ‘๊ทผ, XCTL ๋˜๋Š” LINK ๋ช…๋ น์–ด์˜ ์˜ค์šฉ, ์ž˜๋ชป๋œ ํŠธ๋žœ์žญ์…˜ ๋ผ์šฐํŒ…์„ ํ†ตํ•ด ๋ถ€์—ฌ๋œ ๊ถŒํ•œ ์ƒ์Šน ๋“ฑ์ด ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ์ทจ์•ฝ์ ์€ ๊ฒฝ๊ณ ๋ฅผ ๋ฐœ์ƒ์‹œํ‚ค์ง€ ์•Š๊ณ ๋„ ์ˆ˜๋…„๊ฐ„ ์šด์˜ ํ™˜๊ฒฝ์— ์กด์žฌํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„ ์ด๋Ÿฌํ•œ ๋ฌธ์ œ๊ฐ€ ์•…์šฉ๋˜๊ธฐ ์ „์— ์‹๋ณ„ํ•  ์ˆ˜ ์žˆ๋Š” ์ฒด๊ณ„์ ์ธ ๋ฐฉ๋ฒ•์„ ์ œ๊ณตํ•ฉ๋‹ˆ๋‹ค. ํ•˜์ง€๋งŒ ์›น์ด๋‚˜ API ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜๊ณผ ๋‹ฌ๋ฆฌ CICS ์›Œํฌ๋กœ๋“œ ์Šค์บ๋‹์—๋Š” ํ›จ์”ฌ ๋” ์‹ฌ์ธต์ ์ธ ๊ฒ€์‚ฌ๊ฐ€ ํ•„์š”ํ•ฉ๋‹ˆ๋‹ค. ๋ถ„์„๊ฐ€๋Š” ์—ฌ๋Ÿฌ ํ”„๋กœ๊ทธ๋žจ ์ˆ˜์ค€์—์„œ ์ œ์–ด ํ๋ฆ„์„ ์ถ”์ ํ•˜๊ณ , ๊ณต์œ  ๋ฉ”๋ชจ๋ฆฌ๋ฅผ ํ†ตํ•ด ๋ฐ์ดํ„ฐ๊ฐ€ ์ด๋™ํ•˜๋Š” ๋ฐฉ์‹์„ ์ดํ•ดํ•˜๊ณ , ๋ฉ”์ธํ”„๋ ˆ์ž„ ํŠธ๋žœ์žญ์…˜ ๋™์ž‘์— ํŠนํ™”๋œ ํŒจํ„ด์„ ๊ฐ์ง€ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์ด ๋ฌธ์„œ๋Š” CICS ํ™˜๊ฒฝ์—์„œ ์ •์  ๋ถ„์„์„ ์ ์šฉํ•˜์—ฌ ๋ณด์•ˆ ์ทจ์•ฝ์ ์„ ๋ฐœ๊ฒฌํ•˜๊ณ  ์™„ํ™”ํ•˜๋Š” ๋ฐฉ๋ฒ•์„ ์ค‘์ ์ ์œผ๋กœ ๋‹ค๋ฃน๋‹ˆ๋‹ค. ์ฃผ์˜ํ•ด์•ผ ํ•  ๊ณ ์œ„ํ—˜ ๊ตฌ์กฐ๋ฅผ ๊ฐ„๋žตํ•˜๊ฒŒ ์„ค๋ช…ํ•˜๊ณ , COBOL ์ฝ”๋“œ์—์„œ ํŠธ๋žœ์žญ์…˜ ๋กœ์ง์„ ํ•ด์„ํ•˜๋Š” ๋ฐฉ๋ฒ•์„ ๋ณด์—ฌ์ฃผ๋ฉฐ, ๋Œ€๊ทœ๋ชจ ๋ ˆ๊ฑฐ์‹œ ์‹œ์Šคํ…œ์„ ์ •ํ™•ํ•˜๊ณ  ์‹ฌ๋„ ์žˆ๊ฒŒ ๊ฒ€ํ† ํ•ด์•ผ ํ•˜๋Š” ์—”์ง€๋‹ˆ์–ด๋ฅผ ์œ„ํ•œ ์ง€์นจ์„ ์ œ๊ณตํ•ฉ๋‹ˆ๋‹ค. ์ด ๋ฌธ์„œ์˜ ๋ชฉํ‘œ๋Š” ํŒ€์ด ์ถ”์ธก์ด๋‚˜ ์ค‘๋‹จ ์—†์ด ํŠธ๋žœ์žญ์…˜ ๊ณ„์ธต์„ ์•ˆ์ „ํ•˜๊ฒŒ ๋ณดํ˜ธํ•  ์ˆ˜ ์žˆ๋„๋ก ์ง€์›ํ•˜๋Š” ๊ฒƒ์ž…๋‹ˆ๋‹ค.

์ฐจ๋ก€

CICS ํŠธ๋žœ์žญ์…˜ ๊ณต๊ฒฉ ํ‘œ๋ฉด ์ดํ•ด

CICS ํŠธ๋žœ์žญ์…˜์€ ๋‹จ์ˆœํ•œ ํ”„๋กœ๊ทธ๋ž˜๋ฐ ์ž‘์—… ๋‹จ์œ„๊ฐ€ ์•„๋‹™๋‹ˆ๋‹ค. ์•ก์„ธ์Šค ์ œ์–ด, ์‚ฌ์šฉ์ž ์‹ ์›, ๋ฆฌ์†Œ์Šค ๊ถŒํ•œ ๋ถ€์—ฌ ๋ฐ ์„ธ์…˜ ๋ฌด๊ฒฐ์„ฑ์— ๊นŠ์ด ๋‚ด์žฌ๋˜์–ด ์žˆ์Šต๋‹ˆ๋‹ค. ๋งŽ์€ ๋ฉ”์ธํ”„๋ ˆ์ž„ ์‹œ์Šคํ…œ์€ ๋ณด์•ˆ ๊ฐ•ํ™”๊ฐ€ ๋ช…์‹œ์ ์œผ๋กœ ์ด๋ฃจ์–ด์ง€๊ธฐ๋ณด๋‹ค๋Š” ์•”๋ฌต์ ์œผ๋กœ ์ด๋ฃจ์–ด์ง€๋Š” ์ˆ˜์‹ญ ๋…„ ๋œ ์„ค๊ณ„ ํŒจํ„ด์— ์˜์กดํ•ฉ๋‹ˆ๋‹ค. ์ด๋กœ ์ธํ•ด ํ…Œ์ŠคํŠธ ๋˜๋Š” ๊ทœ์ • ์ค€์ˆ˜ ๊ฐ์‚ฌ ๊ณผ์ •์—์„œ ๊ฐ„๊ณผ๋˜๋Š” ์œ„ํ—˜์ด ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค.

์ด ์ˆ˜์ค€์˜ ์ •์  ๋ถ„์„์€ ์ œ์–ด๊ถŒ์ด ์–ด๋””๋กœ ์ด์ „๋˜๋Š”์ง€, ์ž…๋ ฅ์ด ์–ด๋–ป๊ฒŒ ์ฒ˜๋ฆฌ๋˜๋Š”์ง€, ๊ทธ๋ฆฌ๊ณ  ํŠน์ • ์‹คํ–‰ ์ปจํ…์ŠคํŠธ์—์„œ ์–ด๋–ค ๊ฒฝ๋กœ์— ๋„๋‹ฌํ•  ์ˆ˜ ์žˆ๋Š”์ง€ ๋งคํ•‘ํ•˜๋Š” ๊ฒƒ์œผ๋กœ ์‹œ์ž‘๋ฉ๋‹ˆ๋‹ค. ์นจํˆฌ ํ…Œ์ŠคํŠธ๋ฅผ ํ†ต๊ณผํ•œ ์‹œ์Šคํ…œ์กฐ์ฐจ๋„ ์ž˜๋ชป ๋ผ์šฐํŒ…๋˜๊ฑฐ๋‚˜ ๊ถŒํ•œ์ด ๊ณผ๋„ํ•˜๊ฒŒ ๋ถ€์—ฌ๋œ ํŠธ๋žœ์žญ์…˜ ํ๋ฆ„๊ณผ ๊ด€๋ จ๋œ ์ทจ์•ฝ์ ์„ ์—ฌ์ „ํžˆ ํฌํ•จํ•˜๊ณ  ์žˆ์„ ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

EXEC CICS ํ˜ธ์ถœ์˜ ์ˆจ๊ฒจ์ง„ ์ทจ์•ฝ์ 

์ผ๋ฐ˜์ ์ธ ์•ฝ์ ์—๋Š” ๋™์  ์‚ฌ์šฉ์ด ํฌํ•จ๋ฉ๋‹ˆ๋‹ค. EXEC CICS LINK, XCTL๋ฐ RETURN ํ˜ธ์ถœ์˜ ์ถœ์ฒ˜๋‚˜ ์ปจํ…์ŠคํŠธ๋ฅผ ํ™•์ธํ•˜์ง€ ์•Š๊ณ  ํ”„๋กœ๊ทธ๋žจ์ด ๋А์Šจํ•˜๊ฒŒ ์—ฐ๊ฒฐ๋˜๊ณ  ํ”„๋กœ๊ทธ๋žจ ์ด๋ฆ„์ด ์™ธ๋ถ€์—์„œ ์ œ๊ณต๋˜๊ฑฐ๋‚˜ ๋™์ ์œผ๋กœ ์ƒ์„ฑ๋˜๋Š” ๊ฒฝ์šฐ, ์•…์˜์ ์ธ ์ž…๋ ฅ์„ ํ†ตํ•ด ๊ถŒํ•œ์ด ์ƒ์Šน๋œ ๋ชจ๋“ˆ๋กœ ์‹คํ–‰์ด ์œ ๋„๋  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์‹ค์ œ๋กœ๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

EXEC CICS LINK PROGRAM(PROG-NAME) COMMAREA(COMM-AREA) LENGTH(COMM-LEN) END-EXEC

If PROG-NAME ์‚ฌ์šฉ์ž๊ฐ€ ์ œ๊ณตํ•œ ๊ฐ’์œผ๋กœ ์ž‘์„ฑ๋˜๊ฑฐ๋‚˜ ์—„๊ฒฉํ•œ ๊ฒ€์ฆ ์—†์ด ํ…Œ์ด๋ธ”์—์„œ ๋งคํ•‘๋œ ๊ฒฝ์šฐ, ๊ถŒํ•œ์ด ์—†๋Š” ์‚ฌ์šฉ์ž๊ฐ€ ๋…ธ์ถœ๋˜๋„๋ก ์˜๋„๋˜์ง€ ์•Š์€ ์ค‘์š”ํ•œ ํ”„๋กœ๊ทธ๋žจ์„ ์‹คํ–‰ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„์€ ํŠนํžˆ ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๊ฒฝ๋กœ๋ฅผ ๊ฐ์ง€ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

  • ํ”„๋กœ๊ทธ๋žจ ์ด๋ฆ„์€ ์—ฐ๊ฒฐ๋˜๊ฑฐ๋‚˜ ๋งˆ์Šคํฌ๋œ ๊ฐ’์œผ๋กœ ๊ตฌ์„ฑ๋ฉ๋‹ˆ๋‹ค.
  • ํ—ˆ์šฉ๋œ ๋Œ€์ƒ์ด๋‚˜ ์˜ˆ์ƒ ๋Œ€์ƒ์— ๋Œ€ํ•œ ๋Œ€์ฒด ๊ฒ€์‚ฌ๊ฐ€ ๊ตฌํ˜„๋˜์ง€ ์•Š์•˜์Šต๋‹ˆ๋‹ค.
  • ์ˆ˜์‹  ํ”„๋กœ๊ทธ๋žจ์€ ๊ถŒํ•œ์— ๋Œ€ํ•œ ์ถ”๊ฐ€ ๊ฒ€์ฆ ์—†์ด ์ž‘๋™ํ•ฉ๋‹ˆ๋‹ค.

SVC ๋ฐ ์Šคํ† ๋ฆฌ์ง€ ์ œ์–ด ์—์Šค์ปฌ๋ ˆ์ด์…˜ ํŒจํ„ด

ํŠน์ • SVC ๊ธฐ๋ฐ˜ ํ˜ธ์ถœ์ด๋‚˜ ๋งคํฌ๋กœ ์ˆ˜์ค€ ๋ช…๋ น์–ด๋ฅผ ํ†ตํ•ด ์ ‘๊ทผํ•˜๋Š” ๋‚ด๋ถ€ ์„œ๋น„์Šค ๋ฃจํ‹ด์€ ๋ฉ”๋ชจ๋ฆฌ ์กฐ์ž‘์„ ํ†ตํ•œ ์—์Šค์ปฌ๋ ˆ์ด์…˜์„ ํ—ˆ์šฉํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ADDRESS, ASSIGN์ž‘์—… ์ˆ˜์ค€ ๋ณด์•ˆ ์ปจํ…์ŠคํŠธ๊ฐ€ ์ ์ ˆํ•˜๊ฒŒ ์ ์šฉ๋˜์ง€ ์•Š์œผ๋ฉด ํ„ฐ๋ฏธ๋„ ๋ฐ์ดํ„ฐ ๋ธ”๋ก์— ๋Œ€ํ•œ ์ง์ ‘ ์•ก์„ธ์Šค๊ฐ€ ๋ณดํ˜ธ ์กฐ์น˜๋ฅผ ์šฐํšŒํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ผ๋ฐ˜์ ์ธ ์œ„ํ—˜ ์‹ ํ˜ธ ํŒจํ„ด์€ ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

  • ์›์‹œ ์ž…๋ ฅ์—์„œ ํ„ฐ๋ฏธ๋„ ID ๋˜๋Š” ์ž‘์—… ๋ฒˆํ˜ธ ํ• ๋‹น
  • ์‚ฌ์šฉ EXEC CICS ADDRESS TCTUA ๋˜๋Š” ์ง์ ‘ ์“ฐ๊ธฐ์— ๋”ฐ๋ฅธ ๋™๋“ฑํ•œ ํ˜ธ์ถœ
  • ์—ญํ•  ๊ฒ€์ฆ ์—†์ด ์„ธ์…˜ ์ƒํƒœ์— ๋”ฐ๋ฅธ ์ œ์–ด ์ „ํ™˜

ํ„ฐ๋ฏธ๋„ ๊ตฌ์กฐ์™€ CICS ๋‚ด๋ถ€์— ์ต์ˆ™ํ•œ ๊ณต๊ฒฉ์ž๋Š” ์ด๋Ÿฌํ•œ ์•ก์„ธ์Šค ํฌ์ธํŠธ๋ฅผ ์•…์šฉํ•˜์—ฌ ๊ถŒํ•œ์„ ์ƒ์Šน์‹œํ‚ค๊ฑฐ๋‚˜ ์˜๋„์น˜ ์•Š์€ ๋ช…๋ น์„ ์‚ฝ์ž…ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ด๋Ÿฌํ•œ ์ทจ์•ฝ์ ์„ ์‹๋ณ„ํ•˜๋ ค๋ฉด CICS ๋ช…๋ น์„ ์Šค์บ”ํ•˜๋Š” ๊ฒƒ๋ฟ๋งŒ ์•„๋‹ˆ๋ผ ๋ฉ”๋ชจ๋ฆฌ ํ• ๋‹น ์ „์ฒด์—์„œ ๋ฐ์ดํ„ฐ ๊ณ„๋ณด๋ฅผ ํ™•์ธํ•˜๊ณ , ์ œ์–ด ๋งค๊ฐœ๋ณ€์ˆ˜์˜ ์ถœ์ฒ˜๋ฅผ ํ™•์ธํ•˜๊ณ , ์•ˆ์ „ํ•˜์ง€ ์•Š๊ฑฐ๋‚˜ ์ธ์ฆ๋˜์ง€ ์•Š์€ ์ปจํ…์ŠคํŠธ ๊ฐ’์˜ ์‚ฌ์šฉ์„ ํ”Œ๋ž˜๊ทธ๋กœ ์ง€์ •ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

CICS ํ™˜๊ฒฝ์˜ ์ •์  ๋ถ„์„ ๋ฒ”์œ„

CICS ํ™˜๊ฒฝ์—์„œ ์ •์  ๋ถ„์„์€ ๊ธฐ๋ณธ์ ์ธ ๊ตฌ๋ฌธ์ด๋‚˜ ํ‚ค์›Œ๋“œ ๊ฐ์ง€๋ฅผ ๋„˜์–ด์•ผ ํ•ฉ๋‹ˆ๋‹ค. ๋ถ„์„๊ฐ€๋Š” ์ฝ”๋“œ ๊ตฌ์กฐ๋ฟ๋งŒ ์•„๋‹ˆ๋ผ ํŠธ๋žœ์žญ์…˜ ๋ชจ๋ธ, ํ”„๋กœ๊ทธ๋žจ ์—ฐ๊ฒฐ, ๋ฐ์ดํ„ฐ ํ๋ฆ„, ๊ถŒํ•œ ๊ฒฝ๊ณ„๊นŒ์ง€ ์ดํ•ดํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค. ์ „์ฒด ํ‰๊ฐ€๋Š” ์‚ฌ์šฉ์ž, ํ„ฐ๋ฏธ๋„, ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์ด ๊ณต์œ  ๋ฉ”๋ชจ๋ฆฌ์™€ ์—ฐ์‡„ ์‹คํ–‰ ๋กœ์ง์„ ํ†ตํ•ด ์–ด๋–ป๊ฒŒ ์ƒํ˜ธ์ž‘์šฉํ•˜๋Š”์ง€๋ฅผ ๋ฐ˜์˜ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์ด๋Ÿฌํ•œ ์ˆ˜์ค€์˜ ๊ฒ€์‚ฌ๋Š” ํŠนํžˆ ์ˆ˜์‹ญ ๋…„ ์ „์— ์ž‘์„ฑ๋˜์–ด ์—ฌ๋Ÿฌ ํŒ€์ด ์˜ค๋žœ ์‹œ๊ฐ„ ๋™์•ˆ ์œ ์ง€ ๊ด€๋ฆฌํ•˜๋Š” ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์„ ์‚ฌ์šฉํ•˜๋Š” ๊ฒฝ์šฐ ๋ณต์žกํ•ฉ๋‹ˆ๋‹ค. ํ”„๋กœ๊ทธ๋žจ์€ ๊ตฌ์กฐํ™”๋˜์ง€ ์•Š์€ ์ œ์–ด ํ๋ฆ„, ๋™์ ์ธ ์‰ผํ‘œ ์‚ฌ์šฉ, ๊ทธ๋ฆฌ๊ณ  ์žฌ์‚ฌ์šฉ๋œ ํ”„๋กœ๊ทธ๋žจ ID์— ์˜์กดํ•˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ๋งŽ์€๋ฐ, ์ด๋Ÿฌํ•œ ๋ชจ๋“  ์š”์†Œ๋Š” ๊ถŒํ•œ์˜ ์‹œ์ž‘๊ณผ ๋์„ ๋ชจํ˜ธํ•˜๊ฒŒ ๋งŒ๋“ญ๋‹ˆ๋‹ค.

์‹ ๋ขฐ ๊ฒฝ๊ณ„๋ฅผ ์œ„ํ•œ COBOL-CICS ์†Œ์Šค ํ๋ฆ„ ๋ถ„์„

์ตœ์‹  ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜ ํ™˜๊ฒฝ์—์„œ ์‹ ๋ขฐ ๊ฒฝ๊ณ„๋Š” ์ผ๋ฐ˜์ ์œผ๋กœ ํ”„๋ŸฐํŠธ์—”๋“œ UI์™€ API ์‚ฌ์ด์™€ ๊ฐ™์€ ๊ณ„์ธต์— ์˜ํ•ด ์ •์˜๋ฉ๋‹ˆ๋‹ค. CICS์—์„œ๋Š” ์‹ ๋ขฐ ๊ฒฝ๊ณ„๊ฐ€ ์ข…์ข… ์•”๋ฌต์ ์ด๋ฉฐ ํ”„๋กœ๊ทธ๋žจ ์—ฐ๊ฒฐ ๋‚ด๋ถ€์— ๋ฌปํ˜€ ์žˆ์Šต๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์–ด๋–ค ํ”„๋กœ๊ทธ๋žจ์ด ๋‹ค๋ฅธ ํ”„๋กœ๊ทธ๋žจ์— ์ œ์–ด๊ถŒ์„ ๋„˜๊ธฐ๋Š”์ง€, ์ž…๋ ฅ์ด ์‹œ์Šคํ…œ์— ์–ด๋–ป๊ฒŒ ๋“ค์–ด์˜ค๋Š”์ง€, ๊ทธ๋ฆฌ๊ณ  ํ•ด๋‹น ์ž…๋ ฅ์˜ ์ถœ์ฒ˜๊ฐ€ ์‹ ๋ขฐํ•  ์ˆ˜ ์žˆ๋Š”์ง€ ์—ฌ๋ถ€๋ฅผ ์ถ”์ ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์˜ˆ๋ฅผ ๋“ค์–ด, ๋กœ๊ทธ์ธ ํŠธ๋žœ์žญ์…˜์œผ๋กœ ์‹œ์ž‘ํ•˜๋Š” ์ฒด์ธ์€ ๋‹ค์„ฏ ๊ฐœ ์ด์ƒ์˜ ํ”„๋กœ๊ทธ๋žจ์„ ๊ฑฐ์ณ ์ œ์–ด๊ถŒ์„ ๋„˜๊ธธ ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ํ”„๋กœ๊ทธ๋žจ ์ค‘ ํ•˜๋‚˜๊ฐ€ ์ƒˆ๋กœ์šด ์‚ฌ์šฉ์ž ์ž…๋ ฅ(์˜ˆ: ์—…๋ฐ์ดํŠธ๋œ ์ฝค๋งˆ ์„ธ๊ทธ๋จผํŠธ)์„ ์žฌ๊ฒ€์ฆํ•˜์ง€ ์•Š๊ณ  ๋ฐ›์•„๋“ค์ด๋ฉด ์‹ ๋ขฐ ๊ฒฝ๊ณ„๊ฐ€ ๋ฌด๋„ˆ์ง‘๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์ด๋Ÿฌํ•œ ์ „ํ™˜ ์ง€์ ์„ ๊ฒ€ํ†  ๋Œ€์ƒ์œผ๋กœ ํ‘œ์‹œํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

๊ฒ€ํ† ํ•ด์•ผ ํ•  ์ค‘์š”ํ•œ ์ธก๋ฉด์€ ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

  • ์™ธ๋ถ€ ๋ฐ์ดํ„ฐ๊ฐ€ ์‹คํ–‰ ๊ฒฝ๋กœ์— ๋“ค์–ด์˜ค๋Š” ์ง„์ž…์ 
  • ํ˜ธ์ถœ์ž๋ฅผ ํ™•์ธํ•˜์ง€ ์•Š๊ณ  ๋ฐœ์ƒํ•˜๋Š” LINK ๋˜๋Š” XCTL ํ˜ธ์ถœ
  • ์‹คํ–‰์ด ์ธ์ฆ๋œ ํ๋ฆ„์—์„œ ์ธ์ฆ๋˜์ง€ ์•Š์€ ํ๋ฆ„์œผ๋กœ ์ „ํ™˜๋˜๋Š” ์˜์—ญ

ํ•˜๋“œ์ฝ”๋”ฉ๋œ ์ž๊ฒฉ ์ฆ๋ช… ๋ฐ ๊ถŒํ•œ ์—์Šค์ปฌ๋ ˆ์ด์…˜ ๋…ผ๋ฆฌ ๊ฐ์ง€

ํ•˜๋“œ์ฝ”๋”ฉ๋œ ๋ณด์•ˆ ํ† ํฐ, ์‚ฌ์šฉ์ž ID ๋˜๋Š” APPLID๋Š” ์‹ ์†ํ•œ ๊ฐœ๋ฐœ์ด๋‚˜ ๊ธด๊ธ‰ ํŒจ์น˜ ๊ณผ์ •์—์„œ ๋„์ž…๋˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๊ฐ’์€ ํ‘œ์ค€ ์•ก์„ธ์Šค ์ œ์–ด๋ฅผ ์žฌ์ •์˜ํ•˜๊ฑฐ๋‚˜ ์‹ค์ œ ์ธ์ฆ ์‹คํŒจ ์‹œ ๋Œ€์ฒด ์•ก์„ธ์Šค๋ฅผ ํ—ˆ์šฉํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์˜ˆ๋ฅผ ๋“ค์–ด, ๋‹ค์Œ๊ณผ ๊ฐ™์€ COBOL ์„ธ๊ทธ๋จผํŠธ:

IF USER-ID = 'SECADMIN' THEN
MOVE 'Y' TO AUTH-FLAG
END-IF

ํ‘œ๋ฉด์ ์œผ๋กœ๋Š” ์œ„ํ—˜ํ•˜์ง€ ์•Š์•„ ๋ณด์ผ ์ˆ˜ ์žˆ์ง€๋งŒ, USER-ID ์™ธ๋ถ€์—์„œ ์˜ํ–ฅ์„ ๋ฐ›๊ฑฐ๋‚˜ ๋‹ค๋ฅธ ํ”„๋กœ๊ทธ๋žจ์—์„œ ์žฌ์‚ฌ์šฉ๋  ์ˆ˜ ์žˆ์œผ๋ฏ€๋กœ ์ง€์†์ ์ธ ์œ„ํ—˜์ด ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„ ์—”์ง„์€ ๋‹ค์Œ์„ ๊ฒ€์ƒ‰ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

  • IF ๋ฌธ ๋˜๋Š” ํ• ๋‹น์˜ ๋ณด์•ˆ์— ๋ฏผ๊ฐํ•œ ๊ฐ’
  • ๊ฒ€์ฆ ์—†์ด ์ง์ ‘ ์„ค์ •๋œ ๊ถŒํ•œ ํ”Œ๋ž˜๊ทธ
  • ์ œ์–ด ๋…ผ๋ฆฌ๋ฅผ ์šฐํšŒํ•˜๋Š” ์ผ๋ฐ˜ APPLID ๋˜๋Š” ์‚ฌ์šฉ์ž ์ด๋ฆ„ ์‚ฌ์šฉ

์ด๋Ÿฌํ•œ ํŒจํ„ด์€ ๋ฏธ๋ฌ˜ํ•˜์ง€๋งŒ, ๋ณด์•ˆ ๋กœ์ง์ด ๋น„์ฆˆ๋‹ˆ์Šค ๊ทœ์น™๊ณผ ์–ฝํ˜€ ์žˆ๋Š” ๋” ํฐ ์„ค๊ณ„ ๋ฌธ์ œ๋ฅผ ๋‚˜ํƒ€๋‚ด๋Š” ๊ฒฝ์šฐ๊ฐ€ ๋งŽ์Šต๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์„ ํ†ตํ•ด ์ด๋Ÿฌํ•œ ํŒจํ„ด์„ ๋ถ„๋ฆฌํ•˜๋ฉด ํŒ€์ด ์ˆจ๊ฒจ์ง„ ๊ถŒํ•œ ๊ฒฝ๋กœ ์—†์ด ์•ˆ์ „ํ•˜๊ฒŒ ์ฝ”๋“œ๋ฅผ ๋ฆฌํŒฉํ† ๋งํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

CICS ํ™˜๊ฒฝ์˜ ์ •์  ๋ถ„์„ ๋ฒ”์œ„

CICS ์‹œ์Šคํ…œ์€ ๊ธฐ์กด ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜ ์Šคํƒ๊ณผ ์ƒ๋‹นํžˆ ๋‹ค๋ฆ…๋‹ˆ๋‹ค. ์ตœ์‹  ์„œ๋น„์Šค๋Š” API์™€ ์ด๋ฒคํŠธ ๊ธฐ๋ฐ˜ ํ๋ฆ„์„ ์ œ๊ณตํ•˜๋Š” ๋ฐ˜๋ฉด, CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์€ ์‰ผํ‘œ, ํ„ฐ๋ฏธ๋„ ์ž…๋ ฅ, ๊ณต์œ  ๋ฉ”๋ชจ๋ฆฌ๋ฅผ ํ†ตํ•ด ์ „๋‹ฌ๋˜๋Š” ๋ฐ์ดํ„ฐ์— ์˜์กดํ•˜๋Š” ๋ฐ€์ ‘ํ•˜๊ฒŒ ๊ฒฐํ•ฉ๋œ ํ”„๋กœ๊ทธ๋žจ ์ฒด์ธ ํ˜•ํƒœ๋กœ ์‹คํ–‰๋˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ๋งŽ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ์•„ํ‚คํ…์ฒ˜๋Š” ์ •์  ๋ถ„์„์„ ํŠนํžˆ ์–ด๋ ต๊ฒŒ ๋งŒ๋“ญ๋‹ˆ๋‹ค. ๋ถ„์„๊ฐ€๋Š” ๋‹จ์ˆœํžˆ ์•Œ๋ ค์ง„ ์ทจ์•ฝํ•œ ํ˜ธ์ถœ์„ ์ฐพ๋Š” ๊ฒƒ์ด ์•„๋‹ˆ๋ผ, ์ˆ˜์‹ญ ๋…„์˜ ๋ ˆ๊ฑฐ์‹œ ๊ฐœ๋ฐœ์— ๊ฑธ์ณ ์žˆ๋Š” ์—ฌ๋Ÿฌ ํ”„๋กœ๊ทธ๋žจ์˜ ์‹คํ–‰ ํ๋ฆ„์„ ์žฌ๊ตฌ์„ฑํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์˜๋ฏธ ์žˆ๋Š” ์ •์  ๊ฒ€ํ† ๋Š” ๋ฐ์ดํ„ฐ๊ฐ€ ์‹œ์Šคํ…œ์— ์ž…๋ ฅ๋˜๋Š” ๋ฐฉ์‹, ํ•œ ๋ชจ๋“ˆ์—์„œ ๋‹ค์Œ ๋ชจ๋“ˆ๋กœ ์ œ์–ด๊ฐ€ ์ „๋‹ฌ๋˜๋Š” ๋ฐฉ์‹, ๊ทธ๋ฆฌ๊ณ  ๊ฒ€์ฆ์ด ํ•„์š”ํ•˜์ง€๋งŒ ์‹ค์ œ๋กœ ์ˆ˜ํ–‰๋˜์ง€ ์•Š๋Š” ๋ถ€๋ถ„์„ ๊ณ ๋ คํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค. CICS์—์„œ ๋ณด์•ˆ ์œ„๋ฐ˜์€ ๋ช…๋ฐฑํžˆ ์œ„ํ—˜ํ•œ ํ˜ธ์ถœ์—์„œ ํ•ญ์ƒ ๋ฐœ์ƒํ•˜๋Š” ๊ฒƒ์€ ์•„๋‹™๋‹ˆ๋‹ค. ๋” ์ž์ฃผ ๋ฐœ์ƒํ•˜๋Š” ๊ฒƒ์€ ์‹ ๋ขฐ์— ๋Œ€ํ•œ ๊ฐ„๊ณผ๋œ ๊ฐ€์ •, ์ปจํ…์ŠคํŠธ ํ™•์ธ ๋ˆ„๋ฝ, ๋˜๋Š” ์ค‘์ฒฉ ๋˜๋Š” ์ง€์—ฐ ์‹คํ–‰ ํ๋ฆ„์—์„œ ๋ฐœ์ƒํ•˜๋Š” ๊ถŒํ•œ ๋ถˆ์ผ์น˜์ž…๋‹ˆ๋‹ค.

์‹ ๋ขฐ ๊ฒฝ๊ณ„๋ฅผ ์œ„ํ•œ COBOL-CICS ์†Œ์Šค ํ๋ฆ„ ๋ถ„์„

์ผ๋ฐ˜์ ์ธ COBOL-CICS ํŠธ๋žœ์žญ์…˜์€ ๋‹จ์ผ ๋ชจ๋†€๋ฆฌ์‹ ๋ธ”๋ก์œผ๋กœ ๊ตฌ์„ฑ๋˜์ง€ ์•Š์Šต๋‹ˆ๋‹ค. ์ด๋Š” ์ข…์ข… ์—ฌ๋Ÿฌ ํ”„๋กœ๊ทธ๋žจ์œผ๋กœ ์—ฐ๊ฒฐ๋ฉ๋‹ˆ๋‹ค. EXEC CICS LINK, XCTL๋ฐ RETURN, commarea ๋ธ”๋ก์„ ์‚ฌ์šฉํ•˜์—ฌ ๋ฐ์ดํ„ฐ๋ฅผ ๊ณต์œ ํ•ฉ๋‹ˆ๋‹ค. ๋งŽ์€ ํ”„๋กœ๊ทธ๋žจ์€ ์ˆ˜์‹ ํ•œ commarea ์ฝ˜ํ…์ธ ์˜ ์œ ํšจ์„ฑ์„ ๋…๋ฆฝ์ ์œผ๋กœ ๊ฒ€์ฆํ•˜์ง€ ์•Š๊ณ , ์‹ ๋ขฐํ•  ์ˆ˜ ์žˆ๋Š” ํ˜ธ์ถœ์ž๊ฐ€ ์ด๋ฏธ ์œ ํšจ์„ฑ ๊ฒ€์‚ฌ๋ฅผ ์ˆ˜ํ–‰ํ–ˆ๋‹ค๋Š” ๊ฐ€์ •์— ์˜์กดํ•ฉ๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๊ฐ€์ •์€ ๊ถŒํ•œ ๋ณ€๋™ ๋ฐ ๋ฌด๋‹จ ์ ‘๊ทผ์˜ ๊ฐ€์žฅ ๋นˆ๋ฒˆํ•œ ์›์ธ ์ค‘ ํ•˜๋‚˜์ž…๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„์€ ๋ฐ์ดํ„ฐ ์œ ์ž…์˜ ์‹œ์ž‘์ ์„ ํŒŒ์•…ํ•˜๊ณ  ์ด๋Ÿฌํ•œ ํ˜ธ์ถœ์„ ํ†ตํ•œ ๋ฐ์ดํ„ฐ ์ „ํŒŒ๋ฅผ ์ถ”์ ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค. ์˜ˆ๋ฅผ ๋“ค๋ฉด ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

MOVE WS-USERID TO COMM-USERID  
EXEC CICS LINK PROGRAM('ACCTUPD') COMMAREA(COMMAREA-BLOCK) LENGTH(COMM-LEN)

๊ทธ๋Ÿฐ ๋‹ค์Œ ACCTUPD, ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๋‚ด์šฉ์ด ๋‚˜ํƒ€๋‚  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

IF COMM-USERID = 'ADMIN01'  
PERFORM ADMIN-ROUTINE

์ด๋ ‡๊ฒŒ ํ•˜๋ฉด ์•”๋ฌต์ ์ธ ์‹ ๋ขฐ ๊ฒฝ๊ณ„๊ฐ€ ์ƒ์„ฑ๋ฉ๋‹ˆ๋‹ค. WS-USERID ํ๋ฆ„ ์ดˆ๊ธฐ์— ๋ฎ์–ด ์“ฐ๊ฑฐ๋‚˜ ์œ„์กฐ๋œ ์ ์ด ์žˆ์Šต๋‹ˆ๊นŒ? ACCTUPD ๊ด€๋ฆฌ ๋ฃจํ‹ด์„ ๋งน๋ชฉ์ ์œผ๋กœ ์‹คํ–‰ํ•ฉ๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์ƒ๊ด€ ๊ด€๊ณ„๋ฅผ ๊ฐ€์ ธ์•ผ ํ•ฉ๋‹ˆ๋‹ค. COMM-USERID์ถœ์ฒ˜๋ฅผ ํ‘œ์‹œํ•˜๊ณ  ์ด๋ฅผ ์‚ฌ์šฉํ•˜์—ฌ ๋ฏผ๊ฐํ•œ ์˜์‚ฌ ๊ฒฐ์ •์„ ๋‚ด๋ฆฌ๋Š” ๋ชจ๋“  ๋‹ค์šด์ŠคํŠธ๋ฆผ ์ฝ”๋“œ๋ฅผ ์žฌ๊ฒ€์ฆํ•˜์ง€ ์•Š๊ณ  ํ‘œ์‹œํ•ฉ๋‹ˆ๋‹ค.

์ •์  ์Šค์บ”์„ ํ†ตํ•ด ๊ฐ์ง€ํ•  ์ˆ˜ ์žˆ๋Š” ์ผ๋ฐ˜์ ์ธ ์‹ ๋ขฐ ๊ฒฝ๊ณ„ ์œ„๋ฐ˜์€ ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

  • ๋กœ์ปฌ ์ธ์ฆ ์—†์ด ์‰ผํ‘œ ํ•„๋“œ๋ฅผ ๊ธฐ๋ฐ˜์œผ๋กœ ํ•˜๋Š” ๊ฒฐ์ • ๋ถ„๊ธฐ
  • ํ„ฐ๋ฏธ๋„ ๋˜๋Š” APPLID ๊ฐ’์— ๋”ฐ๋ผ ์กฐ๊ฑดํ™”๋œ ๋…ผ๋ฆฌ ์‹คํ–‰
  • ์‚ฌ์šฉ EIBTRMID, EIBTASKN๋ฐ EIBRESP ์›์  ํ™•์ธ์ด ์—†๋Š” ์ œ์–ด ๋…ผ๋ฆฌ์—์„œ
  • ๊ฐ€์ƒ ๋Œ€ํ™”ํ˜• ์ฒด์ธ์— ๋‹ค์‹œ ๋“ค์–ด๊ฐˆ ๋•Œ ์‚ฌ์šฉ์ž ์„ธ์…˜ ์žฌ๊ฒ€์ฆ์ด ์—†์Œ

ํ•˜๋“œ์ฝ”๋”ฉ๋œ ์ž๊ฒฉ ์ฆ๋ช… ๋ฐ ๊ถŒํ•œ ์—์Šค์ปฌ๋ ˆ์ด์…˜ ๋…ผ๋ฆฌ ๊ฐ์ง€

์ •์  ๊ฒ€ํ† ๋ฅผ ํ†ตํ•ด COBOL ๋ช…๋ น๋ฌธ์— ์ง์ ‘ ํฌํ•จ๋œ ํ•˜๋“œ์ฝ”๋”ฉ๋œ ์‚ฌ์šฉ์ž ID, ํŠน์ˆ˜ ์ฝ”๋“œ ๋˜๋Š” APPLID๊ฐ€ ์ž์ฃผ ๋ฐœ๊ฒฌ๋ฉ๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ํ•ญ๋ชฉ์€ ๋‚ด๋ถ€ ํ…Œ์ŠคํŠธ๋‚˜ ์šด์˜์ƒ์˜ ์ž„์‹œ ํ•ด๊ฒฐ์ฑ…์œผ๋กœ ์ถ”๊ฐ€๋˜์—ˆ์„ ์ˆ˜ ์žˆ์ง€๋งŒ, ์‹ค์ œ ์šด์˜ ํ™˜๊ฒฝ์— ๊ทธ๋Œ€๋กœ ๋‚จ์•„ ์‹ฌ๊ฐํ•œ ์œ„ํ—˜์„ ์ดˆ๋ž˜ํ•˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ๋งŽ์Šต๋‹ˆ๋‹ค.

๋‹ค์Œ์€ ์ž์ฃผ ํ‘œ์‹œ๋˜๋Š” ์‹ค์ œ ์ƒ˜ํ”Œ ํŒจํ„ด์ž…๋‹ˆ๋‹ค.

IF USER-ID = 'SYSROOT'  
MOVE 'FULL' TO ACCESS-LEVEL

or

IF EIBTRMID = 'TSTTERM1'  
MOVE 'Y' TO BYPASS-SECURITY-FLAG

์ด๋Ÿฌํ•œ ๊ณต๊ฒฉ์€ ํ†ต์ œ๋˜์ง€ ์•Š๋Š” ๊ฒฝ๋กœ๋ฅผ ์ƒ์„ฑํ•˜์—ฌ ๋†’์€ ๊ถŒํ•œ์œผ๋กœ ์ ‘๊ทผํ•˜๊ฒŒ ํ•ฉ๋‹ˆ๋‹ค. ๊ณต๊ฒฉ์ž๊ฐ€ ํ„ฐ๋ฏธ๋„์— ์ ‘๊ทผํ•˜๊ฑฐ๋‚˜ ํ•˜๋“œ์ฝ”๋”ฉ๋œ ์‚ฌ์šฉ์ž ID๋ฅผ ๋ฐœ๊ฒฌํ•˜๋ฉด, ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์˜ ๋‚˜๋จธ์ง€ ๋ถ€๋ถ„์€ ๋งˆ์น˜ ์ „์ฒด ์ธ์ฆ์ด ์ด๋ฃจ์–ด์ง„ ๊ฒƒ์ฒ˜๋Ÿผ ๋™์ž‘ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ข€ ๋” ๋ฏธ๋ฌ˜ํ•œ ์˜ˆ:

IF SUBSTR(COMMAREA-DATA, 1, 5) = 'DEBUG'  
PERFORM DIAGNOSTIC-ROUTINES

์ด ๋…ผ๋ฆฌ๊ฐ€ ์ œ๊ฑฐ๋˜๊ฑฐ๋‚˜ ๋ณดํ˜ธ๋˜์ง€ ์•Š์œผ๋ฉด, ์กฐ์ž‘๋œ ์ž…๋ ฅ์œผ๋กœ ์ธํ•ด ์ผ๋ฐ˜ ์‚ฌ์šฉ์ž๋ฅผ ๋Œ€์ƒ์œผ๋กœ ํ•˜์ง€ ์•Š๋Š” ๋กœ๊ทธ, ํŒŒ์ผ ํฌ์ธํ„ฐ ๋˜๋Š” ๋ฉ”๋ชจ๋ฆฌ ์ง„๋‹จ์„ ๋…ธ์ถœํ•˜๋Š” ๊ธฐ๋Šฅ์ด ํ™œ์„ฑํ™”๋  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ด๋Ÿฌํ•œ ๊ฒฐํ•จ์„ ๊ฐ์ง€ํ•˜๊ธฐ ์œ„ํ•œ ์ •์  ๊ทœ์น™์„ ์ž‘์„ฑํ•  ๋•Œ ๋‹ค์Œ ์‚ฌํ•ญ์— ์ค‘์ ์„ ๋‘์‹ญ์‹œ์˜ค.

  • IF or EVALUATE ์‚ฌ์šฉ์ž ๋˜๋Š” ํ„ฐ๋ฏธ๋„์— ์—ฐ๊ฒฐ๋œ ํ•˜๋“œ์ฝ”๋”ฉ๋œ ๋ฆฌํ„ฐ๋Ÿด ๊ฐ’์„ ์‚ฌ์šฉํ•˜๋Š” ๋ช…๋ น๋ฌธ
  • ํ•˜๋“œ์ฝ”๋”ฉ๋œ ์ž๊ฒฉ ์ฆ๋ช…์„ ์•ก์„ธ์Šค ํ”Œ๋ž˜๊ทธ์— ์ง์ ‘ ๋งคํ•‘
  • ๋‹ค์Œ๊ณผ ๊ฐ™์€ ํ”Œ๋ž˜๊ทธ BYPASS, OVERRIDE๋ฐ DEBUG ์กฐ๊ฑด ๋…ผ๋ฆฌ๋ฅผ ํŠธ๋ฆฌ๊ฑฐํ•˜๋Š”
  • ์‚ฌ์šฉ์ž ์ด๋ฆ„์ด๋‚˜ ํ„ฐ๋ฏธ๋„ ID์— ๋Œ€ํ•œ ํ‘œ๋ฉด์ ์ธ ๊ฒ€์‚ฌ๋กœ๋งŒ ๋ณดํ˜ธ๋˜๋Š” ์ฝ”๋“œ ์„น์…˜

๋งŽ์€ ๊ฒฝ์šฐ ์ด๋Ÿฌํ•œ ์ ๊ฒ€์€ ๋น„๊ณต์‹์ ์œผ๋กœ ์ถ”๊ฐ€๋˜์—ˆ๊ณ  ๊ฒ€ํ† ๋˜์ง€ ์•Š์•˜์Šต๋‹ˆ๋‹ค. ์ •์  ๊ฒ€์‚ฌ๋ฅผ ํ†ตํ•ด ์ˆ˜๋™ ์ ๊ฒ€์„ ์œ„ํ•ด ํ”Œ๋ž˜๊ทธ๋ฅผ ์ง€์ •ํ•˜๊ฑฐ๋‚˜, ๋ฐ˜๋ณต์ ์ธ ์˜ค์šฉ์— ๋Œ€ํ•ด ํŒจํ„ด ๊ธฐ๋ฐ˜ ์•Œ๋ฆผ์„ ์‹œํ–‰ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„ ๋ Œ์ฆˆ๋ฅผ ํ™•์žฅํ•˜์—ฌ ์ด๋Ÿฌํ•œ ๊ฒฝ๊ณ„ ์กฐ๊ฑด๊ณผ ํ•˜๋“œ์ฝ”๋”ฉ๋œ ๋Œ€์ฒด ๋ฐฉ์•ˆ์„ ํฌ์ฐฉํ•จ์œผ๋กœ์จ ๊ฐ์‚ฌ์›๊ณผ ๋ณด์•ˆ ์—”์ง€๋‹ˆ์–ด๋Š” CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์ด ์‹ ๋ขฐ ์ฒด์ธ์„ ๋Š์„ ์ˆ˜ ์žˆ๋Š” ๋ถ€๋ถ„์„ ๋” ์ž˜ ํŒŒ์•…ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ๋‚˜๋จธ์ง€ ์‹œ์Šคํ…œ์€ ์•ˆ์ „ํ•˜๊ฒŒ ์ž‘๋™ํ•˜๋Š” ๊ฒƒ์ฒ˜๋Ÿผ ๋ณด์ด๋”๋ผ๋„ ๋ง์ž…๋‹ˆ๋‹ค.

๋ณด์•ˆ ์œ„ํ—˜์„ ๋‚˜ํƒ€๋‚ด๋Š” ์ฝ”๋“œ ๊ตฌ์กฐ ํŒจํ„ด

๊ฐœ๋ณ„ CICS ๋ช…๋ น์€ ๋‹จ๋…์œผ๋กœ๋Š” ์•ˆ์ „ํ•ด ๋ณด์ผ ์ˆ˜ ์žˆ์ง€๋งŒ, ํ”„๋กœ๊ทธ๋žจ ๋กœ์ง์˜ ๊ตฌ์กฐ๊ฐ€ ํŠธ๋žœ์žญ์…˜์˜ ์‹ค์ œ ๋ณด์•ˆ ์—ฌ๋ถ€๋ฅผ ๊ฒฐ์ •ํ•˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ๋งŽ์Šต๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ๋‹จ์ˆœํžˆ ์ค„ ๋‹จ์œ„์˜ ์Šค์บ๋‹์„ ๋„˜์–ด ํ”„๋กœ๊ทธ๋žจ ๊ฐ„ ์ƒํ˜ธ ์ž‘์šฉ ๋ฐฉ์‹, ๊ถŒํ•œ ์œ ์ถ” ๋ฐฉ์‹, ๊ทธ๋ฆฌ๊ณ  ์ œ์–ด ํ๋ฆ„์— ์•”๋ฌต์  ์‹ ๋ขฐ๊ฐ€ ํฌํ•จ๋œ ๋ถ€๋ถ„์„ ํŒŒ์•…ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

๋ ˆ๊ฑฐ์‹œ ์‹œ์Šคํ…œ์€ ํŠนํžˆ ์ด๋Ÿฌํ•œ ํŒจํ„ด์— ์ทจ์•ฝํ•ฉ๋‹ˆ๋‹ค. ์‹œ๊ฐ„์ด ์ง€๋‚จ์— ๋”ฐ๋ผ ๊ฐœ๋ฐœํŒ€์€ ์ž„์‹œ ๋กœ์ง, ๊ถŒํ•œ ๋‹จ์ถ•, ๊ทธ๋ฆฌ๊ณ  ๊ด€์‹ฌ์‚ฌ ๋ถ„๋ฆฌ๋ฅผ ๋ชจํ˜ธํ•˜๊ฒŒ ๋งŒ๋“œ๋Š” ๋‹ค๋ชฉ์  ํŠธ๋žœ์žญ์…˜์„ ๋„์ž…ํ•ฉ๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๊ตฌ์กฐ์  ์•ˆํ‹ฐํŒจํ„ด์„ ํŒŒ์•…ํ•˜๋Š” ๊ฒƒ์€ ํŠธ๋žœ์žญ์…˜ ๋ณด์•ˆ์„ ๊ฐ•ํ™”ํ•˜๋Š” ๋ฐ ํ•„์ˆ˜์ ์ž…๋‹ˆ๋‹ค.

๊ถŒํ•œ์ด ์ƒ์Šน๋œ ํŠธ๋žœ์žญ์…˜-ํ”„๋กœ๊ทธ๋žจ ๋งคํ•‘

๊ฐ CICS ํŠธ๋žœ์žญ์…˜ ID๋Š” ์ผ๋ฐ˜์ ์œผ๋กœ ํŠน์ • ํ”„๋กœ๊ทธ๋žจ ๋˜๋Š” ๋””์ŠคํŒจ์น˜ ๋ฃจํ‹ด์— ๋งคํ•‘๋ฉ๋‹ˆ๋‹ค. ๊ทธ๋Ÿฌ๋‚˜ ๋งŽ์€ ์‹œ์Šคํ…œ์€ ์—ฌ๋Ÿฌ ๋ชจ๋“ˆ์—์„œ ํŠธ๋žœ์žญ์…˜ ์ฝ”๋“œ๋ฅผ ์žฌ์‚ฌ์šฉํ•˜๊ฑฐ๋‚˜ ์‚ฌ์šฉ์ž ์ž…๋ ฅ์— ๋”ฐ๋ผ ์—ฌ๋Ÿฌ ๋ฏผ๊ฐํ•œ ๊ธฐ๋Šฅ์„ ์ˆ˜ํ–‰ํ•  ์ˆ˜ ์žˆ๋Š” ๊ด‘๋ฒ”์œ„ํ•œ ํ”„๋กœ๊ทธ๋žจ ํ•ธ๋“ค๋Ÿฌ๋ฅผ ํ• ๋‹นํ•ฉ๋‹ˆ๋‹ค.

์ ์ ˆํ•œ ํ•„ํ„ฐ๋ง ์—†์ด ๋ฒ”์šฉ ํ•ธ๋“ค๋Ÿฌ๊ฐ€ ๋†’์€ ๊ถŒํ•œ์˜ ํŠธ๋žœ์žญ์…˜์— ์—ฐ๊ฒฐ๋˜๋ฉด ์œ„ํ—˜ํ•ด์ง‘๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์–ด๋–ค ํŠธ๋žœ์žญ์…˜ ID๊ฐ€ ์–ด๋–ค ํ”„๋กœ๊ทธ๋žจ์— ๋งคํ•‘๋˜๋Š”์ง€ ์ถ”์ ํ•˜๊ณ , ๊ฐ ํ”„๋กœ๊ทธ๋žจ์ด ํ•ด๋‹น ํŠธ๋žœ์žญ์…˜ ์ปจํ…์ŠคํŠธ์—์„œ ์–ด๋–ค ๋กœ์ง์„ ์‹คํ–‰ํ•˜๋Š”์ง€ ํ™•์ธํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์˜ˆ:

EXEC CICS RETRIEVE INTO(COMM-AREA)  
EVALUATE COMM-AREA-FUNCTION
WHEN 'UPDATE'
PERFORM UPDATE-ROUTINE
WHEN 'DELETE'
PERFORM DELETE-ROUTINE
WHEN OTHER
PERFORM INQUIRY-ROUTINE
END-EVALUATE

์œ„์˜ ๋‚ด์šฉ์ด ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๊ฑฐ๋ž˜์— ๋งคํ•‘๋˜๋Š” ๊ฒฝ์šฐ FINTRN01, ํ•ด๋‹น ๊ฑฐ๋ž˜์— ์Šน๊ฒฉ๋œ ์‹œ์Šคํ…œ ๊ถŒํ•œ์ด ํ• ๋‹น๋˜๋ฉด ํ•ด๋‹น ๊ถŒํ•œ์ด ๋‚จ์šฉ๋ฉ๋‹ˆ๋‹ค. COMM-AREA-FUNCTION ์‚ฌ์šฉ์ž๊ฐ€ ์—ญํ•  ์ œํ•œ์„ ์šฐํšŒํ•˜๊ณ  ์‚ญ์ œ ๋˜๋Š” ์—…๋ฐ์ดํŠธ ๋…ผ๋ฆฌ๋ฅผ ํ˜ธ์ถœํ•  ์ˆ˜ ์žˆ๋„๋ก ํ—ˆ์šฉํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์œ„ํ—˜ ์ง€ํ‘œ๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

  • ์‚ฌ์šฉ์ž๊ฐ€ ์ œ๊ณตํ•œ ํ”Œ๋ž˜๊ทธ๋ฅผ ๊ธฐ๋ฐ˜์œผ๋กœ ์—ฌ๋Ÿฌ ๊ฐ€์ง€ ๊ถŒํ•œ์ด ์žˆ๋Š” ์ž‘์—…์„ ์ˆ˜ํ–‰ํ•˜๋Š” ๋‹จ์ผ ํ”„๋กœ๊ทธ๋žจ
  • ํ•˜๋“œ์ฝ”๋”ฉ๋œ ํŠธ๋žœ์žญ์…˜-ํ•จ์ˆ˜ ์ œํ•œ์ด ๋ถ€์กฑํ•จ
  • ํ™˜๊ฒฝ ๋˜๋Š” ์‚ฌ์—…๋ถ€ ๊ฐ„ ๊ณต์œ  ๊ฑฐ๋ž˜ ์ฝ”๋“œ
  • ๋””์ŠคํŒจ์น˜ ๋ชจ๋“ˆ ๋‚ด์˜ ํŠน์ • ์ง€์ ์— ์—ฐ๊ฒฐ๋œ ์•ก์„ธ์Šค ๊ฒ€์‚ฌ๊ฐ€ ์—†์Œ

์ •์  ์Šค์บ”์€ commarea ํ”Œ๋ž˜๊ทธ๊ฐ€ ํ๋ฆ„์„ ์ œ์–ดํ•˜๋Š” ์œ„์น˜์™€ ํ•ด๋‹น ํ๋ฆ„์ด ์ธ์ฆ, ์—ญํ•  ๊ฒ€์ฆ ๋˜๋Š” ๋ฆฌ์†Œ์Šค ์ˆ˜์ค€ ์ œ์•ฝ ์กฐ๊ฑด์œผ๋กœ ๋ณดํ˜ธ๋˜๋Š”์ง€ ์—ฌ๋ถ€๋ฅผ ์‹๋ณ„ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

๋ช…๋ น ์ˆ˜์ค€ ๋Œ€ ๋งคํฌ๋กœ ์ˆ˜์ค€ ํ˜ธ์ถœ ๊ฒฝ๋กœ์˜ ์•ฝ์ 

๋˜ ๋‹ค๋ฅธ ์œ„ํ—˜ ์š”์†Œ๋Š” ๋ช…๋ น ์ˆ˜์ค€ ํ”„๋กœ๊ทธ๋žจ๊ณผ ๋งคํฌ๋กœ ์ˆ˜์ค€ ํ”„๋กœ๊ทธ๋žจ ๊ฐ„์˜ ๋ถˆ์ผ์น˜์ž…๋‹ˆ๋‹ค. ์‹œ๊ฐ„์ด ์ง€๋‚จ์— ๋”ฐ๋ผ ๋ฐœ์ „ํ•ด ์˜จ ์‹œ์Šคํ…œ์€ ์ข…์ข… ๋‘ ๊ฐ€์ง€ ์Šคํƒ€์ผ์ด ํ˜ผํ•ฉ๋˜์–ด ์žˆ์Šต๋‹ˆ๋‹ค. ๋ช…๋ น ์ˆ˜์ค€ ์ฝ”๋“œ๋Š” ๊ตฌ์กฐํ™”๋œ ๊ตฌ๋ฌธ๊ณผ ๋” ๋‚˜์€ ๊ฐ€๋…์„ฑ์˜ ์ด์ ์„ ์ œ๊ณตํ•˜๋Š” ๋ฐ˜๋ฉด, ๋งคํฌ๋กœ ์ˆ˜์ค€ ์ฝ”๋“œ๋Š” ๋‚ฎ์€ ์ˆ˜์ค€์˜ ์ ‘๊ทผ ๊ถŒํ•œ๊ณผ ๋” ์ ์€ ๋ณดํ˜ธ ๊ธฐ๋Šฅ์„ ์ œ๊ณตํ•˜๋Š” ๊ฒฝํ–ฅ์ด ์žˆ์Šต๋‹ˆ๋‹ค.

๋‘ ์œ ํ˜•์„ ํ•จ๊ป˜ ์‚ฌ์šฉํ•˜๋ฉด ๋ฏธ๋ฌ˜ํ•œ ํ˜ธ์ถœ ๊ฒฝ๋กœ ์ทจ์•ฝ์ ์ด ๋ฐœ์ƒํ•  ์ˆ˜ ์žˆ์œผ๋ฉฐ, ํŠนํžˆ ๋งคํฌ๋กœ ์ˆ˜์ค€ ํ”„๋กœ๊ทธ๋žจ์ด ์ค‘๊ฐ„ ๋ณด์•ˆ์„ ์ ์šฉํ•˜์ง€ ์•Š๊ณ  ๋™์ ์œผ๋กœ ์—ฐ๊ฒฐ๋œ ๊ฒฝ์šฐ ๋”์šฑ ๊ทธ๋ ‡์Šต๋‹ˆ๋‹ค.

์˜ˆ:

  • ๋ช…๋ น ์ˆ˜์ค€ ํ”„๋กœ๊ทธ๋žจ์€ ๊ณต์œ  ๋ฉ”๋ชจ๋ฆฌ๋ฅผ ์ง์ ‘ ์ฝ๊ฑฐ๋‚˜ ์ˆ˜์ •ํ•˜๋Š” ๋งคํฌ๋กœ ์ˆ˜์ค€ ๋ชจ๋“ˆ์— ์—ฐ๊ฒฐ๋ฉ๋‹ˆ๋‹ค.
  • ๋งคํฌ๋กœ ์ˆ˜์ค€ ๋ชจ๋“ˆ์€ ํ˜ธ์ถœ ํ”„๋กœ๊ทธ๋žจ์ด ์ด๋ฏธ ๋ฐ์ดํ„ฐ์˜ ์œ ํšจ์„ฑ์„ ๊ฒ€์‚ฌํ–ˆ๋‹ค๊ณ  ๊ฐ€์ •ํ•ฉ๋‹ˆ๋‹ค.
  • ์ž…๋ ฅ๊ณผ ์‹คํ–‰ ์‚ฌ์ด์— ์ค‘๊ฐ„ ๊ฒ€์‚ฌ๋Š” ์ˆ˜ํ–‰๋˜์ง€ ์•Š์Šต๋‹ˆ๋‹ค.

ํ๋ฆ„์— ๋Œ€ํ•œ ๊ฐ„๋‹จํ•œ ๋ณด๊ธฐ:

* In command-level handler  
EXEC CICS LINK PROGRAM('LEGACYIO') COMMAREA(DATA-BLOCK)

* In macro-level module LEGACYIO
L R1,=V(DATA-BLOCK)
ST R1,=V(SYSTEM-FILE-POINTER)

์—ฌ๊ธฐ์„œ ๋งคํฌ๋กœ ์ˆ˜์ค€ ๋ชจ๋“ˆ์€ ์ €์žฅ์†Œ ํฌ์ธํ„ฐ์—์„œ ์ง์ ‘ ์ž‘๋™ํ•˜๋„๋ก ์‹ ๋ขฐ๋ฉ๋‹ˆ๋‹ค. ํ˜ธ์ถœ ํ”„๋กœ๊ทธ๋žจ์ด ์œ ํšจ์„ฑ ๊ฒ€์‚ฌ์— ์‹คํŒจํ•˜๋ฉด DATA-BLOCK๊ณต๊ฒฉ์ž๋Š” ๋ฉ”๋ชจ๋ฆฌ ์˜์—ญ์„ ์กฐ์ž‘ํ•˜๊ฑฐ๋‚˜ ์Šน์ธ๋˜์ง€ ์•Š์€ ๋ฐ์ดํ„ฐ ์„ธํŠธ๋ฅผ ์ฐธ์กฐํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„์—์„œ๋Š” ๋‹ค์Œ ์‚ฌํ•ญ์— ํŠนํžˆ ์ฃผ์˜ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

  • ๊ตฌ์กฐํ™”๋œ ํ”„๋กœ๊ทธ๋žจ์—์„œ ๋ ˆ๊ฑฐ์‹œ ๋ชจ๋“ˆ๋กœ์˜ LINK ๋˜๋Š” XCTL ํ˜ธ์ถœ
  • ๋ช…๋ น ์ˆ˜์ค€ ์ฝ”๋“œ์™€ ๋งคํฌ๋กœ ์ˆ˜์ค€ ์ฝ”๋“œ ๊ฐ„ ๋งค๊ฐœ๋ณ€์ˆ˜ ์ „๋‹ฌ
  • ๊ฒฝ๊ณ„ ๊ฒ€์‚ฌ ์—†์ด ์ €์žฅ์†Œ ํฌ์ธํ„ฐ ๋˜๋Š” ์‹œ์Šคํ…œ ํŒŒ์ผ ์‹๋ณ„์ž ์‚ฌ์šฉ
  • ์ž…๋ ฅ ๊ฒ€์ฆ์ด ๋‹ค๋ฅธ ๊ณณ์—์„œ ๋ฐœ์ƒํ•œ ๊ฒƒ์œผ๋กœ ๊ฐ€์ •๋˜๋Š” ์žฌ์‚ฌ์šฉ ๋ชจ๋“ˆ

์ด๋Ÿฌํ•œ ์ทจ์•ฝ์ ์€ ํ…Œ์ŠคํŠธ์—์„œ ๊ฑฐ์˜ ๋ฐœ๊ฒฌ๋˜์ง€ ์•Š์Šต๋‹ˆ๋‹ค. ์•…์šฉ ์กฐ๊ฑด์ด ํ„ฐ๋ฏธ๋„ ์ปจํ…์ŠคํŠธ, ์ž‘์—… ๋งค๊ฐœ๋ณ€์ˆ˜, ์‹คํ–‰ ํ๋ฆ„ ๊ฐ„์˜ ์ •ํ™•ํ•œ ์ผ์น˜๋ฅผ ์š”๊ตฌํ•˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ๋งŽ๊ธฐ ๋•Œ๋ฌธ์ž…๋‹ˆ๋‹ค. ํ•˜์ง€๋งŒ ์ •์  ๊ฒ€์‚ฌ๋Š” ์ด๋Ÿฌํ•œ ์ทจ์•ฝ์ ์„ ๊ฐ€๋Šฅํ•˜๊ฒŒ ํ•˜๋Š” ๊ตฌ์กฐ์  ์„ค์ •์„ ๊ฐ์ง€ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

๋ถ„์„๊ฐ€๋Š” ์ฝ”๋“œ์˜ ๊ฒฐํ•จ๋ฟ ์•„๋‹ˆ๋ผ ๊ตฌ์กฐ์  ์œ„ํ—˜์„ ์‹๋ณ„ํ•จ์œผ๋กœ์จ CICS ์‹œ์Šคํ…œ์˜ ์ „๋ฐ˜์ ์ธ ๋ณด์•ˆ ํƒœ์„ธ๋ฅผ ๋ณด๋‹ค ํšจ๊ณผ์ ์œผ๋กœ ํ‰๊ฐ€ํ•˜๊ณ  ์˜ํ–ฅ ์ž ์žฌ๋ ฅ์— ๋”ฐ๋ผ ์ˆ˜์ •์˜ ์šฐ์„ ์ˆœ์œ„๋ฅผ ์ •ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

CICS ํŠน์ • API ๋‚จ์šฉ์˜ ์ •์  ๊ฐ์ง€

CICS๋Š” ์‹œ์Šคํ…œ ์ˆ˜์ค€ ๋ฆฌ์†Œ์Šค์™€ ์ƒํ˜ธ ์ž‘์šฉํ•˜๋Š” ๊ด‘๋ฒ”์œ„ํ•œ EXEC ๋ช…๋ น๊ณผ ๋งคํฌ๋กœ๋ฅผ ์ œ๊ณตํ•ฉ๋‹ˆ๋‹ค. ์—ฌ๊ธฐ์—๋Š” ํ„ฐ๋ฏธ๋„ ์‹๋ณ„์ž, ์ž‘์—… ๋ฒˆํ˜ธ, ์„ธ์…˜ ๋ฉ”๋ชจ๋ฆฌ, ํŠธ๋žœ์žญ์…˜ ๋ผ์šฐํŒ… ๋กœ์ง ๋“ฑ์ด ํฌํ•จ๋ฉ๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๊ธฐ๋Šฅ์€ ์œ ์—ฐ์„ฑ์„ ์ œ๊ณตํ•˜์ง€๋งŒ, ์ถฉ๋ถ„ํ•œ ๋ณด์•ˆ ์กฐ์น˜ ์—†์ด ์‚ฌ์šฉํ•  ๊ฒฝ์šฐ ์ทจ์•ฝ์ ์ด ๋ฐœ์ƒํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ์ธํ„ฐํŽ˜์ด์Šค๋ฅผ ์˜ค์šฉํ•˜๋ฉด ์˜๋„์น˜ ์•Š์€ ๊ถŒํ•œ ์ƒ์Šน, ์ œ์–ด ์šฐํšŒ ๋˜๋Š” ๋ฌด๋‹จ ์‹œ์Šคํ…œ ์˜์—ญ ์ ‘๊ทผ์ด ๋ฐœ์ƒํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„์„ ํ†ตํ•ด ๊ฐœ๋ฐœ์ž์™€ ๊ฐ์‚ฌ์ž๋Š” API ํ˜ธ์ถœ ๋ฐฉ์‹, API์—์„œ ์‚ฌ์šฉํ•˜๋Š” ๋งค๊ฐœ๋ณ€์ˆ˜, ๊ทธ๋ฆฌ๊ณ  ํ˜ธ์ถœ ์ปจํ…์ŠคํŠธ๊ฐ€ ์ ์ ˆํ•œ ๊ฒ€์ฆ์„ ์ œ๊ณตํ•˜๋Š”์ง€ ์—ฌ๋ถ€๋ฅผ ๊ฒ€ํ† ํ•˜์—ฌ ์ด๋Ÿฌํ•œ ์œ„ํ—˜์„ ์‹๋ณ„ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ ์ ˆํ•œ ๊ตฌํ˜„์„ ์œ„ํ•ด์„œ๋Š” ํŠธ๋žœ์žญ์…˜ ๊ฐ„ ์‹คํ–‰ ์ปจํ…์ŠคํŠธ, ์•ก์„ธ์Šค ํŒจํ„ด, ๋ฐ์ดํ„ฐ ํ๋ฆ„ ๊ฒฝ๊ณ„๋ฅผ ๋ฉด๋ฐ€ํžˆ ๊ฒ€ํ† ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

EXEC CICS ASSIGN ๋ฐ ADDRESS์˜ ์•ˆ์ „ํ•˜์ง€ ์•Š์€ ์‚ฌ์šฉ ์ถ”์ 

The ASSIGN ADDRESS ๋ช…๋ น์€ CICS ๋‚ด๋ถ€ ๊ตฌ์กฐ์— ์ง์ ‘ ์•ก์„ธ์Šคํ•  ์ˆ˜ ์žˆ๋„๋ก ํ•ฉ๋‹ˆ๋‹ค. ์—ฌ๊ธฐ์—๋Š” ํ„ฐ๋ฏธ๋„ ID, ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜ ์‹๋ณ„์ž, ์ž‘์—…๋ณ„ ๋ฉ”๋ชจ๋ฆฌ ์œ„์น˜์™€ ๊ฐ™์€ ์ค‘์š”ํ•œ ๋ฉ”ํƒ€๋ฐ์ดํ„ฐ๊ฐ€ ํฌํ•จ๋ฉ๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๊ฐ’์€ ๋กœ๊น…์ด๋‚˜ ์„ธ์…˜ ์ถ”์ ์— ์ž์ฃผ ์‚ฌ์šฉ๋˜์ง€๋งŒ, ์ œ์–ด ๋กœ์ง์ด ๋ณด์•ˆ ๊ฒฐ์ •์„ ์œ„ํ•ด ์ด๋Ÿฌํ•œ ๊ฐ’์— ์˜์กดํ•  ๊ฒฝ์šฐ ์œ„ํ—˜ํ•ด์งˆ ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ด ์˜ˆ์ œ๋ฅผ ๋ณด์ž :

EXEC CICS ASSIGN TERMINALID(TERM-ID)
IF TERM-ID = 'DEVBYPASS'
PERFORM SKIP-AUTH-CHECKS

์—ฌ๊ธฐ์„œ ์ ‘๊ทผ ์ œ์–ด๋Š” ํ„ฐ๋ฏธ๋„ ID์— ์ง์ ‘ ์—ฐ๊ฒฐ๋ฉ๋‹ˆ๋‹ค. ํ•ด๋‹น ๊ฐ’์„ ์•Œ๊ณ  ์žˆ๊ฑฐ๋‚˜ ํ„ฐ๋ฏธ๋„ ์„ค์ •์„ ์Šคํ‘ธํ•‘ํ•  ์ˆ˜ ์žˆ๋Š” ์‚ฌ์šฉ์ž๋Š” ์ด ๋…ผ๋ฆฌ๋ฅผ ์•…์šฉํ•˜์—ฌ ๋ณด์•ˆ ๋ฉ”์ปค๋‹ˆ์ฆ˜์„ ์šฐํšŒํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

๋˜๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๋ณ€ํ˜•์„ ๊ณ ๋ คํ•˜์‹ญ์‹œ์˜ค. ADDRESS:

EXEC CICS ADDRESS EIBTASKN
MOVE EIBTASKN TO TRACE-BUFFER

๊ณ ๋ฆฝ๋œ ์ƒํƒœ์—์„œ๋Š” ์ด๊ฒƒ์ด ๋ฌดํ•ดํ•ด ๋ณด์ž…๋‹ˆ๋‹ค. ๊ทธ๋Ÿฌ๋‚˜ EIBTASKN ๋‚˜์ค‘์— ์ธ์ฆ์ด๋‚˜ ๊ฑฐ๋ž˜ ์Šน์ธ์— ์‚ฌ์šฉ๋˜๋ฉด ์˜ˆ์ธก ๊ฐ€๋Šฅ์„ฑ๊ณผ ๋ฌด๋‹จ ์„ธ์…˜ ์‚ฌ์นญ์˜ ์œ„ํ—˜์ด ์žˆ์Šต๋‹ˆ๋‹ค.

์•ˆ์ „ํ•˜์ง€ ์•Š์€ ASSIGN ๋ฐ ADDRESS ์‚ฌ์šฉ์˜ ์ผ๋ฐ˜์ ์ธ ์ง€ํ‘œ๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

  • ํ„ฐ๋ฏธ๋„ ID, APPLID ๋˜๋Š” ์ž‘์—… ๋ฒˆํ˜ธ๋งŒ์„ ๊ธฐ์ค€์œผ๋กœ ๋ถ„๊ธฐ ์ œ์–ด
  • ์•ก์„ธ์Šค ๊ฒ€์ฆ ๋˜๋Š” ์šฐํšŒ ํ”Œ๋ž˜๊ทธ์— ํ• ๋‹น๋œ ๊ฐ’์„ ์ง์ ‘ ์‚ฌ์šฉ
  • ADDRESS ๋ช…๋ น ํ›„ ๊ตฌ์กฐ์  ๊ฒ€์ฆ ์—†์ด ํฌ์ธํ„ฐ ์ฐธ์กฐ
  • IF ์กฐ๊ฑด์—์„œ ์‹œ์Šคํ…œ์ด ํ• ๋‹นํ•œ ์‹๋ณ„์ž์™€ ๋น„๊ตํ•œ ํ•˜๋“œ์ฝ”๋”ฉ๋œ ๊ฐ’

์ •์  ์Šค์บ๋‹ ๋„๊ตฌ๋Š” ํŠนํžˆ ํ• ๋‹น๋œ ๋ฐ์ดํ„ฐ๊ฐ€ ํ”„๋กœ๊ทธ๋žจ ๋ผ์šฐํŒ…์ด๋‚˜ ๊ถŒํ•œ ๋…ผ๋ฆฌ์— ์˜ํ–ฅ์„ ๋ฏธ์น˜๋Š” ๊ฒฝ์šฐ ์ด๋Ÿฌํ•œ ์กฐ๊ฑด์„ ํ”Œ๋ž˜๊ทธ๋กœ ํ‘œ์‹œํ•˜๋„๋ก ๊ตฌ์„ฑํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

๋Œ€์ฒด ์‹คํ–‰ ๊ฒฝ๋กœ๋ฅผ ํ†ตํ•œ ํŠธ๋žœ์žญ์…˜ ํ๋ฆ„ ๋ณ€์กฐ

๋งŽ์€ CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์—์„œ ํด๋ฐฑ(fallback) ๋˜๋Š” ๋Œ€์ฒด ํŠธ๋žœ์žญ์…˜ ๋ผ์šฐํŒ…(alternate transaction routing)์„ ํ†ตํ•ด ์žฅ์•  ํ—ˆ์šฉ์„ฑ์„ ํ–ฅ์ƒ์‹œํ‚ต๋‹ˆ๋‹ค. ํ•˜์ง€๋งŒ ์ด๋Ÿฌํ•œ ๋Œ€์ฒด ๊ฒฝ๋กœ๋Š” ์ ์ ˆํ•œ ์ ‘๊ทผ ๊ฒ€์ฆ์ด ๋ถ€์กฑํ•˜๊ฑฐ๋‚˜ ์˜๋„์น˜ ์•Š์€ ์ƒํ™ฉ์—์„œ ์ ‘๊ทผ๋  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋กœ ์ธํ•ด ๊ณต๊ฒฉ์ž๊ฐ€ ์ •์ƒ์ ์ธ ํŠธ๋žœ์žญ์…˜ ํ๋ฆ„ ์™ธ๋ถ€์—์„œ ๋ฏผ๊ฐํ•œ ๋กœ์ง์„ ์‹คํ–‰ํ•  ์ˆ˜ ์žˆ๋Š” ๊ธฐํšŒ๊ฐ€ ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค.

๋‹ค์Œ ์‚ฌ๋ก€๋ฅผ ๊ณ ๋ คํ•ด ๋ณด์„ธ์š”.

IF EIBCALEN = 0
EXEC CICS XCTL PROGRAM('RETRYTX')

์ด ์ฝ”๋“œ๋Š” ์‰ผํ‘œ๊ฐ€ ์ „๋‹ฌ๋˜์ง€ ์•Š์œผ๋ฉด ์‹คํ–‰ ๊ฒฝ๋กœ๋ฅผ ๋ณ€๊ฒฝํ•ฉ๋‹ˆ๋‹ค. ํ•˜์ง€๋งŒ RETRYTX ์‹ ๋ขฐํ•  ์ˆ˜ ์žˆ๋Š” ์‹œํ€€์Šค์—์„œ๋งŒ ์‚ฌ์šฉํ•˜๋„๋ก ์„ค๊ณ„๋˜์—ˆ์„ ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ž์ฒด ๊ฒ€์ฆ์„ ์‹œํ–‰ํ•˜์ง€ ์•Š์œผ๋ฉด ์‚ฌ์šฉ์ž๋Š” ๊ธธ์ด๊ฐ€ 0์ธ ํŠธ๋žœ์žญ์…˜์„ ํŠธ๋ฆฌ๊ฑฐํ•˜๋Š” ๊ฒƒ๋งŒ์œผ๋กœ๋„ ๋ฏผ๊ฐํ•œ ๊ธฐ๋Šฅ์— ์ ‘๊ทผํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

๋˜ ๋‹ค๋ฅธ ์˜ˆ๋กœ๋Š” ์นจ๋ฌต์˜ ํ™•๋Œ€๊ฐ€ ์žˆ์Šต๋‹ˆ๋‹ค.

IF AUTH-FAILS
EXEC CICS START TRANSID('ALTID')
EXEC CICS RETURN

If ALTID ๋” ํฐ ๊ถŒํ•œ์ด๋‚˜ ๋” ๊ด‘๋ฒ”์œ„ํ•œ ๊ธฐ๋Šฅ์ด ์žˆ๋Š” ํŠธ๋žœ์žญ์…˜์— ๋งคํ•‘๋˜๊ณ  ์—ญํ•  ๊ฒ€์‚ฌ๊ฐ€ ๋ถ€์กฑํ•˜์—ฌ ์ด๋Ÿฌํ•œ ๋Œ€์ฒด ์กฐ์น˜๋กœ ์ธํ•ด ์˜๋„์น˜ ์•Š์€ ์•ก์„ธ์Šค๊ฐ€ ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค.

์ผ๋ฐ˜์ ์œผ๋กœ ์ด๋Ÿฌํ•œ ์œ„ํ—˜์€ ๋‹ค์Œ๊ณผ ๊ฐ™์€ ์ด์œ ๋กœ ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค.

  • ์˜ค๋ฅ˜ ์ƒํƒœ์— ๋”ฐ๋ผ ํ”„๋กœ๊ทธ๋žจ์„ ์ „ํ™˜ํ•˜๊ธฐ ์œ„ํ•ด START, XCTL ๋˜๋Š” LINK ์‚ฌ์šฉ
  • ์—ฌ๋Ÿฌ ๊ฑฐ๋ž˜ ์ฝ”๋“œ์—์„œ ์žฌ์‚ฌ์šฉ๋˜๋Š” ํ”„๋กœ๊ทธ๋žจ ID
  • ๋‹ค์šด์ŠคํŠธ๋ฆผ ๋ชจ๋“ˆ์— ๋Œ€ํ•œ ๊ฒ€์ฆ์„ ์—ฐ๊ธฐํ•˜๋Š” RETURN ๋…ผ๋ฆฌ
  • ๋ฌด๊ฒฐ์„ฑ ๊ฒ€์‚ฌ ์—†์ด ํ๋ฆ„์„ ์ง€์‹œํ•˜๋Š” Commarea ๊ฐ’

์ •์  ๋ถ„์„์€ ์—ฌ๋Ÿฌ ์ง„์ž… ๊ฒฝ๋กœ๋ฅผ ๊ฐ€์ง„ ํ”„๋กœ๊ทธ๋žจ์„ ์‹๋ณ„ํ•˜๊ณ , ๋ถˆ์™„์ „ํ•œ ๊ฒ€์ฆ ํ›„ ์ œ์–ด๊ถŒ์„ ๋ฐ›๋Š” ํ”„๋กœ๊ทธ๋žจ์„ ๊ฐ•์กฐํ•˜๊ธฐ ์œ„ํ•ด ์ „์ฒด ํŠธ๋žœ์žญ์…˜ ๊ทธ๋ž˜ํ”„๋ฅผ ๊ตฌ์ถ•ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค. ํ•จ์ˆ˜๊ฐ€ ๋ถ„๋ฆฌ๋œ ๊ฒƒ์ฒ˜๋Ÿผ ๋ณด์ด๋”๋ผ๋„, ์ˆจ๊ฒจ์ง„ ํ๋ฆ„์„ ํ†ตํ•ด ๊ณต๊ฒฉ์ž๋Š” ์˜ˆ์ƒ ์šฉ๋„ ๋ฒ”์œ„๋ฅผ ๋ฒ—์–ด๋‚˜ ๊ถŒํ•œ์ด ์žˆ๋Š” ์ž‘์—…์„ ์‹คํ–‰ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

๋ณต์žกํ•œ ๋ณด์•ˆ ๋กœ์ง ๋‚œ๋…ํ™” ์ฒ˜๋ฆฌ

๋ ˆ๊ฑฐ์‹œ CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜ ๋ณด์•ˆ์—์„œ ๊ฐ€์žฅ ์–ด๋ ค์šด ์ธก๋ฉด ์ค‘ ํ•˜๋‚˜๋Š” ๋‚œ๋…ํ™”๋˜๊ฑฐ๋‚˜ ๊นŠ์ด ์ค‘์ฒฉ๋œ ๋ณด์•ˆ ๋กœ์ง์„ ํ’€์–ด๋‚ด๋Š” ๊ฒƒ์ž…๋‹ˆ๋‹ค. ๋งŽ์€ CICS ํ”„๋กœ๊ทธ๋žจ์ด ์ˆ˜์‹ญ ๋…„์— ๊ฑธ์ณ ๋ฐœ์ „ํ•˜๊ณ  ์—ฌ๋Ÿฌ ํŒ€์„ ๊ฑฐ์น˜๋ฉฐ ์—ฌ๋Ÿฌ ๊ณ„์ธต์˜ ์ ‘๊ทผ ๊ด€๋ฆฌ ์‹œ์Šคํ…œ์„ ํ†ตํ•ฉํ•ด ์™”์Šต๋‹ˆ๋‹ค. ๊ฒฐ๊ณผ์ ์œผ๋กœ, ํ•ต์‹ฌ ๋ณด์•ˆ ๊ฒฐ์ •์€ ์ข…์ข… ๋„๋‹ฌ ๋ถˆ๊ฐ€๋Šฅํ•œ ๊ฒฝ๋กœ์— ๋ฌปํžˆ๊ฑฐ๋‚˜, ์—ฌ๋Ÿฌ ๋ชจ๋“ˆ์— ๋ณต์ œ๋˜๊ฑฐ๋‚˜, ๋‹จํŽธํ™”๋œ ๋ฃจํ‹ด์œผ๋กœ ๋ถ„ํ• ๋ฉ๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์ด๋Ÿฌํ•œ ํŒจํ„ด์„ ์žฌ๊ตฌ์„ฑํ•˜๊ณ  ๊ฐ€์ •์ด๋‚˜ ๊ฐ„๊ณผ๋กœ ์ธํ•ด ์œ„ํ—˜์ด ๋ฐœ์ƒํ•œ ๋ถ€๋ถ„์„ ํŒŒ์•…ํ•  ์ˆ˜ ์žˆ์–ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

์—ฌ๋Ÿฌ ํ”„๋กœ๊ทธ๋žจ์—์„œ ๋ถ„ํ•  ์Šน์ธ ๊ฒฝ๋กœ ์‹๋ณ„

CICS ๊ฐœ๋ฐœ์ž๋“ค์€ ์ผ๋ฐ˜์ ์œผ๋กœ ์—ฌ๋Ÿฌ ์‚ฌ์šฉ์ž ์ƒํ˜ธ์ž‘์šฉ์—์„œ ์ƒํƒœ๋ฅผ ์œ ์ง€ํ•˜๊ธฐ ์œ„ํ•ด ์˜์‚ฌ ๋Œ€ํ™”ํ˜• ํ”„๋กœ๊ทธ๋ž˜๋ฐ์„ ๊ตฌํ˜„ํ•ฉ๋‹ˆ๋‹ค. ์ด ๊ณผ์ •์—์„œ ์˜๋„์น˜ ์•Š๊ฒŒ ์ธ์ฆ๊ณผ ๊ถŒํ•œ ๋ถ€์—ฌ๊ฐ€ ๋ถ„๋ฆฌ๋  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ํ•œ ํ”„๋กœ๊ทธ๋žจ์€ ์ž๊ฒฉ ์ฆ๋ช…์„ ํ™•์ธํ•˜๊ณ , ๋‹ค๋ฅธ ํ”„๋กœ๊ทธ๋žจ์€ ์„ธ์…˜ ํ”Œ๋ž˜๊ทธ๋ฅผ ์„ค์ •ํ•˜๋ฉฐ, ์„ธ ๋ฒˆ์งธ ํ”„๋กœ๊ทธ๋žจ์€ ์ ‘๊ทผ ๊ถŒํ•œ ํ™•์ธ์„ ์ˆ˜ํ–‰ํ•ฉ๋‹ˆ๋‹ค. ์ด ์ฒด์ธ์˜ ์–ด๋А ๋ถ€๋ถ„์ด๋“  ์—ฐ๊ฒฐ์ด ๋Š์–ด์ง€๊ฑฐ๋‚˜ ๋‹ค๋ฅธ ์ปจํ…์ŠคํŠธ์—์„œ ์žฌ์‚ฌ์šฉ๋˜๋ฉด ๋ณด์•ˆ ํ—ˆ์ ์ด ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค.

์˜ˆ:

ํ”„๋กœ๊ทธ๋žจ 1 :

IF USERID = 'SUPPORT1'
MOVE 'OK' TO SESSION-AUTH
EXEC CICS RETURN TRANSID('TX02')

ํ”„๋กœ๊ทธ๋žจ 2 :

IF SESSION-AUTH = 'OK'
PERFORM PROCESS-ADMIN-DATA

์˜๋„ํ•œ ๋Œ€๋กœ ์‚ฌ์šฉํ•˜๋ฉด ์•ˆ์ „ํ•ด ๋ณด์ž…๋‹ˆ๋‹ค. ํ•˜์ง€๋งŒ ๋‹ค๋ฅธ ํŠธ๋žœ์žญ์…˜์ด ํ”„๋กœ๊ทธ๋žจ 2์„ ๊ฑฐ์น˜์ง€ ์•Š๊ณ  ํ”„๋กœ๊ทธ๋žจ 1๋ฅผ ์ง์ ‘ ์‹œ์ž‘ํ•˜๋ฉด ๋ณ€์ˆ˜ SESSION-AUTH ์ดˆ๊ธฐํ™”๋˜์ง€ ์•Š์•˜๊ฑฐ๋‚˜ ์œ„์กฐ๋˜์—ˆ์„ ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ๋‘ ๋ฒˆ์งธ ํ”„๋กœ๊ทธ๋žจ์€ ์ž๊ฒฉ ์ฆ๋ช…์„ ๋‹ค์‹œ ํ™•์ธํ•˜์ง€ ์•Š๊ณ  ๋ณ€์ˆ˜๋งŒ์„ ๊ธฐ๋ฐ˜์œผ๋กœ ์„ธ์…˜์ด ์œ ํšจํ•˜๋‹ค๊ณ  ์‹ ๋ขฐํ•ฉ๋‹ˆ๋‹ค.

์ •์  ๋ถ„์„์€ ํŠนํžˆ ๋‹ค์Œ๊ณผ ๊ฐ™์€ ํ”„๋กœ๊ทธ๋žจ ์ „ํ™˜ ๊ณผ์ •์—์„œ ๋ณ€์ˆ˜ ํ• ๋‹น์„ ์ถ”์ ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

  • ํ•œ ํ”„๋กœ๊ทธ๋žจ์ด ๋‹ค๋ฅธ ํ”„๋กœ๊ทธ๋žจ์ด ์•ก์„ธ์Šค ๊ฒฐ์ •์„ ์œ„ํ•ด ์ฝ๋Š” ํ”Œ๋ž˜๊ทธ๋ฅผ ์„ค์ •ํ•˜๋Š” ๊ฒฝ์šฐ
  • ์ธ์ฆ ๋…ผ๋ฆฌ ์™ธ๋ถ€์— ๊ถŒํ•œ ๋…ผ๋ฆฌ๊ฐ€ ์กด์žฌํ•˜๋Š” ๊ฒฝ์šฐ
  • ํ”„๋กœ๊ทธ๋žจ์„ ์ง์ ‘ ์‹คํ–‰ํ•˜๊ณ  ์ผ๋ฐ˜ ํ•ญ๋ชฉ ๊ฒ€์ฆ์„ ์šฐํšŒํ•  ์ˆ˜ ์žˆ๋Š” ๊ฒฝ์šฐ

์ด๋Ÿฌํ•œ ํŒจํ„ด์€ ๊ธฐ์กด ๋””์ž์ธ์—์„œ ๋งค์šฐ ํ”ํ•˜๊ฒŒ ๋ฐœ์ƒํ•˜๋ฉฐ ์ˆ˜๋™ ๊ฒ€ํ† ์—์„œ๋Š” ์ข…์ข… ๊ฐ„๊ณผ๋ฉ๋‹ˆ๋‹ค.

๋‚ด๋ถ€ ๋””๋ฒ„๊ทธ ๋˜๋Š” ํ…Œ์ŠคํŠธ ๋ชจ๋“œ๋ฅผ ํ†ตํ•œ ์ œ์–ด ํ๋ฆ„ ์ „ํ™˜

๊ฐœ๋ฐœ์ž๋Š” ํ…Œ์ŠคํŠธ ์ค‘์— ๋„์›€์„ ์ฃผ๊ธฐ ์œ„ํ•ด ์ˆจ๊ฒจ์ง„ ํ”Œ๋ž˜๊ทธ๋‚˜ ๋””๋ฒ„๊ทธ ๋ชจ๋“œ๋ฅผ ํฌํ•จํ•˜๋Š” ๊ฒฝ์šฐ๊ฐ€ ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๊ธฐ๋Šฅ์ด ๋ฐฐํฌ ์ „์— ์ œ๊ฑฐ๋˜์ง€ ์•Š๊ฑฐ๋‚˜ ์šด์˜ ํ„ฐ๋ฏธ๋„์—์„œ ์ ‘๊ทผํ•  ์ˆ˜ ์žˆ๋Š” ๊ฒฝ์šฐ, ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์˜ ๋ฏผ๊ฐํ•œ ๋ถ€๋ถ„์— ๋Œ€ํ•œ ๋ฐฑ๋„์–ด๊ฐ€ ๋  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์˜ˆ:

IF COMM-FLAG = 'DEBUG'
PERFORM BYPASS-AUTH-CHECK

๋˜๋Š” ๋” ๋ฏธ๋ฌ˜ํ•˜๊ฒŒ:

IF CURRENT-TIME > '210000'  
PERFORM EMERGENCY-ROUTINE

๋‘ ๋ฒˆ์งธ ์‚ฌ๋ก€์—์„œ๋Š”, ๊ทผ๋ฌด ์‹œ๊ฐ„ ์™ธ ๋ฃจํ‹ด์ด ์ผ๋ถ€ ์ •์ƒ์ ์ธ ๋ณด์•ˆ ๊ฒ€์‚ฌ๋ฅผ ์šฐํšŒํ•  ์ˆ˜ ์žˆ์œผ๋ฉฐ, ์ด๋Š” ์ผ๊ด„ ์ž‘์—…์ด๋‚˜ ๋น„์ƒ ๋Œ€์‘์„ ์œ„ํ•œ ๊ฒƒ์ผ ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ๊ทธ๋Ÿฌ๋‚˜ ๋Œ€ํ™”ํ˜• ์„ธ์…˜์—์„œ ํŠธ๋ฆฌ๊ฑฐ๋  ์ˆ˜ ์žˆ๋‹ค๋ฉด, ์‹œ๊ฐ„ ๊ธฐ๋ฐ˜ ๊ณต๊ฒฉ ๋ฒกํ„ฐ๊ฐ€ ๋ฐœ์ƒํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

๋‚œ๋…ํ™”๋˜๊ฑฐ๋‚˜ ์œ„ํ—˜ํ•œ ๋…ผ๋ฆฌ๋ฅผ ์Šค์บ”ํ•  ๋•Œ ์ •์  ๋ถ„์„์€ ๋‹ค์Œ์„ ์šฐ์„ ์‹œํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

  • ๋ณด์•ˆ ๋…ผ๋ฆฌ๋ฅผ ์ œ์–ดํ•˜๋Š” ๋น„์ •์ƒ์ ์ธ ์กฐ๊ฑด(์‹œ๊ฐ„, ํ„ฐ๋ฏธ๋„ ID, ์ง€์—ญ ์ฝ”๋“œ)
  • DEBUG, DEV, OVERRIDE, TEST ๋˜๋Š” BACKDOOR์™€ ๊ฐ™์€ ํ”Œ๋ž˜๊ทธ
  • ํŠน์ • ๋Ÿฐํƒ€์ž„ ์กฐ๊ฑด์—์„œ ๊ฑด๋„ˆ๋›ฐ๋Š” ์•ก์„ธ์Šค ๊ฒ€์‚ฌ
  • ๊ฒ€์ฆ ๋ธŒ๋žœ์น˜๋ฅผ ๋Œ์•„๋‹ค๋‹ˆ๋Š” GOTO ๋˜๋Š” PERFORM ๊ฒฝ๋กœ

๋ชฉํ‘œ๋Š” ์ง์ ‘์ ์ด๊ณ  ๊ฐ€์‹œ์ ์ธ ๊ถŒํ•œ ํ™•์ธ ์—†์ด ์‹คํ–‰์„ ๊ถŒํ•œ์ด ์žˆ๋Š” ์ฝ”๋“œ๋กœ ์ „๋‹ฌํ•  ์ˆ˜ ์žˆ๋Š” ๋ชจ๋“  ๊ฒƒ์„ ํ‘œ๋ฉดํ™”ํ•˜๋Š” ๊ฒƒ์ž…๋‹ˆ๋‹ค.

์ผ๊ด€๋˜์ง€ ์•Š์€ ์•ก์„ธ์Šค ์ œ์–ด๊ฐ€ ์žˆ๋Š” ์žฌ์‚ฌ์šฉ ๋ฃจํ‹ด

๋งŽ์€ ๋Œ€๊ทœ๋ชจ CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์—์„œ ๊ฐœ๋ฐœ์ž๋Š” ๋ฐ์ดํ„ฐ ์•ก์„ธ์Šค ๋˜๋Š” ๋น„์ฆˆ๋‹ˆ์Šค ๋กœ์ง์„ ์œ„ํ•ด ๊ณตํ†ต ๋ฃจํ‹ด์„ ์žฌ์‚ฌ์šฉํ•ฉ๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ๋ฃจํ‹ด์€ ๊ณต๊ฐœ ํŠธ๋žœ์žญ์…˜๊ณผ ๋‚ด๋ถ€ ๊ด€๋ฆฌ ์œ ํ‹ธ๋ฆฌํ‹ฐ ๋ชจ๋‘์—์„œ ํ˜ธ์ถœ๋  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ๊ณต์œ  ๋กœ์ง์—์„œ ํ˜ธ์ถœ์ž๊ฐ€ ์‚ฌ์šฉ์ž ์—ญํ• ์˜ ์œ ํšจ์„ฑ์„ ์ด๋ฏธ ๊ฒ€์ฆํ–ˆ๋‹ค๊ณ  ๊ฐ€์ •ํ•˜๊ณ , ์ด ๊ฐ€์ •์ด ํ•ญ์ƒ ์„ฑ๋ฆฝํ•˜๋Š” ๊ฒƒ์€ ์•„๋‹ˆ๋ผ๋ฉด, ๊ฐ„์ ‘์ ์ธ ์ทจ์•ฝ์ ์ด ๋ฉ๋‹ˆ๋‹ค.

๊ณ ์ „์ ์ธ ๊ตฌ์กฐ๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

PERFORM UPDATE-ACCT-INFO

...

UPDATE-ACCT-INFO.
IF ROLE = 'ADMIN'
EXEC CICS WRITE FILE('ACCTDB')

์ด๊ฒƒ์€ ๋ชจ๋“  ํ˜ธ์ถœ์ž๊ฐ€ UPDATE-ACCT-INFO ์˜ฌ๋ฐ”๋ฅด๊ฒŒ ์„ค์ •ํ•ฉ๋‹ˆ๋‹ค ROLE ๋ณ€์ˆ˜. ์‘์šฉ ํ”„๋กœ๊ทธ๋žจ์˜ ๋‹ค๋ฅธ ๋ถ€๋ถ„์ด ์ด ๋ฃจํ‹ด์„ ํ˜ธ์ถœํ•˜๋Š” ๊ฒฝ์šฐ ROLE ์ดˆ๊ธฐํ™”๋˜์ง€ ์•Š์•˜๊ฑฐ๋‚˜ ํ˜ธ์ถœ์ž๊ฐ€ ์ทจ์•ฝํ•œ ๊ฒ€์‚ฌ๋ฅผ ๊ธฐ๋ฐ˜์œผ๋กœ ์ž˜๋ชป ์„ค์ •ํ•œ ๊ฒฝ์šฐ ๋ฌด๋‹จ ์•ก์„ธ์Šค๊ฐ€ ๋ฐœ์ƒํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์ •์  ์Šค์บ”์—์„œ๋Š” ๋‹ค์Œ ์‚ฌํ•ญ์„ ํ”Œ๋ž˜๊ทธ๋กœ ์ง€์ •ํ•ด์•ผ ํ•ฉ๋‹ˆ๋‹ค.

  • ๋ณด์•ˆ์— ๋ฏผ๊ฐํ•œ ์ž‘์—…์„ ์ˆ˜ํ–‰ํ•˜๋Š” ๊ณต์œ  ๋ฃจํ‹ด
  • ๊ณต์œ  ๋ฃจํ‹ด ๋‚ด ๋กœ์ปฌ ๊ฒ€์ฆ์˜ ๋ถ€์žฌ
  • ์™ธ๋ถ€์—์„œ ์ •์˜๋œ ์•ก์„ธ์Šค ๊ฒฐ์ •์— ์‚ฌ์šฉ๋˜๋Š” ๋ณ€์ˆ˜
  • ์‹œํ–‰ ์ง€์ ์—์„œ ๋ฉ€๋ฆฌ ๋–จ์–ด์ง„ ๊ณณ์—์„œ ๋ฐœ์ƒํ•˜๋Š” ์—ญํ•  ํ• ๋‹น

์ด๋Ÿฌํ•œ ํ˜•ํƒœ์˜ ๋‚œ๋…ํ™”๋Š” ์˜๋„์ ์ธ ์€ํ๊ฐ€ ์•„๋‹ˆ๋ผ ์žฅ๊ธฐ์ ์ธ ์•„ํ‚คํ…์ฒ˜ ๋ณ€ํ™”์—์„œ ๋น„๋กฏ๋ฉ๋‹ˆ๋‹ค. ๊ตฌ์„ฑ ์š”์†Œ๊ฐ€ ์—ฌ๋Ÿฌ ๋ชจ๋“ˆ์—์„œ ์žฌ์‚ฌ์šฉ๋จ์— ๋”ฐ๋ผ ์›๋ž˜ ์ ‘๊ทผ ๊ฐ€์ •์ด ์•ฝํ™”๋ฉ๋‹ˆ๋‹ค. ์‹ฌ์ธต์ ์ธ ์ฝ”๋“œ ์ถ”์ ๊ณผ ์ปจํ…์ŠคํŠธ ์ƒ๊ด€๊ด€๊ณ„ ๋ถ„์„๋งŒ์ด ์ด๋Ÿฌํ•œ ์œ„ํ—˜์„ ๋…ธ์ถœํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์‚ฌ์šฉ SMART TS XL CICS ํŠธ๋žœ์žญ์…˜ ์ทจ์•ฝ์ ์„ ๊ฐ์ง€ํ•˜๊ณ  ์ œ๊ฑฐํ•˜๊ธฐ

๋ ˆ๊ฑฐ์‹œ ๋ฉ”์ธํ”„๋ ˆ์ž„ ์‹œ์Šคํ…œ์—์„œ ๋ณด์•ˆ ๋ถ„์„์„ ์ฒ˜๋ฆฌํ•˜๋Š” ๊ฒƒ์€ ๋ณธ์งˆ์ ์œผ๋กœ ๋ณต์žกํ•ฉ๋‹ˆ๋‹ค. CICS ํ™˜๊ฒฝ์€ ์ค‘์•™ ์ง‘์ค‘์‹ ๊ตฌ์กฐ๊ฐ€ ๋ถ€์กฑํ•˜๊ณ , ์ตœ์‹  ๋ฌธ์„œ๊ฐ€ ๊ฑฐ์˜ ์—†์œผ๋ฉฐ, ์ˆ˜์‹ญ ๋…„์— ๊ฑธ์ณ ์ ˆ์ฐจ๊ฐ€ ๋ฐœ์ „ํ•ด ์™”์Šต๋‹ˆ๋‹ค. SMART TS XL COBOL, PL/I, JCL ๋ฐ CICS ํŠน์ • ํŒจํ„ด์— ๋งž์ถฐ ํŠน๋ณ„ํžˆ ์„ค๊ณ„๋œ ์ •์  ๋ถ„์„ ์—”์ง„์„ ์ œ๊ณตํ•˜์—ฌ ์ด๋Ÿฌํ•œ ๋ฌธ์ œ๋ฅผ ํ•ด๊ฒฐํ•ฉ๋‹ˆ๋‹ค. ์ผ๋ฐ˜ ๋„๊ตฌ์™€ ๋‹ฌ๋ฆฌ ๋ฉ”์ธํ”„๋ ˆ์ž„ ์ƒํƒœ๊ณ„ ๊ณ ์œ ์˜ ์•„ํ‚คํ…์ฒ˜์™€ ๊ทœ์น™์„ ์ดํ•ดํ•ฉ๋‹ˆ๋‹ค.

CICS๋ฅผ ์œ„ํ•œ ๋‹ค๋‹จ๊ณ„ ํ๋ฆ„ ์žฌ๊ตฌ์„ฑ

SMART TS XL ์ „์ฒด ์ง€์› ํฌํŠธํด๋ฆฌ์˜ค๋ฅผ ๊ฒ€ํ† ํ•˜๊ณ  ํ”„๋กœ๊ทธ๋žจ ๊ฐ„ ํ๋ฆ„๋„๋ฅผ ๊ตฌ์ถ•ํ•ฉ๋‹ˆ๋‹ค. ์—ฌ๊ธฐ์—๋Š” ๋‹ค์Œ์ด ํฌํ•จ๋ฉ๋‹ˆ๋‹ค.

  • ํŠธ๋žœ์žญ์…˜-ํ”„๋กœ๊ทธ๋žจ ๋งคํ•‘
  • LINK, XCTL ๋ฐ RETURN์„ ์‚ฌ์šฉํ•œ ํ”„๋กœ๊ทธ๋žจ ๊ฐ„ ์ „ํ™˜
  • ๋ณ€์ˆ˜ ๋ฐ ์‰ผํ‘œ ์ „ํŒŒ
  • ์—ญํ•  ๊ธฐ๋ฐ˜ ์ œ์–ด ๋…ผ๋ฆฌ ๋ฐ ์ง„์ž… ์กฐ๊ฑด ์ถ”์ 

์ „์ฒด ์‹คํ–‰ ์ฒด์ธ์„ ์žฌ๊ตฌ์„ฑํ•จ์œผ๋กœ์จ ์‹ ๋ขฐํ•  ์ˆ˜ ์žˆ๋Š” ์ปจํ…์ŠคํŠธ๋ฅผ ๊ฐ€์ •ํ•˜๋Š” ํ”„๋กœ๊ทธ๋žจ์ด ์ž ์žฌ์ ์œผ๋กœ ๊ฒ€์ฆ๋˜์ง€ ์•Š์€ ์ง€์ ์„ ํฌํ•จํ•˜์—ฌ ์—ฌ๋Ÿฌ ์ง€์ ์—์„œ ์‹ค์ œ๋กœ ๋„๋‹ฌํ•  ์ˆ˜ ์žˆ๋Š”์ง€ ๊ฐ์ง€ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

์‚ฌ์šฉ ์‚ฌ๋ก€ ์˜ˆ์‹œ:

๋‚ด๋ถ€ ๊ฐ์‚ฌ์—์„œ ๊ฑฐ๋ž˜์— ๋ณด์•ˆ ๊ฒฐํ•จ์ด ๋ฐœ๊ฒฌ๋˜์—ˆ์Šต๋‹ˆ๋‹ค. TX94 ์›๋ž˜ ๊ด€๋ฆฌ์ž์šฉ์œผ๋กœ๋งŒ ์˜๋„๋œ ํ”„๋กœ๊ทธ๋žจ์„ ํŠธ๋ฆฌ๊ฑฐํ–ˆ์Šต๋‹ˆ๋‹ค. SMART TS XL ํ”„๋กœ๊ทธ๋žจ์˜ ํ˜ธ์ถœ ๊ทธ๋ž˜ํ”„๋ฅผ ์ถ”์ ํ•˜์—ฌ ์ œ์–ด ํ”Œ๋ž˜๊ทธ๊ฐ€ ํ™•์ธ๋˜์ง€ ์•Š์€ commarea ํ•„๋“œ๋ฅผ ํ†ตํ•ด ์ „๋‹ฌ๋˜์—ˆ์Œ์„ ๋ฐœ๊ฒฌํ–ˆ์œผ๋ฉฐ, ๋™์ผํ•œ ํ”„๋กœ๊ทธ๋žจ ํ•ญ๋ชฉ์— ์ ‘๊ทผํ•˜๋Š” ๋‹ค๋ฅธ ํŠธ๋žœ์žญ์…˜ 5๊ฐœ๋ฅผ ์‹๋ณ„ํ–ˆ์Šต๋‹ˆ๋‹ค. ์ˆ˜๋™ ์ถ”์ ์—์„œ๋Š” ์ด ๋ถ€๋ถ„์„ ๋†“์ณค์Šต๋‹ˆ๋‹ค.

์ˆจ๊ฒจ์ง„ ์ œ์–ด ํ”Œ๋ž˜๊ทธ ๋ฐ ๋‚œ๋…ํ™”๋œ ์•ก์„ธ์Šค ๊ฒฝ๋กœ ๊ฐ์ง€

๋งŽ์€ ๋ ˆ๊ฑฐ์‹œ ํ”„๋กœ๊ทธ๋žจ์—๋Š” ๋‚ด์žฅ๋œ ์˜ค๋ฒ„๋ผ์ด๋“œ ์กฐ๊ฑด์ด๋‚˜ ๋น„์ƒ ๋ฃจํ‹ด์ด ํฌํ•จ๋˜์–ด ์žˆ์Šต๋‹ˆ๋‹ค. ์ด๋Ÿฌํ•œ ์กฐ๊ฑด์€ ์ค‘์ฒฉ์ด ๊นŠ๊ฑฐ๋‚˜, ๋ณ€์ˆ˜ ์ด๋ฆ„์ด ์ผ๋ฐ˜์ ์ด์ง€ ์•Š๊ฑฐ๋‚˜, ๋Œ€์ฒด ๋กœ์ง ๋‚ด๋ถ€์— ๋ฐฐ์น˜๋˜์–ด ์žˆ๊ธฐ ๋•Œ๋ฌธ์— ์ˆ˜๋™์œผ๋กœ ์ฐพ๊ธฐ ์–ด๋ ค์šด ๊ฒฝ์šฐ๊ฐ€ ๋งŽ์Šต๋‹ˆ๋‹ค. SMART TS XL ๊ทœ์น™ ๊ธฐ๋ฐ˜ ๋ฐ ํŒจํ„ด ๋งค์นญ ์Šค์บ”์„ ์‚ฌ์šฉํ•˜์—ฌ ๋‹ค์Œ์„ ์ถ”์ถœํ•ฉ๋‹ˆ๋‹ค.

  • ๊ฑฐ์˜ ์‚ฌ์šฉ๋˜์ง€ ์•Š๋Š” ํ”Œ๋ž˜๊ทธ ๊ฐ’์œผ๋กœ ์ œ์–ด๋˜๋Š” ์กฐ๊ฑด ๋ถ„๊ธฐ
  • ํ„ฐ๋ฏธ๋„ ID, ์‹œ๊ฐ„ ๋˜๋Š” ์ž‘์—… ๋ฉ”ํƒ€๋ฐ์ดํ„ฐ๋ฅผ ๊ธฐ๋ฐ˜์œผ๋กœ ํŠธ๋ฆฌ๊ฑฐ๋˜๋Š” ๋กœ์ง
  • ์‰ผํ‘œ ํ”Œ๋ž˜๊ทธ, ํ•˜๋“œ์ฝ”๋”ฉ๋œ ์‚ฌ์šฉ์ž ID ๋˜๋Š” ๋งคํฌ๋กœ ์ˆ˜์ค€ ๋ฃจํ‹ด์„ ์‚ฌ์šฉํ•˜์—ฌ ๋ถ„๊ธฐ๋ฅผ ์šฐํšŒํ•ฉ๋‹ˆ๋‹ค.

์ž ์žฌ์ ์œผ๋กœ ํŠน๊ถŒ์ด ์žˆ๋Š” ์˜์‚ฌ๊ฒฐ์ • ์ง€์ ์˜ ๋ชจ๋“  ์ธ์Šคํ„ด์Šค๋ฅผ ํ‘œ๋ฉดํ™”ํ•˜๊ณ  ๋„๋‹ฌ ๊ฐ€๋Šฅ์„ฑ, ๊ฑฐ๋ž˜ ๋…ธ์ถœ, ํŠน๊ถŒ ํ™•๋Œ€ ๊ฐ€๋Šฅ์„ฑ์„ ๊ธฐ์ค€์œผ๋กœ ์ˆœ์œ„๋ฅผ ๋งค๊น๋‹ˆ๋‹ค.

CICS ๊ตฌ์„ฑ์— ๋Œ€ํ•œ ์ž๋™ํ™”๋œ ์ทจ์•ฝ์„ฑ ๊ทœ์น™

ํ‘œ๋ฉด ์ˆ˜์ค€ ์Šค์บ๋„ˆ์™€ ๋‹ฌ๋ฆฌ SMART TS XL COBOL-CICS ํ”„๋กœ๊ทธ๋žจ์— ๋งž์ถฐ ๋‚ด์žฅ๋œ ๊ทœ์น™์ด ํฌํ•จ๋˜์–ด ์žˆ์Šต๋‹ˆ๋‹ค. ์ด ๊ทœ์น™์€ ๋‹ค์Œ๊ณผ ๊ด€๋ จ๋œ ์ทจ์•ฝ์ ์„ ์‹๋ณ„ํ•ฉ๋‹ˆ๋‹ค.

  • ์•ˆ์ „ํ•˜์ง€ ์•Š์€ EXEC CICS ASSIGN ๋ฐ ADDRESS ์‚ฌ์šฉ
  • PERFORMed ๋ฃจํ‹ด์˜ ์ผ๊ด€๋˜์ง€ ์•Š์€ ์•ก์„ธ์Šค ๋…ผ๋ฆฌ
  • WRITE, DELETE ๋˜๋Š” START ๋ช…๋ น ์ „์— ๊ฒ€์ฆ์ด ๋ˆ„๋ฝ๋˜์—ˆ์Šต๋‹ˆ๋‹ค.
  • ์ทจ์•ฝํ•œ ์ƒํƒœ ๊ด€๋ฆฌ๊ฐ€ ์žˆ๋Š” ๊ตฌ์‹ ์˜์‚ฌ ๋Œ€ํ™” ํ๋ฆ„

์ด๋Ÿฌํ•œ ๊ทœ์น™์€ ํ™˜๊ฒฝ, ๋น„์ฆˆ๋‹ˆ์Šค ๊ธฐ๋Šฅ ๋˜๋Š” ๊ฐ์‚ฌ ๊ธฐ์ค€์— ๋”ฐ๋ผ ๋งž์ถค ์„ค์ •ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ํŠนํžˆ ๊ธฐ์กด ๊ฐœ๋ฐœํŒ€์ด ๋‚จ๊ธด ์ž˜๋ชป๋œ ๊ฐ€์ •์„ ํŒŒ์•…ํ•˜๋Š” ๋ฐ ์œ ์šฉํ•ฉ๋‹ˆ๋‹ค.

์˜ํ–ฅ ์ถ”์ ์„ ํ†ตํ•œ ๊ฐ€์†ํ™”๋œ ๊ต์ •

์ทจ์•ฝ์ ์ด ํ”Œ๋ž˜๊ทธ๋กœ ํ‘œ์‹œ๋˜๋ฉด ๋‹ค์Œ์„ ํ†ตํ•ด ์ˆ˜์ •์„ ๊ฐ€์†ํ™”ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. SMART TS XL์˜ ์ถ”์  ๊ธฐ๋Šฅ์ž…๋‹ˆ๋‹ค. ๋ชจ๋“  ๋…ผ๋ฆฌ ๋ถ„๊ธฐ ๋˜๋Š” ํ”„๋กœ๊ทธ๋žจ ํ•จ์ˆ˜์— ๋Œ€ํ•ด ๋‹ค์Œ์„ ํ‘œ์‹œํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

  • ์ด๋ฅผ ์ดˆ๋ž˜ํ•˜๋Š” ๋ชจ๋“  ๊ฑฐ๋ž˜
  • ์ด๊ฒƒ์ด ํ˜ธ์ถœํ•˜๋Š” ๋ชจ๋“  ๋ชจ๋“ˆ
  • ๋ชจ๋“  ๋ณ€์ˆ˜๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.
  • ์šฐํšŒํ•˜๋Š” ๋ชจ๋“  ์•ก์„ธ์Šค ๋…ผ๋ฆฌ

์ด ์ถ”์  ๋งต์€ ๊ฐœ๋ฐœ์ž์™€ ๊ฐ์‚ฌ์ž๊ฐ€ ๊ฒฐํ•จ์ด ๊ณ ๋ฆฝ๋œ ๊ฒƒ์ธ์ง€ ์•„๋‹ˆ๋ฉด ์‹œ์Šคํ…œ์ ์œผ๋กœ ๋…ธ์ถœ๋œ ๊ฒƒ์ธ์ง€ ์ฆ‰์‹œ ํŒŒ์•…ํ•˜๋Š” ๋ฐ ๋„์›€์ด ๋ฉ๋‹ˆ๋‹ค. ๋˜ํ•œ ์ข…์†์„ฑ์„ ์ˆ˜๋™์œผ๋กœ ๋งคํ•‘ํ•˜๋Š” ๋ฐ ์†Œ์š”๋˜๋Š” ์‹œ๊ฐ„์„ ์ค„์ด๊ณ  ํŒจ์น˜ ์ ์šฉ ์ค‘ ์ƒˆ๋กœ์šด ๋ฒ„๊ทธ๊ฐ€ ๋ฐœ์ƒํ•  ์œ„ํ—˜์„ ์ค„์—ฌ์ค๋‹ˆ๋‹ค.

๊ฒฐ๋ก  ๋ฐ ๋‹ค์Œ ๋ณด์•ˆ ๊ฒ€ํ†  ๋‹จ๊ณ„

๋ ˆ๊ฑฐ์‹œ CICS ์• ํ”Œ๋ฆฌ์ผ€์ด์…˜์€ ์ค‘์š”ํ•œ ๋น„์ฆˆ๋‹ˆ์Šค ๋กœ์ง์„ ๋ณด์œ ํ•˜๊ณ  ์žˆ์ง€๋งŒ, ์˜ค๋ž˜๋˜๊ณ  ๋ณต์žกํ•œ ๊ตฌ์กฐ๋กœ ์ธํ•ด ํ‘œ์ค€ ๋ฐฉ์‹์œผ๋กœ๋Š” ์ข…์ข… ๊ฐ„๊ณผ๋˜๋Š” ๋ณด์•ˆ ์‚ฌ๊ฐ์ง€๋Œ€๊ฐ€ ๋ฐœ์ƒํ•ฉ๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์ˆจ๊ฒจ์ง„ ์œ„ํ—˜์„ ์•…์šฉ๋˜๊ธฐ ์ „์— ๋ฐœ๊ฒฌํ•  ์ˆ˜ ์žˆ๋Š” ์‹ ๋ขฐํ•  ์ˆ˜ ์žˆ๋Š” ๋ฐฉ๋ฒ•์„ ์ œ๊ณตํ•˜๋ฉฐ, ํŠนํžˆ ๊ตฌ๋ฌธ์ด๋‚˜ ์ฝ”๋“œ ์กฐ๊ฐ๋ฟ๋งŒ ์•„๋‹ˆ๋ผ ํŠธ๋žœ์žญ์…˜ ์ „๋ฐ˜์˜ ๋” ๊ด‘๋ฒ”์œ„ํ•œ ์ œ์–ด ํ๋ฆ„๊ณผ ์ ‘๊ทผ ๊ฐ€์ •์„ ๋Œ€์ƒ์œผ๋กœ ํ•  ๋•Œ ๋”์šฑ ๊ทธ๋ ‡์Šต๋‹ˆ๋‹ค.

์ด ๊ธฐ์‚ฌ์—์„œ๋Š” CICS ์‹œ์Šคํ…œ์—๋งŒ ์กด์žฌํ•˜๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๊ฒฐํ•จ ์œ ํ˜•์„ ์‚ดํŽด๋ณด์•˜์Šต๋‹ˆ๋‹ค.

  • ๋А์Šจํ•˜๊ฒŒ ๊ฒฐํ•ฉ๋œ ํ”„๋กœ๊ทธ๋žจ์— ๋ถ„์‚ฐ๋œ ๊ถŒํ•œ ๋ถ€์—ฌ ๋…ผ๋ฆฌ
  • ๊ฒ€์ฆ ์—†์ด ASSIGN ๋ฐ ADDRESS์™€ ๊ฐ™์€ ์ทจ์•ฝํ•œ ๋ช…๋ น ํŒจํ„ด
  • ์ •์ƒ์ ์ธ ๊ฒ€์‚ฌ๋ฅผ ์šฐํšŒํ•˜๋Š” ํด๋ฐฑ ํŠธ๋žœ์žญ์…˜ ๋ฐ ๋””๋ฒ„๊ทธ ๊ฒฝ๋กœ
  • ํ˜ธ์ถœ์ž๋กœ๋ถ€ํ„ฐ ์‹ ๋ขฐํ•  ์ˆ˜ ์žˆ๋Š” ์ž…๋ ฅ์„ ๊ฐ€์ •ํ•˜๋Š” ์žฌ์‚ฌ์šฉ๋œ ๋ฃจํ‹ด

๋Œ€๊ทœ๋ชจ CICS ํฌํŠธํด๋ฆฌ์˜ค๋ฅผ ์šด์˜ํ•˜๋Š” ์กฐ์ง์˜ ๊ฒฝ์šฐ, ๋‹จํŽธ์ ์ธ ๋ณด์•ˆ ์ ‘๊ทผ ๋ฐฉ์‹์€ ๋” ์ด์ƒ ์œ ํšจํ•˜์ง€ ์•Š์Šต๋‹ˆ๋‹ค. ์ตœ์‹  ์œ„ํ˜‘์€ ์ˆ˜๋ฐฑ ๊ฐœ์˜ ๋ชจ๋“ˆ์— ์ˆจ๊ฒจ์ง„ ๋‹จ ํ•˜๋‚˜์˜ ์‹ค์ˆ˜๋„ ์•…์šฉํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์— ์‹ฌ์ธต์ ์ธ ์ƒํ™ฉ ์ธ์‹์„ ์ ์šฉํ•˜๋ฉด, ๋ฌธ์ œ๊ฐ€ ๋ฐœ์ƒํ•˜๊ฑฐ๋‚˜ ๊ฐ์‚ฌ๋ฅผ ๋ฐ›๊ธฐ ์ „์— ์ด๋Ÿฌํ•œ ๋ฌธ์ œ๋ฅผ ํŒŒ์•…ํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

๋‹ค์Œ ๋‹จ๊ณ„๋กœ ๊ณ ๋ คํ•ด์•ผ ํ•  ์ฃผ์š” ์กฐ์น˜๋Š” ๋‹ค์Œ๊ณผ ๊ฐ™์Šต๋‹ˆ๋‹ค.

  • ๋ชจ๋“  XCTL ๋ฐ LINK ๊ฒฝ๋กœ๋ฅผ ํฌํ•จํ•˜์—ฌ ์ „์ฒด ํŠธ๋žœ์žญ์…˜-ํ”„๋กœ๊ทธ๋žจ ๋งต์„ ๋งŒ๋“ญ๋‹ˆ๋‹ค.
  • ํŠน๊ถŒ ์ž‘์—…์„ ์ˆ˜ํ–‰ํ•˜๋Š” ๊ณต์œ  ๋น„์ฆˆ๋‹ˆ์Šค ๋กœ์ง์„ ์‹๋ณ„ํ•˜๊ณ  ๋ฆฌํŒฉํ† ๋งํ•ฉ๋‹ˆ๋‹ค.
  • commarea ํ”Œ๋ž˜๊ทธ ๋˜๋Š” ํ„ฐ๋ฏธ๋„ ๊ธฐ๋ฐ˜ ๊ฒฐ์ •์˜ ์˜ํ–ฅ์„ ๋ฐ›๋Š” ๋ชจ๋“  ์ง€์ ์„ ๊ฐ์‚ฌํ•ฉ๋‹ˆ๋‹ค.
  • ๊ฐ ๊ฑฐ๋ž˜์˜ ์ง„์ž… ์ง€์ ์—์„œ ๋ณด์•ˆ ๊ฒ€์ฆ์„ ์„ค์ •ํ•ฉ๋‹ˆ๋‹ค.
  • ์˜๋„์น˜ ์•Š์€ ๋…ธ์ถœ์— ๋Œ€ํ•œ ๋Œ€์ฒด ๋…ผ๋ฆฌ ๋ฐ ๋น„์ƒ ๊ฒฝ๋กœ๋ฅผ ๊ฒ€ํ† ํ•ฉ๋‹ˆ๋‹ค.

์ด ํ”„๋กœ์„ธ์Šค๋ฅผ ๊ฐ€์†ํ™”ํ•˜๊ณ  ์ˆ˜๋™ ์ž‘์—…์„ ์ค„์ด๋ ค๋Š” ํŒ€์˜ ๊ฒฝ์šฐ ๋‹ค์Œ๊ณผ ๊ฐ™์€ ๋„๊ตฌ๊ฐ€ ํ•„์š”ํ•ฉ๋‹ˆ๋‹ค. SMART TS XL CICS ์•„ํ‚คํ…์ฒ˜์— ๋งž์ถฐ ์ •์  ๋ถ„์„์„ ์ œ๊ณตํ•˜์—ฌ ์ „์ฒด ํ๋ฆ„ ์ถ”์ ์„ ํ†ตํ•œ ์•ˆ์ „ํ•œ ๋ฆฌํŒฉํ† ๋ง์„ ๊ฐ€๋Šฅํ•˜๊ฒŒ ํ•ฉ๋‹ˆ๋‹ค.

๋ฉ”์ธํ”„๋ ˆ์ž„ ํ™˜๊ฒฝ์„ ๋ณดํ˜ธํ•˜๋ ค๋ฉด ๊ฒฝ๊ณ„๋ฟ๋งŒ ์•„๋‹ˆ๋ผ ๊ฐ€์‹œ์„ฑ๋„ ํ•„์š”ํ•ฉ๋‹ˆ๋‹ค. ์ •์  ๋ถ„์„์€ ์ด ๋‘ ๊ฐ€์ง€๋ฅผ ๋ชจ๋‘ ์ œ๊ณตํ•˜๋Š” ๋ช‡ ์•ˆ ๋˜๋Š” ๊ธฐ์ˆ  ์ค‘ ํ•˜๋‚˜์ž…๋‹ˆ๋‹ค.