docserver na doc->t602

[Pavel Smerk]

Neprilis dulezita poznamka jeste k tomu predchozimu --- ted koukam, ze uz
jsem kod docserveru upravil tak, aby nebylo kvuli takovymto externim
konvertorum nutne spoustet po kazde (re)instalaci nejake makro, ale aby si
to cislo docserver nasel sam --- je to pouzito prave u txt a doc95, ze v
hashi %docoutform nemam jako prislusnou hodnotu konkretni cislo (nekdy
zavisle na konkretni instalaci), ale nemenne "ClassName", podle ktereho si
teprve konkretni cislo konvertoru najdu. To ClassName lze najit v registrech
jako podklic HKLM/Software/Microsoft/Shared Tools/Text Converters/Export.
Asi to predelam na "FormatName", aby do %docoutform slo zadavat "popisky"
vystupnich formatu, ktere Word zobrazuje v dialogu SaveAs, a nemuselo se to
hledat nekde v registrech. (ClassName i FormatName vypisuje i to makro).

On Fri, Sep 05, 2003 at 08:13:43PM +0200, Ondrej Koala Vacha wrote:
> Cislo jsem tedy ziskal, nicmene se nedari, a to ani cvicne rtf -> txt.
> 
> Fri Sep  5 20:00:42 2003 ddebug, Called convert (`rtf', `txt')
> Fri Sep  5 20:00:44 2003 ddebug, Found output converter number `9'
> Win32::OLE(0.1403) error 0x80020005: "Nesoulad typ"
>     in METHOD/PROPERTYGET "SaveAs" argument "FileName" at C:/Perl/lib/Docserver.pm line 311
> Fri Sep  5 20:00:47 2003 debug, Client executes method CallMethod
> Fri Sep  5 20:00:47 2003 debug, Client executes method CallMethod

Chm. No ja nevim, no. ;-) Ten konvertor Text with Layout/Text s rozlozenim
predpokladam mate nainstalovany? Co se vypise, kdybyste pred to SaveAs dal
nejake $self->Debug $self->{'outfile'}; ? Protoze on pise, ze to jmeno
souboru je nekorektni, ale nenapada me, jak by k tomu mohlo dojit.

							S pozdravem	P.

> Na strane clienta:
> 
> $ perl docclient.pl --server=10.70.1.5 --in_format=rtf --out_format=txt ~/texty/mander/01KAPITO-korektury.RTF
> Use of uninitialized value in concatenation (.) or string at
> /usr/lib/perl5/site_perl/5.8.0/Docclient.pm line 157.
> Use of uninitialized value in numeric lt (<) at
> /usr/lib/perl5/site_perl/5.8.0/Docclient.pm line 161.
> 
> a vystup zadny.