Query for numbers: 
31
44
242
12043
12481
12519
12526
12563
12574
13697
15272
16366
17462
17465
17625
18195
19551
19948
19993
20063
20072
20171
20213
20348
21275
21277
23162
24320
24893
24895
24990
24995
24996
25043
25229
25246
25267
25269
25274
25289
25454
25509
25544
25549
25566
25573
25632
25701
25753
25764
25769
25773
25808
25809
25819
25956
25968
26003
26010
26012
26045
26054
26076
26123
26162
26174
26206
26207
26213
26275
26277
26279
26282
26310
26316
26352
26612
26615
26616
26619
26620
26624
26666
26667
26674
26677
26679
26733
26808
26862
26871
26883
26888
26889
26936
26943
26952
26966
26967
26979
26990
27022
27023
27024
27025
27042
27043
27046
27054
27057
27060
27085
27108
27111
27112
27378
27388
27393
27406
27409
27421
27498
27510
27512
27515
27520
30843
32175
32176
32178
32440
32465
32468
32483
32484
32491
32506
32530
32532
32538
32565
32575
32580
32604
32626
32647
32649
32806
32853
32855
32864
32946
32968
32987
33047
33124
33145
33167
33168
33236
33254
33443
33749
33771
33959
33962
33963
33964
33965
33967
33968
34008
34010
34011
34012
34013
34014
34035
34039
34062
34073
34084
34135
34137
34138
34139
34140
34154
34155
34156
34160
34161
34162
34163
34166
34179
34390
34394
34395
34482
34496
34505
34592
34599
34602
34672
34882
34920
34934
34965
34966
34970
34971
34972
34973
34980
34982
34983
34994
35054
35056
35057
35080
35205
35206
35308
35363
35421
35431
35441
35509
35585
35710
35751
35754
35778
36097
36361
36631
36646
36660
36725
36832
36884
36957
36983
37000
37004
37039
37086
37087
37149
37161
37169
37246
37509
37540
37543
37573
37639
37656
37659
37869
37871
37926
37929
37955
37956
37973
37990
38204
40083
41279
41280
41520
41529
41534
41535
41537
41576
41577
41578
41828
41830
41853
41998
42003
42004
42029
42097
42099
42103
42108
42142
42299
42301
42408
42413
42508
42547
42852
42911
42913
44811
45635
47242
0
ADD
992

'^A94(47+57)/О-95-638407761^B1^C1'

ADD
992

'^A94(477)"19"/Р 49-810180463'

ADD
992

'^A94(=161.2)(47+57)/В 48-970230785'

ADD
992

'^A74я25/К 17-038957'

ADD
992

'^A88я2/П 37-458018'

ADD
992

'^A101/М 54-756988'

ADD
992

'^A101/В 74-515393'

ADD
992

'^A101/Б 90-753254'

ADD
992

'^A83.3(4Укр)я43/Р 50-476884199'

ADD
992

'^A83.3(4Укр)/К 30-850636'

ADD
992

'^A81.055.5/Р 13-875434895'

ADD
992

'^A81.411.4/О-54-005479825'

ADD
992

'^A74.00я73/М 29-809545466'

ADD
992

'^A74.00я73/М 29-797417606'

ADD
992

'^A614.8/Л 24-103505350'

ADD
992

'^A63.3(4Укр-4Пол)/Г 14-361091844'

ADD
992

'^A22.311/Л 15-729856977'

ADD
992

'^A94(477)"19"/С 21-484488994'

ADD
992

'^A22.12/Ш 88-689993052'

ADD
992

'^A81.471.1-55/Х 68-539105501'

ADD
992

'^A81.471.1-55/Х 68-137084179'

ADD
992

'^A81.471.1-55/Х 68-641864266'

ADD
992

'^A330.34/П 12-899347097'

ADD
992

'^A74.205/Ч-49-933857284'

ADD
992

'^A74.489.47я54/У 91-539450210'

ADD
992

'^A74.489.47я54/У 91-999673898'

ADD
992

'^A376-056.36/З-12-098639095'

ADD
992

'^A74.202.601/О-58-019738293'

ADD
992

'^A37.091.33/Ф 94-438745482'

ADD
992

'^A37.091.12:17/Ч-75-962430034'

ADD
992

'^A81/Д 69-550403711'

ADD
992

'^A81/Б 90-478517143'

ADD
992

'^A81/Р 45-046045339'

ADD
992

'^A81.41/М 45-325003807'

ADD
992

'^A81.411.4/В 68-906224404'

ADD
992

'^A81.411.4/Ж 78-186986044'

ADD
992

