애플리케이션 프로그래밍

Format-1

{GET|FIND} ANY {record-name-1|unique-name-1}.

Format-2

{GET|FIND} ANY {record-name-2|unique-name-2|RECORD} WITHIN
{extended-index-name|unique-name-3} INDEX.

검색할 인덱스 엔트리(혹은 랜덤 엔트리) 레코드의 타입 이름을 record-name-1, unique-name-1에 저장한다.

Format-2를 사용하는 경우 검색할 레코드의 타입 이름을 지정할 필요가 없다. 명시적으로 레코드 타입 이름을 지정하지 않는 경우 레코드 타입 이름 대신에 RECORD라고 지정한다.

record-name-2와 unique-name-2에는 extended-index-name이나 unique-name-3으로 지정된 확장 인덱스가 인덱스하는 레코드 타입 이름을 지정한다.

검색에 사용할 확장 인덱스의 이름을 extended-index-name 또는 unique-name-3에 지정한다.

record-name-1, record-name-2, unique-name-1, unique-name-2에 지정된 레코드 타입 이름은 READY할 때에 지정된 서브스키마에 포함되어 있어야 한다. 이 명령을 실행하기 전에 검색할 레코드의 엔트리 키 값을 사용자 작업 영역에 미리 설정한다.

검색할 레코드가 저장되어 있는 Range가 Subrange를 가지고 있는 경우 이 명령어를 실행하기 전에 Subrange를 선택하기 위한 위치 키(subrange location key)값을 미리 설정한다. 단 확장 인덱스 엔트리를 검색 할 때에는 확장 인덱스가 서브 레인지로 분할되어 있지 않다면 위치 키(subrange location key)값을 설정할 필요는 없다.

사용자 랜덤 함수를 이용하는 경우 이 명령을 실행하기 전에 사용자 랜덤 함수의 결과 값인 논리 페이지 번호를 FCOM의 PAGENO 변수에 설정한다.

extended-index-name이나 unique-name-3에 지정된 확장 인덱스에 대해서 PED 명령의 EXTENDEDINDEX BUFFER 절에 NOT USED 속성을 지정할 수 없다.

인덱스 엔트리 혹은 확장 인덱스 엔트리를 검색할 때에는 인덱스 및 확장 인덱스가 사용되므로 저장된 레코드들에 대한 인덱스 및 확장 인덱스가 검색 이전에 생성되어 있어야 한다.

Format-2에서 extended-index-name 혹은 unique-name-3만 지정되어 있고 레코드 이름이 명시적으로 주어져 있지 않은 경우라도, 지정된 확장 인덱스가 인덱스하는 레코드 타입은 READY할 때에 지정된 서브스키마에 포함되어 있어야 한다.

인덱스 엔트리, 랜덤 엔트리, 확장 인덱스 엔트리등 어떤 엔트리 방법을 이용할지는 레코드 타입 별로 SCHEMA 명령을 이용하여 정의된다.

Format-1

{GET|FIND} DUPLICATE {record-name-1|unique-name-1}
          [AT END GO TO procedure-name].

Format-2

{GET|FIND} DUPLICATE {record-name-2|unique-name-2|RECORD}
          [WITHIN {extended-index-name|unique-name-3} INDEX]
          [AT END GO TO procedure-name].

검색할 인덱스 엔트리 혹은 랜덤 엔트리 레코드의 타입 이름을 record-name-1에 지정하고, 검색할 인덱스 엔트리 혹은 랜덤 엔트리 레코드의 타입 이름을 unique-name-1에 저장한다.

Format-2를 사용하는 경우 검색할 레코드의 타입 이름을 지정할 필요가 없다. 명시적으로 레코드 타입 이름을 지정하지 않는 경우 레코드 타입 이름 대신에 RECORD라고 지정한다.

