LOD Application

CompanyId

Özellik Bildirimi

Application.CompanyId

Açıklama

Örnek

comId = Application.CompanyId

Ayrıca bkz.

FiscPerdId

Özellik Bildirimi Application.FiscPerdId

Açıklama Login olunmuş aktif dönemin numarasını getirir.

Örnek perId = Application.FiscPerdId

Ayrıca bkz.

FYStart

Özellik Bildirimi Application.FYStart

Açıklama Dönemin başlangıç tarihini Logo tarih formatında döndürür.

Örnek fyStart = Application.FYStart

Ayrıca bkz. FYEnd

FYEnd

Özellik Bildirimi Application.FYEnd

Açıklama Dönemin bitiş tarihini Logo tarih formatında döndürür.

Örnek fyEnd = Application.FYEnd

Ayrıca bkz. FYStart

UserId

Özellik Bildirimi Application.UserId

Açıklama Login olan aktif kullanıcının ID bilgisini döndürür.

Örnek user = Application.UserId

Ayrıca bkz. UserName

UserName

Özellik Bildirimi Application.UserName

Açıklama Login olan aktif kullanıcının adını döndürür.

Örnek uName = Application.UserName

Ayrıca bkz. UserId

TerminalId

Özellik Bildirimi Application.TerminalId

Açıklama Aktif terminalin ID bilgisini döndürür.

Örnek termId = Application.TerminalId

Ayrıca bkz. TerminalCode

TerminalCode

Özellik Bildirimi Application.TerminalCode

Açıklama Aktif terminalin adını döndürür.

Örnek termCode = Application.TerminalCode

Ayrıca bkz. TerminalId

LocalCurr

Özellik Bildirimi Application.LocalCurr

Açıklama Yerel para birimi için para birimi ID si döndürür. (bkz. Appendix)

Örnek lCurr = Application.LocalCurr

Ayrıca bkz. ReportCurr

ReportCurr

Özellik Bildirimi Application.ReportCurr

Açıklama Raporlama para birimi ID sini döndürür. (bkz. Appendix)

Örnek rCurr = Application.ReportCurr

Ayrıca bkz. LocalCurr

DBType

Özellik Bildirimi Application.DBType

Açıklama Veritabanı türü döndürür.

Örnek GetMyDB = Application.DBType

Ayrıca bkz.

GetLastError

Özellik Bildirimi Application.GetLastError

Açıklama Son hata ID'si için tamsayı (integer) değeri döndürür.

Örnek GetMyErrorID = Application.GetLastError

Ayrıca bkz. GetLastErrorString

GetLastErrorString

Özellik Bildirimi Application.GetLastErrorString

Açıklama Son hata metni için tamsayı (integer) değeri döndürür.

Örnek GetMyErrorStr = Application.GetLastErrorString

Ayrıca bkz. GetLastError

CreateAppForm

Özellik Bildirimi Application.CreateAppForm(ID as Integer, DataRef as Integer, OwnerRef as Integer, RecordType as Integer, Status as Integer, DBAction as Integer, Modal as Integer, SelectByRef as Integer, RefSelected as Variant, FormObj as Variant)

Açıklama Uygulama formunu açar.

Parametreler ID (in) Uygulama Tablosu ID bilgisi

DataRef (in) Tablodaki kaydın referansı

OwnerRef (in) Kayıt sahibinin referansı (Örneğin: BNFICHE ile ilgili bir kayıt açmak istediğinizde bankayı yani BNCARD tablosundaki referansı burada belirtmelisiniz)

RecordType (in) Kayıt türü

Status (in) Kullanımda / Kullanım Dışı ( 0 / 1 )

DBAction (in) İşlem: Yeni (1)/ Güncelle (2)/ Kopyala (4)/ Oku (5)

Modal (in) Modülasyon değer ( 1 = Modal)

SelectByRef (in) Referans seçer.

RefSelected (Out) Seçilen değer referansını döndürür.

FormObj (Out) Form nesnesini döndürür.

Örnek Application.CreateAppForm(1017, 0, 0, 0, 1, 2, 1, 0, MySelRef, MyFrm)

