/* FindCustomerByNum.p */
DEFINE INPUT PARAMETER CustomerNumber AS INTEGER. DEFINE OUTPUT PARAMETER CustomerName AS CHARACTER. |
Public Sub FindCustomerByNum(
ByVal CustomerNumber As Integer, ByRef CustomerName As String) |