>sorry I have not looked well.
>
>try ( if VFP support it ):
>

>SELECT Program.Numero,Program.Active,Program.Title,Program.Notes_E,Program.Notes_F,Program.NoMaster,;
> Master.FirstName,Master.LastName,MasterType.Title_E AS MasterType_E,MasterType.Title_F AS MasterType_F,Video.Url,Video.Numero AS PrimaryKey;
> FROM Program;
> INNER JOIN Master ON Program.NoMaster=Master.Numero;
> INNER JOIN MasterType ON Master.NoMasterT=MasterType.Numero;
> INNER JOIN Video ON Program.Numero=Video.NoProgram;
> INNER JOIN InvoiceI ON Video.Numero=InvoiceI.NoVideo;
> INNER JOIN Invoice ON InvoiceI.NoInvoice=Invoice.Numero;
> WHERE Program.Active AND Invoice.AddUser=1;
> AND Video.Numero=(SELECT MIN(V.Numero) FROM Video V JOIN InvoiceI I ON V.Numero=I.NoVideo WHERE V.NoProgram=Video.NoProgram);
> ORDER BY Program.Title
>

>but it can to be not sufficient.
>
>

>SELECT Program.Numero,Program.Active,Program.Title,Program.Notes_E,Program.Notes_F,Program.NoMaster,;
> Master.FirstName,Master.LastName,MasterType.Title_E AS MasterType_E,MasterType.Title_F AS MasterType_F,Video.Url,Video.Numero AS PrimaryKey;
> FROM Program;
> INNER JOIN Master ON Program.NoMaster=Master.Numero;
> INNER JOIN MasterType ON Master.NoMasterT=MasterType.Numero;
> INNER JOIN Video ON Program.Numero=Video.NoProgram;
> INNER JOIN InvoiceI ON Video.Numero=InvoiceI.NoVideo;
> INNER JOIN Invoice ON InvoiceI.NoInvoice=Invoice.Numero;
> WHERE Program.Active AND Invoice.AddUser=1;
> AND Video.Numero=(SELECT MIN(V.Numero) FROM Video V JOIN InvoiceI I ON V.Numero=I.NoVideo;
> JOIN  Invoice ON I.NoInvoice=Invoice.Numero AND Invoice.AddUser=1;
> WHERE V.NoProgram=Video.NoProgram);
> ORDER BY Program.Title
>

>
>
>It is better probably a solution in two steps.

Both SQL return the video purchased and not the first one. So far, the solution proposed by Jim is the only one I was able to achieve that from.