procedure IdRawBuildDns(
    const AnId: word; 
    const AFlags: word; 
    const ANumQuestions: word; 
    const ANumAnswerRecs: word; 
    const ANumAuthRecs: word; 
    const ANumAddRecs: word; 
    const APayload: TIdBytes; 
    var VBuffer: TIdBytes
);