(defn bay-actions
 "Функция формирующая проводку покупки акций"
 [content-st dat]
 (let [xs (add-dat (parce-cont content-st) dat)]
    (str
      (add-bay-title)
      (add-data-tocen xs)
      (add-active-deb xs)
      (add-passiv-cred xs)
      (add-depo-cred xs)
      (add-trade-saldo xs)
      (add-linespace)
      (add-data-tocen xs)
      (add-cost-broker xs)
      (add-cost-birja xs)
      (add-cost-tax xs)
      (add-depo-saldo))))