PROTHEUS-Controle de semáforos no Protheus

Controle de semáforos no Protheus

Muitas vezes precisamos que os usuários acessem uma única rotina por fez. 

Para isto, existe uma forma para controlar o semáforo.

No início do código, você pode utilizar o seguinte trecho

While !( MayIUseCode( "PIRIPAQUE","ALEKSANDRO" ) )

      Sleep( 5000 )

End While

... continuação do código

Eu precisei de utilizar um semáforo destes, para que não ficasse sem exibir nada na tela, eu coloquei um splash screen para dar uma satisfação do que esta acontecendo.