Can someone give me a hint how to do this?  I thought it would be easy,
and I've done it before but in a dynamic panel.

I would simply like to display a panel that cycles up and down months
using the PF7/PF8 key.

I tried this, but what I found was that my code never gets control when
PF7/PF8 are hit.  What have I forgotten?

Do forever                   
  "DISPLAY PANEL(EXPMVIEW)"  
  If RC > 4                  
    Then Leave               
  "VGET (ZVERB)"             
  Select                     
    When ZVERB = 'UP'        
      Then Do                
        Call IncMonth        
    End                      
    When ZVERB = 'DOWN'      
      Then Do                
        Call DecMonth        
    End                      
    Otherwise                
      Nop                    
  End                        
End                          

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to