22.01.2018 (М) Ф3: СТАНДАРТНАЯ СХЕМА ЗАПОЛНЕНИЯ БАЛАНСОВОЙ ФОРМЫ 3 ОТЧЁТ ОБ ИЗМЕНЕНИЯХ КАПИТАЛА — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
Строка 1: Строка 1:
 
<font size=4>
 
<font size=4>
  
  строки 3210,3310:  Длюбой  К80,81,83,82,84<br/>
+
Раздел 1
  строки 3220,3320:  Д80,81,83,82,84  Клюбой<br/>
+
  
   Если положительный ответ на вопрос "Чистую прибыль/убыток брать из формы 2?"
+
   строки 3210,3310Длюбой К80,81,83,82,84
  строка 3211,3311Д99 К84<br/>
+
   строки 3220,3320Д80,81,83,82,84 Клюбой
   строка 3221,3321Д84 К99<br/>
+
  
   строка 3212,3312Дначинается на 0  К83,84<br/>
+
Если положительный ответ на вопрос "Чистую прибыль/убыток брать из формы 2?"
   строка 3222,3322Д83,84 Кначинается на 0<br/>
+
   строки 3211,3311значение строки 2400 формы 2
 +
  строки 3221,3321:  не заполняются
 +
иначе
 +
   строки 3211,3311Д99  К84
 +
  строки 3221,3321: Д84  К99
  
 +
  строка 3212,3312:  Дначинается на 0  К83,84
 +
  строка 3222,3322:  Д83,84  Кначинается на 0
  
// из формы 2
+
   строки 3227,3327Д84 К75
if  gg3_99_from_gf2
+
   pp:=selectSQL('select '+SQLField('C190')+' C190, '+SQLField('L190')+' L190 from DOCS'+Ret_f_ext()+;
+
                " where KINDDOC='GF2' and LVLNUM='1' and NUMDOC='"+space(10)+"'", OpDataPath)
+
  c843311:=round((pp)->C190/prcsn,0) //для 3311
+
  if !Empty((pp)->L190);  gg3_2_inc_84_B_1:=round((pp)->L190/prcsn,0);  endif  //для 3211
+
  CloseTable(pp)
+
endif
+
  
 +
Раздел 2
  
gg3_2_div_84_B:=0  //3227
+
   строка 3400:       свёрнутое сальдо всех счетов, которые начинаются на 8
for  ii:=1  to  len(div_acnts)
+
   gg3_2_div_84_B:=gg3_2_div_84_B+GetGPRV('84',div_acnts[ii],old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)
+
next
+
  
 +
  строка 3401:      сальдо 84
  
gg3_2_div_84_E:=0  //3327
+
Раздел 3
for  ii:=1  to  len(div_acnts)
+
  gg3_2_div_84_E:=gg3_2_div_84_E+GetGPRV('84',div_acnts[ii],jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)
+
next
+
 
+
//Разделы 2,3
+
if  FactoryId!='VLK'
+
  gg3_3_all_before_P:=GetGSLD({'8',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD')  //декабрь позапрошлого
+
  gg3_3_all_before_B:=GetGSLD({'8',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD')  //декабрь прошлого
+
  gg3_3_all_after_P:=GetGSLD({'8',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD')  //январь прошлого
+
  gg3_3_all_after_B:=GetGSLD({'8',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD')  //январь отчётного
+
 
+
  gg3_3_all_accpol_I:=0  //18.03.2014 GetGPRV('99','8',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('8','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)
+
  gg3_3_all_accpol_O:=0
+
  gg3_3_all_err_I:=0
+
  gg3_3_all_err_O:=0
+
 
+
  gg3_3_income_before_P:=GetGSLD({'84',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD')  //декабрь позапрошлого
+
  gg3_3_income_before_B:=GetGSLD({'84',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD')  //декабрь прошлого
+
  gg3_3_income_after_P:=GetGSLD({'84',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD')  //январь прошлого
+
  gg3_3_income_after_B:=GetGSLD({'84',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD')  //январь отчётного
+
 
+
  gg3_3_income_accpol_I:=GetGPRV('99','84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('84','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)
+
  gg3_3_income_accpol_O:=0
+
  gg3_3_income_err_I:=0
+
  gg3_3_income_err_O:=0
+
 
+
  gg3_3_item1_before_P:=GetGSLD({'8?',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD')  //декабрь позапрошлого
+
  gg3_3_item1_before_B:=GetGSLD({'8?',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD')  //декабрь прошлого
+
  gg3_3_item1_after_P:=GetGSLD({'8?',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD')  //январь прошлого
+
  gg3_3_item1_after_B:=GetGSLD({'8?',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD')  //январь отчётного
+
 
+
  gg3_3_item1_accpol_I:=GetGPRV('99','8?',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('8?','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)
+
  gg3_3_item1_accpol_O:=0
+
  gg3_3_item1_err_I:=0
+
  gg3_3_item1_err_O:=0
+
 
+
  gg3_3_item2_before_P:=GetGSLD({'8?',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD')  //декабрь позапрошлого
+
  gg3_3_item2_before_B:=GetGSLD({'8?',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD')  //декабрь прошлого
+
  gg3_3_item2_after_P:=GetGSLD({'8?',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD')  //январь прошлого
+
  gg3_3_item2_after_B:=GetGSLD({'8?',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD')  //январь отчётного
+
 
+
  gg3_3_item2_accpol_I:=GetGPRV('99','8?',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('8?','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)
+
  gg3_3_item2_accpol_O:=0
+
  gg3_3_item2_err_I:=0
+
  gg3_3_item2_err_O:=0
+
endif
+
  
 +
  собирается по данным формы 1 - должна быть уже сформирована
 
</font>
 
</font>

Текущая версия на 12:42, 23 января 2018

Раздел 1

 строки 3210,3310:  Длюбой  К80,81,83,82,84
 строки 3220,3320:  Д80,81,83,82,84  Клюбой

Если положительный ответ на вопрос "Чистую прибыль/убыток брать из формы 2?"

 строки 3211,3311:  значение строки 2400 формы 2 
 строки 3221,3321:  не заполняются

иначе

 строки 3211,3311:  Д99  К84
 строки 3221,3321:  Д84  К99
 строка 3212,3312:  Дначинается на 0  К83,84
 строка 3222,3322:  Д83,84  Кначинается на 0
 строки 3227,3327:  Д84  К75

Раздел 2

 строка 3400:       свёрнутое сальдо всех счетов, которые начинаются на 8
 строка 3401:       сальдо 84

Раздел 3

 собирается по данным формы 1 - должна быть уже сформирована