<< Click to Display Table of Contents >> Navigation: Apollo API Listing > sx_GetByte |
Declare Function sx_GetByte Lib "Apollo9.dll"
(ByVal cpFieldName As String)
As String
LONG FAR PASCAL sx_GetByte
(BYTEP cpFieldName);
Extracts the first character of a field.
cpFieldName: The name of the field.
The character is returned as a string.
' Set serial format depending on product type
If sx_GetByte("prod.product") = 'H' Then
SerialPrefix$ = "HIPER"
End If
lstrcpy((LPSTR) caType, (LPSTR) sx_GetByte("prod.product"))
if (caType[0] == 'H')
lstrcpy((LPSTR) caPrefix, "HIPER");