How to update data when primary key is set through for update cursor

Question

Dear friends,
I have tried to update data in the table through forms using cursor for update and i have given the plsql i have used please help me where i do mistake.
DECLARE CURSOR EMP IS
SELECT EMPNO,EMPNAME,FATHERNAME,COMMUNITY,SEX,BILLUNIT,BIRTHDATE,RLYJOINDATE,RETIREMENTDATE
FROM PRMAEMP WHERE BILLUNIT=:CTRL.BILLUNIT AND SERVICESTATUS='SR'ORDER BY DESIGCODE,SCALECODE
FOR UPDATE;
BEGIN
GO_BLOCK('EMP_DETAILS');
SYNCHRONIZE;
FOR I IN EMP
LOOP
I.BILLUNIT:=:EMP_DETAILS.BILLUNIT;     
I.EMPNO:=:EMPNO;
I.EMPNAME:=:EMPNAME;
I.FATHERNAME:=:FATHERNAME;
I.COMMUNITY:=:COMMUNITY;
I.SEX:=:SEX;
I.BIRTHDATE:=:BIRTHDATE;
I.RLYJOINDATE:=:RLYJOINDATE;
I.RETIREMENTDATE:=:RETIREMENTDATE;
DOWN;
END LOOP;
COMMIT;
END;
your help is needed immediately

Answer 1

DECLARE CURSOR ABC IS
   SELECT EMPNO,
          EMPNAME,
          FATHERNAME,
          COMMUNITY,
          SEX,
          BILLUNIT,
          BIRTHDATE,
          RLYJOINDATE,
          RETIREMENTDATE
FROM PRMAEMP
WHERE BILLUNIT=:CTRL.BILLUNIT
AND SERVICESTATUS='SR'
ORDER BY DESIGCODE,SCALECODE
FOR UPDATE OF COMMUNITY;
V_EMPNO           PRMAEMP.EMPNO%TYPE;
V_EMPNAME         PRMAEMP.EMPNAME%TYPE;
V_FATHERNAME      PRMAEMP.FATHERNAME%TYPE;
V_COMMUNITY       PRMAEMP.COMMUNITY%TYPE;
V_SEX             PRMAEMP.SEX%TYPE;
V_BILLUNIT        PRMAEMP.BILLUNIT%TYPE;
V_BIRTHDATE       PRMAEMP.BIRTHDATE%TYPE;
V_RLYJOINDATE     PRMAEMP.RLYJOINDATE%TYPE;
V_RETIREMENTDATE  PRMAEMP.RETIREMENTDATE%TYPE;
BEGIN
   GO_BLOCK('EMP');
   SYNCHRONIZE;
   OPEN ABC;
   LOOP
      FETCH ABC INTO .... /*yOU NEED TO MENTION YOUR VARIABLES HERE*/;
      UPDATE PRMAEMP
      SET BILLUNIT= :EMP.BILLUNIT,
          EMPNO= :EMPNO,
          EMPNAME= :EMPNAME,
          FATHERNAME= :FATHERNAME,
          COMMUNITY= :COMMUNITY,
          SEX= :SEX,
          BIRTHDATE= :BIRTHDATE,
          RLYJOINDATE= :RLYJOINDATE,
          RETIREMENTDATE= :RETIREMENTDATE
      WHERE CURRENT OF ABC;
      EXIT WHEN ABC%NOTFOUND;
   END LOOP;
   CLOSE ABC;
END;
COMMIT;
END;Cheers
Sarma.