STRING ステートメント

STRING ステートメント・ストリングは、複数のデータ項目またはリテラルの一部 または全部の内容を連結して、単一のデータ項目にします。

一連の MOVE ステートメントの代わりに、1 つの STRING ステートメントを書くことができます。

構文図を読む構文図をスキップする
STRING ステートメント - 形式

           .-----------------------------------------------.   
           | .------------.                                |   
           V V            |                                |   
>>-STRING------+-ID-1---+-+--DELIMITED--+----+--+-ID-2---+-+---->
               '-リテラル-1-'               '-BY-'  +-リテラル-2-+     
                                                '-SIZE---'     

>--INTO--ID-3--+-------------------------+---------------------->
               '-+------+--POINTER--ID-4-'   
                 '-WITH-'                    

>--+-------------------------------+---------------------------->
   '-+----+--OVERFLOW--命令ステートメント-1-'   
     '-ON-'                            

>--+------------------------------------+--+------------+------><
   '-NOT--+----+--OVERFLOW--命令ステートメント-2-'  '-END-STRING-'   
          '-ON-'                                            

注: ID-4 (POINTER 項目) 以外のすべての ID は、明示的または暗黙に USAGE DISPLAY を持っていなければなりません。
ID-1
1 つまたは複数の送り出しフィールドを表します。 送り出しフィールドまたは分離文字が基本数字項目である場合には、それは整数として記述されていなければなりません。 さらに、その PICTURE 文字ストリングに記号 P が含まれていてはなりません。
リテラル-1
1 つまたは複数の送り出しフィールドを表します。 すべてのリテラルは非数字リテラルでなければなりません。 それぞれは、ALL リテラルをもたない表意定数にすることができます。 表意定数を指定すると、それは 1 文字の非数字リテラルと見なされます。
IBM Extension
ID-1 から ID-3 まで
外部浮動小数点項目にすることはできません。
End of IBM Extension
IBM Extension

ID-1ID-2、または ID-3 のいずれかが DBCS データ項目である場合は、 それらの ID はすべて DBCS データ項目なければならず、リテラルはすべて DBCS リテラルでなければなりません。

変更の始まり ID-1ID-2、または ID-3 のいずれかが国別データ項目である場合は、それらのすべてが国別データ項目でなければなりません。 変更の終わり

リテラル-1 または リテラル-2 のいずれかが DBCS リテラルである場合は、両方とも DBCS リテラルでなければならず、 リテラル-1 からリテラル-3 は DBCS データ項目でなければなりません。

SPACE は、DBCS 項目に使用できる唯一の表意定数です。

End of IBM Extension
関連情報