[Coco] Basic09 Parameters.

[coco at jechar.ca]

Sorry forgot calling program.

try: test testfile.txt outputest.txt
  then try
      test testfile.txt

  from OS9 Command line.

On 2018-10-18 20:35, coco at jechar.ca wrote:
> CODE as you requested Wayne.
> =====================
> PROCEDURE test
> (* test *)
> DIM ifilh:STRING
> DIM oifilh:STRING
> DIM inline:STRING[106]
> (* Prameters *)
> PARAM a,b:STRING
> 
> IF a="-?" THEN
>   PRINT "Syntax:"
>   PRINT "test InFileName"
>   PRINT "or"
>   PRINT "test InFileName OutFileName"
>   PRINT
>   END
> ELSE
>   OPEN #ifilh,a:READ
> ENDIF
> 
> IF b="" THEN
>    PRINT "outfile"
>    CREATE #ofilh,"outfile":READ
> ELSE
>    PRINT b
>    CREATE #ofilh,b:READ
> ENDIF
> 
> 
> CLOSE #ofilh
> CLOSE #ifilh
> 
> END
> =====================
> 
> On 2018-10-18 19:51, Wayne Campbell wrote:
>> I really need to see your code to see what is going on. Provide the 
>> RUN
>> statement if the params are being passed from another procedure, along 
>> with
>> the DIM statements for those parameters and the assignment statements
>> assigning value to them, and the PARAM statements in the receiving
>> procedure, and the statements trying to test or use them.
>> 
>> I'll see what I can tell you.
>> 
>> Wayne
>>