Dynamický dotaz - Peněžní deník - typy příjmů a výdajů - detailně

ID:

A30AMOSUF13OB4U2OH1I1EJ1JS

Datasety

MAIN

Popis:

Peněžní deník - typy příjmů a výdajů - detailně

SQL definice:

SELECT
  A.Category, 
  case when A.Category=0 then IT.Category else ET.Category end as IECategory,
  case when A.Category=0 then IT.ID else ET.ID end as IEID,
  case when A.Category=0 then IT.Name else ET.Name end as IEName,
  Max(A.IncomeType_ID) as IncomeType_ID,
  Max(A.ExpenseType_ID) as ExpenseType_ID,
  Max(A.Error) as Error,
  Sum(A.Amount) as Amount,
  Sum(A.VATCredit) as VATCredit,
  Sum(A.VATDebit) as VATDebit
  FROM SimpleCashBook({$DateFrom}, {$DateTo}) A
  LEFT JOIN IncomeTypes IT ON IT.ID = A.IncomeType_ID
  LEFT JOIN ExpenseTypes ET ON ET.ID = A.ExpenseType_ID
WHERE 
  (CASE WHEN A.CATEGORY = 0 THEN
    CASE WHEN IT.ID IS NULL THEN
      CAST(0 AS INTEGER)
    ELSE
      IT.CATEGORY
    END
  ELSE
    CASE WHEN ET.ID IS NULL THEN
      CAST(0 AS INTEGER)
    ELSE
      ET.CATEGORY
    END
  END <> -1)
{ANDWHERE}
GROUP BY 1,2,3,4
  HAVING (Sum(A.Amount) <> 0) or (Sum(A.VATCredit) <> 0) or (Sum(A.VATDebit) <> 0) 
UNION ALL
  SELECT A.CATEGORY,
  (case when A.Category=0 then CAST(2 AS INTEGER) else CAST(4 AS INTEGER) end) as IECategory,
  (case when A.Category=0 then
    (SELECT 
    FIRST 
    1 A.ID
    FROM INCOMETYPES A
    WHERE A.CATEGORY = 2)
  else
    (SELECT 
    FIRST 
    1 A.ID
    FROM EXPENSETYPES A
    WHERE A.CATEGORY = 4)
  end) as IEID,
  (case when A.Category=0 then
    (SELECT 
    FIRST 
    1 A.NAME
    FROM INCOMETYPES A
    WHERE A.CATEGORY = 2)
  else
    (SELECT 
    FIRST 
    1 A.Name
    FROM EXPENSETYPES A
    WHERE A.CATEGORY = 4)
  end) as IEName,
  MAX(A.IncomeType_ID) as IncomeType_ID,
  MAX(A.ExpenseType_ID) as ExpenseType_ID,
  MAX(A.Error) as Error,
  CAST (0 as Numeric(15,2)) as Amount,
  SUM(A.VATCredit) as VATCredit,
  SUM(A.VATDebit) as VATDebit
  FROM SimpleCashBook({$DateFrom}, {$DateTo}) A
  LEFT JOIN IncomeTypes IT ON IT.ID = A.IncomeType_ID
  LEFT JOIN ExpenseTypes ET ON ET.ID = A.ExpenseType_ID
WHERE (CASE WHEN A.CATEGORY = 0 THEN
        CASE WHEN IT.ID IS NULL THEN
          CAST(0 AS INTEGER)
        ELSE
          IT.CATEGORY
        END
      ELSE
        CASE WHEN ET.ID IS NULL THEN
          CAST(0 AS INTEGER)
        ELSE
          ET.CATEGORY
        END
      END <> -1) AND
      (CASE when A.Category=0 then IT.Category ELSE Cast(0 AS Integer) end <> 2) AND
      (CASE when A.Category=1 then ET.Category ELSE Cast(0 AS Integer) end <> 4)
{ANDWHERE}
GROUP BY 1
HAVING (Sum(A.VATCredit) <> 0) or (Sum(A.VATDebit) <> 0)
ORDER BY 1,2,3,4

