Цепочка в CL с несколькими ключами с использованием OVRDBF

Question

Есть ли способ выполнить такую ​​операцию, как Chain в CL с несколькими ключами?Ниже будет работать для одного ключа: например, если у меня есть файл EMPMST, с ключом как EMPNO, и я, если мне нужно связать с Employee как 101, тогда я могу использовать ниже:

OVRDBF     FILE(EMPMST) POSITION(*KEY 1 EMPMSTr 101)
RCVF 

Если у меня есть несколько ключей в Empmst (EMPNO (101) и EMPNAME (JIM)), то как мне использовать эту команду?Я знаю, что вторым параметром будет 2. Но что будет четвертым параметром?

Answer 1

Согласно документации

Обратите внимание, что EMPNO передается в виде строки в кавычках, если положительное зонное десятичное значение.

OVRDBF     FILE(EMPMST) POSITION(*KEY 2 EMPMSTr '101JIM')

Обратите внимание, что если EMPNO является упакованным полем, вам нужно использовать шестнадцатеричный литерал.

OVRDBF     FILE(EMPMST) POSITION(*KEY 2 EMPMSTr x'101FD1C9D4')

Вам также необходимо использовать шестнадцатеричные литералы для отрицательных зонированных десятичных знаков.