DefinirEmpresa

Estrutura

DefinirEmpresa

Parâmetros

sNewCompany | String | o nome da nova empresaValor de retorno

nenhum

Descrição

Este procedimento pode ser utilizado para alterar o valor da empresa no menu suspenso acima da grelha «Escolher equipamento». Esta é a empresa atualmente associada ao evento — e filtra muitos dos critérios de pesquisa, juntamente com os códigos de barras do equipamento, etc.

Exemplo

' Utilizar a ação de gatilho «Leitura de código de barras»:

sBarcode = eBarcode.Text

if sBarcode <> '' then

if tdDoSQLRecords(1, 'SELECT COMPANY_NAME FROM COMPANY WHERE COMPANY_NAME = '' & sBarcode & ''') then

SetCompany(sBarcode)

eBarcodeText = ''

AbortAction('')

End If

End If

Compatibilidade de aplicações

Gestão de Calibração IndySoft, Gestão de Laboratórios Comerciais IndySoft, Gestão de Ferramentas IndySoft

Veja também

Sem tópicos relacionados |