Via deze validatiemodule van het prestatie-invoerscherm kan men controleren of de ingevoerde periode nog niet bezet is door de actuele prestatieplichtige. Deze controle gebeurt op de lopende, nog niet gefactureerde leveringen. Deze module illustreert het gebruik van de X-functies:
Dit gebeurt via een validatiemodule. De code moet worden ingevoerd in een bestand ask_prest_valid.PRG (in de hoofddirectory van Mercator), op te stellen op FXP
with ask_prest
local chaine_free
select (.ltable)
chaine_free=xprestisfree(pieds_v_tmp.id_yprest,.date.value,.h1.value,.h2.value,id+journal+str(piece,10)+dl_id)
if !empty(chaine_free)
local le_journal,la_piece
le_journal=substr(m.chaine_free,11,5)
la_piece=substr(m.chaine_free,16,10)
if val(m.la_piece)>0
stop(iif_langue(users.langue,'Time range already busy: ','Periode al bezet: ','Plage horaire déjà utilisée : ')+rtrim(m.le_journal)+' '+ltrim(m.la_piece)+' !')
return .F.
else
stop(iif_langue(users.langue,'Time range already busy : current document !','Periode al bezet: huidig document!','Plage horaire déjà utilisée : document en cours !'))
return .F.
endif
endif
endwith
return .T.