Xin hướng dẫn cách append vào file DBF tránh trùng mã

[poloni09]

Em có file DBF,

Nếu nhập liệu từ form của PM Fox thì có sẵn kiểm tra mã trùng cho tài sản
VD: nếu đã có mã TS01 thì ko thể nhập 1 TS01 khác ( mã do người dùng tự gõ)

Em đã biết cách append 1 file DBF vào file DBF tổng nhưng khi append thì lại ko thể tránh mã bị trùng.
VD: nếu đã có mã TS01 mà append bằng tay thì vẫn add vào CSDL được, lên phần mềm thì nó hiện lên tài sản TS01 dc nhập lúc sau. Nếu dùng PM xem file DBF thì thấy có 2 record cùng là TS01.

Mong Các anh chị giúp đỡ em.

 

[hunglam75]

append không trùng mã

thí dụ bạn có 2 DBF: tonghop.dbf và chitiet.dbf và 2 file này có cùng cấu trúc là ms,noidung
dùng lệnh này:
INSERT INTO tonghop (ms,nd) ;
SELECT ms,noidung FROM chitiet WHERE ms NOT in (SELECT ms FROM tonghop)

 

[poloni09]

Dạ vậy bảng của em cấu trúc tới 193 field thì phải liệt kê hết vào lệnh phải ko ạ?

 

[hunglam75]

Dạ vậy bảng của em cấu trúc tới 193 field thì phải liệt kê hết vào lệnh phải ko ạ?

nếu nhiều field như vậy thì code như sau:
SELECT * FROM chitiet WHERE ms NOT in (SELECT ms FROM tonghop) INTO CURSOR SYS(2015)
taptingan=ALIAS()
SELECT tonghop
APPEND FROM DBF(taptingan)
* nếu làm biếng mỗi lần phải gõ 4 lệnh như trên thì code ra 1 file thí dụ như CAPNHAT.PRG, mỗi lần chỉ gọi DO capnhat là xong