Histórico da Página

Tomar cuidado para que el código tenga una buena estética facilita la lectura e interpretación. De esta manera, se ahorra el tiempo utilizado en el mantenimiento del código.
Para ello, hay tres consejos básicos:

• Mantener un layout consistente, con estándares que el lector consiga entender fácilmente.
• Dejar los código similares con apariencia similar.
• Agrupar líneas relacionadas en bloques de código.

Para simplificar la lectura alinee las columnas de llamadas a las funciones o de arrays, siempre que esto facilite la futura lectura del código.

Ejemplo

Cuidar para deixar o código com uma boa estética facilita a leitura e interpretação do mesmo. Dessa forma economiza o tempo gasto em manuteção do código.

Para isso há três dicas básicas:

• Manter um leiaute consistente, com padrões que o leitor consiga entender facilmente;
• deixar código similares com aparência similar;
• agrupar linhas relacionadas em blocos de código.

Para simplificar a leitura alinhe as colunas de chamadas à funções ou de arrays sempre que isso facilitar a futura leitura do código.

Exemplo:
AAdd(aPosicoes,{"ACE_GRADE"        ,GdFieldPos("ACE_GRADE" )})
AAdd(aPosicoes,{"ACE_TEMA"   ,GdFieldPos("ACE_TEMA"  )})
AAdd(aPosicoes,{"ACE_HRINI"        ,GdFieldPos("ACE_HRINI" )})
AAdd(aPosicoes,{"ACE_HRFIM"        ,GdFieldPos("ACE_HRFIM" )})
AAdd(aPosicoes,{"ACE_DATA"   ,GdFieldPos("ACE_DATA"  )})
AAdd(aPosicoes,{"ACE_SALA"   ,GdFieldPos("ACE_SALA"  )})
AAdd(aPosicoes,{"ACE_PALEST" ,GdFieldPos("ACE_PALEST")})
AAdd(aPosicoes,{"ACE_EMP"    ,GdFieldPos("ACE_EMP "  )})
AAdd(aPosicoes,{"ACE_OCUPAC"       ,GdFieldPos("ACE_OCUPAC")})

Organize o fluxo do código (e das declarações de variáveis) em blocos de acordo com o Organice el flujo del código (y de las declaraciones de variables) en bloques, de acuerdo con el contexto.

ExemploEjemplo:

Local aArea       aArea := GetArea()                        // Posicionamento atualMarcación actual
Local aAreaSU0    := SU0->(GetArea())                // Posicionamento da tabela Marcación de la tabla SU0
Local aAreaTMP    := {}                              // Posicionamento da tabela Marcación de la tabla SU0
Local aGrupos     aGrupos := {}                              // Grupos selecionadosseleccionados
Local aFiliais    := {}                              // Filiais com Sucursales con grupos compartilhadoscompartidos

Local cPesq       cPesq:= Space(TamSX3("U0_NOME")[1])      // Pesquisa do Búsqueda del grupo de atendimentoatención
Local cFilter     cFilter:= SU0->(DbFilter())                // Filtro da de la SU0
Local cFilSU0     cFilSU0:= XFilial("SU0")                   // Filial da tabela Sucursal de la tabla SU0
Local cGrpAtu     cGrpAtu:= ""                              // Codigo do Código del grupo atualactual

Local lGrava      lGrava:= .F.                              // Indica se prossegue com a gravacaosi se continúa con la grabación
Local lGrpComp    lGrpComp:= SU0->(FieldPos("U0_FILORI")) > 0 // Compartilhamento Uso compartido de grupos
Local lSU0Exc     lSU0Exc:= SX2MODO("SU0") == "E"           // Indica se o si el SU0 esta es exclusivo

Local oLBox       oLBox := Nil                             Nil // Objeto da de la listbox
Local oPesq       oPesq := Nil                             Nil // Objeto da caixa de pesquisade la caja de búsqueda
Local oOk         oOk := LoadBitmap( GetResources(), "LBOK")    // Desenho do Diseño del Checked
Local oNo         oNo := LoadBitmap( GetResources(), "LBNO")    // Desenho do Diseño del NotChecked
Local oDlg                                           oDlg // Objeto da tela

Local nX          := 0                               de la pantalla
Local nX := 0 // Auxiliar de loopbucle
Local nFil        nFil := 0                               0 // Auxiliar de loopbucle

Private cChave    := ""                              // Chave unica Clave única