U@GETUSRDBUDKY

U@GETUSRDBUDKY retrieves the user identification name and converts it to or from a 30-character display.

Module DATABASE

Input

Field Type and length Definition
E@USRDISPLAYNM A 30 Retrieves the long user name.

Output

Field Type and length Definition
E@USRDBUIDKEY A 10 Converts to 10 characters.

Programming Example

   EVAL      DAPJUSRCLS     = F2@APCL 
   EVAL      E@USRDISPLAYNM = F2@APUSID(I1) 
   CALLP     U@GETUSRDBUDKY                Get User Dbuidkey
   EVAL      DAPJUSERID     = E@USRDBUIDKEY 
   EVAL      DAPJINQACC     = F2@APJINQ(I1)
   EVAL      DAPJUPDACC     = F2@APUPAC(I1)