SELECT COUNT (*) INTO cnt FROM hammadde_birim WHERE kodu = nvl(kodu1,0);

     IF (cnt = 0)
     THEN
        SELECT hammadde_birim_SEQ.NEXTVAL INTO kodu1 FROM DUAL;

        INSERT INTO hammadde_birim (kodu, adi)
             VALUES (kodu1, adi1);
     ELSE
        UPDATE hammadde_birim
           SET adi = adi1
         WHERE kodu = kodu1;
     END IF;

     RETURN NULL;
  EXCEPTION
     WHEN OTHERS
     THEN
        RETURN create_exception_message;
  END;