record-name-2에는 extended-index-name이나 unique-name 3으로 지정된 확장 인덱스가 인덱스하는 레코드 타입 이름을 지정하고, unique-name-2에는 extended-index-name이나 unique-name-3으로 지정된 확장 인덱스가 인덱스하는 레코드 타입 이름을 저장한다.

AT END 구문에 프러시저 이름을 지정하면 검색 결과, 해당하는 레코드가 더 이상 존재하지 않는 경우에(시스템 세트에 멤버 레코드가 하나도 없는 경우도 포함) 지정된 프러시저가 호출된다.

set-name이나 unique-name-2에 지정된 세트의 모든 멤버 레코드를 레코드 타입에 상관없이 검색하려면 RECORD를 지정한다.

set-name이나 unique-name-2에 지정된 세트의 멤버 레코드 중에서 특정한 레코드 타입의 레코드만을 검색하려는 경우 record-name이나 unique-name-1에 검색하려는 레코드의 타입 이름을 지정한다.

record-name이나 unique-name-1에 지정된 레코드 타입은 set-name이나 unique-name-2에 지정된 세트의 member record type 중에 하나로 정의되어 있어야 한다.

record-name이나 unique-name-1에 지정된 레코드 타입은 READY 명령어를 실행할 때에 지정된 서브스키마에 포함되어 있어야 한다.

set-name이나 unique-name-2에 지정된 세트 타입은 READY 명령어를 실행할 때에 지정된 서브스키마에 포함되어 있어야 한다.

시스템 세트의 멤버 레코드들을 저장하는 Range가 Subrange로 나뉘어 있는 경우 프로그램에서 실행될 맨 처음 시스템 엔트리 검색 이전에 Subrange를 선택하기 위한 위치 키(location key)값을 미리 사용자 작업 영역에 설정하고 이 명령어를 호출해야 한다.

AT END 구문이 지정된 경우 다음 조건 중 하나에 해당되면 지정된 프러시저가 호출된다.

set-name이나 unique-name-2에 지정된 세트의 모든 멤버 레코드를 레코드 타입에 상관없이 검색하려면 RECORD를 지정한다.

set-name이나 unique-name-2에 지정된 세트의 멤버 레코드 중에서 특정한 레코드 타입의 레코드만을 검색하려는 경우 record-name이나 unique-name-1에 검색할 레코드의 타입 이름을 지정한다.

record-name이나 unique-name-1에 지정된 레코드 타입은 set-name이나 unique-name-2에 지정된 세트의 멤버 레코드 타입 중에 하나로 정의되어 있어야 한다.

record-name이나 unique-name-1에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

set-name이나 unique-name-2에 지정된 세트 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

이 명령어는 STCS의 값을 참조하므로 호출 전에 엔트리 검색 명령을 사용하여 STCS 값을 설정해 두어야 한다. 따라서 이 명령어는 특정 트랜잭션의 첫 번째 명령으로 사용될 수 없다. 이 제약은 시스템 세트를 이용하는 시스템 엔트리 검색 명령에는 예외적으로 적용되지 않는다. 시스템 엔트리 검색 명령에서는 이러한 경우 첫 번째 멤버 레코드를 검색한다.

지정된 세트가 링 구조인 경우 SCHEMA 명령어의 SET 부항목의 LINKED 구문에 PRIOR가 지정되어 있지 않더라도 해당 SET에 대해서 이 명령어를 실행할 때 PRIOR를 지정할 수 있다.

지정된 세트가 리스트 구조이고 record-name이나 unique-name-1에 레코드 타입 이름이 지정되면 지정된 레코드 타입의 레코드가 찾아질 때까지 검색이 이루어진다. 지정된 레코드가 없는 경우 세트의 끝(set end) 상태가 발생하고 DBSCB(Database Status Control Block)의 값이 11로 설정된다.

AT END 구문이 지정된 경우 STCS가 가리키는 레코드가 지정된 세트에 연결되어 있지 않은 경우 지정된 프러시저가 호출된다.

set-name이나 unique-name에 지정된 세트 타입은 READY 명령어를 실행할 때에 지정된 서브스키마에 포함되어 있어야 한다.

