Haskell SQLite3 query all












1














Would like to determine the size of a table (length) to avoid a user entering an incremental ID that already exists (Note: left all Haskell books to get my feet wet). Got a table with id, task, date_in, date_out and need to count the number id's. Using this function:



checkUniqueID = do
conn <- open "taglist.db"
len <- query conn "SELECT * FROM task;" (Only xxx) :: IO [id]
let showLength = length $ len
print showLength
close conn
return ()


However: omitting the 'Only' will result in ghci mentioning too few arguments, but I really cannot figure out what to put at xxx. Too bad all Haskell doc is so fragmented, since it is such a cool language.
Thanks guys!










share|improve this question



























    1














    Would like to determine the size of a table (length) to avoid a user entering an incremental ID that already exists (Note: left all Haskell books to get my feet wet). Got a table with id, task, date_in, date_out and need to count the number id's. Using this function:



    checkUniqueID = do
    conn <- open "taglist.db"
    len <- query conn "SELECT * FROM task;" (Only xxx) :: IO [id]
    let showLength = length $ len
    print showLength
    close conn
    return ()


    However: omitting the 'Only' will result in ghci mentioning too few arguments, but I really cannot figure out what to put at xxx. Too bad all Haskell doc is so fragmented, since it is such a cool language.
    Thanks guys!










    share|improve this question

























      1












      1








      1







      Would like to determine the size of a table (length) to avoid a user entering an incremental ID that already exists (Note: left all Haskell books to get my feet wet). Got a table with id, task, date_in, date_out and need to count the number id's. Using this function:



      checkUniqueID = do
      conn <- open "taglist.db"
      len <- query conn "SELECT * FROM task;" (Only xxx) :: IO [id]
      let showLength = length $ len
      print showLength
      close conn
      return ()


      However: omitting the 'Only' will result in ghci mentioning too few arguments, but I really cannot figure out what to put at xxx. Too bad all Haskell doc is so fragmented, since it is such a cool language.
      Thanks guys!










      share|improve this question













      Would like to determine the size of a table (length) to avoid a user entering an incremental ID that already exists (Note: left all Haskell books to get my feet wet). Got a table with id, task, date_in, date_out and need to count the number id's. Using this function:



      checkUniqueID = do
      conn <- open "taglist.db"
      len <- query conn "SELECT * FROM task;" (Only xxx) :: IO [id]
      let showLength = length $ len
      print showLength
      close conn
      return ()


      However: omitting the 'Only' will result in ghci mentioning too few arguments, but I really cannot figure out what to put at xxx. Too bad all Haskell doc is so fragmented, since it is such a cool language.
      Thanks guys!







      sqlite haskell






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked Nov 22 at 17:50









      Madderote

      20119




      20119
























          1 Answer
          1






          active

          oldest

          votes


















          0














          I am not terribly familiar with these libraries. I check the docs
          of Database.PostgreSQL.Simple
          and found out that, if you don't have arguments to your query, you can use query_ and omit the argument tuple. The examples at the very beginning of the docs are quite helpful.



          That being said, your approach looks wrong. You are pulling the whole table from the DB only to count the entries. This is a waste: you should instead use something like select count(*) from .. so that you query for the length only.



          This might work: (again, I've never used that library)



          [Only len] <- query_ conn "select count(*) from task" :: IO [Only Int]





          share|improve this answer





















          • Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
            – Madderote
            Nov 23 at 7:37












          • @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
            – chi
            Nov 23 at 12:27










          • Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
            – Madderote
            Nov 23 at 15:06











          Your Answer






          StackExchange.ifUsing("editor", function () {
          StackExchange.using("externalEditor", function () {
          StackExchange.using("snippets", function () {
          StackExchange.snippets.init();
          });
          });
          }, "code-snippets");

          StackExchange.ready(function() {
          var channelOptions = {
          tags: "".split(" "),
          id: "1"
          };
          initTagRenderer("".split(" "), "".split(" "), channelOptions);

          StackExchange.using("externalEditor", function() {
          // Have to fire editor after snippets, if snippets enabled
          if (StackExchange.settings.snippets.snippetsEnabled) {
          StackExchange.using("snippets", function() {
          createEditor();
          });
          }
          else {
          createEditor();
          }
          });

          function createEditor() {
          StackExchange.prepareEditor({
          heartbeatType: 'answer',
          autoActivateHeartbeat: false,
          convertImagesToLinks: true,
          noModals: true,
          showLowRepImageUploadWarning: true,
          reputationToPostImages: 10,
          bindNavPrevention: true,
          postfix: "",
          imageUploader: {
          brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
          contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
          allowUrls: true
          },
          onDemand: true,
          discardSelector: ".discard-answer"
          ,immediatelyShowMarkdownHelp:true
          });


          }
          });














          draft saved

          draft discarded


















          StackExchange.ready(
          function () {
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53436097%2fhaskell-sqlite3-query-all%23new-answer', 'question_page');
          }
          );

          Post as a guest















          Required, but never shown

























          1 Answer
          1






          active

          oldest

          votes








          1 Answer
          1






          active

          oldest

          votes









          active

          oldest

          votes






          active

          oldest

          votes









          0














          I am not terribly familiar with these libraries. I check the docs
          of Database.PostgreSQL.Simple
          and found out that, if you don't have arguments to your query, you can use query_ and omit the argument tuple. The examples at the very beginning of the docs are quite helpful.



          That being said, your approach looks wrong. You are pulling the whole table from the DB only to count the entries. This is a waste: you should instead use something like select count(*) from .. so that you query for the length only.



          This might work: (again, I've never used that library)



          [Only len] <- query_ conn "select count(*) from task" :: IO [Only Int]





          share|improve this answer





















          • Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
            – Madderote
            Nov 23 at 7:37












          • @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
            – chi
            Nov 23 at 12:27










          • Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
            – Madderote
            Nov 23 at 15:06
















          0














          I am not terribly familiar with these libraries. I check the docs
          of Database.PostgreSQL.Simple
          and found out that, if you don't have arguments to your query, you can use query_ and omit the argument tuple. The examples at the very beginning of the docs are quite helpful.



          That being said, your approach looks wrong. You are pulling the whole table from the DB only to count the entries. This is a waste: you should instead use something like select count(*) from .. so that you query for the length only.



          This might work: (again, I've never used that library)



          [Only len] <- query_ conn "select count(*) from task" :: IO [Only Int]





          share|improve this answer





















          • Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
            – Madderote
            Nov 23 at 7:37












          • @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
            – chi
            Nov 23 at 12:27










          • Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
            – Madderote
            Nov 23 at 15:06














          0












          0








          0






          I am not terribly familiar with these libraries. I check the docs
          of Database.PostgreSQL.Simple
          and found out that, if you don't have arguments to your query, you can use query_ and omit the argument tuple. The examples at the very beginning of the docs are quite helpful.



          That being said, your approach looks wrong. You are pulling the whole table from the DB only to count the entries. This is a waste: you should instead use something like select count(*) from .. so that you query for the length only.



          This might work: (again, I've never used that library)



          [Only len] <- query_ conn "select count(*) from task" :: IO [Only Int]





          share|improve this answer












          I am not terribly familiar with these libraries. I check the docs
          of Database.PostgreSQL.Simple
          and found out that, if you don't have arguments to your query, you can use query_ and omit the argument tuple. The examples at the very beginning of the docs are quite helpful.



          That being said, your approach looks wrong. You are pulling the whole table from the DB only to count the entries. This is a waste: you should instead use something like select count(*) from .. so that you query for the length only.



          This might work: (again, I've never used that library)



          [Only len] <- query_ conn "select count(*) from task" :: IO [Only Int]






          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered Nov 22 at 18:21









          chi

          72.8k280135




          72.8k280135












          • Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
            – Madderote
            Nov 23 at 7:37












          • @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
            – chi
            Nov 23 at 12:27










          • Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
            – Madderote
            Nov 23 at 15:06


















          • Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
            – Madderote
            Nov 23 at 7:37












          • @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
            – chi
            Nov 23 at 12:27










          • Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
            – Madderote
            Nov 23 at 15:06
















          Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
          – Madderote
          Nov 23 at 7:37






          Hi @Chi with a little change it works. Thanks so much to get me on track again. Library is new for me too and on pulling in the entire table like I did, SQLite throws an error anyway. Maybe if others run into this 'problem' and read your reply, here's the modified code that works: conn <- open "taglist.db"n len <- query_ conn "SELECT (id) FROM task" :: IO [Only Int] let showLength = Data.List.length $ len print showLength close conn return ()
          – Madderote
          Nov 23 at 7:37














          @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
          – chi
          Nov 23 at 12:27




          @Madderote If you have a completely working code, you can post it answering your own question. StackOverflow's policy encourage self-answers, when they can be useful to others.
          – chi
          Nov 23 at 12:27












          Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
          – Madderote
          Nov 23 at 15:06




          Thanks for the tip. Will do with future issues, which I will encounter for sure ;-)
          – Madderote
          Nov 23 at 15:06


















          draft saved

          draft discarded




















































          Thanks for contributing an answer to Stack Overflow!


          • Please be sure to answer the question. Provide details and share your research!

          But avoid



          • Asking for help, clarification, or responding to other answers.

          • Making statements based on opinion; back them up with references or personal experience.


          To learn more, see our tips on writing great answers.





          Some of your past answers have not been well-received, and you're in danger of being blocked from answering.


          Please pay close attention to the following guidance:


          • Please be sure to answer the question. Provide details and share your research!

          But avoid



          • Asking for help, clarification, or responding to other answers.

          • Making statements based on opinion; back them up with references or personal experience.


          To learn more, see our tips on writing great answers.




          draft saved


          draft discarded














          StackExchange.ready(
          function () {
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53436097%2fhaskell-sqlite3-query-all%23new-answer', 'question_page');
          }
          );

          Post as a guest















          Required, but never shown





















































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown

































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown







          Popular posts from this blog

          What visual should I use to simply compare current year value vs last year in Power BI desktop

          Alexandru Averescu

          Trompette piccolo