[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference iosg::all-in-1_v30

Title:*OLD* ALL-IN-1 (tm) Support Conference
Notice:Closed - See Note 4331.l to move to IOSG::ALL-IN-1
Moderator:IOSG::PYE
Created:Thu Jan 30 1992
Last Modified:Tue Jan 23 1996
Last Successful Update:Fri Jun 06 1997
Number of topics:4343
Total number of notes:18308

1127.0. "INDEX form and /ALIAS usage " by INFACT::BEVIS (Pigs, Pigs, Pigs...) Mon Jul 27 1992 17:56

    Prior notes don't seem to address this...
    
    I have an INDEX form that scrolls a dataset just fine.  The scroll
    data is derived from OA$DIR and I would like to incorporate a status
    field that indicates whether or not the file exists on a batch queue.
    
    Hence, I need to call a script/comfile combination to gather data for
    this status field.  I have this part working fine, but I can't seem to
    figure out a way to call this script on a per-line basis on the INDEX
    form.
    
    I tried /PRE_FUNCTION on the ;;FIELD;; that references the file from
    OA$DIR, but (not surprisingly) that did not work - display only field,
    so I presume the preprocessing wouldn't kick in anyway.
    
    As an experiment, I qualified the ;;STATUS;; field with /ALIAS=#XYZ,
    and succeeded in loading the contents of #XYZ into each and every line
    of the form, so all I have to do is find a way to load that symbol
    after calling my script, yet before the line is displayed on the form.
    
    Is this possible?  I know it is not "really" the intent of INDEX forms
    to do this sort of thing.
    
    Don
T.RTitleUserPersonal
Name
DateLines
1127.1P.S.INFACT::BEVISPigs, Pigs, Pigs...Mon Jul 27 1992 18:034
    By the ALL-IN-1 V2.4, not V3.0
    
    dnb
    
1127.2/ALIAS=OA$FUNCTION="DO your-script"HYTIDE::CREAMERMon Jul 27 1992 18:3511
    
    Don,
    
    Insert a display-only, no-echo field before the status field on each
    line and use /ALIAS=OA$FUNCTION="DO script" to load the #XYZ symbol.
    Then the STATUS field will have /ALIAS=#XYZ to display the value of 
    #XYZ on the screen.
    
    HTH,
    
    Jack
1127.3Neat!INFACT::BEVISBeware the treacherous Eye of TerrorMon Jul 27 1992 20:087
    Very clever, Jack.  Had'nt considered OA$FUNCTION as a "symbol" that
    /ALIAS would accept.  Yet, it works!
    
    thanks,
    
    Don
    
1127.4Another method...LARVAE::PATON_SIt's not easy having a good time!Tue Jul 28 1992 14:1913
    Another method which avoids creating a dummy field is to put the
    assigning of the /ALIAS symbol into the BIND statement.
    
    Eg. In EM$INDEX$OPTIONS
    
    ;;~~BIND_USING_SEARCH_FOLDER~~;;
    
    .IF #EMIPH == "*EMI1" THEN GET #NEWPH = "*EMI2"  ELSE GET #NEWPH = "*EMI1"\
    GET OA$FUNCTION = "BIND " #NEWPH " TO CAB$ WITH .FOLDER == #SEARCH_FOLDER
     AND @'#X'=OA$FUNCTION='DO FWP_CHECK_TYPE' NES '1'"\