svDlg := MessageDlg('Подтвердите аннулирование документа'+getVar('scaption')

,mtConfirmation,'mbYes,mbNo',0 );

if svDlg <> mrYes then

Abort;