Skip to main content

IsSourcePartner

Function IsSourcePartner(const aSourceNum : integer) : boolean;

Example

procedure ScriptEvent(var Value: variant);
begin
Value := IsSourcePartner(2); // True: EDI
end;

Usage

IsSourcePartner returns true for every source number except Velox's internal App value 1.

Parameters and result

ItemTypeDescription
aSourceNuminteger, constSource number to classify.
ResultbooleanFalse only for 1; True for all other integers.

Behaviour and security boundary

  • True means “not explicitly internal,” not “recognized partner source.” This distinction is material for validation, routing and audit logic.
  • Invalid values intentionally fall into the more restrictive external/partner side. This deliberately applies the more restrictive external treatment to every value other than the known internal value.
  • If the caller must reject invalid sources, first use GetSourceCode and test for Null, then classify the validated number.
  • A source number alone does not authenticate a partner, channel or caller. Apply the execution context's authorization and integrity controls.
  • Future source values return True unless Velox explicitly classifies them as internal.

Additional Technical Info

IsSourcePartner is the exact negation of IsSourceInternal. It returns False only for source 1 (App) and returns True for every other integer.

This deliberately conservative classifier treats unknown or invalid sources as partner/external. It is not a validator for the recognized partner-source set.

Source classification

ValueCanonical sourceResult
1AppFalse
2EDITrue
3WebTrue
4APITrue
0, negative or any other valueinvalid/unknownTrue

Implementation

The function returns not IsSourceInternal(aSourceNum). The internal helper tests only equality with 1; there is no range/membership check, database query or source-code conversion.

Side effects, errors and performance

The function is pure, constant-time and performs no I/O. Every integer has a defined Boolean result.

Related entries

Created 2026-07-15