SELECT Table1.NumDoc, Table1.TipoDoc, ;
Table1.TotDoc - SUM(Table2.ValReg) ;
FROM Table1 ;
JOIN Table2 ;
ON Table1.NumDoc = Table2.NumDoc  .AND. AllTrim(Table1.TipoDoc) == AllTrim(Table2.TipoDoc) ;
GROUP BY 1, 2 ;
UNION ;
SELECT NumDoc, TipoDoc, TotDoc ;
FROM Table1 ;
WHERE NumDoc NOT IN (SELECT NumDoc FROM Table2) ;
INTO CURSOR Result


** ON Table1.NumDoc = Table2.NumDoc  .AND. AllTrim(Table1.TipoDoc) == AllTrim