进度4gl：我想在运行程序时避免错误消息

DEFINE TEMP-TABLE ttservice NO-UNDO
    FIELD ad-num AS CHARACTER
    INDEX ttprimary AS UNIQUE ad-num .

ASSIGN  ttservice.ad-num = vehicles.ad-num NO-ERROR 
DEFINE TEMP-TABLE ttservice NO-UNDO
    FIELD a