Linha Microsiga Protheus

Árvore de páginas

Descrição

Este Ponto de Entrada permite incluir novos botões na tela do apontamento eletrônico.

Observações

Exemplos

#INCLUDE "PROTHEUS.CH" USER FUNCTION O070BOT()

@ 234, 155 BUTTON oBotoes  PROMPT OemToAnsi("Opções") OF oDlgEletronic SIZE 30,11 PIXEL ACTION O070OPC()

Return(.t.)

Preview

Veja também

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

N/A

Retorno

N/A

Eventos de chamada do Ponto de Entrada

@ 128,006 LISTBOX oLbOsSemApont FIELDS HEADER " ",;   OemToAnsi(STR0019),;   OemToAnsi(STR0020),;   OemToAnsi(STR0021),;   OemToAnsi(STR0022),;   OemToAnsi(STR0023);   COLSIZES 5,40,30,50,50,60;   SIZE 348,89 OF oDlgEletronic PIXEL ON CHANGE (cOs:=aOsSemApont[oLbOsSemApont:nAt,1],oOS:refresh());   ON DBLCLICK FS_CLICKVAL() PIXEL    FS_OSSEMAPONT()  oLbOsSemApont:bLostFocus := \{|| cObjeto:="oLbOsSemApont"\}                     If ExistBlock("O070BOT")        ExecBlock("O070BOT",.f.,.f.,)     Endif   // @ 234, 157 BUTTON oLibOsv  PROMPT OemToAnsi(STR0041) OF oDlgEletronic SIZE 30,11 PIXEL ACTION FS_SENHA("1") //Libera OS // @ 234, 198 BUTTON oReqPec  PROMPT OemToAnsi(STR0042) OF oDlgEletronic SIZE 30,11 PIXEL ACTION FS_SENHA("2") //Req.Pecas

Variáveis

Programa Fonte

OFIOM070

  • Sem rótulos