||Descrição|| O ponto de entrada CN120PSQ permite alterar a ordenação da tela de consulta específica do código do contrato na rotina de Manutenção de Medições.  
||Observações|| 
||Exemplos||#Include 'Protheus.ch'
User Function cn120psq()
Local aCamposPsq := ParamIxb[1]
Local nOrdenacao := 0
Local oDlg			:= NIL
Local oCombo		:= NIL
Local oButton		:= NIL
Local cCombo		:= ""
DEFINE MSDIALOG oDlg FROM 0,0 TO 200,250 PIXEL TITLE 'Ordem das colunas para Pesquisa'
oCombo:= tComboBox():New(10,30,{|u|if(PCount()>0,cCombo:=u,cCombo)},aCamposPsq,70,20,oDlg,,,,,,.T.,,,,,,,,,'cCombo')
// Botão para confirmar a janela
oButton := tButton():New(50,30,'Confirmar',oDlg,{||oDlg:End()},70,20,,,,.T.)
ACTIVATE MSDIALOG oDlg CENTERED
nOrdenacao := Ascan(aCamposPsq,Alltrim(cCombo))
Return nOrdenacao

||Idioma|| Português(Brasil)
||Versões|| Microsiga_Protheus10_e_Microsiga_Protheus11
||Sistemas Operacionais Suportados||Todos
||Compatível com as Bases de Dados||Todas

||Parâmetros|| aCamposPsq => Campos da Tela de Pesquisa
||Retorno|| nOrdenacao => Número da coluna do qual será efetuado a ordenação da tela de Pesquisa
||Eventos de chamada do Ponto de Entrada|| Ao acionar a consulta padrão do campo de código de contrato da tela de inclusão de medições.
 
||Programa Fonte|| CNTA120.PRW