!COMPILER-GENERATED INTERFACE MODULE: Fri Jul 14 10:27:38 2017
        MODULE IDFMENUFIELDS__genmod
          INTERFACE 
            SUBROUTINE IDFMENUFIELDS(ID,K,J)
              INTEGER(KIND=4), INTENT(IN) :: ID
              INTEGER(KIND=4), INTENT(IN) :: K
              INTEGER(KIND=4), INTENT(IN) :: J
            END SUBROUTINE IDFMENUFIELDS
          END INTERFACE 
        END MODULE IDFMENUFIELDS__genmod