Muhasebe Fonksiyonları

MuhasebeHesapToplam

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - firmaKodu (String): Firma kodu
  • Açıklama: Muhasebe hesap toplamını hesaplar

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, FirmaKodu, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    FirmaKodu = "01"
    
    Toplam = Doc.MuhasebeHesapToplam(HesapKodu, BasTarih, BitTarih, FirmaKodu)
    Doc.MsgBox "Hesap Toplamı: " & Toplam
End Sub

MuhasebeHesapToplam2

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • Açıklama: Muhasebe hesap toplamını hesaplar (2. versiyon)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    Toplam = Doc.MuhasebeHesapToplam2(HesapKodu, BasTarih, BitTarih)
    Doc.MsgBox "Hesap Toplamı (v2): " & Toplam
End Sub

MuhasebeHesapToplam_D

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - firmaKodu (String): Firma kodu
  • - defterKodu (String): Defter kodu
  • Açıklama: Muhasebe hesap toplamını hesaplar (Defter kodu ile)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, FirmaKodu, DefterKodu, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    FirmaKodu = "01"
    DefterKodu = "DEFTER01"
    Toplam = Doc.MuhasebeHesapToplam_D(HesapKodu, BasTarih, BitTarih, FirmaKodu, DefterKodu)
    Doc.MsgBox "Hesap Toplamı (Defter): " & Toplam
End Sub

MuhasebeHesapToplam2_D

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - defterKodu (String): Defter kodu
  • Açıklama: Muhasebe hesap toplamını hesaplar (2. versiyon, Defter kodu ile)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, DefterKodu, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    DefterKodu = "DEFTER01"
    Toplam = Doc.MuhasebeHesapToplam2_D(HesapKodu, BasTarih, BitTarih, DefterKodu)
    Doc.MsgBox "Hesap Toplamı (v2, Defter): " & Toplam
End Sub

MuhasebeHesapToplam_Par

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - firmaKodu (String): Firma kodu
  • - options (String): Seçenekler (M10ZMOPT, M10YMOPT, vb.)
  • Açıklama: Muhasebe hesap toplamını hesaplar (parametreli)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, FirmaKodu, Options, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    FirmaKodu = "01"
    Options = "M10ZMOPT"
    Toplam = Doc.MuhasebeHesapToplam_Par(HesapKodu, BasTarih, BitTarih, FirmaKodu, Options)
    Doc.MsgBox "Hesap Toplamı (Parametreli): " & Toplam
End Sub

MuhasebeHesapToplam2_Par

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - options (String): Seçenekler
  • Açıklama: Muhasebe hesap toplamını hesaplar (2. versiyon, parametreli)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, Options, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    Options = "M10ZMOPT"
    Toplam = Doc.MuhasebeHesapToplam2_Par(HesapKodu, BasTarih, BitTarih, Options)
    Doc.MsgBox "Hesap Toplamı (v2, Parametreli): " & Toplam
End Sub

MuhasebeHesapToplam_D_Par

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - firmaKodu (String): Firma kodu
  • - defterKodu (String): Defter kodu
  • - options (String): Seçenekler
  • Açıklama: Muhasebe hesap toplamını hesaplar (Defter kodu ve parametreler ile)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, FirmaKodu, DefterKodu, Options, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    FirmaKodu = "01"
    DefterKodu = "DEFTER01"
    Options = "M10ZMOPT"
    Toplam = Doc.MuhasebeHesapToplam_D_Par(HesapKodu, BasTarih, BitTarih, FirmaKodu, DefterKodu, Options)
    Doc.MsgBox "Hesap Toplamı (Defter, Parametreli): " & Toplam
End Sub

MuhasebeHesapToplam2_D_Par

  • Dönüş Tipi: Variant
  • Parametreler:
  • - hesapKodu (String): Hesap kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - defterKodu (String): Defter kodu
  • - options (String): Seçenekler
  • Açıklama: Muhasebe hesap toplamını hesaplar (2. versiyon, Defter kodu ve parametreler ile)

Örnek Kullanım:

Sub Makro1()
    Dim HesapKodu, BasTarih, BitTarih, DefterKodu, Options, Toplam
    HesapKodu = "120.01.001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    DefterKodu = "DEFTER01"
    Options = "M10ZMOPT"
    Toplam = Doc.MuhasebeHesapToplam2_D_Par(HesapKodu, BasTarih, BitTarih, DefterKodu, Options)
    Doc.MsgBox "Hesap Toplamı (v2, Defter, Parametreli): " & Toplam
End Sub

