Posts Tagged ‘ Azure DevOps

Muhasebe günlüklerinden mahsup hesap boyutunun hesap boyutundan gelmesi nasıl engellenir?

Bu yazıda Türkiye muhasebe ekiplerince mutlaka istenen bir geliştirmeyi D365 te nasıl yaptık anlatmaya çalışacağım. Talep aslında çok basit belki de parametrik olması gerekiyor. Şöyle bir örnek olsun. Bir günlük açtınız ve hesap tipi banka seçip Bnk0001 seçtiniz. Otomatik olarak bu bankanın boyutları hesap boyutlarına atandı. Mahsup tarafa gelip orada da tipi banka ve hesabı Bnk0002 seçtiniz. Bu durumda mahsup boyutunu hesap üzerinden alıyor Mahsup banka boyutlarını getirmiyor. Talep mahsup tarafta ne seçersem onun boyutları gelsin hesaptan direk almasın.

Ax2012’de bu çok basit bir işlemdi burayı dolduran kısmı bulup değiştirmek yeterliydi ancak D365 te işler biraz değişti.

Önce Ax2012’de ne yapıyorduk ona bakalım. LedgerJournalEngine sınıfında initOffsetDefaultDimensionServer metodunun boyadığım satırı kapatmak boyutun hesap boyutundan alınmasını engelliyordu. Tek satır işlemle aşağı yukarı istediğimiz oluyor. Ancak D365’te buna müdahale şansımız yok. Bu metot private ve sınıfta AplicationSuit’te dolayısıyla bize değiştirme imkânı vermiyor.

Resim-1

Bu talebin nasıl yapılacağını incelerken initOffsetDefaultDimension metodunun Extension için uygun olduğunu gördüm.

Resim-2

İşimi halledebilmek için Bir Extension sınıfı oluşturup iki metot ekledim. Birincisi initOffsetDefaultDimension metodunun Extension ile öncesi ve sonrasına kod yazma imkânı veren hali. İkincisi ise mahsup hesaba göre boyutu getiren, standarttan kopyaladığım ve içeriğini mahsup boyuta göre düzenlediğim boyut bulma metodu.

Resim-3

Derleyip çalıştırdığımızda test edebilirsiniz. Aşağıdaki gibi bir günlükte Mahsup banka boyutunu hesap banka boyutundan farklı gelmesi gerekiyor.

Resim-4

Financial dimensions’a tıklayarak mahsup boyutları açabilirsiniz.

Resim-5

Bu yazıda Extension kullanımına örnek olacak bir talebi nasıl yaptığımı anlatmaya çalıştım. Eskiye nazaran işler biraz daha zor görünmekle birlikte genelde çözümsüz değil. Sadece daha çok zaman alıyor ama getirileri düşünüldüğünde kesinlikle buna değer.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, DefaultAccount, LedgerDimension, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Segmented Entry, Power Automate, Power Apss, Power Virtual Agents, Dynamics 365 nedir, Dynamics 365 ERP, Dynamics 365 CRM

Dynamics 365 Finance and Operations LedgerDimension ve Segmented Entry nasıl eklenir?

Bu yazıda Dynamics 365 Finance and Operations içinde bir tabloya LedgerDimension nasıl eklenir ve bu alanı formda Segmented entry control ile nasıl kullanıcıya kullandırabiliriz anlatmaya çalışacağım.

LedgerDimension aslında DimensionAttributeValueCombination kaydıdır. LedgerDimension MainAccount ve DefaultDimension’ın bileşimidir.

Öncelikle Tabloya LedgerDimensionAccount EDT sini kullanarak bir alan ekleyelim. Eğer sürükle bırak ile eklerseniz otomatik ilişkiyi oluşturacak. Yoksa elle eklemeniz gerekir.

Resim-1

Sonrasında forma gelip eklediğimiz alanı tasarımda istediğimiz bir yere sürükleyip bırakıyoruz. Segmented Entry oluşuyor. Özelliklerinde resimde görünen tanımları yapmalıyız. Özellikle Controller Class çok önemli.

Resim-2

Derleyip çalıştırdığımızda formda alanımızı göreceğiz. DefaultAccount ile aradaki farkı görebilirsiniz. Sadece Main Account değil boyutlarda geliyor ve bir kombinasyon oluşturuluyor.

Resim-3

Oluşan verileri Sql üzerinden incelediğimizde aradaki fark çok net bir şekilde ortaya çıkıyor.

Resim-4