이 명령은 STCS가 가리키는 세트의 오너 레코드를 검색하므로 호출 전에 STCS는 특정 세트 상의 위치를 가리키고 있어야 한다. 이 명령어를 실행하기 전에 엔트리 검색 명령을 사용해서 STCS의 값을 초기화해야 한다. 결과적으로 이 명령어는 특정 트랜잭션의 첫 번째 명령으로 사용될 수 없다. 이 제약은 시스템 세트가 대상인 경우에 예외적으로 적용되지 않는다. 특정 시스템 세트 타입에 해당하는 세트는 유일하기 때문이다.

SCHEMA 명령어를 이용하여 SET을 정의할 때 LINKED 절에 OWNER를 지정하지 않은 경우에도 링 구조 세트에 대한 오너 검색이 가능하다.

AT END 구문이 지정된 경우 다음 조건 중 하나에 해당되면 지정된 프러시저가 호출된다.

unique-name-1은 signed 4-digit numeric 변수여야 한다(즉, signed 2-byte binary item).

record-name이나 unique-name-2에 검색할 레코드 타입을 지정한다.

모든 레코드 타입을 얻기 위해서는 RECORD를 지정한다.

record-name이나 unique-name-2에 지정된 레코드 타입은 스키마에 정의되어 있어야 한다. 또한 해당 레코드 타입은 set-name이나 unique-name-3에 지정된 세트의 멤버 레코드로 정의되어 있어야 한다.

record-name이나 unique-name-2에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

set-name이나 unique-name-3에 지정된 세트 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

이 명령어는 STCS의 값을 참조하므로 호출 전에 엔트리 검색 명령을 사용하여 STCS 값을 설정해두어야 한다. 따라서 이 명령어는 특정 트랜잭션의 첫 번째 명령으로 사용될 수 없다.

set-name이나 unique-name-3에 지정된 세트 타입은 리스트 구조를 가져야 한다.

integer나 unique-name-1에 지정된 정수 값은 다음에 기술된 값보다 큰 값을 가질 수 없다.

SUBRANGE가 지정된 경우 검색 대상이 되는 영역은 Subrange이다. 지정되지 않은 경우는 Range 전체가 검색 대상이 된다.

AT END 구문이 지정된 경우 검색 대상 영역의 모든 인덱스 레코드가 검색되어 더 이상 검색할 레코드가 존재하지 않는 경우 지정된 프러시저가 호출된다.

record-name이나 unique-name에 지정된 레코드 타입은 SCHEMA 명령어로 해당 레코드 타입을 정의할 때 인덱스 엔트리로 지정된 레코드 타입이어야 한다.

record-name이나 unique-name에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

Range가 Subrange로 나뉘어져 있지 않은 경우에는 SUBRANGE를 지정할 수 없다.

FIRST와 SUBRANGE가 지정된 경우 검색할 Subrange를 선택하기 위한 위치 키 값이 사용자 작업 영역에 설정되어 있어야 한다.

NEXT를 지정한 경우 이 명령의 실행은 IXCS를 참조하므로 미리 설정되어 있어야 한다. 이 명령(NEXT)은 특정 트랜잭션의 첫 명령으로 사용될 수 없다.

레코드가 존재하지 않는 검색 대상 영역에 대해서 NEXT를 지정하여 이 명령을 실행하면 AT END 예외상황을 발생시킨다.

SUBRANGE가 지정된 경우 확장 인덱스의 Subrange가 검색 대상 영역이 된다. 지정되지 않은 경우 Range 전체가 검색 대상이 된다.

AT END 구문이 지정된 경우 검색 대상 영역의 모든 레코드가 검색되어 더 이상 검색할 레코드가 존재하지 않는 경우 지정된 프러시저가 호출된다.

record-name이나 unique-name-1에 지정된 레코드 타입에 대해서 스키마 명령어에 확장 인덱스가 정의되어 있어야 한다.

