Converting the field routine into formula

441 Views

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