DO
SELECT a
RELEASE WINDOW win4
RELEASE WINDOW win3
REPLACE record_num WITH f.PRGa
n=alltrim (surname) + « »+ Alltrim (name) +« »+ Alltrim (patron)
_peject=«after»
SET PRINTER ON
SET CONSOLE OFF
PRINTJOB
? space ((80-len (n)) / 2), n
WAIT «Друк» NOWAIT WINDOW
?
? « Таб. номер: », org_num
? « Страховий номер: », ins_num
? « Прізвище: », surname
? « Ім'я: », name
? « Батькові: », patron
? « Стать: », sex
? « Дата народження: », birth_date
? « Місце народження: », birthplace
? « Національність: », national
? « Соціальне походження: », SOCIAL
? « Громадянство: », citizen
? « Освіта: », educat
? « Назва навчального закладу: », NAME_EDU
? « Форма навчання: », form_train
? « Рік закінчення: », year_end
? « Диплом: », diploma
? « Кваліфікація за дипломом: », qual_dip
? « Спеціальність за дипломом: », spec_dip
? « Вид найму: », kind_hir
? « Вид роботи: », KIND_WRK
? « Вчений ступінь: », s_degree
? « Вчене звання: », s_rank
? « Вузька спеціальність: », mar_spec
? « Сімейний стан: », mar_status
? « Профспілка: », tr_union
? « Група інвалідності: », group
? « Пенсіонер?: », Pensioner
? « Учасник війни?: », Partic_war
? « Домашній індекс: », post_index
? « Район: », region
? « Область: », area
? « Домашня адреса: », address
? « Домашній телефон: », telephone
? « Військовий обов'язок: », conscript
? « Військове звання: », milit_rank
? « Номер ВУС: », number
? « Військовий квиток: », mil_ticket
? « Придатність до військової служби: », mil_valid
? « Ставлення до бронювання: », attitude
? « Наявність моб. приписи: », mobile_ins
? « Група обліку: », group_acc
? « Категорія обліку: », category_a
? « Райвійськкомат: », commissar
? « Дата початку строкової служби: », start_date
? « Дата закінчення срочн.служби: », close_date
? « Дата остан. проходження: », last_date
? « Установа: », company
? « Підрозділ: », subdivis
? « Поточна посаду: », cur_post ...