Interstage Application Server リファレンスマニュアル(API編) |
目次
索引
![]() ![]() |
第4章 COBOLインタフェース | > 4.13 COBOL拡張インタフェース |
CORBA-WSTRING-GET
ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. COPY CONST IN CORBA. 01 STRING-IN USAGE POINTER. 01 COPY ULONG IN CORBA REPLACING CORBA-UNSIGNED-LONG BY S-LENGTH. 01 STRING-OUT PIC N(n) PROCEDURE DIVISION. CALL "CORBA-WSTRING-GET" USING STRING-IN S-LENGTH STRING-OUT.
STRING-INで指定されたヌルポインタで終了する文字列からS-LENGTHで指定された長さの文字列をSTRING-OUTに格納します。
示されるサイズのPIC N(n:文字数)です。
正常終了した場合、STRING-OUTに取り出した文字列が格納されます。STRING-INの長さがS-LENGTH以下の場合はヌルポインタまでの文字列を格納し、残りサイズにはスペースパディングします。S-LENGTHはSTRING-OUTのサイズ以下でなければなりません。
目次
索引
![]() ![]() |