158 REGEN - Regenerate Customer Data from Data Base

The AMO REGEN is used for creating a MML batch (MML = Man-Machine-Language) to allow the transfer or backup of a complete or partial system database in a ’portable’ form (e.g. version upgrades). Reentry of the database via MML batch is then performed at a later date with the aid of AMO GENDB.
A REGEN takes the form of a sorted file of REGEN MML commands read sequentially whereby the REGENERATE action of the various AMOs is started via the USER-TASK. A REGEN control file exists for each HW module with the appropriate REGEN MML commands and the name:
An example for the regeneration with a private MML-File
Let’s create the private MML-File TESTMMLDAT in the directory :PAS:APSI/TEMP/ of the hard disk with the following content:
STA-LIST:":PAS:APSI/TEMP/TESTMMLD/E",,,T;
0002 :M2 1 ADD-CODEW:BH6X7KZP25CS5BJRX99UGMJ3YC8SVWRJ32W5U6LRMTKNA2X95
0003 :M2 1 ADD-ANSU:SYSNO,"NO SWITCH NUMBER ","ZDBCCDSF";
0004 :M2 1 ADD-ANSU:SYSNO,"NO SWITCH NUMBER ","ZDBCCDS1";
0005 :M2 1 ADD-ANSU:SYSNO,"NO SWITCH NUMBER ","ZDBCCDS2";
0006 :M2 1 ADD-UCSU:LTG,1,"Q2261-X ";
0007 :M2 1 ADD-UCSU:LTU,1,1,"Q2261-X ",CC80F,LOCAL,"
0008 :M2 1 ADD-UCSU:LTU,1,2,"Q2166-X ",L80XF,LOCAL,"
0009 :M2 1 ADD-UCSU:LTU,1,3,"Q2166-X ",L80XF,LOCAL,"
000A :M2 1 ADD-UCSU:LTU,1,4,"Q2166-X ",L80XF,LOCAL,"
000B :M2 1 ADD-UCSU:AP,1,75,"Q2302-X ",5,LTUW,APDL,100.100.103.10,10
000C :M2 1 ADD-BCSU:PER,1,1,55,"Q2205-X ",1,0,,,,,,A;
000D :M2 1 ADD-BCSU:PER,1,1,61,"Q2164-X ",1,0,,NO,300,700,300,A;
000E :M2 1 ADD-BCSU:PER,1,1,67,"Q2168-X ",1,0,,NO,300,700,300,A;
000F :M2 1 ADD-BCSU:PER,1,1,73,"Q2153-X100",0,0,,,,,,A;
0010 :M2 1 ADD-BCSU:PER,1,1,79,"Q2150-X ",0,0,,,,,,A;
0011 :M2 1 ADD-BCSU:PER,1,1,85,"Q2480-X ",0,0,,,,,,A;
0012 :M2 1 ADD-BCSU:PER,1,1,91,"Q2246-X ",0,0,,,,,,A;
0013 :M2 1 ADD-BCSU:PER,1,1,97,"Q2025-X300",0,0,,,,,,A;
0014 :M2 1 ADD-BCSU:PER,1,1,103,"Q2121-X ",0,0,,,,,,A;
0015 :M2 1 ADD-BCSU:PER,1,2,25,"Q2205-X ",1,0,,,,,,A;
0016 :M2 1 ADD-BCSU:PER,1,2,31,"Q2117-X ",0,0,,,,,,A;
0017 :M2 1 ADD-BCSU:PER,1,2,43,"Q6401-X ",3,0,,,,,,A;
0018 :M2 1 ADD-BCSU:PER,1,2,55,"Q2214-X ",0,0,,,,,,A;
0019 :M2 1 ADD-BCSU:DIU,1,2,61,"Q2195-X ",0,,,,,1,,,,,A;
001A :M2 1 ADD-BCSU:DIU,1,2,79,"Q2096-X200",0,,,,,0,,,,,A;
001B :M2 1 ADD-BCSU:DIU,1,2,85,"Q2096-X200",0,,,,,0,,,,,A;
001C :M2 1 ADD-BCSU:DIU,1,2,91,"Q2096-X200",0,,,,,0,,,,,A;
001D :M2 1 ADD-BCSU:DIU,1,2,97,"Q2096-X200",0,,,,,0,,,,,A;
001E :M2 1 ADD-BCSU:DIU,1,2,115,"Q2096-X200",0,,,,,0,,,,,A;
001F :M2 1 ADD-BCSU:PER,1,2,121,"Q2174-X ",0,0,,,,,,A;
0020 :M2 1 ADD-BCSU:PER,1,3,25,"Q2246-X ",0,0,,,,,,A;
0021 :M2 1 ADD-BCSU:PER,1,3,37,"Q2150-X ",0,0,,,,,,A;
0022 :M2 1 ADD-BCSU:PER,1,3,85,"Q2153-X ",0,0,,,,,,A;
0023 :M2 1 ADD-BCSU:PER,1,3,115,"Q2168-X ",1,0,,NO,300,700,300,A;
0024 :M2 1 ADD-BCSU:PER,1,4,43,"Q2153-X ",0,0,,,,,,A;
0025 :M2 1 ADD-BCSU:PER,1,4,49,"Q2168-X ",1,0,,NO,300,700,300,A;
0026 :M2 1 ADD-BCSU:PER,1,4,91,"Q2246-X ",0,0,,,,,,A;
0027 :M2 1 ADD-BCSU:PER,1,4,121,"Q2150-X ",0,0,,,,,,A;
0028 :M2 1 ADD-BCSU:RG,1,75,19,"Q2258-X ",UN25H65V,0;
0029 :M2 1 ADD-BCSU:PER,1,75,25,"Q2157-X ",0,0,,,,,,A;
002A :M2 1 ADD-BCSU:PER,1,75,37,"Q2150-X ",0,0,,,,,,A;
002B :M2 1 ADD-BCSU:PER,1,75,49,"Q2150-X ",0,0,,,,,,A;
002C :M2 1 ADD-BCSU:PER,1,75,55,"Q2205-X ",1,0,,,,,,A;
002D :M2 1 ADD-BCSU:PER,1,75,61,"Q2144-X ",0,0,,NO,300,700,300,A;
002E :M2 1 ADD-BCSU:PER,1,75,67,"Q2121-X ",0,0,,,,,,A;
002F :M2 1 ADD-BCSU:PER,1,75,79,"Q2158-X ",1,0,,NO,300,700,300,A;
0030 :M2 1 ADD-BCSU:PER,1,75,85,"Q2158-X ",1,0,,NO,300,700,300,A;
0031 :M2 1 ADD-BCSU:PER,1,75,91,"Q2025-X300",0,0,,,,,,A;
0032 :M2 1 ADD-BCSU:PER,1,75,97,"Q2025-X300",0,0,,,,,,A;
0033 :M2 1 ADD-BCSU:DIU,1,75,103,"Q2096-X200",0,,,,,0,,,,,A;
0034 :M2 1 ADD-BCSU:PER,1,75,109,"Q2157-X ",0,0,,,,,,A;
0035 :M2 1 ADD-BCSU:PER,1,75,115,"Q2214-X ",0,0,,,,,,A;
0036 :M2 1 ADD-BCSU:PER,1,75,121,"Q2214-X ",0,0,,,,,,A;
0038 :M1 1 ADD-BCSM:A1,BC,STYPE,"B5301-X ",WITHOUT;
0039 :M1 1 ADD-BCSM:A1,EC,STYPE,"B5318-X ";
003A :M1 1 ADD-LCSM:A1,ASYNC,2,4800,7,SL1,INT,INT;
AMO-LIST -92 LISTING OF FILES
:AMD:FBT/FAMUP/NOUNN/<x>/<yyyyy>

<x> : A (ADS) / S (SWU)

<yyyyy>: Regenerated NOUN