Forums before death by AOL, social media and spammers... "We can't have nice things"
|    comp.os.vms    |    DEC's VAX* line of computers & VMS.    |    264,096 messages    |
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
|    Message 262,806 of 264,096    |
|    =?UTF-8?Q?Arne_Vajh=C3=B8j?= to All    |
|    Re: VMS x86-64 database server    |
|    09 Jul 25 10:13:18    |
   
   From: arne@vajhoej.dk   
      
   On 7/9/2025 6:16 AM, hb0815 wrote:   
   > On 7/9/25 04:18, Arne Vajhøj wrote:   
   >> First I don't think a verb qualifier and a per-file qualifier with same   
   >> name will work well.   
   >   
   > Depends on what you mean with "well". It works and it is used: see   
   > $ HELP SEARCH /KEY   
   > ... and documented in the Utility Routines Manual.   
      
   The issue is that I cannot find a path prefix that restrict qualifier   
   to the parameter for usage by CLI$PRESENT.   
      
   $ type duo.cld   
   define verb duo   
    image "sys$disk:[]duo"   
    parameter p1, value(type=$file, list, required)   
   qualifier q, placement=positional   
   $ type duo.pas   
   [inherit('sys$library:pascal$cli_routines')]   
   program duo(input,output);   
      
   type   
    pstr = varying [255] of char;   
      
   var   
    fnm, a, b : pstr;   
      
   begin   
    if odd(cli$present('Q')) then begin   
    writeln('Q=present')   
    end else begin   
    writeln('Q=notpresent')   
    end;   
    while odd(cli$get_value('P1', fnm.body, fnm.length)) do begin   
    write(fnm);   
    if odd(cli$present('Q')) then begin   
    write(' Q=present')   
    end else begin   
    write(' Q=notpresent')   
    end;   
    writeln;   
    end;   
   end.   
   $ set command duo   
   $ pas duo   
   $ link duo   
   $ duo 1.txt/q,2.txt,3.txt/q   
   Q=notpresent   
   1.txt Q=present   
   2.txt Q=notpresent   
   3.txt Q=present   
   $ duo/q 1.txt/q,2.txt,3.txt/q   
   Q=present   
   1.txt Q=present   
   2.txt Q=present   
   3.txt Q=present   
      
   Where:   
    2.txt Q=present   
   is not what was intended.   
      
   In general I like CLD and CLI$ concept, but I would have preferred   
   CLI$ to expose the context they use instead of having it hidden.   
      
   > If you do not want to use an option, you can (create and) add your   
   > shareable image to a shareable image library. Such a library can be   
   > used on the command line - with the /LIBRARY qualifier.   
      
   Yes.   
      
   Arne   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   
|
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
(c) 1994, bbs@darkrealms.ca