SELECT 'FAC' AS TD,EMIBCOD,PRRCOD,FCGNRO,FCGFEC,FCGLCON,FCGLCODART,FCGLDESART,FCGLCONC,FCGLUNI,FCGLPREC,FCGLDTO,Round(FCGLUNI*(FCGLPREC*(1-(FCGLDTO/100))),2) AS FCGLTOTAL,FCGLIVAC,' ' AS ALBARAN, FCGLCOSTO 
FROM COSFAOL
WHERE FCGALBFAC = 'F' 
UNION

SELECT 'ALB' AS TD,FACALB1.EMIBCOD,FACALB1.PRRCOD,FACALB1.FNRO,FACALB1.FFEC,FCGLCON,FCGLCODART,FCGLDESART,FCGLCONC,FCGLUNI,FCGLPREC,FCGLDTO,Round(FCGLUNI*(FCGLPREC*(1-(FCGLDTO/100))),2) AS FCGLTOTAL,FCGLIVAC,FCGNRO AS ALBARAN,FCGLCOSTO 
FROM COSFAOL INNER JOIN FACALB1 ON (COSFAOL.EMIBCOD=FACALB1.EMIBCOD AND COSFAOL.PRRCOD=FACALB1.PRRCOD AND COSFAOL.FCGNRO=FACALB1.FLNRO AND COSFAOL.FCGFEC=FACALB1.FLFEC) 
WHERE COSFAOL.FCGALBFAC = 'A' AND FACALB1.FCALBFAC='F';



