Packages

erp

0.10.1
7.4.16 7.4.15 7.4.14 7.4.13 2.11.0 1.11.0 1.1.1 0.10.4 0.10.3 0.10.2 0.10.1 0.10.0 0.9.4 0.9.3 0.9.2 0.9.1 0.9.0 0.7.17 0.7.16 0.7.15 0.7.14 0.7.13 0.7.12 0.7.11 0.7.10 0.7.9 0.7.8 0.7.7 0.7.6 0.7.5 0.7.4 0.7.3 0.7.2 0.7.1 0.7.0 0.6.0

ERP/1 Directory Schema

HexDocs

Current section

Files

Jump to
Readme
36 Versions
3 Dependencies
6 Dependants
Files
Activity
erp src boot erp_boot.erl
Raw

src/boot/erp_boot.erl 

-module(erp_boot).

-compile(export_all).

-include("organization.hrl").

-include("location.hrl").

-include("person.hrl").

-include("product.hrl").

-include("branch.hrl").

-include_lib("kvs/include/kvs.hrl").

-include_lib("kvs/include/metainfo.hrl").

-include_lib("kvs/include/cursors.hrl").



boot() ->

    GroupOrgs    = [ #'Organization'{name="Quanterall", url="quanterall.com"} ],



    HeadBranches = [ #'Branch'{ loc = #'Loc'{ city = "Varna",   country = "BG" } },

                     #'Branch'{ loc = #'Loc'{ city = "Sophia",  country = "BG" } },

                     #'Branch'{ loc = #'Loc'{ city = "Plovdiv", country = "BG" } } ],



    PartnersOrgs = [ #'Organization'{name="NYNJA, Inc.",          url="nynja.io"},

                     #'Organization'{name="Catalx Exchange Inc.", url="catalx.io"},

                     #'Organization'{name="FinaTech",             url="finatech.se"},

                     #'Organization'{name="3Stars",         url=[]},

                     #'Organization'{name="SwissEMX",       url=[]},

                     #'Organization'{name="HistoricalPark", url=[]},

                     #'Organization'{name="Intralinks",     url=[]} ],



    Structure    = [ {"/erp/group", GroupOrgs},

                     {"/erp/partners", PartnersOrgs},

                     {"/erp/quanterall", HeadBranches}],



    lists:foreach(fun({Feed, Data}) ->

        case kvs:get(writer, Feed) of

             {ok,_} -> skip;

          {error,_} -> lists:map(fun(X) ->

                       kvs:append(X,Feed) end, Data) end

                  end, Structure).