#include "s_public.ch" //обязательно указывать во всех листингах

//Примеры использования универсальной функции GRefer для простейших реестров

FUNCTION CodOp()
LOCAL cScreen:=SAVESCREEN()
LOCAL cHead:='Справочник кодов операций движения ТМЦ'
LOCAL cHead1:="Приход"
LOCAL pVid:="1",pType:="1"
GRefer('sclad\MCodOp',pVid,pType,'Справочник кодов операций движения ТМЦ',;
   cHead1,,,'cFind$UPPER(Name)','NoEdit')
RESTSCREEN(,,,,cScreen)
RETURN(NIL)


FUNCTION VidOpl()
GRefer('sclad\MVPay',,,'Справочник видов оплат',,,,'cFind$UPPER(Name)')
RETURN(NIL)

FUNCTION VidPrim()
GRefer('sclad\MPrim',,,'Справочник примечаний',,,,'cFind$UPPER(Name)')
RETURN(NIL)