Ayrıca bkz. (ODFormArayüzü.doc in Unity \DOC directory for ID documentation)

DeleteStrings

Özellik Bildirimi Application.DeleteStrings(typ as Integer, ref as Integer)

Açıklama 'LG_001_01_PERDOC' tablosundan bir Memo nesnesinin dizgi (string)

değerini siler.

NOT ERP tarafındaki index değerleri ile karışmaması için 1001 ve üzeri bir index belirtilmelidir. Verilebilecek en yüksek değer 32767 dir.

Parametreler typ(in) Tablodaki kaydın türü

Ref(in) Tablodaki kaydın referansı

Örnek Application.DeleteStrings(121, 25)

Ayrıca bkz. WriteStringsCrd, ReadStringsCrd, WriteStrings, ReadStrings

ReadStrings

Özellik Bildirimi Application.ReadStrings(typ as Integer, ref as Integer, strObj

as Variant)

Açıklama 'LG_001_01_PERDOC' tablosundan bir Memo nesnesinin dizgi (string)

değerini okur.

NOT ERP tarafındaki index değerleri ile karışmaması için 1001 ve üzeri bir index belirtilmelidir. Verilebilecek en yüksek değer 32767 dir.

Parametreler typ(in) Tablodaki kaydın türü

Ref(in) Tablodaki kaydın referansı

StrObj(out) Tablodan okunan değeri döndürür.

Örnek Application.ReadStrings(121, 25, strObj)

Ayrıca bkz. WriteStringsCrd, DeleteStringsCrd, WriteStrings, DeleteStrings

DeleteStringsCrd

Özellik Bildirimi Application.DeleteStringsCRD(typ as Integer, ref as Integer)

Açıklama 'LG_001_FIRMDOC' tablosundan bir Memo nesnesinin dizgi (string)

değerini siler.

NOT ERP tarafındaki index değerleri ile karışmaması için 1001 ve üzeri bir index belirtilmelidir. Verilebilecek en yüksek değer 32767 dir.

Parametreler typ(in) Tablodaki kaydın türü

Ref(in) Tablodaki kaydın referansı

Örnek Application.DeleteStringsCrd(121, 25)

Ayrıca bkz. WriteStringsCrd, ReadStringsCrd, WriteStrings, ReadStrings

ReadStringsCrd

Özellik Bildirimi Application.ReadStringsCRD(typ as Integer, ref as Integer, strObj

as Variant)

Açıklama 'LG_001_FIRMDOC' tablosundan bir Memo nesnesinin dizgi (string)

Değerini okur.

NOT ERP tarafındaki index değerleri ile karışmaması için 1001 ve üzeri bir index belirtilmelidir. Verilebilecek en yüksek değer 32767 dir.

Parametreler typ(in) Tablodaki kaydın türü

Ref(in) Tablodaki kaydın referansı

StrObj(out) Tablodan okunan değeri döndürür.

Örnek Application.ReadStringsCrd(121, 25, strObj)

Ayrıca bkz. WriteStringsCrd, DeleteStringsCrd, WriteStrings, DeleteStrings

GetTableName

Özellik Bildirimi Application.GetTableName(tNr as Integer, fNr as Integer,

pNr as Integer) as String

Açıklama Uygulama tabloları için tablo adını döndürür.

Parametreler tNr(in) Uygulama tablo adı

fNr(in) Firma numarası

pNr(in) Dönem Numarası

(out) Tablo adı

Örnek MyAppTableName = Application.GetTableName(1, 1, 1)

Ayrıca bkz. GetCustTableName

GetCustTableName

Özellik Bildirimi Application.GetCustTableName(tNr as Integer, fNr as Integer,

pNr as Integer) as String

Açıklama Özel tablolar için tablo adını döndürür.

Parametreler tNr(in) Özel tablo numarası

fNr(in) Firma numarası

pNr(in) Dönem Numarası

(out) Tablo adı

Örnek MyCustTableName = Application.GetCustTableName(1, 1, 1)

Ayrıca bkz. GetTableName

GetTableAlias

Özellik Bildirimi Application.GetTableAlias (tNr as Integer) as String

Açıklama Tablonun takma adını (alias) döndürür.

