#ifdef ALLOW_GENTIM2D_CONTROL
CADJ STORE xx_gentim2d  = tapelev3, key = ilev_3
CADJ STORE xx_gentim2d0 = tapelev3, key = ilev_3
CADJ STORE xx_gentim2d1 = tapelev3, key = ilev_3
#endif