OUTREC

この DFSORT 制御文の次のパラメーターが、MFSORT および MFJSORT でサポートされています。

                      +--------,-------+
                      V                |
>--OUTREC--.-FIELDS=-(.-item-statement-.)----.---<<
           |                                 |
           |          +--------,----------+  |
           |          V                   |  |
           +-OVERLAY=(.-overlay-statement-.)-+

item-statement フィールドの次のオプションがサポートされています。

                     +-------------,-----------------------------------------+
                     V                                                       |
>--item-statement=--(.--.----.-.-s-----------------------------------------.-.-)--<<
                        +-c:-+ |                                           |
                               +-p-----------------------------------------+
                               |                                           |       
                               +-p,m.----.---------------------------------+     
                               |    +-,a-+                                 |
                               |                                           |      
                               +-p,m,format.-,edit-.-----------------------+     
                               |           +-,to---+                       |
                               |                                           |     
                               +-p,HEX-------------------------------------+  
                               |                                           |
                               +-p,m,HEX-----------------------------------+      
                               |                                           |
                               +-p,m,TRAN=LTOU-----------------------------+
                               |                                           |  
                               +-p,m,TRAN=UTOL-----------------------------+
                               |                                           |  
                               +-p,m,TRAN=ALTSEQ---------------------------+
                               |                                           |  
                               +-p,m,Y2x(c)--------------------------------+
                               |                                           |  
                               +-p,m,Y2xP----------------------------------+
                               |                                           |  
                               +-p,m,CHANGE=(v,(find-set)+,[NOMATCH=(set)]-+
                               |                                           |
                               +-p,m,date-format,DATEDIFF,p,m,date-format--+
                               |                                           |  
                               +-seqnum------------------------------------+  
 
注:オプション p,m,Y2x(c) については、この COBOL システムで解析および無視されるのは (c) のみです。

ioverlay-statement フィールドの次のオプションがサポートされています。

                +-------------,-----------------------------------------+
                V                                                       |
>--OVERLAY--=--(.--.----.-.-s-----------------------------------------.-.-)--<<
                   +-c:-+ |                                           | 
                          +-p,m---------------------------------------+
                          |                                           |       
                          +-p,m.----.---------------------------------+     
                          |    +-,a-+                                 |
                          |                                           |      
                          +-p,m,format.-,edit-.-----------------------+     
                          |           +-,to---+                       |
                          |                                           |     
                          +-p,m,HEX-----------------------------------+      
                          |                                           |
                          +-p,m,TRAN=LTOU-----------------------------+
                          |                                           |  
                          +-p,m,TRAN=UTOL-----------------------------+
                          |                                           |  
                          +-p,m,TRAN=ALTSEQ---------------------------+
                          |                                           |  
                          +-p,m,Y2x(c)--------------------------------+
                          |                                           |  
                          +-p,m,Y2xP----------------------------------+
                          |                                           |  
                          +-p,m,CHANGE=(v,(find-set)+,[NOMATCH=(set)]-+
                          |                                           |
                          +-p,m,date-format,DATEDIFF,p,m,date-format--+
                          |                                           |
                          +-seqnum------------------------------------+ 
注:オプション p,m,Y2x(c) については、この COBOL システムで解析および無視されるのは (c) のみです。

次のフィールド値が必要に応じてサポートされています。

フィールド
a (整列) D (二重語整列)、F (全語整列)、H (半語整列)
s (分離) ADD、DATE、&DATE、DATE=(abcd)、&DATE=(abcd)、DATE1、&DATE1、DATE1P、&DATE1P、DATE2、&DATE2、DATE2P &DATE2P、DATE3、&DATE3、DATE3P、&DATE3P、DATEn、&DATEn、DATEn+r、&DATEn+r、DATEn-r、&DATEn-r、DATEn(c)、&DATEn(c)、DATEn(c)+r、&DATEn(c)+r、DATEn(c)-r、&DATEn(c)-r、DATEnP、DATEnP+r、&DATEnP+r、DATEnP-r、&DATEnP-r、DATENS、&DATENS、DATENS=(abc)、&DATENS=(abc)、DIVIDE、LITERALS、MULTIPLY、SEPERATOR CHARS、SEQNUM、SUBTRACT

DATEDIFF の制限事項:

DATEDIFF で使用できる日付フィールドの各タイプの有効な長さ (m) とフォーマット (Y2x) の組み合わせは、次のとおりです。

  • m,Y2X
  • 5,Y2T
  • 6,Y2T
  • 5,Y2W
  • 6,Y2W
  • 3,Y2U
  • 4,Y2V
  • 3,Y2X
  • 4,Y2Y

許容される DATEDIFF オペランドの最大数は 300 です。