Parametreler tNr(in) Özel tablo numarası

(out) Takma isim

Örnek MyCustTableName = Application.GetTableAlias(1)

Ayrıca bkz. GetTableName

IsWorkDay

Özellik Bildirimi Application.IsWorkDay (date as Long) as Integer

Açıklama Çalışma günü olup olmadığı bilgisini döndürür.

Parametreler date(in) Logo uzun tarih formatı

(out) boolean değeri

Örnek MyWorkDay = Application.IsWorkDay(131269918) ’<30.05.2003>

Ayrıca bkz.

WriteStrings

Özellik Bildirimi Application.WriteStrings(typ as Integer, ref as Integer, strObj

as Variant)

Açıklama 'LG_001_01_PERDOC' tablosuna bir Memo nesnesinin dizgi (string) değerini

yazar.

NOT ERP tarafındaki index değerleri ile karışmaması için 1001 ve üzeri bir index belirtilmelidir. Verilebilecek en yüksek değer 32767 dir.

Parametreler typ(in) Tablodaki kaydın türü

Ref(in) Tablodaki kaydın referansı

StrObj(in) Tabloya yazılacak değer

Örnek Application.WriteStrings(1, 25, strObj)

Ayrıca bkz. ReadStrings

WriteStringsCrd

Özellik Bildirimi Application.WriteStringsCrd(typ as Integer, ref as Integer, strObj

as Variant)

Açıklama 'LG_001_FIRMDOC' tablosuna bir Memo nesnesinin dizgi (string) değerini

yazmak için kullanılır.

NOT ERP tarafındaki index değerleri ile karışmaması için 1001 ve üzeri bir index belirtilmelidir. Verilebilecek en yüksek değer 32767 dir.

Parametreler typ(in) Tablodaki kaydın türü

Ref(in) Tablodaki kaydın referansı

StrObj(in) Tabloya yazılacak değer

Örnek Application.WriteStringsCrd(1, 25, strObj)

Ayrıca bkz. ReadStrings, WriteStrings, ReadStringsCrd, DeleteStringsCrd

Language

Özellik Bildirimi Application.Language

Açıklama Aktif olan dil.

Parametreler (Out) Dil indeksi (tamsayı / integer)

Değerler 0 - Öndeğer, 1 - Türkçe, 2 - İngilizce, 3 - Fransızca, 4 - Almanca, 5 - Rusça, 6 - İtalyanca, 7 - İspanyolca, 8 - Lehçe, 9 - Çekce 10 - Danimarkaca, 11 - Flemenkçe, 12 - Estonca, 13 - Fince, 14 - İbranice, 15 - Macarca, 16 - İzlandaca, 17 - Çince, 18 - Japonca, 19 - Korece, 20 - Norveççe, 21 - Portakizce, 22 - İsveççe, 23 - Yunanca, 24 - Arapça, 25 - Romence, 26 - Slovence, 27 - Hırvatça, 28 - Bulgarca, 29 - Azerice

Örnek MyUsedLanguage = Application.Language

Ayrıca bkz.

DispatchBilling

Özellik Bildirimi Application.DispatchBilling(Ref as Integer, FicheNo as String, Date as Integer, DoCode as String, SpeCode as String, CyphCode as String, genExp1 as String, genExp2 as String, genExp3 as String, genExp4 as String, chkRight as Boolean,

[invRef As Long],

[opTrans As Boolean = True],

[refs As String]) as Boolean

Açıklama İrsaliye Faturalama (İraliyenin faturaya aktarılması)

Parametreler Ref (in), İrsaliye mantıksal referansı

FicheNo (in), Yeni fatura numarası

Date (in), Fatura tarihi (logo tamsayı tarih formatı)

DoCode (in), Do kodu

SpeCode (in), Special kodu

CyphCode (in), Cyph kodu

genExp1 (in), Yeni faturadaki 1. Açıklama satırı

genExp2 (in), Yeni faturadaki 2. Açıklama satırı

genExp3 (in), Yeni faturadaki 3. Açıklama satırı

genExp4 (in), Yeni faturadaki 4. Açıklama satırı

chkRight (in) Yetki kontrolü yapılsın/yapılmasın (1/0)

