payment.asp

Article
11/12/2009

This file contains routines used on payment-related pages (crdtcard.asp, dispatch.asp, po.asp, and summary.asp).

To allow guest users to use purchase orders on the site, you must customize the payment.asp page. Use the following procedure to configure this page to allow purchase orders for guest users. If the following procedure is not completed for the site, the error Unspecified or unknown user payment option(s) may occur on the summary.asp page. After completing the following procedure, guest users that choose purchase order as their payment option will be rerouted to the login.asp page after the summary.asp. The user will have to log in on the login.asp page, and then the user will be able to complete the purchase.

To allow guest users to use purchase orders

Set the Payment Option to support account billing in the App Default Config resource.

For more information about setting the Payment Option, see Configuring the App Default Config Resource.
Click Start, point to Programs, point to Accessories, and click Notepad.
On the File menu, click Open.
In the Open dialog box, navigate to the payment.asp file and then click Open. For example, <drive>:\Inetpub\wwwroot\Retail\include\payment.asp.

Comment out the following code in the payment.asp file:

Function GetPaymentMethodsForUser()
    Dim listMethods, sPaymentMethod
    Set listMethods = GetSimpleList()
        If m_UserType = GUEST_USER Then
        If IsEntityInList(CREDIT_CARD_PAYMENT_METHOD, Application("MSCSSitePaymentMethods")) Then
            Call listMethods.Add(CREDIT_CARD_PAYMENT_METHOD)
        End If
    ElseIf m_UserType = AUTH_USER Then
        For Each sPaymentMethod In Application("MSCSSitePaymentMethods")
        Call listMethods.Add(sPaymentMethod)
    Next
    End If   
        Set GetPaymentMethodsForUser = listMethods 
End Function

Add the following code after the code you commented out in step 5:

Function GetPaymentMethodsForUser()
    Dim listMethods, sPaymentMethod
    Set listMethods = GetSimpleList()
        For Each sPaymentMethod In Application("MSCSSitePaymentMethods")
            Call listMethods.Add(sPaymentMethod)
        Next
    Set GetPaymentMethodsForUser = listMethods 
End Function