Criando módulos do menu Protheus

A Totvs disponibiliza até 3 possíbilidades de criar novos módulos e para tanto vc deve criar 3 funções conforme abaixo.

User function EspNome()
Return " Módulo Especifíco 1"

User function Esp1Nome()
Return " Módulo Especifíco 2"

User function Esp2Nome()
Return " Módulo Especifíco 3"

O retorno será o nome do módulo que será gerado.

Cursos férias da USP

Sites que disponibilizam cursos de férias bem mais acessíveis ao público.

http://www.ime.usp.br/~imejr/cursos.php
-Inglês, Espanhol, C# e ASP.NET

http://www.fflch.usp.br/sce/
- Línguas entre outros

Localizando um caracter dentro de uma string

Um modo fácil de encontrar um caracter dentro de uma string é executar a validação abaixo:


cDate := '05-2010'
If '/' $ cDate
  Alert('Falso')
Else If '-' $ cDate
  Alert('Verdadeiro')
EndIf

Utilizando condições no Oracle e Mysql

Oracle 9i, Oracle 10g, Oracle 11g

No oracle não utilizamos a condicional "IF", no lugar deste devemos utilizar:

CASE [ expression ]
    WHEN condition_1 THEN result_1
    WHEN condition_2 THEN result_2
    ...
    WHEN condition_n THEN result_n
    ELSE result
END

Vamos aos exemplos

    SELECT CASE F4_INCSOL
           WHEN 'S' THEN SUM(d1.D1_ICMSRET)
           ELSE 0
           END
      FROM SD1060 d1
INNER JOIN SF4
        ON f4.F4_CODIGO = d1.D1_TES (cont)...

ou

    SELECT CASE
           WHEN F4_INCSOL = 'S' THEN SUM(d1.D1_ICMSRET)
           ELSE 0
           END
      FROM SD1060 d1
INNER JOIN SF4
        ON f4.F4_CODIGO = d1.D1_TES (cont)...


Já no MYSQL poderíamos exemplicar da seguinte maneira


    SELECT IF(F4_INCSOL = 'S', SUM(d1.D1_ICMSRET), 0)
      FROM SD1060 d1
INNER JOIN SF4
        ON f4.F4_CODIGO = d1.D1_TES (cont)...


Manipular tabelas de várias empresas ao mesmo tempo