MasterData and Detaildata in the same report

[Manuel Calero Sólis]

English

I'm trying to make a report as a dataset with two Masterdata and
DetailData with two different work areas.

But the report is generated goes totally blank if you use two
different work areas.

I put the code to see if anyone can help me.

Thank you very much.

Español

Ingles

Estoy intentando realizar un informe con dos dataset uno como
Masterdata y un DetailData con dos areas de trabajo distintas.

Pero el informe no se genera sale totalmente en blanco si uso dos
areas de trabajo distintas.

Dejo el codigo para ver si alguien puede ayudarme.

Muchas gracias.

Code

METHOD DataReport( oFr ) CLASS TFastVentasClientes

/*
Zona de
detalle-------------------------------------------------------------
*/

::oFastReport:SetWorkArea( "Informe", ::oDbf:nArea )
::oFastReport:SetFieldAliases( "Informe",
cObjectsToReport( ::oDbf ) )

/*
Zona de
datos---------------------------------------------------------------
*/

::oFastReport:SetWorkArea( "Empresa", ::oDbfEmp:nArea )
::oFastReport:SetFieldAliases( "Empresa",
cItemsToReport( aItmEmp() ) )

::oFastReport:SetWorkArea( "Clientes", ::oDbfCli:nArea )
::oFastReport:SetFieldAliases( "Clientes",
cItemsToReport( aItmCli() ) )

::oFastReport:SetWorkArea( "Facturas", ::oFacCliT:nArea )
::oFastReport:SetFieldAliases( "Facturas",
cItemsToReport( aItmFacCli() ) )

::oFastReport:SetWorkArea( "Lineas de
facturas", ::oFacCliL:nArea )
::oFastReport:SetFieldAliases( "Lineas de
facturas", cItemsToReport( aColFacCli() ) )

::oFastReport:SetWorkArea( "Tipos de
IVA", ::oDbfIva:nArea )
::oFastReport:SetFieldAliases( "Tipos de
IVA", cItemsToReport( aItmTIva() ) )

::oFastReport:SetMasterDetail( "Informe",
"Facturas", {|| ( ::oDbf:nArea )->cCodCli } )
::oFastReport:SetMasterDetail( "Informe",
"Empresa", {|| cCodEmp() } )
::oFastReport:SetMasterDetail( "Informe", "Tipos de
IVA", {|| ( ::oDbf:nArea )->cTipIva } )
::oFastReport:SetMasterDetail( "Informe",
"Clientes", {|| ( ::oDbf:nArea )->cCodCli } )

::oFastReport:SetMasterDetail( "Facturas", "Lineas de
facturas", {|| ( ::oFacCliT:nArea )->cSerie +
Str( ( ::oFacCliT:nArea )->nNumFac ) + ( ::oFacCliT:nArea )-
>cSufFac } )

::oFastReport:SetResyncPair( "Informe", "Empresa" )
::oFastReport:SetResyncPair( "Informe", "Tipos de IVA" )
::oFastReport:SetResyncPair( "Informe", "Clientes" )
::oFastReport:SetResyncPair( "Informe", "Facturas" )

::oFastReport:SetResyncPair( "Facturas", "Lineas de facturas" )

::AddVariable()

Return ( Self )

//---------------------------------------------------------------------------//