Source position: uPSI_XCollection.pas line 35
procedure RIRegister_XCollection_Routines(
S: TPSExec
);