Often I code with logic like the following:

If PemStatus(This.cbo_TypeDesc,'cSourceAlias',5) = .F.
   This.cbo_TypeDesc.mInitSQL
Endif
If PemStatus(This.cbo_MFSystem,'.cSourceAlias',5) = .F.
   This.cbo_MFSystem.mInitSQL
Endif
If PemStatus(This.cbo_Code,'cSourceAlias',5) = .F.
   This.cbo_Code.mInitSQL
Endif
If PemStatus(This.cbo_FullDesc,'cSourceAlias',5) = .F.
   This.cbo_FullDesc.mInitSQL
Endif

It seems redundant. Is there a better way? Thanks!

Regards, Renoir