Pular para o conteúdo principal

Variáveis Públicas

Variáveis públicas disponíveis no Protheus:

Nome Tipo Tamanho Descrição / Retorno
aEmpresas A
Array contendo tantos elementos quanto forem as empresas e filiais cadastradas no sistema sendo que cada elemento se encontra no formato “EEFF” (Empresa + Filial) Ex.: “5501”.
cAcesso C 128 Permissões de Acesso do Usuário
cArqEmp C 12 Nome do arquivo de empresas com sua extensão. Ex.: “SIGAMAT.EMP”.
cArqMnu C 12 Nome do arquivo de menu que está em uso no momento + a sua extensão. Ex.: “SIGAEST.MNU”.
cEmpAnt C 2 Número da Empresa que está em uso no momento. Ex.: “55”.
cFOpened C
String com os Alias de todos os arquivos que estão abertos no momento.
cFilAnt C 2 Número da Filial que está em uso no momento. Ex.: “01”.
cModulo C 3 Sigla do Módulo que está em uso no momento. Ex.: “EST” para o Módulo de Estoque.
cNivel N 1 Nível de Acesso do Usuário podendo variar de 0 a 9 sendo que 9 indica um Administrador.
cNumEmp C 4 Número da Empresa + Filial que está em uso no momento. Ex.: “9901”.
cPaisLoc C 3 Sigla do Pais para qual está configurado o Sistema. Ex.: “BRA”.
cSenha C 6 Senha do Usuário.
cUserName C 15 Nome do Usuário (sem brancos a direita).
cUsuario C 533 De 001 a 006 – Senha do Usuário (6 dígitos)
De 007 a 021 – Nome do Usuário (15 dígitos)
De 022 a 533 – Permissões de Acesso (512 dígitos)
cVersao C
Versão do Sistema.
dDataBase D 8 Contém a data selecionada na entrada do sistema.
__Language C
Língua atual do Sistema. Ex.: “PORTUGUESE”.
__lSX8 L
Usada em conjunto com as funções GetSX8Num() e ConfirmSX8(). Provavelmente para controlar se o número já está reservado para outro usuário.
nModulo N 1 Número do Módulo que está em uso no momento. Ex.: 4 para o Módulo de Estoque.
_NomeExec C 12 Nome do arquivo executável que está em uso no momento + a sua extensão. Ex.: “SIGAEST.EXE”.
tInicio C 8 Horário em que foi iniciado o sistema no formato “HH:MM:SS”.
__TTSinUse L
Indica se o controle de transações está ativo no sistema. Retorna .T. se MV_TTS = “S” e .F. se for igual a “N”.
__UserID C 6 Número de identificação do usuário no cadastro de usuários. Ex.: “000006”.

Comentários

Postagens mais visitadas deste blog

Teclas de Atalhos TOTVS Developer Studio (Eclipse)

Seguem os atalhos para o TOTVS Developer Studio  (Eclipse)  : CTRL+H Localizar vários locais CTRL+F Localizar / substituir CTRL+K Localizar proximo resultado abaixo CTRL+SHIFT+K Localizar proximo resultado acima F11 Depurar F5 Percorre linha F6 Pula linha CTRL+F8 Trocar perspectiva CTRL+F7 Mudar visualização CTRL+F6 Navegar entre os fontes abertos CTRL+M Maximiza / miniminiza fonte CTRL+N Novo (wizard) CTRL+L Ir para linha CTRL+D Deleta toda linha CTRL+ALT+DOWN Duplica linha para baixo CTRL+ALT+UP Duplica linha para cima CTRL+SHIFT+L Apresenta lista de atalhos ALT+UP Move linha para cima ALT+DOWN Move linha para baixo CTRL+SHIFT+I Indenta o fonte CTRL+F9 Compilar CTRL+ESPAÇO A

Impressão com imagens no Protheus

Muitas vezes é necessário incluir uma imagem num relatório (uma logomarca por exemplo). Uma das maneiras de se fazer isto, é usar a classe TMSPRINTER() . O programa exemplo abaixo, ilustra bem como fazer. Este usa também a classe TFONT() (o tamanho do fonte leva o sinal de menos) : # include "PROTHEUS.CH" # include "RWMAKE.CH" user function fImprimeG() local oFont08 := tfont():New( 'Courier new' ,, -8, .t.),,; oFont09 := tfont():New( 'Courier new' ,, -9, .t.),,; oFont10 := tfont():New( 'Courier new' ,,-10, .t.) oPrint:=tmsprinter():new( "Impressao Grafica" ) oPrint:setportrait() oPrint:SetpaperSize(9) // PAPEL A4 if .not. oPrint:Setup() // MOSTRA JANELA DE CONFIGURAÇÃO DE IMPRESSAO msgalert( "IMPRESSAO CANCELADA." ) return nil endif // ESTE BLOCO PODE FICAR EM LOOP (DO WHILE, FOR..., ETC.) oPrint:StartPage() // oPrint:sayBitmap(linha, coluna, "C:\SUAPASTA\SUAIMAGEM.BMP", largura, al

Variáveis públicas do Protheus

Variáveis Públicas Disponíveis no Protheus: Nome Tipo Tamanho Descrição aEmpresas (A) Array contendo tantos elementos quanto forem as empresas e filiais cadastradas no sistema sendo que cada elemento se encontra no formato “EEFF” (Empresa + Filial) Ex.: “5501”. cAcesso (C, 128) Permissões de Acesso do Usuário. cEmpAnt (C, 2) Número da Empresa que está em uso no momento. Ex.: "55". cModulo (C, 3) Sigla do Módulo que está em uso no momento. Ex.: "EST" para o Módulo de Estoque. cNivel (N, 1) Nível de Acesso do Usuário podendo variar de 0 a 9 sendo que 9 indica um Administrador. cNumEmp (C, 4) Número da Empresa + Filial que está em uso no momento. Ex.: "9901". cSenha (C, 6) Senha do Usuário. cUserName (C, 15) Nome do Usuário sem brancos a direita. cUsuario (C, 533) Informações do usuário:de 001 a 006 – Senha do Usuário (6 dígitos)de 007 a 021 – Nome do Usuário (15 dígitos)de 022 a 533 – Permissões de Acesso (512 dígitos) dDataBa