value__ntId  __ntTemplate viewFlagsnamesymboltype viewJustify viewBounds protection viewFormat infoFrame stepChildren nokeyboard  __ntDatatype __ntFlagsÿ( CLAS@    NUMB    "Purchase Info" EVAL   'purchased EVAL   'editor EVAL   ÿÀ NUMB     RECT   ˜'private // show this only in this app. For instance, DONT show it in IOBox EVAL    NUMB   ÿ{checkpaths: '[purchase_date,purchase_price,purchase_method,purchase_location,purchase_condition,purchase_note], checkPrefix: '[TRUE,nil], formatFunc: func(data) begin if isnumber(data[0]) then data[0]:=shortdatestr(data[0],rom_datetimestrspecs.abbrdatestrspec); return (ParamStr("^?0Purchase Date: ^0\n|| ^?1Purchase Price: $^1\n|| ^?2Purchase Method: ^2\n|| ^?3Purchase Location: ^3\n|| ^?4Purchase Condition: ^4\n|| ^?5Purchase Notes: ^5|| ",data)); end, } EVAL    ARAY   __ntName pathlabelviewSetupFormScript    ÿ  PROT@    EVAL'purchase_date   ""Purchase Date:" EVAL   ÿ // be sure to call inherited:?ViewSetupFormScript() func() begin local b:=getappparams(); self.viewbounds:=relbounds( 5, 0, rinttol(b.appareawidth/2)-10, 32); inherited:?ViewSetupFormScript(); end SCPT     RECT    NUMBnewtLabelDateInputLine pdate   0  2 3 4    ÿœ PROT@    EVAL 'purchase_price   "Price ($):" EVAL   ÿÐ// be sure to call inherited:?ViewSetupFormScript() func() begin local b:=getappparams(); self.viewbounds:=relbounds( rinttol(b.appareawidth/2), 0, rinttol(b.appareawidth/2)-10, 32); inherited:?ViewSetupFormScript(); end SCPT   ÿ NUMBnewtLabelNumInputLine price   0  2 3memory 4   ÿ˜ PROT@    EVAL"'purchase_method   "Method:" EVAL   0'|purchase_method:soft| EVAL   ÿ‚ NUMB   ÿ // be sure to call inherited:?ViewSetupFormScript() func() begin local b:=getappparams(); self.viewbounds:=relbounds( 5, 0, rinttol(b.appareawidth/2)-10, 32); inherited:?ViewSetupFormScript(); end SCPTnewtLabelInputLinemethod   0  2 3 Z 4   ÿ˜ \@    EVAL('purchase_condition   "Condition:" EVAL   6'|purchase_condition:soft| EVAL   ÿ NUMB   ÿÐ// be sure to call inherited:?ViewSetupFormScript() func() begin local b:=getappparams(); self.viewbounds:=relbounds( rinttol(b.appareawidth/2), 0, rinttol(b.appareawidth/2)-10, 32); inherited:?ViewSetupFormScript(); end SCPT kcondition   0  2 3   ÿ¬ PROT@    EVAL&'purchase_location   "Where:" EVALnewtSmartNameViewlocation   0  2 3   ÿ˜ \@    EVAL'purchase_note   "Note:" EVAL k notesÿ     BOOLclView