Как сделать ценник с двумя ценами, округленным процентом скидки и типа флага, который желательно брать из файла : Oracle

function CF_DATEFormula return Char is
  dt varchar(20);
begin
 dt := TO_CHAR(SYSDATE, 'DD.MM.YY');
 for c in ( select a.datebegin d1, a.dateend d2
	     from supermag.smdocuments d, supermag.smspec s,
	          supermag.smauctions a, supermag.smauctionatoms am
	    where s.DOCID=d.id and s.doctype=d.doctype and d.docstate=3
	      and s.docid=a.id and s.doctype=a.doctype and s.article=:Article
	      and a.id=am.aucid and a.doctype=am.doctype and am.locid=:P_LOC and am.pricetype=:P_PRICE_TYPE )
 loop
 	dt := TO_CHAR(c.d1, 'DD.MM.YY') || ' - ' || TO_CHAR(c.d2, 'DD.MM.YY');
 end loop;
 return dt;
			
end;

 grant select on supermag.smdocuments to SUPERMAG_FN_CARD_PRINTPRICER;
 grant select on supermag.smspec to SUPERMAG_FN_CARD_PRINTPRICER;
 grant select on supermag.smauctions to SUPERMAG_FN_CARD_PRINTPRICER;
 grant select on supermag.smauctionatoms to SUPERMAG_FN_CARD_PRINTPRICER;

function AfterPForm return boolean is
begin
	supermag,russianspell.LoadPriceCard (:P_COPIES, :P_ARTICLE, :P_IDCLASS, :P_DOC_TYPE, 
	                                    :P_DOC_ID, :P_LOC, :P_PRICE_TYPE, :P_NAME,
	                                    :P_Qty, :P_Type, 0, 1);
  return (TRUE);
end;

function price_valFormula return Char is
begin
  return supermag,russianspell.pricecardstring(0, price);
end;