sexta-feira, 23 de junho de 2017

Dicas para alterar tamanho de casas décimais no Protheus

Quem nunca passou por esse aperto, ao precisar alterar o tamanho de casas decimais nas tabelas da Totvs, sempre se fica a impressão e isso é certo que mais dias menos dias vai surgir uma inconsitência em alguma tabela que foi esquecida, dempois de muitas pesquisas encontrei essas duas postagens da Totvs que me ajudou muito

FAT0068_Aumento_de_Casas_Decimais_no_ambiente_Faturamento_SIGAFAT

Facilitador criado pela Totvs

Download da ferramenta


Espero te auxliado em um sofrimento a menos.

quarta-feira, 7 de junho de 2017

Alinhamento em janelas com a propriedade do ALIGN

Quem nunca sofreu com alinhamentos em janelas do Protheus, porém um simples comando vai fazer você mudar o seu conceito em relação a esse assunto,  esse é a propriedade ALIGNque vai nos esquecer as complexos malabarismos de coordenadas do MsAdvSize ou FWGetDialogSize.
Então vamos lá com as opções:

Alinhar preenchendo em todo o conteúdo da Janela ou Painel onde estiver
CONTROL_ALIGN_ALLCLIENT
Alinhar ao Topo
CONTROL_ALIGN_TOP 
Alinhar ao Rodapé
CONTROL_ALIGN_BOTTOM
Alinhar à Esquerda
CONTROL_ALIGN_LEFT
Alinha à Direita
CONTROL_ALIGN_RIGHT
Não utiliza alinhamento
CONTROL_ALIGN_NONE 

Vale ressaltar que o exemplo foi reduzido apenas, para que fosse demostrado o uso dos ALIGN, e o uso deverá ser adaptado de acordo coma sua necessidade.














Um detalhe importante que nesse exemplo até utilizei coordenadas, porém se tivesse deixado o MSNewGetDados  com os campos zerados o resultado seria o mesmo.

oMSNewGet := MsNewGetDados():New( 0,0,0,0, nOpc,
 "U_VLDLINHA()" , "AllwaysTrue", "",;

aAltFields,, nCont , "AllwaysTrue", "", "AllwaysTrue", oWin02, aHeaderEx, aColsEx)
oMSNewGet:oBrowse:Align := CONTROL_ALIGN_ALLCLIENT

Boa sorte na nova forma de alinhamentos sem uso de coordenadas.