نیاز به راهنمایی در مورد بازگرداندن آرایه و رکورد

[masoode]

سلام
من یک برنامه وب سرویس نوشته ام. در این برنامه نیاز است یک بارکد به سرویس فرستاده شود و کلیه اطلاعات موجود در دیتابیس که مرتبط با این بارکد است برگردانده شود. برای این کار در برنامه های عادی معمولا یک رکورد تعریف میکنم و اگر لازم بود آن را به صورت آرایه به پروسیجر مربوطه پاس میدهم. ظاهرا در وب سرویس تعریف کردن رکورد متفاوت است. من نمونه برنامه سرویس و کلاینت را اینجا آپ لود می کنم لطفا بررسی فرمایید.
این مسائل توی فروم نبود!

150161

[masoode]

من می خواهم یک چنین دیتا تایپ هایی داشته باشم
TProductRec=record
Barcode:string;
BarcodeId:Int64;
BackBarcode:string;
BackBarcodeId:Int64;
CodeModel:string;
CodeModelId:Integer;
Model:string;
ProductDT:TDateTime;
end;

TParts=Record
Barcode:string;
BarcodeId:Int64;
CodeModel:string;
CodeModelId:Integer;
ProductDT:TDateTime;
PartTypeId:Integer;
SmartOk:Boolean;
QCManOk:Boolean;
end;

TAllParts=array of TParts;