IF Len( SoNumeros( :String( "CDCNPJ" ) ) ) != 14 .AND. Len( SoNumeros( :String( "CDCNPJ" ) ) ) != 11
Não sei se dá pra considerar antigo:
IF ! StrZero( Len( SoNumeros( :String( "CDCNPJ" ) ) ), 2 ) $ "11,14"
ou
IF hb_ASCan( { 11, 14 }, Len( SoNumeros( :String( "CDCNPJ" ) ) ) ) == 0
Tem a ver com o que mencionei em outro post:
Conforme a gente vai se sentindo confortável, vai usando novas opções.
No tempo em que ainda usava clipper, acharia isso uma coisa complicada pra entender.