6 27 3 Psuedocode Example

LANSA Open Guide

6.27.3 Psuedocode Example

strDataType = ""

iLength = 0

iDecimal = 0

 

IF NOT LceGetFieldType(iSession, "SURNAME", strDataType, iLength, iDecimal)

         /* return error */

ENDIF