(out) Parametre başarılı veya başarısız (true - false)

Örnek if not Application.DispatchBilling(666,"MyInvoice", 131269918, "", "", "", "", "", "", "", True)

eNo = Application.GetLastError()

eStr = Application.GetLastErrorString()

end if

Ayrıca bkz.

GetFirms

Özellik Bildirimi Application.GetFirms ()

Açıklama Firma bilgisini döndürür.

Parametreler (out) Firma dizisi (array)

Örnek arr = Application.GetFirms()

for i = 0 to arr.Size-1

warn(arr[i].Name)

j = arr[i].Nr

warn(j)

Ayrıca bkz.

GetFirmWarehouses

Özellik Bildirimi Application.GetFirmWarehouses (firmNr as Integer, divNr as Integer, factNr as Integer) as Variant

Açıklama Ambar bilgisini döndürür.

Parametreler firmNr (in) Firma numarası

divNr (in) İşyeri numarası

factNr (in) Fabrika numarası

(out) Firma ambar dizisi (array)

Örnek

arr = Application.GetFirmWarehouses(1, 0, 0)
for i = 0 to arr.Size-1
warn(arr[i].Name)
j = arr[i].Nr
warn(j)
next

Ayrıca bkz.

GetFirmDivisions

Özellik Bildirimi Application.GetFirmDivisions(firmNr as Integer) as Variant

Açıklama İşyeri bilgisini döndürür.

Parametreler firmNr (in) Firma numarası

(out) İşyerleri dizisi (array)

Örnek

arr = Application.GetFirm Divisions (1)
for i = 0 to arr.Size-1
warn(arr[i].Name)
warn(arr[i].SecurityNr)
j = arr[i].Nr
warn(j)
next

Ayrıca bkz.

GetFirmDepartments

Özellik Bildirimi Application.GetFirmDepartments (firmNr as Integer) as Variant

Açıklama Bölüm bilgisini döndürür.

Parametreler firmNr (in) Firma numarası

(out) Bölümler dizisi (array)

Örnek

arr = Application.GetFirmDepartments(1)
for i = 0 to arr.Size-1
warn(arr[i].Name)
j = arr[i].Nr
warn(j)
next

Ayrıca bkz.

GetFirmFactories

Özellik Bildirimi Application.GetFirmFactories (firmNr as Integer, divNr as Integer) as Variant

Açıklama Fabrika bilgisini döndürür.

Parametreler firmNr (in) Firma numarası

divNr (in) İşyeri numarası

(out) Fabrika dizisi (array)

Örnek

arr = Application.GetFirmFactories(1, 0)
for i = 0 to arr.Size-1
warn(arr[i].Name)
j = arr[i].Nr
warn(j)
next

Ayrıca bkz.

GetCustomFicheNames

Özellik Bildirimi Application.GetCustomFicheNames (ficheType as Integer) as Variant

Açıklama Özel fiş adı ve numarasını döndürür.

Parametreler ficheType (in) Fiş tür no

0 – Özel Malzeme Fişi

1 – Özel Satış İrsaliyesi

2 – Özel Satınalma İrsaliyesi

(out) Fiş dizisi (array)

Örnek

arr = Application.GetCustomFicheNames(1)
for i = 0 to arr.Size-1
warn(arr[i].Name)
j = arr[i].Nr
warn(j)
next

Ayrıca bkz.

GetUsers

Özellik Bildirimi Application.GetUsers () as Variant

Açıklama Kullanıcı bilgisini (ad, no, e-mail, şifre) döndürür.

Parametreler (out) Kullanıcı bilgileri dizisi (array)

Örnek

arr = Application.GetUsers()
for i = 0 to arr.Size-1
warn(arr[i].Name)
j = arr[i].Nr
warn(j)
warn(arr[i].pwd)
next

Ayrıca bkz.

GetUserGroups

Özellik Bildirimi Application.GetUserGroups (usrID as Integer) as Variant

Açıklama Kullanıcı grup bilgilerini döndürür.

Parametreler usrID (in) Kullanıcı ID tamsayısı (integer)

(out) Kullanıcı Group ID

Örnek