'^A81.411.4/Р 88-288870054'

ADD
992

'^A81.411.4/Р 88-300984835'

ADD
992

'^A81.411.4/К 64-370493890'

ADD
992

'^A81.411.4/С 91-271065462'

ADD
992

'^A81.411.2-5/Г 61-710753025'

ADD
992

'^A81.055.53/К 56-419973464'

ADD
992

'^A65.01я73/М 86-739148293'

ADD
992

'^A81.411.4/С 79-798868355'

ADD
992

'^A81.411.4/С 79-098294112'

ADD
992

'^A81.051/И 73-606780051'

ADD
992

'^A81.411.4-2/Б 87-365188575'

ADD
992

'^A81.411.4-21/І 45-001578622'

ADD
992

'^A81.411.4-2/Д 69-077509107'

ADD
992

'^A81.411.4-2/Ч-19-388971665'

ADD
992

'^A81.411.4-2/М 33-241950612'

ADD
992

'^A81.411.4-2/С 20-922152664'

ADD
992

'^A81.411.4-22/К 83-904332376'

ADD
992

'^A81.411.4-22/М 42-762661497'

ADD
992

'^A37.018/Д 58-965202'

ADD
992

'^A811.161.2/С 48-377138917'

ADD
992

'^A81.411.4-65/Б 24-880024596'

ADD
992

'^A81.411.4/К 36-584846223'

ADD
992

'^A811.161.2'373/М 48-654629189'

ADD
992

'^A81.411.4-3/П 27-078278722'

ADD
992

'^A81.411.4-3/Ч-46-450443348'

ADD
992

'^A81.411.4-3/С 45-466945664'

ADD
992

'^A81.411.4-3/П 35-824302196'

ADD
992

'^A81.411.4-3/С 91-168319077'

ADD
992

'^A81.411.4-5/К 66-929929020'

ADD
992

'^A81.411.4/Д 69-892956295'

ADD
992

'^A81.411.4-5/К 90-573332132'

ADD
992

'^A81.411.4-5/В 23-439021898'

ADD
992

'^A81.411.4/У 45-761690271'

ADD
992

'^A81.411.4/М 54-978498730'

ADD
992

'^A81.411.4/Д 53-546811800'

ADD
992

'^A81.411.4/М 54-992011673'

ADD
992

'^A81.411.4/М 54-026201351'

ADD
992

'^A81.411.4/М 48-959005121'

ADD
992

'^A373.016:811.161.2/Б 11-968367167'

ADD
992

'^A373.5.016:811.161/Г 52-379948866'

ADD
992

'^A373.5.016:811.161/Г 52-163137555'

ADD
992

'^A373.5.016:811.161/Г 52-132114298'

ADD
992

'^A811.161.2/Г 52-170317947'

ADD
992

'^A811.161.2/Г 52-195694699'

ADD
992

'^A811.161.2/Г 52-557736916'

ADD
992

'^A811.161.2/Г 52-181044825'

ADD
992

'^A94(470)/М 92-736200509'

ADD
992

'^A81.411.4/К 78-168832899'

ADD
992

'^A81.411.4/П 27-571808081'

ADD
992

'^A81.411.4/С 40-890100660'

ADD
992

'^A81.411.4/Т 36-676016243'

ADD
992

'^A821.161.2/Б 94-077337'

ADD
992

'^A82.3 (4Укр)/П 49-422595055'

ADD
992

'^A81.411.4/Р 65-789747990'

ADD
992

'^A81.411.4/Р 88-233250195'

ADD
992

'^A81.411.4/А 72-496914838'

ADD
992

'^A81.411.4/К 90-695831111'

ADD
992

'^A81.411.4/К 90-351558876'

ADD
992

'^A84.4(4)/К 32-740674768'

ADD
992

'^A82-84(100)=161.1/С 48-078526816'

ADD
992

'^A373.5/А 43-700489461'

ADD
992

'^A81.411.4/М 74-954672184'

ADD
992

'^A81.411.4/Г 54-730539349'

ADD
992

'^A81.411.4/П 40-457486250'

ADD
992

'^A81/Д 47-608839680'

ADD
992

'^A94(477)/П 32-966326689'

ADD
992

'^A37.016:9(075.3)/М 54-956172978'

ADD
992

'^A83.0/Б 23-000403220'

ADD
992

'^A74.266.3я73/М 54-306247099'

ADD
992

'^A83.0/В 67-730282574'

ADD
992

'^A83.0/В 67-844948443'

ADD
992

'^A83.0/П 12-987302290'

ADD
992

'^A83.0/В 24-964659481'

ADD
992

