H DATEDIT(*YMD)                                                                                
     D PARM1           DS                                                                           
      *物理ファイル名                                                                             
     D  FILNAME                1     10                                                             
      *　ライブラリー名                                                                           
     D  LIBNAME               11     20                                                             
      *  メンバー名                                                                               
     D  MBR                   21     30                                                             
      *トリガー事象                                                                               
     D  EVENT                 31     31                                                             
      *トリガー時間                                                                               
     D  TRGTIME               32     32                                                             
      *コミット・ロック・レベル                                                                   
     D  CMTLCKLVL             33     33                                                             
      *予約済                                                                                     
     D  FILLER1               34     36                                                             
      * CCSID                                                                                       
     D  CCSID                 37     40B 0                                                          
      *相対レコード��                                                                             
     D  RRNO                  41     44B 0                                                          
      * Reserved                                                                                    
     D  FILLER2               41     48                                                             
      *元のレコードのオフセット                                                                   
     D  OLDOFFSET             49     52B 0                                                          
      *元のレコードの長さ                                                                         
     D  OLDLEN                53     56B 0                                                          
      *元のレコードのＮＵＬＬバイト・マップのオフセット                                           
     D  ONULLOFF              57     60B 0                                                          
      *元のレコードのＮＵＬＬバイト・マップの長さ                                                 
     D  ONULLLEN              61     64B 0                                                          
      *新しいレコードのオフセット                                                                 
     D  NEWOFFSET             65     68B 0                                                          
      *新しいレコードの長さ                                                                       
     D  NEWLEN                69     72B 0                                                          
      *元のレコードのＮＵＬＬバイト・マップのオフセット                                           
     D  NNULLOFF              73     76B 0                                                          
      *元のレコードのＮＵＬＬバイト・マップの長さ                                                 
     D  NNULLLEN              77     80B 0                                                          
      * FILLER3                                                                                     
     D  FILLER3               81     96                                                             
      *元のレコード                                                                               
     D  OLDREC                97   ****                                                             
      *元のレコードのＮＵＬＬバイト・マップ                                                       
     D  OLDNULLM            ****   ****                                                             
      *新しいレコード                                                                             
     D  NEWREC              ****   ****                                                             
      *新しいレコードのＮＵＬＬバイト・マップ                                                     
     D  NEWNULLM            ****   ****                                                             
     D PARM2           DS                                                                           
     D  LEN                    1      4B 0                                                          
      ******************************************************************                            
      * パラメータリスト                                                                          
      ******************************************************************                            
     C     *ENTRY        PLIST                                                                      
     C                   PARM                    PARM1                                              
     C                   PARM                    PARM2