package Ġbr . edu . if b . android . dao Ċ Ċ import Ġandroid . content . Content Values Ċ import Ġandroid . content . Context Ċ import Ġandroid . database . Cursor Ċ import Ġandroid . database . sqlite . SQLite Database Ċ import Ġbr . edu . if b . android . model . G ast o Mens al Ċ Ċ class ĠG ast o Mens al Dao ( context : ĠContext ) Ġ{ ĊĊĠĠĠ Ġprivate Ġvar Ġbanco : ĠG ast o Mens al Db Helper ? Ġ= Ġnull ĊĠĠĠ Ġprivate Ġvar Ġdb : ĠSQLite Database ? Ġ= Ġnull ĊĊĠĠĠ Ġinit Ġ{ ĊĠĠĠĠĠĠĠ Ġbanco Ġ= ĠG ast o Mens al Db Helper ( context ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġinser ir ( g ast o Mens al : ĠG ast o Mens al ): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Cri ar Ġum Ġmap Ġpara Ġrece ber Ġos Ġvalores Ġdos Ġatribut os ĊĠĠĠĠĠĠĠ Ġval Ġvalores Ġ= ĠContent Values () ĊĠĠĠĠĠĠĠ Ġ// Pass ar Ġos Ġal ores Ġpara Ġo Ġmap ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ AN O , Ġg ast o Mens al . ano ) ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ MES , Ġg ast o Mens al . mes ) ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ FINAL ID ADE , Ġg ast o Mens al . final idade ) ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ VAL OR , Ġg ast o Mens al . valor ) ĊĠĠĠĠĠĠĠ Ġ// Permit ir Ġesc rit a Ġno Ġbanco ĊĠĠĠĠĠĠĠ Ġdb Ġ= Ġbanco ?. writable Database ĊĠĠĠĠĠĠĠ Ġ// Inser ir Ġo Ġobjeto Ġno Ġbanco ĊĠĠĠĠĠĠĠ Ġval Ġresultado Ġ= Ġdb !!. insert ( G ast o Mens al Db Helper . TABLE _ NAME , Ġnull , Ġvalores ) ĊĠĠĠĠĠĠĠ Ġ// F ech ando Ġa Ġconex Ã£o Ġcom Ġo Ġbanco ĊĠĠĠĠĠĠĠ Ġdb ?. close () ĊĠĠĠĠĠĠĠ Ġ// Ver ific ando Ġo Ġresultado ĊĠĠĠĠĠĠĠ Ġreturn Ġif Ġ( resultado Ġ> Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" Inser ido Ġcom Ġsu cesso !" ĊĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ" Erro Ġao Ġinser ir " ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġlist ar Todos (): ĠCursor Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Pre par ando Ġo Ġbanco Ġpara Ġle it ura ĊĠĠĠĠĠĠĠ Ġdb Ġ= Ġbanco !!. readable Database ĊĠĠĠĠĠĠĠ Ġ// Defin indo Ġos Ġcampos Ġa Ġser em Ġbus c ados Ġno Ġbanco ĊĠĠĠĠĠĠĠ Ġval Ġcampos Ġ= ĠarrayOf < String >( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ ID , ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ AN O , ĠG ast o Mens al Db Helper . C _ MES , ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ FINAL ID ADE , ĠG ast o Mens al Db Helper . C _ VAL OR ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// F az endo Ġa Ġconsulta ĊĠĠĠĠĠĠĠ Ġval Ġcursor Ġ= Ġdb !!. query ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . TABLE _ NAME , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġcampos , Ġnull , Ġnull , Ġnull , Ġnull , Ġnull ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġcursor ?. moveTo First () ĊĠĠĠĠĠĠĠ Ġdb !!. close () ĊĠĠĠĠĠĠĠ Ġreturn Ġcursor ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġconsult ar Pe lo Id ( id : ĠLong ): ĠCursor ? Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Defin ir Ġos Ġcampos Ġa Ġser em Ġbus c ados ĊĠĠĠĠĠĠĠ Ġval Ġcampos Ġ= ĠarrayOf ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ ID , ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ AN O , ĠG ast o Mens al Db Helper . C _ MES , ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ FINAL ID ADE , ĠG ast o Mens al Db Helper . C _ VAL OR ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġ// T orn ar Ġo Ġreadable ĊĠĠĠĠĠĠĠ Ġdb Ġ= Ġbanco !!. readable Database ĊĠĠĠĠĠĠĠ Ġ// Defin ir Ġa Ġcl Ã¡ us ula Ġwhere ĊĠĠĠĠĠĠĠ Ġval Ġselection Ġ= ĠG ast o Mens al Db Helper . C _ ID Ġ+ Ġ"=" Ġ+ Ġid ĊĠĠĠĠĠĠĠ Ġval Ġcursor Ġ= Ġdb !!. query ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . TABLE _ NAME , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġcampos , Ġselection , Ġnull , Ġnull , Ġnull , Ġnull ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġcursor ?. moveTo First () ĊĠĠĠĠĠĠĠ Ġdb !!. close () ĊĠĠĠĠĠĠĠ Ġreturn Ġcursor ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġalter ar ( g ast o Mens al : ĠG ast o Mens al ) Ġ{ ĊĠĠĠĠĠĠĠ Ġ// Defin ir Ġos Ġcampos ĊĠĠĠĠĠĠĠ Ġval Ġvalores Ġ= ĠContent Values () ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ AN O , Ġg ast o Mens al . ano ) ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ MES , Ġg ast o Mens al . mes ) ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ FINAL ID ADE , Ġg ast o Mens al . final idade ) ĊĠĠĠĠĠĠĠ Ġvalores . put ( G ast o Mens al Db Helper . C _ VAL OR , Ġg ast o Mens al . valor ) ĊĠĠĠĠĠĠĠ Ġdb Ġ= Ġbanco !!. writable Database ĊĠĠĠĠĠĠĠ Ġval Ġwhere Clause Ġ= ĊĠĠĠĠĠĠĠĠĠĠĠ ĠG ast o Mens al Db Helper . C _ ID Ġ+ Ġ"=" Ġ+ Ġg ast o Mens al . id ĊĠĠĠĠĠĠĠ Ġdb !!. update ( G ast o Mens al Db Helper . TABLE _ NAME , Ġvalores , Ġwhere Clause , Ġnull ) ĊĠĠĠĠĠĠĠ Ġdb !!. close () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġex cluir ( id : ĠInt ) Ġ{ ĊĠĠĠĠĠĠĠ Ġdb Ġ= Ġbanco !!. writable Database ĊĠĠĠĠĠĠĠ Ġval Ġwhere Clause Ġ= ĠG ast o Mens al Db Helper . C _ ID Ġ+ Ġ"=" Ġ+ Ġid ĊĠĠĠĠĠĠĠ Ġdb !!. delete ( G ast o Mens al Db Helper . TABLE _ NAME , Ġwhere Clause , Ġnull ) ĊĠĠĠĠĠĠĠ Ġdb !!. close () ĊĠĠĠ Ġ} Ċ Ċ }