База данных страховой компании

| Категория реферата: Рефераты по страхованию
| Теги реферата: изложение 8 класс русский язык, персонал реферат
| Добавил(а) на сайт: Sitnikov.

ADD(YU)

CLEAR(ST).

ADD(YU)...

ADD(YU).
! ------ ВЫБОРКА ПО УСТАВНОМУ КАПИТАЛУ ----> YU DOS,ASCII,NAME('YU.YU')

RECORD
ST STRING(56)..

GROUP,OVER(ST)

STRING(1)
ST1 STRING(@N4)

STRING(1)
ST2 STRING(30)

STRING(5)
ST3 STRING(@N_8.2)

.
T REAL

CODE

PN#=0

CREATE(YU)

ST='СПИСОК СТРАХОВЫХ ОРГАНИЗАЦИЙ, ИМЕЮЩИХ УСТАВНЫЙ КАПИТАЛ'

ST=CENTER(ST)

ADD(YU)

CLEAR(ST)
ST='ОТ '&MEM:NG/1000&' ДО '&MEM:VG/1000&' МЛН.РУБ. ЗА '&MEM:GOD&' ГОД'
ST=CENTER(ST)

ADD(YU)

CLEAR(ST)

IF MEM:PR=2

ST=XRE:IREG

ST=CENTER(ST)

ADD(YU)

CLEAR(ST).

Рекомендуем скачать другие рефераты по теме: культура шпаргалки, сочинения по русскому языку, рефераты на казахском.

Claw.ru | Рефераты по страхованию | База данных страховой компании