arr = Application.GetUserGroups(UserID)
for i = 0 to arr.Size-1
warn(arr[i].Name)
j = arr[i].Nr
warn(j)
next

Ayrıca bkz.

GetUserRole

Özellik Bildirimi Application.GetUserRole () as variant array

Açıklama Aktif kullanıcı rol bilgisini döndürür.

Parametreler (out) Kullanıcı rol bilgisi

Örnek

role = Application.GetUserRole()
role.Name
role.Nr

Ayrıca bkz.

UserHasRight

Özellik Bildirimi Application.UserHasRight (rightNr as Integer) as Integer

Açıklama Kullanıcı hak bilgisini döndürür.

Parametreler rightNr(in) Yetki numarası

(out) Yetkisi var veya yetkisi yok bilgisi (true – false)

Örnek

chkMyRight = Application.UserHasRight(10)

Ayrıca bkz.

GetDBConnInfo

Özellik Bildirimi Application.GetDBConnInfo( ) as Variant

Açıklama ERP tarafındaki veritabanı bağlantı bilgilerini döndürür.

Parametreler (out) Kullanıcı bilgileri dizisi (array)

Örnek

rec = application.GetDBConnInfo()
warn(rec.userName)
warn(rec.passWord)
warn(rec.serverName)
warn(rec.DBType)
warn(rec.DBName)

Ayrıca bkz.

GetAppPath

Özellik Bildirimi Application.GetAppPath( ) as String

Açıklama ERP tarafının uygulama dizin bilgisi.

Parametreler (out) Uygulama dizini

Örnek

rec = application.GetAppPath()
warn(rec)

Ayrıca bkz.

PrepareFormLayout

Özellik Bildirimi Application.PrepareFormLayout(docType as Integer, dvcType as Integer,

DocName as String, recRef as Integer)

Açıklama Uygulama raporu için form taslağı oluşturur.

Parametreler docType(in) Belge türü (bkz. Appendix)

dvcType(in) Çıktı türü

SCREEN = 1

PRINTER = 2

ASCIISEP = 3

EXCEL = 4

ACCESS = 5

HTML = 6

RTF = 7

docName(in) Yeni belge adı

recRef(in) Kaydın referansı

Örnek

Application.PrepareFormLayout(30,1,"MyDocument",2)

Ayrıca bkz.

GetCustomFiches

Özellik Bildirimi Application.GetCustomFiches(fType as Integer) as Variant

Açıklama Uyarlanan fiş bilgilerini alır.

Parametreler fType(in) Fiş türü

0 – Özel Malzeme Fişi

1 – Özel Satış İrsaliyesi

2 – Özel Satınalma İrsaliyesi

(out) Kayıt dizisi (array)

Örnek

arr = Application.GetCustomFiches(1)
for i = 0 to arr.Size-1
    warn(arr[i].Name)
    j = arr[i].Nr
    warn(j)
next

AddRemoveRecordLock

Özellik Bildirimi Application. AddRemoveRecordLock( opType as Integer, lType as Integer, recType as Integer, recref as Integer) as Integer

Açıklama İşaretlerin kaldırılması işleminden sonra kilitlenen kaydı açar.

Parametreler opType(in) Operasyon türü

1 – Kilitle

2 – Kilidi kaldır

lType(in) Lokasyon türü

1 – Logo tablo kayıtları

2 – Özel tablo kayıtları

recType(in) Kayıt türü

1 – Sipariş fişi (for lType = 1)

2 – İrsaliye (for lType = 1)

3 – Fatura (for lType = 1)

x – Tablo No (for lType = 2)

recRef (in) Kayıt Referansı (logicalref / mantıksal ref.)

(out) İşlem durumu (1 = ok, 0 = false)

Örnek

Logicalref = 23, fiche type = invoice, operation = lock
Application.AddRemoveRecordLock(1, 2, 3, 23)
Custom table no = 32 , Logicalref = 87, operation = unlock
Application.AddRemoveRecordLock(2, 2, 32, 87)

Logo Objects - Temelleri

Logo Objects - Başlangıç

Logo Objects ile aktarım örneği

Logo Objects - Kütüphanesi

Telif Hakkı Kullanım Koşulları Gizlilik