VALUE(I_GRANT_NBR) TYPE GMGR-GRANT_NBR DEFAULT SPACE
VALUE(GRANT_NBR) TYPE GMGR-GRANT_NBR OPTIONAL
REFERENCE(I_GRANT) LIKE GMGR-GRANT_NBR OPTIONAL
VALUE(I_GRANT_NBR) LIKE GMGR-GRANT_NBR
REFERENCE(I_GRANT_NBR) LIKE GMGR-GRANT_NBR
REFERENCE(P_GRANT_NBR) TYPE GMGR-GRANT_NBR
VALUE(P_GRANT_NBR) LIKE GMGR-GRANT_NBR
VALUE(P_GRANT_NBR) TYPE GMGR-GRANT_NBR
VALUE(IM_GRANT_NBR) TYPE GMGR-GRANT_NBR
VALUE(I_GRANT_NBR) TYPE GMGR-GRANT_NBR
VALUE(IM_GRANT_NBR) LIKE GMGR-GRANT_NBR