Bu yazıda LedgerDimension nedir ve nasıl eklenir anlatmaya çalıştım. Sonraki yazılarımda bunları kodda nasıl kullanıp birbirlerine çeviriyoruz anlatmaya devam edeceğim.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, DefaultAccount, LedgerDimension, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Segmented Entry, Power Automate, Power Apss, Power Virtual Agents, Dynamics 365 nedir, Dynamics 365 ERP, Dynamics 365 CRM

Dynamics 365 Finance and Operations Admin User Provisioning?

Bu yazıda bir ISV paketi yüklemek isterken karşılaştığım hatayı nasıl çözdüm anlatmaya çalışacağım. Öncelikle şöyle bir durum oluyor. Ben bir müşterinin projesine davet ediliyorum.Sonrasında projede bir çok işlem yapabiliyorum. Bunlardan biri de Dev ortamları kurma. Buna izin veriyor ama kurulumu Dmr hesabıyla yaptığımda otomatik olarak beni admin yapıp benim kullanıcının tanentına bağlıyor. Halbuki benim beklediğim müşteri ortamından yaptığım için müşterinin bilgilerini alması ancak böyle yapmıyor. ISV lisansı müşteri bilgileriyle oluşturduğu için siz dev ortamına lisansı yükleyemiyorsunuz. Bunun için yeniden kurulum yapmadan nasıl ilerleyebilirsiniz şimdi ona bakalım.

Dev ortamı bilgileri bu şekilde.

Resim-1

Bu ortamın içine girip Resim-2 de görünen şekilde AdminUserProvisioning i açıyoruz. Burada mail adresine müşteri maili yazıyoruz global admin olması için Submit diyoruz.

Resim-2

Hata olabilir başarılı olduğunu görene kadar denemeye devam edin. IIS restart yapıp deneyebilirsiniz.

Resim-3

Bu işlemden sonra dev ortamının admin hesabı ve tanent değişecek. Böylelikle lisans yüklemede sorun yaşamayacaksınız.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, AdminUserProvisioning, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365

Dynamics 365 Finance and Operations ortamları LCS’a nasıl bağlanır?

Bu yazıda Dynamics 365 Finance and Operations test ve canlı ortamlarının LCS projesine nasıl bağlanacağını anlatacağım. Bu bağlantıyı sistemde birkaç yerde kullanıyor. En önemlilerinden biri LCS’e yüklediğiniz Power BI raporlarınızın ortamlara alınması.

Öncelikle System parameters formunu açıyoruz.

Resim-1

Help sekmesine geliyoruz. Click here to connect to Lifecycle Services diyoruz.

Resim-2

Eğer başka bir sekmede LCS’e giriş yaptıysanız direk bağlanacaktır. Aksi durumda giriş yapmanız gerekebilir. Bu ekranı görürseniz bağlantı kurdunuz demektir.

Resim-3

LCS’te birden çok projeniz olabilir. İstediğiniz projeyi seçip bağlantıyı kurabilirsiniz.

Resim-4

Bağlantı kurulunca LCS’ten kütüphaneleri görebilirsiniz. Bu aşamadan sonra işlem tamamlanmış oldu.

Resim-5

Bu yazıda Test ve Canlı ortamlardan LCS’e nasıl bağlantı kurulur anlatmaya çalıştım.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365

Dynamics 365 Finance and Operations Aggregate measurements ve Aggregate dimensions nedir?

Bu yazıda Dynamics 365 Finance and Operations raporlamasında en temel özelliklerden biri olan Aggregate measurements ve Aggregate dimensions nedir ne nasıl oluşturulur anlatmaya çalışacağım. Eski versiyonda kullandığımız küp nesnelerinin yeni adı yapısı diyebiliriz. Eğer EntitiyStore’a yeni bir Measure eklemek istiyorsanız bu nesneleri oluşturmanız gerekiyor. Bir tane çok basit bir örnek oluşturup nasıl kullanıldığını görelim.

Öncelikle Aggregate dimensions oluşturuyoruz.

Resim-1

FDActivityTable tablo olarak seçiyoruz. Attribute olarak ActivityId’yi ekliyorum. Bu tanımlar şimdilik yeterli.

Resim-2

Şimdi yeni bir Aggregate measurement oluşturuyoruz. Yine FDActivityTable’ı seçiyoruz. Dimension için yukarıda oluşturduğumuz nesneyi sürükleyip bırakıyoruz. Dimension kısmı veriyi parçalara bölmek istediğimiz alanları ifade eder. Bir tip veya tarih olabilir. Measures ise genelde bir hesaplama alanı olur. Toplam adet tutar gibi. Bu tanımları bitirince bir derleme yapmak gerekiyor.

