BlackTDN

Caminhos para uma educação corporativa de qualidade : " Prezados leitores, mais uma vez vou mirar as minhas baterias no universo corporativo, mas agora tratando de sua base educacional. (Estou louco para escrever sobre política e economia, mas por enquanto aguardarei pelos novos contornos do atual compasso de espera). Adoto a expressão “Educação Corporativa” na tentativa (simplista, confesso) de resumir, em duas palavras, o vasto cenário onde coexistem os diversos cursos de administração e gestão de negócios com a indústria do “management” , repleta de palestras, eventos e seminários que, no fim das contas, compartilham o mesmo objetivo central de formar executivos, gestores e dirigentes. Digo dirigentes porque raramente uso a expressão “líderes”, por considerá-la um exagero cômico quando não se limita à habilidade de liderança, essa sim, necessária aos postos de comando, chefia e direção – afinal de contas deixemos as ilusões de lado: não é toda geração que produz um Churchill

Notepad++ ( http://notepad-plus-plus.org/ ) WinMerge (http://winmerge.org/) Sysinternals Suite (http://technet.microsoft.com/pt-br/sysinternals/bb842062) PowerGui/PowerGui Script Editor (http://powergui.org/index.jspa) TortoiseSVN (http://tortoisesvn.net/) 7Zip (http://www.7-zip.org/) FileZilla (http://filezilla-project.org/) CCleaner (http://www.piriform.com/ccleaner) avast (http://www.avast.com/pt-br/index) Comodo Disk Encryption ( http://www.comodo.com/home/internet-security/disk-encryption.php ) doPDF ( http://www.dopdf.com/ ) Foxit Reader ( http://www.foxitsoftware.com/products/reader/ ) GhostScript ( http://www.ghostscript.com/ ) Google Crhome ( http://www.google.com/chrome/ ) Firefox ( http://www.mozilla.org/ ) IE ( http://windows.microsoft.com/pt-BR/internet-explorer/downloads/ie ) Google Talk ( http://www.google.com/talk/intl/pt-BR/ ) Live Messenger ( http://www.windowslive.com.br/public/product.aspx/view/2 ) ImageMagick ( http:

"E assim, depois de muito esperar, num dia como outro qualquer, decidi triunfar... Decidi não esperar as oportunidades e sim, eu mesmo buscá-las. Decidi ver cada problema como uma oportunidade de encontrar uma solução. Decidi ver cada deserto como uma possibilidade de encontrar um oásis. Decidi ver cada noite como um mistério a resolver. Decidi ver cada dia como uma nova oportunidade de ser feliz. Naquele dia descobri que meu único rival não era mais que minhas próprias limitações e que enfrentá-las era a única e melhor forma de as superar. Naquele dia, descobri que eu não era o melhor e que talvez eu nunca tivesse sido. Deixei de me importar com quem ganha ou perde. Agora me importa simplesmente saber melhor o que fazer. Aprendi que o difícil não é chegar lá em cima, e sim deixar de subir. Aprendi que o melhor triunfo é poder chamar alguém de"amigo". Descobri que o amor é mais que um simples estado de enamoramento, "o amor é uma filosofia de vida".  Naquele d

"Aqui no entanto nós não olhamos para trás por muito tempo. Nós continuamos seguindo em frente. Abrindo novas portas e fazendo coisas novas. Porque somos curiosos... e a curiosidade continua nos conduzindo por novos caminhos. Siga em frente." Walt Disney []s иαldσ dj

A função: INIGetPValue( cFile , cSession , cPropertyName , cDefaultValue , cIgnoreToken )  dada a sua característica, se tornou uma séria candidata a uma nova Classe em ADVPL. É um bom exemplo para aqueles que querem transformar uma função de "Próposito Geral" em uma Classe de "Propósito Geral" e, para os que estão iniciando na programação em ADVPL um bom exerício no que diz respeito a implementação de uma Classe. O Código da Classe: #INCLUDE "PROTHEUS.CH" #DEFINE SESSION_POSITION 1 #DEFINE PROPERTY_POSITION 2 #DEFINE PROPERTY_NAME 1 #DEFINE PROPERTY_VALUE 2 #DEFINE PROPERTY_ELEMENTS 2 /*/ CLASS: TFINI Autor: Marinaldo de Jesus Data: 27/05/2011 Descricao: Manipulacao de Arquivos .INI Sintaxe: TFINI():New( cINIFile , cIgnoreToken) -> Objeto do Tipo TFINI /*/ CLASS TFINI FROM LongClassName DATA aTFINI DATA cINIFile DATA cClassName METHOD NEW( cINIFile , cIgnoreToken ) CONSTRUCTOR METHOD ClassName() METHOD GetPropertyValue( c

O que vocês fazem? : " Não sei de vocês, mas não é difícil dizer assim na lata o quanto cobram sem uma análise de requisitos? - E aí, o que vocês fazem? - Somos programadores… - O que é isso? - Nós fazemos programas… - Que coincidência, a gente também… Quanto vocês cobram? " []s иαldσ dj

ADVPL possui algumas funções padrões para leitura e/ou manipulação de arquivos de configuração  (*.INI)  [ tdn : Manipulação do arquivo de configuração (*.INI)  ]. O grande problema dessas funções é: ou manipulam arquivos no Client do Usuário ou arquivos de configuração do Próprio Protheus. Caso necessitemos trabalhar com arquivos (*.INI) customizados teremos que escrever nosso próprio código para esse fim. Para fins didáticos, implementei a função:  INIGetPValue( cFile , cSession , cPropertyName , cDefaultValue , cIgnoreToken ) Para auxiliar no entendimento e aprendizado de Leitura de Arquivos .INI. Utilizei nela a classe FT [ Protheus :: Alternativa às Funções do Tipo FT_F*  ] O Código: #DEFINE SESSION_POSITION 1 #DEFINE PROPERTY_POSITION 2 #DEFINE PROPERTY_NAME 1 #DEFINE PROPERTY_VALUE 2 #DEFINE PROPERTY_ELEMENTS 2 /*/ Funcao: INIGetPValue Autor: Marinaldo de Jesus Data: 26/05/2011 Uso: Retornar o Valor Atribuido a uma Propriedade de Acordo com a

ADVPL com MVC "é o que há". Por muito tempo a totvs não implementava melhoria significativa em sua linguagem ADVPL (à despeito das melhorias implementadas por outros fornecedores de linguagens no padrão CodBase Harbour , xHarbour dentre outras) mas MVC foi a campeã. Muito fácil programar agora: vou ensinar ao meu filho e curtir um bom e merecido descanso em Dubai ou começar a programar em Assembly  me distraindo com o MenuetOS  porque em ADVPL com MVC está muito, mas muito fácil. Não deixem de baixar o " Tutorial " e mais ainda, não deixem de utilizar. []s иαldσ dj

{ //"...somente um bom entendimento das idéias por trás dos recursos da linguagem leva ao domínio..."    Bjarne Stroustrup : O Criador de C++   A linguagem de Programação : C++ 3a Edição   Bookman - Pág.: 6 : pt-BR } Procure compreender o Criador e não a Criatura. Eu faria o que faço em Algol, B, C, C++ ... Lua, Phyton, Java, PHP, C#, Shell Script, PowerShell, bat... mas, ultimamente, implemento em ADVPL. Despido de Preconceitos. Abstraindo. Entendendo. Compreendendo. Buscando a Solução. Limite, só se tender a zero. Este, para o criador, não existe (por mais que tentem impor). Estudo, Critatividade, Curiosidade, Abstração, Tentativa e Erro e por fim Domínio. Esses são os meus segredos. Por mais que : Apenas Devaneio. Este sou eu : Simples Assim. []s иαldσ dj

"A arquitetura Model-View-Controller ou MVC, como é mais conhecida, é um padrão de arquitetura de software que visa separar a lógica de negócio da lógica de apresentação, permitindo desenvolvimento, teste e manutenção isolados. Aqueles que já desenvolveram uma aplicação em AdvPL vão perceber, que justamente a diferença mais importante entre a forma de construir uma aplicação em MVC e a forma tradicional é essa separação, que permitirá usar a regra de negócio em aplicações que tenham ou não interfaces, como WebServices e aplicação automática e seu reuso em outras aplicações." ( fonte tdn: AdvPl utilizando MVC ) Já não era sem tempo. O Protheus tinha que ter "nascido" MVC. A primeira vez que tive contato com MVC foi na AGIT INFORMÁTICA  no curso de C++. Já trabalhava na Microsiga, e não entendia o porque do Protheus não usar esse padrão. Quando do advendo da "ExecAuto", fiquei pasmo com a MAIOR de todas as Gambiarras que já tiva visto no Protheus. MVC

Protheus :: Convertendo arquivos PDF em JPEG usando WaitRunSrv  gerou frutos. Rafael usou o exemplo adaptando à sua realidade e necessidade e compartilhou conosco o código. Interessado em saber como Rafael fez isso? clique aqui . Obrigado Rafa.  []s иαldσ dj

Algo que a totvs implementou à partir da "build 7.00.080307A" do Protheus, é que é muito útil, foi a Entrada de Dados ao Estilo Calculadora ao qual denominou: " Como fazer um objeto TGet aceitar edição de numéricos da direita para à esquerda ". De fato, muito interessante e funcional. []s иαldσ dj

oWnd := GetWndDefault() ...coming soon []s иαldσ dj

Cmdlets: Amplie o Windows PowerShell com comandos personalizados []s иαldσ dj

Desenvolvedor ADVPL Sênior BERRINI - SP Experiência de 05 anos com desenvolvimento WebService em Protheus. Geração e leitura de arquivos em xml comunicando via WebService. Experiência nas áreas de Faturamento, Estoque, PCP, Compras. SQL Conhecimento nas rotinas dos módulos de Faturamento, Estoque, PCP, Compras. Este profissional será responsável por desenvolver uma integração conforme necessidade acima entre sistema Protheus e outros implantados nos clientes. Projeto por tempo indeterminado. Horário: De segunda a sexta, horário comercial. Regime de contratação: Prestador de serviços (PJ) Interessados poderão enviar currículo para rh@hfbr.com.br. Att. Núbia Santos Assistente de recrutamento e seleção HF Consultoria em Negócios +55 11 5524-5124 +55 11 9459-6607 www.hfbr.com.br www.helpfacil.com.br – O portal do conhecimento. []s иαldσ dj

Gilberto Rafael de Souza: Analista da franquia da TOTVS de SC escreveu: "Já abri chamado com o suporte, fiz alguns pesquisas, e por fim postei uma necessidade no forum do Help Fácil... olha se já tratasse algo assim: Temos uma customização que efetua a impressão gráfica usando o componente TMSPrinter. Precisamos imprimir no verso dessa impressão uma imagem que esta gravada no servidor em formato PDF. Existe alguma forma de "ler" este arquivo e imprimir no Protheus? Já pensei em converter dinamicamente o arquivo PDF para JPG, mas não encontrei nenhum programa que faça isso em batch (via linha de comando e em tempo de execução do relatório)." A solução: Giba (se é que posso te chamar assim hehe). Para a solução do seu problema vamos usar a WaitRunSrv() em Conjunto com duas aplicações externas:   ImageMagick  e   GhostScript Baixe e instale, de acordo com o sistema operacional do seu SO a versão do ImageMagick e do GhostScript. Este é último é neces

Rodrigo entrou em uma roubada. Perguntou-me: "..иαldσ estou com problemas para gerar um client de um WebService no Protheus, não sei se é minha instalação. Será que você poderia me ajudar?" (foi + ou - assim ... rs) manda-o-link-aew (respondi eu). e; taí: http://201.48.221.162:2000/ServiceFuturePMS/service?WSDL Testei.... hummmmm.... Olha a mensagem emitida pelo IDE: Estabelecendo conexão com o server... Por favor aguarde. Obtendo descrição do WebService... Erro na obtenção da descrição do WebService: Invalid function return for WSDLSource Call. Finalizando conexão com o server... Ok Bem... não me ajudou muito.... Opa.... "Invalid function return for WSDLSource Call".... hummmmmm.... WSDLSource... acho que é esse carinha aqui quem tenta gerar o client.... Vamos executá-lo diretamente.... Sintaxe: WSDLSource( cUrl ) : [lSucess][cSource/cError]. WSDLSource( "http://201.48.221.162:2000/ServiceFuturePMS/service?WSDL" ) NIL Retorno NIL, estava eperand

Aproveitando a deixa do exemplo de classe criado para resolver uma limitação nas funções do tipo FT_F*, vamos criar uma nova classe derivada fTdb que herda as características da classe fT. A nova classe, fTdb, fará exatamente a mesmo coisa que a classe anterior, com a diferença que a classe fT manipulava um array com as informações do arquivo texto lido e a nova classe, fTdb irá manipular uma tabela. Ela será útil caso número de registros do arquivo texto a ser lido supere o limite do Array. #INCLUDE "PROTHEUS.CH" #INCLUDE "TRYEXCEPTION.CH" #INCLUDE "FILEIO.CH" #INCLUDE "DBSTRUCT.CH" /*/ CLASS: fTdb Autor: Marinaldo de Jesus Data: 01/05/2011 Descricao: Alternativa aas funcoes tipo FT_F* devido as limitacoes apontadas em (http://tdn.totvs.com.br/kbm#9734) Sintaxe: ftdb():New() : Objeto do Tipo fT /*/ CLASS fTdb FROM fT DATA cDbFile DATA cDbAlias DATA cRDDName METHOD New() CONSTRUCTOR METHOD ClassName() METHOD ft_fUse( cFile )

Outro dia precisei ler um arquivo, através das funções FT_F* e, surpreso, descobri que ela possui limitações: Função: FT_FReadLn (Lê e retorna uma linha de texto do arquivo aberto pela função FT_FUse(). As linhas do texto, são delimitadas pela sequência de caracteres CRLF (chr(13)+chr(10)) ou apenas LF (chr(10)), e o tamanho máximo de cada linha é 1022 bytes.). O arquivo que estava tentando ler superava, em muito, a quantidade de caracteres suportado pela FT_FReadLn: 2668 no total ( quase 3 vezes mais ). Para a solução do problema, desenvolvi a classe fT com as mesmas semelhanças as funções FT_F* e sem as limitações impostas por esta. #INCLUDE "PROTHEUS.CH" #INCLUDE "TRYEXCEPTION.CH" #INCLUDE "FILEIO.CH" /*/ CLASS: fT Autor: Marinaldo de Jesus Data: 01/05/2011 Descricao: Alternativa aas funcoes tipo FT_F* devido as limitacoes apontadas em (http://tdn.totvs.com.br/kbm#9734) Sintaxe: ft():New() : Objeto do Tipo fT /*/ CLASS fT FROM LongClassName

Olhar Digital : Central de Vídeos : ARdrone: um helicóptero controlado pelo seu smartphone eu quero....(rs) []s иαldσ dj