Makro içerisinden makro veya form çağrısı nasıl yapılır?

dim par1
ret = Doc.RunMacro1("MAKR7S.DENEME", "Run1", par1)

dim par1
ret = Doc.RunMacro1("PFORM7S.DENEME", "Run1", par1)

Makro veya Event Makro içerisinden nasıl e-posta gönderebilirim?

E-posta gönderecek olan dinamo ERP kullanıcısının e-posta hesap bilgilerinin tanımlanmış olması gerekmektedir. Tanımlamak için "Kullanıcı Tanımı ve Program Hakları" programından aşağıdaki alanları doldurmanız gerekmektedir.
E-posta hesap bilgilerinin tanımlanma ekran görüntüleri için aşağıdaki bağlantıları kullanabilirsiniz.

 Ekran Görüntüsü 1 : www.birerp.com/ufiles/110/2011-02-09_1402.png

 Ekran Görüntüsü 2 : www.birerp.com/ufiles/110/2011-02-09_1404.png

Makro veya event makro içerisinden e-posta göndermek ile ilgili örnek kod parçacığı aşağıdaki gibidir.
 

Sub EpostaGonder()
   Doc.RunCommand("MT_EMAIL_SEND_NONE_FORM")
   Dim EMAIL_SEND_INFO_TABLE_E
   Dim EMAIL_SEND_INFO_TABLE_T
   Set EMAIL_SEND_INFO_TABLE_E = Doc.GetTableObject("_EMAIL_SEND_INFO_TABLE_E")    
   Set EMAIL_SEND_INFO_TABLE_T = Doc.GetTableObject("_EMAIL_SEND_INFO_TABLE_T")
   If Doc.IsBlank(EMAIL_SEND_INFO_TABLE_E) Then Exit Sub
   If Doc.IsBlank(EMAIL_SEND_INFO_TABLE_T) Then Exit Sub
   EMAIL_SEND_INFO_TABLE_E.NOMESSAGE = "1"  ' 0 olursa mesaj hata ve uyarılar gözükür
   EMAIL_SEND_INFO_TABLE_T.Empty()
   'Birden fazla kişiye gönderim yapılacaksa *** işaretine kadar olan kısım tekrarlanır.
   RecNo = EMAIL_SEND_INFO_TABLE_T.AddRow()
   EMAIL_SEND_INFO_TABLE_T.SetcurrentRow(RecNo)
   EMAIL_SEND_INFO_TABLE_T.SELECTED = "1" 
   EMAIL_SEND_INFO_TABLE_T.MESAJSABLONDAN = "0"
   'Hedef e-posta adresi belirleniyor
   EMAIL_SEND_INFO_TABLE_T.M_TO = "m.gulden@birerp.com"
   'E-posta içeri belirleniyor.
   EMAIL_SEND_INFO_TABLE_T.MESAJ = "Servis/ Emri açıldı"
   '***
   'Gönderim işlemi başlatılıyor
   Doc.RunCommand("MT_EMAIL_SEND_ONE")
   'Gönderim sonuçları ekranı gösteriliyor.
   Doc.LoadSubForm("EMAIL_LIST")
End Sub