名前
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に設定した文字列が格納されます。