package Ġcom . p 4 ddy . p addy crm . plugins . gui . compose . account Ċ Ċ import Ġandroidx . compose . foundation . layout . Column Ċ import Ġandroidx . compose . foundation . layout . fill MaxSize Ċ import Ġandroidx . compose . foundation . layout . padding Ċ import Ġandroidx . compose . foundation . layout . width Ċ import Ġandroidx . compose . material . Button Ċ import Ġandroidx . compose . material . Text Ċ import Ġandroidx . compose . runtime . Composable Ċ import Ġandroidx . compose . ui . Modifier Ċ import Ġandroidx . compose . ui . unit . dp Ċ import Ġcom . p 4 ddy . p addy crm . application . account . Account Application Service Ċ import Ġcom . p 4 ddy . p addy crm . domain . account . Account Repo Ċ import Ġcom . p 4 ddy . p addy crm . plugins . gui . compose . layout . Control Button Section Ċ import Ġcom . p 4 ddy . p addy crm . plugins . gui . compose . layout . ScrollView Ċ import Ġcom . p 4 ddy . p addy crm . plugins . gui . compose . navigation . Nav Controller Ċ import Ġcom . p 4 ddy . p addy crm . plugins . gui . compose . navigation . Screen Ċ import Ġcom . p 4 ddy . p addy crm . plugins . persistence . ex posed . account . Account Ex posed Repo Ċ Ċ @ Composable Ċ fun ĠAccount ListView ( Ċ ĉ nav Controller : ĠNav Controller Ċ ) Ġ{ Ċ ĉ val Ġaccount Repo : ĠAccount Repo Ġ= ĠAccount Ex posed Repo () Ċ ĉ val Ġaccount Service : ĠAccount Application Service Ġ= ĠAccount Application Service ( account Repo ) ĊĊ ĉ Control Button Section Ġ{ Ċĉ ĉ Button ( onClick Ġ= Ġ{ Ċĉĉ ĉ nav Controller . navigate ( Screen . Account Create View . name ) Ċĉ ĉ }) Ġ{ Ċĉĉ ĉ Text (" New ") Ċĉ ĉ } Ċ ĉ } ĊĊ ĉ ScrollView (" All ĠAccounts ") Ġ{ Ċĉ ĉ Column ( Ċĉĉ ĉ modifier Ġ= ĠModifier . fill MaxSize ( 1 F ) Ċĉ ĉ ) Ġ{ Ċĉĉ ĉ for Ġ( account Ġin Ġaccount Service . findAll Accounts ()) Ġ{ Ċĉĉĉ ĉ Button ( Ċĉĉĉĉ ĉ onClick Ġ= Ġ{ Ċĉĉĉĉĉ ĉ nav Controller . navigate ( Screen . Account Detail View . name , Ġaccount . accountId ) Ċĉĉĉĉ ĉ }, Ċĉĉĉĉ ĉ modifier Ġ= ĠModifier . padding ( vertical Ġ= Ġ 5 . dp ). width ( 3 0 0 . dp ) Ċĉĉĉ ĉ ) Ġ{ Ċĉĉĉĉ ĉ Account Compact View ( account ) Ċĉĉĉ ĉ } Ċĉĉ ĉ } Ċĉ ĉ } Ċ ĉ } Ċ } Ċ