名前
TDSEQUENCEELEMENTSET
形式
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 SEQ-P USAGE POINTER.
01 DATA-P USAGE POINTER.
01 COPY ULONG IN CORBA REPLACING CORBA-UNSIGNED-LONG BY ELM-NUM.
PROCEDURE DIVISION.
CALL "TDSEQUENCEELEMENTSET" USING
SEQ-P
ELM-NUM
DATA-P.機能説明
CORBA-SEQUENCE-ELEMENT-SET関数に相当します。SEQ-Pで指定されたシーケンスのELM-NUM番目の要素にDATA-Pで指定したデータの設定を行います。
復帰値
正常終了した場合は、DATA-Pに依頼前と同じ値を返します。ELM-NUMで指定された要素にデータが設定できない場合、DATA-PにNULLポインタを返します。