CREATE tt-customer.
tt-customer.name = "This is the name".
RUN test(TEMP-TABLE tt-customer:DEFAULT-BUFFER-HANDLE). /*this is your current tt-customer record*/
PROCEDURE test:
DEFINE INPUT PARAMETER hCustomer AS HANDLE NO-UNDO.
strName = hCustomer::name. /*strName will be 'This is the name'*/