Fields:

Jméno	Typ	Velikost	Výraz	CLSID	Popis
Amount	dtFloat	10			Částka
Category	dtInteger	10			Typ
Error	dtInteger	10			Chyba
ExpenseType_ID	dtString	10		0AVVSAICKNDL3ACT03KIU0CLP4	Typ výdaje
IECategory	dtInteger	10			Kategorie příjmu/výdaje
IEID	dtString	10			ID typu příjmu/výdaje
IEName	dtString	40			Název typu příjmu/výdaje
IncomeType_ID	dtString	10		02VVSAICKNDL3ACT03KIU0CLP4	Typ příjmu
VATCredit	dtFloat	10			DPH Příjem
VATDebit	dtFloat	10			DPH Výdej

Podmínky

DocDate$DATE

Popiska:

Datum

Typ/Subtyp:

ctDateTime/0

ckRange:

(<field> >= {:LOW}) and (<field> < {:HIGH})

Dataset:

MAIN

Speciální parametry:

AlwaysUsed=True
ReplacementLink=True
{$DateFrom}=VALUE;0
{$DateTo}=VALUEHIGH;0

IncomeType_ID

Šablona:

IncomeType_ID

Dataset:

MAIN

Speciální parametry:

ExpenseType_ID

Šablona:

ExpenseType_ID

Dataset:

MAIN

Speciální parametry:

DocumentType

Popiska:

Typ dokladu (platba)

Typ/Subtyp:

ctSpecial/0

ckSingle:

A.DocumentType = {:VALUE}

ckNull:

A.DocumentType IS NULL

ckList:

A.DocumentType IN ({:LIST})

Dataset:

MAIN

Speciální parametry:

CLASSID=WBFHFPM0V3CL33N2010DELDFKK
DisplayField=Name

Document_ID

Popiska:

ID dokladu (platba)

Typ/Subtyp:

ctString/0

ckSingle:

A.Document_ID = {:VALUE}

ckNull:

A.Document_ID IS NULL

Dataset:

MAIN

Speciální parametry:

Hidden=True

PDocumentType

Popiska:

Typ dokladu (placený doklad)

Typ/Subtyp:

ctSpecial/0

ckNull:

A.PDocumentType IS NULL

ckSingle:

A.PDocumentType = {:VALUE}

ckList:

A.PDocumentType IN ({:LIST})

Dataset:

MAIN

Speciální parametry:

CLASSID=WBFHFPM0V3CL33N2010DELDFKK
DisplayField=Name

PDocument_ID

Popiska:

ID dokladu (placený doklad)

Typ/Subtyp:

ctString/0

ckSingle:

A.PDocument_ID = {:VALUE}

ckNull:

A.PDocument_ID IS NULL

Dataset:

MAIN

Speciální parametry:

Hidden=True

Category

Popiska:

Typ

Typ/Subtyp:

ctSpecial/14

ckSingle:

##CASEOR {:VALUE} #
##1# A.Category = 0
##2# A.Category = 1
##END#

Dataset:

MAIN

Speciální parametry:

Names=Příjmy;Výdaje
Values=1;2

Text

Popiska:

Text

Typ/Subtyp:

ctString/0

ckSingle:

A.Text = {:VALUE}

Dataset:

MAIN

Speciální parametry:

Hidden=True

Error

Popiska:

Chyby

Typ/Subtyp:

ctSpecial/14

ckSingle:

##CASEOR {:VALUE} #
##1# A.Error > 0
##2# A.Error = 0
##END#

Dataset:

MAIN

Speciální parametry:

Names=Jen chybné;Jen bezchybné
Values=1;2

TextByUser

Šablona:

Text

Dataset:

MAIN

Generated by ABRA Software a.s. 27.10.2021 16:35