Consts  Events  Types  Fields  Properties  Methods  Details  TestOOSMom 

ClsTestProcedures

Classe di test per il middleware

Autore: Giorgio Bernardi
E-Mail: Giorgio.Bernardi@studio.unibo.it
Data : Settembre 2004

Interfaccia da implementare.

Codice
Event Summary
Public OnComputeRequest( Msg As String)
 
Method Summary
Public(Variant) BigConcatena( a As String, b As String, c As String, d As String, As String, f As String, g As String, h As String, As String, l As String, m As String, n() As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant, " As Variant)
Codice
Funzione con troppi argomenti per essere chiamata con lo skeleton dinamico
Public(Long) ComputeDiff( Arg1 As Long, Arg2 As Long)
Codice
Funzione pubblica di test
Public ComputeSum( Arg1 As Long, Arg2 As Long)
Codice
Funzione pubblica di test
Public(String) Concatena( Str1 As String, Str2 As String, Str3 As String)
Codice
Funzione pubblica di test
Public(Long) Divide( Arg1 As Long, Arg2 As Long)
Codice
Funzione pubblica di test: permette di testare la gestione degli errori (0/0).
Public(Long) GetSum( Arg1 As Long, Arg2 As Long)
Codice
Funzione pubblica di test
Public hello()
Codice
Funzione pubblica di test: procedura senza argomenti.
 
Details

OnComputeRequest

Public Event OnComputeRequest(Msg As String)
Codice

BigConcatena

Public Function BigConcatena(a As String, b As String, c As String, d As String, 
                                        e As String, f As String, g As String, h As String, 
                                        i As String, l As String, m As String, n As String)
    RaiseEvent OnComputeRequest("BigConcatena(" & a & "," & b & "," & c & "," & d & "," & e & "," & f & "," & g & "," & h & "," & i & "," & l & "," & m & "," & n & ")")
    BigConcatena = a & b & c & d & e & f & g & h & i & l & m & n
End Function
Codice
Funzione con troppi argomenti per essere chiamata con lo skeleton dinamico

ComputeDiff

Public Function ComputeDiff(Arg1 As Long, Arg2 As Long) As Long
Codice
Funzione pubblica di test

ComputeSum

Public Sub ComputeSum(Arg1 As Long, Arg2 As Long)
Codice
Funzione pubblica di test

Concatena

Public Function Concatena(Str1 As String, Str2 As String, Str3 As String) As String
Codice
Funzione pubblica di test

Divide

Public Function Divide(Arg1 As Long, Arg2 As Long) As Long
Codice
Funzione pubblica di test: permette di testare la gestione degli errori (0/0).

GetSum

Public Function GetSum(Arg1 As Long, Arg2 As Long) As Long
Codice
Funzione pubblica di test

hello

Public Sub hello()
Codice
Funzione pubblica di test: procedura senza argomenti.
Consts  Events  Types  Fields  Properties  Methods  Details  TestOOSMom