名前
TDSEQUENCEELEMENTGET
形式
  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 "TDSEQUENCEELEMENTGET" USING
         SEQ-P
         ELM-NUMDATA-P.
機能説明
CORBA-SEQUENCE-ELEMENT-GET関数に相当します。SEQ-Pで指定されたシーケンスからELM-NUMで指定された要素番号の内容を取り出します。
復帰値
正常終了した場合は、DATA-Pに依頼されたシーケンスの要素のポインタを返します。ELM-NUMで指定された要素がない場合、DATA-PにNULLポインタを返します。