vassili
06-26-2007, 02:24 AM
is there a more elegant way of writing this?
If chkBOM = False And chkpBOM = True And chkPO = True Then
Call getpBOM
Call getPO
ElseIf chkBOM = False And chkpBOM = True And chkPO = False Then
Call getpBOM
ElseIf chkBOM = False And chkPO = True And chkpBOM = False Then
Call getPO
ElseIf chkBOM = True And chkPO = False And chkpBOM = False Then
Call getBOM
ElseIf chkBOM = True And chkPO = True And chkpBOM = False Then
Call getBOM
Call getPO
ElseIf chkBOM = True And chkPO = False And chkpBOM = True Then
Call getBOM
Call getpBOM
ElseIf chkBOM = True And chkPO = True And chkpBOM = True Then
Call getBOM
Call getpBOM
Call getPO
End If
If chkBOM = False And chkpBOM = True And chkPO = True Then
Call getpBOM
Call getPO
ElseIf chkBOM = False And chkpBOM = True And chkPO = False Then
Call getpBOM
ElseIf chkBOM = False And chkPO = True And chkpBOM = False Then
Call getPO
ElseIf chkBOM = True And chkPO = False And chkpBOM = False Then
Call getBOM
ElseIf chkBOM = True And chkPO = True And chkpBOM = False Then
Call getBOM
Call getPO
ElseIf chkBOM = True And chkPO = False And chkpBOM = True Then
Call getBOM
Call getpBOM
ElseIf chkBOM = True And chkPO = True And chkpBOM = True Then
Call getBOM
Call getpBOM
Call getPO
End If