PROTHEUS-[General][DB] - AdjustColName

[ADVPL][PROTHEUS][General] - AdjustColName

DESCRIÇÃO

Ajusta automaticamente os aliases de colunas utilizados na TCGenQry e que não suportados pela linguagem AdvPL.

USO

[General]

AdjustColName=1

; Todos os ambientes / conexões serão habilitados.

                                                    

#INCLUDE "TOTVS.CH"                                                    
User Function TCLink()                                                    



    DBCreate(cT1, {{"FLD_NAME", "C", 2, 0}, ;
    {"FLD_NUMB", "N", 10, 0}, ;
    {"FLD_TEXT", "C", 3, 0}} , "TOPCONN")
 
 
    // com AdjustColName habilitado
    cQuery:= 'SELECT FLD_NAME AS "FLD NAME" FROM T1'
    DBUseArea( .T., "TOPCONN", TCGenQry(,,cQuery), cT1, .F., .F. )
   
    // Não é possivel acessar a coluna "FLD NAME" devido o uso de espaço no alias da coluna
    conout((cT1)->CFIELD1)
 
    DBCloseArea()
     
    TCUnlink()
                               


Return( Nil )                                                    

OBS

• O Ajuste de colunas é necessário para o uso da coluna no AdvPL quando ela contém algum carácter especial ou espaço, após o ajuste da coluna ela recebe o nome "CFIELD+iNDICE