Attached is a Much Improved Version of my Sample Spreadsheet Creator,
written using Guile. It pretty much uses generic R5RS functionality,
and thus functions *nearly* OK using DrScheme. Unfortunately,
DrScheme transforms symbols into lower case, which Gnumeric doesn't
like much... I'm still *extremely* pleased that DrScheme was released
as a Debian package today, as it is a *wonderful* development
environment for Scheme...
--> It now attaches Styles to Columns.
Question to Gnumeric folk: Cells appear to have a Style attribute
that is set to 0.
How is it that I would:
a) Configure a style to associate with such a Style Number?
b) Associate the Style Number with a Cell?
--> Five minutes of replacing (list whatever whatever whatever) with
calls to the (make-xml-element tag attributes children)
*substantially* diminishes errors from accidentally building 'em
incorrectly.
--> Sundry other debugging.
It still doesn't:
a) Sort cells into some sort of useful order before dumping 'em out,
or
b) Read data from GnuCash.
It is, nonetheless, a nontrivial example of generating a Gnumeric
spreadsheet in Guile.
begin 664 gsamp.tgz
M'XL(`);FJ#@``^U:>W/;QA'WO]*GV,*9&K1%B@]1LOR0XT<2>^I8J>PD;9U,
M!B2.)&H`Q^``T<RG[^[>`P`)0IIITTP[O+%'Q.W>[=[>WN[O'O,TZ:EI<N?W
M+/U!OW]Z>G*GC^5LXV^_/S@=G@[N],_ZX^'@=-0?GR+_<#P^N0/]WU4K4PJ5
M!QG`G>EDDLE5*G;QW43_'RV/L<`W:9&(+)J"6F8B"-5"B!RF,E61RA7(V:-#
M9ILGV:,?9?9I(N4G70-<][Y(DB!;`[R2J:@2OA$R$3E2-@GO28*R-665J]%U
M[X)$0!?>"1%"OA#`/)!B[0;CM\'GES)&5IE$2D4RA<N_;+-<R54KRS^D3%H9
MOLNB-'^3SF26!#EQM#&_S]>Q4,AR^0ER28S5X55XKL3<]+6D3H.XQE9A;&?Y
M6J;Y+3IY(;-09+L9->L'N;R)Y87,<VVO-JZW8M:BE>:YBN:+&YE>1<&<B#=V
M)JZ[[;S$A=["4V.H1S`I<E`+6<0A+()K@>X6H>>GHM?K;<T:-B8G`/^=A._3
M*(=O@VP>I<_-WQ?P.LC"]]%O`EY'82C2SH9P]$,2_M<BRH53`;;$(-N_)>:E
MB'F0'V@H^(]64"*"'!>T_AWDN<@:!X@MP:<514N&W:;3X$\OT>-$FA_ZL0Q"
M\#XG\5RDE$V\SB&QPVN1B7L*`O@4%^%\#;,BG?*ZR1>H!FE%'82TNB7&FV19
MY()5PW@T02>5,^XF#-8*5)1.!;P24\&DT>`(!@_/SWL`;[@KF<9K");+3'Z.
M<&3B,<R$B&&6"0X6)$$5\[E0.>HS$31TIP];`.TD8"E1)6T@:S34U,7'0@FE
M28&VIY=B(+@6'NJ8!]Q+)C"&*C0+1X@>'/JAF$6I`'^=A-T+,[(U)!!V#@'\
M!]`=#0[9IOY]\+M(&ISW^QT8G8X[IOX!^'F&NN*PP#^N,IUT.H8I-+S78IK+
MK)N)&=SU^V@G&)_#>1\&0_P_'J#1C+3-,AP,87@R@N'9"$;]$QB-3CHD*H&!
ME>%',_"#-`3_*?3!3V18Q!)U.;$,KOA/8`A)M7H`?=+UT"82FS1PRD20*9J?
MB0"%"0.=-`_(GA!,)"[+U4(>KV@:T+M$AC8(]82B^4,YQ9E)\UYIY23X)+HH
MH*NT`#;R%A%77L*)!*Z#N!!:3TU&-^Z*6%"W6OM[I.X;:G!W9NP08V+<9M><
MW.O=&??>.3QHZE<SHN2NRC&ES(E=ZZ&G<[O!H=7#FDVKPHI4='=#\]"L<31E
M'_2:YMN;&Y_V.HWMGQ?Y0F;-37$YO`S4`K[1\X%L'3>U'&S<.K<S1C%@+F6(
M2W2Z*-)/-@39^0.T0S'-BTP\=@YBD88-79-`";#VP!3L5F4Y]W9,W95MRU!&
M-=K4F=0)NN?[2$_5(ZR%'GB+/%\^.CY>K5:]>8J.V9/9_-C*.+X>>MJ_FR:A
MXGP[Y]^A(Y3[8Q3F"Y1Y/ACBHGLM."/VX&R(BP;GNK4?#:;(A\QH>3*VC4(-
MIQ39$<=BM(T)X5'\OL$\G`S<.,$G7`CW7G+[N&._*5%@O^Y;`Y9^Q4*[U#=9
MA/1W"CEW,BXFT'^4X,"LN..,,9-B/T#7PA"<@D.0V@EE038,8B5U[%\N99;K
M["+9.:5>HZ'N4FD,0/&>^Y@&*:P"Q&S;AM3\-%Q%-@B4DM/F97NO`@1QQ1X<
MF&E<@OF-I@F221B0V>*X8VNI'H?K4RV2<(/"Y`XU,^UF"<U%:"D=IFSHV$5:
MD:1.4\!&FI7[<+HW6+N*3,G(9#=M9MWG+K-8D;G,@[B4RXBYW<^J$K?<C39I
M^:;/(738K&(^\D7,C5`&K[(!T9QNM_!.[<<U7;[FP=@Q\?*\1?C#+(8=81Z;
M<O2;,CBC7$K]%'$@2HNJ(%F2)8F%;4:^$$NY-`/R_?PS*G)X@(%C<'[^$',[
MY7GO<BE2RB8O@CA`L.2A$2C_$,\YYE_DN,)Q>=`=(W0X!$<:;I(<9;2[T<EN
MTG@WZ70WZ6PWZ>%NTOENTJ#?0FLQQV#+'E"WXGNT;[;V"%)MVW$7<=1&/&DC
MCMN(IVW$LS;BPS;B>1M1&W8GM=5&@U8C8=-QJWU;J*-6ZDDK==Q*/6VEGK52
M'[92SUNI9.<V<KNU!NWF&A"#]]T"][CHYJ/QAJ%WTD8MM),6VKB%=MI".VNA
M/6RAG;?0R+`;Q)I5=]*V#%/N<'Q"58/R4P?X>[YEX;U36L3Q,Z#HC;WZ$TQV
M*?5N(GVEQJ=PK_.[X3[`7:`1@;\Q(]S7>4##`V:JPH>UJ\<,Y2?T%;K/D#_=
M=Z59*-0TT]22/6"HH:NL2AV+(S@IZAYV`3P<':$3"W@V4&1_"T-V*MS;FV8S
MRHK<VPG>ECQHDPQL"FO2JK1;BMN6-VR5!VAF-X.:[R9!.RPZVB''L.L]9Y<V
MW@@_O*>O/$TU(]7&[EZ8K2DUK]*]!R];^9V;6DQJW=L5C92^"J8+<Z";B5^+
M*$.4Q*=R"-8-$"+,N:*-D6+$Q,!2Z;.:5S*]E_.9*A_']!K@J.%G?(P&:@'H
M++8.SZNPW.#[@U8?-T>"EIU!(3>QXNVX7VD]^:!C%<4A!-.I+-*<ID1F$?:(
M.Y(P4LLX6!N,J=SHD#>?ZQV0]XO_Q?V[1W?O]GO]_B^=Q_CIVT_^NO_G7PN9
M/^[J/\^>(8__Y2\=W._;WE`UF8G0]/>%Z>CCE0A_]OFKRBR+S"!\=C<VQF'=
M^?K@K;%TDZ0;AA[%,ZX>5M1VE:.:=&>=Y^B1"WMJ6#\NW`;3[#W:']XP'I\*
M.E(T6\0(Y^,Q-\7.EIF<!)-X37L_?9I`!X'H.NBQY'"RR8.4NVYP.R@%=53N
M^T2.=^\?WE5/@VCTK!PWV-A/:O=C075;<S,22ZW:8@*?`=C%=N.)0>GQ]@C#
M12(SIK*"1EY^V2%4Z%J[C9.'28'^W9UASNOJ+8TUVWUP.QF=)NM;GDH2)8N?
MU'*LXA/06*3S?&$&R^K56[%7XO:(SLY[G&+X!+T'#\<V;VG2H"0-QOTZ;5C2
MSC::C>JD395W1Z&247O7IK<A7B-+>%L>M]%0F97''VZZ=QZ`U>9EF@E:1[A1
M32N.C$%/8D;HRB)?%GEW%N$:0@;V6=4TF5:H#5;>DV?H:7`M,KH0>_J3-^CU
M?_*>77BP-)RI6,6D@?TVHJK^B:(L=1I+):PZ?'BS1)E_](7I_UDI+VU^/QDW
MW/\/1F?C\O[_C.[_1\.S_O[^_[]1'E?+8>T+['D@)<F_??L6Z#(&@=C[Z0+7
M*KREQP&'6\WAY2)#BEQB&H<7;#)=;PWXY4)\[J4B/RIKTCPNYG2Z?EAVPR=I
MJP##'T>KT![Y\\T#IFR$613_,-TS`^JHVQE%EW26*QUHJ+YL4$`_$0T@"E@?
MUAY`]&H*"$AD*&)W#1BD[OZA\C@"X0A'XE64+W3+?)$)`<B&<$[U`)Y7D(S4
MZE;[2OBP?R)LXT*9]Q8;`=O%R#R8=QF5!#F*F!2$B:8+#,]9]1)8YX=67L/<
MY;'.H@SY2>NUO7+!QHP%>E4^)7#P8<F(([&7[,#8-])O(UB\L1-YD+[,)=6H
MZXHZYB[(C*XF"P%:QJ*V)''OM"LP8ZG.W#N9\^Q&8235.IUFP30BV/@I`&^&
MEBQPK^'ISR12KN:1E?P\CJTV"A+,;%,"ZU'*:A(DYWN(=3+!['P$>M^#/V1F
M!ZBW1#3U#1F.+U`7(EXB1P?R+$@5]XF=*[1+[)XJ1"G=6^C>G57T9?=2HO?3
M$-DOQ6P6X0C3*6E*+Q@FJ&V"D/<:E\T$=\TBD=%O;H7H"3`=6VQ=N5U%M3]0
MY2I8'\&*+NEHK^564N!&*5:F%Q"TF<NCA.]IV##4I8)%5,[G&Y[F#%DRNH*I
M>,`1W:LC'$7!U<GW[-QZ?!ECGF70TN*[4KM*<.-,9_!':*^0;SP)TI/^-6FV
MKR.ZN:>EZEHCH/LJ#3^@J_O^\SP?&%"(/X>,`?F`'W<<$0VQR%)^M2#=,GOB
MFE/CI][`HQ_#I][0.[ZP7),.31RYTH1-%!&`*BUPA.[\"0=LKL+0.3'6#7IC
M4M9V03J#_YY;&H&(]LLF3D7K4+23?E2J66UY85L].:Y56^YI!R[)>JM(H6Z(
M<I.B7,N5D(>_[#HYXL`5KTNS?H>6U]=ZOO^2K$\_?Z"9(_/6:\C*%0L[/Y6/
M4'/=T04\X387NHLGQ_JK5CLL:X]-JTI8^%X%<QUDNUS*,!]FT34_-Z&QXO)J
M`J;V+P'1CG'J2PS..GJ;C(-N2OG'76OSI`6(Y7'7F6(N.8*KR\L/1Y4@;\$W
MP=MM_.T=Y\GR6.-M74]7[<8\MP'>I*QE=^B[6MDP4E*QSM2`Q(G<J1@75_=:
M%GJ1!O"#P-SP-LCF`EX96QPQ75N+-N&K@#*964?D6OP"0)_Y\.[>&1$7+!GZ
M131GS,'WM+I9@_*K"(,W+C*,*+A78=`P+U&,*B8Y!1#=T,SBWW&[S5?/&88M
M]Q!!]Y0*_3@I+/1S"F%CIV&R26U;DUZYX:):#$[V31!=RY6;,2+:B?QLS*Y/
MB^FWW2=O<]2KZQL\ZK,^V]L];M*KE?7>^`P!,ZHJ^]JZD(SL5;\^Y[YX"M'F
ML,NW0/89#7'K$V]PI68/#[R:?AK6\,GX`Q0PZ-CW,DKD?]HR,_)L5@WJ(]N>
M-8V51,Q_W'`;[=E@EJKN?+-<.VKE07A/])L:WPK,I7T$I*5J,YKU=;.N73K#
MW=2WV1S=)G/<6NWCF_36?!=>3?\F]5W:HP1H`TTUG#7Q/@*O4[*XZD[ILYLC
M:1B%+>A7M>^&0?'M"8K9>-GF872]1=NPL2TVU0_"MJRSW8><_'/#*A^WF.HV
MH185]I^]#=L0:N?9-89YIENP(%W-P,U4FR]WK$^5AD^C6\NW<?Q?\HD809WV
MF8T;AX]?75U=7A&@;AI2TY,SWLN45PP:?%A)F\7C_&*!J`7H!*FTKKV?O<[.
M.%#9EU1^&B=M=U&UPT?5QD1@@"QI-H)BHNHRBG;'?/8&HN+KZ#P[%Y+YI5W+
M]5)18M>(+3)V$+EI27YL:%`?KMM4UGUPAPO2##ZK;%KK-BAO7XB!+RB;@`I3
M[6(R1]&5O:UU0O-FLQ8;MA=<J;_N\(9$4<>#Y2FJ"<4</@Q+Q4O]BD_I&]D&
M'C</YI+6L>P\-6W,6G!KOV;>J-Q+URZB:_G80<H#N)4/'>Q6=RMQT4%S3=BQ
ME=8`1ZHS0:<4C2<AE3.0YN.//_KP;5_V95_V95_V95_V95_V95_V95_V95_V
<95_V95_V95_V95_V95_VY3]<_@4GL0B9`%``````
`
end
--
This login session: $13.99
[EMAIL PROTECTED] - - <http://www.ntlug.org/~cbbrowne/lsf.html>
--
Gnucash Developer's List
To unsubscribe send empty email to: [EMAIL PROTECTED]