# n3 # # Categorized stuff by date for a sungle account, "1"!os:argv # @prefix rdf: . @prefix s: . @prefix log: . @prefix os: . @prefix string: . @prefix math: . @prefix q: . @prefix acc: . # for URIs Generated by qif2qu.n3 @prefix os: . @prefix tax: . # @prefix : <#>. @prefix foo: <#>. @forAll :a, :c, :d, :k, :l, :m, :n, :p, :s, :t, :x, :y, :z. # {?x log:uri "1"!os:argv!os:baseAbsolute} => {?x a :target}. # Select subclasses of TaxCategories. # Must be at least one entry, and must have a label { [] a :c. :c a q:Cat; s:label [] } log:implies { :c a :toBeDisplayed }. #q:Unclassified a :toBeDisplayed; s:label "Unclassified transactions". q:UnclassifiedIncome a :toBeDisplayed; s:label "Unclassified Income". q:UnclassifiedOutgoing a :toBeDisplayed; s:label "Unclassified Outgoings". { "1" os:argv :a. ( """ """ :a """ account by date

""" :a """ account by date

""" ) string:concatenation :s. }=>{ "00" log:outputString :s }. "01" :monthName "January". "02" :monthName "February". "03" :monthName "March". "04" :monthName "April". "05" :monthName "May". "06" :monthName "June". "07" :monthName "July". "08" :monthName "August". "09" :monthName "September". "10" :monthName "October". "11" :monthName "November". "12" :monthName "December". { :m :monthName :n. ( "2002-" :m "-00" ) string:concatenation :k. ( "

" :n """

""" ) string:concatenation :s } log:implies { :k log:outputString :s }. { "1" os:argv :a } => { :a a :LabelOfThisAccount }. # Each line: { [] a :y; q:payee :p; q:amount :x; q:date :d; q:toAccount [s:label :a]. :p log:notEqualTo "Check". :p log:notEqualTo "Check - Ecp". :d string:startsWith "2002". :a a :LabelOfThisAccount. :y a :toBeDisplayed; s:label :l. ( :d :a ) string:concatenation :k. ( "\n") string:concatenation :s } log:implies { :k log:outputString :s }. acc:Default s:label "DEFAULT". # end section: { :m :monthName :n. ( "2002-" :m "ZZZZZ" ) string:concatenation :k. } log:implies { :k log:outputString "

Date	Details ("payee")	Category	Account	Amount
" (:d "^([^T]*)")!string:scrape "	" :p "	" :l "	" :a "	" :x "

\n" }. "zz" log:outputString """ """. #ends