Ajuda do VBScript

Dica de depuração: Experimente utilizar a função MsgBox do VBScript para mostrar o valor atual de uma variável e obter algum feedback durante a execução do código. Por exemplo: MsgBox("Isto aparece numa caixa de diálogo")

Para consultar as funções e a sintaxe avançadas do VBScript:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vbscripttoc.asp

Aqui está um pequeno exemplo de código para o ajudar a começar:

Código de exemplo

SetCommonVarNumeric(1, 5.5)

rTemp = LookupMasterAttribute("MASTER1", "FORMULAATT", nil)

rEstimatedError = rTemp * LookupNumericField("UNCERTBUDGETLINEITEMS", "ESTIMATED_ERROR")

rCoverageFactor = LookupNumericField("UNCERTBUDGETLINEITEMS", "ITEM_DIVISOR")

rSensCoeff = LookupNumericField("UNCERTBUDGETLINEITEMS", "SENSITIVITY_COEFFICIENT")

rStandardUncert = (rEstimatedError / rCoverageFactor) * rSensCoeff

SetResult(rStandardUncert)

O código acima faz o seguinte (linha a linha):

1. | Define a variável CommonVar #1 como 5,5 (a função «FORMULAATT» poderá precisar de fazer referência a esta variável quando for executada)2. | Executa a fórmula VBScript para o atributo «FORMULAATT» do mestre «MASTER1» e devolve o resultado à variável «rEstimatedEror»3. | Consulta o campo «Erro estimado» do item em questão e multiplica-o por rTemp, devolvendo o resultado a rEstimatedError4. | Lê o campo «Fator de Cobertura» do item contribuinte e atribui o valor à variável rCoverageFactor5. | Lê o campo «Coeficiente de sensibilidade» do item contribuinte e atribui o valor à variável rSensCoeff6. | Divide rEstimatedError por rCoverageFactor, multiplica o resultado por rSensCoeff e atribui o resultado à variável rStandardUncert7. | Define o resultado do VBScript como rStandardUncert (sempre o último passo)