Создание базы данных “Электроприборы”, страница 6

*       *                                                        

*       * _0J8113ZCQ  ON SELECTION BAR 2 OF POPUP работасбаз     

*       *                                                        

*       * Procedure Origin:                                      

*       *                                                        

*       * From Menu:  ELECTRICAL-DEVICES.MPR,            Record:    6

*       * Called By:  ON SELECTION BAR 2 OF POPUP работасбаз     

*       * Prompt:     Ввод данных                                

*       * Snippet:    2                                           

*       *                                                        

*       *********************************************************

*

PROCEDURE _0j8113zcq

close all

use d:\ngtu\субд\rgr\electrical-devices

append

*       *********************************************************

*       *                                                        

*       * _0J8113ZCS  ON SELECTION BAR 3 OF POPUP работасбаз     

*       *                                                        

*       * Procedure Origin:                                      

*       *                                                        

*       * From Menu:  ELECTRICAL-DEVICES.MPR,            Record:    7

*       * Called By:  ON SELECTION BAR 3 OF POPUP работасбаз     

*       * Prompt:     Редактирование                             

*       * Snippet:    3                                          

*       *                                                        

*       *********************************************************

*

PROCEDURE _0j8113zcs

close all

use d:\ngtu\субд\rgr\electrical-devices

edit

*       *********************************************************

*       *                                                        

*       * _0J8113ZCU  ON SELECTION BAR 4 OF POPUP работасбаз     

*       *                                                        

*       * Procedure Origin:                                      

*       *                                                        

*       * From Menu:  ELECTRICAL-DEVICES.MPR,            Record:    8

*       * Called By:  ON SELECTION BAR 4 OF POPUP работасбаз     

*       * Prompt:     Вывод на экран                             

*       * Snippet:    4                                          

*       *                                                        

*       *********************************************************

*

PROCEDURE _0j8113zcu

report form d:\ngtu\субд\rgr\electrical-devices.frx

*       *********************************************************

*       *                                                        

*       * _0J8113ZD0  ON SELECTION BAR 1 OF POPUP запросы        

*       *                                                        

*       * Procedure Origin:                                       

*       *                                                        

*       * From Menu:  ELECTRICAL-DEVICES.MPR,            Record:   11

*       * Called By:  ON SELECTION BAR 1 OF POPUP запросы        

*       * Prompt:     Сведения о приборах                        

*       * Snippet:    5                                          

*       *                                                        

*       *********************************************************

*

PROCEDURE _0j8113zd0

report form d:\ngtu\субд\rgr\electrical-devices.frx

*       *********************************************************

*       *                                                        

*       * _0J8113ZD3  ON SELECTION BAR 4 OF POPUP запросы        

*       *                                                        

*       * Procedure Origin:                                      

*       *                                                        

*       * From Menu:  ELECTRICAL-DEVICES.MPR,            Record:   25