Fernandez_EX19_AC_CH10_GRADER_CAP_HW.zip

EX19_AC_CH10_GRADER_CAP_HW_Instructions.docx

Grader – InstructionsAccess 2019 Project

EX19_AC_CH10_GRADER_CAP_HW – Specialty Foods 1.1

Project Description:

You are employed at Specialty Foods, Ltd., a small international gourmet foods distributor. The company has asked you to modify the database and improve the reliability of the data entry process. You decide to create a few macros and add a menu for the common forms and reports. You will also modify the record source of one of the reports.

Steps to Perform:

Step

Instructions

Points Possible

1

Start Access. Open the downloaded Access file named Exp19_Access_Ch10_Cap_Specialty.accdb. Grader has automatically added your last name to the beginning of the filename. Save the file to the location where you are storing your files.

0

2

You will create an event-driven data macro that will populate a new field automatically each time a record is added to the table.Open the Orders table in Datasheet view, observe the data, and then switch to Design view. Add a new field, ExpectedShipDate with the data type Date/Time below the OrderDate field. Save the table.

6

3

Create a data macro attached to the Before Change event. Use the SetField Action to populate the ExpectedShipDate in the table. The ExpectedShipDate will always be five days after the OrderDate. Save the macro. Close the macro. Save the table.

10

4

You will change a value in the first record, and then move to the second record to trigger the macro. Switch to Datasheet view of the Orders table. Retype the OrderDate in the first record (OrderID 10248) and press DOWN ARROW. The macro will be triggered and automatically fill in the ExpectedShipDate with a date five days after the OrderDate.

6

5

Repeat the test on the second and third records (10249 and 10250). Close the table.

6

6

Open the Main Menu form in Design view. Add three buttons below the Forms label that will open the three forms in the database: Enter Customers, Enter Orders, and Enter Suppliers (in that order and to show all records). Set the first one at the 2" mark on the vertical ruler and the 1" mark on the horizontal ruler. Set the height of the button to 0.5" and the width to 1". The first button should have the caption Enter Customers with the button named as cmdEnterCustomers.

10

7

Repeat the same procedure for Enter Orders and Enter Suppliers, setting each button immediately below the one before it. For example, set Enter Orders so that its top border is set approximately at the 2.6-inch mark, and Enter Suppliers is set approximately at the 3.1-inch mark.

12

8

10

9

Repeat the same procedure for Orders and Products, setting each button immediately below the one before it. Save the form, switch to Form view, and then test the buttons. Close all objects except the Main Menu form. For example, set Orders so that its top border is set approximately at the 2.6-inch mark, and Products is set approximately at the 3.1-inch mark.

12

10

Switch to Design view, add a Close Database button that exits Access to the top-right corner of the form, at the 0" mark on the vertical ruler and the 5" mark on the horizontal ruler, with a height of 0.5" and a width of 1". Name the button cmdExit.

8

11

Modify the embedded macro in the On Click property of the cmdExit button. Add a MessageBox action to the macro to display the message Please check all updates before exiting! and set the Type to Information. Move the action up to before the QuitAccess action. Change the option under QuitAccess from Prompt to Exit. Save and close the macro.

6

12

Save the form, switch to Form view, and then set the Main Menu form to display when the database opens. Test the Close Database button. Reopen the database.

4

13

You want to modify the records displayed in the Employees report. You will use an SQL statement to modify the record source so that only employees who live in London display in the report.Open the Employees report in Design view. Open the Property Sheet and click in the Record Source property box. Type an SQL statement into the Record Source property of the report. The statement should select all fields ( *) for employees where the City equals (=) London. Save the report. Test the report in Print Preview and close the report.

10

14

Close all database objects. Close the database and then exit Access. Submit the database as directed.

0

Total Points

100

Created On: 07/11/20191EX19_AC_CH10_GRADER_CAP_HW – Specialty Foods 1.1

Fernandez_Exp19_Access_Ch10_Cap_Specialty.accdb