CariHesapTT

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - tarih (String): Tarih
  • Açıklama: Cari hesap toplam tutarını döndürür

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, Tarih, Toplam
    CariKodu = "CARI001"
    Tarih = Doc.Today()
    
    Toplam = Doc.CariHesapTT(CariKodu, Tarih)
    Doc.MsgBox "Cari: " & CariKodu & Chr(13) & "Toplam Tutar: " & Toplam
End Sub

CariHesapTT_LPB

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - tarih (String): Tarih
  • Açıklama: Cari hesap toplam tutarını LPB olarak döndürür

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, Tarih, ToplamLPB
    CariKodu = "CARI001"
    Tarih = Doc.Today()
    ToplamLPB = Doc.CariHesapTT_LPB(CariKodu, Tarih)
    Doc.MsgBox "Cari Toplam (LPB): " & ToplamLPB
End Sub

CariHesapTT_PB

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - tarih (String): Tarih
  • - paraBirimi (String): Para birimi
  • Açıklama: Cari hesap toplam tutarını belirtilen para biriminde döndürür

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, Tarih, ParaBirimi, ToplamPB
    CariKodu = "CARI001"
    Tarih = Doc.Today()
    ParaBirimi = "USD"
    ToplamPB = Doc.CariHesapTT_PB(CariKodu, Tarih, ParaBirimi)
    Doc.MsgBox "Cari Toplam (" & ParaBirimi & "): " & ToplamPB
End Sub

CariHesapTT_V

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - tarih (String): Tarih
  • Açıklama: Cari hesap toplam tutarını Variant olarak döndürür

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, Tarih, ToplamV
    CariKodu = "CARI001"
    Tarih = Doc.Today()
    ToplamV = Doc.CariHesapTT_V(CariKodu, Tarih)
    Doc.MsgBox "Cari Toplam (Variant): " & ToplamV
End Sub

CariHesapTT_LPB_V

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - tarih (String): Tarih
  • Açıklama: Cari hesap toplam tutarını LPB Variant olarak döndürür

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, Tarih, ToplamLPBV
    CariKodu = "CARI001"
    Tarih = Doc.Today()
    ToplamLPBV = Doc.CariHesapTT_LPB_V(CariKodu, Tarih)
    Doc.MsgBox "Cari Toplam (LPB Variant): " & ToplamLPBV
End Sub

CariHesapTT_PB_V

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - tarih (String): Tarih
  • - paraBirimi (String): Para birimi
  • Açıklama: Cari hesap toplam tutarını belirtilen para biriminde Variant olarak döndürür

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, Tarih, ParaBirimi, ToplamPBV
    CariKodu = "CARI001"
    Tarih = Doc.Today()
    ParaBirimi = "USD"
    ToplamPBV = Doc.CariHesapTT_PB_V(CariKodu, Tarih, ParaBirimi)
    Doc.MsgBox "Cari Toplam (" & ParaBirimi & " Variant): " & ToplamPBV
End Sub

KasaPortfoyTT

  • Dönüş Tipi: Variant
  • Parametreler:
  • - kasaKodu (String): Kasa kodu
  • - tarih (String): Tarih
  • Açıklama: Kasa portföy toplam tutarını döndürür

Örnek Kullanım:

Sub Makro1()
    Dim KasaKodu, Tarih, Toplam
    KasaKodu = "KASA001"
    Tarih = Doc.Today()
    Toplam = Doc.KasaPortfoyTT(KasaKodu, Tarih)
    Doc.MsgBox "Kasa Portföy Toplamı: " & Toplam
End Sub

CSRisk_Toplam

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - firmaKodu (String): Firma kodu
  • Açıklama: Cari hesap risk toplamını hesaplar

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, BasTarih, BitTarih, FirmaKodu, RiskToplam
    CariKodu = "CARI001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    FirmaKodu = "01"
    RiskToplam = Doc.CSRisk_Toplam(CariKodu, BasTarih, BitTarih, FirmaKodu)
    Doc.MsgBox "Cari Risk Toplamı: " & RiskToplam
End Sub

CSRisk_Detay

  • Dönüş Tipi: Variant
  • Parametreler:
  • - cariKodu (String): Cari kodu
  • - baslangicTarihi (String): Başlangıç tarihi
  • - bitisTarihi (String): Bitiş tarihi
  • - firmaKodu (String): Firma kodu
  • Açıklama: Cari hesap risk detayını hesaplar

Örnek Kullanım:

Sub Makro1()
    Dim CariKodu, BasTarih, BitTarih, FirmaKodu, RiskDetay
    CariKodu = "CARI001"
    BasTarih = "2024/01/01"
    BitTarih = "2024/12/31"
    FirmaKodu = "01"
    RiskDetay = Doc.CSRisk_Detay(CariKodu, BasTarih, BitTarih, FirmaKodu)
    Doc.MsgBox "Cari Risk Detayı: " & RiskDetay
End Sub

---