neu
This commit is contained in:
@@ -338,7 +338,7 @@ Public Class cRKSV
|
||||
Shared Function getGJ(BelegDat As Date, Optional FIRMA As String = "") As Integer
|
||||
If FIRMA = "" Then FIRMA = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
|
||||
Select Case FIRMA
|
||||
Case "IMEX", "FRONTOFFICE"
|
||||
Case "IMEX", "FRONTOFFICE", "UNISPED", "AMBAR"
|
||||
Return BelegDat.Year
|
||||
Case Else
|
||||
Return IIf(BelegDat.Month = 1, BelegDat.Year - 1, BelegDat.Year)
|
||||
|
||||
Reference in New Issue
Block a user