CategoryID CategoryName Description Picture
1 Beverages Soft drinks, coffees, teas, beers, and ales
2 Condiments Sweet and savory sauces, relishes, spreads, and seasonings
3 Confections Desserts, candies, and sweet breads
4 Dairy Products Cheeses
5 Grains/Cereals Breads, crackers, pasta, and cereal
6 Meat/Poultry Prepared meats
7 Produce Dried fruit and bean curd
8 Seafood Seaweed and fish
CustomerID CompanyName ContactName Address City PostalCode Country Phone
BONAP Bon app' Laurence Lebihan 12, rue des Bouchers Marseille 13008 France 91.24.45.40
CHOPS Chop-suey Chinese Yang Wang Hauptstr. 29 Bern 3012 Switzerland 0452-076545
KOENE Königlich Essen Philip Cramer Maubelstr. 90 Brandenburg 14776 Germany 0555-09876
LILAS LILA-Supermercado Carlos González Carrera 52 con Ave. Bolívar #65-98 Llano Largo Barquisimeto 3508 Venezuela (9) 331-6954
RICSU Richter Supermarkt Michael Holz Grenzacherweg 237 Genève 1203 Switzerland 0897-034214
SAVEA Save-a-lot Markets Jose Pavarotti 187 Suffolk Ln. Boise 83720 USA (208) 555-8097
SPLIR Split Rail Beer & Ale Art Braunschweiger P.O. Box 555 Lander 82520 USA (307) 555-4680
WHITC White Clover Markets Karl Jablonski 305 – 14th Ave. S.Suite 3B Seattle 98128 USA (206) 555-4112
WILMK Wilman Kala Matti Karttunen Keskuskatu 45 Helsinki 21240 Finland 90-224 8858
EmployeeID LastName FirstName Title HireDate Address City PostalCode
1 Davolio Nancy Sales Representative 2018-05-01 507 – 20th Ave. E.Apt. 2A Seattle 98122
2 Fuller Andrew Vice President, Sales 2018-08-14 908 W. Capital Way Tacoma 98401
3 Lorah Ron Sales Representative 2015-04-01 722 Moss Bay Blvd. Kirkland 98033
4 Peacock Margaret Sales Representative 2014-05-03 4110 Old Redmond Rd. Redmond 98052
5 Buchanan Steven Sales Manager 2017-10-17 14 Garrett Hill London SW1 8JR
6 Suyama Michael Sales Representative 2012-10-17 Coventry HouseMiner Rd. London EC2 7JR
7 King Robert Sales Representative 2017-01-02 Edgeham HollowWinchester Way London RG1 9SP
8 Callahan Laura Inside Sales Coordinator 2017-03-05 4726 – 11th Ave. N.E. Seattle 98105
9 Dodsworth Anne Sales Representative 2016-11-15 7 Houndstooth Rd. London WG2 7LT
ID mSysRowId
1 sQ8oQGTEOfSNQBG2nCNL/XFR5mO9e3Ni3wzKD2fF+Sc=-~LW5SBADNfHFisDbM1jGGCw==
OrderID ProductID Quantity Discount Discount1 mSysRowId
10248 11 12 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10248 42 10 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10248 72 5 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10252 33 25 0.0 0.05 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10254 55 21 0.0 0.15 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10255 36 25 0.0 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10255 59 30 0.0 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10256 53 15 0.0 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10329 19 10 0.05 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10329 30 8 0.05 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10329 38 20 0.05 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10329 56 12 0.05 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10330 26 50 0.15 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10330 72 25 0.15 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10331 54 15 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10607 7 45 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10607 17 100 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10607 33 14 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10607 40 42 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
10607 72 12 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11028 55 35 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11028 59 24 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11029 56 20 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11029 63 12 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11032 36 35 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11032 38 25 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11032 59 30 0.0 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11033 53 70 0.1 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
11033 69 36 0.1 IrAuIo0yQKyDf8Fud6M13tcAv3Td9ZKBYht0hgVBanE=-~h2qoiMn6j8+7eaR0n5N0yQ==
OrderID CustomerID EmployeeID OrderDate ShipVia Freight ShipCountry
10248 WILMK 5 2020-05-25 3 ¤ 44.84 Belgium
10249 TRADH 6 2020-05-19 2 ¤ 76.10 Germany
10250 HANAR 4 2020-05-21 2 ¤ 2.71 Venezuela
10251 VICTE 3 2020-05-24 2 ¤ 53.05 Norway
10252 SUPRD 4 2020-05-20 2 ¤ 97.09 Spain
10253 HANAR 3 2020-05-25 1 ¤ 88.01 Sweden
10254 CHOPS 5 2020-06-01 1 ¤ 0.75 Finland
10255 RICSU 9 2020-05-24 3 ¤ 65.48 Italy
10256 WELLI 3 2020-05-26 2 ¤ 257.26 Denmark
10257 HILAA 4 2020-05-31 1 ¤ 2.84 Argentina
10258 ERNSH 1 2020-06-01 3 ¤ 23.10 USA
10259 CENTC 4 2020-06-03 3 ¤ 38.11 Finland
10260 OLDWO 4 2020-06-07 1 ¤ 91.51 Ireland
10261 QUEDE 4 2020-06-08 2 ¤ 20.31 Poland
10262 RATTC 8 2020-06-03 3 ¤ 19.76 Argentina
10263 ERNSH 9 2020-06-09 2 ¤ 2.17 UK
10264 FOLKO 6 2020-07-02 3 ¤ 606.19 USA
10265 BLONP 2 2020-06-21 2 ¤ 4.62 Norway
10266 WARTH 3 2020-06-09 3 ¤ 19.26 France
10267 FRANK 4 2020-06-15 3 ¤ 52.92 Canada
10268 GROSR 8 2020-06-11 2 ¤ 37.52 USA
10269 WHITC 5 2020-06-18 3 ¤ 74.60 Austria
10270 WARTH 1 2020-06-11 2 ¤ 33.35 Germany
10271 SPLIR 6 2020-07-09 1 ¤ 29.59 Germany
10272 RATTC 6 2020-06-15 2 ¤ 424.30 Belgium
10273 QUICK 3 2020-06-21 1 ¤ 38.19 Spain
10274 VINET 6 2020-06-25 2 ¤ 217.86 Argentina
10275 MAGAA 1 2020-06-18 1 ¤ 55.23 Brazil
10276 TORTU 8 2020-06-23 3 ¤ 0.53 USA
10277 MORGK 2 2020-06-22 3 ¤ 54.42 Mexico
10278 BERGS 8 2020-06-25 2 ¤ 9.26 France
10279 LEHMS 8 2020-06-25 1 ¤ 36.68 USA
10280 BERGS 2 2020-07-22 1 ¤ 47.84 Switzerland
10281 ROMEY 4 2020-06-30 2 ¤ 580.91 Ireland
10282 ROMEY 4 2020-06-30 2 ¤ 90.97 USA
10283 LILAS 3 2020-07-02 1 ¤ 33.05 Brazil
10284 LEHMS 4 2020-07-06 1 ¤ 10.22 Germany
10285 QUICK 1 2020-07-05 3 ¤ 5.64 Belgium
10286 QUICK 8 2020-07-09 2 ¤ 0.21 Brazil
10287 RICAR 8 2020-07-07 1 ¤ 4.99 Brazil
10288 REGGC 4 2020-07-13 2 ¤ 96.35 Germany
10289 BSBEV 7 2020-07-07 2 ¤ 27.33 UK
10329 SPLIR 4 2020-09-01 1 ¤ 40.42 Germany
10330 LILAS 3 2020-09-06 2 ¤ 25.19 USA
10331 BONAP 9 2020-08-30 2 ¤ 3.04 UK
10607 SAVEA 5 2020-06-02 2 ¤ 36.71 Germany
11028 KOENE 2 2020-02-27 3 ¤ 146.06 Austria
11029 CHOPS 4 2020-03-04 3 ¤ 12.76 Brazil
11032 WHITC 2 2020-02-28 3 ¤ 3.67 Sweden
11033 RICSU 7 2020-02-28 1 ¤ 55.28 France
ProductID ProductName SupplierID CategoryID QuantityPerUnit UnitPrice ProductCost Discontinued
7 Uncle Bob's Organic Dried Pears 3 7 12 – 1 lb pkgs. ¤ 30.00 ¤ 22.50 false
11 Queso Cabrales 5 4 1 kg pkg. ¤ 21.00 ¤ 16.00 false
17 Alice Mutton 7 6 20 – 1 kg tins ¤ 39.00 ¤ 20.70 true
19 Teatime Chocolate Biscuits 8 3 10 boxes x 12 pieces ¤ 9.20 ¤ 4.50 false
26 Gumbär Gummibärchen 11 3 100 – 250 g bags ¤ 31.23 ¤ 22.80 false
30 Nord-Ost Matjeshering 13 8 10 – 200 g glasses ¤ 25.89 ¤ 12.20 false
33 Geitost 15 4 500 g ¤ 2.00 ¤ 2.01 false
36 Inlagd Sill 17 8 24 – 250 g jars ¤ 19.00 ¤ 18.51 false
38 Côte de Blaye 18 1 12 – 75 cl bottles ¤ 263.00 ¤ 263.01 false
40 Boston Crab Meat 19 8 24 – 4 oz tins ¤ 18.40 ¤ 17.91 false
42 Singaporean Hokkien Fried Mee 20 5 32 – 1 kg pkgs. ¤ 14.00 ¤ 13.51 true
53 Perth Pasties 24 6 48 pieces ¤ 32.80 ¤ 32.31 true
54 Tourtière 25 6 16 pies ¤ 7.45 ¤ 6.96 false
55 Pâté chinois 25 6 24 boxes x 2 pies ¤ 24.00 ¤ 23.51 false
56 Gnocchi di nonna Alice 26 5 24 – 250 g pkgs. ¤ 38.00 ¤ 37.51 false
59 Raclette Courdavault 28 4 5 kg pkg. ¤ 55.00 ¤ 54.51 false
63 Vegie-spread 7 2 15 – 625 g jars ¤ 43.90 ¤ 43.41 false
68 Scottish Longbreads 8 3 10 boxes x 8 pieces ¤ 12.50 ¤ 12.01 false
69 Gudbrandsdalsost 15 4 10 kg pkg. ¤ 36.00 ¤ 35.51 false
72 Mozzarella di Giovanni 14 4 24 – 200 g pkgs. ¤ 34.00 ¤ 34.31 false
ShipperID CompanyName Phone mSysRowId
1 Speedy Express (503) 555-9831
2 United Package (503) 555-3199
3 Federal Shipping (503) 555-9931
SupplierID CompanyName ContactName Address City PostalCode Country Phone
3 Grandma Kelly's Homestead Regina Murphy 707 Oxford Rd. Ann Arbor 48104 USA (313) 555-5735
5 Cooperativa de Quesos 'Las Cabras' Antonio del Valle Saavedra Calle del Rosal 4 Oviedo 33007 Spain (98) 598 76 54
7 Pavlova, Ltd. Ian Devling 74 Rose St.Moonie Ponds Melbourne 3058 Australia (03) 444-2343
8 Specialty Biscuits, Ltd. Peter Wilson 29 King's Way Manchester M14 GSD UK (161) 555-4448
11 Heli Süßwaren GmbH & Co. KG Petra Winkler Tiergartenstraße 5 Berlin 10785 Germany (010) 9984510
13 Nord-Ost-Fisch Handelsgesellschaft mbH Sven Petersen Frahmredder 112a Cuxhaven 27478 Germany (04721) 8713
14 Formaggi Fortini s.r.l. Elio Rossi Viale Dante, 75 Ravenna 48100 Italy (0544) 60323
15 Norske Meierier Beate Vileid Hatlevegen 5 Sandvika 1320 Norway (0)2-953010
17 Svensk Sjöföda AB Michael Björn Brovallavägen 231 Stockholm S-123 45 Sweden 08-123 45 67
18 Aux joyeux ecclésiastiques Guylène Nodier 203, Rue des Francs-Bourgeois Paris 75004 France (1) 03.83.00.68
19 New England Seafood Cannery Robb Merchant Order Processing Dept.2100 Paul Revere Blvd. Boston 02134 USA (617) 555-3267
20 Leka Trading Chandra Leka 471 Serangoon Loop, Suite #402 Singapore 0512 Singapore 555-8787
24 G'day, Mate Wendy Mackenzie 170 Prince Edward ParadeHunter's Hill Sydney 2042 Australia (02) 555-5914
25 Ma Maison Jean-Guy Lauzon 2960 Rue St. Laurent Montréal H1J 1C3 Canada (514) 555-9022
26 Pasta Buttini s.r.l. Giovanni Giudici Via dei Gelsomini, 153 Salerno 84100 Italy (089) 6547665
28 Gai pâturage Eliane Noz Bat. B3, rue des Alpes Annecy 74000 France 38.76.98.06
SELECT DISTINCTROW *FROM Customers;
SELECT DISTINCTROW *FROM Orders;
SELECT DISTINCTROW *FROM Suppliers;
SELECT DISTINCTROW *FROM Employees;
SELECT DISTINCTROW *FROM Orders;
SELECT DISTINCTROW *FROM Products;
SELECT [Order Details].Quantity, [Order Details].Discount, Products.UnitPrice, Products.ProductCost, Categories.CategoryName, Orders.OrderDate, Orders.ShipCountry, [UnitPrice]*(1-[Discount])*[Quantity]-[ProductCost]*[Quantity] AS ProfitFROM (Employees INNER JOIN Orders ON Employees.EmployeeID = Orders.EmployeeID) INNER JOIN (Categories INNER JOIN (Products INNER JOIN [Order Details] ON Products.ProductID = [Order Details].ProductID) ON Categories.CategoryID = Products.CategoryID) ON Orders.OrderID = [Order Details].OrderID;