SELECT ;
  ORGBASE_1.RN, ;
  ORGBASE_1.SHOWNAME AS FIO, ;
  substr(ZSUBDIV_1.NAME,len(alltrim(ZSUBDIV_1.number))+ 2 ,len(alltrim(ZSUBDIV_1.name))-len(alltrim(ZSUBDIV_1.number))- 1 ) as podrazdelenie, ;
  ZTIPDOL_1.NAME AS DOLJNOST, ;
  iif(ZFCAC_1.STARTDATE<=date( 2010 , 1 , 1 ),iif(ZFCAC_1.endDATE>=date( 2010 , 12 , 31 ), 12 ,month(ZFCAC_1.endDATE)),iif(ZFCAC_1.endDATE>=date( 2010 , 12 , 31 ), 13 -month(ZFCAC_1.startDATE),month(ZFCAC_1.endDATE)-month(ZFCAC_1.startDATE)+ 1 )) AS Q_M, ;
  ZVIDISP_1.CODE AS VID_LIC, ;
  sum(ZHIS.SUM) as s1 ;
FROM ;
  ZHIS ;
    left join ZFCAC as ZFCAC_1 on (ZHIS.FCAC_RN = ZFCAC_1.FCAC_RN) ;
      left join ZANK as ZANK_1 on (ZFCAC_1.ANK_RN = ZANK_1.ANK_RN) ;
        left join ORGBASE as ORGBASE_1 on (ZANK_1.ORGBASE_RN = ORGBASE_1.RN) ;
      left join ZPOST as ZPOST_1 on (ZFCAC_1.POST_RN = ZPOST_1.POST_RN) ;
        left join ZSUBDIV as ZSUBDIV_1 on (ZPOST_1.SUBDIV_RN = ZSUBDIV_1.SUBDIV_RN) ;
        left join ZTIPDOL as ZTIPDOL_1 on (ZPOST_1.TIPDOL_RN = ZTIPDOL_1.TIPDOL_RN) ;
      left join ZVIDISP as ZVIDISP_1 on (ZFCAC_1.VIDISP_RN = ZVIDISP_1.VIDISP_RN) ;
    left join ZSNU as ZSNU_1 on (ZHIS.SNU_RN = ZSNU_1.SNU_RN) ;
 ;
WHERE (Zsnu_1.catalog_rn = "00Zт") AND  ;
  (Zhis.year =  2010 ) AND  ;
  ((Zsubdiv_1.name = "1")or(Zsubdiv_1.name = "2")) ;
GROUP BY ZVIDISP_1.CODE, ZHIS.ANK_RN ;
ORDER BY ORGBASE_1.SHOWNAME, ZVIDISP_1.CODE ;
INTO CURSOR SrZr01

SELECT ;
  SRZR01.* ;
FROM ;
  SRZR01 ;
WHERE !(Srzr01.vid_lic = "Внут") ;
INTO CURSOR SrZr02

SELECT ;
  SRZR01.* ;
FROM ;
  SRZR01 ;
WHERE (Srzr01.vid_lic = "Внут") ;
INTO CURSOR SrZr03

SELECT ;
  SRZR03.RN, ;
  SRZR03.FIO, ;
  SRZR02.PODRAZDELENIE, ;
  SRZR02.DOLJNOST, ;
  SRZR02.Q_M, ;
  SRZR03.VID_LIC, ;
  SRZR03.S1 ;
FROM ;
  SRZR03 ;
    left join SRZR02 on (SRZR03.RN=SRZR02.RN) ;
INTO CURSOR SrZr04