PARAMETER gr1,gr2,gr3,gr4,gr5
merror=gr1
mess=gr2
mess1=gr3
mprog=gr4
mlineno=gr5
SELECT greska
APPEND BLANK
replace datum WITH DATE()
replace vreme WITH TIME()
replace greska WITH merror
replace por	WITH mess
replace por1 WITH mess1
replace pro WITH mprog
replace lini	WITH mlineno
replace radnik WITH m.sifrad
DO FORM greska
RETURN
