package Ġmodules . m 4 storage . gui Ċ Ċ import Ġio . ktor . util .* Ċ import Ġjavafx . beans . property . Simple Double Property Ċ import Ġjavafx . beans . property . Simple Integer Property Ċ import Ġjavafx . beans . property . Simple String Property Ċ import Ġkotlinx . serialization . Experimental Serialization Api Ċ import Ġmodules . m 4 storage . Item Storage Ċ import Ġmodules . m 4 storage . Item Storage Unit Ċ import Ġmodules . m 4 . misc . Item Model Ċ import Ġmodules . m 4 storage . misc . get Storage Property From Storage Ċ import Ġmodules . mx . right Buttons Width Ċ import Ġt orn ad of x .* Ċ Ċ @ Experimental Serialization Api Ċ @ Internal API Ċ class ĠG Item Stock Ad der Ġ: ĠFragment (" Add ĠStock ") Ġ{ ĊĠ Ġprivate Ġval Ġitem : ĠItem Model Ġby Ġinject () ĊĠ Ġprivate Ġvar Ġstorage Ġ= Ġget Storage Property From Storage ( Item Storage ( 0 , Ġ"")) ĊĠ Ġprivate Ġvar Ġstorage Number Ġ= ĠSimple Integer Property ( storage . number ) ĊĠ Ġprivate Ġvar Ġstorage Description Ġ= ĠSimple String Property ( storage . description ) ĊĠ Ġprivate Ġvar Ġstorage Unit Description Ġ= ĠSimple String Property ("") ĊĠ Ġprivate Ġvar Ġstorage Unit Stock Ġ= ĠSimple Double Property ( 0 . 0 ) ĊĠ Ġval Ġstorage Unit Number Ġ= ĠSimple Integer Property ( 0 ) ĊĠ Ġval Ġstock ToAdd Amount Ġ= ĠSimple Double Property ( 0 . 0 ) ĊĠ Ġval Ġnote Ġ= ĠSimple String Property ("") ĊĠ Ġvar Ġuser Confirmed Ġ= Ġfalse ĊĠ Ġoverride Ġval Ġroot Ġ= Ġform Ġ{ ĊĠĠĠ Ġfield set (" Item ĠData ") Ġ{ ĊĠĠĠĠĠ Ġfield (" u ID ") Ġ{ Ġlabel ( item . u ID ) Ġ} ĊĠĠĠĠĠ Ġfield (" Description ") Ġ{ Ġlabel ( item . description ) Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġfield set (" Storage ") Ġ{ ĊĠĠĠĠĠ Ġfield (" Number ") Ġ{ Ġlabel ( storage Number ) Ġ} ĊĠĠĠĠĠ Ġfield (" Description ") Ġ{ Ġlabel ( storage Description ) Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġfield set (" Storage ĠUnit ") Ġ{ ĊĠĠĠĠĠ Ġfield (" Number ") Ġ{ Ġlabel ( storage Unit Number ) Ġ} ĊĠĠĠĠĠ Ġfield (" Description ") Ġ{ Ġlabel ( storage Unit Description ) Ġ} ĊĠĠĠĠĠ Ġfield (" Current ĠStock ") Ġ{ Ġlabel ( storage Unit Stock ) Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġfield set (" Add ĠStock ") Ġ{ ĊĠĠĠĠĠ Ġfield (" Amount ") Ġ{ ĊĠĠĠĠĠĠĠ Ġtext field ( stock ToAdd Amount ) ĊĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġfield set (" Note ") Ġ{ ĊĠĠĠĠĠ Ġtextarea ( note ) Ġ{ ĊĠĠĠĠĠĠĠ Ġpref Height ( 1 0 0 . 0 ) ĊĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĠĠĠ Ġbutton (" Add Ġ( Enter )") Ġ{ ĊĠĠĠĠĠ Ġshortcut (" Enter ") ĊĠĠĠĠĠ Ġaction Ġ{ ĊĠĠĠĠĠĠĠ Ġuser Confirmed Ġ= Ġtrue ĊĠĠĠĠĠĠĠ Ġclose () ĊĠĠĠĠĠ Ġ} ĊĠĠĠĠĠ Ġpref Width Ġ= Ġright Buttons Width ĊĠĠĠ Ġ} ĊĠ Ġ} ĊĊĠ Ġfun Ġget Storage Data ( storage : ĠItem Storage , Ġstorage Unit : ĠItem Storage Unit ) Ġ{ ĊĠĠĠ Ġthis . storage Ġ= Ġget Storage Property From Storage ( storage ) ĊĠĠĠ Ġstorage Number . value Ġ= Ġstorage . number ĊĠĠĠ Ġstorage Description . value Ġ= Ġstorage . description ĊĠĠĠ Ġstorage Unit Number . value Ġ= Ġstorage Unit . number ĊĠĠĠ Ġstorage Unit Description . value Ġ= Ġstorage Unit . description ĊĠĠĠ Ġstorage Unit Stock . value Ġ= Ġstorage Unit . stock ĊĠ Ġ} ĊĊĠ Ġ/** ĊĠĠ Ġ* ĠChecks Ġif Ġthe ĠStock Ad der 's Ġdata Ġare Ġvalid . ĊĠĠ Ġ* ĠCurrently , Ġonly Ġchecks Ġif Ġthe Ġuser Ġconfirmed Ġand Ġif Ġthe Ġstock Ġto Ġadd Ġis Ġnot Ġzero . ĊĠĠ Ġ* Ġ@ return Ġtrue , Ġif Ġthe Ġstock Ġcan Ġbe Ġadded . ĊĠĠ Ġ*/ ĊĠ Ġfun Ġvalid (): ĠBoolean Ġ{ ĊĠĠĠ Ġreturn Ġuser Confirmed Ġ&& Ġstock ToAdd Amount . value Ġ!= Ġ 0 . 0 ĊĠ Ġ} Ċ } Ċ