With only one argument, it is "correct", but not generally good
practice.  This would be a good thing to update.

Rick

2009/4/1 Sahananda (Jon) Wolfers <sahana...@windhorse.biz>:
> Hi,
>
> during a long train journey I found over 100 examples in our manuals,
> oodialog classes and sample code of usage of
>
> call function(parms)
>
> is that usage ever correct?
> Would it be usefull to purge these examples?
> If so I'm happy to open a tracker.
>
> list is below - as I had no internet available, some of these may have been
> corrected in the latest revision.
>
> Jon
>
> oodialog manual
> section 4.1.8
> else call ErrorMessage("Could not start dialog")
> section 10.2.10
> call SleepMS(3000) /* 3 seconds */
> section 10.2.11
> call WinTimer("WAIT,tid) /* wait... */
> section 17.2.20
> call InfoDialog("Column Title : " info.!Text"d"x,
> section 17.2.21
> call InfoDialog(curList~ColumnWidth(column))
> section 17.2.36
> call InfoDialog("Item Text : " itemInfo.!Text"d"x,
>
> rexxref manual
> section 8.82
> if i > 0 then call SysWinSetDefaultPrinter(list.i)
>
> oorexx\main\trunk\extensions\platform\windows\oodialog\dlgext.cls 40 KB
> 06/03/2009 07:40:53
> 77       call sleepms(20)
> 98           else call sleepms(sleeptime) /* to yield cpu */
> 1077         call DumpAdmin("ADMDUMP")
>
> oorexx\main\trunk\extensions\platform\windows\oodialog\dyndlg.cls 45 KB
> 06/03/2009 07:40:53
> 93    if ptr = 0 then call HandleDlg("STOP")
> 132    if hnd \= 0 then forward message "LoadItems" continue; else call
> HandleDlg("STOP")
>
> oorexx\main\trunk\extensions\platform\windows\oodialog\plbdlg.cls 47 KB
> 06/03/2009 07:40:53
> 110    call ErrorMessage(msgname || " is not a method of " || self)
>
> oorexx\main\trunk\extensions\platform\windows\oodialog\stddlg.cls 14 KB
> 06/03/2009 07:40:53
> 145       call InfoMessage("You did not enter numerical data")
>
> oorexx\main\trunk\samples\sfserver.rex 6 KB 06/03/2009 07:41:13
> 78         call sockclose(socket)
>
> oorexx\main\trunk\samples\unix\api\wpipe3\aspitest3.rex 5 KB 05/02/2009
> 07:50:56
> 63 call Aspi_Read_All_Elements_Of_A_Specific_Stem_From_REXX_VP("x.0")
>
> oorexx\main\trunk\samples\windows\api\wpipe\wpipe3\apitest3.rex 5 KB
> 06/03/2009 07:41:08
> 61 call Api_Read_All_Elements_Of_A_Specific_Stem_From_REXX_VP("x.0")
>
> oorexx\main\trunk\samples\windows\ole\apps\samp08.rex 7 KB 05/02/2009
> 07:50:58
> 124 call syssleep(2)
>
> oorexx\main\trunk\samples\windows\ole\apps\samp12.rex 6 KB 05/02/2009
> 07:50:58
> 58   call syssleep(2)
>
> oorexx\main\trunk\samples\windows\ole\wmi\services.rex 10 KB 05/02/2009
> 07:50:59
> 90       call SysSleep(1)
> 127       call SysSleep(1)
> 139       call SysSleep(1)
> 151       call SysSleep(1)
>
> oorexx\main\trunk\samples\windows\oodialog\ftyperex.rex 9 KB 05/02/2009
> 07:51:36
> 122      call ErrorMessage("Ftype is curently set to rexxhide.exe. You must
> use the OODIALOG interface.")
>
> oorexx\main\trunk\samples\windows\oodialog\oobandit.rex 9 KB 05/02/2009
> 07:51:36
> 122             call SleepMS(sleep)
> 178       call sleepMS(1000)
> 196    call Play("byebye.wav")
>
> oorexx\main\trunk\samples\windows\oodialog\oodlist.rex 13 KB 05/02/2009
> 07:51:36
> 209   call InfoDialog("Column Title : " info.!Text"d"x,
> 347     call InfoMessage("Last Name must be Specified !")
>
> oorexx\main\trunk\samples\windows\oodialog\oodraw.rex 26 KB 05/02/2009
> 07:51:36
> 103       call sleepms(500)
> 119       call sleepms(500)
> 127    call sleepms(1000)
> 185    call sleepms(2000)
> 221          call sleepms(2000)
> 247    call sleepms(2000)
> 268          call sleepms(2000)
> 286    call sleepms(1000)
> 327    call sleepms(1000)
> 363    call sleepms(1000)
> 395         call sleepms(2000)
> 464    call sleepms(2000)
> 474    call sleepms(2000)
> 566          call sleepms(2000)
>
> oorexx\main\trunk\samples\windows\oodialog\oodtree.rex 13 KB 05/02/2009
> 07:51:36
> 137       call InfoMessage("Data file " bmpFile " does not exist")
> 142       call InfoMessage("Data file " treefile " does not exist !")
> 147       call InfoMessage("Data file " itemFile " does not exist")
> 274     call InfoMessage("No item selected !")
> 290     call InfoMessage("No item selected !")
> 312   call InfoDialog( 'The selected item "'itemInfo.!Text'" has' children
> 'children. The index for the icon is "'itemInfo.!Image'"',
> 317   call InfoMessage("No help available.")
>
> oorexx\main\trunk\samples\windows\oodialog\oopet.rex 7 KB 05/02/2009
> 07:51:36
> 99       if beenhelped=0 then call Play("clap.wav")
> 146    call Play("help.wav")
>
> oorexx\main\trunk\samples\windows\oodialog\oopet1.rex 7 KB 05/02/2009
> 07:51:36
> 99       if beenhelped=0 then call Play("clap.wav")
> 146    call Play("help.wav")
>
> oorexx\main\trunk\samples\windows\oodialog\oophil.rex 18 KB 05/02/2009
> 07:51:36
> 309         call sleepms(2000)
> 361       if ds > 0 then call sleepms(ds*100)
> 372             call sleepms(300)
> 376             call sleepms(200)
> 379          call sleepms(ds//10 * 100)
>
> oorexx\main\trunk\samples\windows\oodialog\oovideo.rex 7 KB 05/02/2009
> 07:51:36
> 128       call Play("wav\take.wav")
>
> oorexx\main\trunk\samples\windows\oodialog\oowalk2.rex 7 KB 05/02/2009
> 07:51:36
> 159       call sleepms(1000)
>
> oorexx\main\trunk\samples\windows\oodialog\oowalker.rex 7 KB 05/02/2009
> 07:51:36
> 169       call sleepms(1000)
>
> oorexx\main\trunk\samples\windows\oodialog\propdemo.rex 20 KB 05/02/2009
> 07:51:36
> 144        call sleepms(1)
>
> oorexx\main\trunk\samples\windows\oodialog\examples\fileNameDialog_demo.rex
> 13 KB 05/02/2009 07:51:36
> 60     call infoDialog(msg)
> 100         call errorDialog('You Did Not Select A File')
> 102         call infoDialog('You Selected' a_file)
> 117         call errorDialog('You Did Not Select A File')
> 119         call infoDialog('You Selected' a_file)
> 134         call errorDialog('You Did Not Select A File')
> 136         call infoDialog('You Selected' a_file)
> 152         call errorDialog('You Did Not Select A File')
> 154         call infoDialog('You Selected' a_file)
> 168         call errorDialog('You Did Not Select A File')
> 176             call infoDialog(msg)
> 191         call errorDialog('You Did Not Provide A Save Name')
> 193         call infoDialog('You File Will Be Saved As' a_file)
> 207         call errorDialog('You Did Not Provide A Save Name')
> 209         call infoDialog('You File Will Be Saved As' a_file)
>
> oorexx\main\trunk\samples\windows\oodialog\examples\publicRoutines_demo.rex
> 18 KB 05/02/2009 07:51:36
> 105         call errorDialog('The expected audio file' filename 'does not
> exist')
> 121         call errorDialog('The expected audio file' filename 'does not
> exist')
> 137         call errorDialog('The expected audio file' filename 'does not
> exist')
> 174         call InfoDialog('You selected "Yes" - glad you like it')
> 176         call InfoDialog('You selected "No" - mind sharing what you think
> would improve the demonstration?')
> 183         call InfoDialog('You selected "Yes" - glad you like it')
> 185         call InfoDialog('You selected "No" - you must be hard to
> please')
> 230             call SysSleep(.01)
> 249             call ErrorDialog('Sorry, the dialog creation failed')
> 279         call errorDialog('There Is Not unTimed Message To Stop')
> 284 --    call time('r')
> 290     call infoDialog('Start TimeT..:' start_timeT '- End TimeT..:'
> end_timeT '- Duration..:' end_TimeT - start_TimeT 'Seconds')
> 291 --    call infoDialog('Total Elasped Time..:' time('e')~trunc 'Seconds')
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\employe4.rex 5 KB
> 05/02/2009 07:51:07
> 71     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\employe5.rex 7 KB
> 05/02/2009 07:51:07
> 98     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\employe6.rex 7 KB
> 05/02/2009 07:51:07
> 99     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\employe7.rex 7 KB
> 05/02/2009 07:51:07
> 100     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\employe8.rex 9 KB
> 05/02/2009 07:51:07
> 110     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\employe9.rex 9 KB
> 05/02/2009 07:51:07
> 106     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\empvalid.rex 5 KB
> 05/02/2009 07:51:07
> 72     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\emp_mend.rex 9 KB
> 05/02/2009 07:51:07
> 128     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\emp_menu.rex 9 KB
> 05/02/2009 07:51:07
> 111     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\oodialog\tutorial\em_categ.rex 9 KB
> 05/02/2009 07:51:07
> 112     call InfoMessage(title self~Name addition || "A"x || "City:"
> self~City || "A"x ||,
>
> oorexx\main\trunk\samples\windows\rexutils\drives.rex 14 KB 05/02/2009
> 07:51:00
> 59 call InfoDisplay("BOX")             -- display data with box
> characters     --
> 60 --call InfoDisplay("LINE")          -- display data without box
> characters  --
>
>
>
> ------------------------------------------------------------------------------
>
> _______________________________________________
> Oorexx-devel mailing list
> Oorexx-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>
>

------------------------------------------------------------------------------
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to