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...

Question

using r language

Answer 1

Expert Solution & Answer

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”...

Expert Solution & Answer

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

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

Answer 2

Expert Solution & Answer

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”...

Expert Solution & Answer

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

Answer 3

Expert Solution & Answer

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”...

Expert Solution & Answer

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

Answer 4

Expert Solution & Answer

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”...

Expert Solution & Answer

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

Answer 5

Expert Solution & Answer

Answer 6

Expert Solution & Answer

Answer 7

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”...

Answer 8

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...

Answer 9

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...

Answer 10

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...

Answer 11

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...

Answer 12

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”...

Answer 13

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”...

Answer 14

Expert Solution & Answer

Answer 15

Expert Solution & Answer

Answer 16

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

Answer 17

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

Answer 18

Trending nowThis is a popular solution!

See solution

Check out sample textbook solution

Answer 19

Trending nowThis is a popular solution!

Answer 20

Trending nowThis is a popular solution!

Answer 21

Trending nowThis is a popular solution!

Answer 22

Trending now

Answer 23

This is a popular solution!

Answer 24

See solution

Check out sample textbook solution

Answer 25

Ch. 8 - Prob. 1RQ Ch. 8 - Prob. 2RQ Ch. 8 - Prob. 3RQ Ch. 8 - Prob. 4RQ Ch. 8 - Prob. 5RQ Ch. 8 - Prob. 6RQ Ch. 8 - Prob. 7RQ Ch. 8 - Prob. 8RQ Ch. 8 - Prob. 9RQ Ch. 8 - In PL/SQL, how do you assign variables the same...

Solution Summary: The author explains how to run a query to view the contents in the table before updating the value.

Explanation of Solution

Explanation of Solution

Explanation of Solution

Chapter 8 Solutions