图书管理.mpr

vf 图书管理⑴ 根据E—R图设计关系模式；（每个关系模式2分

*       * Snippet:    5                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gc
clear windows
do 各出版社出书情况.qpr



*       *********************************************************
*       *                                                         
*       * _0V80LK7GD  ON SELECTION BAR 2 OF POPUP 查询            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   11       
*       * Called By:  ON SELECTION BAR 2 OF POPUP 查询            
*       * Prompt:     各单位借书情况统计                          
*       * Snippet:    6                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gd
clear windows
do 各单位借书情况.qpr



*       *********************************************************
*       *                                                         
*       * _0V80LK7GE  ON SELECTION BAR 3 OF POPUP 查询            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   12       
*       * Called By:  ON SELECTION BAR 3 OF POPUP 查询            
*       * Prompt:     各人借书情况                                
*       * Snippet:    7                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7ge
clear windows
use 各人借书情况
browse


*       *********************************************************
*       *                                                         
*       * _0V80LK7GF  ON SELECTION BAR 4 OF POPUP 查询            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   13       
*       * Called By:  ON SELECTION BAR 4 OF POPUP 查询            
*       * Prompt:     各出版社出书情况                            
*       * Snippet:    8                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gf
clear windows
use 各出版社图书视图
browse



*       *********************************************************
*       *                                                         
*       * _0V80LK7GG  ON SELECTION BAR 5 OF POPUP 查询            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   14       
*       * Called By:  ON SELECTION BAR 5 OF POPUP 查询            
*       * Prompt:     借阅各出版社图书情况                        
*       * Snippet:    9                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gg
clear windows
use 借阅各出版社视图
browse



*       *********************************************************
*       *                                                         
*       * _0V80LK7GH  ON SELECTION BAR 6 OF POPUP 查询            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   15       
*       * Called By:  ON SELECTION BAR 6 OF POPUP 查询            
*       * Prompt:     借书情况查询                                
*       * Snippet:    10                                          
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gh
clear windows
do form 借书情况查询



*       *********************************************************
*       *                                                         
*       * _0V80LK7GI  ON SELECTION BAR 1 OF POPUP 输出            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   18       
*       * Called By:  ON SELECTION BAR 1 OF POPUP 输出            
*       * Prompt:     读者登记表                                  
*       * Snippet:    11                                          
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gi
clear windows
report form 读者登记表


*       *********************************************************
*       *                                                         
*       * _0V80LK7GJ  ON SELECTION BAR 2 OF POPUP 输出            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   19       
*       * Called By:  ON SELECTION BAR 2 OF POPUP 输出            
*       * Prompt:     借书登记表                                  
*       * Snippet:    12                                          
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gj
clear windows
report form 借书登记表



*       *********************************************************
*       *                                                         
*       * _0V80LK7GK  ON SELECTION BAR 3 OF POPUP 输出            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   20       
*       * Called By:  ON SELECTION BAR 3 OF POPUP 输出            
*       * Prompt:     图书资料表                                  
*       * Snippet:    13                                          
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gk
clear windows
report form 图书资料表



*       *********************************************************
*       *                                                         
*       * _0V80LK7GL  ON SELECTION BAR 4 OF POPUP 输出            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  图书管理.MPR,            Record:   21       
*       * Called By:  ON SELECTION BAR 4 OF POPUP 输出            
*       * Prompt:     借书证                                      
*       * Snippet:    14                                          
*       *                                                         
*       *********************************************************
*
PROCEDURE _0v80lk7gl
clear windows
label form 借书证