'^A83.0/Л 50-617630661'

ADD
992

'^A83.0/П 62-153025236'

ADD
992

'^A83.0/К 56-099887023'

ADD
992

'^A83.0/К 56-211701551'

ADD
992

'^A83/Б 88-714342073'

ADD
992

'^A83/М 64-914262575'

ADD
992

'^A821.161.2/К 95-437736'

ADD
992

'^A74.268.39(=411.4)/Н 42-828083081'

ADD
992

'^A821.161.2.09/Т 31-222778'

ADD
992

'^A74.268.39(=411.4)/Б 23-021800168'

ADD
992

'^A74.268.39(=411.4)/П 12-203929099'

ADD
992

'^A373.091.322:821/С 79-431595715'

ADD
992

'^A74.268.39(=411.4)/Б 23-715834001'

ADD
992

'^A74.268.39(=411.4)/С 54-430425592'

ADD
992

'^A74.268.39(=411.4)/В 41-043189187'

ADD
992

'^A821.161.2/Б 23-282295'

ADD
992

'^A376-056.34(072)/О-26-941671886'

ADD
992

'^A83.00/В 99-945172450'

ADD
992

'^A64(075)/Т 78-164701752'

ADD
992

'^A629(075)/Т 78-829446324'

ADD
992

'^A64(075)/Т 78-577468417'

ADD
992

'^A83.3(4=411.4)я222/Б 12-749662032'

ADD
992

'^A83.3(4=411.4)/Б 91-442293044'

ADD
992

'^A83.3(4=411.4)/Г 87-605258127'

ADD
992

'^A83.3(4=411.4)/М 69-457714945'

ADD
992

'^A83.3(4=411.4)/Л 69-125345593'

ADD
992

'^A83.3(4=411.4)/П 16-095877072'

ADD
992

'^A83.3(4=411.4)/К 39-614183593'

ADD
992

'^A821.161.2.09/З-36-594409691'

ADD
992

'^A821.161.2.09/Ф 33-642888557'

ADD
992

'^A821.161.2.09/Т 56-434860677'

ADD
992

'^A821.161.2.09/Д 36-485855561'

ADD
992

'^A83(4=411.4)/Х 94-813236858'

ADD
992

'^A821.161.2.09/В 29-975475528'

ADD
992

'^A81.161.2.09/Ч-15-542098420'

ADD
992

'^A821.161.2.09/Я 72-710020584'

ADD
992

'^A821.161.2.09/Д 81-241841207'

ADD
992

'^A821.161.2.09/Д 43-450672562'

ADD
992

'^A81.411.4я21/Д 36-047993665'

ADD
992

'^A821.161.2.09/З-36-751969906'

ADD
992

'^A821.161.2.09/Т 19-128794116'

ADD
992

'^A821.161.2.09/Г 85-508016287'

ADD
992

'^A821.161.2.09/Х 76-176105197'

ADD
992

'^A821.161.2.09/Т 76-231917305'

ADD
992

'^A83.3(4=411.4)-8/Б 23-642612375'

ADD
992

'^A821.161.2.09/Н 69-440319158'

ADD
992

'^A821.161.2.09/Н 20-117325606'

ADD
992

'^A821.161.2.09/С 30-261668312'

ADD
992

'^A000000083578821.161.2.09/К 39-355694898'

ADD
992

'^A821.161.2.09/Ш 96-535105286'

ADD
992

'^A821.161.2.09/К 48-384512923'

ADD
992

'^A821.161.2.09/К 23-951529333'

ADD
992

'^A821.161.2.09/О-54-498969271'

ADD
992

'^A821.161.2.09/М 95-047255902'

ADD
992

'^A83.3(4=411.4)-8/П 96-717018'

ADD
992

'^A22.14я721/І-89-164904'

ADD
992

'^A22.14я721/Б 36-707321'

ADD
992

'^A22.14я721/М 52-386277'

ADD
992

'^A22.14я721/Б 61-091119'

ADD
992

'^A22.14я721/Б 36-003440'

ADD
992

'^A22.14я721/К 48-980690'

ADD
992

'^A22.14я721/М 19-536962'

ADD
992

'^A22.151я721/Б 36-868246'

ADD
992

'^A22.151я721/Б 91-223960'

ADD
992

'^A22.151я721/Б 91-876865'

ADD
992

'^A22.151я721/А 76-210835'

ADD
992

'^A22.151я721/А 76-379588'

ADD
992

'^A22.151я721/А 76-242887'

ADD
992

'^A22.151я721/Г 29-075744'

ADD
992

'^A22.151я721/Г 29-700896'

ADD
992