Resim-3

Derleme sonrası uygulamaya girip Entitiy Store’u açıyoruz.

Resim-4

Oluşturduğumuz yeni Measure burada listelenecek. Yenilenme sıklığını belirleyebilirsiniz. Refresh ile direk yenilemeyi tetikleyebilirsiniz. Log’a bakmak lazım Refresh çalışmadığı sürece AxDW’de veri oluşmayacaktır.

Resim-5

Bu yazıda Entity Store’a nasıl yeni bir Measure eklenir anlatmaya çalıştım. Bura üzerinden nasıl rapor oluşturulur avantajları nedir diğer yazılarımda anlatmaya devam edeceğim.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, Entity Store, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Aggregate measurements, Aggregate dimensions, Power Apss, Power Virtual Agents

Dynamics 365 Finance and Operations Test ortamı Canlı veri tabanıyla nasıl ezilir?

Bu yazıda Dynamics 365 Finance and Operations Sandbox ortamını canlı veri ile nasıl ezeriz adım adım anlatacağım.

LCS’e girip projemizi acıyoruz. Sandbox detaylarını tıklıyoruz.

Resim-1

Maintain->Move database diyoruz.

Resim-2

Farklı seçenekler karşımıza çıkıyor.

Export database: Sandbox ortamının verisini dışarı aktarır.

Import database: bacpac formatında bir db’yi içeri aktarır.

Point-im-time restore Prod to Sandbox: Canlı ortamdan yedeklenmiş veri tabanını teste ezer. Biz bu seçenek ile devam edeceğiz.

Point-in-time restore: Test ortamının önceki yedeklerinden ezme yapar.

Refresh database: Başka bir sandbox ortamından ezme yapar.

Resim-3

Kaynak ve hedefe dikkat etmek lazım. Zamanı ayarladıktan sonra kabul edebilirsiniz.

Resim-4

Bir onay ekranı çıkacak.

Resim-5

24 saat diyor ama genelde benim gördüğüm daha kısa sürede bitiyor.

Resim-6

İşlem başlayınca durum Servicing’e geçiyor. Bitmesini beklemelisiniz.

Resim-7

Bu aşamalardan sonra işlem bitmiş oluyor. Eski versiyonlara göre çok daha kolay bir işlem oluyor.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Segmented Entry, Power Automate, Power Apss, Power Virtual Agents, Dynamics 365 nedir, Dynamics 365 ERP, Dynamics 365 CRM

Dynamics 365 Finance and Operations Form Lookup Nasıl Yapılır?

Bu yazıda Dynamics 365 Finance and Operations içinde bir formun nasıl lookup olarak kullanılabileceğini anlatacağım. Öncelikle neden lookup olarak forma ihtiyaç duyarız ona bakalım. Kodla yaptığımız lookuplarda birkaç kısıntımız var. Birincisi tasarım. Form olduğunda tasarım için çok esnek bir yapımız oluyor ama diğerinde böyle bir imkânı yok. Veri kaynağı yönetimi ve parametrik olarak farklı çalışma özellikleri yine form olunca mevcut. Gelelim nasıl yapıldığına.

Öncelikle yeni bir form oluşturuyoruz. Lookup- Basic desenini uyguluyoruz.

Resim-1

Veri kaynağını ekliyoruz. Tasarıma bir Grid ekleyip gerekli alanları sürükleyip bırakıyoruz.

Resim-2

Run metoduna hangi alanı geri döndürmek istiyorsak onu ekliyoruz. Burada direk girdde oluşturduğumuz nesnenin adını kullanmak gerekiyor. Bu yüzden AutoDecleration yes olmalı.

Resim-3

Form ile işimiz bitti. Şimdi İlgili EDT de Form help kısmından formumuzu seçiyoruz. Artık bu EDT’nin kullanıldığı yerlerde otomatik olarak bizim form lookup olarak açılacak.

Resim-4

Deneme için bir tabloya alanı açıyoruz.

Resim-5

Forma alanı ekleyip çalıştırıyoruz.

Resim-6

Son olarak formda oluşturduğumuz lookupı görebiliriz.

Resim-7

Bu yazıda lookup olarak bir form nasıl yaparız anlatmaya çalıştım. Lookup yapmanın çok fazla yolu var hangisi hangi durumda kullanılmalı dikkat etmek lazım.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, Lookup, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Segmented Entry, Power Automate, Power Apss, Power Virtual Agents, Dynamics 365 nedir, Dynamics 365 ERP, Dynamics 365 CRM

