vtiger 0.3.6 → 0.3.7

data/README.rdoc

@@ -21,7 +21,12 @@ Vtiger::API.api_settings = {
 
 == FEATURES/PROBLEMS:
 
-* TBD
+many commands to add via webservices including add trouble ticket, add contact etc.
+queries,
+describe object
+list entities 
+
+are all running
 
 == SYNOPSIS:
 

data/lib/vtiger/base.rb

@@ -68,14 +68,27 @@ module Vtiger
             #    puts "url path is #{url.path}"
                 http.request(req)
               }
-          #   puts resp.body
+           # puts "HTTP_ASK_GET" + resp.body.to_s
 
 
          # puts "resp: " + resp 
           self.json_parse resp.body
        #   r
         end
-
+        def add_object(object_map,hashv,element)
+          object_map=object_map.merge hashv
+          # 'tsipid'=>"1234"
+          tmp=self.json_please(object_map)
+          input_array ={'operation'=>'create','elementType'=>"#{element}",'sessionName'=>"#{self.session_name}", 'element'=>tmp} # removed the true
+          puts "input array:"  + input_array.to_s   #&username=#{self.username}&accessKey=#{self.md5}
+          # scott not working -- JSON.generate(input_array,{'array_nl'=>'true'})
+          result = http_crm_post("operation=create",input_array)
+         # self.session_name=result["result"]["sessionName"]
+          # puts JSON.pretty_generate(result)
+          success=result['success']
+          id =result["result"]['id'] if success
+          return success,id
+        end
         def login(options)
          # puts "in login"
           input_array ={'operation'=>'login', 'username'=>self.username, 'accessKey'=>self.md5} # removed the true

data/lib/vtiger/commands.rb

@@ -22,33 +22,23 @@ module Vtiger
     def addlead(options,ln,co,hashv)
       puts "in addobject"
       object_map= { 'assigned_user_id'=>"#{self.userid}",'lastname'=>"#{ln}", 'company'=>"#{co}"}
-      object_map=object_map.merge hashv
-      # 'tsipid'=>"1234"
-      tmp=self.json_please(object_map)
-      input_array ={'operation'=>'create','elementType'=>"Leads",'sessionName'=>"#{self.session_name}", 'element'=>tmp} # removed the true
-      puts "input array:"  + input_array.to_s   #&username=#{self.username}&accessKey=#{self.md5}
-      # scott not working -- JSON.generate(input_array,{'array_nl'=>'true'})
-      result = http_crm_post("operation=create",input_array)
-     # self.session_name=result["result"]["sessionName"]
-      # puts JSON.pretty_generate(result)
-      result["success"]
+      add_object(object_map,hashv,'Leads')
+    end
+     def add_contact(options,ln,email,hashv)
+        puts "in contact"
+        object_map= { 'assigned_user_id'=>"#{self.userid}",'lastname'=>"#{ln}", 'email'=>"#{email}"}
+        add_object(object_map,hashv,'Contacts')
+      end
+    def find_contact_by_email_or_add(options,ln,email,hashv)
+      success,id = query_element_by_email(email,"Contacts")
+      success,id =add_contact(options,ln,email,hashv) if !success         
     end
     def add_trouble_ticket(options,status,title,hashv)
        puts "in add trouble ticket"
        object_map= { 'assigned_user_id'=>"#{self.userid}",'ticketstatus'=>"#{status}", 'ticket_title'=>"#{title}"}
        object_map=object_map.merge hashv
        # 'tsipid'=>"1234"
-       tmp=self.json_please(object_map)
-       input_array ={'operation'=>'create','elementType'=>"HelpDesk",'sessionName'=>"#{self.session_name}", 'element'=>tmp} # removed the true
-       puts "input array:"  + input_array.to_s   #&username=#{self.username}&accessKey=#{self.md5}
-       # scott not working -- JSON.generate(input_array,{'array_nl'=>'true'})
-       result = http_crm_post("operation=create",input_array)
-       puts "#{result.inspect}"
-      # self.session_name=result["result"]["sessionName"]
-       # puts JSON.pretty_generate(result)
-       ttnumber="invalid"
-       ttnumber =result["result"]["ticket_no"]  if result["success"]
-       return result["success"],ttnumber 
+       add_object(object_map,hashv,'HelpDesk')
      end
     def action(options)
       puts "in action"