'^A24.1я7/Л 18-578507'

ADD
992

'^A81.411.4я2/У 45-255041'

ADD
992

'^A81.411.4я2/О-48-586223'

ADD
992

'^A573(075)/Б 63-107229'

ADD
992

'^A573(075)/Б 63-269043'

ADD
992

'^A573(075)/М 26-626272'

ADD
992

'^A573(075)/С 13-561815'

ADD
992

'^A573(075)/З-32-449080'

ADD
992

'^A64(075)/Б 69-941085408'

ADD
992

'^A64(075)/Т 69-225904810'

ADD
992

'^A64(075)/Т 69-461024104'

ADD
992

'^A629(075)/Т 69-112639434'

ADD
992

'^A629(075)/Т 30-378878630'

ADD
992

'^A30я721/Т 69-834323'

ADD
992

'^A629(075)/Т 30-511992880'

ADD
992

'^A94(477)/К 48-630795205'

ADD
992

'^A004(075)/И 74-846074718'

ADD
992

'^A63.3(4Укр)46-8/Г 85-953800'

ADD
992

'^A63.3(4Укр)46/Б 77-920592'

ADD
992

'^A63.3(4Укр)46/Б 77-489730'

ADD
992

'^A63.3(4Укр)46/В 77-459363'

ADD
992

'^A94(477)/П 49-477678796'

ADD
992

'^A63.3(4Укр)46/О-54-389699'

ADD
992

'^A63.3(4Укр)46/К 59-297258'

ADD
992

'^A63.3(4Укр)46/Г 85-544272'

ADD
992

'^A63.3(4Укр)46/І-90-213297'

ADD
992

'^A94(477)"04/..."/Ч-15-744535688'

ADD
992

'^A821.161.2.09/С 76-131731934'

ADD
992

'^A821.161.2.09/А 62-355495054'

ADD
992

'^A821.161.2.09/П 32-554098342'

ADD
992

'^A81.411.2я72/Б 95-590487'

ADD
992

'^A81.411.2я72/Б 95-967743'

ADD
992

'^A81.411.2я721/Г 93-424593632'

ADD
992

'^A81.411.2я721/Г 93-728854'

ADD
992

'^A81.411.2я721/Г 93-578925'

ADD
992

'^A81.411.2я72/Б 20-550424'

ADD
992

'^A81.411.2я721/П 22-991553'

ADD
992

'^A81.411.2я721/П 22-895641'

ADD
992

'^A83.3(4=411.4)-8/П 49-658310'

ADD
992

'^A81.411.2я721/П 54-671714'

ADD
992

'^A821.161.2.09/Б96-782889926'

ADD
992

'^A821.161.2-92/Б96-277408836'

ADD
992

'^A821.161.2.09/К 48-645740853'

ADD
992

'^A821.161.2.09/А 62-248302149'

ADD
992

'^A821.161.2.09/Б 77-323108453'

ADD
992

'^A83.3(4=411.4)-8/Б 77-145069'

ADD
992

'^A821.161.2.09/Г 29-477300685'

ADD
992

'^A83.3(4=411.4)-8/Б 61-040983'

ADD
992

'^A821.161.2.09/Х 94-771116061'

ADD
992

'^A821.161.2.09/Ш 19-971203003'

ADD
992

'^A821.161.2.09/Н 60-018037330'

ADD
992

'^A83.3(0)я721/В 69-064390'

ADD
992

'^A821.161.2.09/К 79-274739655'

ADD
992

'^A821.161.2.09/Ж 84-716712576'

ADD
992

'^A821.161.2.09/Ш 19-524636594'

ADD
992

'^A821.161.2.09/Х 94-563885410'

ADD
992

'^A81.161.2.09/Л 34-099510383'

ADD
992

'^A821.161.2.09/Б 77-400134374'

ADD
992

'^A821.161.2.09/Г 14-395981686'

ADD
992

'^A821.161.2.09/Н 71-963625915'

ADD
992

'^A821.161.2.09/С 95-204664'

ADD
992

'^A821.161.2.09/С 85-722729133'

ADD
992

'^A821.161.2.09/Б 90-750853985'

ADD
992

'^A004(038)=161.2=11/К 48-615080'

ADD
992

'^A811.111(038)=161./А 62-016907'

ADD
992

'^A821.161.2.09/С 95-074260312'

ADD
992

'^A81'373(038)=161.1/Г 85-936794'

ADD
992

'^A821.161.2.09/Б 18-556535368'

ADD
992

'^A821.161.2.09/Л 45-563018'

ADD
992

'^A355.233.22(032)/Э 68-445738'

