A GUIDE TO SQL
A GUIDE TO SQL
9th Edition
ISBN: 9781305897397
Author: Pratt
Publisher: CENGAGE L
Expert Solution & Answer
Book Icon
Chapter 8, Problem 7TD

Explanation of Solution

a.

Deleting query in the table “ORDERS”:

Public Function Order_Delete(I_ORDER_NUM)

    Dim strSQL As String

    strSQL = "DELETE FROM ORDERS WHERE ORDER_NUM = '"

    strSQL = strSQL & I_ORDER_NUM

    strSQL = strSQL & "'"

    DoCmd.RunSQL strSQL

End Function

 Explanation:

  • Create a function named as “Order_Delete” and pass an argument “I_ORDER_NUM”.
  • Set the strSQL string variable to “DELETE FROM ORDERS WHERE ORDER_NUM = '” and makes everything necessary in the command up to and including the single quotation mark preceding the order number.
  • The next command will concatenated previous value with the value in “I_ORDER_NUM”.
  • The final command is used to set strSQL to the output of the value already created, concatenated with a single quotation mark...

Explanation of Solution

b.

Updating query:

Public Function Order_Update(I_ORDER_NUM, I_ORDER_DATE)

    Dim strSQL As String

    strSQL = "UPDATE ORDERS SET ORDER_DATE = '"

    strSQL = strSQL & I_ORDER_DATE

    strSQL = strSQL & "' WHERE ORDER_NUM = '"

    strSQL = strSQL & I_ORDER_NUM

    strSQL = strSQL & "'"

    DoCmd.RunSQL strSQL

End Function

 Explanation:

  • Create a function named as “Order_Update” and pass the arguments “I_ORDER_NUM” and “I_ORDER_DATE”.
  • Set the strSQL string variable to “UPDATE ORDERS SET ORDER_DATE = '” and makes everything necessary in the command up to and including the single quotation mark preceding the order number.
  • Here, the user pass two arguments, so there are two portions of the construction of the SQL command that involve variables...

Explanation of Solution

c.

Retrieving the list in the table “ITEM”:

Public Function Find_Items(I_CATEGORY)

    Dim rs As New ADODB.Recordset

    Dim cnn As ADODB.Connection

    Dim strSQL As String

    Set cnn = CurrentProject.Connection

    strSQL = "SELECT ITEM_NUM, DESCRIPTION, STOREHOUSE, PRICE FROM ITEM WHERE CATEGORY= '"

    strSQL = strSQL & I_CATEGORY

    strSQL = strSQL & "'"

    rs.Open strSQL, cnn, adOpenStatic, , adCmdText

    Do Until rs.EOF

        Debug.Print (rs!ITEM_NUM)

        Debug.Print (rs!Description)

        Debug.Print (rs!STOREHOUSE)

        Debug.Print (rs!PRICE)

        rs.MoveNext

    Loop

End Function

 Explanation:

  • Create a function named as “Find_Items” and pass an argument “I_CATEGORY”.
  • The “rs” and “cnn” is used to processing the “Recordset” and “ADODB.Connection”...

Blurred answer
Students have asked these similar questions
using r language
8. Cash RegisterThis exercise assumes you have created the RetailItem class for Programming Exercise 5. Create a CashRegister class that can be used with the RetailItem class. The CashRegister class should be able to internally keep a list of RetailItem objects. The class should have the following methods: A method named purchase_item that accepts a RetailItem object as an argument. Each time the purchase_item method is called, the RetailItem object that is passed as an argument should be added to the list. A method named get_total that returns the total price of all the RetailItem objects stored in the CashRegister object’s internal list. A method named show_items that displays data about the RetailItem objects stored in the CashRegister object’s internal list. A method named clear that should clear the CashRegister object’s internal list. Demonstrate the CashRegister class in a program that allows the user to select several items for purchase. When the user is ready to check out, the…
5. RetailItem ClassWrite a class named RetailItem that holds data about an item in a retail store. The class should store the following data in attributes: item description, units in inventory, and price. Once you have written the class, write a program that creates three RetailItem objects and stores the following data in them: Description    Units in Inventory    PriceItem #1    Jacket    12    59.95Item #2    Designer Jeans    40    34.95Item #3    Shirt    20    24.95
Knowledge Booster
Background pattern image
Similar questions
SEE MORE QUESTIONS
Recommended textbooks for you
Text book image
A Guide to SQL
Computer Science
ISBN:9781111527273
Author:Philip J. Pratt
Publisher:Course Technology Ptr
Text book image
Np Ms Office 365/Excel 2016 I Ntermed
Computer Science
ISBN:9781337508841
Author:Carey
Publisher:Cengage
Text book image
Oracle 12c: SQL
Computer Science
ISBN:9781305251038
Author:Joan Casteel
Publisher:Cengage Learning
Text book image
Programming with Microsoft Visual Basic 2017
Computer Science
ISBN:9781337102124
Author:Diane Zak
Publisher:Cengage Learning
Text book image
CMPTR
Computer Science
ISBN:9781337681872
Author:PINARD
Publisher:Cengage
Text book image
Database Systems: Design, Implementation, & Manag...
Computer Science
ISBN:9781305627482
Author:Carlos Coronel, Steven Morris
Publisher:Cengage Learning