Depoda toplanan ürünün yerine geri koyulmasını ve sevkiyatının iptal edilmesini kodla nasıl yaparız?

Bu yazıda Dynamics 365 Finance and Operations içinde depo yönetimi modülünde toplanan bir ürünün kodla yerine koyulması ve sevkiyatın iptal edilmesinin nasıl yapılacağını anlatacağım.

Aslında bu işlemi ekran üzerinden tek tek yapabiliyoruz.  Load Line formunu açıp Reduce picked quantity’ye tıklıyoruz.

Resim-1

Açılan formda miktarı ayarlayıp Ok dediğimizde aslında bu işlemi yapmış oluyoruz.

Resim-2

Benim burada yapacağım bu işlemi toplu yapmak için bir kod yamak olacak. Bir sebepten otomatik toplanan bazı siparişlerin iptali gerektiğinde elle tek tek yapmak çok uzun süreceğinden böyle bir koda ihtiyaç oldu. Öncelikle Ax2012’de bu işlem için Güven arkadaşım şu makaleyi yazmış. Benim işimi tam çözmüyor. Ben bir dosyadan beri okuyup D365 te bu işlemi yapmak istiyorum.

Öncelikle WhsUnShip sınıfından bir Extension sınıfı oluşturmam gerekti.  BuildTmpTable aslında Ax2012 olan bir metottu ama D365 te kullanamıyoruz.

[ExtensionOf(classStr(WhsUnShip))]

final class WhsUnShip_Extension

