- DataSet T-SQL 語法
IF OBJECT_ID('Purch') IS NOT NULL
DROP TABLE Purch
IF OBJECT_ID('PurchDetail') IS NOT NULL
DROP TABLE PurchDetail
IF OBJECT_ID('Employ') IS NOT NULL
DROP TABLE Employ
IF OBJECT_ID('Supplier') IS NOT NULL
DROP TABLE Supplier
CREATE TABLE Purch(PurNO char(11),PurDate date,PurEmpNO char(5),SPLNO char(5))
CREATE TABLE PurchDetail(PurNO char(11),MtNum char(16),Spec nvarchar(100),PurQty int,Price money,Unit nchar(4),DealDate date)
CREATE TABLE Employ (EmpNO char(5),EmpName nchar(10))
CREATE TABLE Supplier (SPLNO char(5),SPLName nchar(10),Contact nchar(10),Tel nchar(10),Fax nchar(10))
INSERT INTO Employ VALUES
('001',N'王小明'),
('002',N'李大白')
INSERT INTO Supplier VALUES
('001',N'雜物供應商',N'王XX','00-1234567','00-1234444'),
('002',N'電熱供應商',N'張OO','00-3217654','00-3217777'),
('003',N'噴漆供應商',N'蔡YY','00-9999999','00-9999990'),
('004',N'馬達供應商',N'柯ZZ','00-6666666','00-6666666')
INSERT INTO Purch VALUES
('20131021001','20131021','001','002'),
('20131021002','20131021','002','004')
INSERT INTO PurchDetail VALUES
('20131021001','557D118L050',N'電熱_230V 1180x500W',60,231,N'支','20131028'),
('20131021001','557D146L065',N'電熱_230V 1460×650W',60,251,N'支','20131028'),
('20131021001','557D194L065',N'電熱_230V 1940x650W',36,278,N'支','20131028'),
('20131021002','554819',N'馬達_10"_200~240V 50/60Hz_雙轉向_UL認証',4000,310,N'顆','20140101'),
('20131021002','553201B',N'馬達_12"_4P_220V_雙轉向_無保護器',600,340,N'顆','20131128'),
('20131021002','552215B',N'馬達 12" 75/46W 4P_200-240V_左右轉_散熱',600,463,N'顆','20131128'),
('20131021002','5546257',N'馬達_1/4HP 3ψ 380~420V50/60Hz_三片式外殼',300,828,N'顆','20131101')
-- 子報表 DataSet(dsPurch)T-SQL 語法
SELECT
P.* ,
E.EmpName ,
S.SPLName ,
S.Contact ,
S.Tel ,
S.Fax
FROM Purch AS P
JOIN Employ AS E ON P.PurEmpNO = E.EmpNO
JOIN Supplier AS S ON P.SPLNO = S.SPLNO
-- 子報表明細 DataSet(dsPurchDetail)T-SQL 語法
SELECT * FROM PurchDetail WHERE PurNO = @PurNO
建立新報表:子報表,並新增清單控件,並在清單內 => 滑鼠右鍵 => 矩形屬性
矩形屬性 => 一般 => 勾選[在後方加入分頁符號],利用清單是要把每一筆採購紀錄都放在一個頁面
在清單內建立一個矩形,利用矩形來群組檔頭資訊
在清單內建立一個子報表控件
建立新報表:子報表明細 DataSet T-SQL 語法
dsPurchDetail 的 T-SQL 語法有 WHERE PurNO = @PurNO,在該 dsPurchDetail 的參數可以看見@PurNO 參數
子報表明細排版,拉一個 Table 進來,排版設定後如下圖
- 新增資料列:用來放置全部物料總和
- 運算式:單一物料小計(採購數量 X 單價)
- 運算式:全部物料總和 (採購數量 X 單價的總和)
回到子報表,子報表控件 => 滑鼠右鍵 => 子報表屬性 => 一般 => 設定[將此報表當成子報表]
子報表屬性 => 參數,手動加入參數,名稱:PurNO、值:[PurNO],此參數是要傳入子報表明細中使用
新增採購單注意事項文字,整理排版並預覽設定結果
沒有留言:
張貼留言