PDSYSTEM

작성자

제목

비밀번호

------- 원본 내용 --------- ■예 9_2_1  ||  채번 테이블 생성 CREATE  TABLE  NUMSEQ ( TAB_NO  VARCHAR2(10)  PRIMARY  KEY, SEQ  NUMBER ); ■예 9_2_2  ||  채번  대상 테이블 생성 ____CREATE TABLE____ TEST_1( NO VARCHAR2(10) PRIMARY KEY ); ■예 9_2_3  ||  채번 테이블 초기화 INSERT  INTO  NUMSEQ  VALUES('TEST_1', 0); ■예 9_2_4  ||  채번 대상 테이블 INSERT INSERT  INTO  TEST_1(NO) VALUES ((SELECT  SEQ + 1 FROM  NUMSEQ WHERE  TAB_NO='TEST_1')); ■예 9_2_5  ||  채번 테이블 UPDATE UPDATE  NUMSEQ  SET  SEQ = SEQ + 1; ■ 예 9_2_6  ||  채번 테이블 UPDATE CREATE  TABLE  TAB01_INSA(              --TAB01_INSA TABLE SABUN  VARCHAR2(15)  PRIMARY  KEY, NAME  VARCHAR2(10), JOIN_DAY  VARCHAR2(8), JOIN_GBN_CODE  VARCHAR2(3) ); CREATE  TABLE  TAB05_PRODUCT(       --TAB05_PRODUCT TABLE p_NO  VARCHAR2(15)  PRIMARY  KEY, p_CODE  VARCHAR2(3), p_COLOR  VARCHAR2(3), p_NAME  VARCHAR2(10), p_PROD_D  VARCHAR2(8) ); ■예 9_2_7  ||  NUMSEQ 채번 테이블 초기화 INSERT  INTO  NUMSEQ VALUES ('TAB01', (SELECT  TO_CHAR(SYSDATE, 'YYYYMMDD') || '00' FROM DUAL)); INSERT  INTO  NUMSEQ  VALUES('TAB05', 0); ■예 9_2_8  || 두 개의 테이블 데이터 입력 INSERT  INTO  TAB01_INSA(SABUN,  NAME,  JOIN_DAY,  JOIN_GBN_CODE) VALUES ((SELECT DECODE(SUBSTR(MAX(SEQ), 1,8)                   ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SEQ) + 1                   ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01')            FROM  NUMSEQ            WHERE  TAB_NO = 'TAB01'                                          AND  SEQ < TO_CHAR(SYSDATE,'YYYYMMDD')||'99'),           :NAME,  TO_CHAR(SYSDATE,'YYYYMMDD'),  :JOIN_GBN_CODE); INSERT  INTO  TAB05_PRODUCT (p_NO,  p_CODE,  p_COLOR,  p_NAME,  p_PROD_D) VALUES((SELECT  :CODE || :COLOR || :p_KIND || (SELECT  SEQ + 1                                                 FROM  NUMSEQ                                                 WHERE  TAB_NO='TAB05')           FROM  DUAL),      :p_CODE,  :p_COLOR,  :p_NAME, TO_CHAR(SYSDATE,'YYYYMMDD')); ■예 9_2_9  ||  두 개의 테이블 데이터 입력 UPDATE  NUMSEQ SET  SEQ = ((SELECT DECODE(SUBSTR(MAX(SEQ), 1,8)                          ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SEQ) + 1                          ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01')                 FROM NUMSEQ                 WHERE SEQ < TO_CHAR(SYSDATE,'YYYYMMDD')||'99')) WHERE TAB_NO = 'TAB01'; UPDATE  NUMSEQ  SET  SEQ = SEQ + 1  WHERE  TAB_NO = 'TAB05'; ■예 9_2_10  ||  각 테이블 데이터 확인 SELECT * FROM NUMSEQ; SELECT * FROM TAB01_INSA; SELECT * FROM TAB05_PRODUCT; ■예 9_2_11  || 테이블의 중복에러를 방지를 위한 PL-SQL예제 --상위로직 생략 UPDATE  NUMSEQ  SET  SEQ =  SEQ + 1     WHERE  TAB_NO = 'TAB01';     SELECT SEQ INTO :seq FROM NUMSEQ WHERE TAB_NO = 'TAB01'; COMMIT; INSERT  INTO  TAB01_INSA (SABUN,  NAME,  JOIN_DAY,  JOIN_GBN_CODE) VALUES (:seq,  :NAME,  SYSDATE,  :JOIN_GBN_CODE); --하위로직 생략 ■예 9_3_1  ||  채번 테이블 생성 ____CREATE TABLE____ COUNT_TAB( NO_COL VARCHAR2(3) CONSTRAINT COUNT_TAB_PK PRIMARY KEY ); ■예 9_3_2  ||  PK를 이용한 채번 INSERT  INTO  COUNT_TAB( NO_COL) VALUES ((SELECT  /*+ INDEX_DESC(COUNT_TAB COUNT_TAB_PK) */           DECODE(MAX(NO_COL),NULL,0,MAX(NO_COL)+1)          FROM  COUNT_TAB           WHERE ROWNUM =1)); ■예 9_3_3  ||  INSA 테이블 SABUN 생성 예 SELECT  /*+ INDEX_DESC(INSA  INSA_PK) */             DECODE(SUBSTR(MAX(SABUN), 1,8)             ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SABUN) + 1             ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01') SABUN FROM INSA WHERE SABUN < TO_CHAR(SYSDATE, 'YYYYMMDD')||'99' AND ROWNUM =1; ■예 9_3_4  ||  인덱스를 이용한 채번 생성 INSERT INTO INSA(SABUN, JOIN_DAY, NAME, ENG_NAME, SEX, HP, JOIN_GBN_CODE) SELECT  /*+ INDEX_DESC(INSA  INSA_PK) */             DECODE(SUBSTR(MAX(SABUN), 1,8)             ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SABUN) + 1             ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01') SABUN             ,TO_CHAR(SYSDATE,'RRRRMMDD')             ,:IN_NAME             ,:IN_ENG_NAME             ,:IN_SEX             ,:IN_HP             ,:IN_JOIN_GBN_CODE FROM INSA WHERE SABUN < TO_CHAR(SYSDATE,'YYYYMMDD')||'99' AND ROWNUM =1;

