Имя: Пароль:
1C
1С v8
Изменить ОКАТО_КПП в документе справке о доходах
,
0 franchisees
 
07.02.14
10:20
Почему то, не изменяет реквизит, чреез действие, где ошибка

--------------------------------
//                            Запрос=новый Запрос;
//    Запрос.Текст="ВЫБРАТЬ
//                 |    СотрудникиОрганизаций.Физлицо,
//                 |    СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.КодПоОКАТО КАК КодПоОКАТО,
//                 |    СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.КПП КАК КПП,
//                 |    СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.КодПоОКТМО  КАК  КодПоОКТМО
//                 |ИЗ
//                 |    Справочник.СотрудникиОрганизаций КАК СотрудникиОрганизаций
//                 |ГДЕ
//                 |    СотрудникиОрганизаций.Физлицо = &Физик";
//    Запрос.УстановитьПараметр("Физик", Сотрудник);
//    Результат = Запрос.Выполнить().Выбрать();
//    Пока Результат.Следующий() Цикл
//        ОКАТО_КПП1 = Результат.КодПоОКТМО;
//        ОКАТО_КПП2 = Результат.КПП;
//        
//         ОКАТО_КПП = ОКАТО_КПП1 + "/" + ОКАТО_КПП2
////        КодПоОКАТО= Результат.КодПоОКТМО + "/" + Результат.КПП;
//        //КодПоОКАТО = Результат.КодПоОКТМО + "/" + Результат.КПП;
//КонецЦикла;
1 Wobland
 
07.02.14
10:21
конечно, не изменяет, там где ошибка
2 franchisees
 
07.02.14
10:32
Каким можно сделать изменение в документе, если запрос не работает
3 franchisees
 
07.02.14
10:32
Каким *образом
4 Wobland
 
07.02.14
10:37
неужели сначала починить запрос?
5 George Wheels
 
07.02.14
10:40
А Сотрудник какого типа?
6 Strogg
 
07.02.14
10:42
Про что ветка-то? О_О
7 Wobland
 
07.02.14
10:45
(6) крайние новости об ошибках
8 Strogg
 
07.02.14
10:47
(7) так у него весь запрос заремлен - откуда ошибки-то?
9 piter3
 
07.02.14
10:55
(2)снять признак спец док 2013
10 franchisees
 
07.02.14
11:02
Через действие, сделал, вроде бы работает

-----------------------------------
Запрос=новый Запрос;
    Запрос.Текст="ВЫБРАТЬ
    |    СотрудникиОрганизаций.Физлицо,
    |    СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.КодПоОКАТО КАК КодПоОКАТО,
    |    СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.КПП КАК КПП,
    |    СотрудникиОрганизаций.ТекущееПодразделениеОрганизации.КодПоОКТМО  КАК  КодПоОКТМО
    |ИЗ
    |    Справочник.СотрудникиОрганизаций КАК СотрудникиОрганизаций
    |ГДЕ
    |    СотрудникиОрганизаций.Физлицо = &Физик";
    Запрос.УстановитьПараметр("Физик", Сотрудник);
    Результат = Запрос.Выполнить().Выбрать();
    Пока Результат.Следующий() Цикл
        
        ОКТМО_КПП1 = Результат.КодПоОКТМО;
        КПП       = Результат.КПП;
        
        ОКТМО_КПП = ОКТМО_КПП1 + "/" + КПП;
        ОКАТО_КПП = ОКТМО_КПП1 + "/" + КПП;
        КодИФНС1 = Лев(КПП, 4);
        КодИФНС = КодИФНС1;
11 Serg_1960
 
07.02.14
11:30
(имхо) Понятия "ФизЛицо" и "Сотрудник" не стоит путать - можно нарваться на неприятности для совместителей.