@@ -119,6 +109,22 @@ module Vtiger
           #  self.new_quantity = self.qty_in_stock.to_i + options[:quantity].to_i
            #  updateobject(options,{'qtyinstock'=> "#{self.new_quantity}","productname"=>"#{options[:productname]}"})
         end
+         def query_element_by_email(email,element)
+            puts "in query contact"
+              action_string=ERB::Util.url_encode("select id from #{element} where email like '#{email}';")
+              puts "action string:" +action_string
+              res = http_ask_get(self.endpoint_url+"operation=query&sessionName=#{self.session_name}&query="+action_string)
+              values=res["result"][0] if res["success"]==true   #comes back as array
+              #puts values.inspect
+              # return the account id
+               self.object_id = 'failed'
+               if values!= nil 
+                 self.object_id=values["id"]
+                 self.account_name=values["accountname"] 
+               end
+               return res["success"],self.object_id
+
+          end
         def query_product_inventory(options)
           puts "in query product count"
            #&username=#{self.username}&accessKey=#{self.md5}

data/test/test_vtiger.rb

@@ -46,6 +46,20 @@ class TestVtiger < Test::Unit::TestCase
      assert challenge,"challenge is false"
      assert login,"login is false"
   end
+ 
+  def test_find_or_add_contact
+       cmd = Vtiger::Commands.new()
+       @options[:username]='admin'
+       challenge=cmd.challenge(@options)
+       login=cmd.login(@options)
+       success,id=cmd.find_contact_by_email_or_add(@options,'sproule','scott.sproule@gmail.com',{})
+       assert challenge,"challenge is false "
+       assert login,"login should  succeed"
+       assert success,"find contact should success"
+       assert id=='4x173', "id is #{id}"
+       puts "id is #{id}"
+
+    end
   def test_bad_login
      cmd = Vtiger::Commands.new()
      @options[:username]='test'
@@ -54,17 +68,42 @@ class TestVtiger < Test::Unit::TestCase
      assert challenge,"challenge is false "
      assert !login,"login should not succeed"
   end
+  def test_query_contact
+      cmd = Vtiger::Commands.new()
+      @options[:username]='admin'
+      challenge=cmd.challenge(@options)
+      login=cmd.login(@options)
+      success,id=cmd.query_element_by_email("scott.sproule@gmail.com","Contacts")
+      assert challenge,"challenge is false "
+      assert login,"login should  succeed"
+      assert success,"find contact should success"
+      puts "id is #{id}"
+      
+   end
   def test_add_lead
      cmd = Vtiger::Commands.new()
      challenge=cmd.challenge(@options)
      login=cmd.login(@options)
      hv={}
      hv[:firstname]='test'
-     lead=cmd.addlead(@options,"testlastname","testco",hv)
+     success,id=cmd.addlead(@options,"testlastname","testco",hv)
      assert challenge,"challenge is false "
      assert login,"login should succeed"
-     assert lead,"lead should succeed"
+     assert success,"lead should succeed"
+     puts "id is #{id}"
   end
+  def test_add_contact
+      cmd = Vtiger::Commands.new()
+      challenge=cmd.challenge(@options)
+      login=cmd.login(@options)
+      hv={}
+      hv[:firstname]='test'
+      success,id=cmd.add_contact(@options,"testlastname","scott.sproule@gmail.com",hv)
+      assert challenge,"challenge is false "
+      assert login,"login should succeed"
+      assert success,"add should succeed"
+      puts "id is #{id}"
+   end
   
   def test_add_trouble_ticket
      cmd = Vtiger::Commands.new()

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: vtiger
 version: !ruby/object:Gem::Version 
-  hash: 31
+  hash: 29
   prerelease: false
   segments: 
   - 0
   - 3
-  - 6
-  version: 0.3.6
+  - 7
+  version: 0.3.7
 platform: ruby
 authors: 
 - Scott Sproule
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-06-23 00:00:00 +08:00
+date: 2010-06-24 00:00:00 +08:00
 default_executable: 
 dependencies: []