ADD
992

'^A821.161.2.09/К 15-825269590'

ADD
992

'^A821.161.2.09/К 55-321437924'

ADD
992

'^A821.161.2.09/К 17-466302137'

ADD
992

'^A821.161.2.09(036)/Л 64-974129'

ADD
992

'^A821.161.2.09/Г 82-978053422'

ADD
992

'^A821.161.2.09/Т 46-648131324'

ADD
992

'^A821.161.2.09/В 65-524331'

ADD
992

'^A821.161.2.09/К 61-775956'

ADD
992

'^A821.161.2.09/К 23-787782'

ADD
992

'^A821.161.2.09/Д 27-160860358'

ADD
992

'^A821.161.2.09/К 82-909999810'

ADD
992

'^A821.161.2.09/К 90-489611'

ADD
992

'^A821.161.2.09/К 43-584274'

ADD
992

'^A821.161.2.09/В 63-474679'

ADD
992

'^A821.161.2.09/П 96-035716'

ADD
992

'^A821.161.2.09/П 18-086986663'

ADD
992

'^A821.161.2.09/Б 77-641916'

ADD
992

'^A821.161.2.09/В 63-804982'

ADD
992

'^A821.161.2.09/Ф 75-903393'

ADD
992

'^A821.161.2.09/Д 27-692220'

ADD
992

'^A821.161.2.09/К 48-724565'

ADD
992

'^A821.161.2.09/Ф 75-629278'

ADD
992

'^A82.0/К 29-532845565'

ADD
992

'^A94(477)/П 84-121971052'

ADD
992

'^A94(477)/П 84-080968159'

ADD
992

'^A94(477)/Д 99-061498147'

ADD
992

'^A37.016/У 45-903226204'

ADD
992

'^A37.016/У 45-153079850'

ADD
992

'^A37.016/А 72-381181516'

ADD
992

'^A37.016/П 78-403492797'

ADD
992

'^A37.016/Г 19-780358980'

ADD
992

'^A37.016/Г 67-142101761'

ADD
992

'^A37.091/Ю 70-080827379'

ADD
992

'^A94(477)/Г 72-841269767'

ADD
992

'^A94(477+470)/Д 76-290518614'

ADD
992

'^A94(477)/К 93-465792698'

ADD
992

'^A94(477)/В 27-985339423'

ADD
992

'^A94(477)/П 27-392684134'

ADD
992

'^A94(477)/П 27-074516405'

ADD
992

'^A94(477)/П 41-352247786'

ADD
992

'^A94(477)/Ш 28-101234484'

ADD
992

'^A94(477)/В 11-766711418'

ADD
992

'^A94(477)/А 65-373592503'

ADD
992

'^A821.161.2.09/В 55-193962504'

ADD
992

'^A94(477)/У 45-662467034'

ADD
992

'^A94(477)"1959/1970/П 40-087319641'

ADD
992

'^A94(477)/П 40-730238777'

ADD
992

'^A94(477)"1941/1945/К 50-079170676'

ADD
992

'^A94(477)/Ф 33-398204813'

ADD
992

'^A94(477)/Р 88-913912653'

ADD
992

'^A94(477)"1941/1945/Г 39-976463519'

ADD
992

'^A39/Ш 66-797992375'

ADD
992

'^A811.112.2/Б 24-433747862'

ADD
992

'^A811.112.2/Г 67-944566834'

ADD
992

'^A94(470)/И 90-816177204'

ADD
992

'^A37.016/Б 91-056489091'

ADD
992

'^A581(092)/Л 22-180751504'

//УДАЛЕНИЕ/ПЕРЕНОС из мастера списания
// на входе 992
// ^A - шифр записи БД каталога
// ^B - признак удаления
// ^C - признак переноса в БД CMPL
REP
992
F
mpu,(v992/)

REPEAT
IF
if &uf('+97',v903)=&uf('Av992^A#1') then '1' fi
IF
if val(&uf('Av992^C#1'))=1 then '1' fi
// запись на перенос в CMPL
NEWMFN
'CMPL'
ALL
// удаляем все повторения кроме ^A=7
DEL
910
F
(if v910^A: '7' then '0' else '1' fi/)

DEL
940
*


DEL
1001
*


END
PUTLOG
'В БД CMPL новая запись с шифром ',,v903
FI
IF
if val(&uf('Av992^B#1'))=1 then '1' fi
// запись на удаление
PUTLOG
'Удалена запись каталога MFN=',f(val(mfn),0,0)
DELR
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
FI
FI
DEL
992
1


UNTIL
if p(v992) then '1' fi
DEL
992
*