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

Материал из Фабиус wiki
Перейти к: навигация, поиск
(Новая страница: «<font size=4> строки 3210,3310: Длюбой К80,81,83,82,84 строки 3220,3320: Д80,81,83,82,84 Клюбой строка 3211: Д99 К8…»)
 
м
Строка 1: Строка 1:
 
<font size=4>
 
<font size=4>
  
строки 3210,3310:  Длюбой  К80,81,83,82,84
+
  строки 3210,3310:  Длюбой  К80,81,83,82,84<br/>
строки 3220,3320:  Д80,81,83,82,84  Клюбой
+
  строки 3220,3320:  Д80,81,83,82,84  Клюбой<br/>
  
строка 3211:       Д99  К84
+
  Если положительный ответ на вопрос "Чистую прибыль/убыток брать из формы 2?"
строка 3212,3312Дначинается на 0  К83,84
+
  строка 3211,3311: Д99  К84<br/>
строка 3221:      Д84  К99
+
  строка 3221,3321:  Д84  К99<br/>
строка 3222,3322:  Д83  Кначинается на 0
+
  
 +
  строка 3212,3312:  Дначинается на 0  К83,84<br/>
 +
  строка 3222,3322:  Д83,84  Кначинается на 0<br/>
  
gg3_2_inc_84_B:=GetGPRV(,'84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)      //3210
 
gg3_2_inc_84_B_1:=GetGPRV('99','84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3211
 
  
gg3_2_inc_84_B_2:=GetGPRV('0','84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)    //3212
 
 
// из формы 2
 
// из формы 2
 
if  gg3_99_from_gf2
 
if  gg3_99_from_gf2
Строка 23: Строка 21:
 
endif
 
endif
  
gg3_2_dec_84_B:=GetGPRV('84',,old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)    //3220
 
 
gg3_2_dec_84_B_1:=GetGPRV('84','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)  //3221
 
 
gg3_2_dec_84_B_2:=GetGPRV('84','0',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)    //3222
 
  
 
gg3_2_div_84_B:=0  //3227
 
gg3_2_div_84_B:=0  //3227
Строка 34: Строка 27:
 
next
 
next
  
gg3_2_inc_84_E:=GetGPRV(,'84',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)            //3310
 
gg3_2_inc_84_E_1:=GetGPRV('99','84',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)      //3311
 
gg3_2_inc_84_E_2:=GetGPRV('0','84',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)        //3312
 
 
gg3_2_dec_84_E:=GetGPRV('84',,jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)            //3320
 
if  FactoryId='OTR'
 
  gg3_2_dec_84_E_1:=GetGPRV('84-1',,jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)      //3321
 
  gg3_2_dec_84_E_2:=GetGPRV('84-2',,jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)      //3322
 
else
 
  gg3_2_dec_84_E_1:=GetGPRV('84','99',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)    //3321
 
  gg3_2_dec_84_E_2:=GetGPRV('84','0',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)      //3322
 
endif
 
  
 
gg3_2_div_84_E:=0  //3327
 
gg3_2_div_84_E:=0  //3327

Версия 10:29, 23 января 2018

 строки 3210,3310:  Длюбой  К80,81,83,82,84
строки 3220,3320: Д80,81,83,82,84 Клюбой
 Если положительный ответ на вопрос "Чистую прибыль/убыток брать из формы 2?"
 строка 3211,3311:  Д99  К84
строка 3221,3321: Д84 К99
 строка 3212,3312:  Дначинается на 0  К83,84
строка 3222,3322: Д83,84 Кначинается на 0


// из формы 2 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


gg3_2_div_84_B:=0 //3227 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


gg3_2_div_84_E:=0 //3327 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