Месяц: Апрель 2017

Не понимаю разработчиков в 1С

Из жизни

С какого то перепуга убрали возможность увидеть код элемента некоторых справочников. Например в Рознице 2.2. — никакими средствами не увидеть код склада. На форумах народ пишет что «ищите по реквизитам или наименованию». Но! У склада нет того реквизита который бы мог быть уникальным. Например у меня следующая структура складов (с группами):

-Вологда
—Ремонты
—Готовые-Москва
—Ремонты
—Готовые

И всё.. Приплыли. По реквизиту не найдешь, по названию то-же — есть одинаковые. Плюс где гарантия что кому-то не захочется справочник переименовать?? Выход искать — только по коду.

Пришлось написать обработку которая выводит кода всех складов. Бред!

Оставить комментарий , ,

Проверка наличия индекса массива в массиве

1C

Почему то в 1С нет встроенной функции проверка наличия индекса в массиве. Хотя в принципе понятно, индекс идет по порядку, и если проверяемое значение меньше количества элементов в массиве, то индекса нет. Но мне приспичило… Вот результат:

Оставить комментарий ,

Вставка QR кода в текст RTF

PHP

Ну примерно так.. Пришлось еще конвертировать из png в jpg, т.к. png рандомно не распознается Microsoft Word как картинка.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
CreateQr($blibase,$number,abs($rec),$number.'qr_pay.png');
png2jpg ("/tmp/$number"."qr_pay.png","/tmp/$number"."qr_pay.jpg",100);
$b=fopen("/tmp/$number"."qr_pay.jpg","rb");    
$imgData=getimagesize("/tmp/$number"."qr_pay.jpg");
$newImage="";
$newImagePre="{\\*\\shppict{\\pict \\jpegblip \\picw".$imgData[0]." \\pich".$imgData[1]." \\wbmbitspixel24 ";
while (!feof($b)) {
    $newImage.= fgets($b);
}
$hex=bin2hex($newImage);
        $imgDat=$newImagePre.$hex."}}";
//    $temp .$imgDat;
$temp = str_replace("!qrkode!", $imgDat, $temp);
 
function png2jpg($originalFile, $outputFile, $quality) {
    $image = imagecreatefrompng($originalFile);
    imagejpeg($image, $outputFile, $quality);
    imagedestroy($image);
}