{

public WHSTmpLoadLineInventory dmrBuildTmpTable(WHSLoadLine _loadLine = loadLine)

{

WHSTmpLoadLineInventory     tmpLoadLineInv;

WHSWorkLine                 workLine;

WHSWorkLine                 putWorkLine;

WHSWorkTable                workTable;

WHSDimTracking              dimTracking;

InventDim                   inventDim;

Qty                         closedContainerQty;

InventDim                   inventDimId;

SalesLine                   salesLine;

InventTransferLine          transferLine;

InventDim                   loadLineInventDim;

boolean                     putIsPackingStation;

WHSWorkId                   lastWHSWorkId;

WMSLocation                 wmsLocation;

boolean                     hasDimTracking;

// Set LoadLine if specified.

loadLine = _loadLine;

loadLineInventDim = loadLine.inventDim();

switch (loadLine.InventTransType)

{

case InventTransType::Sales:

salesLine = loadLine.getOrderCommonFromLoadLine() as SalesLine;

break;

case InventTransType::TransferOrderShip:

transferLine = loadLine.getOrderCommonFromLoadLine() as InventTransferLine;

break;

}

while select InventQtyWork, ItemId, LineNum, WorkId, ContainerId from workLine

order by workLine.WorkId

where workLine.LoadLineRefRecId  == loadLine.RecId &&

workLine.WorkStatus        == WHSWorkStatus::Closed

join WorkId, TargetLicensePlateId, InventLocationId from workTable

where workTable.WorkId       == workLine.WorkId &&

workTable.WorkStatus   == WHSWorkStatus::Closed

{

if (lastWHSWorkId != workLine.WorkId)

{

select firstonly wmsLocationId from putWorkLine

order by putWorkLine.LineNum desc

where putWorkLine.WorkId     == workTable.WorkId        &&

putWorkLine.WorkStatus == WHSWorkStatus::Closed   &&

putWorkLine.WorkType   == WHSWorkType::Put

join LocProfileId from wmsLocation

where wmsLocation.wMSLocationId == putWorkLine.wmsLocationId &&

wmsLocation.InventLocationId == workTable.InventLocationId;

putIsPackingStation = wmsLocation.LocProfileId == parameters.PackingLocType;

lastWHSWorkId = workLine.WorkId;

}

hasDimTracking = false;

// If the workLine uses dim tracking we must use those values.

while select InventDimId, Qty from dimTracking

where dimTracking.WorkId    == workLine.WorkId

&&    dimTracking.LineNum   == workLine.LineNum

{

hasDimTracking = true;

inventDim = InventDim::find(dimTracking.InventDimId);

inventDim.wmsLocationId = putWorkLine.wmsLocationId;

if (WMSLocation::find(inventDim.wmsLocationId, inventDim.InventLocationId).whsLocationIsLPControlled())

{

inventDim.LicensePlateId = workTable.TargetLicensePlateId;

}

inventDim = InventDim::findOrCreate(inventDim);

// If put location is a packing station, then we need to look for closed containers that may have moved inventory.

if (putIsPackingStation)

{

InventDimParm       inventDimParm;

InventDim           joinInventDim;

InventDim           inventDimMethod;

WHSContainerLine    containerLine;

WHSContainerTable   containerTable;

inventDimParm.initFromInventDim(inventDim);

// Loop over container lines for closed containers

while select containerLine

where containerLine.LoadLine    == loadLine.RecId

join InventDimId, ContainerId from containerTable

where containerTable.ContainerId        == containerLine.ContainerId

&&    containerTable.ContainerStatus    == WHSContainerStatus::Closed

#InventDimExistsJoin(containerLine.inventDimId, joinInventDim, inventDim, inventDimParm)

{

tmpLoadLineInv.InventQty = InventTableModule::unitConvert(containerLine.ItemId, ModuleInventPurchSales::Invent, containerLine.UnitId, containerLine.Qty);

inventDimMethod = containerLine.mergedClosedInventDim();

tmpLoadLineInv.InventDimId = inventDimMethod.InventDimId;

tmpLoadLineInv.RefRecId = loadLine.RecId;

tmpLoadLineInv.ContainerId = containerTable.ContainerId;

tmpLoadLineInv.insert();

closedContainerQty += tmpLoadLineInv.InventQty;

}

}

if (dimTracking.Qty > closedContainerQty)

{

tmpLoadLineInv.clear();

tmpLoadLineInv.InventQty = dimTracking.Qty – closedContainerQty;

tmpLoadLineInv.InventDimId = inventDim.InventDimId;

tmpLoadLineInv.RefRecId = loadLine.RecId;

tmpLoadLineInv.ContainerId = workLine.ContainerId;

tmpLoadLineInv.insert();

}

}

if (!hasDimTracking)

{

inventDim.clear();

inventDim.initFromInventDim(loadLineInventDim);

inventDim.wmsLocationId = putWorkLine.wmsLocationId;

if (WMSLocation::find(inventDim.wmsLocationId, inventDim.InventLocationId).whsLocationIsLPControlled())

{

inventDim.LicensePlateId = workTable.TargetLicensePlateId;

}

inventDim = InventDim::findOrCreate(inventDim);

// If put location is a packing station, then we need to look for closed containers that may have moved inventory.

if (putIsPackingStation)

{

InventDimParm       inventDimParm;

InventDim           joinInventDim;

InventDim           inventDimMethod;

WHSContainerLine    containerLine;

WHSContainerTable   containerTable;

inventDimParm.initFromInventDim(inventDim);

// Loop over container lines for closed containers

while select containerLine

where containerLine.LoadLine    == loadLine.RecId

join InventDimId, ContainerId from containerTable

where containerTable.ContainerId        == containerLine.ContainerId

&&    containerTable.ContainerStatus    == WHSContainerStatus::Closed

#InventDimExistsJoin(containerLine.inventDimId, joinInventDim, inventDim, inventDimParm)

{

tmpLoadLineInv.InventQty = InventTableModule::unitConvert(containerLine.ItemId, ModuleInventPurchSales::Invent, containerLine.UnitId, containerLine.Qty);

inventDimMethod = containerLine.mergedClosedInventDim();

tmpLoadLineInv.InventDimId = inventDimMethod.InventDimId;

tmpLoadLineInv.RefRecId = loadLine.RecId;

tmpLoadLineInv.ContainerId = containerTable.ContainerId;

tmpLoadLineInv.insert();

closedContainerQty += tmpLoadLineInv.InventQty;

}

}

if (workLine.InventQtyWork > closedContainerQty)

{

tmpLoadLineInv.clear();

tmpLoadLineInv.InventQty = workLine.InventQtyWork – closedContainerQty;

tmpLoadLineInv.InventDimId = inventDim.InventDimId;

tmpLoadLineInv.RefRecId = loadLine.RecId;

tmpLoadLineInv.ContainerId = workLine.ContainerId;

tmpLoadLineInv.insert();

}

}

}

return tmpLoadLineInv;

}

public WHSLoadLine parmLoadLine(WHSLoadLine _loadLine = loadLine)

{

loadLine = _loadLine;

return loadLine;

}

}

Sonrasında asıl işi yapan sınıfı yazdım. Burada bir csv dosyasından veri okuyup ilgili kaydı bulup iptal işlemini yapan kod var.

class DmrUnsipLoadCsv

