4.13.10 CORBA-WSTRING-SET

名前

CORBA-WSTRING-SET

形式

 ENVIRONMENT DIVISION.
 DATA DIVISION.
  WORKING-STORAGE SECTION.
    COPY CONST IN CORBA.
    01 STRING-OUT USAGE POINTER.
    01 COPY ULONG IN CORBA REPLACING CORBA-UNSIGNED-LONG BY S-LENGTH.
    01 STRING-IN PIC N(n)

 PROCEDURE DIVISION.
    CALL "CORBA-WSTRING-SET" USING
         STRING-OUT
         S-LENGTH
         STRING-IN.

機能説明

STRING-INで指定された文字列からS-LENGTHで指定された長さの文字列をSTRING-OUTに格納します。格納する際にヌルポインタを付加します。S-LENGTHは STRING-OUTのサイズよりヌルポインタ分小さい値でなければなりません。STRING-OUTはS-LENGTHで示されるサイズのPIC N(n)です。

復帰値

正常終了した場合、STRING-OUTに設定した文字列が格納されます。