xsharp.eu • ReportPro2, English and translation: now ok! - Page 6
Page 6 of 7

bBrowse: and now?

Posted: Sat Nov 19, 2022 7:24 am
by Gfb22
Ok: luckily I'm not the only one distracted... :-)
Here is the source folder C:Rp2Net-SourceRp2Net-main and the program..
RP2Sorce.jpg
RP2Sorce.jpg (13.83 KiB) Viewed 1481 times
RP2dir.jpg
RP2dir.jpg (10.72 KiB) Viewed 1481 times
RP2English.jpg
RP2English.jpg (14.42 KiB) Viewed 1481 times

bBrowse: and now?

Posted: Sat Nov 19, 2022 7:33 am
by Chris
Hi Gian,
Gfb22 post=24439 userid=6903 wrote:
rp.jpg
I'm trying to localize RP2 menus and messages (for rpReport).
In ReportPro2.English Lib I inserted the translations that interest me in 'NativeResources.rc': I tried to compile and Run and it doesn't give any message but the DLL is not created.
Where am I wrong?
OK, so I tried this and it seems to work well here. What do you mean the dll is not created, you do not see the file "ReportPro2.English.dll" at all? It should be in the Debug or Release folder of the XIDE project. If you still can't see it, maybe there's some problem with compiling...Can you please zip the whole XIDE project folder (please make sure to include also the .xiproj file) and send it to me to have a look? My address is chris (at)xsharp. eu

.

INDEX ON, again :-)

Posted: Mon Dec 05, 2022 6:20 pm
by Gfb22
Here I am again.
I'm porting the second app to X# and everything is ok (almost) :-)
The only remaining error concerns the Index ON command: as already suggested by Chris (Posts: 3658 of November 1st), I inserted at the beginning of the module that uses the INDEX ON command the definition "#command INDEX ON...." but the error is due to the presence of the 'DESCENDING' key which is used for some of my indexes.
Err1.jpg
Err1.jpg (34.6 KiB) Viewed 1482 times
The part of the code that gives the error is:
Cod1.jpg
Cod1.jpg (35.51 KiB) Viewed 1482 times
If I delete the "DESCENDING" argument the app compiles normally and works.
Thanks for the tips.

INDEX ON, again :-)

Posted: Mon Dec 05, 2022 8:26 pm
by robert
What is the definition of your INDEX ON command ?

Robert

INDEX ON, again :-)

Posted: Mon Dec 05, 2022 8:40 pm
by Gfb22
Here's the definition Chris suggested to me in his November 1 post:

Code: Select all

#command INDEX ON <key>     ;
     [TAG <order>]  ;
     [TO <file>]  ;
     [FOR <fo>]     ;
     [<all:ALL>]    ;
     [WHILE <wh>]   ;
     [NEXT <nx>]    ;
     [RECORD <rec>] ;
     [<rs:REST>]    ;
     [EVAL <ev>]    ;
     [EVERY <evr>]  ;
     [<u:UNIQUE>]   ;
     [<asd:ASCENDING>]      ;
     [<dsd:DESCENDING>]     ;
     [<lCur:USECURRENT>]    ;
     [<lAdd:ADDITIVE>]      ;
     [<lCus:CUSTOM>]        ;
     [<lNop:NOOPTIMIZE>]    ;
        ;
    => OrdCondSet( <fo>, <{fo}>,  ;
     [<.all.>],     ;
     <{wh}>,        ;
     <{ev}>, <evr>, ;
     RecNo(), <nx>, <rec>,  ;
     [<.rs.>], [<.dsd.>],   ;
     <.lAdd.>, [<.lCur.>], [<.lCus.>], [<.lNop.>] )      ;
    ;;  ;
       OrdCreate(<(file)>,<(order)>,<(key)>,,IF(<.u.>,.T., NIL))
...and so, without 'DESCENDING', compile and run

INDEX ON, again :-)

Posted: Tue Dec 06, 2022 6:25 am
by Karl-Heinz
Hi Gian,

in the meantime the INDEX ON <key> TAG <order> command became part of the include file dbcmd.xh. I don´t know if it´s a bug, but to make e.g. the DESCENDING clause work it seems that the "[" and "]" chars must be removed from the OrdCondSet() result pattern ?

Code: Select all

   => OrdCondSet( <"fo">, , [<.all.>], <{wh}>, <{ev}>, <evr>, 			;
          RecNo(), <nx>, <rec>,[<.rs.>],[<.dsd.>],<.lAdd.>,					;
          [<.lCur.>], [<.lCus.>], [<.lNop.>] )      						;;  ;
To override the existing command, add this modified code to the beginning of your source file. Now your code should compile and run.

Code: Select all

#command INDEX ON <key>         										;
     TAG <order>                										;
     [TO <file>]                										;
     [FOR <fo>]                 										;
     [<all:ALL>]                										;
     [WHILE <wh>]               										;
     [NEXT <nx>]                										;
     [RECORD <rec>]             										;
     [<rs:REST>]                										;
     [EVAL <ev>]                										;
     [EVERY <evr>]              										;
     [<u:UNIQUE>]               										;
     [<asd:ASCENDING>]          										;
     [<dsd:DESCENDING>]         										;
     [<lCur:USECURRENT>]        										;
     [<lAdd:ADDITIVE>]          										;
     [<lCus:CUSTOM>]            										;
     [<lNop:NOOPTIMIZE>]        										;
    => OrdCondSet( <"fo">, , <.all.>, <{wh}>, <{ev}>, <evr>, 			;
          RecNo(), <nx>, <rec>,<.rs.>,<.dsd.>,<.lAdd.>,					;
          <.lCur.>, <.lCus.>, <.lNop.> )      						;;  ;
       OrdCreate(<(file)>,<(order)>,<(key)>,,IF(<.u.>,.T., NIL))

regards
Karl-Heinz

INDEX ON, again :-)

Posted: Tue Dec 06, 2022 9:53 am
by Gfb22
Thanks Karl,
now compile and run!
:-)

ReportPro2, English and translation

Posted: Tue Dec 06, 2022 3:48 pm
by Gfb22
Hi,I translated some sentences in NativeResources.rc of "ReportPro2, English" but when in XIDE I try to compile it nothing happens and the DLL is not updated.No problem instead to recompile the program and the other libraries (ReportPro2, ReportPro2.Base, ReportPro2.Export and ReportPro2.RunTime).To understand what doesn't work, I attach the 'response file' and the repository image.Thanks for the tips.
XideRep.jpg
XideRep.jpg (27.4 KiB) Viewed 1482 times
ReportPro2.English_rsp.txt
(870 Bytes) Downloaded 138 times

ReportPro2, English and translation

Posted: Tue Dec 06, 2022 9:55 pm
by Chris
Hi GIan,

Do you mean there are no messages at all? Please select Windows->Errors and Windows->Output (after compiling), what contents do you see there? It can't be completely empty..

ReportPro2, English and translation

Posted: Wed Dec 07, 2022 7:26 am
by Gfb22
Here is the error and the NativeResource.rc file with my changes...
Err1.jpg
Err1.jpg (57.28 KiB) Viewed 1482 times
thank you
NativeResources_rc.txt
(39.01 KiB) Downloaded 139 times