@@一个工业条形码验码算法@@(100分)

我用斑马打印机打印条形码，分别把条形码贴在工件上，工件分大件和小件，最后都装在一个大箱子里，组成一个产品。大件的条形码信息包含所有附带小件的信息。现在的工作是验码。我用扫描枪扫描大件条形码，扫描完后直接显示其所附带的小件的条形码，然后再扫描所附带小件的条形码，扫描小件没有顺序，如果扫描的小件条形码与其中的小件条形码吻合就显示OK，如果与其中的都不吻合就报警，并提示哪一个出错，如果漏码也报警，记录到数据库中，然后从新验码。
这个验码比较算法如何实现？
记录的数据库的格式是：
流水码 型号码 一次通过 一次为过错码、漏码 时间 备注
03111200001 DG1450160ZG NO DG1450160ZG 10:15:10
03111200002 DG1450160ZH OK DG1450160ZH 10:15:59
.
.
.

var
Sour,Compar1,Compar2,tot:String;
begin
Sour:=所读去到的小型码；
TOT:=Compar1+‘|’+copmar2;//compar1和compar2是根据条件重数据库里取出的条形码
if Pos(sour,TOT)=1 then
begin
//正确 ok
end
else
//错误 no

end;

(大件的条形码信息包含所有附带小件的信息)---怎样包括？是楼上所说的在数据库里包括，还是条码字符串就包括？

TO:duancy
大件的条形码字符串就包含小件的信息