Saturday 19 February 2022

Peoplecode to get Long description of Translate Field

 Local Rowset &RsStatus;

&RsStatus = CreateRowset(Record.PSXLATITEM);

&RsStatus.Flush();

&RsStatus.Fill("WHERE FIELDNAME = 'L_COORDINTR_STATUS' AND FIELDVALUE = :1 AND %EFFDTCHECK(PSXLATITEM, FILL, %CURRENTDATEIN) AND EFF_STATUS = 'A'", L_MINOR_APP_FRM.L_COORDINTR_STATUS.Value);



For &l = 1 To &RsStatus.ActiveRowCount

   

   &ValueDescr = &RsStatus(&l).PSXLATITEM.XLATLONGNAME.Value;

   

   

End-For;