FUNCTION cf_1formula
   RETURN NUMBER
IS
   n1   NUMBER (20) := 0;
   n2   NUMBER (20) := 0;
   n3   NUMBER (20) := 0;
BEGIN
   SELECT   SUM (a.billqty)
       INTO n1
       FROM mrnitems a, materialreceiptnote b, partymst c
      WHERE b.partycode = c.partycode
        AND a.mrncode = b.mrncode
        AND b.unitcode = 'UC2'
        AND b.fycode = 'FY-03'
        AND b.mrnclass = 'IMPORTED'
        AND c.partyname LIKE :NAME
        AND b.challanno LIKE :challan
        AND a.mrncode LIKE :mrn
   GROUP BY a.mrncode;

   SELECT   SUM (SUM (c.reamount))
       INTO n2
       FROM vouchers b, vouchdet c, partymst a, materialreceiptnote d
      WHERE d.partycode = a.partycode
        AND b.mrncode = d.mrncode
        AND a.partyname LIKE :NAME
        AND d.challanno LIKE :challan
        AND d.mrncode LIKE :mrn
        AND b.vouchercode = c.vouchercode
        AND c.accountcode IN
               ('AC-2.061', 'AC-2.992', 'AC-2.1054', 'AC-2.038', 'AC-2.043',
                'AC-2.953')
   GROUP BY c.accountcode;

   SELECT a.billqty
     INTO n3
     FROM mrnitems a, materialreceiptnote b, partymst c
    WHERE b.partycode = c.partycode
      AND a.mrncode = b.mrncode
      AND b.unitcode = 'UC2'
      AND b.fycode = 'FY-03'
      AND b.mrnclass = 'IMPORTED'
      AND c.partyname LIKE :NAME
      AND b.challanno LIKE :challan
      AND a.mrncode LIKE :mrn;

   RETURN NVL ((n3 * n2) / n1, 0);
END;