create or replace function ftcm_chgthdate( adtm_date date ) return varchar
is
  ls_date		varchar(10);
begin
	if adtm_date is null then
		return null;
	end if;
	ls_date := to_char( adtm_date , 'dd/mm/' ) || to_char( to_number( to_char( adtm_date , 'yyyy' ) ) + 543 );
	return trim(ls_date);
end;