Đề Cương Ôn Tập Môn Tin Học Ứng Dụng Học Viện Tài Chính

Học viện Tài ĐỀ CƯƠNG ÔN TẬP MÔN TIN HỌC ỨNG DỤNG (Tham khảo) PHẦN I: CÁC DẠNG BÀI TẬP VỀ FOXPRO Dạng 1: Nhập liệu trường phải nhập? Vì sao? Ví dụ: Nhập liệu Quản lí vật tư USE Qlvt APPEND Các trường cần phải nhập là: số phiếu, mã vật tư, sản lượng, đơn giá Trường thành tiền nhập thành tiền tính thông qua khối lượng đơn giá Dạng 2: In, liệt kê theo điều kiện Sử dụng lệnh: LIST FOR (DK) TO PRINTER Ví dụ 1: In phiếu nhập kho quý 4/2010 LIST FOR tkno="152" AND (MONTH(ngay)>=10) AND (YEAR(ngay)=2010) TO PRINTER Ví dụ 2: Hiển thị người sinh nhật tháng 11 20 tuổi LIST FIELDS hodem,ten,ngaysinh FOR MONTH(ngaysinh)=11 AND (YEAR(date())-YEAR(ngaysinh)>20) Dạng 3: In liệt kê theo trình tự Sử dụng lệnh: INDEX LIST TO PRINTER Ví dụ: In phiếu nhập năm 2010 theo trình tự loại vật tư thành tiền giảm dần - Bước 1: Sắp xếp theo trình tự: INDEX ON mavt+ STR(10E8-tt,8) TO sx.idx FOR (tkno="152") AND (YEAR(ngay)=2010) - Bước 2: In liệt kê: LIST TO PRINTER Dạng 4: Tính trường theo công thức Sử dụng lệnh: REPLACE, IIF(nếu cần) Note: - Nếu có FOR ko cần viết ALL - Cách dùng lệnh IIF giống hàm IF Excel Ví dụ 1: Tính điểm trung bình phân loại học tập: - Tính điểm trung bình: REPLACE ALL dtb WITH (d1+d2+d3)/3 - Phân loại học tập: REPLACE ALL phanloai WITH IIF(dtb>=8.0, “Gioi”, IIF(dtb>=7.0, “Kha”, “TB”)) Dạng 5: Tăng, giảm, sửa trường Sử dụng lệnh: REPLACE Ví dụ 1: Giảm đơn giá xuất 12% ngày 10/04/2013 cho tất cà vật tư REPLACE dg WITH dg*0.88 FOR (tkco = "152") AND ngay={^2013-0410} Ví dụ 2: Chuyển quê quán từ Hà Nội -> Hà Tĩnh REPLACE ALL quequan WITH “Ha Tinh” FOR UPPER(quequan)=“HA NOI” Dạng 6: Xóa phục hồi Sử dụng lệnh: DELETE (xóa tạm thời), PACK (xóa hoàn TOàn), ZAP (xóa tất ghi) RECALL (phục hồi) Ví dụ: Xóa hoàn toàn phiếu mua mặt hàng có mã phiếu bắt đầu chữ H M? DELETE FOR tkno= "156" AND (left(mh,1)= "H" OR left(mh,1)= "M") PACK Dạng 7: Tính tổng, tính trung bình Sử dụng lệnh: SUM, AVERAGE Ví dụ: Tính đơn giá xuất bình quân mã vật tư S15 quý II/2011 SUM kl,tt TO T1,T2 FOR (Tkco="152") AND (mavt="S15") AND MONTH(ngay)>=4 AND MONTH(ngay)=2009 - Bước 2: Tính tổng theo nhóm: TOTAL ON STR(YEAR(ngay),4) + STR(MONTH(ngay),2) TO kq1 FIELDS tt - Bước 3: Mở bảng để xem: USE kq - Bước 4: Đếm (Sử dụng lệnh COUNT) COUNT TO vd2 FOR tt>10000000000 (Viết số ko đc viết 10 tỉ) ?"Số tháng kể từ năm 2009 tới tổng doanh thu bán hàng vượt 10 tỉ là:",vd2 Ví dụ 3: Lập báo cáo tồn kho loại vật tư - Bước 1: Chuyển dấu khối lượng phiếu bán hàng sang dấu âm: REPLACE kl WITH -kl FOR tkco= "152" - Bước 2: Chọn tiêu thức phân nhóm: mavt INDEX ON mavt TO sx2.idx - Bước 3: Tính tổng theo nhóm: TOTAL ON mavt TO kq2 FIELDS kl - Bước 4: Mở bảng để xem in: USE kq2 LIST mavt,kl [TO PRINTER] - Bước 5: Chuyển lại dấu: USE Qlvt REPLACE kl WITH - kl FOR tkco ="152" PHẦN II: BÀI TẬP VỀ FOXPRO Bài 1: Để quản lý bán hàng người ta sử dụng phiếu bán hàng, phiếu có thông tin sau: SP MH Tenhh MaNB TenNB Ngay DVT SL DG TT C(8) C(4) C(40) C(6) C(25) D(8) C(5) N(8) N(8,0) N(11,0) Số phiếu Mã hàng Tên hàng Mã người bán (3 ký tự đầu mã đại lý) Tên người bán Ngày bán Đơn vị tính Số lượng Đơn giá Thành tiền Yêu cầu: Tính thành tiền biết: TT=SL*DG + TT*10%VAT Nếu bán tháng 10 12 đơn giá tăng 3% In danh sách người bán đại lý có mã hàng HN1 HN2 In phiếu bán mặt hàng MH01 tháng năm 2010 theo thứ tự giảm dần số lượng Tính tổng số tiền bán nhân viên năm 2010 cho biết nhân viên có doanh thu bán hàng cao Tính đơn giá bình quân mặt hàng MH02 quý năm 2010 Bài làm REPLACE ALL tt WITH sl*dg*1.1 REPLACE tt WITH sl*dg*1.1 FOR month(ngay)=10 or month(ngay)=12 LIST FILEDS tennb,mh FOR left(manb,3)=“HN1” OR left(manb,3)=“HN2” TO PRINTER INDEX ON -sl TO cau3 FOR mh=“MH01” AND month(ngay)=9 AND year(ngay)=2010 LIST TO PRINTER INDEX ON tennb TO cau4a FOR year(ngay)=2010 TOTAL ON tennb TO tst FIELDS tt USE tst INDEX ON -tt TO cau4b GO TOP LIST NEXT tennb,tt SUM tt TO tongtt FOR mh=“MH02 AND ngay>={^2010-04-01} AND ngay={^2010-04-01} AND ngay=15 MONTH(NGAY)=6 AND YEAR(NGAY)=2010 AND LEFT(SP,2)=”PX” AND Hoặc LIST FIELDS SP,MAVT,NGAY,KL,DG,TT FOR NGAY={^2010-06-15}AND  Các dòng phiếu xuất quý I III năm 2010 vật tư S01 X02? LIST FOR left(sp,2)=“PX” AND (month(ngay)=7 AND month(ngay)