record-name이나 unique-name-1에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

검색할 레코드 타입을 명시적으로 지정할 필요는 없다. 명시적으로 지정하지 않는 경우에는 레코드 타입 이름 대신에 RECORD라고 지정한다.

record-name이나 unique-name-1이 지정된 경우 해당 레코드 타입은 extended-index-name이나 unique-name-2로 지정된 확장 인덱스에 의해서 인덱스 되어야 한다.

Range가 Subrange로 나뉘어져 있지 않은 경우에는 SUBRANGE를 지정할 수 없다.

FIRST와 SUBRANGE 구문이 모두 지정된 경우 검색할 Subrange를 선택하기 위한 위치 키 값이 사용자 작업 영역에 설정되어 있어야 한다. 여러 Subrange가 하나의 확장 인덱스 Subrange에 의해 인덱스 되는 경우에는 확장 인덱스 Subrange에 속하는 여러 Subrange 중에서 임의의 Subrange에 해당하는 위치 키를 설정하면 된다. 확장 인덱스가 Subrange로 나뉘어져 있지 않은 경우에는 위치 키 값을 설정하지 않아도 된다.

NEXT를 지정한 경우 이 명령어는 XICS를 참조하므로 미리 설정되어 있어야 한다. 이 명령은 특정 트랜잭션의 첫 명령으로 사용될 수 없다.

이 명령어를 사용하기 위해서 확장 인덱스가 미리 생성되어 있어야 한다.

검색 대상 영역에 레코드가 존재하지 않을 때 NEXT를 실행하면 이는 곧바로 AT END 예외상황을 발생시킨다. AT END 예외상황이 발생한 바로 다음에 PRIOR를 실행하면 가장 큰 확장 인덱스 키 값에 해당하는 레코드를 검색한다.

SUBRANGE가 지정된 경우 확장 인덱스의 Subrange가 검색 대상 영역이 된다. 지정되지 않은 경우 Range 전체가 검색 대상이 된다.

AT END 구문이 지정된 경우 검색 대상 영역의 모든 레코드가 검색되어 더 이상 검색할 레코드가 존재하지 않는 경우 지정된 프러시저가 호출된다.

record-name이나 unique-name-1에 지정된 레코드 타입에 대해서 SCHEMA 명령어에 확장 인덱스가 정의되어 있어야 한다.

record-name이나 unique-name-1에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 Subrange에 포함되어 있어야 한다.

검색할 레코드 타입을 명시적으로 지정할 필요는 없다. 명시적으로 지정하지 않는 경우에는 레코드 타입 이름 대신에 RECORD라고 지정한다.

record-name이나 unique-name-1이 지정된 경우 해당 레코드 타입은 extended-index-name이나 unique-name-2로 지정된 확장 인덱스에 의해서 인덱스 되어야 한다.

Range가 Subrange로 나뉘어져 있지 않은 경우에는 SUBRANGE를 지정할 수 없다.

LAST와 SUBRANGE 구문이 모두 지정된 경우 검색할 Subrange를 선택하기 위한 위치 키 값이 사용자 작업 영역에 설정되어 있어야 한다. 여러 Subrange가 하나의 확장 인덱스 Subrange에 의해 인덱스되는 경우에는 확장 인덱스 Subrange에 속하는 여러 Subrange 중에서 임의의 Subrange에 해당하는 위치 키를 설정하면 된다. 확장 인덱스가 Subrange로 나뉘어져 있지 않은 경우에는 위치 키 값을 설정하지 않아도 된다.

PRIOR를 지정한 경우 이 명령어는 XICS를 참조하므로 미리 설정되어 있어야 한다. 이 명령어는 특정 트랜잭션의 첫 명령으로 사용될 수 없다.

이 명령어를 사용하기 위해서 확장 인덱스가 미리 생성되어 있어야 한다.

