Converting the field routine into formula

Hi All,

we are migrating the system from 3.5 to 7.0. for this i just want to convert the 3.5 field level routines to formula in 7.0 transformation.ccould you please help me.

These are the field level routines

Routine 1:

RESULT = COMM_STRUCTURE-/BIC/ZCR_QHCDT+0(6).

Routine 2:

DATA:
      lc_quarter TYPE /BI0/SCALQUARTER-CALQUARTER.

  CASE COMM_STRUCTURE-/BIC/ZCR_QHCDT+4(2).
    WHEN '01' OR '02' OR '03'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_QHCDT+0(4) '1' INTO lc_quarter
      .
    WHEN '04' OR '05' OR '06'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_QHCDT+0(4) '2' INTO lc_quarter
      .
    WHEN '07' OR '08' OR '09'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_QHCDT+0(4) '3' INTO lc_quarter
      .
    WHEN '10' OR '11' OR '12'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_QHCDT+0(4) '4' INTO lc_quarter
      .
  ENDCASE.

* result value of the routine
  RESULT = lc_quarter.

Routine 3:

* result value of the routine
  RESULT = COMM_STRUCTURE-/BIC/ZCR_QHCDT+0(4).

Routine 4:

* result value of the routine
  RESULT = COMM_STRUCTURE-/BIC/ZCR_RQDT+0(6).

Routine 5:
DATA:
      lc_quarter TYPE /BI0/SCALQUARTER-CALQUARTER.

  CASE COMM_STRUCTURE-/BIC/ZCR_RQDT+4(2).
    WHEN '01' OR '02' OR '03'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_RQDT+0(4) '1' INTO lc_quarter.
    WHEN '04' OR '05' OR '06'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_RQDT+0(4) '2' INTO lc_quarter.
    WHEN '07' OR '08' OR '09'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_RQDT+0(4) '3' INTO lc_quarter.
    WHEN '10' OR '11' OR '12'.
      CONCATENATE COMM_STRUCTURE-/BIC/ZCR_RQDT+0(4) '4' INTO lc_quarter.
  ENDCASE.

* result value of the routine
  RESULT = lc_quarter.

Routine 6:

* result value of the routine
  RESULT = COMM_STRUCTURE-/BIC/ZCR_RQDT+0(4).

Thanks

Mohan