■예 9_2_1  ||  채번 테이블 생성 CREATE  TABLE  NUMSEQ ( TAB_NO  VARCHAR2(10)  PRIMARY  KEY, SEQ  NUMBER ); ■예 9_2_2  ||  채번  대상 테이블 생성 ____CREATE TABLE____ TEST_1( NO VARCHAR2(10) PRIMARY KEY ); ■예 9_2_3  ||  채번 테이블 초기화 INSERT  INTO  NUMSEQ  VALUES('TEST_1', 0); ■예 9_2_4  ||  채번 대상 테이블 INSERT INSERT  INTO  TEST_1(NO) VALUES ((SELECT  SEQ + 1 FROM  NUMSEQ WHERE  TAB_NO='TEST_1')); ■예 9_2_5  ||  채번 테이블 UPDATE UPDATE  NUMSEQ  SET  SEQ = SEQ + 1; ■ 예 9_2_6  ||  채번 테이블 UPDATE CREATE  TABLE  TAB01_INSA(              --TAB01_INSA TABLE SABUN  VARCHAR2(15)  PRIMARY  KEY, NAME  VARCHAR2(10), JOIN_DAY  VARCHAR2(8), JOIN_GBN_CODE  VARCHAR2(3) ); CREATE  TABLE  TAB05_PRODUCT(       --TAB05_PRODUCT TABLE p_NO  VARCHAR2(15)  PRIMARY  KEY, p_CODE  VARCHAR2(3), p_COLOR  VARCHAR2(3), p_NAME  VARCHAR2(10), p_PROD_D  VARCHAR2(8) ); ■예 9_2_7  ||  NUMSEQ 채번 테이블 초기화 INSERT  INTO  NUMSEQ VALUES ('TAB01', (SELECT  TO_CHAR(SYSDATE, 'YYYYMMDD') || '00' FROM DUAL)); INSERT  INTO  NUMSEQ  VALUES('TAB05', 0); ■예 9_2_8  || 두 개의 테이블 데이터 입력 INSERT  INTO  TAB01_INSA(SABUN,  NAME,  JOIN_DAY,  JOIN_GBN_CODE) VALUES ((SELECT DECODE(SUBSTR(MAX(SEQ), 1,8)                   ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SEQ) + 1                   ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01')            FROM  NUMSEQ            WHERE  TAB_NO = 'TAB01'                                          AND  SEQ < TO_CHAR(SYSDATE,'YYYYMMDD')||'99'),           :NAME,  TO_CHAR(SYSDATE,'YYYYMMDD'),  :JOIN_GBN_CODE); INSERT  INTO  TAB05_PRODUCT (p_NO,  p_CODE,  p_COLOR,  p_NAME,  p_PROD_D) VALUES((SELECT  :CODE || :COLOR || :p_KIND || (SELECT  SEQ + 1                                                 FROM  NUMSEQ                                                 WHERE  TAB_NO='TAB05')           FROM  DUAL),      :p_CODE,  :p_COLOR,  :p_NAME, TO_CHAR(SYSDATE,'YYYYMMDD')); ■예 9_2_9  ||  두 개의 테이블 데이터 입력 UPDATE  NUMSEQ SET  SEQ = ((SELECT DECODE(SUBSTR(MAX(SEQ), 1,8)                          ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SEQ) + 1                          ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01')                 FROM NUMSEQ                 WHERE SEQ < TO_CHAR(SYSDATE,'YYYYMMDD')||'99')) WHERE TAB_NO = 'TAB01'; UPDATE  NUMSEQ  SET  SEQ = SEQ + 1  WHERE  TAB_NO = 'TAB05'; ■예 9_2_10  ||  각 테이블 데이터 확인 SELECT * FROM NUMSEQ; SELECT * FROM TAB01_INSA; SELECT * FROM TAB05_PRODUCT; ■예 9_2_11  || 테이블의 중복에러를 방지를 위한 PL-SQL예제 --상위로직 생략 UPDATE  NUMSEQ  SET  SEQ =  SEQ + 1     WHERE  TAB_NO = 'TAB01';     SELECT SEQ INTO :seq FROM NUMSEQ WHERE TAB_NO = 'TAB01'; COMMIT; INSERT  INTO  TAB01_INSA (SABUN,  NAME,  JOIN_DAY,  JOIN_GBN_CODE) VALUES (:seq,  :NAME,  SYSDATE,  :JOIN_GBN_CODE); --하위로직 생략 ■예 9_3_1  ||  채번 테이블 생성 ____CREATE TABLE____ COUNT_TAB( NO_COL VARCHAR2(3) CONSTRAINT COUNT_TAB_PK PRIMARY KEY ); ■예 9_3_2  ||  PK를 이용한 채번 INSERT  INTO  COUNT_TAB( NO_COL) VALUES ((SELECT  /*+ INDEX_DESC(COUNT_TAB COUNT_TAB_PK) */           DECODE(MAX(NO_COL),NULL,0,MAX(NO_COL)+1)          FROM  COUNT_TAB           WHERE ROWNUM =1)); ■예 9_3_3  ||  INSA 테이블 SABUN 생성 예 SELECT  /*+ INDEX_DESC(INSA  INSA_PK) */             DECODE(SUBSTR(MAX(SABUN), 1,8)             ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SABUN) + 1             ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01') SABUN FROM INSA WHERE SABUN < TO_CHAR(SYSDATE, 'YYYYMMDD')||'99' AND ROWNUM =1; ■예 9_3_4  ||  인덱스를 이용한 채번 생성 INSERT INTO INSA(SABUN, JOIN_DAY, NAME, ENG_NAME, SEX, HP, JOIN_GBN_CODE) SELECT  /*+ INDEX_DESC(INSA  INSA_PK) */             DECODE(SUBSTR(MAX(SABUN), 1,8)             ,TO_CHAR(SYSDATE, 'YYYYMMDD'), MAX(SABUN) + 1             ,TO_CHAR(SYSDATE, 'YYYYMMDD')||'01') SABUN             ,TO_CHAR(SYSDATE,'RRRRMMDD')             ,:IN_NAME             ,:IN_ENG_NAME             ,:IN_SEX             ,:IN_HP             ,:IN_JOIN_GBN_CODE FROM INSA WHERE SABUN < TO_CHAR(SYSDATE,'YYYYMMDD')||'99' AND ROWNUM =1;

첨부파일

INFO

PDSYSTEM