? « Дата прийому на роботу: », employment
? « Дата закінчення випробувальний. терміну: », trial_clos
? « Дата звільнення: », date_dis
? « Причина звільнення: », reason_dis
? « ІПН: », inn
? « Серія свідоцтво. налогоплатель.: », series_tax
? « Номер свідоцтво. налогоплатель.: », num_tax
? « Дата свідоцтво. налогоплатель.: », date_tax
? SPACE (25), «Освіта (дополніт.):», EDU_NUM
org_num1=org_num
EDU_NUM1=EDU_NUM
SELECT c
SET FILTER TO org_num=org_num1
GO TOPn=1 TO EDU_NUM1
? « Поступив: », date_begin,« Закінчив: », date_end
? « Назва у / з: », name_educ
? « Освіта: », education
? « Диплом: », dipl
? « Форма навчання: », form_tr
? « Кваліфікація: », qualific
? « Спеціальність: », special
? REPLICATE («-», 39)
SKIPnFILTER TOa
? SPACE (25), «Володіння иностран. мовами: », LANG_NUM_NUM1=LANG_NUMdFILTER TO org_num=org_num1
GO TOPn=1 TO LANG_NUM1
? « Мова: », oth_lang,« Рівень володіння: », level
SKIPnFILTER TOa
? SPACE (25), «Наявність судимості:», conv_num_num1=conv_numeFILTER TO org_num=org_num1
GO TOPn=1 TO conv_num1
? « Дата винесення вироку: », date_verd
? « Стаття: », article,« Термін: », period
? REPLICATE («-», 39)
SKIPnFILTER TOa
? SPACE (25), «Склад сім'ї:», famil_num_f1=famil_numfFILTER TO org_num=org_num1
GO TOPn=1 TO struct_f1
? « Дата народження: », date_relat,« Прізвище, ініціали: », names
? « Ступінь споріднення: », relation,« На утриманні: », expense
? REPLICATE («-», 39)
SKIPnFILTER TOa
? SPACE (12), «Паспортні дані:», passportbTOP
f=0
LOCATE FOR org_num=org_num1
DO WHILE EOF () =. f.
IF FOUND () =. t.
f=f +1
ENDIF
CONTINUE
ENDDOFILTER TO org_num=org_num1
GO TOPn=1 TO f
? « Ким видано: », exp_given
? « Дата видачі: », date_distr
? SPACE (25), «Прописка:»
? « Індекс: », index_p
? « Область: », area_p
? « Район: », region_p
? « Місто: », city_p
? « Населений пункт: », point_p
? « Вулиця: », street_p
? « Будинок: », house_p
? « Корпус: », corps_p
