Função: FWVetByDic

Função ordenar um vetor conforme o dicionário para uso em, por exemplo, rotinas de MSExecAuto.

FWVetByDic ( < aVetor >, < cTable >, [ lItens ], [ nCpoPos ] ) --> aReturn

NomeTipoDescriçãoObrigatórioReferência
aVetor Array of CharacterVetor a ser ordenado X
cTable CaracterReferência da tabela do Dicionário X
lItens Lógico.T. é um vetor de itens / .F. não é um vetor de itens
nCpoPos NuméricoPosição da coluna onde está o nome do campo. Default 1
    aReturn(Array of Character)
  • Vetor ordenado pelo dicionario
aVetor := {}aAdd( aVetor, { 'A1_EST' , 'SP'                   , NIL } )aAdd( aVetor, { 'A1_NOME', 'CLIENTE XPTO LTDA', NIL } )aAdd( aVetor, { 'A1_COD' , '000001'               , NIL } )aVetor := FWVetByDic( aVetor, 'SA1' )/*// Retorna{ 'A1_COD' , '000001'               , NIL }{ 'A1_NOME', 'CLIENTE XPTO LTDA', NIL }{ 'A1_EST' , 'SP'                   , NIL }*/

  • Sem rótulos