{

public static void main(Args _args)

{

DmrUnsipLoadCsv DmrUnsipLoadCsv;

DmrUnsipLoadCsv = new DmrUnsipLoadCsv();

DmrUnsipLoadCsv.run();

}

void run()

{

whsworkid       whsworkid;

container   rec;

Array                               fileLines;

Counter                             counter = 0;

AsciiStreamIo                       file;

InventTable                         inventTable;

FileUploadTemporaryStorageResult    fileUpload;

#OCCRetryCount

//conPeek(rec, 3);

try

{

fileUpload  = File::GetFileFromUser() as FileUploadTemporaryStorageResult;

file        = AsciiStreamIo::constructForRead(fileUpload.openResult());

if (file)

{

if (file.status())

{

throw error(“@SYS52680″);

}

file.inFieldDelimiter(“;”);

file.inRecordDelimiter(“\r\n”);

}

while (!file.status())

{

counter++;

rec = file.read();

if (conLen(rec))

{

whsworkid = conPeek(rec, 1);

ttsbegin;

this.unship(whsworkid);

ttscommit;

//info(strFmt(“%1″,conPeek(rec, 1)));

}            }

// info(“Aktarım tamamlandı.”);

}

catch (Exception::Deadlock)

{

retry;

}

catch (Exception::UpdateConflict)

{

if (appl.ttsLevel() == 0)

{

if (xSession::currentRetryCount() >= #RetryNum)

{

throw Exception::UpdateConflictNotRecovered;

}

else

{

retry;

}            }

else

{

throw Exception::UpdateConflict;

}

}

}

void unship(whsworkid _whsworkid )

{

WHSWorkLine             WHSWorkLine;

WHSWorkLine             WHSWorkLineLocation;

WHSUnShip               WHSUnShip;

WHSTmpLoadLineInventory tmpLoadLineInv;

WHSLoadLine             WHSLoadLine;

;

while select WHSWorkLine

group by LoadLineRefRecId

where WHSWorkLine.WorkId == _whsworkid

&&    WHSWorkLine.WorkType == WHSWorkType::Pick

&&    WHSWorkLine.WorkStatus == WHSWorkStatus::Closed

{

WHSLoadLine = WHSLoadLine::findbyRecId(WHSWorkLine.LoadLineRefRecId);

WHSUnShip = null;

WHSUnShip = new WHSUnShip();

tmpLoadLineInv = null;

tmpLoadLineInv = WHSUnShip.dmrbuildTmpTable(WHSLoadLine);

while select tmpLoadLineInv

{

select WHSWorkLineLocation

where WHSWorkLineLocation.LoadLineRefRecId == WHSLoadLine.RecId;

WHSUnShip.parmMoveToLocation(WMSLocation::find(WHSWorkLineLocation.WMSLocationId,InventDim::find(WHSWorkLineLocation.inventDimId).inventLocationId));

WHSUnShip.parmDecrementLoadLine(true);

WHSUnShip.unShip(

InventDim::find(tmpLoadLineInv.InventDimId),

tmpLoadLineInv.InventQty, // qty to reduce

WHSLoadLine,

tmpLoadLineInv.ContainerId,

tmpLoadLineInv.InventQty);

}

//info(_whsworkid);

}

info(_whsworkid);

}

}

Bu kodları kullanacaksanız mutlaka canlıdan önce bir ortamda test etmelisiniz. Her kurulum farklı olabilir verilerinizde sorun oluşturma ihtimali olabilir dikkatli olmak lazım. Biz baya test ettik sonunda işimizi gördüğünü düşündük ve canlı ortamda çalıştırdık. Umarım sizin de işinize yarar.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, WmsUnShip, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Segmented Entry, Power Automate, Power Apss, Power Virtual Agents, Dynamics 365 nedir, Dynamics 365 ERP, Dynamics 365 CRM

Ax2012 Clinet Crash Sorunu?

Bu yazıda bir müşterimde karşılaştığım Client kapanma sorununu nasıl çözdüğümü anlatacağım. Ax2012 R3 te olan bu ortamda birdenbire bazı clientlar kapanmaya başladı. Bazen AOS ta kapanıyordu. Dump alıp baktığımızda Heap corruption hatası vardı ama kodsal olarak bir yere işaret etmiyordu. Uzun incelemeler sonunda belli bir tablo tespit ettim. ProjProposalJour bu tabloya bazı yerlerden dokununca patlıyor bazı yerlerden dokununca patlamıyordu. Bu da sorunun tespitini çok zorlaştırdı çünkü ne hata veriyor ne de bir bilgi gösteriyordu.  Temel yapılması gerekenleri yaptım. Full derleme senkronizasyon CIL gibi ama buralarda da hatalar vardı. Özellikle SQL üzerinden oluşturulan indexler sebebiyle senkronizasyon baya sorunlu hala gelmişti.  Tek tek çözmeye çalıştım.  Bu problemleri çözünce müşterinin çalışmadığı bir saate ProjProposalJour patlatmayan yerden çoğaltım. Patlayan AOS’u restart edip çoğalttığım nesnede de patladığını gördüm. Bu durumda kesin nesnede bir sorun var diye düşündüm ve tek tek alt nesneleri silmeye başladım uzun uğraşlar sonunda patlatan şeyin relation’lar olduğunu tespit ettim ama bu çok mantıklı değildi relation neden patlatsın. Sonra tekrar full senkronizasyon başlattım. Sonunda aşağıdaki uyarıyı gördüm.

The SQL database has issued an error.
Info Synchronize database SQL error description: [Microsoft][SQL Server Native Client 11.0][SQL Server]The index ‘I_592INDEX1FGD’ on table ‘DBO.PROJINVOICEJOUR’ has 95 columns in the key list. The maximum limit for index key column list is 16.
Info Synchronize database SQL statement: CREATE   INDEX I_592INDEX1FGD’ ON “DBO”.PROJINVOICEJOUR (PARTITION,DATAAREAID,DELIVERYNAME,PROJGROUPID,ORDERACCOUNT,INVOICEACCOUNT,INVOICEDATE,DUEDATE,CASHDISC,CASHDISCDATE,COSTVALUE,SUMLINEDISC,SALESORDERBALANCE,ENDDISC,INVOICEAMOUNT,CURRENCYID,EXCHRATE,PROJINVOICEID,LEDGERVOUCHER,ONACCOUNTAMOUNT,TAXPRINTONINVOICE,ENTERPRISENUMBER,DLVTERM,DLVMODE,PAYMENT,CASHDISCCODE,INVOICEROUNDOFF,CASHDISCPERCENT,TAXGROUPID,TAXSPECIFYTOTAL,TAXSPECIFYBYLINE,PAYMENTSCHED,SUMTAX,PROPOSALID,POSTINGPROFILE,PROJINVOICEPROJID,PARMID,INTRASTATDISPATCHID,LISTCODEID,PROJINVOICETYPE,TRIANGULATION,EXCHRATESECONDARY,PORT,WEIGHT,VOLUME,QTY,VATNUM,LANGUAGEID,PAYMDAYID,EUSALESLIST,SUMMARKUP,NUMBERSEQUENCEGROUPID,POSTINGJOURNALID,EINVOICELINESPECIFIC,SMASPECINDEXCALC,GIROTYPE,EINVOICEACCOUNTCODE,INTERCOMPANYPOSTED,PAYMID,PRINTEDORIGINALS,DELIVERYPOSTALADDRESS,DEFAULTDIMENSION,VOUCHERNUMBERSEQUENCETABLE,SOURCEDOCUMENTHEADER,INVOICENUMBERINGCODE_LT,INVOICEREGISTER_LT,WHOISAUTHOR_LT,SALESDATE_CZ,DESCRIPTION,DOCUMENTDATE_W,INTRASTATADDVALUE_LV,PSAENDDATEMAXINVOICEID,DIRECTDEBITMANDATE,NARRATION_BR,PSAINVOICEFORMATS,REASONTABLEREF,TAXINFORMATION_IN,TRANSPORTATIONDOCUMENT,INVOICETYPE_MY,RECVERSION,MODIFIEDDATETIME,MODIFIEDBY,CREATEDDATETIME,CREATEDBY,
Error Synchronize database Cannot execute a data definition language command on  ().

ProjInvoiceJour ile ProjProposalJour ilişkili iki tablo asıl sorun ProjInvoiceJour’da. Sorunu tespit ettim. Bir şekilde tablonun bütün alanları key olan bir indexe eklenmeye çalışılmış. Biri mi yaptı yoksa metadata bozulmasından kaynaklı bir durum mu bilemiyorum. Ancak bu index ne axta ne de SQL tarafında yok. Dolayısıyla bunu metadata tanımlarından silmek gerekiyordu.

Bu indexi bulmak için Model db sinden birkaç sorgu yapmam gerekti. Öncelikle model tipini tespit ettim.

Resim-1

Sonrasında ismini bildiğim o tabloda bir index bulup ParentHandle kullanarak o tablodaki tüm indexleri listeledim ve silmem gereken indexi buldum.

Resim-2

Bu index tanımını sildikten sonra sistem düzeldi. Tabi bunu yapmadan yedeğimi almıştım. Tespiti beni en çok zorlayan durumlardan biri oldu. Bu arada Microsoft ta işin içine dahil oldu ama onlarda direk tespitte bulunamadılar.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, Ax2012, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Segmented Entry, Power Automate, Power Apss, Power Virtual Agents, Dynamics 365 nedir, Dynamics 365 ERP, Dynamics 365 CRM

Dynamics 365 Finance and Operations Boyut işlemleri?

Bu yazıda Dynamics 365 Finance and Operations için boyut işlemlerini nasıl yapabiliriz bir job ile anlatmaya çalışacağım. Ax2012 DimensionStore sınıfı birçok metodu barındırıyordu ancak MsDyn365FO ile helper sınıfları kullanılır oldu bu yüzden birçok metot bu sınıflara taşındı. Ax2012 için hazırladığım yazıya buradan ulaşabilirsiniz. Birkaç metot eksik olmakla birlikte genel manada 3 tane sınıf işimizi görüyor.

class FDDimJob1

{

public static void main(Args _args)

{

DimensionAttributeValueCombination  dimAttrValueCombDefaultAccount;

DimensionAttributeValueCombination  dimAttrValueComb;

DimensionAttributeValueCombination  dimAttrValueCombCompare;

DimensionAttributeValueCombination  dimAttrValueCombCust;

DimensionAttributeValueSet          dimAttrValueSet;

MainAccount                         mainAccount;

CustTable                           custTable;

LedgerJournalACType                 ledgerJournalACType;

DimensionHierarchy                  dimHierarchy;

;

// Örneklerde kullanmak için bazı kayıtları buluyorum

dimAttrValueCombDefaultAccount  = DimensionAttributeValueCombination::find(22565427296);

dimAttrValueComb                = DimensionAttributeValueCombination::find(22565428050);

dimAttrValueCombCompare         = DimensionAttributeValueCombination::find(22565428053);

mainAccount                     = MainAccount::find(22565425069);

custTable                       = CustTable::find(“US-006″);

// Bir hesap ve tip alarak size LedgerDimension’da kayıt varsa getirir yoksa oluşturur.

dimAttrValueCombCust = DimensionAttributeValueCombination::find(

LedgerDynamicAccountHelper::getDynamicAccountFromAccountNumber(custTable.AccountNum , LedgerJournalACType::Cust));

info(strfmt(“LedgerDimension RecId = %1″ , dimAttrValueCombCust.RecId));

// Bir MainAccount ait defaultAccount varsa getirir yoksa oluşturur.

info(strfmt(“DafaultAccount RecId = %1″ ,

LedgerDefaultAccountHelper::getDefaultAccountFromMainAccountRecId(mainAccount.RecId)));

// Bir MainAccount ait defaultAccount varsa getirir yoksa oluşturur.

info(strfmt(“DafaultAccount RecId = %1″ ,

LedgerDefaultAccountHelper::getDefaultAccountFromMainAccountId(mainAccount.MainAccountId)));

// Bir LedgerDimension’daki boyutları yanzı DimensionAttributeValueSet recId sini veriri.

info(strfmt(“DafaultDimension RecId = %1″ ,

LedgerDimensionFacade::getDefaultDimensionFromLedgerDimension(dimAttrValueComb.RecId)));

// LedgerDimension’a ait DefaultAccount’u verir.

info(strfmt(“DefaultAccount  RecId = %1″ ,

LedgerDefaultAccountHelper::getDefaultAccountFromLedgerDimension(dimAttrValueComb.RecId)));

// LedgerDimension’a ait MainAccount’u verir.

info(strfmt(“MainAccount  Name = %1″ ,

LedgerDimensionFacade::getMainAccountFromLedgerDimension(dimAttrValueComb.RecId).Name));

// LedgerDimension’a ait MainAccount’u verir.

info(strfmt(“MainAccount  RecId = %1″ ,

LedgerDimensionFacade::getMainAccountRecIdFromLedgerDimension(dimAttrValueComb.RecId)));

// LedgerDimension’a ait AccountNum’u verir.

info(strfmt(“CustTable AccountNum = %1″ ,

LedgerDynamicAccountHelper::getAccountNumberFromDynamicAccount( dimAttrValueCombDefaultAccount.RecId)));

}

}

Resim-1

İlerleyen yazılarda Ax2012 ile aradaki farkları açıklayan yazılar yazmaya devam edeceğim.

Selamlar.

www.fatihdemirci.net

TAGs: Microsoft Life Cycle Services, LCS, Azure, Azure DevOps, DefaultAccount, LedgerDimension, Microsoft Dynamics 365, MsDyn365FO, MsDyn365CE, MsDyn365, Dynamics 365 ERP, Dynamics 365 CRM

Page 3 of 161234510...Last »