Create Or Replace Function Fin_Prd(V_Dte In Date) Return Number Is
V_Fin_Str Number;
Begin
      Select To_Number(To_Char(Fin_Str,'MM')) Into V_Fin_Str From Nml.Cmp_00_00;
If To_Number(To_Char(V_Dte,'MM'))>V_Fin_Str Then
      Return(To_Number(To_Char(V_Dte,'MM')));
Else
      Return(V_Fin_Str);
End If;
End;

Create Or Replace Function Fin_Prd(V_Dte In Date,V_Rtn_Flg In Number Default 0) Return Number Is
V_Fin_Str Number;
Begin
If V_Rtn_Flg=0 Then
      Select To_Number(To_Char(Fin_Str,'MM')) Into V_Fin_Str From Nml.Cmp_00_00;
If To_Number(To_Char(V_Dte,'MM'))>V_Fin_Str Then
      Return(To_Number(To_Char(V_Dte,'MM')));
Else
      Return(V_Fin_Str);
End If;
Else
Return(To_Number(To_Char(V_Dte,'YYYY')));
End If;
End;

bcm@bcm-laptop:~$ oerr ora 4062
04062, 00000, "%s of %s has been changed"
// *Cause:  Attempt to execute a stored procedure to serve
//          an RPC stub which specifies a timestamp or signature that is
//          different from the current timestamp/signature of the procedure.
// *Action: Recompile the caller in order to pick up the new timestamp.
bcm@bcm-laptop:~$