검색 대상 영역에 레코드가 존재하지 않을 때 PRIOR를 실행하면 이는 곧바로 AT END 예외상황을 발생시킨다. AT END 예외상황이 발생한 바로 다음에 NEXT를 실행하면 가장 작은 확장 인덱스 키 값에 해당하는 레코드를 검색한다.

SUBRANGE가 지정된 경우 검색 대상이 되는 영역은 Subrange이다.

RANGE가 지정된 경우는 Range 전체가 검색 대상이 된다.

AT END 구문이 지정된 경우 검색 대상 영역의 모든 레코드가 검색되어 더 이상 검색할 레코드가 존재하지 않는 경우 지정된 프러시저가 호출된다.

record-name이나 unique-name에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

검색할 레코드 타입을 명시적으로 지정할 필요는 없다. 명시적으로 지정하지 않는 경우에는 레코드 타입 이름 대신에 RECORD라고 지정한다.

Range가 Subrange로 나뉘어져 있지 않은 경우에는 SUBRANGE를 지정할 수 없다.

FIRST와 SUBRANGE 구문이 모두 지정된 경우 검색할 Subrange를 선택하기 위한 위치 키 값이 사용자 작업 영역에 설정되어 있어야 한다.

NEXT를 지정하는 경우 이 명령은 RDCS나 RGCS를 참조하므로 미리 설정되어 있어야 한다. 따라서 이 명령은 트랜잭션의 첫 명령으로 사용될 수 없다.

검색 대상 영역에 레코드가 존재하지 않는 경우 NEXT를 지정하여 이 명령을 수행하면 AT END 예외상황이 발생한다.

SUBRANGE가 지정된 경우 검색 대상이 되는 영역은 Subrange 이다. RANGE가 지정된 경우는 Range 전체가 검색 대상이 된다.

AT END 구문이 지정된 경우 검색 대상 영역의 모든 레코드가 검색되어 더 이상 검색할 레코드가 존재하지 않는 경우 지정된 프러시저가 호출된다.

USING CRP 구문이 지정되면 검색영역의 범위를 제어하는 정보인 CRP 값이 변경된다. 지정되지 않은 경우에는 CRP 값은 변경되지 않는다.

record-name이나 unique-name에 지정된 레코드 타입은 READY 명령어를 실행할 때 지정된 서브스키마에 포함되어 있어야 한다.

검색할 레코드 타입을 명시적으로 지정할 필요는 없다. 명시적으로 지정하지 않는 경우에는 레코드 타입 이름 대신에 RECORD라고 지정한다.

Range가 Subrange로 나뉘어져 있지 않은 경우에는 SUBRANGE를 지정할 수 없다.

FIRST와 SUBRANGE 구문이 모두 지정된 경우 검색할 Subrange를 선택하기 위한 위치 키 값이 사용자 작업 영역에 설정되어 있어야 한다.

range-name이나 unique-name-2에 지정된 Range는 SCHEMA 명령어의 RANGE 항목에 의해 CRP 속성을 갖도록 정의되어 있어야 한다.

USING CRP 구문과 record-name이나 unique-name-2에 레코드 타입을 함께 지정할 수 있다. 이 경우 지정된 레코드 타입은 SCHEMA 명령의 해당 RANGE 항목의 최상위 오너 레코드로 정의되어 있어야 한다(range record 혹은 representative record 라고 부른다).

NEXT를 지정하는 경우 이 명령은 RDCS나 RGCS를 참조하므로 미리 설정되어 있어야 한다. 따라서 이 명령은 트랜잭션의 첫 명령으로 사용될 수 없다.

USING CRP 구문이 지정된 경우 RDCS나 RGCS에 대한 참조 없이 CRP가 가리키는 레코드가 검색된다. NEXT가 지정되어 있는 경우에도 USING CRP 구문이 지정된 경우 검색되는 레코드는 CRP에 의해 결정된다.

PGCS에 기존에 레코드를 검색했을 때 반환된 값을 설정한 후에 이 명령을 실행해야 한다.