--
-- Created by ada_generator.py on 2017-09-05 20:57:19.274362
-- 
with Ukds;


with Ada.Containers.Vectors;

with Environment;

with DB_Commons; 

with GNATCOLL.SQL_Impl;
with GNATCOLL.SQL.Postgres;
with DB_Commons.PSQL;


with Ada.Exceptions;  
with Ada.Strings; 
with Ada.Strings.Wide_Fixed;
with Ada.Characters.Conversions;
with Ada.Strings.Unbounded; 
with Text_IO;
with Ada.Strings.Maps;
with Connection_Pool;
with GNATColl.Traces;


-- === CUSTOM IMPORTS START ===
-- === CUSTOM IMPORTS END ===

package body Ukds.Frs.Frs1516_IO is

   use Ada.Strings.Unbounded;
   use Ada.Exceptions;
   use Ada.Strings;

   package gsi renames GNATCOLL.SQL_Impl;
   package gsp renames GNATCOLL.SQL.Postgres;
   package gse renames GNATCOLL.SQL.Exec;
   package dbp renames DB_Commons.PSQL;
   
   use Base_Types;
   
   log_trace : GNATColl.Traces.Trace_Handle := GNATColl.Traces.Create( "UKDS.FRS.FRS1516_IO" );
   
   procedure Log( s : String ) is
   begin
      GNATColl.Traces.Trace( log_trace, s );
   end Log;
   
   
   -- === CUSTOM TYPES START ===
   -- === CUSTOM TYPES END ===

   --
   -- generic packages to handle each possible type of decimal, if any, go here
   --

   --
   -- Select all variables; substring to be competed with output from some criteria
   --
   SELECT_PART : constant String := "select " &
         "user_id, edition, year, sernum, benunit, int1hd, int2hd, int3hd, int4hd, int5hd," &
         "int6hd, int7hd, int8hd, int9hd, int10hd, int11hd, int12hd, int13hd, int14hd, int15hd," &
         "int16hd, int17hd, int18hd, int19hd, int21hd, int22hd, int23hd, int24hd, int25hd, int26hd," &
         "int27hd, int28hd, int29hd, int30hd, int1sp, int2sp, int3sp, int4sp, int5sp, int6sp," &
         "int7sp, int8sp, int9sp, int10sp, int11sp, int12sp, int13sp, int14sp, int15sp, int16sp," &
         "int17sp, int18sp, int19sp, int21sp, int22sp, int23sp, int24sp, int25sp, int26sp, int27sp," &
         "int28sp, int29sp, int30sp, intx1hd, intx2hd, intx3hd, intx4hd, intx5hd, intx6hd, intx7hd," &
         "intx8hd, intx9hd, intx10hd, intx11hd, intx12hd, intx13hd, intx14hd, intx15hd, intx16hd, intx17hd," &
         "intx18hd, intx19hd, intx21hd, intx22hd, intx23hd, intx24hd, intx25hd, intx26hd, intx27hd, intx28hd," &
         "intx29hd, intx30hd, intx1sp, intx2sp, intx3sp, intx4sp, intx5sp, intx6sp, intx7sp, intx8sp," &
         "intx9sp, intx10sp, intx11sp, intx12sp, intx13sp, intx14sp, intx15sp, intx16sp, intx17sp, intx18sp," &
         "intx19sp, intx21sp, intx22sp, intx23sp, intx24sp, intx25sp, intx26sp, intx27sp, intx28sp, intx29sp," &
         "intx30sp, invt1hd, invt2hd, invt3hd, invt4hd, invt5hd, invt6hd, invt7hd, invt8hd, invt9hd," &
         "invt10hd, invt11hd, invt12hd, invt13hd, invt14hd, invt15hd, invt16hd, invt17hd, invt18hd, invt19hd," &
         "invt21hd, invt22hd, invt23hd, invt24hd, invt25hd, invt26hd, invt27hd, invt28hd, invt29hd, invt30hd," &
         "invt1sp, invt2sp, invt3sp, invt4sp, invt5sp, invt6sp, invt7sp, invt8sp, invt9sp, invt10sp," &
         "invt11sp, invt12sp, invt13sp, invt14sp, invt15sp, invt16sp, invt17sp, invt18sp, invt19sp, invt21sp," &
         "invt22sp, invt23sp, invt24sp, invt25sp, invt26sp, invt27sp, invt28sp, invt29sp, invt30sp, nsa1hd," &
         "nsa2hd, nsa3hd, nsa4hd, nsa5hd, nsa6hd, nsa7hd, nsa8hd, nsa9hd, nsa10hd, nsa11hd," &
         "nsa12hd, nsa13hd, nsa14hd, nsa15hd, nsa16hd, nsa17hd, nsa18hd, nsa19hd, nsa21hd, nsa22hd," &
         "nsa23hd, nsa24hd, nsa25hd, nsa26hd, nsa27hd, nsa28hd, nsa29hd, nsa30hd, nsa1sp, nsa2sp," &
         "nsa3sp, nsa4sp, nsa5sp, nsa6sp, nsa7sp, nsa8sp, nsa9sp, nsa10sp, nsa11sp, nsa12sp," &
         "nsa13sp, nsa14sp, nsa15sp, nsa16sp, nsa17sp, nsa18sp, nsa19sp, nsa21sp, nsa22sp, nsa23sp," &
         "nsa24sp, nsa25sp, nsa26sp, nsa27sp, nsa28sp, nsa29sp, nsa30sp, ablehd, ablesp, abs1pdhd," &
         "abs1pdsp, absparhd, absparsp, abspayhd, abspaysp, abswhyhd, abswhysp, abswkhd, abswksp, acshd," &
         "acssp, acctqhd, acctqsp, acsamthd, acsamtsp, acspdhd, acspdsp, actacihd, actacisp, emahd," &
         "emasp, emaamthd, emaamtsp, emapdhd, emapdsp, agehd, agesp, agehqhd, agehqsp, aliamthd," &
         "aliamtsp, alimnyhd, alimnysp, alipdhd, alipdsp, aliushd, aliussp, absallhd, absallsp, organhd," &
         "organsp, fosterhd, fostersp, adopthd, adoptsp, pasbalhd, pasbalsp, porganhd, porgansp, pfostehd," &
         "pfostesp, padopthd, padoptsp, aluamthd, aluamtsp, alupdhd, alupdsp, anyacchd, anyaccsp, anyedhd," &
         "anyedsp, anymonhd, anymonsp, anype1hd, anype1sp, anype2hd, anype2sp, anype3hd, anype3sp, anype4hd," &
         "anype4sp, anype5hd, anype5sp, anype6hd, anype6sp, anype7hd, anype7sp, abspamhd, abspamsp, abspexhd," &
         "abspexsp, apdpdhd, apdpdsp, pabspahd, pabspasp, basacthd, basactsp, bfdhd, bfdsp, bfdamthd," &
         "bfdamtsp, pbfdhd, pbfdsp, bfdvalhd, bfdvalsp, careabhd, careabsp, careahhd, careahsp, carecbhd," &
         "carecbsp, carechhd, carechsp, careclhd, careclsp, careflhd, careflsp, carefrhd, carefrsp, careothd," &
         "careotsp, carerhd, carersp, cbaamthd, cbaamtsp, cbchkhd, cbchksp, changehd, changesp, chbflghd," &
         "chbflgsp, chknophd, chknopsp, fpchd, fpcsp, fuchd, fucsp, fhbhd, fhbsp, fwtchd," &
         "fwtcsp, fctchd, fctcsp, fishd, fissp, fjsahd, fjsasp, fesahd, fesasp, claimahd," &
         "claimasp, cohabhd, cohabsp, condithd, conditsp, blodgehd, blodgesp, ctclm1hd, ctclm1sp, ctclm2hd," &
         "ctclm2sp, cupchkhd, cupchksp, curacthd, curactsp, curqulhd, curqulsp, blheadhd, blheadsp, blrenthd," &
         "blrentsp, pblrenhd, pblrensp, ddaprghd, ddaprgsp, ddatrehd, ddatresp, ddatrphd, ddatrpsp, defrpnhd," &
         "defrpnsp, dependhd, dependsp, disacahd, disacasp, qpiphd, qpipsp, qdlahd, qdlasp, qaahd," &
         "qaasp, qsdahd, qsdasp, qibhd, qibsp, qiidbhd, qiidbsp, discoahd, discoasp, disd01hd," &
         "disd01sp, disd02hd, disd02sp, disd03hd, disd03sp, disd04hd, disd04sp, disd05hd, disd05sp, disd06hd," &
         "disd06sp, disd07hd, disd07sp, disd08hd, disd08sp, disd09hd, disd09sp, disd10hd, disd10sp, disdifhd," &
         "disdifsp, dlachd, dlacsp, dlamhd, dlamsp, dlshd, dlssp, dlsamthd, dlsamtsp, pdlshd," &
         "pdlssp, dlsvalhd, dlsvalsp, dobhd, dobsp, h3qualhd, h3qualsp, dvil3ahd, dvil3asp, dvil4ahd," &
         "dvil4asp, dvjb12hd, dvjb12sp, dvmarhd, dvmarsp, edl1ahd, edl1asp, pedl1ahd, pedl1asp, edl1obhd," &
         "edl1obsp, edl2ahd, edl2asp, pedl2ahd, pedl2asp, edl2obhd, edl2obsp, edatthd, edattsp, edhrhd," &
         "edhrsp, edtyphd, edtypsp, empconhd, empconsp, empocchd, empoccsp, empshd, empssp, empbhd," &
         "empbsp, empchd, empcsp, empilohd, empilosp, es2000hd, es2000sp, ethgr3hd, ethgr3sp, ethgpshd," &
         "ethgpssp, etngrphd, etngrpsp, eualamhd, eualamsp, eualmnhd, eualmnsp, peualihd, peualisp, euetyphd," &
         "euetypsp, everwkhd, everwksp, ehbct1hd, ehbct1sp, fllwphd, fllwpsp, ftedhd, ftedsp, ftwkyrhd," &
         "ftwkyrsp, gebacthd, gebactsp, giltcthd, giltctsp, gpispchd, gpispcsp, gpjesahd, gpjesasp, gpuchd," &
         "gpucsp, granthd, grantsp, gt1valhd, gt1valsp, gt2valhd, gt2valsp, gt1dirhd, gt1dirsp, gt2dirhd," &
         "gt2dirsp, grtnumhd, grtnumsp, gt1scehd, gt1scesp, gt2scehd, gt2scesp, gt1oshd, gt1ossp, gt2oshd," &
         "gt2ossp, gtahd, gtasp, healthhd, healthsp, heartvhd, heartvsp, heatadhd, heatadsp, hholdrhd," &
         "hholdrsp, hourabhd, hourabsp, hourahhd, hourahsp, hrcarehd, hrcaresp, hourcbhd, hourcbsp, hourchhd," &
         "hourchsp, hourclhd, hourclsp, hourfrhd, hourfrsp, hourothd, hourotsp, hourrehd, hourresp, hourtthd," &
         "hourttsp, hpersohd, hpersosp, hrpidhd, hrpidsp, hsvperhd, hsvpersp, agegp2hd, agegp2sp, agegphd," &
         "agegpsp, quninshd, quninssp, qtubenhd, qtubensp, qsicinhd, qsicinsp, qaccinhd, qaccinsp, qpehinhd," &
         "qpehinsp, qhosinhd, qhosinsp, qfsbenhd, qfsbensp, qcichd, qcicsp, qotbenhd, qotbensp, incdurhd," &
         "incdursp, incsehd, incsesp, indinchd, indincsp, indisbhd, indisbsp, inearnhd, inearnsp, ininvhd," &
         "ininvsp, inirbehd, inirbesp, injlonhd, injlonsp, injhrshd, injhrssp, innirbhd, innirbsp, inothbhd," &
         "inothbsp, inpenihd, inpenisp, inrinchd, inrincsp, inrpinhd, inrpinsp, itvlichd, itvlicsp, intxcdhd," &
         "intxcdsp, investhd, investsp, isa1tyhd, isa1tysp, isa2tyhd, isa2tysp, isactihd, isactisp, jobawahd," &
         "jobawasp, jobbyrhd, jobbyrsp, qcbhd, qcbsp, qgahd, qgasp, qmahd, qmasp, lareghd," &
         "laregsp, likewkhd, likewksp, limitlhd, limitlsp, lktimehd, lktimesp, lktrnhd, lktrnsp, lkworkhd," &
         "lkworksp, loanhd, loansp, loannuhd, loannusp, lstwkmhd, lstwkmsp, lstwkyhd, lstwkysp, wkswkdhd," &
         "wkswkdsp, marithd, maritsp, mr1hd, mr1sp, mr2hd, mr2sp, mntar1hd, mntar1sp, mntar2hd," &
         "mntar2sp, mntar3hd, mntar3sp, mntar4hd, mntar4sp, mntar5hd, mntar5sp, mntnc1hd, mntnc1sp, mntnc2hd," &
         "mntnc2sp, mntnc3hd, mntnc3sp, mntnc4hd, mntnc4sp, mntnc5hd, mntnc5sp, mntpayhd, mntpaysp, pmr1hd," &
         "pmr1sp, pmr2hd, pmr2sp, mntpr1hd, mntpr1sp, mntpr2hd, mntpr2sp, mntpr3hd, mntpr3sp, mr12mhd," &
         "mr12msp, mntt1hd, mntt1sp, mntt2hd, mntt2sp, mntt3hd, mntt3sp, mntus1hd, mntus1sp, mntus2hd," &
         "mntus2sp, umr1hd, umr1sp, umr2hd, umr2sp, pumr1hd, pumr1sp, pumr2hd, pumr2sp, mntw1hd," &
         "mntw1sp, mntw2hd, mntw2sp, mntw3hd, mntw3sp, mntw4hd, mntw4sp, mntw5hd, mntw5sp, mshd," &
         "mssp, nanid1hd, nanid1sp, nanid2hd, nanid2sp, nanid3hd, nanid3sp, nanid4hd, nanid4sp, nanid5hd," &
         "nanid5sp, nanid6hd, nanid6sp, nitrnhd, nitrnsp, niamthd, niamtsp, niethghd, niethgsp, nixhbbhd," &
         "nixhbbsp, ninid1hd, ninid1sp, ninid2hd, ninid2sp, ninid3hd, ninid3sp, ninid4hd, ninid4sp, ninid5hd," &
         "ninid5sp, ninid6hd, ninid6sp, ninid7hd, ninid7sp, nincs2hd, nincs2sp, nininchd, ninincsp, ninearhd," &
         "ninearsp, nininvhd, nininvsp, ninpenhd, ninpensp, ninrinhd, ninrinsp, ninseihd, ninseisp, pniamthd," &
         "pniamtsp, nireghd, niregsp, nirelghd, nirelgsp, nolk1hd, nolk1sp, nolk2hd, nolk2sp, nolk3hd," &
         "nolk3sp, nowanthd, nowantsp, nssechd, nssecsp, numjobhd, numjobsp, numj2hd, numj2sp, ocnumhd," &
         "ocnumsp, oddjobhd, oddjobsp, oldstdhd, oldstdsp, oabparhd, oabparsp, otamthd, otamtsp, otpamthd," &
         "otpamtsp, otappdhd, otappdsp, qehbtbhd, qehbtbsp, qwidplhd, qwidplsp, qinwkchd, qinwkcsp, qrtwkchd," &
         "qrtwkcsp, qothbehd, qothbesp, othtaxhd, othtaxsp, otinvahd, otinvasp, pareamhd, pareamsp, qpchd," &
         "qpcsp, qrphd, qrpsp, qbbhd, qbbsp, qafcshd, qafcssp, qwwphd, qwwpsp, penflghd," &
         "penflgsp, penwl1hd, penwl1sp, penwl2hd, penwl2sp, penwl3hd, penwl3sp, penwl4hd, penwl4sp, penwl5hd," &
         "penwl5sp, penwl6hd, penwl6sp, pepscthd, pepsctsp, personhd, personsp, qpipdhd, qpipdsp, qpipmhd," &
         "qpipmsp, poaccthd, poacctsp, pocardhd, pocardsp, ppnumchd, ppnumcsp, proptxhd, proptxsp, ptwkyrhd," &
         "ptwkyrsp, relp1hd, relp1sp, relp2hd, relp2sp, relp3hd, relp3sp, relp4hd, relp4sp, relp5hd," &
         "relp5sp, relp6hd, relp6sp, relp7hd, relp7sp, relp8hd, relp8sp, relp9hd, relp9sp, relp10hd," &
         "relp10sp, relp11hd, relp11sp, relp12hd, relp12sp, relp13hd, relp13sp, relp14hd, relp14sp, reasonhd," &
         "reasonsp, redamthd, redamtsp, redundhd, redundsp, rednethd, rednetsp, redtaxhd, redtaxsp, relhrphd," &
         "relhrpsp, relgewhd, relgewsp, relgschd, relgscsp, rprofhd, rprofsp, retirehd, retiresp, retir1hd," &
         "retir1sp, retreshd, retressp, renthd, rentsp, royalhd, royalsp, sleephd, sleepsp, forpenhd," &
         "forpensp, restrchd, restrcsp, sapadjhd, sapadjsp, sdem01hd, sdem01sp, sdem02hd, sdem02sp, sdem03hd," &
         "sdem03sp, sdem04hd, sdem04sp, sdem05hd, sdem05sp, sdem06hd, sdem06sp, sdem07hd, sdem07sp, sdem08hd," &
         "sdem08sp, sdem09hd, sdem09sp, sdem10hd, sdem10sp, sdem11hd, sdem11sp, sdem12hd, sdem12sp, inseinhd," &
         "inseinsp, sdemphd, sdempsp, sexhd, sexsp, sichd, sicsp, sidqnhd, sidqnsp, sloshd," &
         "slossp, slramthd, slramtsp, slrppdhd, slrppdsp, smpajhd, smpajsp, sc2010hd, sc2010sp, qsfgrhd," &
         "qsfgrsp, qssmthd, qssmtsp, qlgdwphd, qlgdwpsp, qlglahd, qlglasp, blindhd, blindsp, parsihd," &
         "parsisp, deafhd, deafsp, spouthd, spoutsp, sppadjhd, sppadjsp, spyrothd, spyrotsp, srentahd," &
         "srentasp, psrenthd, psrentsp, sfispchd, sfispcsp, sfjesahd, sfjesasp, sruchd, srucsp, sspajhd," &
         "sspajsp, gtsavahd, gtsavasp, stshcthd, stshctsp, tdaywkhd, tdaywksp, agefedhd, agefedsp, tmpjobhd," &
         "tmpjobsp, tesscthd, tessctsp, totgrahd, totgrasp, tothouhd, tothousp, totinthd, totintsp, totocchd," &
         "totoccsp, trainhd, trainsp, trnallhd, trnallsp, ttbprxhd, ttbprxsp, tuborrhd, tuborrsp, typeedhd," &
         "typeedsp, unpd1hd, unpd1sp, unpd2hd, unpd2sp, untrcthd, untrctsp, upersohd, upersosp, agewidhd," &
         "agewidsp, kidwidhd, kidwidsp, quchd, qucsp, qhbhd, qhbsp, qwtchd, qwtcsp, qctchd," &
         "qctcsp, qishd, qissp, qjsahd, qjsasp, qesahd, qesasp, qcahd, qcasp, waithd," &
         "waitsp, whresphd, whrespsp, whoctbhd, whoctbsp, widocchd, widoccsp, wintflhd, wintflsp, workinhd," &
         "workinsp, wpahd, wpasp, wpbahd, wpbasp, wtclm1hd, wtclm1sp, wtclm2hd, wtclm2sp, yjblevhd," &
         "yjblevsp, ystwkhd, ystwksp, as011hd, as012hd, as013hd, as014hd, as011sp, as012sp, as013sp," &
         "as014sp, as021hd, as022hd, as021sp, as022sp, as031hd, as031sp, as051hd, as052hd, as053hd," &
         "as054hd, as055hd, as056hd, as057hd, as051sp, as052sp, as053sp, as054sp, as055sp, as056sp," &
         "as057sp, as061hd, as061sp, as071hd, as071sp, as081hd, as082hd, as083hd, as084hd, as085hd," &
         "as081sp, as082sp, as083sp, as084sp, as085sp, as101hd, as101sp, as111hd, as111sp, as121hd," &
         "as121sp, as131hd, as131sp, as141hd, as142hd, as143hd, as141sp, as142sp, as143sp, as151hd," &
         "as151sp, as161hd, as161sp, as191hd, as191sp, as211hd, as212hd, as213hd, as214hd, as211sp," &
         "as212sp, as213sp, as214sp, as261hd, as261sp, as271hd, as272hd, as271sp, as272sp, as281hd," &
         "as281sp, as291hd, as292hd, as293hd, as291sp, as292sp, as293sp, stdlachd, stdlamhd, stcbhd," &
         "stpenchd, strphd, stwphd, stwdphd, stwwphd, stsdahd, staahd, sticahd, stjsahd, stiidbhd," &
         "stesahd, stibhd, stishd, stmahd, stshhd, stgahd, stwtchd, stctchd, stwtclhd, stctclhd," &
         "stuchd, stpipdhd, stpipmhd, stdlacsp, stdlamsp, stcbsp, stpencsp, strpsp, stwpsp, stwdpsp," &
         "stwwpsp, stsdasp, staasp, sticasp, stjsasp, stiidbsp, stesasp, stibsp, stissp, stmasp," &
         "stshsp, stgasp, stwtcsp, stctcsp, stwtclsp, stctclsp, stucsp, stpipdsp, stpipmsp, dlacahd," &
         "dlamohd, cbhd, lpencrhd, rphd, wphd, wdphd, wwphd, sdahd, aahd, icahd," &
         "jsahd, iidbhd, esahd, ibhd, ishd, mahd, sfmghd, sffghd, othbenhd, tubenhd," &
         "fsbenhd, sicinhd, accinhd, hosinhd, gtshd, gahd, iwchd, r2wchd, widplhd, uninshd," &
         "wfamthd, dssdpihd, dssdpjhd, sfrpaihd, sfrpajhd, exhbhd, perhinhd, otsiinhd, cichd, bowtchd," &
         "boctchd, bowtclhd, boctclhd, hbhd, uchd, pipdhd, pipmhd, lndwphd, lnlahd, dwpauchd," &
         "sfrpuchd, dlacasp, dlamosp, cbsp, lpencrsp, rpsp, wpsp, wdpsp, wwpsp, sdasp," &
         "aasp, icasp, jsasp, iidbsp, esasp, ibsp, issp, masp, sfmgsp, sffgsp," &
         "othbensp, tubensp, fsbensp, sicinsp, accinsp, hosinsp, gtssp, gasp, iwcsp, r2wcsp," &
         "widplsp, uninssp, wfamtsp, dssdpisp, dssdpjsp, sfrpaisp, sfrpajsp, exhbsp, perhinsp, otsiinsp," &
         "cicsp, bowtcsp, boctcsp, bowtclsp, boctclsp, hbsp, ucsp, pipdsp, pipmsp, lndwpsp," &
         "lnlasp, dwpaucsp, sfrpucsp, ltdlachd, ltdlamhd, ltcbhd, bopenchd, ltrphd, ltwphd, ltwdphd," &
         "ltwwphd, ltsdahd, ltaahd, lticahd, ltjsahd, ltiidbhd, ltesahd, ltibhd, ltishd, ltmahd," &
         "ltshhd, ltgahd, hwtchd, hctchd, hwtclhd, hctclhd, ltuchd, ltpipdhd, ltpipmhd, ltdlacsp," &
         "ltdlamsp, ltcbsp, bopencsp, ltrpsp, ltwpsp, ltwdpsp, ltwwpsp, ltsdasp, ltaasp, lticasp," &
         "ltjsasp, ltiidbsp, ltesasp, ltibsp, ltissp, ltmasp, ltshsp, ltgasp, hwtcsp, hctcsp," &
         "hwtclsp, hctclsp, ltucsp, ltpipdsp, ltpipmsp, pdlacahd, pdlamohd, pcbhd, hpenchd, prphd," &
         "pwphd, pwdphd, pwwphd, psdahd, paahd, picahd, pjsahd, piidbhd, pesahd, pibhd," &
         "pishd, pmahd, pothbehd, ptubenhd, pfsbenhd, psicinhd, paccinhd, phosinhd, pgtshd, pgahd," &
         "iwcpdhd, r2wcpdhd, puninshd, pdsspihd, pdsspjhd, pexhbhd, ppehinhd, potsinhd, pdcichd, wwtchd," &
         "wctchd, wwtclhd, wctclhd, phbhd, puchd, ppipdhd, ppipmhd, pdwpuchd, pdlacasp, pdlamosp," &
         "pcbsp, hpencsp, prpsp, pwpsp, pwdpsp, pwwpsp, psdasp, paasp, picasp, pjsasp," &
         "piidbsp, pesasp, pibsp, pissp, pmasp, pothbesp, ptubensp, pfsbensp, psicinsp, paccinsp," &
         "phosinsp, pgtssp, pgasp, iwcpdsp, r2wcpdsp, puninssp, pdsspisp, pdsspjsp, pexhbsp, ppehinsp," &
         "potsinsp, pdcicsp, wwtcsp, wctcsp, wwtclsp, wctclsp, phbsp, pucsp, ppipdsp, ppipmsp," &
         "pdwpucsp, cbpayehd, cbpayesp, cbtaxhd, cbtaxsp, pwtchd, pctchd, pwtcsp, pctcsp, npcamthd," &
         "urphd, uwphd, uesahd, uishd, uwtchd, uctchd, npcamtsp, urpsp, uwpsp, uesasp," &
         "uissp, uwtcsp, uctcsp, dmpenchd, purphd, puwphd, nupesahd, puishd, dmpencsp, purpsp," &
         "puwpsp, nupesasp, puissp, wjsahd, wesahd, wishd, wothbehd, wtubenhd, wfsbenhd, wsicinhd," &
         "waccinhd, whosinhd, wkiwchd, wkr2whd, wuninshd, wpehinhd, wotsinhd, wocichd, whbhd, wjsasp," &
         "wesasp, wissp, wothbesp, wtubensp, wfsbensp, wsicinsp, waccinsp, whosinsp, wkiwcsp, wkr2wsp," &
         "wuninssp, wpehinsp, wotsinsp, wocicsp, whbsp, yjsahd, yesahd, yishd, yhbhd, yjsasp," &
         "yesasp, yissp, yhbsp, prothbhd, prtubehd, prfsbehd, prsicihd, praccihd, prhosihd, pruninhd," &
         "prphinhd, prosinhd, prcichd, prothbsp, prtubesp, prfsbesp, prsicisp, praccisp, prhosisp, pruninsp," &
         "prphinsp, prosinsp, prcicsp, uspenchd, usrphd, uswphd, usjsahd, usishd, uspencsp, usrpsp," &
         "uswpsp, usjsasp, usissp, gicacahd, pencrdhd, gicaahd, muibwhd, wfuelhd, exhbtyhd, lnodwphd," &
         "lnolahd, gicacasp, pencrdsp, gicaasp, muibwsp, wfuelsp, exhbtysp, lnodwpsp, lnolasp, dcpayhd," &
         "dmpayhd, ecpenchd, wporbahd, aapayhd, jsatyphd, esatyphd, mupibhd, dssishd, dssjsahd, sfincihd," &
         "sfincjhd, pdlpayhd, pmpayhd, dwpuchd, sfinuchd, dcpaysp, dmpaysp, ecpencsp, wporbasp, aapaysp," &
         "jsatypsp, esatypsp, mupibsp, dssissp, dssjsasp, sfincisp, sfincjsp, pdlpaysp, pmpaysp, dwpucsp," &
         "sfinucsp, icaperhd, pmuibhd, pipmothd, icapersp, pmuibsp, pipmotsp, r1dlchd, r1dlmhd, r1aahd," &
         "r1hbhd, r1pipdhd, r1pipmhd, r1dlcsp, r1dlmsp, r1aasp, r1hbsp, r1pipdsp, r1pipmsp, r2dlchd," &
         "r2dlmhd, r2aahd, r2hbhd, r2pipdhd, r2pipmhd, r2dlcsp, r2dlmsp, r2aasp, r2hbsp, r2pipdsp," &
         "r2pipmsp, r3dlchd, r3dlmhd, r3aahd, r3hbhd, r3pipdhd, r3pipmhd, r3dlcsp, r3dlmsp, r3aasp," &
         "r3hbsp, r3pipdsp, r3pipmsp, r4dlchd, r4dlmhd, r4aahd, r4hbhd, r4pipdhd, r4pipmhd, r4dlcsp," &
         "r4dlmsp, r4aasp, r4hbsp, r4pipdsp, r4pipmsp, r5dlchd, r5dlmhd, r5aahd, r5hbhd, r5pipdhd," &
         "r5pipmhd, r5dlcsp, r5dlmsp, r5aasp, r5hbsp, r5pipdsp, r5pipmsp, stdlacc1, stdlamc1, stdlacc2," &
         "stdlamc2, stdlacc3, stdlamc3, stdlacc4, stdlamc4, stdlacc5, stdlamc5, stdlacc6, stdlamc6, stdlacc7," &
         "stdlamc7, stdlacc8, stdlamc8, stdlacc9, stdlamc9, dlacac1, dlamoc1, dlacac2, dlamoc2, dlacac3," &
         "dlamoc3, dlacac4, dlamoc4, dlacac5, dlamoc5, dlacac6, dlamoc6, dlacac7, dlamoc7, dlacac8," &
         "dlamoc8, dlacac9, dlamoc9, ltdlacc1, ltdlamc1, ltdlacc2, ltdlamc2, ltdlacc3, ltdlamc3, ltdlacc4," &
         "ltdlamc4, ltdlacc5, ltdlamc5, ltdlacc6, ltdlamc6, ltdlacc7, ltdlamc7, ltdlacc8, ltdlamc8, ltdlacc9," &
         "ltdlamc9, pdlacac1, pdlamoc1, pdlacac2, pdlamoc2, pdlacac3, pdlamoc3, pdlacac4, pdlamoc4, pdlacac5," &
         "pdlamoc5, pdlacac6, pdlamoc6, pdlacac7, pdlamoc7, pdlacac8, pdlamoc8, pdlacac9, pdlamoc9, dcpayc1," &
         "dmpayc1, dcpayc2, dmpayc2, dcpayc3, dmpayc3, dcpayc4, dmpayc4, dcpayc5, dmpayc5, dcpayc6," &
         "dmpayc6, dcpayc7, dmpayc7, dcpayc8, dmpayc8, dcpayc9, dmpayc9, r1dlcc1, r1dlmc1, r1dlcc2," &
         "r1dlmc2, r1dlcc3, r1dlmc3, r1dlcc4, r1dlmc4, r1dlcc5, r1dlmc5, r1dlcc6, r1dlmc6, r1dlcc7," &
         "r1dlmc7, r1dlcc8, r1dlmc8, r1dlcc9, r1dlmc9, r2dlcc1, r2dlmc1, r2dlcc2, r2dlmc2, r2dlcc3," &
         "r2dlmc3, r2dlcc4, r2dlmc4, r2dlcc5, r2dlmc5, r2dlcc6, r2dlmc6, r2dlcc7, r2dlmc7, r2dlcc8," &
         "r2dlmc8, r2dlcc9, r2dlmc9, r3dlcc1, r3dlmc1, r3dlcc2, r3dlmc2, r3dlcc3, r3dlmc3, r3dlcc4," &
         "r3dlmc4, r3dlcc5, r3dlmc5, r3dlcc6, r3dlmc6, r3dlcc7, r3dlmc7, r3dlcc8, r3dlmc8, r3dlcc9," &
         "r3dlmc9, r4dlcc1, r4dlmc1, r4dlcc2, r4dlmc2, r4dlcc3, r4dlmc3, r4dlcc4, r4dlmc4, r4dlcc5," &
         "r4dlmc5, r4dlcc6, r4dlmc6, r4dlcc7, r4dlmc7, r4dlcc8, r4dlmc8, r4dlcc9, r4dlmc9, r5dlcc1," &
         "r5dlmc1, r5dlcc2, r5dlmc2, r5dlcc3, r5dlmc3, r5dlcc4, r5dlmc4, r5dlcc5, r5dlmc5, r5dlcc6," &
         "r5dlmc6, r5dlcc7, r5dlmc7, r5dlcc8, r5dlmc8, r5dlcc9, r5dlmc9, adbtbl, adddec, addhol," &
         "addholr, addins, addmon, adepfur, adles, adlesoa, af1, afdep2, cdelply, cdepact," &
         "cdepbed, cdepcel, cdepeqp, cdephol, cdeples, cdeptea, cdeptrp, cdepveg, cdpcoat, clothes," &
         "cplay, debt10, debt11, debt12, debt13, debtar01, debtar02, debtar03, debtar04, debtar05," &
         "debtar06, debtar07, debtar08, debtar09, debtar10, debtar11, debtar12, debtar13, debtfre1, debtfre2," &
         "debtfre3, hbolng, houshe1, kidinc, meal, nhhchild, oafur, oapre, outpay, outpyamt," &
         "regpamt, regularp, shoeoa, totsav, adultb, boarder, bpeninc, bseinc, budisben, buearns," &
         "buethgr3, buinc, buinv, buirben, bukids, bunirben, buothben, burent, burinc, burpinc," &
         "butvlic, butxcred, depchldb, diswbua1, diswbuc1, ecstatbu, famtypb2, famtypbs, famtypbu, fsfvbu," &
         "fsmbu, fsmlkbu, gross4, hbindbu, hbindbu2, heartbu, kid04, kid1115, kid1619, kid510," &
         "lodger, subltamt, totcapb3, totsavbu, tuburent, youngch, clthsoa, debt1, debt2, debt3," &
         "debt4, debt5, debt6, debt7, debt8, debt9, discbua, discbuc, hbtham, hbthbu," &
         "hbthmn, hbthpd, hbthwk, hbthyr, hbwait, intrnt, oadep, oanet, dynhthd, dynhtsp," &
         "freqhd, freqsp, hur01hd, hur01sp, hur02hd, hur02sp, hur03hd, hur03sp, hur04hd, hur04sp," &
         "hur05hd, hur05sp, hur06hd, hur06sp, hur07hd, hur07sp, hur08hd, hur08sp, hur09hd, hur09sp," &
         "hur10hd, hur10sp, hur11hd, hur11sp, hur12hd, hur12sp, hur13hd, hur13sp, hur14hd, hur14sp," &
         "hur15hd, hur15sp, hur16hd, hur16sp, hur17hd, hur17sp, hur18hd, hur18sp, hur19hd, hur19sp," &
         "hur20hd, hur20sp, whl01hd, whl01sp, whl02hd, whl02sp, whl03hd, whl03sp, whl04hd, whl04sp," &
         "whl05hd, whl05sp, whl06hd, whl06sp, whl07hd, whl07sp, whl08hd, whl08sp, whl09hd, whl09sp," &
         "whl10hd, whl10sp, whl11hd, whl11sp, whl12hd, whl12sp, whl13hd, whl13sp, whl14hd, whl14sp," &
         "whl15hd, whl15sp, whl16hd, whl16sp, whl17hd, whl17sp, whl18hd, whl18sp, whl19hd, whl19sp," &
         "whl20hd, whl20sp, dynhtc1, dynhtc2, dynhtc3, dynhtc4, dynhtc5, dynhtc6, dynhtc7, dynhtc8," &
         "dynhtc9, freqc1, freqc2, freqc3, freqc4, freqc5, freqc6, freqc7, freqc8, freqc9," &
         "hur01c1, hur01c2, hur01c3, hur01c4, hur01c5, hur01c6, hur01c7, hur01c8, hur01c9, hur02c1," &
         "hur02c2, hur02c3, hur02c4, hur02c5, hur02c6, hur02c7, hur02c8, hur02c9, hur03c1, hur03c2," &
         "hur03c3, hur03c4, hur03c5, hur03c6, hur03c7, hur03c8, hur03c9, hur04c1, hur04c2, hur04c3," &
         "hur04c4, hur04c5, hur04c6, hur04c7, hur04c8, hur04c9, hur05c1, hur05c2, hur05c3, hur05c4," &
         "hur05c5, hur05c6, hur05c7, hur05c8, hur05c9, hur06c1, hur06c2, hur06c3, hur06c4, hur06c5," &
         "hur06c6, hur06c7, hur06c8, hur06c9, hur07c1, hur07c2, hur07c3, hur07c4, hur07c5, hur07c6," &
         "hur07c7, hur07c8, hur07c9, hur08c1, hur08c2, hur08c3, hur08c4, hur08c5, hur08c6, hur08c7," &
         "hur08c8, hur08c9, hur09c1, hur09c2, hur09c3, hur09c4, hur09c5, hur09c6, hur09c7, hur09c8," &
         "hur09c9, hur10c1, hur10c2, hur10c3, hur10c4, hur10c5, hur10c6, hur10c7, hur10c8, hur10c9," &
         "hur11c1, hur11c2, hur11c3, hur11c4, hur11c5, hur11c6, hur11c7, hur11c8, hur11c9, hur12c1," &
         "hur12c2, hur12c3, hur12c4, hur12c5, hur12c6, hur12c7, hur12c8, hur12c9, hur13c1, hur13c2," &
         "hur13c3, hur13c4, hur13c5, hur13c6, hur13c7, hur13c8, hur13c9, hur14c1, hur14c2, hur14c3," &
         "hur14c4, hur14c5, hur14c6, hur14c7, hur14c8, hur14c9, hur15c1, hur15c2, hur15c3, hur15c4," &
         "hur15c5, hur15c6, hur15c7, hur15c8, hur15c9, hur16c1, hur16c2, hur16c3, hur16c4, hur16c5," &
         "hur16c6, hur16c7, hur16c8, hur16c9, hur17c1, hur17c2, hur17c3, hur17c4, hur17c5, hur17c6," &
         "hur17c7, hur17c8, hur17c9, hur18c1, hur18c2, hur18c3, hur18c4, hur18c5, hur18c6, hur18c7," &
         "hur18c8, hur18c9, hur19c1, hur19c2, hur19c3, hur19c4, hur19c5, hur19c6, hur19c7, hur19c8," &
         "hur19c9, hur20c1, hur20c2, hur20c3, hur20c4, hur20c5, hur20c6, hur20c7, hur20c8, hur20c9," &
         "whl01c1, whl01c2, whl01c3, whl01c4, whl01c5, whl01c6, whl01c7, whl01c8, whl01c9, whl02c1," &
         "whl02c2, whl02c3, whl02c4, whl02c5, whl02c6, whl02c7, whl02c8, whl02c9, whl03c1, whl03c2," &
         "whl03c3, whl03c4, whl03c5, whl03c6, whl03c7, whl03c8, whl03c9, whl04c1, whl04c2, whl04c3," &
         "whl04c4, whl04c5, whl04c6, whl04c7, whl04c8, whl04c9, whl05c1, whl05c2, whl05c3, whl05c4," &
         "whl05c5, whl05c6, whl05c7, whl05c8, whl05c9, whl06c1, whl06c2, whl06c3, whl06c4, whl06c5," &
         "whl06c6, whl06c7, whl06c8, whl06c9, whl07c1, whl07c2, whl07c3, whl07c4, whl07c5, whl07c6," &
         "whl07c7, whl07c8, whl07c9, whl08c1, whl08c2, whl08c3, whl08c4, whl08c5, whl08c6, whl08c7," &
         "whl08c8, whl08c9, whl09c1, whl09c2, whl09c3, whl09c4, whl09c5, whl09c6, whl09c7, whl09c8," &
         "whl09c9, whl10c1, whl10c2, whl10c3, whl10c4, whl10c5, whl10c6, whl10c7, whl10c8, whl10c9," &
         "whl11c1, whl11c2, whl11c3, whl11c4, whl11c5, whl11c6, whl11c7, whl11c8, whl11c9, whl12c1," &
         "whl12c2, whl12c3, whl12c4, whl12c5, whl12c6, whl12c7, whl12c8, whl12c9, whl13c1, whl13c2," &
         "whl13c3, whl13c4, whl13c5, whl13c6, whl13c7, whl13c8, whl13c9, whl14c1, whl14c2, whl14c3," &
         "whl14c4, whl14c5, whl14c6, whl14c7, whl14c8, whl14c9, whl15c1, whl15c2, whl15c3, whl15c4," &
         "whl15c5, whl15c6, whl15c7, whl15c8, whl15c9, whl16c1, whl16c2, whl16c3, whl16c4, whl16c5," &
         "whl16c6, whl16c7, whl16c8, whl16c9, whl17c1, whl17c2, whl17c3, whl17c4, whl17c5, whl17c6," &
         "whl17c7, whl17c8, whl17c9, whl18c1, whl18c2, whl18c3, whl18c4, whl18c5, whl18c6, whl18c7," &
         "whl18c8, whl18c9, whl19c1, whl19c2, whl19c3, whl19c4, whl19c5, whl19c6, whl19c7, whl19c8," &
         "whl19c9, whl20c1, whl20c2, whl20c3, whl20c4, whl20c5, whl20c6, whl20c7, whl20c8, whl20c9," &
         "agec1, agec2, agec3, agec4, agec5, agec6, agec7, agec8, cameyrc1, cameyrc2," &
         "cameyrc3, cameyrc4, cameyrc5, cameyrc6, cameyrc7, cameyrc8, chcrec1, chcrec2, chcrec3, chcrec4," &
         "chcrec5, chcrec6, chcrec7, chcrec8, creabc1, creabc2, creabc3, creabc4, creabc5, creabc6," &
         "creabc7, creabc8, creahc1, creahc2, creahc3, creahc4, creahc5, creahc6, creahc7, creahc8," &
         "crecbc1, crecbc2, crecbc3, crecbc4, crecbc5, crecbc6, crecbc7, crecbc8, crechc1, crechc2," &
         "crechc3, crechc4, crechc5, crechc6, crechc7, crechc8, creclc1, creclc2, creclc3, creclc4," &
         "creclc5, creclc6, creclc7, creclc8, crefrc1, crefrc2, crefrc3, crefrc4, crefrc5, crefrc6," &
         "crefrc7, crefrc8, creotc1, creotc2, creotc3, creotc4, creotc5, creotc6, creotc7, creotc8," &
         "carerc1, carerc2, carerc3, carerc4, carerc5, carerc6, carerc7, carerc8, cdatrec1, cdatrec2," &
         "cdatrec3, cdatrec4, cdatrec5, cdatrec6, cdatrec7, cdatrec8, cdtrepc1, cdtrepc2, cdtrepc3, cdtrepc4," &
         "cdtrepc5, cdtrepc6, cdtrepc7, cdtrepc8, cdis1c1, cdis1c2, cdis1c3, cdis1c4, cdis1c5, cdis1c6," &
         "cdis1c7, cdis1c8, cdis2c1, cdis2c2, cdis2c3, cdis2c4, cdis2c5, cdis2c6, cdis2c7, cdis2c8," &
         "cdis3c1, cdis3c2, cdis3c3, cdis3c4, cdis3c5, cdis3c6, cdis3c7, cdis3c8, cdis4c1, cdis4c2," &
         "cdis4c3, cdis4c4, cdis4c5, cdis4c6, cdis4c7, cdis4c8, cdis5c1, cdis5c2, cdis5c3, cdis5c4," &
         "cdis5c5, cdis5c6, cdis5c7, cdis5c8, cdis6c1, cdis6c2, cdis6c3, cdis6c4, cdis6c5, cdis6c6," &
         "cdis6c7, cdis6c8, cdis7c1, cdis7c2, cdis7c3, cdis7c4, cdis7c5, cdis7c6, cdis7c7, cdis7c8," &
         "cdis8c1, cdis8c2, cdis8c3, cdis8c4, cdis8c5, cdis8c6, cdis8c7, cdis8c8, cdis9c1, cdis9c2," &
         "cdis9c3, cdis9c4, cdis9c5, cdis9c6, cdis9c7, cdis9c8, cdis10c1, cdis10c2, cdis10c3, cdis10c4," &
         "cdis10c5, cdis10c6, cdis10c7, cdis10c8, cdifc1, cdifc2, cdifc3, cdifc4, cdifc5, cdifc6," &
         "cdifc7, cdifc8, ernamc1, ernamc2, ernamc3, ernamc4, ernamc5, ernamc6, ernamc7, ernamc8," &
         "trustc1, trustc2, trustc3, trustc4, trustc5, trustc6, trustc7, trustc8, chbfdc1, chbfdc2," &
         "chbfdc3, chbfdc4, chbfdc5, chbfdc6, chbfdc7, chbfdc8, cbfamtc1, cbfamtc2, cbfamtc3, cbfamtc4," &
         "cbfamtc5, cbfamtc6, cbfamtc7, cbfamtc8, pbfamtc1, pbfamtc2, pbfamtc3, pbfamtc4, pbfamtc5, pbfamtc6," &
         "pbfamtc7, pbfamtc8, cbfvalc1, cbfvalc2, cbfvalc3, cbfvalc4, cbfvalc5, cbfvalc6, cbfvalc7, cbfvalc8," &
         "chcondc1, chcondc2, chcondc3, chcondc4, chcondc5, chcondc6, chcondc7, chcondc8, cdla1c1, cdla1c2," &
         "cdla1c3, cdla1c4, cdla1c5, cdla1c6, cdla1c7, cdla1c8, cdla2c1, cdla2c2, cdla2c3, cdla2c4," &
         "cdla2c5, cdla2c6, cdla2c7, cdla2c8, chelfc1, chelfc2, chelfc3, chelfc4, chelfc5, chelfc6," &
         "chelfc7, chelfc8, chernc1, chernc2, chernc3, chernc4, chernc5, chernc6, chernc7, chernc8," &
         "crns1c1, crns1c2, crns1c3, crns1c4, crns1c5, crns1c6, crns1c7, crns1c8, crns2c1, crns2c2," &
         "crns2c3, crns2c4, crns2c5, crns2c6, crns2c7, crns2c8, crns3c1, crns3c2, crns3c3, crns3c4," &
         "crns3c5, crns3c6, crns3c7, crns3c8, chemac1, chemac2, chemac3, chemac4, chemac5, chemac6," &
         "chemac7, chemac8, emamtc1, emamtc2, emamtc3, emamtc4, emamtc5, emamtc6, emamtc7, emamtc8," &
         "emapdc1, emapdc2, emapdc3, emapdc4, emapdc5, emapdc6, emapdc7, emapdc8, chidvc1, chidvc2," &
         "chidvc3, chidvc4, chidvc5, chidvc6, chidvc7, chidvc8, climitc1, climitc2, climitc3, climitc4," &
         "climitc5, climitc6, climitc7, climitc8, pearnc1, pearnc2, pearnc3, pearnc4, pearnc5, pearnc6," &
         "pearnc7, pearnc8, ptrusc1, ptrusc2, ptrusc3, ptrusc4, ptrusc5, ptrusc6, ptrusc7, ptrusc8," &
         "chrinc1, chrinc2, chrinc3, chrinc4, chrinc5, chrinc6, chrinc7, chrinc8, csavec1, csavec2," &
         "csavec3, csavec4, csavec5, csavec6, csavec7, csavec8, tramtc1, tramtc2, tramtc3, tramtc4," &
         "tramtc5, tramtc6, tramtc7, tramtc8, trnpdc1, trnpdc2, trnpdc3, trnpdc4, trnpdc5, trnpdc6," &
         "trnpdc7, trnpdc8, cohabc1, cohabc2, cohabc3, cohabc4, cohabc5, cohabc6, cohabc7, cohabc8," &
         "curqulc1, curqulc2, curqulc3, curqulc4, curqulc5, curqulc6, curqulc7, curqulc8, disacc1, disacc2," &
         "disacc3, disacc4, disacc5, disacc6, disacc7, disacc8, discoc1, discoc2, discoc3, discoc4," &
         "discoc5, discoc6, discoc7, discoc8, dobc1, dobc2, dobc3, dobc4, dobc5, dobc6," &
         "dobc7, dobc8, dvmarc1, dvmarc2, dvmarc3, dvmarc4, dvmarc5, dvmarc6, dvmarc7, dvmarc8," &
         "fsvvlc1, fsvvlc2, fsvvlc3, fsvvlc4, fsvvlc5, fsvvlc6, fsvvlc7, fsvvlc8, fsmkvc1, fsmkvc2," &
         "fsmkvc3, fsmkvc4, fsmkvc5, fsmkvc6, fsmkvc7, fsmkvc8, fsmlvc1, fsmlvc2, fsmlvc3, fsmlvc4," &
         "fsmlvc5, fsmlvc6, fsmlvc7, fsmlvc8, ftedc1, ftedc2, ftedc3, ftedc4, ftedc5, ftedc6," &
         "ftedc7, ftedc8, g1valc1, g1valc2, g1valc3, g1valc4, g1valc5, g1valc6, g1valc7, g1valc8," &
         "g2valc1, g2valc2, g2valc3, g2valc4, g2valc5, g2valc6, g2valc7, g2valc8, g1dirc1, g1dirc2," &
         "g1dirc3, g1dirc4, g1dirc5, g1dirc6, g1dirc7, g1dirc8, g2dirc1, g2dirc2, g2dirc3, g2dirc4," &
         "g2dirc5, g2dirc6, g2dirc7, g2dirc8, gtnumc1, gtnumc2, gtnumc3, gtnumc4, gtnumc5, gtnumc6," &
         "gtnumc7, gtnumc8, gt1scc1, gt1scc2, gt1scc3, gt1scc4, gt1scc5, gt1scc6, gt1scc7, gt1scc8," &
         "gt2scc1, gt2scc2, gt2scc3, gt2scc4, gt2scc5, gt2scc6, gt2scc7, gt2scc8, gt10sc1, gt10sc2," &
         "gt10sc3, gt10sc4, gt10sc5, gt10sc6, gt10sc7, gt10sc8, gt20sc1, gt20sc2, gt20sc3, gt20sc4," &
         "gt20sc5, gt20sc6, gt20sc7, gt20sc8, hartvc1, hartvc2, hartvc3, hartvc4, hartvc5, hartvc6," &
         "hartvc7, hartvc8, heatchc1, heatchc2, heatchc3, heatchc4, heatchc5, heatchc6, heatchc7, heatchc8," &
         "hhldrc1, hhldrc2, hhldrc3, hhldrc4, hhldrc5, hhldrc6, hhldrc7, hhldrc8, hurabc1, hurabc2," &
         "hurabc3, hurabc4, hurabc5, hurabc6, hurabc7, hurabc8, hurahc1, hurahc2, hurahc3, hurahc4," &
         "hurahc5, hurahc6, hurahc7, hurahc8, hurcbc1, hurcbc2, hurcbc3, hurcbc4, hurcbc5, hurcbc6," &
         "hurcbc7, hurcbc8, hurchc1, hurchc2, hurchc3, hurchc4, hurchc5, hurchc6, hurchc7, hurchc8," &
         "hurclc1, hurclc2, hurclc3, hurclc4, hurclc5, hurclc6, hurclc7, hurclc8, hurfrc1, hurfrc2," &
         "hurfrc3, hurfrc4, hurfrc5, hurfrc6, hurfrc7, hurfrc8, hurotc1, hurotc2, hurotc3, hurotc4," &
         "hurotc5, hurotc6, hurotc7, hurotc8, hurrec1, hurrec2, hurrec3, hurrec4, hurrec5, hurrec6," &
         "hurrec7, hurrec8, hpersc1, hpersc2, hpersc3, hpersc4, hpersc5, hpersc6, hpersc7, hpersc8," &
         "hrsedc1, hrsedc2, hrsedc3, hrsedc4, hrsedc5, hrsedc6, hrsedc7, hrsedc8, hsvprc1, hsvprc2," &
         "hsvprc3, hsvprc4, hsvprc5, hsvprc6, hsvprc7, hsvprc8, laregc1, laregc2, laregc3, laregc4," &
         "laregc5, laregc6, laregc7, laregc8, msc1, msc2, msc3, msc4, msc5, msc6," &
         "msc7, msc8, prsonc1, prsonc2, prsonc3, prsonc4, prsonc5, prsonc6, prsonc7, prsonc8," &
         "rlp1c1, rlp1c2, rlp1c3, rlp1c4, rlp1c5, rlp1c6, rlp1c7, rlp1c8, rlp2c1, rlp2c2," &
         "rlp2c3, rlp2c4, rlp2c5, rlp2c6, rlp2c7, rlp2c8, rlp3c1, rlp3c2, rlp3c3, rlp3c4," &
         "rlp3c5, rlp3c6, rlp3c7, rlp3c8, rlp4c1, rlp4c2, rlp4c3, rlp4c4, rlp4c5, rlp4c6," &
         "rlp4c7, rlp4c8, rlp5c1, rlp5c2, rlp5c3, rlp5c4, rlp5c5, rlp5c6, rlp5c7, rlp5c8," &
         "rlp6c1, rlp6c2, rlp6c3, rlp6c4, rlp6c5, rlp6c6, rlp6c7, rlp6c8, rlp7c1, rlp7c2," &
         "rlp7c3, rlp7c4, rlp7c5, rlp7c6, rlp7c7, rlp7c8, rlp8c1, rlp8c2, rlp8c3, rlp8c4," &
         "rlp8c5, rlp8c6, rlp8c7, rlp8c8, rlp9c1, rlp9c2, rlp9c3, rlp9c4, rlp9c5, rlp9c6," &
         "rlp9c7, rlp9c8, rlp10c1, rlp10c2, rlp10c3, rlp10c4, rlp10c5, rlp10c6, rlp10c7, rlp10c8," &
         "rlp11c1, rlp11c2, rlp11c3, rlp11c4, rlp11c5, rlp11c6, rlp11c7, rlp11c8, rlp12c1, rlp12c2," &
         "rlp12c3, rlp12c4, rlp12c5, rlp12c6, rlp12c7, rlp12c8, rlp13c1, rlp13c2, rlp13c3, rlp13c4," &
         "rlp13c5, rlp13c6, rlp13c7, rlp13c8, rlp14c1, rlp14c2, rlp14c3, rlp14c4, rlp14c5, rlp14c6," &
         "rlp14c7, rlp14c8, rhrpcc1, rhrpcc2, rhrpcc3, rhrpcc4, rhrpcc5, rhrpcc6, rhrpcc7, rhrpcc8," &
         "sbkitc1, sbkitc2, sbkitc3, sbkitc4, sbkitc5, sbkitc6, sbkitc7, sbkitc8, sexc1, sexc2," &
         "sexc3, sexc4, sexc5, sexc6, sexc7, sexc8, sfvitc1, sfvitc2, sfvitc3, sfvitc4," &
         "sfvitc5, sfvitc6, sfvitc7, sfvitc8, fmctsc1, fmctsc2, fmctsc3, fmctsc4, fmctsc5, fmctsc6," &
         "fmctsc7, fmctsc8, fmealc1, fmealc2, fmealc3, fmealc4, fmealc5, fmealc6, fmealc7, fmealc8," &
         "cblndc1, cblndc2, cblndc3, cblndc4, cblndc5, cblndc6, cblndc7, cblndc8, cparsc1, cparsc2," &
         "cparsc3, cparsc4, cparsc5, cparsc6, cparsc7, cparsc8, cdeafc1, cdeafc2, cdeafc3, cdeafc4," &
         "cdeafc5, cdeafc6, cdeafc7, cdeafc8, totgtc1, totgtc2, totgtc3, totgtc4, totgtc5, totgtc6," &
         "totgtc7, totgtc8, totsvc1, totsvc2, totsvc3, totsvc4, totsvc5, totsvc6, totsvc7, totsvc8," &
         "tacamc1, tacamc2, tacamc3, tacamc4, tacamc5, tacamc6, tacamc7, tacamc8, tpeedc1, tpeedc2," &
         "tpeedc3, tpeedc4, tpeedc5, tpeedc6, tpeedc7, tpeedc8, uprsoc1, uprsoc2, uprsoc3, uprsoc4," &
         "uprsoc5, uprsoc6, uprsoc7, uprsoc8, govpy1hd, govpy2hd, govpy3hd, govpy4hd, govpy5hd, govpy6hd," &
         "govpy7hd, govpy8hd, govpy9hd, gvpy10hd, gvpy11hd, govpy1sp, govpy2sp, govpy3sp, govpy4sp, govpy5sp," &
         "govpy6sp, govpy7sp, govpy8sp, govpy9sp, gvpy10sp, gvpy11sp, nhhamt1, nhhamt2, nhhamt3, nhhamt4," &
         "nhhfee1, nhhfee2, nhhfee3, nhhfee4, pnhhamt1, pnhhamt2, pnhhamt3, pnhhamt4, bona11hd, bona12hd," &
         "bona13hd, bona11sp, bona12sp, bona13sp, bona21hd, bona22hd, bona23hd, bona21sp, bona22sp, bona23sp," &
         "bona31hd, bona32hd, bona33hd, bona31sp, bona32sp, bona33sp, bona41hd, bona42hd, bona43hd, bona41sp," &
         "bona42sp, bona43sp, bona51hd, bona52hd, bona53hd, bona51sp, bona52sp, bona53sp, bona61hd, bona62hd," &
         "bona63hd, bona61sp, bona62sp, bona63sp, bont11hd, bont12hd, bont13hd, bont11sp, bont12sp, bont13sp," &
         "bont21hd, bont22hd, bont23hd, bont21sp, bont22sp, bont23sp, bont31hd, bont32hd, bont33hd, bont31sp," &
         "bont32sp, bont33sp, bont41hd, bont42hd, bont43hd, bont41sp, bont42sp, bont43sp, bont51hd, bont52hd," &
         "bont53hd, bont51sp, bont52sp, bont53sp, bont61hd, bont62hd, bont63hd, bont61sp, bont62sp, bont63sp," &
         "btax11hd, btax12hd, btax13hd, btax11sp, btax12sp, btax13sp, btax21hd, btax22hd, btax23hd, btax21sp," &
         "btax22sp, btax23sp, btax31hd, btax32hd, btax33hd, btax31sp, btax32sp, btax33sp, btax41hd, btax42hd," &
         "btax43hd, btax41sp, btax42sp, btax43sp, btax51hd, btax52hd, btax53hd, btax51sp, btax52sp, btax53sp," &
         "btax61hd, btax62hd, btax63hd, btax61sp, btax62sp, btax63sp, busac1hd, busac2hd, busac3hd, busac1sp," &
         "busac2sp, busac3sp, caram1hd, caram2hd, caram3hd, caram1sp, caram2sp, caram3sp, carcn1hd, carcn2hd," &
         "carcn3hd, carcn1sp, carcn2sp, carcn3sp, carvl1hd, carvl2hd, carvl3hd, carvl1sp, carvl2sp, carvl3sp," &
         "chktx1hd, chktx2hd, chktx3hd, chktx1sp, chktx2sp, chktx3sp, chcom1hd, chcom2hd, chcom3hd, chcom1sp," &
         "chcom2sp, chcom3sp, chvam1hd, chvam2hd, chvam3hd, chvam1sp, chvam2sp, chvam3sp, chvpd1hd, chvpd2hd," &
         "chvpd3hd, chvpd1sp, chvpd2sp, chvpd3sp, chsac1hd, chsac2hd, chsac3hd, chsac1sp, chsac2sp, chsac3sp," &
         "chuam1hd, chuam2hd, chuam3hd, chuam1sp, chuam2sp, chuam3sp, chupd1hd, chupd2hd, chupd3hd, chupd1sp," &
         "chupd2sp, chupd3sp, chusu1hd, chusu2hd, chusu3hd, chusu1sp, chusu2sp, chusu3sp, doth1hd, doth2hd," &
         "doth3hd, doth1sp, doth2sp, doth3sp, dpen1hd, dpen2hd, dpen3hd, dpen1sp, dpen2sp, dpen3sp," &
         "davc1hd, davc2hd, davc3hd, davc1sp, davc2sp, davc3sp, dtuf1hd, dtuf2hd, dtuf3hd, dtuf1sp," &
         "dtuf2sp, dtuf3sp, dfrso1hd, dfrso2hd, dfrso3hd, dfrso1sp, dfrso2sp, dfrso3sp, dspor1hd, dspor2hd," &
         "dspor3hd, dspor1sp, dspor2sp, dspor3sp, drepl1hd, drepl2hd, drepl3hd, drepl1sp, drepl2sp, drepl3sp," &
         "dmed1hd, dmed2hd, dmed3hd, dmed1sp, dmed2sp, dmed3sp, dchar1hd, dchar2hd, dchar3hd, dchar1sp," &
         "dchar2sp, dchar3sp, dslrp1hd, dslrp2hd, dslrp3hd, dslrp1sp, dslrp2sp, dslrp3sp, dirni1hd, dirni2hd," &
         "dirni3hd, dirni1sp, dirni2sp, dirni3sp, totov1hd, totov2hd, totov3hd, totov1sp, totov2sp, totov3sp," &
         "dvuhr1hd, dvuhr2hd, dvuhr3hd, dvuhr1sp, dvuhr2sp, dvuhr3sp, empan1hd, empan2hd, empan3hd, empan1sp," &
         "empan2sp, empan3sp, empen1hd, empen2hd, empen3hd, empen1sp, empen2sp, empen3sp, etype1hd, etype2hd," &
         "etype3hd, etype1sp, etype2sp, etype3sp, evrot1hd, evrot2hd, evrot3hd, evrot1sp, evrot2sp, evrot3sp," &
         "exb011hd, exb012hd, exb013hd, exb011sp, exb012sp, exb013sp, exb021hd, exb022hd, exb023hd, exb021sp," &
         "exb022sp, exb023sp, exb031hd, exb032hd, exb033hd, exb031sp, exb032sp, exb033sp, exb041hd, exb042hd," &
         "exb043hd, exb041sp, exb042sp, exb043sp, exb051hd, exb052hd, exb053hd, exb051sp, exb052sp, exb053sp," &
         "exb061hd, exb062hd, exb063hd, exb061sp, exb062sp, exb063sp, exb071hd, exb072hd, exb073hd, exb071sp," &
         "exb072sp, exb073sp, exb081hd, exb082hd, exb083hd, exb081sp, exb082sp, exb083sp, exb091hd, exb092hd," &
         "exb093hd, exb091sp, exb092sp, exb093sp, exb101hd, exb102hd, exb103hd, exb101sp, exb102sp, exb103sp," &
         "exb111hd, exb112hd, exb113hd, exb111sp, exb112sp, exb113sp, exb121hd, exb122hd, exb123hd, exb121sp," &
         "exb122sp, exb123sp, ftpt1hd, ftpt2hd, ftpt3hd, ftpt1sp, ftpt2sp, ftpt3sp, fulam1hd, fulam2hd," &
         "fulam3hd, fulam1sp, fulam2sp, fulam3sp, fulbn1hd, fulbn2hd, fulbn3hd, fulbn1sp, fulbn2sp, fulbn3sp," &
         "fulpd1hd, fulpd2hd, fulpd3hd, fulpd1sp, fulpd2sp, fulpd3sp, fulty1hd, fulty2hd, fulty3hd, fulty1sp," &
         "fulty2sp, fulty3sp, fluam1hd, fluam2hd, fluam3hd, fluam1sp, fluam2sp, fluam3sp, flupd1hd, flupd2hd," &
         "flupd3hd, flupd1sp, flupd2sp, flupd3sp, flusu1hd, flusu2hd, flusu3hd, flusu1sp, flusu2sp, flusu3sp," &
         "grwag1hd, grwag2hd, grwag3hd, grwag1sp, grwag2sp, grwag3sp, grwap1hd, grwap2hd, grwap3hd, grwap1sp," &
         "grwap2sp, grwap3sp, hha11hd, hha12hd, hha13hd, hha11sp, hha12sp, hha13sp, hha21hd, hha22hd," &
         "hha23hd, hha21sp, hha22sp, hha23sp, hha31hd, hha32hd, hha33hd, hha31sp, hha32sp, hha33sp," &
         "hour1hd, hour2hd, hour3hd, hour1sp, hour2sp, hour3sp, hrrte1hd, hrrte2hd, hrrte3hd, hrrte1sp," &
         "hrrte2sp, hrrte3sp, ipay11hd, ipay12hd, ipay13hd, ipay11sp, ipay12sp, ipay13sp, ipay21hd, ipay22hd," &
         "ipay23hd, ipay21sp, ipay22sp, ipay23sp, ipay31hd, ipay32hd, ipay33hd, ipay31sp, ipay32sp, ipay33sp," &
         "ipay41hd, ipay42hd, ipay43hd, ipay41sp, ipay42sp, ipay43sp, ipay51hd, ipay52hd, ipay53hd, ipay51sp," &
         "ipay52sp, ipay53sp, ipay61hd, ipay62hd, ipay63hd, ipay61sp, ipay62sp, ipay63sp, ipay71hd, ipay72hd," &
         "ipay73hd, ipay71sp, ipay72sp, ipay73sp, jbchg1hd, jbchg2hd, jbchg3hd, jbchg1sp, jbchg2sp, jbchg3sp," &
         "jobus1hd, jobus2hd, jobus3hd, jobus1sp, jobus2sp, jobus3sp, jbhrs1hd, jbhrs2hd, jbhrs3hd, jbhrs1sp," &
         "jbhrs2sp, jbhrs3sp, lt301hd, lt302hd, lt303hd, lt301sp, lt302sp, lt303sp, madem1hd, madem2hd," &
         "madem3hd, madem1sp, madem2sp, madem3sp, mile1hd, mile2hd, mile3hd, mile1sp, mile2sp, mile3sp," &
         "moref1hd, moref2hd, moref3hd, moref1sp, moref2sp, moref3sp, nic1hd, nic2hd, nic3hd, nic1sp," &
         "nic2sp, nic3sp, nidam1hd, nidam2hd, nidam3hd, nidam1sp, nidam2sp, nidam3sp, nipd1hd, nipd2hd," &
         "nipd3hd, nipd1sp, nipd2sp, nipd3sp, noemp1hd, noemp2hd, noemp3hd, noemp1sp, noemp2sp, noemp3sp," &
         "oremp1hd, oremp2hd, oremp3hd, oremp1sp, oremp2sp, oremp3sp, othd11hd, othd12hd, othd13hd, othd11sp," &
         "othd12sp, othd13sp, othd21hd, othd22hd, othd23hd, othd21sp, othd22sp, othd23sp, othd31hd, othd32hd," &
         "othd33hd, othd31sp, othd32sp, othd33sp, othd41hd, othd42hd, othd43hd, othd41sp, othd42sp, othd43sp," &
         "othd51hd, othd52hd, othd53hd, othd51sp, othd52sp, othd53sp, othd61hd, othd62hd, othd63hd, othd61sp," &
         "othd62sp, othd63sp, othd71hd, othd72hd, othd73hd, othd71sp, othd72sp, othd73sp, othd81hd, othd82hd," &
         "othd83hd, othd81sp, othd82sp, othd83sp, othd91hd, othd92hd, othd93hd, othd91sp, othd92sp, othd93sp," &
         "otd101hd, otd102hd, otd103hd, otd101sp, otd102sp, otd103sp, ownam1hd, ownam2hd, ownam3hd, ownam1sp," &
         "ownam2sp, ownam3sp, ownoa1hd, ownoa2hd, ownoa3hd, ownoa1sp, ownoa2sp, ownoa3sp, ownot1hd, ownot2hd," &
         "ownot3hd, ownot1sp, ownot2sp, ownot3sp, ownsm1hd, ownsm2hd, ownsm3hd, ownsm1sp, ownsm2sp, ownsm3sp," &
         "pappd1hd, pappd2hd, pappd3hd, pappd1sp, pappd2sp, pappd3sp, payam1hd, payam2hd, payam3hd, payam1sp," &
         "payam2sp, payam3sp, pdate1hd, pdate2hd, pdate3hd, pdate1sp, pdate2sp, pdate3sp, paye1hd, paye2hd," &
         "paye3hd, paye1sp, paye2sp, paye3sp, paype1hd, paype2hd, paype3hd, paype1sp, paype2sp, paype3sp," &
         "paysl1hd, paysl2hd, paysl3hd, paysl1sp, paysl2sp, paysl3sp, payus1hd, payus2hd, payus3hd, payus1sp," &
         "payus2sp, payus3sp, pothr1hd, pothr2hd, pothr3hd, pothr1sp, pothr2sp, pothr3sp, ppppd1hd, ppppd2hd," &
         "ppppd3hd, ppppd1sp, ppppd2sp, ppppd3sp, prbef1hd, prbef2hd, prbef3hd, prbef1sp, prbef2sp, prbef3sp," &
         "prdoc1hd, prdoc2hd, prdoc3hd, prdoc1sp, prdoc2sp, prdoc3sp, sepro1hd, sepro2hd, sepro3hd, sepro1sp," &
         "sepro2sp, sepro3sp, prolo1hd, prolo2hd, prolo3hd, prolo1sp, prolo2sp, prolo3sp, profn1hd, profn2hd," &
         "profn3hd, profn1sp, profn2sp, profn3sp, protx1hd, protx2hd, protx3hd, protx1sp, protx2sp, protx3sp," &
         "rspvr1hd, rspvr2hd, rspvr3hd, rspvr1sp, rspvr2sp, rspvr3sp, apamt1hd, apamt2hd, apamt3hd, apamt1sp," &
         "apamt2sp, apamt3sp, sebeg1hd, sebeg2hd, sebeg3hd, sebeg1sp, sebeg2sp, sebeg3sp, seend1hd, seend2hd," &
         "seend3hd, seend1sp, seend2sp, seend3sp, sectr1hd, sectr2hd, sectr3hd, sectr1sp, sectr2sp, sectr3sp," &
         "sectt1hd, sectt2hd, sectt3hd, sectt1sp, sectt2sp, sectt3sp, sefin1hd, sefin2hd, sefin3hd, sefin1sp," &
         "sefin2sp, sefin3sp, secam1hd, secam2hd, secam3hd, secam1sp, secam2sp, secam3sp, seciw1hd, seciw2hd," &
         "seciw3hd, seciw1sp, seciw2sp, seciw3sp, sewks1hd, sewks2hd, sewks3hd, sewks1sp, sewks2sp, sewks3sp," &
         "senam1hd, senam2hd, senam3hd, senam1sp, senam2sp, senam3sp, seiin1hd, seiin2hd, seiin3hd, seiin1sp," &
         "seiin2sp, seiin3sp, senil1hd, senil2hd, senil3hd, senil1sp, senil2sp, senil3sp, senir1hd, senir2hd," &
         "senir3hd, senir1sp, senir2sp, senir3sp, psenr1hd, psenr2hd, psenr3hd, psenr1sp, psenr2sp, psenr3sp," &
         "setax1hd, setax2hd, setax3hd, setax1sp, setax2sp, setax3sp, smpam1hd, smpam2hd, smpam3hd, smpam1sp," &
         "smpam2sp, smpam3sp, smprt1hd, smprt2hd, smprt3hd, smprt1sp, smprt2sp, smprt3sp, sole1hd, sole2hd," &
         "sole3hd, sole1sp, sole2sp, sole3sp, spamt1hd, spamt2hd, spamt3hd, spamt1sp, spamt2sp, spamt3sp," &
         "sppd1hd, sppd2hd, sppd3hd, sppd1sp, sppd2sp, sppd3sp, spsac1hd, spsac2hd, spsac3hd, spsac1sp," &
         "spsac2sp, spsac3sp, spuam1hd, spuam2hd, spuam3hd, spuam1sp, spuam2sp, spuam3sp, spupd1hd, spupd2hd," &
         "spupd3hd, spupd1sp, spupd2sp, spupd3sp, spusu1hd, spusu2hd, spusu3hd, spusu1sp, spusu2sp, spusu3sp," &
         "ppamt1hd, ppamt2hd, ppamt3hd, ppamt1sp, ppamt2sp, ppamt3sp, sspam1hd, sspam2hd, sspam3hd, sspam1sp," &
         "sspam2sp, sspam3sp, spsmp1hd, spsmp2hd, spsmp3hd, spsmp1sp, spsmp2sp, spsmp3sp, taxam1hd, taxam2hd," &
         "taxam3hd, taxam1sp, taxam2sp, taxam3sp, taxda1hd, taxda2hd, taxda3hd, taxda1sp, taxda2sp, taxda3sp," &
         "taxpd1hd, taxpd2hd, taxpd3hd, taxpd1sp, taxpd2sp, taxpd3sp, to1hr1hd, to1hr2hd, to1hr3hd, to1hr1sp," &
         "to1hr2sp, to1hr3sp, boinu1hd, boinu2hd, boinu3hd, boinu1sp, boinu2sp, boinu3sp, uincb1hd, uincb2hd," &
         "uincb3hd, uincb1sp, uincb2sp, uincb3sp, uded11hd, uded12hd, uded13hd, uded11sp, uded12sp, uded13sp," &
         "uded21hd, uded22hd, uded23hd, uded21sp, uded22sp, uded23sp, uded31hd, uded32hd, uded33hd, uded31sp," &
         "uded32sp, uded33sp, uded41hd, uded42hd, uded43hd, uded41sp, uded42sp, uded43sp, uded51hd, uded52hd," &
         "uded53hd, uded51sp, uded52sp, uded53sp, uded61hd, uded62hd, uded63hd, uded61sp, uded62sp, uded63sp," &
         "uded71hd, uded72hd, uded73hd, uded71sp, uded72sp, uded73sp, uded81hd, uded82hd, uded83hd, uded81sp," &
         "uded82sp, uded83sp, uded91hd, uded92hd, uded93hd, uded91sp, uded92sp, uded93sp, ugros1hd, ugros2hd," &
         "ugros3hd, ugros1sp, ugros2sp, ugros3sp, ugrsp1hd, ugrsp2hd, ugrsp3hd, ugrsp1sp, ugrsp2sp, ugrsp3sp," &
         "uinc11hd, uinc12hd, uinc13hd, uinc11sp, uinc12sp, uinc13sp, uinc21hd, uinc22hd, uinc23hd, uinc21sp," &
         "uinc22sp, uinc23sp, uinc31hd, uinc32hd, uinc33hd, uinc31sp, uinc32sp, uinc33sp, uinc41hd, uinc42hd," &
         "uinc43hd, uinc41sp, uinc42sp, uinc43sp, uinc51hd, uinc52hd, uinc53hd, uinc51sp, uinc52sp, uinc53sp," &
         "uinc61hd, uinc62hd, uinc63hd, uinc61sp, uinc62sp, uinc63sp, uinc71hd, uinc72hd, uinc73hd, uinc71sp," &
         "uinc72sp, uinc73sp, umile1hd, umile2hd, umile3hd, umile1sp, umile2sp, umile3sp, umot1hd, umot2hd," &
         "umot3hd, umot1sp, umot2sp, umot3sp, unett1hd, unett2hd, unett3hd, unett1sp, unett2sp, unett3sp," &
         "uoth11hd, uoth12hd, uoth13hd, uoth11sp, uoth12sp, uoth13sp, uoth21hd, uoth22hd, uoth23hd, uoth21sp," &
         "uoth22sp, uoth23sp, uoth31hd, uoth32hd, uoth33hd, uoth31sp, uoth32sp, uoth33sp, uoth41hd, uoth42hd," &
         "uoth43hd, uoth41sp, uoth42sp, uoth43sp, uoth51hd, uoth52hd, uoth53hd, uoth51sp, uoth52sp, uoth53sp," &
         "uoth61hd, uoth62hd, uoth63hd, uoth61sp, uoth62sp, uoth63sp, uoth71hd, uoth72hd, uoth73hd, uoth71sp," &
         "uoth72sp, uoth73sp, uoth81hd, uoth82hd, uoth83hd, uoth81sp, uoth82sp, uoth83sp, uoth91hd, uoth92hd," &
         "uoth93hd, uoth91sp, uoth92sp, uoth93sp, uot101hd, uot102hd, uot103hd, uot101sp, uot102sp, uot103sp," &
         "uotht1hd, uotht2hd, uotht3hd, uotht1sp, uotht2sp, uotht3sp, uothr1hd, uothr2hd, uothr3hd, uothr1sp," &
         "uothr2sp, uothr3sp, upay1hd, upay2hd, upay3hd, upay1sp, upay2sp, upay3sp, usapa1hd, usapa2hd," &
         "usapa3hd, usapa1sp, usapa2sp, usapa3sp, uspam1hd, uspam2hd, uspam3hd, uspam1sp, uspam2sp, uspam3sp," &
         "uspra1hd, uspra2hd, uspra3hd, uspra1sp, uspra2sp, uspra3sp, uppam1hd, uppam2hd, uppam3hd, uppam1sp," &
         "uppam2sp, uppam3sp, usspa1hd, usspa2hd, usspa3hd, usspa1sp, usspa2sp, usspa3sp, to2hr1hd, to2hr2hd," &
         "to2hr3hd, to2hr1sp, to2hr2sp, to2hr3sp, utaxa1hd, utaxa2hd, utaxa3hd, utaxa1sp, utaxa2sp, utaxa3sp," &
         "vcamt1hd, vcamt2hd, vcamt3hd, vcamt1sp, vcamt2sp, vcamt3sp, vcpd1hd, vcpd2hd, vcpd3hd, vcpd1sp," &
         "vcpd2sp, vcpd3sp, vcsac1hd, vcsac2hd, vcsac3hd, vcsac1sp, vcsac2sp, vcsac3sp, vcuam1hd, vcuam2hd," &
         "vcuam3hd, vcuam1sp, vcuam2sp, vcuam3sp, vcupd1hd, vcupd2hd, vcupd3hd, vcupd1sp, vcupd2sp, vcupd3sp," &
         "vcusu1hd, vcusu2hd, vcusu3hd, vcusu1sp, vcusu2sp, vcusu3sp, nou011hd, nou012hd, nou013hd, nou011sp," &
         "nou012sp, nou013sp, nou021hd, nou022hd, nou023hd, nou021sp, nou022sp, nou023sp, nou031hd, nou032hd," &
         "nou033hd, nou031sp, nou032sp, nou033sp, nou041hd, nou042hd, nou043hd, nou041sp, nou042sp, nou043sp," &
         "nou051hd, nou052hd, nou053hd, nou051sp, nou052sp, nou053sp, nou061hd, nou062hd, nou063hd, nou061sp," &
         "nou062sp, nou063sp, nou071hd, nou072hd, nou073hd, nou071sp, nou072sp, nou073sp, nou081hd, nou082hd," &
         "nou083hd, nou081sp, nou082sp, nou083sp, nou091hd, nou092hd, nou093hd, nou091sp, nou092sp, nou093sp," &
         "nou101hd, nou102hd, nou103hd, nou101sp, nou102sp, nou103sp, nou111hd, nou112hd, nou113hd, nou111sp," &
         "nou112sp, nou113sp, nou121hd, nou122hd, nou123hd, nou121sp, nou122sp, nou123sp, nou131hd, nou132hd," &
         "nou133hd, nou131sp, nou132sp, nou133sp, nou141hd, nou142hd, nou143hd, nou141sp, nou142sp, nou143sp," &
         "worka1hd, worka2hd, worka3hd, worka1sp, worka2sp, worka3sp, workm1hd, workm2hd, workm3hd, workm1sp," &
         "workm2sp, workm3sp, worky1hd, worky2hd, worky3hd, worky1sp, worky2sp, worky3sp, yjchg1hd, yjchg2hd," &
         "yjchg3hd, yjchg1sp, yjchg2sp, yjchg3sp, mp1hd, mp2hd, mp3hd, mp1sp, mp2sp, mp3sp," &
         "mrar11hd, mrar12hd, mrar13hd, mrar11sp, mrar12sp, mrar13sp, mrar21hd, mrar22hd, mrar23hd, mrar21sp," &
         "mrar22sp, mrar23sp, mrar31hd, mrar32hd, mrar33hd, mrar31sp, mrar32sp, mrar33sp, mrar41hd, mrar42hd," &
         "mrar43hd, mrar41sp, mrar42sp, mrar43sp, mrar51hd, mrar52hd, mrar53hd, mrar51sp, mrar52sp, mrar53sp," &
         "mpnch1hd, mpnch2hd, mpnch3hd, mpnch1sp, mpnch2sp, mpnch3sp, pmp1hd, pmp2hd, pmp3hd, pmp1sp," &
         "pmp2sp, pmp3sp, ump1hd, ump2hd, ump3hd, ump1sp, ump2sp, ump3sp, pump1hd, pump2hd," &
         "pump3hd, pump1sp, pump2sp, pump3sp, isump1hd, isump2hd, isump3hd, isump1sp, isump2sp, isump3sp," &
         "jobst1hd, jobst2hd, jobst1sp, jobst2sp, oddtp1hd, oddtp2hd, oddtp1sp, oddtp2sp, oddjb1hd, oddjb2hd," &
         "oddjb1sp, oddjb2sp, oddjn1hd, oddjn2hd, oddjn1sp, oddjn2sp, poth1hd, poth2hd, poth3hd, poth4hd," &
         "poth5hd, poth6hd, poth7hd, poth8hd, poth9hd, poth10hd, poth11hd, poth12hd, poth13hd, poth14hd," &
         "poth15hd, poth16hd, poth17hd, poth18hd, poth19hd, poth1sp, poth2sp, poth3sp, poth4sp, poth5sp," &
         "poth6sp, poth7sp, poth8sp, poth9sp, poth10sp, poth11sp, poth12sp, poth13sp, poth14sp, poth15sp," &
         "poth16sp, poth17sp, poth18sp, poth19sp, ocpen1hd, ocpen2hd, ocpen3hd, ocpen4hd, wpen1hd, wpen2hd," &
         "wpen3hd, ppen1hd, ppen2hd, ppen3hd, tupen1hd, tupen2hd, anpen1hd, anpen2hd, anpen3hd, trust1hd," &
         "trust2hd, expen1hd, expen2hd, ocpen1sp, ocpen2sp, ocpen3sp, ocpen4sp, wpen1sp, wpen2sp, wpen3sp," &
         "ppen1sp, ppen2sp, ppen3sp, tupen1sp, tupen2sp, anpen1sp, anpen2sp, anpen3sp, trust1sp, trust2sp," &
         "expen1sp, expen2sp, pcpen1hd, pcpen2hd, pcpen3hd, pcpen4hd, pwpen1hd, pwpen2hd, pwpen3hd, pppen1hd," &
         "pppen2hd, pppen3hd, ptupn1hd, ptupn2hd, panpn1hd, panpn2hd, panpn3hd, ptrst1hd, ptrst2hd, pxpen1hd," &
         "pxpen2hd, pcpen1sp, pcpen2sp, pcpen3sp, pcpen4sp, pwpen1sp, pwpen2sp, pwpen3sp, pppen1sp, pppen2sp," &
         "pppen3sp, ptupn1sp, ptupn2sp, panpn1sp, panpn2sp, panpn3sp, ptrst1sp, ptrst2sp, pxpen1sp, pxpen2sp," &
         "ocptd1hd, ocptd2hd, ocptd3hd, ocptd4hd, wpptd1hd, wpptd2hd, wpptd3hd, ppetd1hd, ppetd2hd, ppetd3hd," &
         "tuptd1hd, tuptd2hd, aptd1hd, aptd2hd, aptd3hd, trutd1hd, trutd2hd, exptd1hd, exptd2hd, ocptd1sp," &
         "ocptd2sp, ocptd3sp, ocptd4sp, wpptd1sp, wpptd2sp, wpptd3sp, ppetd1sp, ppetd2sp, ppetd3sp, tuptd1sp," &
         "tuptd2sp, aptd1sp, aptd2sp, aptd3sp, trutd1sp, trutd2sp, exptd1sp, exptd2sp, ocpid1hd, ocpid2hd," &
         "ocpid3hd, ocpid4hd, wwpid1hd, wwpid2hd, wwpid3hd, ppeid1hd, ppeid2hd, ppeid3hd, tupid1hd, tupid2hd," &
         "apid1hd, apid2hd, apid3hd, truid1hd, truid2hd, expid1hd, expid2hd, ocpid1sp, ocpid2sp, ocpid3sp," &
         "ocpid4sp, wwpid1sp, wwpid2sp, wwpid3sp, ppeid1sp, ppeid2sp, ppeid3sp, tupid1sp, tupid2sp, apid1sp," &
         "apid2sp, apid3sp, truid1sp, truid2sp, expid1sp, expid2sp, ocptx1hd, ocptx2hd, ocptx3hd, ocptx4hd," &
         "wptx1hd, wpptx2hd, wpptx3hd, ppetx1hd, ppetx2hd, ppetx3hd, tuptx1hd, tuptx2hd, aptx1hd, aptx2hd," &
         "aptx3hd, ttrtx1hd, ttrtx2hd, exptx1hd, exptx2hd, ocptx1sp, ocptx2sp, ocptx3sp, ocptx4sp, wptx1sp," &
         "wpptx2sp, wpptx3sp, ppetx1sp, ppetx2sp, ppetx3sp, tuptx1sp, tuptx2sp, aptx1sp, aptx2sp, aptx3sp," &
         "ttrtx1sp, ttrtx2sp, exptx1sp, exptx2sp, ocpoa1hd, ocpoa2hd, ocpoa3hd, ocpoa4hd, wpoa1hd, wwpoa2hd," &
         "wwpoa3hd, ppeoa1hd, ppeoa2hd, ppeoa3hd, tupoa1hd, tupoa2hd, apoa1hd, apoa2hd, apoa3hd, truoa1hd," &
         "truoa2hd, expoa1hd, expoa2hd, ocpoa1sp, ocpoa2sp, ocpoa3sp, ocpoa4sp, wpoa1sp, wwpoa2sp, wwpoa3sp," &
         "ppeoa1sp, ppeoa2sp, ppeoa3sp, tupoa1sp, tupoa2sp, apoa1sp, apoa2sp, apoa3sp, truoa1sp, truoa2sp," &
         "expoa1sp, expoa2sp, ocpoi1hd, ocpoi2hd, ocpoi3hd, ocpoi4hd, wpoi1hd, wwpoi2hd, wwpoi3hd, ppeoi1hd," &
         "ppeoi2hd, ppeoi3hd, tupoi1hd, tupoi2hd, apoi1hd, apoi2hd, apoi3hd, truoi1hd, truoi2hd, expoi1hd," &
         "expoi2hd, ocpoi1sp, ocpoi2sp, ocpoi3sp, ocpoi4sp, wpoi1sp, wwpoi2sp, wwpoi3sp, ppeoi1sp, ppeoi2sp," &
         "ppeoi3sp, tupoi1sp, tupoi2sp, apoi1sp, apoi2sp, apoi3sp, truoi1sp, truoi2sp, expoi1sp, expoi2sp," &
         "ocpta1hd, ocpta2hd, ocpta3hd, ocpta4hd, wpta1hd, wppta2hd, wppta3hd, ppeta1hd, ppeta2hd, ppeta3hd," &
         "tupta1hd, tupta2hd, apta1hd, apta2hd, apta3hd, truta1hd, truta2hd, expta1hd, expta2hd, ocpta1sp," &
         "ocpta2sp, ocpta3sp, ocpta4sp, wpta1sp, wppta2sp, wppta3sp, ppeta1sp, ppeta2sp, ppeta3sp, tupta1sp," &
         "tupta2sp, apta1sp, apta2sp, apta3sp, truta1sp, truta2sp, expta1sp, expta2sp, ocpti1hd, ocpti2hd," &
         "ocpti3hd, ocpti4hd, wpti1hd, wppti2hd, wppti3hd, ppeti1hd, ppeti2hd, ppeti3hd, tupti1hd, tupti2hd," &
         "apti1hd, apti2hd, apti3hd, truti1hd, truti2hd, expti1hd, expti2hd, ocpti1sp, ocpti2sp, ocpti3sp," &
         "ocpti4sp, wpti1sp, wppti2sp, wppti3sp, ppeti1sp, ppeti2sp, ppeti3sp, tupti1sp, tupti2sp, apti1sp," &
         "apti2sp, apti3sp, truti1sp, truti2sp, expti1sp, expti2sp, menpin11, menpin12, menpin13, menpin21," &
         "menpin22, menpin23, menpin31, menpin32, menpin33, menpol11, menpol12, menpol13, menpol21, menpol22," &
         "menpol23, menpol31, menpol32, menpol33, pmenpo11, pmenpo12, pmenpo13, pmenpo21, pmenpo22, pmenpo23," &
         "pmenpo31, pmenpo32, pmenpo33, bedroom, benunits, billrate, brma, burden, busroom, capval," &
         "charge1, charge2, charge3, charge4, charge5, charge6, charge7, charge8, charge9, chins," &
         "chrgpd1, chrgpd2, chrgpd3, chrgpd4, chrgpd5, chrgpd6, chrgpd7, chrgpd8, chrgpd9, covoths," &
         "csewamt, csewamt1, ct25d50d, ctamt, ctannual, ctband, ctbwait, ctcondoc, ctdisc, ctinstal," &
         "ctlvband, ctlvchk, ctreb, ctrebamt, ctrebpd, cttime, cwatamt, cwatamt1, entry1, entry2," &
         "entry3, entry4, gvtregn, gvtregno, hhldr01, hhldr02, hhldr03, hhldr04, hhldr05, hhldr06," &
         "hhldr07, hhldr08, hhldr09, hhldr10, hhldr11, hhldr12, hhldr13, hhldr14, hhldr97, hhstat," &
         "hlthst, intdate, mainacc, mnthcode, monlive, multi, nicoun, nidpnd, nmrmshar, nopay," &
         "norate, onbsroom, orgid, payrate, ptbsroom, rooms, roomshr, rt2rebam, rtannual, rtcondoc," &
         "rtdpa, rtdpaamt, rtene, rteneamt, rtgen, rtinstal, rtlpa, rtlpaamt, rtothamt, rtother," &
         "rtreb, rtrebamt, rtrtramt, rttimepd, schbrk, schfrt, schmeal, schmilk, seramt1, seramt2," &
         "seramt3, seramt4, seramt5, sercomb, serpay1, serpay2, serpay3, serpay4, serpay5, sewamt," &
         "sewanul, sewerpay, sewsep, sewtime, shelter, sobuy, stramt1, stramt2, strcov, strmort," &
         "stroths, strpd1, strpd2, suballow, sublet, sublety, subrent, tenure, tvlic, typeacc," &
         "urb, urbrur, urindew, urinds, watamt, watanul, watermet, waterpay, watrb, wattime," &
         "whoctbot, whorsp01, whorsp02, whorsp03, whorsp04, whorsp05, whorsp06, whorsp07, whorsp08, whorsp09," &
         "whorsp10, whorsp11, whorsp12, whorsp13, whorsp14, whynoct, wsewamt, wsewanul, wsewtime, yearlive," &
         "yearwhc, adulth, cwatamtd, depchldh, dischha1, dischhc1, diswhha1, diswhhc1, endowpay, gbhscost," &
         "grossct, hbeninc, hbindhh, hbindhh2, hearns, hhdisben, hhinc, hhinv, hhirben, hhnirben," &
         "hhothben, hhrent, hhrinc, hhrpinc, hhtvlic, hhtxcred, hothinc, hpeninc, hseinc, london," &
         "mortint, nihscost, penage, penhrp, ptentyp2, servpay, struins, tentyp2, tuhhrent, tuwatsew," &
         "watsewrt, hcgrent, hcfeudut, hcchrent, hcservch, hcmaint, hcsirent, hcfactor, hcother, hcpcomb," &
         "gvhelp, lacode, lauacode, llcare, needcare, colourtv, bwtv, serpd1, serpd2, serpd3," &
         "serpd4, serpd5, outsam11, outsam12, outsam21, outsam22, outsam31, outsam32, outsin11, outsin12," &
         "outsin21, outsin22, outsin31, outsin32, outspa11, outspa12, outspa21, outspa22, outspa31, outspa32," &
         "outspd11, outspd12, outspd21, outspd22, outspd31, outspd32, borramt1, borramt2, borramt3, endwp11," &
         "endwp12, endwp13, endwp21, endwp22, endwp23, endwp31, endwp32, endwp33, endwp41, endwp42," &
         "endwp43, endwp51, endwp52, endwp53, incmin11, incmin12, incmin13, incmin21, incmin22, incmin23," &
         "incmin31, incmin32, incmin33, incmp11, incmp12, incmp13, incmp21, incmp22, incmp23, incmp31," &
         "incmp32, incmp33, incmpa11, incmpa12, incmpa13, incmpa21, incmpa22, incmpa23, incmpa31, incmpa32," &
         "incmpa33, pincmp11, pincmp12, pincmp13, pincmp21, pincmp22, pincmp23, pincmp31, pincmp32, pincmp33," &
         "intpri1, intpri2, intpri3, pintrpi1, pintrpi2, pintrpi3, loanyr1, loanyr2, loanyr3, menpol1," &
         "menpol2, menpol3, morall1, morall2, morall3, morflc1, morflc2, morflc3, morinp1, morinp2," &
         "morinp3, pmorinp1, pmorinp2, pmorinp3, morinus1, morinus2, morinus3, mortend1, mortend2, mortend3," &
         "mortlef1, mortlef2, mortlef3, mortpro1, mortpro2, mortpro3, morttyp1, morttyp2, morttyp3, morupd1," &
         "morupd2, morupd3, morus1, morus2, morus3, mpcove11, mpcove12, mpcove13, mpcove21, mpcove22," &
         "mpcove23, mpcove31, mpcove32, mpcove33, outsmor1, outsmor2, outsmor3, rmamt1, rmamt2, rmamt3," &
         "rmort1, rmort2, rmort3, rmortyr1, rmortyr2, rmortyr3, rmpur011, rmpur012, rmpur013, rmpur021," &
         "rmpur022, rmpur023, rmpur031, rmpur032, rmpur033, rmpur041, rmpur042, rmpur043, rmpur051, rmpur052," &
         "rmpur053, rmpur061, rmpur062, rmpur063, rmpur071, rmpur072, rmpur073, rmpur081, rmpur082, rmpur083," &
         "buyyear, purcamt, purcloan, secmpur3, secmpur4, secmpur1, secmpur5, secmpur6, secmpur2, secmpur7," &
         "rexhham1, accchk1, rexhhwh1, prexhha1, accjbp10, accjbp11, accjbp12, accjbp13, accjbp14, accjob," &
         "ctract, eligamt, eligpd, fairrent, furnish, hbenamt, hbenchk, hbenefit, hbenpd, hbenwait," &
         "hbmnth, hbrecp, hbweeks, hbyear, hbyears, landlord, niystart, othtype, rebate, rent," &
         "rentdoc, renthol, rentpd, rentpd1, rentpd2, resll, resll2, serincam, tentype, weekhol," &
         "wsinc, wsincamt, ystartr, accjbp1, accjbp2, accjbp3, accjbp4, accjbp5, accjbp6, accjbp7," &
         "accjbp8, accjbp9, rexhh, rntfull, lighting, heating, hotwater, fuelcook, tvlice, elec," &
         "gas, lsf " &
         " from frs.frs1516 " ;
   
   --
   -- Insert all variables; substring to be competed with output from some criteria
   --
   INSERT_PART : constant String := "insert into frs.frs1516 (" &
         "user_id, edition, year, sernum, benunit, int1hd, int2hd, int3hd, int4hd, int5hd," &
         "int6hd, int7hd, int8hd, int9hd, int10hd, int11hd, int12hd, int13hd, int14hd, int15hd," &
         "int16hd, int17hd, int18hd, int19hd, int21hd, int22hd, int23hd, int24hd, int25hd, int26hd," &
         "int27hd, int28hd, int29hd, int30hd, int1sp, int2sp, int3sp, int4sp, int5sp, int6sp," &
         "int7sp, int8sp, int9sp, int10sp, int11sp, int12sp, int13sp, int14sp, int15sp, int16sp," &
         "int17sp, int18sp, int19sp, int21sp, int22sp, int23sp, int24sp, int25sp, int26sp, int27sp," &
         "int28sp, int29sp, int30sp, intx1hd, intx2hd, intx3hd, intx4hd, intx5hd, intx6hd, intx7hd," &
         "intx8hd, intx9hd, intx10hd, intx11hd, intx12hd, intx13hd, intx14hd, intx15hd, intx16hd, intx17hd," &
         "intx18hd, intx19hd, intx21hd, intx22hd, intx23hd, intx24hd, intx25hd, intx26hd, intx27hd, intx28hd," &
         "intx29hd, intx30hd, intx1sp, intx2sp, intx3sp, intx4sp, intx5sp, intx6sp, intx7sp, intx8sp," &
         "intx9sp, intx10sp, intx11sp, intx12sp, intx13sp, intx14sp, intx15sp, intx16sp, intx17sp, intx18sp," &
         "intx19sp, intx21sp, intx22sp, intx23sp, intx24sp, intx25sp, intx26sp, intx27sp, intx28sp, intx29sp," &
         "intx30sp, invt1hd, invt2hd, invt3hd, invt4hd, invt5hd, invt6hd, invt7hd, invt8hd, invt9hd," &
         "invt10hd, invt11hd, invt12hd, invt13hd, invt14hd, invt15hd, invt16hd, invt17hd, invt18hd, invt19hd," &
         "invt21hd, invt22hd, invt23hd, invt24hd, invt25hd, invt26hd, invt27hd, invt28hd, invt29hd, invt30hd," &
         "invt1sp, invt2sp, invt3sp, invt4sp, invt5sp, invt6sp, invt7sp, invt8sp, invt9sp, invt10sp," &
         "invt11sp, invt12sp, invt13sp, invt14sp, invt15sp, invt16sp, invt17sp, invt18sp, invt19sp, invt21sp," &
         "invt22sp, invt23sp, invt24sp, invt25sp, invt26sp, invt27sp, invt28sp, invt29sp, invt30sp, nsa1hd," &
         "nsa2hd, nsa3hd, nsa4hd, nsa5hd, nsa6hd, nsa7hd, nsa8hd, nsa9hd, nsa10hd, nsa11hd," &
         "nsa12hd, nsa13hd, nsa14hd, nsa15hd, nsa16hd, nsa17hd, nsa18hd, nsa19hd, nsa21hd, nsa22hd," &
         "nsa23hd, nsa24hd, nsa25hd, nsa26hd, nsa27hd, nsa28hd, nsa29hd, nsa30hd, nsa1sp, nsa2sp," &
         "nsa3sp, nsa4sp, nsa5sp, nsa6sp, nsa7sp, nsa8sp, nsa9sp, nsa10sp, nsa11sp, nsa12sp," &
         "nsa13sp, nsa14sp, nsa15sp, nsa16sp, nsa17sp, nsa18sp, nsa19sp, nsa21sp, nsa22sp, nsa23sp," &
         "nsa24sp, nsa25sp, nsa26sp, nsa27sp, nsa28sp, nsa29sp, nsa30sp, ablehd, ablesp, abs1pdhd," &
         "abs1pdsp, absparhd, absparsp, abspayhd, abspaysp, abswhyhd, abswhysp, abswkhd, abswksp, acshd," &
         "acssp, acctqhd, acctqsp, acsamthd, acsamtsp, acspdhd, acspdsp, actacihd, actacisp, emahd," &
         "emasp, emaamthd, emaamtsp, emapdhd, emapdsp, agehd, agesp, agehqhd, agehqsp, aliamthd," &
         "aliamtsp, alimnyhd, alimnysp, alipdhd, alipdsp, aliushd, aliussp, absallhd, absallsp, organhd," &
         "organsp, fosterhd, fostersp, adopthd, adoptsp, pasbalhd, pasbalsp, porganhd, porgansp, pfostehd," &
         "pfostesp, padopthd, padoptsp, aluamthd, aluamtsp, alupdhd, alupdsp, anyacchd, anyaccsp, anyedhd," &
         "anyedsp, anymonhd, anymonsp, anype1hd, anype1sp, anype2hd, anype2sp, anype3hd, anype3sp, anype4hd," &
         "anype4sp, anype5hd, anype5sp, anype6hd, anype6sp, anype7hd, anype7sp, abspamhd, abspamsp, abspexhd," &
         "abspexsp, apdpdhd, apdpdsp, pabspahd, pabspasp, basacthd, basactsp, bfdhd, bfdsp, bfdamthd," &
         "bfdamtsp, pbfdhd, pbfdsp, bfdvalhd, bfdvalsp, careabhd, careabsp, careahhd, careahsp, carecbhd," &
         "carecbsp, carechhd, carechsp, careclhd, careclsp, careflhd, careflsp, carefrhd, carefrsp, careothd," &
         "careotsp, carerhd, carersp, cbaamthd, cbaamtsp, cbchkhd, cbchksp, changehd, changesp, chbflghd," &
         "chbflgsp, chknophd, chknopsp, fpchd, fpcsp, fuchd, fucsp, fhbhd, fhbsp, fwtchd," &
         "fwtcsp, fctchd, fctcsp, fishd, fissp, fjsahd, fjsasp, fesahd, fesasp, claimahd," &
         "claimasp, cohabhd, cohabsp, condithd, conditsp, blodgehd, blodgesp, ctclm1hd, ctclm1sp, ctclm2hd," &
         "ctclm2sp, cupchkhd, cupchksp, curacthd, curactsp, curqulhd, curqulsp, blheadhd, blheadsp, blrenthd," &
         "blrentsp, pblrenhd, pblrensp, ddaprghd, ddaprgsp, ddatrehd, ddatresp, ddatrphd, ddatrpsp, defrpnhd," &
         "defrpnsp, dependhd, dependsp, disacahd, disacasp, qpiphd, qpipsp, qdlahd, qdlasp, qaahd," &
         "qaasp, qsdahd, qsdasp, qibhd, qibsp, qiidbhd, qiidbsp, discoahd, discoasp, disd01hd," &
         "disd01sp, disd02hd, disd02sp, disd03hd, disd03sp, disd04hd, disd04sp, disd05hd, disd05sp, disd06hd," &
         "disd06sp, disd07hd, disd07sp, disd08hd, disd08sp, disd09hd, disd09sp, disd10hd, disd10sp, disdifhd," &
         "disdifsp, dlachd, dlacsp, dlamhd, dlamsp, dlshd, dlssp, dlsamthd, dlsamtsp, pdlshd," &
         "pdlssp, dlsvalhd, dlsvalsp, dobhd, dobsp, h3qualhd, h3qualsp, dvil3ahd, dvil3asp, dvil4ahd," &
         "dvil4asp, dvjb12hd, dvjb12sp, dvmarhd, dvmarsp, edl1ahd, edl1asp, pedl1ahd, pedl1asp, edl1obhd," &
         "edl1obsp, edl2ahd, edl2asp, pedl2ahd, pedl2asp, edl2obhd, edl2obsp, edatthd, edattsp, edhrhd," &
         "edhrsp, edtyphd, edtypsp, empconhd, empconsp, empocchd, empoccsp, empshd, empssp, empbhd," &
         "empbsp, empchd, empcsp, empilohd, empilosp, es2000hd, es2000sp, ethgr3hd, ethgr3sp, ethgpshd," &
         "ethgpssp, etngrphd, etngrpsp, eualamhd, eualamsp, eualmnhd, eualmnsp, peualihd, peualisp, euetyphd," &
         "euetypsp, everwkhd, everwksp, ehbct1hd, ehbct1sp, fllwphd, fllwpsp, ftedhd, ftedsp, ftwkyrhd," &
         "ftwkyrsp, gebacthd, gebactsp, giltcthd, giltctsp, gpispchd, gpispcsp, gpjesahd, gpjesasp, gpuchd," &
         "gpucsp, granthd, grantsp, gt1valhd, gt1valsp, gt2valhd, gt2valsp, gt1dirhd, gt1dirsp, gt2dirhd," &
         "gt2dirsp, grtnumhd, grtnumsp, gt1scehd, gt1scesp, gt2scehd, gt2scesp, gt1oshd, gt1ossp, gt2oshd," &
         "gt2ossp, gtahd, gtasp, healthhd, healthsp, heartvhd, heartvsp, heatadhd, heatadsp, hholdrhd," &
         "hholdrsp, hourabhd, hourabsp, hourahhd, hourahsp, hrcarehd, hrcaresp, hourcbhd, hourcbsp, hourchhd," &
         "hourchsp, hourclhd, hourclsp, hourfrhd, hourfrsp, hourothd, hourotsp, hourrehd, hourresp, hourtthd," &
         "hourttsp, hpersohd, hpersosp, hrpidhd, hrpidsp, hsvperhd, hsvpersp, agegp2hd, agegp2sp, agegphd," &
         "agegpsp, quninshd, quninssp, qtubenhd, qtubensp, qsicinhd, qsicinsp, qaccinhd, qaccinsp, qpehinhd," &
         "qpehinsp, qhosinhd, qhosinsp, qfsbenhd, qfsbensp, qcichd, qcicsp, qotbenhd, qotbensp, incdurhd," &
         "incdursp, incsehd, incsesp, indinchd, indincsp, indisbhd, indisbsp, inearnhd, inearnsp, ininvhd," &
         "ininvsp, inirbehd, inirbesp, injlonhd, injlonsp, injhrshd, injhrssp, innirbhd, innirbsp, inothbhd," &
         "inothbsp, inpenihd, inpenisp, inrinchd, inrincsp, inrpinhd, inrpinsp, itvlichd, itvlicsp, intxcdhd," &
         "intxcdsp, investhd, investsp, isa1tyhd, isa1tysp, isa2tyhd, isa2tysp, isactihd, isactisp, jobawahd," &
         "jobawasp, jobbyrhd, jobbyrsp, qcbhd, qcbsp, qgahd, qgasp, qmahd, qmasp, lareghd," &
         "laregsp, likewkhd, likewksp, limitlhd, limitlsp, lktimehd, lktimesp, lktrnhd, lktrnsp, lkworkhd," &
         "lkworksp, loanhd, loansp, loannuhd, loannusp, lstwkmhd, lstwkmsp, lstwkyhd, lstwkysp, wkswkdhd," &
         "wkswkdsp, marithd, maritsp, mr1hd, mr1sp, mr2hd, mr2sp, mntar1hd, mntar1sp, mntar2hd," &
         "mntar2sp, mntar3hd, mntar3sp, mntar4hd, mntar4sp, mntar5hd, mntar5sp, mntnc1hd, mntnc1sp, mntnc2hd," &
         "mntnc2sp, mntnc3hd, mntnc3sp, mntnc4hd, mntnc4sp, mntnc5hd, mntnc5sp, mntpayhd, mntpaysp, pmr1hd," &
         "pmr1sp, pmr2hd, pmr2sp, mntpr1hd, mntpr1sp, mntpr2hd, mntpr2sp, mntpr3hd, mntpr3sp, mr12mhd," &
         "mr12msp, mntt1hd, mntt1sp, mntt2hd, mntt2sp, mntt3hd, mntt3sp, mntus1hd, mntus1sp, mntus2hd," &
         "mntus2sp, umr1hd, umr1sp, umr2hd, umr2sp, pumr1hd, pumr1sp, pumr2hd, pumr2sp, mntw1hd," &
         "mntw1sp, mntw2hd, mntw2sp, mntw3hd, mntw3sp, mntw4hd, mntw4sp, mntw5hd, mntw5sp, mshd," &
         "mssp, nanid1hd, nanid1sp, nanid2hd, nanid2sp, nanid3hd, nanid3sp, nanid4hd, nanid4sp, nanid5hd," &
         "nanid5sp, nanid6hd, nanid6sp, nitrnhd, nitrnsp, niamthd, niamtsp, niethghd, niethgsp, nixhbbhd," &
         "nixhbbsp, ninid1hd, ninid1sp, ninid2hd, ninid2sp, ninid3hd, ninid3sp, ninid4hd, ninid4sp, ninid5hd," &
         "ninid5sp, ninid6hd, ninid6sp, ninid7hd, ninid7sp, nincs2hd, nincs2sp, nininchd, ninincsp, ninearhd," &
         "ninearsp, nininvhd, nininvsp, ninpenhd, ninpensp, ninrinhd, ninrinsp, ninseihd, ninseisp, pniamthd," &
         "pniamtsp, nireghd, niregsp, nirelghd, nirelgsp, nolk1hd, nolk1sp, nolk2hd, nolk2sp, nolk3hd," &
         "nolk3sp, nowanthd, nowantsp, nssechd, nssecsp, numjobhd, numjobsp, numj2hd, numj2sp, ocnumhd," &
         "ocnumsp, oddjobhd, oddjobsp, oldstdhd, oldstdsp, oabparhd, oabparsp, otamthd, otamtsp, otpamthd," &
         "otpamtsp, otappdhd, otappdsp, qehbtbhd, qehbtbsp, qwidplhd, qwidplsp, qinwkchd, qinwkcsp, qrtwkchd," &
         "qrtwkcsp, qothbehd, qothbesp, othtaxhd, othtaxsp, otinvahd, otinvasp, pareamhd, pareamsp, qpchd," &
         "qpcsp, qrphd, qrpsp, qbbhd, qbbsp, qafcshd, qafcssp, qwwphd, qwwpsp, penflghd," &
         "penflgsp, penwl1hd, penwl1sp, penwl2hd, penwl2sp, penwl3hd, penwl3sp, penwl4hd, penwl4sp, penwl5hd," &
         "penwl5sp, penwl6hd, penwl6sp, pepscthd, pepsctsp, personhd, personsp, qpipdhd, qpipdsp, qpipmhd," &
         "qpipmsp, poaccthd, poacctsp, pocardhd, pocardsp, ppnumchd, ppnumcsp, proptxhd, proptxsp, ptwkyrhd," &
         "ptwkyrsp, relp1hd, relp1sp, relp2hd, relp2sp, relp3hd, relp3sp, relp4hd, relp4sp, relp5hd," &
         "relp5sp, relp6hd, relp6sp, relp7hd, relp7sp, relp8hd, relp8sp, relp9hd, relp9sp, relp10hd," &
         "relp10sp, relp11hd, relp11sp, relp12hd, relp12sp, relp13hd, relp13sp, relp14hd, relp14sp, reasonhd," &
         "reasonsp, redamthd, redamtsp, redundhd, redundsp, rednethd, rednetsp, redtaxhd, redtaxsp, relhrphd," &
         "relhrpsp, relgewhd, relgewsp, relgschd, relgscsp, rprofhd, rprofsp, retirehd, retiresp, retir1hd," &
         "retir1sp, retreshd, retressp, renthd, rentsp, royalhd, royalsp, sleephd, sleepsp, forpenhd," &
         "forpensp, restrchd, restrcsp, sapadjhd, sapadjsp, sdem01hd, sdem01sp, sdem02hd, sdem02sp, sdem03hd," &
         "sdem03sp, sdem04hd, sdem04sp, sdem05hd, sdem05sp, sdem06hd, sdem06sp, sdem07hd, sdem07sp, sdem08hd," &
         "sdem08sp, sdem09hd, sdem09sp, sdem10hd, sdem10sp, sdem11hd, sdem11sp, sdem12hd, sdem12sp, inseinhd," &
         "inseinsp, sdemphd, sdempsp, sexhd, sexsp, sichd, sicsp, sidqnhd, sidqnsp, sloshd," &
         "slossp, slramthd, slramtsp, slrppdhd, slrppdsp, smpajhd, smpajsp, sc2010hd, sc2010sp, qsfgrhd," &
         "qsfgrsp, qssmthd, qssmtsp, qlgdwphd, qlgdwpsp, qlglahd, qlglasp, blindhd, blindsp, parsihd," &
         "parsisp, deafhd, deafsp, spouthd, spoutsp, sppadjhd, sppadjsp, spyrothd, spyrotsp, srentahd," &
         "srentasp, psrenthd, psrentsp, sfispchd, sfispcsp, sfjesahd, sfjesasp, sruchd, srucsp, sspajhd," &
         "sspajsp, gtsavahd, gtsavasp, stshcthd, stshctsp, tdaywkhd, tdaywksp, agefedhd, agefedsp, tmpjobhd," &
         "tmpjobsp, tesscthd, tessctsp, totgrahd, totgrasp, tothouhd, tothousp, totinthd, totintsp, totocchd," &
         "totoccsp, trainhd, trainsp, trnallhd, trnallsp, ttbprxhd, ttbprxsp, tuborrhd, tuborrsp, typeedhd," &
         "typeedsp, unpd1hd, unpd1sp, unpd2hd, unpd2sp, untrcthd, untrctsp, upersohd, upersosp, agewidhd," &
         "agewidsp, kidwidhd, kidwidsp, quchd, qucsp, qhbhd, qhbsp, qwtchd, qwtcsp, qctchd," &
         "qctcsp, qishd, qissp, qjsahd, qjsasp, qesahd, qesasp, qcahd, qcasp, waithd," &
         "waitsp, whresphd, whrespsp, whoctbhd, whoctbsp, widocchd, widoccsp, wintflhd, wintflsp, workinhd," &
         "workinsp, wpahd, wpasp, wpbahd, wpbasp, wtclm1hd, wtclm1sp, wtclm2hd, wtclm2sp, yjblevhd," &
         "yjblevsp, ystwkhd, ystwksp, as011hd, as012hd, as013hd, as014hd, as011sp, as012sp, as013sp," &
         "as014sp, as021hd, as022hd, as021sp, as022sp, as031hd, as031sp, as051hd, as052hd, as053hd," &
         "as054hd, as055hd, as056hd, as057hd, as051sp, as052sp, as053sp, as054sp, as055sp, as056sp," &
         "as057sp, as061hd, as061sp, as071hd, as071sp, as081hd, as082hd, as083hd, as084hd, as085hd," &
         "as081sp, as082sp, as083sp, as084sp, as085sp, as101hd, as101sp, as111hd, as111sp, as121hd," &
         "as121sp, as131hd, as131sp, as141hd, as142hd, as143hd, as141sp, as142sp, as143sp, as151hd," &
         "as151sp, as161hd, as161sp, as191hd, as191sp, as211hd, as212hd, as213hd, as214hd, as211sp," &
         "as212sp, as213sp, as214sp, as261hd, as261sp, as271hd, as272hd, as271sp, as272sp, as281hd," &
         "as281sp, as291hd, as292hd, as293hd, as291sp, as292sp, as293sp, stdlachd, stdlamhd, stcbhd," &
         "stpenchd, strphd, stwphd, stwdphd, stwwphd, stsdahd, staahd, sticahd, stjsahd, stiidbhd," &
         "stesahd, stibhd, stishd, stmahd, stshhd, stgahd, stwtchd, stctchd, stwtclhd, stctclhd," &
         "stuchd, stpipdhd, stpipmhd, stdlacsp, stdlamsp, stcbsp, stpencsp, strpsp, stwpsp, stwdpsp," &
         "stwwpsp, stsdasp, staasp, sticasp, stjsasp, stiidbsp, stesasp, stibsp, stissp, stmasp," &
         "stshsp, stgasp, stwtcsp, stctcsp, stwtclsp, stctclsp, stucsp, stpipdsp, stpipmsp, dlacahd," &
         "dlamohd, cbhd, lpencrhd, rphd, wphd, wdphd, wwphd, sdahd, aahd, icahd," &
         "jsahd, iidbhd, esahd, ibhd, ishd, mahd, sfmghd, sffghd, othbenhd, tubenhd," &
         "fsbenhd, sicinhd, accinhd, hosinhd, gtshd, gahd, iwchd, r2wchd, widplhd, uninshd," &
         "wfamthd, dssdpihd, dssdpjhd, sfrpaihd, sfrpajhd, exhbhd, perhinhd, otsiinhd, cichd, bowtchd," &
         "boctchd, bowtclhd, boctclhd, hbhd, uchd, pipdhd, pipmhd, lndwphd, lnlahd, dwpauchd," &
         "sfrpuchd, dlacasp, dlamosp, cbsp, lpencrsp, rpsp, wpsp, wdpsp, wwpsp, sdasp," &
         "aasp, icasp, jsasp, iidbsp, esasp, ibsp, issp, masp, sfmgsp, sffgsp," &
         "othbensp, tubensp, fsbensp, sicinsp, accinsp, hosinsp, gtssp, gasp, iwcsp, r2wcsp," &
         "widplsp, uninssp, wfamtsp, dssdpisp, dssdpjsp, sfrpaisp, sfrpajsp, exhbsp, perhinsp, otsiinsp," &
         "cicsp, bowtcsp, boctcsp, bowtclsp, boctclsp, hbsp, ucsp, pipdsp, pipmsp, lndwpsp," &
         "lnlasp, dwpaucsp, sfrpucsp, ltdlachd, ltdlamhd, ltcbhd, bopenchd, ltrphd, ltwphd, ltwdphd," &
         "ltwwphd, ltsdahd, ltaahd, lticahd, ltjsahd, ltiidbhd, ltesahd, ltibhd, ltishd, ltmahd," &
         "ltshhd, ltgahd, hwtchd, hctchd, hwtclhd, hctclhd, ltuchd, ltpipdhd, ltpipmhd, ltdlacsp," &
         "ltdlamsp, ltcbsp, bopencsp, ltrpsp, ltwpsp, ltwdpsp, ltwwpsp, ltsdasp, ltaasp, lticasp," &
         "ltjsasp, ltiidbsp, ltesasp, ltibsp, ltissp, ltmasp, ltshsp, ltgasp, hwtcsp, hctcsp," &
         "hwtclsp, hctclsp, ltucsp, ltpipdsp, ltpipmsp, pdlacahd, pdlamohd, pcbhd, hpenchd, prphd," &
         "pwphd, pwdphd, pwwphd, psdahd, paahd, picahd, pjsahd, piidbhd, pesahd, pibhd," &
         "pishd, pmahd, pothbehd, ptubenhd, pfsbenhd, psicinhd, paccinhd, phosinhd, pgtshd, pgahd," &
         "iwcpdhd, r2wcpdhd, puninshd, pdsspihd, pdsspjhd, pexhbhd, ppehinhd, potsinhd, pdcichd, wwtchd," &
         "wctchd, wwtclhd, wctclhd, phbhd, puchd, ppipdhd, ppipmhd, pdwpuchd, pdlacasp, pdlamosp," &
         "pcbsp, hpencsp, prpsp, pwpsp, pwdpsp, pwwpsp, psdasp, paasp, picasp, pjsasp," &
         "piidbsp, pesasp, pibsp, pissp, pmasp, pothbesp, ptubensp, pfsbensp, psicinsp, paccinsp," &
         "phosinsp, pgtssp, pgasp, iwcpdsp, r2wcpdsp, puninssp, pdsspisp, pdsspjsp, pexhbsp, ppehinsp," &
         "potsinsp, pdcicsp, wwtcsp, wctcsp, wwtclsp, wctclsp, phbsp, pucsp, ppipdsp, ppipmsp," &
         "pdwpucsp, cbpayehd, cbpayesp, cbtaxhd, cbtaxsp, pwtchd, pctchd, pwtcsp, pctcsp, npcamthd," &
         "urphd, uwphd, uesahd, uishd, uwtchd, uctchd, npcamtsp, urpsp, uwpsp, uesasp," &
         "uissp, uwtcsp, uctcsp, dmpenchd, purphd, puwphd, nupesahd, puishd, dmpencsp, purpsp," &
         "puwpsp, nupesasp, puissp, wjsahd, wesahd, wishd, wothbehd, wtubenhd, wfsbenhd, wsicinhd," &
         "waccinhd, whosinhd, wkiwchd, wkr2whd, wuninshd, wpehinhd, wotsinhd, wocichd, whbhd, wjsasp," &
         "wesasp, wissp, wothbesp, wtubensp, wfsbensp, wsicinsp, waccinsp, whosinsp, wkiwcsp, wkr2wsp," &
         "wuninssp, wpehinsp, wotsinsp, wocicsp, whbsp, yjsahd, yesahd, yishd, yhbhd, yjsasp," &
         "yesasp, yissp, yhbsp, prothbhd, prtubehd, prfsbehd, prsicihd, praccihd, prhosihd, pruninhd," &
         "prphinhd, prosinhd, prcichd, prothbsp, prtubesp, prfsbesp, prsicisp, praccisp, prhosisp, pruninsp," &
         "prphinsp, prosinsp, prcicsp, uspenchd, usrphd, uswphd, usjsahd, usishd, uspencsp, usrpsp," &
         "uswpsp, usjsasp, usissp, gicacahd, pencrdhd, gicaahd, muibwhd, wfuelhd, exhbtyhd, lnodwphd," &
         "lnolahd, gicacasp, pencrdsp, gicaasp, muibwsp, wfuelsp, exhbtysp, lnodwpsp, lnolasp, dcpayhd," &
         "dmpayhd, ecpenchd, wporbahd, aapayhd, jsatyphd, esatyphd, mupibhd, dssishd, dssjsahd, sfincihd," &
         "sfincjhd, pdlpayhd, pmpayhd, dwpuchd, sfinuchd, dcpaysp, dmpaysp, ecpencsp, wporbasp, aapaysp," &
         "jsatypsp, esatypsp, mupibsp, dssissp, dssjsasp, sfincisp, sfincjsp, pdlpaysp, pmpaysp, dwpucsp," &
         "sfinucsp, icaperhd, pmuibhd, pipmothd, icapersp, pmuibsp, pipmotsp, r1dlchd, r1dlmhd, r1aahd," &
         "r1hbhd, r1pipdhd, r1pipmhd, r1dlcsp, r1dlmsp, r1aasp, r1hbsp, r1pipdsp, r1pipmsp, r2dlchd," &
         "r2dlmhd, r2aahd, r2hbhd, r2pipdhd, r2pipmhd, r2dlcsp, r2dlmsp, r2aasp, r2hbsp, r2pipdsp," &
         "r2pipmsp, r3dlchd, r3dlmhd, r3aahd, r3hbhd, r3pipdhd, r3pipmhd, r3dlcsp, r3dlmsp, r3aasp," &
         "r3hbsp, r3pipdsp, r3pipmsp, r4dlchd, r4dlmhd, r4aahd, r4hbhd, r4pipdhd, r4pipmhd, r4dlcsp," &
         "r4dlmsp, r4aasp, r4hbsp, r4pipdsp, r4pipmsp, r5dlchd, r5dlmhd, r5aahd, r5hbhd, r5pipdhd," &
         "r5pipmhd, r5dlcsp, r5dlmsp, r5aasp, r5hbsp, r5pipdsp, r5pipmsp, stdlacc1, stdlamc1, stdlacc2," &
         "stdlamc2, stdlacc3, stdlamc3, stdlacc4, stdlamc4, stdlacc5, stdlamc5, stdlacc6, stdlamc6, stdlacc7," &
         "stdlamc7, stdlacc8, stdlamc8, stdlacc9, stdlamc9, dlacac1, dlamoc1, dlacac2, dlamoc2, dlacac3," &
         "dlamoc3, dlacac4, dlamoc4, dlacac5, dlamoc5, dlacac6, dlamoc6, dlacac7, dlamoc7, dlacac8," &
         "dlamoc8, dlacac9, dlamoc9, ltdlacc1, ltdlamc1, ltdlacc2, ltdlamc2, ltdlacc3, ltdlamc3, ltdlacc4," &
         "ltdlamc4, ltdlacc5, ltdlamc5, ltdlacc6, ltdlamc6, ltdlacc7, ltdlamc7, ltdlacc8, ltdlamc8, ltdlacc9," &
         "ltdlamc9, pdlacac1, pdlamoc1, pdlacac2, pdlamoc2, pdlacac3, pdlamoc3, pdlacac4, pdlamoc4, pdlacac5," &
         "pdlamoc5, pdlacac6, pdlamoc6, pdlacac7, pdlamoc7, pdlacac8, pdlamoc8, pdlacac9, pdlamoc9, dcpayc1," &
         "dmpayc1, dcpayc2, dmpayc2, dcpayc3, dmpayc3, dcpayc4, dmpayc4, dcpayc5, dmpayc5, dcpayc6," &
         "dmpayc6, dcpayc7, dmpayc7, dcpayc8, dmpayc8, dcpayc9, dmpayc9, r1dlcc1, r1dlmc1, r1dlcc2," &
         "r1dlmc2, r1dlcc3, r1dlmc3, r1dlcc4, r1dlmc4, r1dlcc5, r1dlmc5, r1dlcc6, r1dlmc6, r1dlcc7," &
         "r1dlmc7, r1dlcc8, r1dlmc8, r1dlcc9, r1dlmc9, r2dlcc1, r2dlmc1, r2dlcc2, r2dlmc2, r2dlcc3," &
         "r2dlmc3, r2dlcc4, r2dlmc4, r2dlcc5, r2dlmc5, r2dlcc6, r2dlmc6, r2dlcc7, r2dlmc7, r2dlcc8," &
         "r2dlmc8, r2dlcc9, r2dlmc9, r3dlcc1, r3dlmc1, r3dlcc2, r3dlmc2, r3dlcc3, r3dlmc3, r3dlcc4," &
         "r3dlmc4, r3dlcc5, r3dlmc5, r3dlcc6, r3dlmc6, r3dlcc7, r3dlmc7, r3dlcc8, r3dlmc8, r3dlcc9," &
         "r3dlmc9, r4dlcc1, r4dlmc1, r4dlcc2, r4dlmc2, r4dlcc3, r4dlmc3, r4dlcc4, r4dlmc4, r4dlcc5," &
         "r4dlmc5, r4dlcc6, r4dlmc6, r4dlcc7, r4dlmc7, r4dlcc8, r4dlmc8, r4dlcc9, r4dlmc9, r5dlcc1," &
         "r5dlmc1, r5dlcc2, r5dlmc2, r5dlcc3, r5dlmc3, r5dlcc4, r5dlmc4, r5dlcc5, r5dlmc5, r5dlcc6," &
         "r5dlmc6, r5dlcc7, r5dlmc7, r5dlcc8, r5dlmc8, r5dlcc9, r5dlmc9, adbtbl, adddec, addhol," &
         "addholr, addins, addmon, adepfur, adles, adlesoa, af1, afdep2, cdelply, cdepact," &
         "cdepbed, cdepcel, cdepeqp, cdephol, cdeples, cdeptea, cdeptrp, cdepveg, cdpcoat, clothes," &
         "cplay, debt10, debt11, debt12, debt13, debtar01, debtar02, debtar03, debtar04, debtar05," &
         "debtar06, debtar07, debtar08, debtar09, debtar10, debtar11, debtar12, debtar13, debtfre1, debtfre2," &
         "debtfre3, hbolng, houshe1, kidinc, meal, nhhchild, oafur, oapre, outpay, outpyamt," &
         "regpamt, regularp, shoeoa, totsav, adultb, boarder, bpeninc, bseinc, budisben, buearns," &
         "buethgr3, buinc, buinv, buirben, bukids, bunirben, buothben, burent, burinc, burpinc," &
         "butvlic, butxcred, depchldb, diswbua1, diswbuc1, ecstatbu, famtypb2, famtypbs, famtypbu, fsfvbu," &
         "fsmbu, fsmlkbu, gross4, hbindbu, hbindbu2, heartbu, kid04, kid1115, kid1619, kid510," &
         "lodger, subltamt, totcapb3, totsavbu, tuburent, youngch, clthsoa, debt1, debt2, debt3," &
         "debt4, debt5, debt6, debt7, debt8, debt9, discbua, discbuc, hbtham, hbthbu," &
         "hbthmn, hbthpd, hbthwk, hbthyr, hbwait, intrnt, oadep, oanet, dynhthd, dynhtsp," &
         "freqhd, freqsp, hur01hd, hur01sp, hur02hd, hur02sp, hur03hd, hur03sp, hur04hd, hur04sp," &
         "hur05hd, hur05sp, hur06hd, hur06sp, hur07hd, hur07sp, hur08hd, hur08sp, hur09hd, hur09sp," &
         "hur10hd, hur10sp, hur11hd, hur11sp, hur12hd, hur12sp, hur13hd, hur13sp, hur14hd, hur14sp," &
         "hur15hd, hur15sp, hur16hd, hur16sp, hur17hd, hur17sp, hur18hd, hur18sp, hur19hd, hur19sp," &
         "hur20hd, hur20sp, whl01hd, whl01sp, whl02hd, whl02sp, whl03hd, whl03sp, whl04hd, whl04sp," &
         "whl05hd, whl05sp, whl06hd, whl06sp, whl07hd, whl07sp, whl08hd, whl08sp, whl09hd, whl09sp," &
         "whl10hd, whl10sp, whl11hd, whl11sp, whl12hd, whl12sp, whl13hd, whl13sp, whl14hd, whl14sp," &
         "whl15hd, whl15sp, whl16hd, whl16sp, whl17hd, whl17sp, whl18hd, whl18sp, whl19hd, whl19sp," &
         "whl20hd, whl20sp, dynhtc1, dynhtc2, dynhtc3, dynhtc4, dynhtc5, dynhtc6, dynhtc7, dynhtc8," &
         "dynhtc9, freqc1, freqc2, freqc3, freqc4, freqc5, freqc6, freqc7, freqc8, freqc9," &
         "hur01c1, hur01c2, hur01c3, hur01c4, hur01c5, hur01c6, hur01c7, hur01c8, hur01c9, hur02c1," &
         "hur02c2, hur02c3, hur02c4, hur02c5, hur02c6, hur02c7, hur02c8, hur02c9, hur03c1, hur03c2," &
         "hur03c3, hur03c4, hur03c5, hur03c6, hur03c7, hur03c8, hur03c9, hur04c1, hur04c2, hur04c3," &
         "hur04c4, hur04c5, hur04c6, hur04c7, hur04c8, hur04c9, hur05c1, hur05c2, hur05c3, hur05c4," &
         "hur05c5, hur05c6, hur05c7, hur05c8, hur05c9, hur06c1, hur06c2, hur06c3, hur06c4, hur06c5," &
         "hur06c6, hur06c7, hur06c8, hur06c9, hur07c1, hur07c2, hur07c3, hur07c4, hur07c5, hur07c6," &
         "hur07c7, hur07c8, hur07c9, hur08c1, hur08c2, hur08c3, hur08c4, hur08c5, hur08c6, hur08c7," &
         "hur08c8, hur08c9, hur09c1, hur09c2, hur09c3, hur09c4, hur09c5, hur09c6, hur09c7, hur09c8," &
         "hur09c9, hur10c1, hur10c2, hur10c3, hur10c4, hur10c5, hur10c6, hur10c7, hur10c8, hur10c9," &
         "hur11c1, hur11c2, hur11c3, hur11c4, hur11c5, hur11c6, hur11c7, hur11c8, hur11c9, hur12c1," &
         "hur12c2, hur12c3, hur12c4, hur12c5, hur12c6, hur12c7, hur12c8, hur12c9, hur13c1, hur13c2," &
         "hur13c3, hur13c4, hur13c5, hur13c6, hur13c7, hur13c8, hur13c9, hur14c1, hur14c2, hur14c3," &
         "hur14c4, hur14c5, hur14c6, hur14c7, hur14c8, hur14c9, hur15c1, hur15c2, hur15c3, hur15c4," &
         "hur15c5, hur15c6, hur15c7, hur15c8, hur15c9, hur16c1, hur16c2, hur16c3, hur16c4, hur16c5," &
         "hur16c6, hur16c7, hur16c8, hur16c9, hur17c1, hur17c2, hur17c3, hur17c4, hur17c5, hur17c6," &
         "hur17c7, hur17c8, hur17c9, hur18c1, hur18c2, hur18c3, hur18c4, hur18c5, hur18c6, hur18c7," &
         "hur18c8, hur18c9, hur19c1, hur19c2, hur19c3, hur19c4, hur19c5, hur19c6, hur19c7, hur19c8," &
         "hur19c9, hur20c1, hur20c2, hur20c3, hur20c4, hur20c5, hur20c6, hur20c7, hur20c8, hur20c9," &
         "whl01c1, whl01c2, whl01c3, whl01c4, whl01c5, whl01c6, whl01c7, whl01c8, whl01c9, whl02c1," &
         "whl02c2, whl02c3, whl02c4, whl02c5, whl02c6, whl02c7, whl02c8, whl02c9, whl03c1, whl03c2," &
         "whl03c3, whl03c4, whl03c5, whl03c6, whl03c7, whl03c8, whl03c9, whl04c1, whl04c2, whl04c3," &
         "whl04c4, whl04c5, whl04c6, whl04c7, whl04c8, whl04c9, whl05c1, whl05c2, whl05c3, whl05c4," &
         "whl05c5, whl05c6, whl05c7, whl05c8, whl05c9, whl06c1, whl06c2, whl06c3, whl06c4, whl06c5," &
         "whl06c6, whl06c7, whl06c8, whl06c9, whl07c1, whl07c2, whl07c3, whl07c4, whl07c5, whl07c6," &
         "whl07c7, whl07c8, whl07c9, whl08c1, whl08c2, whl08c3, whl08c4, whl08c5, whl08c6, whl08c7," &
         "whl08c8, whl08c9, whl09c1, whl09c2, whl09c3, whl09c4, whl09c5, whl09c6, whl09c7, whl09c8," &
         "whl09c9, whl10c1, whl10c2, whl10c3, whl10c4, whl10c5, whl10c6, whl10c7, whl10c8, whl10c9," &
         "whl11c1, whl11c2, whl11c3, whl11c4, whl11c5, whl11c6, whl11c7, whl11c8, whl11c9, whl12c1," &
         "whl12c2, whl12c3, whl12c4, whl12c5, whl12c6, whl12c7, whl12c8, whl12c9, whl13c1, whl13c2," &
         "whl13c3, whl13c4, whl13c5, whl13c6, whl13c7, whl13c8, whl13c9, whl14c1, whl14c2, whl14c3," &
         "whl14c4, whl14c5, whl14c6, whl14c7, whl14c8, whl14c9, whl15c1, whl15c2, whl15c3, whl15c4," &
         "whl15c5, whl15c6, whl15c7, whl15c8, whl15c9, whl16c1, whl16c2, whl16c3, whl16c4, whl16c5," &
         "whl16c6, whl16c7, whl16c8, whl16c9, whl17c1, whl17c2, whl17c3, whl17c4, whl17c5, whl17c6," &
         "whl17c7, whl17c8, whl17c9, whl18c1, whl18c2, whl18c3, whl18c4, whl18c5, whl18c6, whl18c7," &
         "whl18c8, whl18c9, whl19c1, whl19c2, whl19c3, whl19c4, whl19c5, whl19c6, whl19c7, whl19c8," &
         "whl19c9, whl20c1, whl20c2, whl20c3, whl20c4, whl20c5, whl20c6, whl20c7, whl20c8, whl20c9," &
         "agec1, agec2, agec3, agec4, agec5, agec6, agec7, agec8, cameyrc1, cameyrc2," &
         "cameyrc3, cameyrc4, cameyrc5, cameyrc6, cameyrc7, cameyrc8, chcrec1, chcrec2, chcrec3, chcrec4," &
         "chcrec5, chcrec6, chcrec7, chcrec8, creabc1, creabc2, creabc3, creabc4, creabc5, creabc6," &
         "creabc7, creabc8, creahc1, creahc2, creahc3, creahc4, creahc5, creahc6, creahc7, creahc8," &
         "crecbc1, crecbc2, crecbc3, crecbc4, crecbc5, crecbc6, crecbc7, crecbc8, crechc1, crechc2," &
         "crechc3, crechc4, crechc5, crechc6, crechc7, crechc8, creclc1, creclc2, creclc3, creclc4," &
         "creclc5, creclc6, creclc7, creclc8, crefrc1, crefrc2, crefrc3, crefrc4, crefrc5, crefrc6," &
         "crefrc7, crefrc8, creotc1, creotc2, creotc3, creotc4, creotc5, creotc6, creotc7, creotc8," &
         "carerc1, carerc2, carerc3, carerc4, carerc5, carerc6, carerc7, carerc8, cdatrec1, cdatrec2," &
         "cdatrec3, cdatrec4, cdatrec5, cdatrec6, cdatrec7, cdatrec8, cdtrepc1, cdtrepc2, cdtrepc3, cdtrepc4," &
         "cdtrepc5, cdtrepc6, cdtrepc7, cdtrepc8, cdis1c1, cdis1c2, cdis1c3, cdis1c4, cdis1c5, cdis1c6," &
         "cdis1c7, cdis1c8, cdis2c1, cdis2c2, cdis2c3, cdis2c4, cdis2c5, cdis2c6, cdis2c7, cdis2c8," &
         "cdis3c1, cdis3c2, cdis3c3, cdis3c4, cdis3c5, cdis3c6, cdis3c7, cdis3c8, cdis4c1, cdis4c2," &
         "cdis4c3, cdis4c4, cdis4c5, cdis4c6, cdis4c7, cdis4c8, cdis5c1, cdis5c2, cdis5c3, cdis5c4," &
         "cdis5c5, cdis5c6, cdis5c7, cdis5c8, cdis6c1, cdis6c2, cdis6c3, cdis6c4, cdis6c5, cdis6c6," &
         "cdis6c7, cdis6c8, cdis7c1, cdis7c2, cdis7c3, cdis7c4, cdis7c5, cdis7c6, cdis7c7, cdis7c8," &
         "cdis8c1, cdis8c2, cdis8c3, cdis8c4, cdis8c5, cdis8c6, cdis8c7, cdis8c8, cdis9c1, cdis9c2," &
         "cdis9c3, cdis9c4, cdis9c5, cdis9c6, cdis9c7, cdis9c8, cdis10c1, cdis10c2, cdis10c3, cdis10c4," &
         "cdis10c5, cdis10c6, cdis10c7, cdis10c8, cdifc1, cdifc2, cdifc3, cdifc4, cdifc5, cdifc6," &
         "cdifc7, cdifc8, ernamc1, ernamc2, ernamc3, ernamc4, ernamc5, ernamc6, ernamc7, ernamc8," &
         "trustc1, trustc2, trustc3, trustc4, trustc5, trustc6, trustc7, trustc8, chbfdc1, chbfdc2," &
         "chbfdc3, chbfdc4, chbfdc5, chbfdc6, chbfdc7, chbfdc8, cbfamtc1, cbfamtc2, cbfamtc3, cbfamtc4," &
         "cbfamtc5, cbfamtc6, cbfamtc7, cbfamtc8, pbfamtc1, pbfamtc2, pbfamtc3, pbfamtc4, pbfamtc5, pbfamtc6," &
         "pbfamtc7, pbfamtc8, cbfvalc1, cbfvalc2, cbfvalc3, cbfvalc4, cbfvalc5, cbfvalc6, cbfvalc7, cbfvalc8," &
         "chcondc1, chcondc2, chcondc3, chcondc4, chcondc5, chcondc6, chcondc7, chcondc8, cdla1c1, cdla1c2," &
         "cdla1c3, cdla1c4, cdla1c5, cdla1c6, cdla1c7, cdla1c8, cdla2c1, cdla2c2, cdla2c3, cdla2c4," &
         "cdla2c5, cdla2c6, cdla2c7, cdla2c8, chelfc1, chelfc2, chelfc3, chelfc4, chelfc5, chelfc6," &
         "chelfc7, chelfc8, chernc1, chernc2, chernc3, chernc4, chernc5, chernc6, chernc7, chernc8," &
         "crns1c1, crns1c2, crns1c3, crns1c4, crns1c5, crns1c6, crns1c7, crns1c8, crns2c1, crns2c2," &
         "crns2c3, crns2c4, crns2c5, crns2c6, crns2c7, crns2c8, crns3c1, crns3c2, crns3c3, crns3c4," &
         "crns3c5, crns3c6, crns3c7, crns3c8, chemac1, chemac2, chemac3, chemac4, chemac5, chemac6," &
         "chemac7, chemac8, emamtc1, emamtc2, emamtc3, emamtc4, emamtc5, emamtc6, emamtc7, emamtc8," &
         "emapdc1, emapdc2, emapdc3, emapdc4, emapdc5, emapdc6, emapdc7, emapdc8, chidvc1, chidvc2," &
         "chidvc3, chidvc4, chidvc5, chidvc6, chidvc7, chidvc8, climitc1, climitc2, climitc3, climitc4," &
         "climitc5, climitc6, climitc7, climitc8, pearnc1, pearnc2, pearnc3, pearnc4, pearnc5, pearnc6," &
         "pearnc7, pearnc8, ptrusc1, ptrusc2, ptrusc3, ptrusc4, ptrusc5, ptrusc6, ptrusc7, ptrusc8," &
         "chrinc1, chrinc2, chrinc3, chrinc4, chrinc5, chrinc6, chrinc7, chrinc8, csavec1, csavec2," &
         "csavec3, csavec4, csavec5, csavec6, csavec7, csavec8, tramtc1, tramtc2, tramtc3, tramtc4," &
         "tramtc5, tramtc6, tramtc7, tramtc8, trnpdc1, trnpdc2, trnpdc3, trnpdc4, trnpdc5, trnpdc6," &
         "trnpdc7, trnpdc8, cohabc1, cohabc2, cohabc3, cohabc4, cohabc5, cohabc6, cohabc7, cohabc8," &
         "curqulc1, curqulc2, curqulc3, curqulc4, curqulc5, curqulc6, curqulc7, curqulc8, disacc1, disacc2," &
         "disacc3, disacc4, disacc5, disacc6, disacc7, disacc8, discoc1, discoc2, discoc3, discoc4," &
         "discoc5, discoc6, discoc7, discoc8, dobc1, dobc2, dobc3, dobc4, dobc5, dobc6," &
         "dobc7, dobc8, dvmarc1, dvmarc2, dvmarc3, dvmarc4, dvmarc5, dvmarc6, dvmarc7, dvmarc8," &
         "fsvvlc1, fsvvlc2, fsvvlc3, fsvvlc4, fsvvlc5, fsvvlc6, fsvvlc7, fsvvlc8, fsmkvc1, fsmkvc2," &
         "fsmkvc3, fsmkvc4, fsmkvc5, fsmkvc6, fsmkvc7, fsmkvc8, fsmlvc1, fsmlvc2, fsmlvc3, fsmlvc4," &
         "fsmlvc5, fsmlvc6, fsmlvc7, fsmlvc8, ftedc1, ftedc2, ftedc3, ftedc4, ftedc5, ftedc6," &
         "ftedc7, ftedc8, g1valc1, g1valc2, g1valc3, g1valc4, g1valc5, g1valc6, g1valc7, g1valc8," &
         "g2valc1, g2valc2, g2valc3, g2valc4, g2valc5, g2valc6, g2valc7, g2valc8, g1dirc1, g1dirc2," &
         "g1dirc3, g1dirc4, g1dirc5, g1dirc6, g1dirc7, g1dirc8, g2dirc1, g2dirc2, g2dirc3, g2dirc4," &
         "g2dirc5, g2dirc6, g2dirc7, g2dirc8, gtnumc1, gtnumc2, gtnumc3, gtnumc4, gtnumc5, gtnumc6," &
         "gtnumc7, gtnumc8, gt1scc1, gt1scc2, gt1scc3, gt1scc4, gt1scc5, gt1scc6, gt1scc7, gt1scc8," &
         "gt2scc1, gt2scc2, gt2scc3, gt2scc4, gt2scc5, gt2scc6, gt2scc7, gt2scc8, gt10sc1, gt10sc2," &
         "gt10sc3, gt10sc4, gt10sc5, gt10sc6, gt10sc7, gt10sc8, gt20sc1, gt20sc2, gt20sc3, gt20sc4," &
         "gt20sc5, gt20sc6, gt20sc7, gt20sc8, hartvc1, hartvc2, hartvc3, hartvc4, hartvc5, hartvc6," &
         "hartvc7, hartvc8, heatchc1, heatchc2, heatchc3, heatchc4, heatchc5, heatchc6, heatchc7, heatchc8," &
         "hhldrc1, hhldrc2, hhldrc3, hhldrc4, hhldrc5, hhldrc6, hhldrc7, hhldrc8, hurabc1, hurabc2," &
         "hurabc3, hurabc4, hurabc5, hurabc6, hurabc7, hurabc8, hurahc1, hurahc2, hurahc3, hurahc4," &
         "hurahc5, hurahc6, hurahc7, hurahc8, hurcbc1, hurcbc2, hurcbc3, hurcbc4, hurcbc5, hurcbc6," &
         "hurcbc7, hurcbc8, hurchc1, hurchc2, hurchc3, hurchc4, hurchc5, hurchc6, hurchc7, hurchc8," &
         "hurclc1, hurclc2, hurclc3, hurclc4, hurclc5, hurclc6, hurclc7, hurclc8, hurfrc1, hurfrc2," &
         "hurfrc3, hurfrc4, hurfrc5, hurfrc6, hurfrc7, hurfrc8, hurotc1, hurotc2, hurotc3, hurotc4," &
         "hurotc5, hurotc6, hurotc7, hurotc8, hurrec1, hurrec2, hurrec3, hurrec4, hurrec5, hurrec6," &
         "hurrec7, hurrec8, hpersc1, hpersc2, hpersc3, hpersc4, hpersc5, hpersc6, hpersc7, hpersc8," &
         "hrsedc1, hrsedc2, hrsedc3, hrsedc4, hrsedc5, hrsedc6, hrsedc7, hrsedc8, hsvprc1, hsvprc2," &
         "hsvprc3, hsvprc4, hsvprc5, hsvprc6, hsvprc7, hsvprc8, laregc1, laregc2, laregc3, laregc4," &
         "laregc5, laregc6, laregc7, laregc8, msc1, msc2, msc3, msc4, msc5, msc6," &
         "msc7, msc8, prsonc1, prsonc2, prsonc3, prsonc4, prsonc5, prsonc6, prsonc7, prsonc8," &
         "rlp1c1, rlp1c2, rlp1c3, rlp1c4, rlp1c5, rlp1c6, rlp1c7, rlp1c8, rlp2c1, rlp2c2," &
         "rlp2c3, rlp2c4, rlp2c5, rlp2c6, rlp2c7, rlp2c8, rlp3c1, rlp3c2, rlp3c3, rlp3c4," &
         "rlp3c5, rlp3c6, rlp3c7, rlp3c8, rlp4c1, rlp4c2, rlp4c3, rlp4c4, rlp4c5, rlp4c6," &
         "rlp4c7, rlp4c8, rlp5c1, rlp5c2, rlp5c3, rlp5c4, rlp5c5, rlp5c6, rlp5c7, rlp5c8," &
         "rlp6c1, rlp6c2, rlp6c3, rlp6c4, rlp6c5, rlp6c6, rlp6c7, rlp6c8, rlp7c1, rlp7c2," &
         "rlp7c3, rlp7c4, rlp7c5, rlp7c6, rlp7c7, rlp7c8, rlp8c1, rlp8c2, rlp8c3, rlp8c4," &
         "rlp8c5, rlp8c6, rlp8c7, rlp8c8, rlp9c1, rlp9c2, rlp9c3, rlp9c4, rlp9c5, rlp9c6," &
         "rlp9c7, rlp9c8, rlp10c1, rlp10c2, rlp10c3, rlp10c4, rlp10c5, rlp10c6, rlp10c7, rlp10c8," &
         "rlp11c1, rlp11c2, rlp11c3, rlp11c4, rlp11c5, rlp11c6, rlp11c7, rlp11c8, rlp12c1, rlp12c2," &
         "rlp12c3, rlp12c4, rlp12c5, rlp12c6, rlp12c7, rlp12c8, rlp13c1, rlp13c2, rlp13c3, rlp13c4," &
         "rlp13c5, rlp13c6, rlp13c7, rlp13c8, rlp14c1, rlp14c2, rlp14c3, rlp14c4, rlp14c5, rlp14c6," &
         "rlp14c7, rlp14c8, rhrpcc1, rhrpcc2, rhrpcc3, rhrpcc4, rhrpcc5, rhrpcc6, rhrpcc7, rhrpcc8," &
         "sbkitc1, sbkitc2, sbkitc3, sbkitc4, sbkitc5, sbkitc6, sbkitc7, sbkitc8, sexc1, sexc2," &
         "sexc3, sexc4, sexc5, sexc6, sexc7, sexc8, sfvitc1, sfvitc2, sfvitc3, sfvitc4," &
         "sfvitc5, sfvitc6, sfvitc7, sfvitc8, fmctsc1, fmctsc2, fmctsc3, fmctsc4, fmctsc5, fmctsc6," &
         "fmctsc7, fmctsc8, fmealc1, fmealc2, fmealc3, fmealc4, fmealc5, fmealc6, fmealc7, fmealc8," &
         "cblndc1, cblndc2, cblndc3, cblndc4, cblndc5, cblndc6, cblndc7, cblndc8, cparsc1, cparsc2," &
         "cparsc3, cparsc4, cparsc5, cparsc6, cparsc7, cparsc8, cdeafc1, cdeafc2, cdeafc3, cdeafc4," &
         "cdeafc5, cdeafc6, cdeafc7, cdeafc8, totgtc1, totgtc2, totgtc3, totgtc4, totgtc5, totgtc6," &
         "totgtc7, totgtc8, totsvc1, totsvc2, totsvc3, totsvc4, totsvc5, totsvc6, totsvc7, totsvc8," &
         "tacamc1, tacamc2, tacamc3, tacamc4, tacamc5, tacamc6, tacamc7, tacamc8, tpeedc1, tpeedc2," &
         "tpeedc3, tpeedc4, tpeedc5, tpeedc6, tpeedc7, tpeedc8, uprsoc1, uprsoc2, uprsoc3, uprsoc4," &
         "uprsoc5, uprsoc6, uprsoc7, uprsoc8, govpy1hd, govpy2hd, govpy3hd, govpy4hd, govpy5hd, govpy6hd," &
         "govpy7hd, govpy8hd, govpy9hd, gvpy10hd, gvpy11hd, govpy1sp, govpy2sp, govpy3sp, govpy4sp, govpy5sp," &
         "govpy6sp, govpy7sp, govpy8sp, govpy9sp, gvpy10sp, gvpy11sp, nhhamt1, nhhamt2, nhhamt3, nhhamt4," &
         "nhhfee1, nhhfee2, nhhfee3, nhhfee4, pnhhamt1, pnhhamt2, pnhhamt3, pnhhamt4, bona11hd, bona12hd," &
         "bona13hd, bona11sp, bona12sp, bona13sp, bona21hd, bona22hd, bona23hd, bona21sp, bona22sp, bona23sp," &
         "bona31hd, bona32hd, bona33hd, bona31sp, bona32sp, bona33sp, bona41hd, bona42hd, bona43hd, bona41sp," &
         "bona42sp, bona43sp, bona51hd, bona52hd, bona53hd, bona51sp, bona52sp, bona53sp, bona61hd, bona62hd," &
         "bona63hd, bona61sp, bona62sp, bona63sp, bont11hd, bont12hd, bont13hd, bont11sp, bont12sp, bont13sp," &
         "bont21hd, bont22hd, bont23hd, bont21sp, bont22sp, bont23sp, bont31hd, bont32hd, bont33hd, bont31sp," &
         "bont32sp, bont33sp, bont41hd, bont42hd, bont43hd, bont41sp, bont42sp, bont43sp, bont51hd, bont52hd," &
         "bont53hd, bont51sp, bont52sp, bont53sp, bont61hd, bont62hd, bont63hd, bont61sp, bont62sp, bont63sp," &
         "btax11hd, btax12hd, btax13hd, btax11sp, btax12sp, btax13sp, btax21hd, btax22hd, btax23hd, btax21sp," &
         "btax22sp, btax23sp, btax31hd, btax32hd, btax33hd, btax31sp, btax32sp, btax33sp, btax41hd, btax42hd," &
         "btax43hd, btax41sp, btax42sp, btax43sp, btax51hd, btax52hd, btax53hd, btax51sp, btax52sp, btax53sp," &
         "btax61hd, btax62hd, btax63hd, btax61sp, btax62sp, btax63sp, busac1hd, busac2hd, busac3hd, busac1sp," &
         "busac2sp, busac3sp, caram1hd, caram2hd, caram3hd, caram1sp, caram2sp, caram3sp, carcn1hd, carcn2hd," &
         "carcn3hd, carcn1sp, carcn2sp, carcn3sp, carvl1hd, carvl2hd, carvl3hd, carvl1sp, carvl2sp, carvl3sp," &
         "chktx1hd, chktx2hd, chktx3hd, chktx1sp, chktx2sp, chktx3sp, chcom1hd, chcom2hd, chcom3hd, chcom1sp," &
         "chcom2sp, chcom3sp, chvam1hd, chvam2hd, chvam3hd, chvam1sp, chvam2sp, chvam3sp, chvpd1hd, chvpd2hd," &
         "chvpd3hd, chvpd1sp, chvpd2sp, chvpd3sp, chsac1hd, chsac2hd, chsac3hd, chsac1sp, chsac2sp, chsac3sp," &
         "chuam1hd, chuam2hd, chuam3hd, chuam1sp, chuam2sp, chuam3sp, chupd1hd, chupd2hd, chupd3hd, chupd1sp," &
         "chupd2sp, chupd3sp, chusu1hd, chusu2hd, chusu3hd, chusu1sp, chusu2sp, chusu3sp, doth1hd, doth2hd," &
         "doth3hd, doth1sp, doth2sp, doth3sp, dpen1hd, dpen2hd, dpen3hd, dpen1sp, dpen2sp, dpen3sp," &
         "davc1hd, davc2hd, davc3hd, davc1sp, davc2sp, davc3sp, dtuf1hd, dtuf2hd, dtuf3hd, dtuf1sp," &
         "dtuf2sp, dtuf3sp, dfrso1hd, dfrso2hd, dfrso3hd, dfrso1sp, dfrso2sp, dfrso3sp, dspor1hd, dspor2hd," &
         "dspor3hd, dspor1sp, dspor2sp, dspor3sp, drepl1hd, drepl2hd, drepl3hd, drepl1sp, drepl2sp, drepl3sp," &
         "dmed1hd, dmed2hd, dmed3hd, dmed1sp, dmed2sp, dmed3sp, dchar1hd, dchar2hd, dchar3hd, dchar1sp," &
         "dchar2sp, dchar3sp, dslrp1hd, dslrp2hd, dslrp3hd, dslrp1sp, dslrp2sp, dslrp3sp, dirni1hd, dirni2hd," &
         "dirni3hd, dirni1sp, dirni2sp, dirni3sp, totov1hd, totov2hd, totov3hd, totov1sp, totov2sp, totov3sp," &
         "dvuhr1hd, dvuhr2hd, dvuhr3hd, dvuhr1sp, dvuhr2sp, dvuhr3sp, empan1hd, empan2hd, empan3hd, empan1sp," &
         "empan2sp, empan3sp, empen1hd, empen2hd, empen3hd, empen1sp, empen2sp, empen3sp, etype1hd, etype2hd," &
         "etype3hd, etype1sp, etype2sp, etype3sp, evrot1hd, evrot2hd, evrot3hd, evrot1sp, evrot2sp, evrot3sp," &
         "exb011hd, exb012hd, exb013hd, exb011sp, exb012sp, exb013sp, exb021hd, exb022hd, exb023hd, exb021sp," &
         "exb022sp, exb023sp, exb031hd, exb032hd, exb033hd, exb031sp, exb032sp, exb033sp, exb041hd, exb042hd," &
         "exb043hd, exb041sp, exb042sp, exb043sp, exb051hd, exb052hd, exb053hd, exb051sp, exb052sp, exb053sp," &
         "exb061hd, exb062hd, exb063hd, exb061sp, exb062sp, exb063sp, exb071hd, exb072hd, exb073hd, exb071sp," &
         "exb072sp, exb073sp, exb081hd, exb082hd, exb083hd, exb081sp, exb082sp, exb083sp, exb091hd, exb092hd," &
         "exb093hd, exb091sp, exb092sp, exb093sp, exb101hd, exb102hd, exb103hd, exb101sp, exb102sp, exb103sp," &
         "exb111hd, exb112hd, exb113hd, exb111sp, exb112sp, exb113sp, exb121hd, exb122hd, exb123hd, exb121sp," &
         "exb122sp, exb123sp, ftpt1hd, ftpt2hd, ftpt3hd, ftpt1sp, ftpt2sp, ftpt3sp, fulam1hd, fulam2hd," &
         "fulam3hd, fulam1sp, fulam2sp, fulam3sp, fulbn1hd, fulbn2hd, fulbn3hd, fulbn1sp, fulbn2sp, fulbn3sp," &
         "fulpd1hd, fulpd2hd, fulpd3hd, fulpd1sp, fulpd2sp, fulpd3sp, fulty1hd, fulty2hd, fulty3hd, fulty1sp," &
         "fulty2sp, fulty3sp, fluam1hd, fluam2hd, fluam3hd, fluam1sp, fluam2sp, fluam3sp, flupd1hd, flupd2hd," &
         "flupd3hd, flupd1sp, flupd2sp, flupd3sp, flusu1hd, flusu2hd, flusu3hd, flusu1sp, flusu2sp, flusu3sp," &
         "grwag1hd, grwag2hd, grwag3hd, grwag1sp, grwag2sp, grwag3sp, grwap1hd, grwap2hd, grwap3hd, grwap1sp," &
         "grwap2sp, grwap3sp, hha11hd, hha12hd, hha13hd, hha11sp, hha12sp, hha13sp, hha21hd, hha22hd," &
         "hha23hd, hha21sp, hha22sp, hha23sp, hha31hd, hha32hd, hha33hd, hha31sp, hha32sp, hha33sp," &
         "hour1hd, hour2hd, hour3hd, hour1sp, hour2sp, hour3sp, hrrte1hd, hrrte2hd, hrrte3hd, hrrte1sp," &
         "hrrte2sp, hrrte3sp, ipay11hd, ipay12hd, ipay13hd, ipay11sp, ipay12sp, ipay13sp, ipay21hd, ipay22hd," &
         "ipay23hd, ipay21sp, ipay22sp, ipay23sp, ipay31hd, ipay32hd, ipay33hd, ipay31sp, ipay32sp, ipay33sp," &
         "ipay41hd, ipay42hd, ipay43hd, ipay41sp, ipay42sp, ipay43sp, ipay51hd, ipay52hd, ipay53hd, ipay51sp," &
         "ipay52sp, ipay53sp, ipay61hd, ipay62hd, ipay63hd, ipay61sp, ipay62sp, ipay63sp, ipay71hd, ipay72hd," &
         "ipay73hd, ipay71sp, ipay72sp, ipay73sp, jbchg1hd, jbchg2hd, jbchg3hd, jbchg1sp, jbchg2sp, jbchg3sp," &
         "jobus1hd, jobus2hd, jobus3hd, jobus1sp, jobus2sp, jobus3sp, jbhrs1hd, jbhrs2hd, jbhrs3hd, jbhrs1sp," &
         "jbhrs2sp, jbhrs3sp, lt301hd, lt302hd, lt303hd, lt301sp, lt302sp, lt303sp, madem1hd, madem2hd," &
         "madem3hd, madem1sp, madem2sp, madem3sp, mile1hd, mile2hd, mile3hd, mile1sp, mile2sp, mile3sp," &
         "moref1hd, moref2hd, moref3hd, moref1sp, moref2sp, moref3sp, nic1hd, nic2hd, nic3hd, nic1sp," &
         "nic2sp, nic3sp, nidam1hd, nidam2hd, nidam3hd, nidam1sp, nidam2sp, nidam3sp, nipd1hd, nipd2hd," &
         "nipd3hd, nipd1sp, nipd2sp, nipd3sp, noemp1hd, noemp2hd, noemp3hd, noemp1sp, noemp2sp, noemp3sp," &
         "oremp1hd, oremp2hd, oremp3hd, oremp1sp, oremp2sp, oremp3sp, othd11hd, othd12hd, othd13hd, othd11sp," &
         "othd12sp, othd13sp, othd21hd, othd22hd, othd23hd, othd21sp, othd22sp, othd23sp, othd31hd, othd32hd," &
         "othd33hd, othd31sp, othd32sp, othd33sp, othd41hd, othd42hd, othd43hd, othd41sp, othd42sp, othd43sp," &
         "othd51hd, othd52hd, othd53hd, othd51sp, othd52sp, othd53sp, othd61hd, othd62hd, othd63hd, othd61sp," &
         "othd62sp, othd63sp, othd71hd, othd72hd, othd73hd, othd71sp, othd72sp, othd73sp, othd81hd, othd82hd," &
         "othd83hd, othd81sp, othd82sp, othd83sp, othd91hd, othd92hd, othd93hd, othd91sp, othd92sp, othd93sp," &
         "otd101hd, otd102hd, otd103hd, otd101sp, otd102sp, otd103sp, ownam1hd, ownam2hd, ownam3hd, ownam1sp," &
         "ownam2sp, ownam3sp, ownoa1hd, ownoa2hd, ownoa3hd, ownoa1sp, ownoa2sp, ownoa3sp, ownot1hd, ownot2hd," &
         "ownot3hd, ownot1sp, ownot2sp, ownot3sp, ownsm1hd, ownsm2hd, ownsm3hd, ownsm1sp, ownsm2sp, ownsm3sp," &
         "pappd1hd, pappd2hd, pappd3hd, pappd1sp, pappd2sp, pappd3sp, payam1hd, payam2hd, payam3hd, payam1sp," &
         "payam2sp, payam3sp, pdate1hd, pdate2hd, pdate3hd, pdate1sp, pdate2sp, pdate3sp, paye1hd, paye2hd," &
         "paye3hd, paye1sp, paye2sp, paye3sp, paype1hd, paype2hd, paype3hd, paype1sp, paype2sp, paype3sp," &
         "paysl1hd, paysl2hd, paysl3hd, paysl1sp, paysl2sp, paysl3sp, payus1hd, payus2hd, payus3hd, payus1sp," &
         "payus2sp, payus3sp, pothr1hd, pothr2hd, pothr3hd, pothr1sp, pothr2sp, pothr3sp, ppppd1hd, ppppd2hd," &
         "ppppd3hd, ppppd1sp, ppppd2sp, ppppd3sp, prbef1hd, prbef2hd, prbef3hd, prbef1sp, prbef2sp, prbef3sp," &
         "prdoc1hd, prdoc2hd, prdoc3hd, prdoc1sp, prdoc2sp, prdoc3sp, sepro1hd, sepro2hd, sepro3hd, sepro1sp," &
         "sepro2sp, sepro3sp, prolo1hd, prolo2hd, prolo3hd, prolo1sp, prolo2sp, prolo3sp, profn1hd, profn2hd," &
         "profn3hd, profn1sp, profn2sp, profn3sp, protx1hd, protx2hd, protx3hd, protx1sp, protx2sp, protx3sp," &
         "rspvr1hd, rspvr2hd, rspvr3hd, rspvr1sp, rspvr2sp, rspvr3sp, apamt1hd, apamt2hd, apamt3hd, apamt1sp," &
         "apamt2sp, apamt3sp, sebeg1hd, sebeg2hd, sebeg3hd, sebeg1sp, sebeg2sp, sebeg3sp, seend1hd, seend2hd," &
         "seend3hd, seend1sp, seend2sp, seend3sp, sectr1hd, sectr2hd, sectr3hd, sectr1sp, sectr2sp, sectr3sp," &
         "sectt1hd, sectt2hd, sectt3hd, sectt1sp, sectt2sp, sectt3sp, sefin1hd, sefin2hd, sefin3hd, sefin1sp," &
         "sefin2sp, sefin3sp, secam1hd, secam2hd, secam3hd, secam1sp, secam2sp, secam3sp, seciw1hd, seciw2hd," &
         "seciw3hd, seciw1sp, seciw2sp, seciw3sp, sewks1hd, sewks2hd, sewks3hd, sewks1sp, sewks2sp, sewks3sp," &
         "senam1hd, senam2hd, senam3hd, senam1sp, senam2sp, senam3sp, seiin1hd, seiin2hd, seiin3hd, seiin1sp," &
         "seiin2sp, seiin3sp, senil1hd, senil2hd, senil3hd, senil1sp, senil2sp, senil3sp, senir1hd, senir2hd," &
         "senir3hd, senir1sp, senir2sp, senir3sp, psenr1hd, psenr2hd, psenr3hd, psenr1sp, psenr2sp, psenr3sp," &
         "setax1hd, setax2hd, setax3hd, setax1sp, setax2sp, setax3sp, smpam1hd, smpam2hd, smpam3hd, smpam1sp," &
         "smpam2sp, smpam3sp, smprt1hd, smprt2hd, smprt3hd, smprt1sp, smprt2sp, smprt3sp, sole1hd, sole2hd," &
         "sole3hd, sole1sp, sole2sp, sole3sp, spamt1hd, spamt2hd, spamt3hd, spamt1sp, spamt2sp, spamt3sp," &
         "sppd1hd, sppd2hd, sppd3hd, sppd1sp, sppd2sp, sppd3sp, spsac1hd, spsac2hd, spsac3hd, spsac1sp," &
         "spsac2sp, spsac3sp, spuam1hd, spuam2hd, spuam3hd, spuam1sp, spuam2sp, spuam3sp, spupd1hd, spupd2hd," &
         "spupd3hd, spupd1sp, spupd2sp, spupd3sp, spusu1hd, spusu2hd, spusu3hd, spusu1sp, spusu2sp, spusu3sp," &
         "ppamt1hd, ppamt2hd, ppamt3hd, ppamt1sp, ppamt2sp, ppamt3sp, sspam1hd, sspam2hd, sspam3hd, sspam1sp," &
         "sspam2sp, sspam3sp, spsmp1hd, spsmp2hd, spsmp3hd, spsmp1sp, spsmp2sp, spsmp3sp, taxam1hd, taxam2hd," &
         "taxam3hd, taxam1sp, taxam2sp, taxam3sp, taxda1hd, taxda2hd, taxda3hd, taxda1sp, taxda2sp, taxda3sp," &
         "taxpd1hd, taxpd2hd, taxpd3hd, taxpd1sp, taxpd2sp, taxpd3sp, to1hr1hd, to1hr2hd, to1hr3hd, to1hr1sp," &
         "to1hr2sp, to1hr3sp, boinu1hd, boinu2hd, boinu3hd, boinu1sp, boinu2sp, boinu3sp, uincb1hd, uincb2hd," &
         "uincb3hd, uincb1sp, uincb2sp, uincb3sp, uded11hd, uded12hd, uded13hd, uded11sp, uded12sp, uded13sp," &
         "uded21hd, uded22hd, uded23hd, uded21sp, uded22sp, uded23sp, uded31hd, uded32hd, uded33hd, uded31sp," &
         "uded32sp, uded33sp, uded41hd, uded42hd, uded43hd, uded41sp, uded42sp, uded43sp, uded51hd, uded52hd," &
         "uded53hd, uded51sp, uded52sp, uded53sp, uded61hd, uded62hd, uded63hd, uded61sp, uded62sp, uded63sp," &
         "uded71hd, uded72hd, uded73hd, uded71sp, uded72sp, uded73sp, uded81hd, uded82hd, uded83hd, uded81sp," &
         "uded82sp, uded83sp, uded91hd, uded92hd, uded93hd, uded91sp, uded92sp, uded93sp, ugros1hd, ugros2hd," &
         "ugros3hd, ugros1sp, ugros2sp, ugros3sp, ugrsp1hd, ugrsp2hd, ugrsp3hd, ugrsp1sp, ugrsp2sp, ugrsp3sp," &
         "uinc11hd, uinc12hd, uinc13hd, uinc11sp, uinc12sp, uinc13sp, uinc21hd, uinc22hd, uinc23hd, uinc21sp," &
         "uinc22sp, uinc23sp, uinc31hd, uinc32hd, uinc33hd, uinc31sp, uinc32sp, uinc33sp, uinc41hd, uinc42hd," &
         "uinc43hd, uinc41sp, uinc42sp, uinc43sp, uinc51hd, uinc52hd, uinc53hd, uinc51sp, uinc52sp, uinc53sp," &
         "uinc61hd, uinc62hd, uinc63hd, uinc61sp, uinc62sp, uinc63sp, uinc71hd, uinc72hd, uinc73hd, uinc71sp," &
         "uinc72sp, uinc73sp, umile1hd, umile2hd, umile3hd, umile1sp, umile2sp, umile3sp, umot1hd, umot2hd," &
         "umot3hd, umot1sp, umot2sp, umot3sp, unett1hd, unett2hd, unett3hd, unett1sp, unett2sp, unett3sp," &
         "uoth11hd, uoth12hd, uoth13hd, uoth11sp, uoth12sp, uoth13sp, uoth21hd, uoth22hd, uoth23hd, uoth21sp," &
         "uoth22sp, uoth23sp, uoth31hd, uoth32hd, uoth33hd, uoth31sp, uoth32sp, uoth33sp, uoth41hd, uoth42hd," &
         "uoth43hd, uoth41sp, uoth42sp, uoth43sp, uoth51hd, uoth52hd, uoth53hd, uoth51sp, uoth52sp, uoth53sp," &
         "uoth61hd, uoth62hd, uoth63hd, uoth61sp, uoth62sp, uoth63sp, uoth71hd, uoth72hd, uoth73hd, uoth71sp," &
         "uoth72sp, uoth73sp, uoth81hd, uoth82hd, uoth83hd, uoth81sp, uoth82sp, uoth83sp, uoth91hd, uoth92hd," &
         "uoth93hd, uoth91sp, uoth92sp, uoth93sp, uot101hd, uot102hd, uot103hd, uot101sp, uot102sp, uot103sp," &
         "uotht1hd, uotht2hd, uotht3hd, uotht1sp, uotht2sp, uotht3sp, uothr1hd, uothr2hd, uothr3hd, uothr1sp," &
         "uothr2sp, uothr3sp, upay1hd, upay2hd, upay3hd, upay1sp, upay2sp, upay3sp, usapa1hd, usapa2hd," &
         "usapa3hd, usapa1sp, usapa2sp, usapa3sp, uspam1hd, uspam2hd, uspam3hd, uspam1sp, uspam2sp, uspam3sp," &
         "uspra1hd, uspra2hd, uspra3hd, uspra1sp, uspra2sp, uspra3sp, uppam1hd, uppam2hd, uppam3hd, uppam1sp," &
         "uppam2sp, uppam3sp, usspa1hd, usspa2hd, usspa3hd, usspa1sp, usspa2sp, usspa3sp, to2hr1hd, to2hr2hd," &
         "to2hr3hd, to2hr1sp, to2hr2sp, to2hr3sp, utaxa1hd, utaxa2hd, utaxa3hd, utaxa1sp, utaxa2sp, utaxa3sp," &
         "vcamt1hd, vcamt2hd, vcamt3hd, vcamt1sp, vcamt2sp, vcamt3sp, vcpd1hd, vcpd2hd, vcpd3hd, vcpd1sp," &
         "vcpd2sp, vcpd3sp, vcsac1hd, vcsac2hd, vcsac3hd, vcsac1sp, vcsac2sp, vcsac3sp, vcuam1hd, vcuam2hd," &
         "vcuam3hd, vcuam1sp, vcuam2sp, vcuam3sp, vcupd1hd, vcupd2hd, vcupd3hd, vcupd1sp, vcupd2sp, vcupd3sp," &
         "vcusu1hd, vcusu2hd, vcusu3hd, vcusu1sp, vcusu2sp, vcusu3sp, nou011hd, nou012hd, nou013hd, nou011sp," &
         "nou012sp, nou013sp, nou021hd, nou022hd, nou023hd, nou021sp, nou022sp, nou023sp, nou031hd, nou032hd," &
         "nou033hd, nou031sp, nou032sp, nou033sp, nou041hd, nou042hd, nou043hd, nou041sp, nou042sp, nou043sp," &
         "nou051hd, nou052hd, nou053hd, nou051sp, nou052sp, nou053sp, nou061hd, nou062hd, nou063hd, nou061sp," &
         "nou062sp, nou063sp, nou071hd, nou072hd, nou073hd, nou071sp, nou072sp, nou073sp, nou081hd, nou082hd," &
         "nou083hd, nou081sp, nou082sp, nou083sp, nou091hd, nou092hd, nou093hd, nou091sp, nou092sp, nou093sp," &
         "nou101hd, nou102hd, nou103hd, nou101sp, nou102sp, nou103sp, nou111hd, nou112hd, nou113hd, nou111sp," &
         "nou112sp, nou113sp, nou121hd, nou122hd, nou123hd, nou121sp, nou122sp, nou123sp, nou131hd, nou132hd," &
         "nou133hd, nou131sp, nou132sp, nou133sp, nou141hd, nou142hd, nou143hd, nou141sp, nou142sp, nou143sp," &
         "worka1hd, worka2hd, worka3hd, worka1sp, worka2sp, worka3sp, workm1hd, workm2hd, workm3hd, workm1sp," &
         "workm2sp, workm3sp, worky1hd, worky2hd, worky3hd, worky1sp, worky2sp, worky3sp, yjchg1hd, yjchg2hd," &
         "yjchg3hd, yjchg1sp, yjchg2sp, yjchg3sp, mp1hd, mp2hd, mp3hd, mp1sp, mp2sp, mp3sp," &
         "mrar11hd, mrar12hd, mrar13hd, mrar11sp, mrar12sp, mrar13sp, mrar21hd, mrar22hd, mrar23hd, mrar21sp," &
         "mrar22sp, mrar23sp, mrar31hd, mrar32hd, mrar33hd, mrar31sp, mrar32sp, mrar33sp, mrar41hd, mrar42hd," &
         "mrar43hd, mrar41sp, mrar42sp, mrar43sp, mrar51hd, mrar52hd, mrar53hd, mrar51sp, mrar52sp, mrar53sp," &
         "mpnch1hd, mpnch2hd, mpnch3hd, mpnch1sp, mpnch2sp, mpnch3sp, pmp1hd, pmp2hd, pmp3hd, pmp1sp," &
         "pmp2sp, pmp3sp, ump1hd, ump2hd, ump3hd, ump1sp, ump2sp, ump3sp, pump1hd, pump2hd," &
         "pump3hd, pump1sp, pump2sp, pump3sp, isump1hd, isump2hd, isump3hd, isump1sp, isump2sp, isump3sp," &
         "jobst1hd, jobst2hd, jobst1sp, jobst2sp, oddtp1hd, oddtp2hd, oddtp1sp, oddtp2sp, oddjb1hd, oddjb2hd," &
         "oddjb1sp, oddjb2sp, oddjn1hd, oddjn2hd, oddjn1sp, oddjn2sp, poth1hd, poth2hd, poth3hd, poth4hd," &
         "poth5hd, poth6hd, poth7hd, poth8hd, poth9hd, poth10hd, poth11hd, poth12hd, poth13hd, poth14hd," &
         "poth15hd, poth16hd, poth17hd, poth18hd, poth19hd, poth1sp, poth2sp, poth3sp, poth4sp, poth5sp," &
         "poth6sp, poth7sp, poth8sp, poth9sp, poth10sp, poth11sp, poth12sp, poth13sp, poth14sp, poth15sp," &
         "poth16sp, poth17sp, poth18sp, poth19sp, ocpen1hd, ocpen2hd, ocpen3hd, ocpen4hd, wpen1hd, wpen2hd," &
         "wpen3hd, ppen1hd, ppen2hd, ppen3hd, tupen1hd, tupen2hd, anpen1hd, anpen2hd, anpen3hd, trust1hd," &
         "trust2hd, expen1hd, expen2hd, ocpen1sp, ocpen2sp, ocpen3sp, ocpen4sp, wpen1sp, wpen2sp, wpen3sp," &
         "ppen1sp, ppen2sp, ppen3sp, tupen1sp, tupen2sp, anpen1sp, anpen2sp, anpen3sp, trust1sp, trust2sp," &
         "expen1sp, expen2sp, pcpen1hd, pcpen2hd, pcpen3hd, pcpen4hd, pwpen1hd, pwpen2hd, pwpen3hd, pppen1hd," &
         "pppen2hd, pppen3hd, ptupn1hd, ptupn2hd, panpn1hd, panpn2hd, panpn3hd, ptrst1hd, ptrst2hd, pxpen1hd," &
         "pxpen2hd, pcpen1sp, pcpen2sp, pcpen3sp, pcpen4sp, pwpen1sp, pwpen2sp, pwpen3sp, pppen1sp, pppen2sp," &
         "pppen3sp, ptupn1sp, ptupn2sp, panpn1sp, panpn2sp, panpn3sp, ptrst1sp, ptrst2sp, pxpen1sp, pxpen2sp," &
         "ocptd1hd, ocptd2hd, ocptd3hd, ocptd4hd, wpptd1hd, wpptd2hd, wpptd3hd, ppetd1hd, ppetd2hd, ppetd3hd," &
         "tuptd1hd, tuptd2hd, aptd1hd, aptd2hd, aptd3hd, trutd1hd, trutd2hd, exptd1hd, exptd2hd, ocptd1sp," &
         "ocptd2sp, ocptd3sp, ocptd4sp, wpptd1sp, wpptd2sp, wpptd3sp, ppetd1sp, ppetd2sp, ppetd3sp, tuptd1sp," &
         "tuptd2sp, aptd1sp, aptd2sp, aptd3sp, trutd1sp, trutd2sp, exptd1sp, exptd2sp, ocpid1hd, ocpid2hd," &
         "ocpid3hd, ocpid4hd, wwpid1hd, wwpid2hd, wwpid3hd, ppeid1hd, ppeid2hd, ppeid3hd, tupid1hd, tupid2hd," &
         "apid1hd, apid2hd, apid3hd, truid1hd, truid2hd, expid1hd, expid2hd, ocpid1sp, ocpid2sp, ocpid3sp," &
         "ocpid4sp, wwpid1sp, wwpid2sp, wwpid3sp, ppeid1sp, ppeid2sp, ppeid3sp, tupid1sp, tupid2sp, apid1sp," &
         "apid2sp, apid3sp, truid1sp, truid2sp, expid1sp, expid2sp, ocptx1hd, ocptx2hd, ocptx3hd, ocptx4hd," &
         "wptx1hd, wpptx2hd, wpptx3hd, ppetx1hd, ppetx2hd, ppetx3hd, tuptx1hd, tuptx2hd, aptx1hd, aptx2hd," &
         "aptx3hd, ttrtx1hd, ttrtx2hd, exptx1hd, exptx2hd, ocptx1sp, ocptx2sp, ocptx3sp, ocptx4sp, wptx1sp," &
         "wpptx2sp, wpptx3sp, ppetx1sp, ppetx2sp, ppetx3sp, tuptx1sp, tuptx2sp, aptx1sp, aptx2sp, aptx3sp," &
         "ttrtx1sp, ttrtx2sp, exptx1sp, exptx2sp, ocpoa1hd, ocpoa2hd, ocpoa3hd, ocpoa4hd, wpoa1hd, wwpoa2hd," &
         "wwpoa3hd, ppeoa1hd, ppeoa2hd, ppeoa3hd, tupoa1hd, tupoa2hd, apoa1hd, apoa2hd, apoa3hd, truoa1hd," &
         "truoa2hd, expoa1hd, expoa2hd, ocpoa1sp, ocpoa2sp, ocpoa3sp, ocpoa4sp, wpoa1sp, wwpoa2sp, wwpoa3sp," &
         "ppeoa1sp, ppeoa2sp, ppeoa3sp, tupoa1sp, tupoa2sp, apoa1sp, apoa2sp, apoa3sp, truoa1sp, truoa2sp," &
         "expoa1sp, expoa2sp, ocpoi1hd, ocpoi2hd, ocpoi3hd, ocpoi4hd, wpoi1hd, wwpoi2hd, wwpoi3hd, ppeoi1hd," &
         "ppeoi2hd, ppeoi3hd, tupoi1hd, tupoi2hd, apoi1hd, apoi2hd, apoi3hd, truoi1hd, truoi2hd, expoi1hd," &
         "expoi2hd, ocpoi1sp, ocpoi2sp, ocpoi3sp, ocpoi4sp, wpoi1sp, wwpoi2sp, wwpoi3sp, ppeoi1sp, ppeoi2sp," &
         "ppeoi3sp, tupoi1sp, tupoi2sp, apoi1sp, apoi2sp, apoi3sp, truoi1sp, truoi2sp, expoi1sp, expoi2sp," &
         "ocpta1hd, ocpta2hd, ocpta3hd, ocpta4hd, wpta1hd, wppta2hd, wppta3hd, ppeta1hd, ppeta2hd, ppeta3hd," &
         "tupta1hd, tupta2hd, apta1hd, apta2hd, apta3hd, truta1hd, truta2hd, expta1hd, expta2hd, ocpta1sp," &
         "ocpta2sp, ocpta3sp, ocpta4sp, wpta1sp, wppta2sp, wppta3sp, ppeta1sp, ppeta2sp, ppeta3sp, tupta1sp," &
         "tupta2sp, apta1sp, apta2sp, apta3sp, truta1sp, truta2sp, expta1sp, expta2sp, ocpti1hd, ocpti2hd," &
         "ocpti3hd, ocpti4hd, wpti1hd, wppti2hd, wppti3hd, ppeti1hd, ppeti2hd, ppeti3hd, tupti1hd, tupti2hd," &
         "apti1hd, apti2hd, apti3hd, truti1hd, truti2hd, expti1hd, expti2hd, ocpti1sp, ocpti2sp, ocpti3sp," &
         "ocpti4sp, wpti1sp, wppti2sp, wppti3sp, ppeti1sp, ppeti2sp, ppeti3sp, tupti1sp, tupti2sp, apti1sp," &
         "apti2sp, apti3sp, truti1sp, truti2sp, expti1sp, expti2sp, menpin11, menpin12, menpin13, menpin21," &
         "menpin22, menpin23, menpin31, menpin32, menpin33, menpol11, menpol12, menpol13, menpol21, menpol22," &
         "menpol23, menpol31, menpol32, menpol33, pmenpo11, pmenpo12, pmenpo13, pmenpo21, pmenpo22, pmenpo23," &
         "pmenpo31, pmenpo32, pmenpo33, bedroom, benunits, billrate, brma, burden, busroom, capval," &
         "charge1, charge2, charge3, charge4, charge5, charge6, charge7, charge8, charge9, chins," &
         "chrgpd1, chrgpd2, chrgpd3, chrgpd4, chrgpd5, chrgpd6, chrgpd7, chrgpd8, chrgpd9, covoths," &
         "csewamt, csewamt1, ct25d50d, ctamt, ctannual, ctband, ctbwait, ctcondoc, ctdisc, ctinstal," &
         "ctlvband, ctlvchk, ctreb, ctrebamt, ctrebpd, cttime, cwatamt, cwatamt1, entry1, entry2," &
         "entry3, entry4, gvtregn, gvtregno, hhldr01, hhldr02, hhldr03, hhldr04, hhldr05, hhldr06," &
         "hhldr07, hhldr08, hhldr09, hhldr10, hhldr11, hhldr12, hhldr13, hhldr14, hhldr97, hhstat," &
         "hlthst, intdate, mainacc, mnthcode, monlive, multi, nicoun, nidpnd, nmrmshar, nopay," &
         "norate, onbsroom, orgid, payrate, ptbsroom, rooms, roomshr, rt2rebam, rtannual, rtcondoc," &
         "rtdpa, rtdpaamt, rtene, rteneamt, rtgen, rtinstal, rtlpa, rtlpaamt, rtothamt, rtother," &
         "rtreb, rtrebamt, rtrtramt, rttimepd, schbrk, schfrt, schmeal, schmilk, seramt1, seramt2," &
         "seramt3, seramt4, seramt5, sercomb, serpay1, serpay2, serpay3, serpay4, serpay5, sewamt," &
         "sewanul, sewerpay, sewsep, sewtime, shelter, sobuy, stramt1, stramt2, strcov, strmort," &
         "stroths, strpd1, strpd2, suballow, sublet, sublety, subrent, tenure, tvlic, typeacc," &
         "urb, urbrur, urindew, urinds, watamt, watanul, watermet, waterpay, watrb, wattime," &
         "whoctbot, whorsp01, whorsp02, whorsp03, whorsp04, whorsp05, whorsp06, whorsp07, whorsp08, whorsp09," &
         "whorsp10, whorsp11, whorsp12, whorsp13, whorsp14, whynoct, wsewamt, wsewanul, wsewtime, yearlive," &
         "yearwhc, adulth, cwatamtd, depchldh, dischha1, dischhc1, diswhha1, diswhhc1, endowpay, gbhscost," &
         "grossct, hbeninc, hbindhh, hbindhh2, hearns, hhdisben, hhinc, hhinv, hhirben, hhnirben," &
         "hhothben, hhrent, hhrinc, hhrpinc, hhtvlic, hhtxcred, hothinc, hpeninc, hseinc, london," &
         "mortint, nihscost, penage, penhrp, ptentyp2, servpay, struins, tentyp2, tuhhrent, tuwatsew," &
         "watsewrt, hcgrent, hcfeudut, hcchrent, hcservch, hcmaint, hcsirent, hcfactor, hcother, hcpcomb," &
         "gvhelp, lacode, lauacode, llcare, needcare, colourtv, bwtv, serpd1, serpd2, serpd3," &
         "serpd4, serpd5, outsam11, outsam12, outsam21, outsam22, outsam31, outsam32, outsin11, outsin12," &
         "outsin21, outsin22, outsin31, outsin32, outspa11, outspa12, outspa21, outspa22, outspa31, outspa32," &
         "outspd11, outspd12, outspd21, outspd22, outspd31, outspd32, borramt1, borramt2, borramt3, endwp11," &
         "endwp12, endwp13, endwp21, endwp22, endwp23, endwp31, endwp32, endwp33, endwp41, endwp42," &
         "endwp43, endwp51, endwp52, endwp53, incmin11, incmin12, incmin13, incmin21, incmin22, incmin23," &
         "incmin31, incmin32, incmin33, incmp11, incmp12, incmp13, incmp21, incmp22, incmp23, incmp31," &
         "incmp32, incmp33, incmpa11, incmpa12, incmpa13, incmpa21, incmpa22, incmpa23, incmpa31, incmpa32," &
         "incmpa33, pincmp11, pincmp12, pincmp13, pincmp21, pincmp22, pincmp23, pincmp31, pincmp32, pincmp33," &
         "intpri1, intpri2, intpri3, pintrpi1, pintrpi2, pintrpi3, loanyr1, loanyr2, loanyr3, menpol1," &
         "menpol2, menpol3, morall1, morall2, morall3, morflc1, morflc2, morflc3, morinp1, morinp2," &
         "morinp3, pmorinp1, pmorinp2, pmorinp3, morinus1, morinus2, morinus3, mortend1, mortend2, mortend3," &
         "mortlef1, mortlef2, mortlef3, mortpro1, mortpro2, mortpro3, morttyp1, morttyp2, morttyp3, morupd1," &
         "morupd2, morupd3, morus1, morus2, morus3, mpcove11, mpcove12, mpcove13, mpcove21, mpcove22," &
         "mpcove23, mpcove31, mpcove32, mpcove33, outsmor1, outsmor2, outsmor3, rmamt1, rmamt2, rmamt3," &
         "rmort1, rmort2, rmort3, rmortyr1, rmortyr2, rmortyr3, rmpur011, rmpur012, rmpur013, rmpur021," &
         "rmpur022, rmpur023, rmpur031, rmpur032, rmpur033, rmpur041, rmpur042, rmpur043, rmpur051, rmpur052," &
         "rmpur053, rmpur061, rmpur062, rmpur063, rmpur071, rmpur072, rmpur073, rmpur081, rmpur082, rmpur083," &
         "buyyear, purcamt, purcloan, secmpur3, secmpur4, secmpur1, secmpur5, secmpur6, secmpur2, secmpur7," &
         "rexhham1, accchk1, rexhhwh1, prexhha1, accjbp10, accjbp11, accjbp12, accjbp13, accjbp14, accjob," &
         "ctract, eligamt, eligpd, fairrent, furnish, hbenamt, hbenchk, hbenefit, hbenpd, hbenwait," &
         "hbmnth, hbrecp, hbweeks, hbyear, hbyears, landlord, niystart, othtype, rebate, rent," &
         "rentdoc, renthol, rentpd, rentpd1, rentpd2, resll, resll2, serincam, tentype, weekhol," &
         "wsinc, wsincamt, ystartr, accjbp1, accjbp2, accjbp3, accjbp4, accjbp5, accjbp6, accjbp7," &
         "accjbp8, accjbp9, rexhh, rntfull, lighting, heating, hotwater, fuelcook, tvlice, elec," &
         "gas, lsf " &
         " ) values " ;

   
   --
   -- delete all the records identified by the where SQL clause 
   --
   DELETE_PART : constant String := "delete from frs.frs1516 ";
   
   --
   -- update
   --
   UPDATE_PART : constant String := "update frs.frs1516 set  ";
   function Get_Configured_Insert_Params( update_order : Boolean := False )  return GNATCOLL.SQL.Exec.SQL_Parameters is
   use GNATCOLL.SQL_Impl;
      params : constant SQL_Parameters( 1 .. 5702 ) := ( if update_order then (
            1 => ( Parameter_Float, 0.0 ),   --  : int1hd (Amount)
            2 => ( Parameter_Float, 0.0 ),   --  : int2hd (Amount)
            3 => ( Parameter_Float, 0.0 ),   --  : int3hd (Amount)
            4 => ( Parameter_Integer, 0 ),   --  : int4hd (Integer)
            5 => ( Parameter_Float, 0.0 ),   --  : int5hd (Amount)
            6 => ( Parameter_Float, 0.0 ),   --  : int6hd (Amount)
            7 => ( Parameter_Float, 0.0 ),   --  : int7hd (Amount)
            8 => ( Parameter_Float, 0.0 ),   --  : int8hd (Amount)
            9 => ( Parameter_Integer, 0 ),   --  : int9hd (Integer)
           10 => ( Parameter_Integer, 0 ),   --  : int10hd (Integer)
           11 => ( Parameter_Integer, 0 ),   --  : int11hd (Integer)
           12 => ( Parameter_Integer, 0 ),   --  : int12hd (Integer)
           13 => ( Parameter_Integer, 0 ),   --  : int13hd (Integer)
           14 => ( Parameter_Integer, 0 ),   --  : int14hd (Integer)
           15 => ( Parameter_Integer, 0 ),   --  : int15hd (Integer)
           16 => ( Parameter_Integer, 0 ),   --  : int16hd (Integer)
           17 => ( Parameter_Integer, 0 ),   --  : int17hd (Integer)
           18 => ( Parameter_Integer, 0 ),   --  : int18hd (Integer)
           19 => ( Parameter_Integer, 0 ),   --  : int19hd (Integer)
           20 => ( Parameter_Float, 0.0 ),   --  : int21hd (Amount)
           21 => ( Parameter_Integer, 0 ),   --  : int22hd (Integer)
           22 => ( Parameter_Integer, 0 ),   --  : int23hd (Integer)
           23 => ( Parameter_Float, 0.0 ),   --  : int24hd (Amount)
           24 => ( Parameter_Integer, 0 ),   --  : int25hd (Integer)
           25 => ( Parameter_Integer, 0 ),   --  : int26hd (Integer)
           26 => ( Parameter_Float, 0.0 ),   --  : int27hd (Amount)
           27 => ( Parameter_Float, 0.0 ),   --  : int28hd (Amount)
           28 => ( Parameter_Integer, 0 ),   --  : int29hd (Integer)
           29 => ( Parameter_Integer, 0 ),   --  : int30hd (Integer)
           30 => ( Parameter_Float, 0.0 ),   --  : int1sp (Amount)
           31 => ( Parameter_Float, 0.0 ),   --  : int2sp (Amount)
           32 => ( Parameter_Float, 0.0 ),   --  : int3sp (Amount)
           33 => ( Parameter_Integer, 0 ),   --  : int4sp (Integer)
           34 => ( Parameter_Float, 0.0 ),   --  : int5sp (Amount)
           35 => ( Parameter_Float, 0.0 ),   --  : int6sp (Amount)
           36 => ( Parameter_Float, 0.0 ),   --  : int7sp (Amount)
           37 => ( Parameter_Float, 0.0 ),   --  : int8sp (Amount)
           38 => ( Parameter_Integer, 0 ),   --  : int9sp (Integer)
           39 => ( Parameter_Integer, 0 ),   --  : int10sp (Integer)
           40 => ( Parameter_Integer, 0 ),   --  : int11sp (Integer)
           41 => ( Parameter_Integer, 0 ),   --  : int12sp (Integer)
           42 => ( Parameter_Integer, 0 ),   --  : int13sp (Integer)
           43 => ( Parameter_Integer, 0 ),   --  : int14sp (Integer)
           44 => ( Parameter_Integer, 0 ),   --  : int15sp (Integer)
           45 => ( Parameter_Integer, 0 ),   --  : int16sp (Integer)
           46 => ( Parameter_Integer, 0 ),   --  : int17sp (Integer)
           47 => ( Parameter_Integer, 0 ),   --  : int18sp (Integer)
           48 => ( Parameter_Integer, 0 ),   --  : int19sp (Integer)
           49 => ( Parameter_Float, 0.0 ),   --  : int21sp (Amount)
           50 => ( Parameter_Integer, 0 ),   --  : int22sp (Integer)
           51 => ( Parameter_Integer, 0 ),   --  : int23sp (Integer)
           52 => ( Parameter_Float, 0.0 ),   --  : int24sp (Amount)
           53 => ( Parameter_Integer, 0 ),   --  : int25sp (Integer)
           54 => ( Parameter_Integer, 0 ),   --  : int26sp (Integer)
           55 => ( Parameter_Float, 0.0 ),   --  : int27sp (Amount)
           56 => ( Parameter_Float, 0.0 ),   --  : int28sp (Amount)
           57 => ( Parameter_Integer, 0 ),   --  : int29sp (Integer)
           58 => ( Parameter_Integer, 0 ),   --  : int30sp (Integer)
           59 => ( Parameter_Integer, 0 ),   --  : intx1hd (Integer)
           60 => ( Parameter_Integer, 0 ),   --  : intx2hd (Integer)
           61 => ( Parameter_Integer, 0 ),   --  : intx3hd (Integer)
           62 => ( Parameter_Integer, 0 ),   --  : intx4hd (Integer)
           63 => ( Parameter_Integer, 0 ),   --  : intx5hd (Integer)
           64 => ( Parameter_Integer, 0 ),   --  : intx6hd (Integer)
           65 => ( Parameter_Integer, 0 ),   --  : intx7hd (Integer)
           66 => ( Parameter_Integer, 0 ),   --  : intx8hd (Integer)
           67 => ( Parameter_Integer, 0 ),   --  : intx9hd (Integer)
           68 => ( Parameter_Integer, 0 ),   --  : intx10hd (Integer)
           69 => ( Parameter_Integer, 0 ),   --  : intx11hd (Integer)
           70 => ( Parameter_Integer, 0 ),   --  : intx12hd (Integer)
           71 => ( Parameter_Integer, 0 ),   --  : intx13hd (Integer)
           72 => ( Parameter_Integer, 0 ),   --  : intx14hd (Integer)
           73 => ( Parameter_Integer, 0 ),   --  : intx15hd (Integer)
           74 => ( Parameter_Integer, 0 ),   --  : intx16hd (Integer)
           75 => ( Parameter_Integer, 0 ),   --  : intx17hd (Integer)
           76 => ( Parameter_Integer, 0 ),   --  : intx18hd (Integer)
           77 => ( Parameter_Integer, 0 ),   --  : intx19hd (Integer)
           78 => ( Parameter_Integer, 0 ),   --  : intx21hd (Integer)
           79 => ( Parameter_Integer, 0 ),   --  : intx22hd (Integer)
           80 => ( Parameter_Integer, 0 ),   --  : intx23hd (Integer)
           81 => ( Parameter_Integer, 0 ),   --  : intx24hd (Integer)
           82 => ( Parameter_Integer, 0 ),   --  : intx25hd (Integer)
           83 => ( Parameter_Integer, 0 ),   --  : intx26hd (Integer)
           84 => ( Parameter_Integer, 0 ),   --  : intx27hd (Integer)
           85 => ( Parameter_Integer, 0 ),   --  : intx28hd (Integer)
           86 => ( Parameter_Integer, 0 ),   --  : intx29hd (Integer)
           87 => ( Parameter_Integer, 0 ),   --  : intx30hd (Integer)
           88 => ( Parameter_Integer, 0 ),   --  : intx1sp (Integer)
           89 => ( Parameter_Integer, 0 ),   --  : intx2sp (Integer)
           90 => ( Parameter_Integer, 0 ),   --  : intx3sp (Integer)
           91 => ( Parameter_Integer, 0 ),   --  : intx4sp (Integer)
           92 => ( Parameter_Integer, 0 ),   --  : intx5sp (Integer)
           93 => ( Parameter_Integer, 0 ),   --  : intx6sp (Integer)
           94 => ( Parameter_Integer, 0 ),   --  : intx7sp (Integer)
           95 => ( Parameter_Integer, 0 ),   --  : intx8sp (Integer)
           96 => ( Parameter_Integer, 0 ),   --  : intx9sp (Integer)
           97 => ( Parameter_Integer, 0 ),   --  : intx10sp (Integer)
           98 => ( Parameter_Integer, 0 ),   --  : intx11sp (Integer)
           99 => ( Parameter_Integer, 0 ),   --  : intx12sp (Integer)
           100 => ( Parameter_Integer, 0 ),   --  : intx13sp (Integer)
           101 => ( Parameter_Integer, 0 ),   --  : intx14sp (Integer)
           102 => ( Parameter_Integer, 0 ),   --  : intx15sp (Integer)
           103 => ( Parameter_Integer, 0 ),   --  : intx16sp (Integer)
           104 => ( Parameter_Integer, 0 ),   --  : intx17sp (Integer)
           105 => ( Parameter_Integer, 0 ),   --  : intx18sp (Integer)
           106 => ( Parameter_Integer, 0 ),   --  : intx19sp (Integer)
           107 => ( Parameter_Integer, 0 ),   --  : intx21sp (Integer)
           108 => ( Parameter_Integer, 0 ),   --  : intx22sp (Integer)
           109 => ( Parameter_Integer, 0 ),   --  : intx23sp (Integer)
           110 => ( Parameter_Integer, 0 ),   --  : intx24sp (Integer)
           111 => ( Parameter_Integer, 0 ),   --  : intx25sp (Integer)
           112 => ( Parameter_Integer, 0 ),   --  : intx26sp (Integer)
           113 => ( Parameter_Integer, 0 ),   --  : intx27sp (Integer)
           114 => ( Parameter_Integer, 0 ),   --  : intx28sp (Integer)
           115 => ( Parameter_Integer, 0 ),   --  : intx29sp (Integer)
           116 => ( Parameter_Integer, 0 ),   --  : intx30sp (Integer)
           117 => ( Parameter_Integer, 0 ),   --  : invt1hd (Integer)
           118 => ( Parameter_Integer, 0 ),   --  : invt2hd (Integer)
           119 => ( Parameter_Integer, 0 ),   --  : invt3hd (Integer)
           120 => ( Parameter_Integer, 0 ),   --  : invt4hd (Integer)
           121 => ( Parameter_Integer, 0 ),   --  : invt5hd (Integer)
           122 => ( Parameter_Integer, 0 ),   --  : invt6hd (Integer)
           123 => ( Parameter_Integer, 0 ),   --  : invt7hd (Integer)
           124 => ( Parameter_Integer, 0 ),   --  : invt8hd (Integer)
           125 => ( Parameter_Integer, 0 ),   --  : invt9hd (Integer)
           126 => ( Parameter_Integer, 0 ),   --  : invt10hd (Integer)
           127 => ( Parameter_Integer, 0 ),   --  : invt11hd (Integer)
           128 => ( Parameter_Integer, 0 ),   --  : invt12hd (Integer)
           129 => ( Parameter_Integer, 0 ),   --  : invt13hd (Integer)
           130 => ( Parameter_Integer, 0 ),   --  : invt14hd (Integer)
           131 => ( Parameter_Integer, 0 ),   --  : invt15hd (Integer)
           132 => ( Parameter_Integer, 0 ),   --  : invt16hd (Integer)
           133 => ( Parameter_Integer, 0 ),   --  : invt17hd (Integer)
           134 => ( Parameter_Integer, 0 ),   --  : invt18hd (Integer)
           135 => ( Parameter_Integer, 0 ),   --  : invt19hd (Integer)
           136 => ( Parameter_Integer, 0 ),   --  : invt21hd (Integer)
           137 => ( Parameter_Integer, 0 ),   --  : invt22hd (Integer)
           138 => ( Parameter_Integer, 0 ),   --  : invt23hd (Integer)
           139 => ( Parameter_Integer, 0 ),   --  : invt24hd (Integer)
           140 => ( Parameter_Integer, 0 ),   --  : invt25hd (Integer)
           141 => ( Parameter_Integer, 0 ),   --  : invt26hd (Integer)
           142 => ( Parameter_Integer, 0 ),   --  : invt27hd (Integer)
           143 => ( Parameter_Integer, 0 ),   --  : invt28hd (Integer)
           144 => ( Parameter_Integer, 0 ),   --  : invt29hd (Integer)
           145 => ( Parameter_Integer, 0 ),   --  : invt30hd (Integer)
           146 => ( Parameter_Integer, 0 ),   --  : invt1sp (Integer)
           147 => ( Parameter_Integer, 0 ),   --  : invt2sp (Integer)
           148 => ( Parameter_Integer, 0 ),   --  : invt3sp (Integer)
           149 => ( Parameter_Integer, 0 ),   --  : invt4sp (Integer)
           150 => ( Parameter_Integer, 0 ),   --  : invt5sp (Integer)
           151 => ( Parameter_Integer, 0 ),   --  : invt6sp (Integer)
           152 => ( Parameter_Integer, 0 ),   --  : invt7sp (Integer)
           153 => ( Parameter_Integer, 0 ),   --  : invt8sp (Integer)
           154 => ( Parameter_Integer, 0 ),   --  : invt9sp (Integer)
           155 => ( Parameter_Integer, 0 ),   --  : invt10sp (Integer)
           156 => ( Parameter_Integer, 0 ),   --  : invt11sp (Integer)
           157 => ( Parameter_Integer, 0 ),   --  : invt12sp (Integer)
           158 => ( Parameter_Integer, 0 ),   --  : invt13sp (Integer)
           159 => ( Parameter_Integer, 0 ),   --  : invt14sp (Integer)
           160 => ( Parameter_Integer, 0 ),   --  : invt15sp (Integer)
           161 => ( Parameter_Integer, 0 ),   --  : invt16sp (Integer)
           162 => ( Parameter_Integer, 0 ),   --  : invt17sp (Integer)
           163 => ( Parameter_Integer, 0 ),   --  : invt18sp (Integer)
           164 => ( Parameter_Integer, 0 ),   --  : invt19sp (Integer)
           165 => ( Parameter_Integer, 0 ),   --  : invt21sp (Integer)
           166 => ( Parameter_Integer, 0 ),   --  : invt22sp (Integer)
           167 => ( Parameter_Integer, 0 ),   --  : invt23sp (Integer)
           168 => ( Parameter_Integer, 0 ),   --  : invt24sp (Integer)
           169 => ( Parameter_Integer, 0 ),   --  : invt25sp (Integer)
           170 => ( Parameter_Integer, 0 ),   --  : invt26sp (Integer)
           171 => ( Parameter_Integer, 0 ),   --  : invt27sp (Integer)
           172 => ( Parameter_Integer, 0 ),   --  : invt28sp (Integer)
           173 => ( Parameter_Integer, 0 ),   --  : invt29sp (Integer)
           174 => ( Parameter_Integer, 0 ),   --  : invt30sp (Integer)
           175 => ( Parameter_Integer, 0 ),   --  : nsa1hd (Integer)
           176 => ( Parameter_Integer, 0 ),   --  : nsa2hd (Integer)
           177 => ( Parameter_Integer, 0 ),   --  : nsa3hd (Integer)
           178 => ( Parameter_Integer, 0 ),   --  : nsa4hd (Integer)
           179 => ( Parameter_Integer, 0 ),   --  : nsa5hd (Integer)
           180 => ( Parameter_Integer, 0 ),   --  : nsa6hd (Integer)
           181 => ( Parameter_Integer, 0 ),   --  : nsa7hd (Integer)
           182 => ( Parameter_Integer, 0 ),   --  : nsa8hd (Integer)
           183 => ( Parameter_Integer, 0 ),   --  : nsa9hd (Integer)
           184 => ( Parameter_Integer, 0 ),   --  : nsa10hd (Integer)
           185 => ( Parameter_Integer, 0 ),   --  : nsa11hd (Integer)
           186 => ( Parameter_Integer, 0 ),   --  : nsa12hd (Integer)
           187 => ( Parameter_Integer, 0 ),   --  : nsa13hd (Integer)
           188 => ( Parameter_Integer, 0 ),   --  : nsa14hd (Integer)
           189 => ( Parameter_Integer, 0 ),   --  : nsa15hd (Integer)
           190 => ( Parameter_Integer, 0 ),   --  : nsa16hd (Integer)
           191 => ( Parameter_Integer, 0 ),   --  : nsa17hd (Integer)
           192 => ( Parameter_Integer, 0 ),   --  : nsa18hd (Integer)
           193 => ( Parameter_Integer, 0 ),   --  : nsa19hd (Integer)
           194 => ( Parameter_Integer, 0 ),   --  : nsa21hd (Integer)
           195 => ( Parameter_Integer, 0 ),   --  : nsa22hd (Integer)
           196 => ( Parameter_Integer, 0 ),   --  : nsa23hd (Integer)
           197 => ( Parameter_Integer, 0 ),   --  : nsa24hd (Integer)
           198 => ( Parameter_Integer, 0 ),   --  : nsa25hd (Integer)
           199 => ( Parameter_Integer, 0 ),   --  : nsa26hd (Integer)
           200 => ( Parameter_Integer, 0 ),   --  : nsa27hd (Integer)
           201 => ( Parameter_Integer, 0 ),   --  : nsa28hd (Integer)
           202 => ( Parameter_Integer, 0 ),   --  : nsa29hd (Integer)
           203 => ( Parameter_Integer, 0 ),   --  : nsa30hd (Integer)
           204 => ( Parameter_Integer, 0 ),   --  : nsa1sp (Integer)
           205 => ( Parameter_Integer, 0 ),   --  : nsa2sp (Integer)
           206 => ( Parameter_Integer, 0 ),   --  : nsa3sp (Integer)
           207 => ( Parameter_Integer, 0 ),   --  : nsa4sp (Integer)
           208 => ( Parameter_Integer, 0 ),   --  : nsa5sp (Integer)
           209 => ( Parameter_Integer, 0 ),   --  : nsa6sp (Integer)
           210 => ( Parameter_Integer, 0 ),   --  : nsa7sp (Integer)
           211 => ( Parameter_Integer, 0 ),   --  : nsa8sp (Integer)
           212 => ( Parameter_Integer, 0 ),   --  : nsa9sp (Integer)
           213 => ( Parameter_Integer, 0 ),   --  : nsa10sp (Integer)
           214 => ( Parameter_Integer, 0 ),   --  : nsa11sp (Integer)
           215 => ( Parameter_Integer, 0 ),   --  : nsa12sp (Integer)
           216 => ( Parameter_Integer, 0 ),   --  : nsa13sp (Integer)
           217 => ( Parameter_Integer, 0 ),   --  : nsa14sp (Integer)
           218 => ( Parameter_Integer, 0 ),   --  : nsa15sp (Integer)
           219 => ( Parameter_Integer, 0 ),   --  : nsa16sp (Integer)
           220 => ( Parameter_Integer, 0 ),   --  : nsa17sp (Integer)
           221 => ( Parameter_Integer, 0 ),   --  : nsa18sp (Integer)
           222 => ( Parameter_Integer, 0 ),   --  : nsa19sp (Integer)
           223 => ( Parameter_Integer, 0 ),   --  : nsa21sp (Integer)
           224 => ( Parameter_Integer, 0 ),   --  : nsa22sp (Integer)
           225 => ( Parameter_Integer, 0 ),   --  : nsa23sp (Integer)
           226 => ( Parameter_Integer, 0 ),   --  : nsa24sp (Integer)
           227 => ( Parameter_Integer, 0 ),   --  : nsa25sp (Integer)
           228 => ( Parameter_Integer, 0 ),   --  : nsa26sp (Integer)
           229 => ( Parameter_Integer, 0 ),   --  : nsa27sp (Integer)
           230 => ( Parameter_Integer, 0 ),   --  : nsa28sp (Integer)
           231 => ( Parameter_Integer, 0 ),   --  : nsa29sp (Integer)
           232 => ( Parameter_Integer, 0 ),   --  : nsa30sp (Integer)
           233 => ( Parameter_Integer, 0 ),   --  : ablehd (Integer)
           234 => ( Parameter_Integer, 0 ),   --  : ablesp (Integer)
           235 => ( Parameter_Integer, 0 ),   --  : abs1pdhd (Integer)
           236 => ( Parameter_Integer, 0 ),   --  : abs1pdsp (Integer)
           237 => ( Parameter_Integer, 0 ),   --  : absparhd (Integer)
           238 => ( Parameter_Integer, 0 ),   --  : absparsp (Integer)
           239 => ( Parameter_Integer, 0 ),   --  : abspayhd (Integer)
           240 => ( Parameter_Integer, 0 ),   --  : abspaysp (Integer)
           241 => ( Parameter_Integer, 0 ),   --  : abswhyhd (Integer)
           242 => ( Parameter_Integer, 0 ),   --  : abswhysp (Integer)
           243 => ( Parameter_Integer, 0 ),   --  : abswkhd (Integer)
           244 => ( Parameter_Integer, 0 ),   --  : abswksp (Integer)
           245 => ( Parameter_Integer, 0 ),   --  : acshd (Integer)
           246 => ( Parameter_Integer, 0 ),   --  : acssp (Integer)
           247 => ( Parameter_Integer, 0 ),   --  : acctqhd (Integer)
           248 => ( Parameter_Integer, 0 ),   --  : acctqsp (Integer)
           249 => ( Parameter_Float, 0.0 ),   --  : acsamthd (Amount)
           250 => ( Parameter_Float, 0.0 ),   --  : acsamtsp (Amount)
           251 => ( Parameter_Integer, 0 ),   --  : acspdhd (Integer)
           252 => ( Parameter_Integer, 0 ),   --  : acspdsp (Integer)
           253 => ( Parameter_Integer, 0 ),   --  : actacihd (Integer)
           254 => ( Parameter_Integer, 0 ),   --  : actacisp (Integer)
           255 => ( Parameter_Integer, 0 ),   --  : emahd (Integer)
           256 => ( Parameter_Integer, 0 ),   --  : emasp (Integer)
           257 => ( Parameter_Float, 0.0 ),   --  : emaamthd (Amount)
           258 => ( Parameter_Integer, 0 ),   --  : emaamtsp (Integer)
           259 => ( Parameter_Integer, 0 ),   --  : emapdhd (Integer)
           260 => ( Parameter_Integer, 0 ),   --  : emapdsp (Integer)
           261 => ( Parameter_Integer, 0 ),   --  : agehd (Integer)
           262 => ( Parameter_Integer, 0 ),   --  : agesp (Integer)
           263 => ( Parameter_Integer, 0 ),   --  : agehqhd (Integer)
           264 => ( Parameter_Integer, 0 ),   --  : agehqsp (Integer)
           265 => ( Parameter_Float, 0.0 ),   --  : aliamthd (Amount)
           266 => ( Parameter_Float, 0.0 ),   --  : aliamtsp (Amount)
           267 => ( Parameter_Integer, 0 ),   --  : alimnyhd (Integer)
           268 => ( Parameter_Integer, 0 ),   --  : alimnysp (Integer)
           269 => ( Parameter_Integer, 0 ),   --  : alipdhd (Integer)
           270 => ( Parameter_Integer, 0 ),   --  : alipdsp (Integer)
           271 => ( Parameter_Integer, 0 ),   --  : aliushd (Integer)
           272 => ( Parameter_Integer, 0 ),   --  : aliussp (Integer)
           273 => ( Parameter_Float, 0.0 ),   --  : absallhd (Amount)
           274 => ( Parameter_Float, 0.0 ),   --  : absallsp (Amount)
           275 => ( Parameter_Float, 0.0 ),   --  : organhd (Amount)
           276 => ( Parameter_Float, 0.0 ),   --  : organsp (Amount)
           277 => ( Parameter_Float, 0.0 ),   --  : fosterhd (Amount)
           278 => ( Parameter_Float, 0.0 ),   --  : fostersp (Amount)
           279 => ( Parameter_Float, 0.0 ),   --  : adopthd (Amount)
           280 => ( Parameter_Float, 0.0 ),   --  : adoptsp (Amount)
           281 => ( Parameter_Integer, 0 ),   --  : pasbalhd (Integer)
           282 => ( Parameter_Integer, 0 ),   --  : pasbalsp (Integer)
           283 => ( Parameter_Integer, 0 ),   --  : porganhd (Integer)
           284 => ( Parameter_Integer, 0 ),   --  : porgansp (Integer)
           285 => ( Parameter_Integer, 0 ),   --  : pfostehd (Integer)
           286 => ( Parameter_Integer, 0 ),   --  : pfostesp (Integer)
           287 => ( Parameter_Integer, 0 ),   --  : padopthd (Integer)
           288 => ( Parameter_Integer, 0 ),   --  : padoptsp (Integer)
           289 => ( Parameter_Integer, 0 ),   --  : aluamthd (Integer)
           290 => ( Parameter_Integer, 0 ),   --  : aluamtsp (Integer)
           291 => ( Parameter_Integer, 0 ),   --  : alupdhd (Integer)
           292 => ( Parameter_Integer, 0 ),   --  : alupdsp (Integer)
           293 => ( Parameter_Integer, 0 ),   --  : anyacchd (Integer)
           294 => ( Parameter_Integer, 0 ),   --  : anyaccsp (Integer)
           295 => ( Parameter_Integer, 0 ),   --  : anyedhd (Integer)
           296 => ( Parameter_Integer, 0 ),   --  : anyedsp (Integer)
           297 => ( Parameter_Integer, 0 ),   --  : anymonhd (Integer)
           298 => ( Parameter_Integer, 0 ),   --  : anymonsp (Integer)
           299 => ( Parameter_Integer, 0 ),   --  : anype1hd (Integer)
           300 => ( Parameter_Integer, 0 ),   --  : anype1sp (Integer)
           301 => ( Parameter_Integer, 0 ),   --  : anype2hd (Integer)
           302 => ( Parameter_Integer, 0 ),   --  : anype2sp (Integer)
           303 => ( Parameter_Integer, 0 ),   --  : anype3hd (Integer)
           304 => ( Parameter_Integer, 0 ),   --  : anype3sp (Integer)
           305 => ( Parameter_Integer, 0 ),   --  : anype4hd (Integer)
           306 => ( Parameter_Integer, 0 ),   --  : anype4sp (Integer)
           307 => ( Parameter_Integer, 0 ),   --  : anype5hd (Integer)
           308 => ( Parameter_Integer, 0 ),   --  : anype5sp (Integer)
           309 => ( Parameter_Integer, 0 ),   --  : anype6hd (Integer)
           310 => ( Parameter_Integer, 0 ),   --  : anype6sp (Integer)
           311 => ( Parameter_Integer, 0 ),   --  : anype7hd (Integer)
           312 => ( Parameter_Integer, 0 ),   --  : anype7sp (Integer)
           313 => ( Parameter_Float, 0.0 ),   --  : abspamhd (Amount)
           314 => ( Parameter_Integer, 0 ),   --  : abspamsp (Integer)
           315 => ( Parameter_Float, 0.0 ),   --  : abspexhd (Amount)
           316 => ( Parameter_Integer, 0 ),   --  : abspexsp (Integer)
           317 => ( Parameter_Integer, 0 ),   --  : apdpdhd (Integer)
           318 => ( Parameter_Integer, 0 ),   --  : apdpdsp (Integer)
           319 => ( Parameter_Integer, 0 ),   --  : pabspahd (Integer)
           320 => ( Parameter_Integer, 0 ),   --  : pabspasp (Integer)
           321 => ( Parameter_Integer, 0 ),   --  : basacthd (Integer)
           322 => ( Parameter_Integer, 0 ),   --  : basactsp (Integer)
           323 => ( Parameter_Integer, 0 ),   --  : bfdhd (Integer)
           324 => ( Parameter_Integer, 0 ),   --  : bfdsp (Integer)
           325 => ( Parameter_Float, 0.0 ),   --  : bfdamthd (Amount)
           326 => ( Parameter_Float, 0.0 ),   --  : bfdamtsp (Amount)
           327 => ( Parameter_Integer, 0 ),   --  : pbfdhd (Integer)
           328 => ( Parameter_Integer, 0 ),   --  : pbfdsp (Integer)
           329 => ( Parameter_Integer, 0 ),   --  : bfdvalhd (Integer)
           330 => ( Parameter_Integer, 0 ),   --  : bfdvalsp (Integer)
           331 => ( Parameter_Integer, 0 ),   --  : careabhd (Integer)
           332 => ( Parameter_Integer, 0 ),   --  : careabsp (Integer)
           333 => ( Parameter_Integer, 0 ),   --  : careahhd (Integer)
           334 => ( Parameter_Integer, 0 ),   --  : careahsp (Integer)
           335 => ( Parameter_Integer, 0 ),   --  : carecbhd (Integer)
           336 => ( Parameter_Integer, 0 ),   --  : carecbsp (Integer)
           337 => ( Parameter_Integer, 0 ),   --  : carechhd (Integer)
           338 => ( Parameter_Integer, 0 ),   --  : carechsp (Integer)
           339 => ( Parameter_Integer, 0 ),   --  : careclhd (Integer)
           340 => ( Parameter_Integer, 0 ),   --  : careclsp (Integer)
           341 => ( Parameter_Integer, 0 ),   --  : careflhd (Integer)
           342 => ( Parameter_Integer, 0 ),   --  : careflsp (Integer)
           343 => ( Parameter_Integer, 0 ),   --  : carefrhd (Integer)
           344 => ( Parameter_Integer, 0 ),   --  : carefrsp (Integer)
           345 => ( Parameter_Integer, 0 ),   --  : careothd (Integer)
           346 => ( Parameter_Integer, 0 ),   --  : careotsp (Integer)
           347 => ( Parameter_Integer, 0 ),   --  : carerhd (Integer)
           348 => ( Parameter_Integer, 0 ),   --  : carersp (Integer)
           349 => ( Parameter_Integer, 0 ),   --  : cbaamthd (Integer)
           350 => ( Parameter_Integer, 0 ),   --  : cbaamtsp (Integer)
           351 => ( Parameter_Integer, 0 ),   --  : cbchkhd (Integer)
           352 => ( Parameter_Integer, 0 ),   --  : cbchksp (Integer)
           353 => ( Parameter_Integer, 0 ),   --  : changehd (Integer)
           354 => ( Parameter_Integer, 0 ),   --  : changesp (Integer)
           355 => ( Parameter_Integer, 0 ),   --  : chbflghd (Integer)
           356 => ( Parameter_Integer, 0 ),   --  : chbflgsp (Integer)
           357 => ( Parameter_Integer, 0 ),   --  : chknophd (Integer)
           358 => ( Parameter_Integer, 0 ),   --  : chknopsp (Integer)
           359 => ( Parameter_Integer, 0 ),   --  : fpchd (Integer)
           360 => ( Parameter_Integer, 0 ),   --  : fpcsp (Integer)
           361 => ( Parameter_Integer, 0 ),   --  : fuchd (Integer)
           362 => ( Parameter_Integer, 0 ),   --  : fucsp (Integer)
           363 => ( Parameter_Integer, 0 ),   --  : fhbhd (Integer)
           364 => ( Parameter_Integer, 0 ),   --  : fhbsp (Integer)
           365 => ( Parameter_Integer, 0 ),   --  : fwtchd (Integer)
           366 => ( Parameter_Integer, 0 ),   --  : fwtcsp (Integer)
           367 => ( Parameter_Integer, 0 ),   --  : fctchd (Integer)
           368 => ( Parameter_Integer, 0 ),   --  : fctcsp (Integer)
           369 => ( Parameter_Integer, 0 ),   --  : fishd (Integer)
           370 => ( Parameter_Integer, 0 ),   --  : fissp (Integer)
           371 => ( Parameter_Integer, 0 ),   --  : fjsahd (Integer)
           372 => ( Parameter_Integer, 0 ),   --  : fjsasp (Integer)
           373 => ( Parameter_Integer, 0 ),   --  : fesahd (Integer)
           374 => ( Parameter_Integer, 0 ),   --  : fesasp (Integer)
           375 => ( Parameter_Integer, 0 ),   --  : claimahd (Integer)
           376 => ( Parameter_Integer, 0 ),   --  : claimasp (Integer)
           377 => ( Parameter_Integer, 0 ),   --  : cohabhd (Integer)
           378 => ( Parameter_Integer, 0 ),   --  : cohabsp (Integer)
           379 => ( Parameter_Integer, 0 ),   --  : condithd (Integer)
           380 => ( Parameter_Integer, 0 ),   --  : conditsp (Integer)
           381 => ( Parameter_Integer, 0 ),   --  : blodgehd (Integer)
           382 => ( Parameter_Integer, 0 ),   --  : blodgesp (Integer)
           383 => ( Parameter_Integer, 0 ),   --  : ctclm1hd (Integer)
           384 => ( Parameter_Integer, 0 ),   --  : ctclm1sp (Integer)
           385 => ( Parameter_Integer, 0 ),   --  : ctclm2hd (Integer)
           386 => ( Parameter_Integer, 0 ),   --  : ctclm2sp (Integer)
           387 => ( Parameter_Integer, 0 ),   --  : cupchkhd (Integer)
           388 => ( Parameter_Integer, 0 ),   --  : cupchksp (Integer)
           389 => ( Parameter_Integer, 0 ),   --  : curacthd (Integer)
           390 => ( Parameter_Integer, 0 ),   --  : curactsp (Integer)
           391 => ( Parameter_Integer, 0 ),   --  : curqulhd (Integer)
           392 => ( Parameter_Integer, 0 ),   --  : curqulsp (Integer)
           393 => ( Parameter_Integer, 0 ),   --  : blheadhd (Integer)
           394 => ( Parameter_Integer, 0 ),   --  : blheadsp (Integer)
           395 => ( Parameter_Float, 0.0 ),   --  : blrenthd (Amount)
           396 => ( Parameter_Float, 0.0 ),   --  : blrentsp (Amount)
           397 => ( Parameter_Integer, 0 ),   --  : pblrenhd (Integer)
           398 => ( Parameter_Integer, 0 ),   --  : pblrensp (Integer)
           399 => ( Parameter_Integer, 0 ),   --  : ddaprghd (Integer)
           400 => ( Parameter_Integer, 0 ),   --  : ddaprgsp (Integer)
           401 => ( Parameter_Integer, 0 ),   --  : ddatrehd (Integer)
           402 => ( Parameter_Integer, 0 ),   --  : ddatresp (Integer)
           403 => ( Parameter_Integer, 0 ),   --  : ddatrphd (Integer)
           404 => ( Parameter_Integer, 0 ),   --  : ddatrpsp (Integer)
           405 => ( Parameter_Integer, 0 ),   --  : defrpnhd (Integer)
           406 => ( Parameter_Integer, 0 ),   --  : defrpnsp (Integer)
           407 => ( Parameter_Integer, 0 ),   --  : dependhd (Integer)
           408 => ( Parameter_Integer, 0 ),   --  : dependsp (Integer)
           409 => ( Parameter_Integer, 0 ),   --  : disacahd (Integer)
           410 => ( Parameter_Integer, 0 ),   --  : disacasp (Integer)
           411 => ( Parameter_Integer, 0 ),   --  : qpiphd (Integer)
           412 => ( Parameter_Integer, 0 ),   --  : qpipsp (Integer)
           413 => ( Parameter_Integer, 0 ),   --  : qdlahd (Integer)
           414 => ( Parameter_Integer, 0 ),   --  : qdlasp (Integer)
           415 => ( Parameter_Integer, 0 ),   --  : qaahd (Integer)
           416 => ( Parameter_Integer, 0 ),   --  : qaasp (Integer)
           417 => ( Parameter_Integer, 0 ),   --  : qsdahd (Integer)
           418 => ( Parameter_Integer, 0 ),   --  : qsdasp (Integer)
           419 => ( Parameter_Integer, 0 ),   --  : qibhd (Integer)
           420 => ( Parameter_Integer, 0 ),   --  : qibsp (Integer)
           421 => ( Parameter_Integer, 0 ),   --  : qiidbhd (Integer)
           422 => ( Parameter_Integer, 0 ),   --  : qiidbsp (Integer)
           423 => ( Parameter_Integer, 0 ),   --  : discoahd (Integer)
           424 => ( Parameter_Integer, 0 ),   --  : discoasp (Integer)
           425 => ( Parameter_Integer, 0 ),   --  : disd01hd (Integer)
           426 => ( Parameter_Integer, 0 ),   --  : disd01sp (Integer)
           427 => ( Parameter_Integer, 0 ),   --  : disd02hd (Integer)
           428 => ( Parameter_Integer, 0 ),   --  : disd02sp (Integer)
           429 => ( Parameter_Integer, 0 ),   --  : disd03hd (Integer)
           430 => ( Parameter_Integer, 0 ),   --  : disd03sp (Integer)
           431 => ( Parameter_Integer, 0 ),   --  : disd04hd (Integer)
           432 => ( Parameter_Integer, 0 ),   --  : disd04sp (Integer)
           433 => ( Parameter_Integer, 0 ),   --  : disd05hd (Integer)
           434 => ( Parameter_Integer, 0 ),   --  : disd05sp (Integer)
           435 => ( Parameter_Integer, 0 ),   --  : disd06hd (Integer)
           436 => ( Parameter_Integer, 0 ),   --  : disd06sp (Integer)
           437 => ( Parameter_Integer, 0 ),   --  : disd07hd (Integer)
           438 => ( Parameter_Integer, 0 ),   --  : disd07sp (Integer)
           439 => ( Parameter_Integer, 0 ),   --  : disd08hd (Integer)
           440 => ( Parameter_Integer, 0 ),   --  : disd08sp (Integer)
           441 => ( Parameter_Integer, 0 ),   --  : disd09hd (Integer)
           442 => ( Parameter_Integer, 0 ),   --  : disd09sp (Integer)
           443 => ( Parameter_Integer, 0 ),   --  : disd10hd (Integer)
           444 => ( Parameter_Integer, 0 ),   --  : disd10sp (Integer)
           445 => ( Parameter_Integer, 0 ),   --  : disdifhd (Integer)
           446 => ( Parameter_Integer, 0 ),   --  : disdifsp (Integer)
           447 => ( Parameter_Integer, 0 ),   --  : dlachd (Integer)
           448 => ( Parameter_Integer, 0 ),   --  : dlacsp (Integer)
           449 => ( Parameter_Integer, 0 ),   --  : dlamhd (Integer)
           450 => ( Parameter_Integer, 0 ),   --  : dlamsp (Integer)
           451 => ( Parameter_Integer, 0 ),   --  : dlshd (Integer)
           452 => ( Parameter_Integer, 0 ),   --  : dlssp (Integer)
           453 => ( Parameter_Float, 0.0 ),   --  : dlsamthd (Amount)
           454 => ( Parameter_Float, 0.0 ),   --  : dlsamtsp (Amount)
           455 => ( Parameter_Integer, 0 ),   --  : pdlshd (Integer)
           456 => ( Parameter_Integer, 0 ),   --  : pdlssp (Integer)
           457 => ( Parameter_Integer, 0 ),   --  : dlsvalhd (Integer)
           458 => ( Parameter_Integer, 0 ),   --  : dlsvalsp (Integer)
           459 => ( Parameter_Integer, 0 ),   --  : dobhd (Integer)
           460 => ( Parameter_Integer, 0 ),   --  : dobsp (Integer)
           461 => ( Parameter_Integer, 0 ),   --  : h3qualhd (Integer)
           462 => ( Parameter_Integer, 0 ),   --  : h3qualsp (Integer)
           463 => ( Parameter_Integer, 0 ),   --  : dvil3ahd (Integer)
           464 => ( Parameter_Integer, 0 ),   --  : dvil3asp (Integer)
           465 => ( Parameter_Integer, 0 ),   --  : dvil4ahd (Integer)
           466 => ( Parameter_Integer, 0 ),   --  : dvil4asp (Integer)
           467 => ( Parameter_Integer, 0 ),   --  : dvjb12hd (Integer)
           468 => ( Parameter_Integer, 0 ),   --  : dvjb12sp (Integer)
           469 => ( Parameter_Integer, 0 ),   --  : dvmarhd (Integer)
           470 => ( Parameter_Integer, 0 ),   --  : dvmarsp (Integer)
           471 => ( Parameter_Integer, 0 ),   --  : edl1ahd (Integer)
           472 => ( Parameter_Integer, 0 ),   --  : edl1asp (Integer)
           473 => ( Parameter_Integer, 0 ),   --  : pedl1ahd (Integer)
           474 => ( Parameter_Integer, 0 ),   --  : pedl1asp (Integer)
           475 => ( Parameter_Integer, 0 ),   --  : edl1obhd (Integer)
           476 => ( Parameter_Integer, 0 ),   --  : edl1obsp (Integer)
           477 => ( Parameter_Integer, 0 ),   --  : edl2ahd (Integer)
           478 => ( Parameter_Integer, 0 ),   --  : edl2asp (Integer)
           479 => ( Parameter_Integer, 0 ),   --  : pedl2ahd (Integer)
           480 => ( Parameter_Integer, 0 ),   --  : pedl2asp (Integer)
           481 => ( Parameter_Integer, 0 ),   --  : edl2obhd (Integer)
           482 => ( Parameter_Integer, 0 ),   --  : edl2obsp (Integer)
           483 => ( Parameter_Integer, 0 ),   --  : edatthd (Integer)
           484 => ( Parameter_Integer, 0 ),   --  : edattsp (Integer)
           485 => ( Parameter_Integer, 0 ),   --  : edhrhd (Integer)
           486 => ( Parameter_Integer, 0 ),   --  : edhrsp (Integer)
           487 => ( Parameter_Integer, 0 ),   --  : edtyphd (Integer)
           488 => ( Parameter_Integer, 0 ),   --  : edtypsp (Integer)
           489 => ( Parameter_Integer, 0 ),   --  : empconhd (Integer)
           490 => ( Parameter_Integer, 0 ),   --  : empconsp (Integer)
           491 => ( Parameter_Float, 0.0 ),   --  : empocchd (Amount)
           492 => ( Parameter_Float, 0.0 ),   --  : empoccsp (Amount)
           493 => ( Parameter_Integer, 0 ),   --  : empshd (Integer)
           494 => ( Parameter_Integer, 0 ),   --  : empssp (Integer)
           495 => ( Parameter_Integer, 0 ),   --  : empbhd (Integer)
           496 => ( Parameter_Integer, 0 ),   --  : empbsp (Integer)
           497 => ( Parameter_Integer, 0 ),   --  : empchd (Integer)
           498 => ( Parameter_Integer, 0 ),   --  : empcsp (Integer)
           499 => ( Parameter_Integer, 0 ),   --  : empilohd (Integer)
           500 => ( Parameter_Integer, 0 ),   --  : empilosp (Integer)
           501 => ( Parameter_Integer, 0 ),   --  : es2000hd (Integer)
           502 => ( Parameter_Integer, 0 ),   --  : es2000sp (Integer)
           503 => ( Parameter_Integer, 0 ),   --  : ethgr3hd (Integer)
           504 => ( Parameter_Integer, 0 ),   --  : ethgr3sp (Integer)
           505 => ( Parameter_Integer, 0 ),   --  : ethgpshd (Integer)
           506 => ( Parameter_Integer, 0 ),   --  : ethgpssp (Integer)
           507 => ( Parameter_Integer, 0 ),   --  : etngrphd (Integer)
           508 => ( Parameter_Integer, 0 ),   --  : etngrpsp (Integer)
           509 => ( Parameter_Float, 0.0 ),   --  : eualamhd (Amount)
           510 => ( Parameter_Float, 0.0 ),   --  : eualamsp (Amount)
           511 => ( Parameter_Integer, 0 ),   --  : eualmnhd (Integer)
           512 => ( Parameter_Integer, 0 ),   --  : eualmnsp (Integer)
           513 => ( Parameter_Integer, 0 ),   --  : peualihd (Integer)
           514 => ( Parameter_Integer, 0 ),   --  : peualisp (Integer)
           515 => ( Parameter_Integer, 0 ),   --  : euetyphd (Integer)
           516 => ( Parameter_Integer, 0 ),   --  : euetypsp (Integer)
           517 => ( Parameter_Integer, 0 ),   --  : everwkhd (Integer)
           518 => ( Parameter_Integer, 0 ),   --  : everwksp (Integer)
           519 => ( Parameter_Integer, 0 ),   --  : ehbct1hd (Integer)
           520 => ( Parameter_Integer, 0 ),   --  : ehbct1sp (Integer)
           521 => ( Parameter_Integer, 0 ),   --  : fllwphd (Integer)
           522 => ( Parameter_Integer, 0 ),   --  : fllwpsp (Integer)
           523 => ( Parameter_Integer, 0 ),   --  : ftedhd (Integer)
           524 => ( Parameter_Integer, 0 ),   --  : ftedsp (Integer)
           525 => ( Parameter_Integer, 0 ),   --  : ftwkyrhd (Integer)
           526 => ( Parameter_Integer, 0 ),   --  : ftwkyrsp (Integer)
           527 => ( Parameter_Integer, 0 ),   --  : gebacthd (Integer)
           528 => ( Parameter_Integer, 0 ),   --  : gebactsp (Integer)
           529 => ( Parameter_Integer, 0 ),   --  : giltcthd (Integer)
           530 => ( Parameter_Integer, 0 ),   --  : giltctsp (Integer)
           531 => ( Parameter_Integer, 0 ),   --  : gpispchd (Integer)
           532 => ( Parameter_Integer, 0 ),   --  : gpispcsp (Integer)
           533 => ( Parameter_Integer, 0 ),   --  : gpjesahd (Integer)
           534 => ( Parameter_Integer, 0 ),   --  : gpjesasp (Integer)
           535 => ( Parameter_Integer, 0 ),   --  : gpuchd (Integer)
           536 => ( Parameter_Integer, 0 ),   --  : gpucsp (Integer)
           537 => ( Parameter_Integer, 0 ),   --  : granthd (Integer)
           538 => ( Parameter_Integer, 0 ),   --  : grantsp (Integer)
           539 => ( Parameter_Integer, 0 ),   --  : gt1valhd (Integer)
           540 => ( Parameter_Float, 0.0 ),   --  : gt1valsp (Amount)
           541 => ( Parameter_Integer, 0 ),   --  : gt2valhd (Integer)
           542 => ( Parameter_Integer, 0 ),   --  : gt2valsp (Integer)
           543 => ( Parameter_Integer, 0 ),   --  : gt1dirhd (Integer)
           544 => ( Parameter_Float, 0.0 ),   --  : gt1dirsp (Amount)
           545 => ( Parameter_Integer, 0 ),   --  : gt2dirhd (Integer)
           546 => ( Parameter_Integer, 0 ),   --  : gt2dirsp (Integer)
           547 => ( Parameter_Integer, 0 ),   --  : grtnumhd (Integer)
           548 => ( Parameter_Integer, 0 ),   --  : grtnumsp (Integer)
           549 => ( Parameter_Integer, 0 ),   --  : gt1scehd (Integer)
           550 => ( Parameter_Integer, 0 ),   --  : gt1scesp (Integer)
           551 => ( Parameter_Integer, 0 ),   --  : gt2scehd (Integer)
           552 => ( Parameter_Integer, 0 ),   --  : gt2scesp (Integer)
           553 => ( Parameter_Integer, 0 ),   --  : gt1oshd (Integer)
           554 => ( Parameter_Integer, 0 ),   --  : gt1ossp (Integer)
           555 => ( Parameter_Integer, 0 ),   --  : gt2oshd (Integer)
           556 => ( Parameter_Integer, 0 ),   --  : gt2ossp (Integer)
           557 => ( Parameter_Integer, 0 ),   --  : gtahd (Integer)
           558 => ( Parameter_Integer, 0 ),   --  : gtasp (Integer)
           559 => ( Parameter_Integer, 0 ),   --  : healthhd (Integer)
           560 => ( Parameter_Integer, 0 ),   --  : healthsp (Integer)
           561 => ( Parameter_Float, 0.0 ),   --  : heartvhd (Amount)
           562 => ( Parameter_Float, 0.0 ),   --  : heartvsp (Amount)
           563 => ( Parameter_Integer, 0 ),   --  : heatadhd (Integer)
           564 => ( Parameter_Integer, 0 ),   --  : heatadsp (Integer)
           565 => ( Parameter_Integer, 0 ),   --  : hholdrhd (Integer)
           566 => ( Parameter_Integer, 0 ),   --  : hholdrsp (Integer)
           567 => ( Parameter_Integer, 0 ),   --  : hourabhd (Integer)
           568 => ( Parameter_Integer, 0 ),   --  : hourabsp (Integer)
           569 => ( Parameter_Integer, 0 ),   --  : hourahhd (Integer)
           570 => ( Parameter_Integer, 0 ),   --  : hourahsp (Integer)
           571 => ( Parameter_Float, 0.0 ),   --  : hrcarehd (Amount)
           572 => ( Parameter_Float, 0.0 ),   --  : hrcaresp (Amount)
           573 => ( Parameter_Integer, 0 ),   --  : hourcbhd (Integer)
           574 => ( Parameter_Integer, 0 ),   --  : hourcbsp (Integer)
           575 => ( Parameter_Integer, 0 ),   --  : hourchhd (Integer)
           576 => ( Parameter_Integer, 0 ),   --  : hourchsp (Integer)
           577 => ( Parameter_Integer, 0 ),   --  : hourclhd (Integer)
           578 => ( Parameter_Integer, 0 ),   --  : hourclsp (Integer)
           579 => ( Parameter_Integer, 0 ),   --  : hourfrhd (Integer)
           580 => ( Parameter_Integer, 0 ),   --  : hourfrsp (Integer)
           581 => ( Parameter_Integer, 0 ),   --  : hourothd (Integer)
           582 => ( Parameter_Integer, 0 ),   --  : hourotsp (Integer)
           583 => ( Parameter_Integer, 0 ),   --  : hourrehd (Integer)
           584 => ( Parameter_Integer, 0 ),   --  : hourresp (Integer)
           585 => ( Parameter_Integer, 0 ),   --  : hourtthd (Integer)
           586 => ( Parameter_Integer, 0 ),   --  : hourttsp (Integer)
           587 => ( Parameter_Integer, 0 ),   --  : hpersohd (Integer)
           588 => ( Parameter_Integer, 0 ),   --  : hpersosp (Integer)
           589 => ( Parameter_Integer, 0 ),   --  : hrpidhd (Integer)
           590 => ( Parameter_Integer, 0 ),   --  : hrpidsp (Integer)
           591 => ( Parameter_Integer, 0 ),   --  : hsvperhd (Integer)
           592 => ( Parameter_Integer, 0 ),   --  : hsvpersp (Integer)
           593 => ( Parameter_Integer, 0 ),   --  : agegp2hd (Integer)
           594 => ( Parameter_Integer, 0 ),   --  : agegp2sp (Integer)
           595 => ( Parameter_Integer, 0 ),   --  : agegphd (Integer)
           596 => ( Parameter_Integer, 0 ),   --  : agegpsp (Integer)
           597 => ( Parameter_Integer, 0 ),   --  : quninshd (Integer)
           598 => ( Parameter_Integer, 0 ),   --  : quninssp (Integer)
           599 => ( Parameter_Integer, 0 ),   --  : qtubenhd (Integer)
           600 => ( Parameter_Integer, 0 ),   --  : qtubensp (Integer)
           601 => ( Parameter_Integer, 0 ),   --  : qsicinhd (Integer)
           602 => ( Parameter_Integer, 0 ),   --  : qsicinsp (Integer)
           603 => ( Parameter_Integer, 0 ),   --  : qaccinhd (Integer)
           604 => ( Parameter_Integer, 0 ),   --  : qaccinsp (Integer)
           605 => ( Parameter_Integer, 0 ),   --  : qpehinhd (Integer)
           606 => ( Parameter_Integer, 0 ),   --  : qpehinsp (Integer)
           607 => ( Parameter_Integer, 0 ),   --  : qhosinhd (Integer)
           608 => ( Parameter_Integer, 0 ),   --  : qhosinsp (Integer)
           609 => ( Parameter_Integer, 0 ),   --  : qfsbenhd (Integer)
           610 => ( Parameter_Integer, 0 ),   --  : qfsbensp (Integer)
           611 => ( Parameter_Integer, 0 ),   --  : qcichd (Integer)
           612 => ( Parameter_Integer, 0 ),   --  : qcicsp (Integer)
           613 => ( Parameter_Integer, 0 ),   --  : qotbenhd (Integer)
           614 => ( Parameter_Integer, 0 ),   --  : qotbensp (Integer)
           615 => ( Parameter_Integer, 0 ),   --  : incdurhd (Integer)
           616 => ( Parameter_Integer, 0 ),   --  : incdursp (Integer)
           617 => ( Parameter_Integer, 0 ),   --  : incsehd (Integer)
           618 => ( Parameter_Integer, 0 ),   --  : incsesp (Integer)
           619 => ( Parameter_Integer, 0 ),   --  : indinchd (Integer)
           620 => ( Parameter_Integer, 0 ),   --  : indincsp (Integer)
           621 => ( Parameter_Integer, 0 ),   --  : indisbhd (Integer)
           622 => ( Parameter_Integer, 0 ),   --  : indisbsp (Integer)
           623 => ( Parameter_Integer, 0 ),   --  : inearnhd (Integer)
           624 => ( Parameter_Integer, 0 ),   --  : inearnsp (Integer)
           625 => ( Parameter_Integer, 0 ),   --  : ininvhd (Integer)
           626 => ( Parameter_Integer, 0 ),   --  : ininvsp (Integer)
           627 => ( Parameter_Integer, 0 ),   --  : inirbehd (Integer)
           628 => ( Parameter_Integer, 0 ),   --  : inirbesp (Integer)
           629 => ( Parameter_Integer, 0 ),   --  : injlonhd (Integer)
           630 => ( Parameter_Integer, 0 ),   --  : injlonsp (Integer)
           631 => ( Parameter_Integer, 0 ),   --  : injhrshd (Integer)
           632 => ( Parameter_Integer, 0 ),   --  : injhrssp (Integer)
           633 => ( Parameter_Integer, 0 ),   --  : innirbhd (Integer)
           634 => ( Parameter_Integer, 0 ),   --  : innirbsp (Integer)
           635 => ( Parameter_Integer, 0 ),   --  : inothbhd (Integer)
           636 => ( Parameter_Integer, 0 ),   --  : inothbsp (Integer)
           637 => ( Parameter_Integer, 0 ),   --  : inpenihd (Integer)
           638 => ( Parameter_Integer, 0 ),   --  : inpenisp (Integer)
           639 => ( Parameter_Integer, 0 ),   --  : inrinchd (Integer)
           640 => ( Parameter_Integer, 0 ),   --  : inrincsp (Integer)
           641 => ( Parameter_Integer, 0 ),   --  : inrpinhd (Integer)
           642 => ( Parameter_Integer, 0 ),   --  : inrpinsp (Integer)
           643 => ( Parameter_Float, 0.0 ),   --  : itvlichd (Amount)
           644 => ( Parameter_Integer, 0 ),   --  : itvlicsp (Integer)
           645 => ( Parameter_Integer, 0 ),   --  : intxcdhd (Integer)
           646 => ( Parameter_Integer, 0 ),   --  : intxcdsp (Integer)
           647 => ( Parameter_Integer, 0 ),   --  : investhd (Integer)
           648 => ( Parameter_Integer, 0 ),   --  : investsp (Integer)
           649 => ( Parameter_Integer, 0 ),   --  : isa1tyhd (Integer)
           650 => ( Parameter_Integer, 0 ),   --  : isa1tysp (Integer)
           651 => ( Parameter_Integer, 0 ),   --  : isa2tyhd (Integer)
           652 => ( Parameter_Integer, 0 ),   --  : isa2tysp (Integer)
           653 => ( Parameter_Integer, 0 ),   --  : isactihd (Integer)
           654 => ( Parameter_Integer, 0 ),   --  : isactisp (Integer)
           655 => ( Parameter_Integer, 0 ),   --  : jobawahd (Integer)
           656 => ( Parameter_Integer, 0 ),   --  : jobawasp (Integer)
           657 => ( Parameter_Integer, 0 ),   --  : jobbyrhd (Integer)
           658 => ( Parameter_Integer, 0 ),   --  : jobbyrsp (Integer)
           659 => ( Parameter_Integer, 0 ),   --  : qcbhd (Integer)
           660 => ( Parameter_Integer, 0 ),   --  : qcbsp (Integer)
           661 => ( Parameter_Integer, 0 ),   --  : qgahd (Integer)
           662 => ( Parameter_Integer, 0 ),   --  : qgasp (Integer)
           663 => ( Parameter_Integer, 0 ),   --  : qmahd (Integer)
           664 => ( Parameter_Integer, 0 ),   --  : qmasp (Integer)
           665 => ( Parameter_Integer, 0 ),   --  : lareghd (Integer)
           666 => ( Parameter_Integer, 0 ),   --  : laregsp (Integer)
           667 => ( Parameter_Integer, 0 ),   --  : likewkhd (Integer)
           668 => ( Parameter_Integer, 0 ),   --  : likewksp (Integer)
           669 => ( Parameter_Integer, 0 ),   --  : limitlhd (Integer)
           670 => ( Parameter_Integer, 0 ),   --  : limitlsp (Integer)
           671 => ( Parameter_Integer, 0 ),   --  : lktimehd (Integer)
           672 => ( Parameter_Integer, 0 ),   --  : lktimesp (Integer)
           673 => ( Parameter_Integer, 0 ),   --  : lktrnhd (Integer)
           674 => ( Parameter_Integer, 0 ),   --  : lktrnsp (Integer)
           675 => ( Parameter_Integer, 0 ),   --  : lkworkhd (Integer)
           676 => ( Parameter_Integer, 0 ),   --  : lkworksp (Integer)
           677 => ( Parameter_Integer, 0 ),   --  : loanhd (Integer)
           678 => ( Parameter_Integer, 0 ),   --  : loansp (Integer)
           679 => ( Parameter_Integer, 0 ),   --  : loannuhd (Integer)
           680 => ( Parameter_Integer, 0 ),   --  : loannusp (Integer)
           681 => ( Parameter_Integer, 0 ),   --  : lstwkmhd (Integer)
           682 => ( Parameter_Integer, 0 ),   --  : lstwkmsp (Integer)
           683 => ( Parameter_Integer, 0 ),   --  : lstwkyhd (Integer)
           684 => ( Parameter_Integer, 0 ),   --  : lstwkysp (Integer)
           685 => ( Parameter_Integer, 0 ),   --  : wkswkdhd (Integer)
           686 => ( Parameter_Integer, 0 ),   --  : wkswkdsp (Integer)
           687 => ( Parameter_Integer, 0 ),   --  : marithd (Integer)
           688 => ( Parameter_Integer, 0 ),   --  : maritsp (Integer)
           689 => ( Parameter_Float, 0.0 ),   --  : mr1hd (Amount)
           690 => ( Parameter_Integer, 0 ),   --  : mr1sp (Integer)
           691 => ( Parameter_Float, 0.0 ),   --  : mr2hd (Amount)
           692 => ( Parameter_Float, 0.0 ),   --  : mr2sp (Amount)
           693 => ( Parameter_Integer, 0 ),   --  : mntar1hd (Integer)
           694 => ( Parameter_Integer, 0 ),   --  : mntar1sp (Integer)
           695 => ( Parameter_Integer, 0 ),   --  : mntar2hd (Integer)
           696 => ( Parameter_Integer, 0 ),   --  : mntar2sp (Integer)
           697 => ( Parameter_Integer, 0 ),   --  : mntar3hd (Integer)
           698 => ( Parameter_Integer, 0 ),   --  : mntar3sp (Integer)
           699 => ( Parameter_Integer, 0 ),   --  : mntar4hd (Integer)
           700 => ( Parameter_Integer, 0 ),   --  : mntar4sp (Integer)
           701 => ( Parameter_Integer, 0 ),   --  : mntar5hd (Integer)
           702 => ( Parameter_Integer, 0 ),   --  : mntar5sp (Integer)
           703 => ( Parameter_Integer, 0 ),   --  : mntnc1hd (Integer)
           704 => ( Parameter_Integer, 0 ),   --  : mntnc1sp (Integer)
           705 => ( Parameter_Integer, 0 ),   --  : mntnc2hd (Integer)
           706 => ( Parameter_Integer, 0 ),   --  : mntnc2sp (Integer)
           707 => ( Parameter_Integer, 0 ),   --  : mntnc3hd (Integer)
           708 => ( Parameter_Integer, 0 ),   --  : mntnc3sp (Integer)
           709 => ( Parameter_Integer, 0 ),   --  : mntnc4hd (Integer)
           710 => ( Parameter_Integer, 0 ),   --  : mntnc4sp (Integer)
           711 => ( Parameter_Integer, 0 ),   --  : mntnc5hd (Integer)
           712 => ( Parameter_Integer, 0 ),   --  : mntnc5sp (Integer)
           713 => ( Parameter_Integer, 0 ),   --  : mntpayhd (Integer)
           714 => ( Parameter_Integer, 0 ),   --  : mntpaysp (Integer)
           715 => ( Parameter_Integer, 0 ),   --  : pmr1hd (Integer)
           716 => ( Parameter_Integer, 0 ),   --  : pmr1sp (Integer)
           717 => ( Parameter_Integer, 0 ),   --  : pmr2hd (Integer)
           718 => ( Parameter_Integer, 0 ),   --  : pmr2sp (Integer)
           719 => ( Parameter_Integer, 0 ),   --  : mntpr1hd (Integer)
           720 => ( Parameter_Integer, 0 ),   --  : mntpr1sp (Integer)
           721 => ( Parameter_Integer, 0 ),   --  : mntpr2hd (Integer)
           722 => ( Parameter_Integer, 0 ),   --  : mntpr2sp (Integer)
           723 => ( Parameter_Integer, 0 ),   --  : mntpr3hd (Integer)
           724 => ( Parameter_Integer, 0 ),   --  : mntpr3sp (Integer)
           725 => ( Parameter_Integer, 0 ),   --  : mr12mhd (Integer)
           726 => ( Parameter_Integer, 0 ),   --  : mr12msp (Integer)
           727 => ( Parameter_Integer, 0 ),   --  : mntt1hd (Integer)
           728 => ( Parameter_Integer, 0 ),   --  : mntt1sp (Integer)
           729 => ( Parameter_Integer, 0 ),   --  : mntt2hd (Integer)
           730 => ( Parameter_Integer, 0 ),   --  : mntt2sp (Integer)
           731 => ( Parameter_Integer, 0 ),   --  : mntt3hd (Integer)
           732 => ( Parameter_Integer, 0 ),   --  : mntt3sp (Integer)
           733 => ( Parameter_Integer, 0 ),   --  : mntus1hd (Integer)
           734 => ( Parameter_Integer, 0 ),   --  : mntus1sp (Integer)
           735 => ( Parameter_Integer, 0 ),   --  : mntus2hd (Integer)
           736 => ( Parameter_Integer, 0 ),   --  : mntus2sp (Integer)
           737 => ( Parameter_Float, 0.0 ),   --  : umr1hd (Amount)
           738 => ( Parameter_Integer, 0 ),   --  : umr1sp (Integer)
           739 => ( Parameter_Float, 0.0 ),   --  : umr2hd (Amount)
           740 => ( Parameter_Integer, 0 ),   --  : umr2sp (Integer)
           741 => ( Parameter_Integer, 0 ),   --  : pumr1hd (Integer)
           742 => ( Parameter_Integer, 0 ),   --  : pumr1sp (Integer)
           743 => ( Parameter_Integer, 0 ),   --  : pumr2hd (Integer)
           744 => ( Parameter_Integer, 0 ),   --  : pumr2sp (Integer)
           745 => ( Parameter_Integer, 0 ),   --  : mntw1hd (Integer)
           746 => ( Parameter_Integer, 0 ),   --  : mntw1sp (Integer)
           747 => ( Parameter_Integer, 0 ),   --  : mntw2hd (Integer)
           748 => ( Parameter_Integer, 0 ),   --  : mntw2sp (Integer)
           749 => ( Parameter_Integer, 0 ),   --  : mntw3hd (Integer)
           750 => ( Parameter_Integer, 0 ),   --  : mntw3sp (Integer)
           751 => ( Parameter_Integer, 0 ),   --  : mntw4hd (Integer)
           752 => ( Parameter_Integer, 0 ),   --  : mntw4sp (Integer)
           753 => ( Parameter_Integer, 0 ),   --  : mntw5hd (Integer)
           754 => ( Parameter_Integer, 0 ),   --  : mntw5sp (Integer)
           755 => ( Parameter_Integer, 0 ),   --  : mshd (Integer)
           756 => ( Parameter_Integer, 0 ),   --  : mssp (Integer)
           757 => ( Parameter_Integer, 0 ),   --  : nanid1hd (Integer)
           758 => ( Parameter_Integer, 0 ),   --  : nanid1sp (Integer)
           759 => ( Parameter_Integer, 0 ),   --  : nanid2hd (Integer)
           760 => ( Parameter_Integer, 0 ),   --  : nanid2sp (Integer)
           761 => ( Parameter_Integer, 0 ),   --  : nanid3hd (Integer)
           762 => ( Parameter_Integer, 0 ),   --  : nanid3sp (Integer)
           763 => ( Parameter_Integer, 0 ),   --  : nanid4hd (Integer)
           764 => ( Parameter_Integer, 0 ),   --  : nanid4sp (Integer)
           765 => ( Parameter_Integer, 0 ),   --  : nanid5hd (Integer)
           766 => ( Parameter_Integer, 0 ),   --  : nanid5sp (Integer)
           767 => ( Parameter_Integer, 0 ),   --  : nanid6hd (Integer)
           768 => ( Parameter_Integer, 0 ),   --  : nanid6sp (Integer)
           769 => ( Parameter_Integer, 0 ),   --  : nitrnhd (Integer)
           770 => ( Parameter_Integer, 0 ),   --  : nitrnsp (Integer)
           771 => ( Parameter_Float, 0.0 ),   --  : niamthd (Amount)
           772 => ( Parameter_Float, 0.0 ),   --  : niamtsp (Amount)
           773 => ( Parameter_Integer, 0 ),   --  : niethghd (Integer)
           774 => ( Parameter_Integer, 0 ),   --  : niethgsp (Integer)
           775 => ( Parameter_Integer, 0 ),   --  : nixhbbhd (Integer)
           776 => ( Parameter_Integer, 0 ),   --  : nixhbbsp (Integer)
           777 => ( Parameter_Integer, 0 ),   --  : ninid1hd (Integer)
           778 => ( Parameter_Integer, 0 ),   --  : ninid1sp (Integer)
           779 => ( Parameter_Integer, 0 ),   --  : ninid2hd (Integer)
           780 => ( Parameter_Integer, 0 ),   --  : ninid2sp (Integer)
           781 => ( Parameter_Integer, 0 ),   --  : ninid3hd (Integer)
           782 => ( Parameter_Integer, 0 ),   --  : ninid3sp (Integer)
           783 => ( Parameter_Integer, 0 ),   --  : ninid4hd (Integer)
           784 => ( Parameter_Integer, 0 ),   --  : ninid4sp (Integer)
           785 => ( Parameter_Integer, 0 ),   --  : ninid5hd (Integer)
           786 => ( Parameter_Integer, 0 ),   --  : ninid5sp (Integer)
           787 => ( Parameter_Integer, 0 ),   --  : ninid6hd (Integer)
           788 => ( Parameter_Integer, 0 ),   --  : ninid6sp (Integer)
           789 => ( Parameter_Integer, 0 ),   --  : ninid7hd (Integer)
           790 => ( Parameter_Integer, 0 ),   --  : ninid7sp (Integer)
           791 => ( Parameter_Integer, 0 ),   --  : nincs2hd (Integer)
           792 => ( Parameter_Integer, 0 ),   --  : nincs2sp (Integer)
           793 => ( Parameter_Integer, 0 ),   --  : nininchd (Integer)
           794 => ( Parameter_Integer, 0 ),   --  : ninincsp (Integer)
           795 => ( Parameter_Integer, 0 ),   --  : ninearhd (Integer)
           796 => ( Parameter_Integer, 0 ),   --  : ninearsp (Integer)
           797 => ( Parameter_Integer, 0 ),   --  : nininvhd (Integer)
           798 => ( Parameter_Integer, 0 ),   --  : nininvsp (Integer)
           799 => ( Parameter_Integer, 0 ),   --  : ninpenhd (Integer)
           800 => ( Parameter_Integer, 0 ),   --  : ninpensp (Integer)
           801 => ( Parameter_Integer, 0 ),   --  : ninrinhd (Integer)
           802 => ( Parameter_Integer, 0 ),   --  : ninrinsp (Integer)
           803 => ( Parameter_Integer, 0 ),   --  : ninseihd (Integer)
           804 => ( Parameter_Integer, 0 ),   --  : ninseisp (Integer)
           805 => ( Parameter_Integer, 0 ),   --  : pniamthd (Integer)
           806 => ( Parameter_Integer, 0 ),   --  : pniamtsp (Integer)
           807 => ( Parameter_Integer, 0 ),   --  : nireghd (Integer)
           808 => ( Parameter_Integer, 0 ),   --  : niregsp (Integer)
           809 => ( Parameter_Integer, 0 ),   --  : nirelghd (Integer)
           810 => ( Parameter_Integer, 0 ),   --  : nirelgsp (Integer)
           811 => ( Parameter_Integer, 0 ),   --  : nolk1hd (Integer)
           812 => ( Parameter_Integer, 0 ),   --  : nolk1sp (Integer)
           813 => ( Parameter_Integer, 0 ),   --  : nolk2hd (Integer)
           814 => ( Parameter_Integer, 0 ),   --  : nolk2sp (Integer)
           815 => ( Parameter_Integer, 0 ),   --  : nolk3hd (Integer)
           816 => ( Parameter_Integer, 0 ),   --  : nolk3sp (Integer)
           817 => ( Parameter_Integer, 0 ),   --  : nowanthd (Integer)
           818 => ( Parameter_Integer, 0 ),   --  : nowantsp (Integer)
           819 => ( Parameter_Float, 0.0 ),   --  : nssechd (Amount)
           820 => ( Parameter_Float, 0.0 ),   --  : nssecsp (Amount)
           821 => ( Parameter_Integer, 0 ),   --  : numjobhd (Integer)
           822 => ( Parameter_Integer, 0 ),   --  : numjobsp (Integer)
           823 => ( Parameter_Integer, 0 ),   --  : numj2hd (Integer)
           824 => ( Parameter_Integer, 0 ),   --  : numj2sp (Integer)
           825 => ( Parameter_Integer, 0 ),   --  : ocnumhd (Integer)
           826 => ( Parameter_Integer, 0 ),   --  : ocnumsp (Integer)
           827 => ( Parameter_Integer, 0 ),   --  : oddjobhd (Integer)
           828 => ( Parameter_Integer, 0 ),   --  : oddjobsp (Integer)
           829 => ( Parameter_Integer, 0 ),   --  : oldstdhd (Integer)
           830 => ( Parameter_Integer, 0 ),   --  : oldstdsp (Integer)
           831 => ( Parameter_Integer, 0 ),   --  : oabparhd (Integer)
           832 => ( Parameter_Integer, 0 ),   --  : oabparsp (Integer)
           833 => ( Parameter_Float, 0.0 ),   --  : otamthd (Amount)
           834 => ( Parameter_Float, 0.0 ),   --  : otamtsp (Amount)
           835 => ( Parameter_Float, 0.0 ),   --  : otpamthd (Amount)
           836 => ( Parameter_Integer, 0 ),   --  : otpamtsp (Integer)
           837 => ( Parameter_Integer, 0 ),   --  : otappdhd (Integer)
           838 => ( Parameter_Integer, 0 ),   --  : otappdsp (Integer)
           839 => ( Parameter_Integer, 0 ),   --  : qehbtbhd (Integer)
           840 => ( Parameter_Integer, 0 ),   --  : qehbtbsp (Integer)
           841 => ( Parameter_Integer, 0 ),   --  : qwidplhd (Integer)
           842 => ( Parameter_Integer, 0 ),   --  : qwidplsp (Integer)
           843 => ( Parameter_Integer, 0 ),   --  : qinwkchd (Integer)
           844 => ( Parameter_Integer, 0 ),   --  : qinwkcsp (Integer)
           845 => ( Parameter_Integer, 0 ),   --  : qrtwkchd (Integer)
           846 => ( Parameter_Integer, 0 ),   --  : qrtwkcsp (Integer)
           847 => ( Parameter_Integer, 0 ),   --  : qothbehd (Integer)
           848 => ( Parameter_Integer, 0 ),   --  : qothbesp (Integer)
           849 => ( Parameter_Integer, 0 ),   --  : othtaxhd (Integer)
           850 => ( Parameter_Integer, 0 ),   --  : othtaxsp (Integer)
           851 => ( Parameter_Integer, 0 ),   --  : otinvahd (Integer)
           852 => ( Parameter_Integer, 0 ),   --  : otinvasp (Integer)
           853 => ( Parameter_Float, 0.0 ),   --  : pareamhd (Amount)
           854 => ( Parameter_Float, 0.0 ),   --  : pareamsp (Amount)
           855 => ( Parameter_Integer, 0 ),   --  : qpchd (Integer)
           856 => ( Parameter_Integer, 0 ),   --  : qpcsp (Integer)
           857 => ( Parameter_Integer, 0 ),   --  : qrphd (Integer)
           858 => ( Parameter_Integer, 0 ),   --  : qrpsp (Integer)
           859 => ( Parameter_Integer, 0 ),   --  : qbbhd (Integer)
           860 => ( Parameter_Integer, 0 ),   --  : qbbsp (Integer)
           861 => ( Parameter_Integer, 0 ),   --  : qafcshd (Integer)
           862 => ( Parameter_Integer, 0 ),   --  : qafcssp (Integer)
           863 => ( Parameter_Integer, 0 ),   --  : qwwphd (Integer)
           864 => ( Parameter_Integer, 0 ),   --  : qwwpsp (Integer)
           865 => ( Parameter_Integer, 0 ),   --  : penflghd (Integer)
           866 => ( Parameter_Integer, 0 ),   --  : penflgsp (Integer)
           867 => ( Parameter_Integer, 0 ),   --  : penwl1hd (Integer)
           868 => ( Parameter_Integer, 0 ),   --  : penwl1sp (Integer)
           869 => ( Parameter_Integer, 0 ),   --  : penwl2hd (Integer)
           870 => ( Parameter_Integer, 0 ),   --  : penwl2sp (Integer)
           871 => ( Parameter_Integer, 0 ),   --  : penwl3hd (Integer)
           872 => ( Parameter_Integer, 0 ),   --  : penwl3sp (Integer)
           873 => ( Parameter_Integer, 0 ),   --  : penwl4hd (Integer)
           874 => ( Parameter_Integer, 0 ),   --  : penwl4sp (Integer)
           875 => ( Parameter_Integer, 0 ),   --  : penwl5hd (Integer)
           876 => ( Parameter_Integer, 0 ),   --  : penwl5sp (Integer)
           877 => ( Parameter_Integer, 0 ),   --  : penwl6hd (Integer)
           878 => ( Parameter_Integer, 0 ),   --  : penwl6sp (Integer)
           879 => ( Parameter_Integer, 0 ),   --  : pepscthd (Integer)
           880 => ( Parameter_Integer, 0 ),   --  : pepsctsp (Integer)
           881 => ( Parameter_Integer, 0 ),   --  : personhd (Integer)
           882 => ( Parameter_Integer, 0 ),   --  : personsp (Integer)
           883 => ( Parameter_Integer, 0 ),   --  : qpipdhd (Integer)
           884 => ( Parameter_Integer, 0 ),   --  : qpipdsp (Integer)
           885 => ( Parameter_Integer, 0 ),   --  : qpipmhd (Integer)
           886 => ( Parameter_Integer, 0 ),   --  : qpipmsp (Integer)
           887 => ( Parameter_Integer, 0 ),   --  : poaccthd (Integer)
           888 => ( Parameter_Integer, 0 ),   --  : poacctsp (Integer)
           889 => ( Parameter_Integer, 0 ),   --  : pocardhd (Integer)
           890 => ( Parameter_Integer, 0 ),   --  : pocardsp (Integer)
           891 => ( Parameter_Integer, 0 ),   --  : ppnumchd (Integer)
           892 => ( Parameter_Integer, 0 ),   --  : ppnumcsp (Integer)
           893 => ( Parameter_Float, 0.0 ),   --  : proptxhd (Amount)
           894 => ( Parameter_Float, 0.0 ),   --  : proptxsp (Amount)
           895 => ( Parameter_Integer, 0 ),   --  : ptwkyrhd (Integer)
           896 => ( Parameter_Integer, 0 ),   --  : ptwkyrsp (Integer)
           897 => ( Parameter_Integer, 0 ),   --  : relp1hd (Integer)
           898 => ( Parameter_Integer, 0 ),   --  : relp1sp (Integer)
           899 => ( Parameter_Integer, 0 ),   --  : relp2hd (Integer)
           900 => ( Parameter_Integer, 0 ),   --  : relp2sp (Integer)
           901 => ( Parameter_Integer, 0 ),   --  : relp3hd (Integer)
           902 => ( Parameter_Integer, 0 ),   --  : relp3sp (Integer)
           903 => ( Parameter_Integer, 0 ),   --  : relp4hd (Integer)
           904 => ( Parameter_Integer, 0 ),   --  : relp4sp (Integer)
           905 => ( Parameter_Integer, 0 ),   --  : relp5hd (Integer)
           906 => ( Parameter_Integer, 0 ),   --  : relp5sp (Integer)
           907 => ( Parameter_Integer, 0 ),   --  : relp6hd (Integer)
           908 => ( Parameter_Integer, 0 ),   --  : relp6sp (Integer)
           909 => ( Parameter_Integer, 0 ),   --  : relp7hd (Integer)
           910 => ( Parameter_Integer, 0 ),   --  : relp7sp (Integer)
           911 => ( Parameter_Integer, 0 ),   --  : relp8hd (Integer)
           912 => ( Parameter_Integer, 0 ),   --  : relp8sp (Integer)
           913 => ( Parameter_Integer, 0 ),   --  : relp9hd (Integer)
           914 => ( Parameter_Integer, 0 ),   --  : relp9sp (Integer)
           915 => ( Parameter_Integer, 0 ),   --  : relp10hd (Integer)
           916 => ( Parameter_Integer, 0 ),   --  : relp10sp (Integer)
           917 => ( Parameter_Integer, 0 ),   --  : relp11hd (Integer)
           918 => ( Parameter_Integer, 0 ),   --  : relp11sp (Integer)
           919 => ( Parameter_Integer, 0 ),   --  : relp12hd (Integer)
           920 => ( Parameter_Integer, 0 ),   --  : relp12sp (Integer)
           921 => ( Parameter_Integer, 0 ),   --  : relp13hd (Integer)
           922 => ( Parameter_Integer, 0 ),   --  : relp13sp (Integer)
           923 => ( Parameter_Integer, 0 ),   --  : relp14hd (Integer)
           924 => ( Parameter_Integer, 0 ),   --  : relp14sp (Integer)
           925 => ( Parameter_Integer, 0 ),   --  : reasonhd (Integer)
           926 => ( Parameter_Integer, 0 ),   --  : reasonsp (Integer)
           927 => ( Parameter_Float, 0.0 ),   --  : redamthd (Amount)
           928 => ( Parameter_Float, 0.0 ),   --  : redamtsp (Amount)
           929 => ( Parameter_Integer, 0 ),   --  : redundhd (Integer)
           930 => ( Parameter_Integer, 0 ),   --  : redundsp (Integer)
           931 => ( Parameter_Integer, 0 ),   --  : rednethd (Integer)
           932 => ( Parameter_Integer, 0 ),   --  : rednetsp (Integer)
           933 => ( Parameter_Integer, 0 ),   --  : redtaxhd (Integer)
           934 => ( Parameter_Integer, 0 ),   --  : redtaxsp (Integer)
           935 => ( Parameter_Integer, 0 ),   --  : relhrphd (Integer)
           936 => ( Parameter_Integer, 0 ),   --  : relhrpsp (Integer)
           937 => ( Parameter_Integer, 0 ),   --  : relgewhd (Integer)
           938 => ( Parameter_Integer, 0 ),   --  : relgewsp (Integer)
           939 => ( Parameter_Integer, 0 ),   --  : relgschd (Integer)
           940 => ( Parameter_Integer, 0 ),   --  : relgscsp (Integer)
           941 => ( Parameter_Integer, 0 ),   --  : rprofhd (Integer)
           942 => ( Parameter_Integer, 0 ),   --  : rprofsp (Integer)
           943 => ( Parameter_Integer, 0 ),   --  : retirehd (Integer)
           944 => ( Parameter_Integer, 0 ),   --  : retiresp (Integer)
           945 => ( Parameter_Integer, 0 ),   --  : retir1hd (Integer)
           946 => ( Parameter_Integer, 0 ),   --  : retir1sp (Integer)
           947 => ( Parameter_Integer, 0 ),   --  : retreshd (Integer)
           948 => ( Parameter_Integer, 0 ),   --  : retressp (Integer)
           949 => ( Parameter_Float, 0.0 ),   --  : renthd (Amount)
           950 => ( Parameter_Float, 0.0 ),   --  : rentsp (Amount)
           951 => ( Parameter_Float, 0.0 ),   --  : royalhd (Amount)
           952 => ( Parameter_Float, 0.0 ),   --  : royalsp (Amount)
           953 => ( Parameter_Float, 0.0 ),   --  : sleephd (Amount)
           954 => ( Parameter_Float, 0.0 ),   --  : sleepsp (Amount)
           955 => ( Parameter_Float, 0.0 ),   --  : forpenhd (Amount)
           956 => ( Parameter_Float, 0.0 ),   --  : forpensp (Amount)
           957 => ( Parameter_Integer, 0 ),   --  : restrchd (Integer)
           958 => ( Parameter_Integer, 0 ),   --  : restrcsp (Integer)
           959 => ( Parameter_Integer, 0 ),   --  : sapadjhd (Integer)
           960 => ( Parameter_Integer, 0 ),   --  : sapadjsp (Integer)
           961 => ( Parameter_Integer, 0 ),   --  : sdem01hd (Integer)
           962 => ( Parameter_Integer, 0 ),   --  : sdem01sp (Integer)
           963 => ( Parameter_Integer, 0 ),   --  : sdem02hd (Integer)
           964 => ( Parameter_Integer, 0 ),   --  : sdem02sp (Integer)
           965 => ( Parameter_Integer, 0 ),   --  : sdem03hd (Integer)
           966 => ( Parameter_Integer, 0 ),   --  : sdem03sp (Integer)
           967 => ( Parameter_Integer, 0 ),   --  : sdem04hd (Integer)
           968 => ( Parameter_Integer, 0 ),   --  : sdem04sp (Integer)
           969 => ( Parameter_Integer, 0 ),   --  : sdem05hd (Integer)
           970 => ( Parameter_Integer, 0 ),   --  : sdem05sp (Integer)
           971 => ( Parameter_Integer, 0 ),   --  : sdem06hd (Integer)
           972 => ( Parameter_Integer, 0 ),   --  : sdem06sp (Integer)
           973 => ( Parameter_Integer, 0 ),   --  : sdem07hd (Integer)
           974 => ( Parameter_Integer, 0 ),   --  : sdem07sp (Integer)
           975 => ( Parameter_Integer, 0 ),   --  : sdem08hd (Integer)
           976 => ( Parameter_Integer, 0 ),   --  : sdem08sp (Integer)
           977 => ( Parameter_Integer, 0 ),   --  : sdem09hd (Integer)
           978 => ( Parameter_Integer, 0 ),   --  : sdem09sp (Integer)
           979 => ( Parameter_Integer, 0 ),   --  : sdem10hd (Integer)
           980 => ( Parameter_Integer, 0 ),   --  : sdem10sp (Integer)
           981 => ( Parameter_Integer, 0 ),   --  : sdem11hd (Integer)
           982 => ( Parameter_Integer, 0 ),   --  : sdem11sp (Integer)
           983 => ( Parameter_Integer, 0 ),   --  : sdem12hd (Integer)
           984 => ( Parameter_Integer, 0 ),   --  : sdem12sp (Integer)
           985 => ( Parameter_Integer, 0 ),   --  : inseinhd (Integer)
           986 => ( Parameter_Integer, 0 ),   --  : inseinsp (Integer)
           987 => ( Parameter_Integer, 0 ),   --  : sdemphd (Integer)
           988 => ( Parameter_Integer, 0 ),   --  : sdempsp (Integer)
           989 => ( Parameter_Integer, 0 ),   --  : sexhd (Integer)
           990 => ( Parameter_Integer, 0 ),   --  : sexsp (Integer)
           991 => ( Parameter_Integer, 0 ),   --  : sichd (Integer)
           992 => ( Parameter_Integer, 0 ),   --  : sicsp (Integer)
           993 => ( Parameter_Integer, 0 ),   --  : sidqnhd (Integer)
           994 => ( Parameter_Integer, 0 ),   --  : sidqnsp (Integer)
           995 => ( Parameter_Integer, 0 ),   --  : sloshd (Integer)
           996 => ( Parameter_Integer, 0 ),   --  : slossp (Integer)
           997 => ( Parameter_Float, 0.0 ),   --  : slramthd (Amount)
           998 => ( Parameter_Float, 0.0 ),   --  : slramtsp (Amount)
           999 => ( Parameter_Integer, 0 ),   --  : slrppdhd (Integer)
           1000 => ( Parameter_Integer, 0 ),   --  : slrppdsp (Integer)
           1001 => ( Parameter_Float, 0.0 ),   --  : smpajhd (Amount)
           1002 => ( Parameter_Float, 0.0 ),   --  : smpajsp (Amount)
           1003 => ( Parameter_Integer, 0 ),   --  : sc2010hd (Integer)
           1004 => ( Parameter_Integer, 0 ),   --  : sc2010sp (Integer)
           1005 => ( Parameter_Integer, 0 ),   --  : qsfgrhd (Integer)
           1006 => ( Parameter_Integer, 0 ),   --  : qsfgrsp (Integer)
           1007 => ( Parameter_Integer, 0 ),   --  : qssmthd (Integer)
           1008 => ( Parameter_Integer, 0 ),   --  : qssmtsp (Integer)
           1009 => ( Parameter_Integer, 0 ),   --  : qlgdwphd (Integer)
           1010 => ( Parameter_Integer, 0 ),   --  : qlgdwpsp (Integer)
           1011 => ( Parameter_Integer, 0 ),   --  : qlglahd (Integer)
           1012 => ( Parameter_Integer, 0 ),   --  : qlglasp (Integer)
           1013 => ( Parameter_Integer, 0 ),   --  : blindhd (Integer)
           1014 => ( Parameter_Integer, 0 ),   --  : blindsp (Integer)
           1015 => ( Parameter_Integer, 0 ),   --  : parsihd (Integer)
           1016 => ( Parameter_Integer, 0 ),   --  : parsisp (Integer)
           1017 => ( Parameter_Integer, 0 ),   --  : deafhd (Integer)
           1018 => ( Parameter_Integer, 0 ),   --  : deafsp (Integer)
           1019 => ( Parameter_Integer, 0 ),   --  : spouthd (Integer)
           1020 => ( Parameter_Integer, 0 ),   --  : spoutsp (Integer)
           1021 => ( Parameter_Float, 0.0 ),   --  : sppadjhd (Amount)
           1022 => ( Parameter_Float, 0.0 ),   --  : sppadjsp (Amount)
           1023 => ( Parameter_Integer, 0 ),   --  : spyrothd (Integer)
           1024 => ( Parameter_Integer, 0 ),   --  : spyrotsp (Integer)
           1025 => ( Parameter_Float, 0.0 ),   --  : srentahd (Amount)
           1026 => ( Parameter_Float, 0.0 ),   --  : srentasp (Amount)
           1027 => ( Parameter_Integer, 0 ),   --  : psrenthd (Integer)
           1028 => ( Parameter_Integer, 0 ),   --  : psrentsp (Integer)
           1029 => ( Parameter_Integer, 0 ),   --  : sfispchd (Integer)
           1030 => ( Parameter_Integer, 0 ),   --  : sfispcsp (Integer)
           1031 => ( Parameter_Integer, 0 ),   --  : sfjesahd (Integer)
           1032 => ( Parameter_Integer, 0 ),   --  : sfjesasp (Integer)
           1033 => ( Parameter_Integer, 0 ),   --  : sruchd (Integer)
           1034 => ( Parameter_Integer, 0 ),   --  : srucsp (Integer)
           1035 => ( Parameter_Float, 0.0 ),   --  : sspajhd (Amount)
           1036 => ( Parameter_Float, 0.0 ),   --  : sspajsp (Amount)
           1037 => ( Parameter_Integer, 0 ),   --  : gtsavahd (Integer)
           1038 => ( Parameter_Integer, 0 ),   --  : gtsavasp (Integer)
           1039 => ( Parameter_Integer, 0 ),   --  : stshcthd (Integer)
           1040 => ( Parameter_Integer, 0 ),   --  : stshctsp (Integer)
           1041 => ( Parameter_Integer, 0 ),   --  : tdaywkhd (Integer)
           1042 => ( Parameter_Integer, 0 ),   --  : tdaywksp (Integer)
           1043 => ( Parameter_Integer, 0 ),   --  : agefedhd (Integer)
           1044 => ( Parameter_Integer, 0 ),   --  : agefedsp (Integer)
           1045 => ( Parameter_Integer, 0 ),   --  : tmpjobhd (Integer)
           1046 => ( Parameter_Integer, 0 ),   --  : tmpjobsp (Integer)
           1047 => ( Parameter_Integer, 0 ),   --  : tesscthd (Integer)
           1048 => ( Parameter_Integer, 0 ),   --  : tessctsp (Integer)
           1049 => ( Parameter_Integer, 0 ),   --  : totgrahd (Integer)
           1050 => ( Parameter_Float, 0.0 ),   --  : totgrasp (Amount)
           1051 => ( Parameter_Float, 0.0 ),   --  : tothouhd (Amount)
           1052 => ( Parameter_Float, 0.0 ),   --  : tothousp (Amount)
           1053 => ( Parameter_Float, 0.0 ),   --  : totinthd (Amount)
           1054 => ( Parameter_Float, 0.0 ),   --  : totintsp (Amount)
           1055 => ( Parameter_Float, 0.0 ),   --  : totocchd (Amount)
           1056 => ( Parameter_Float, 0.0 ),   --  : totoccsp (Amount)
           1057 => ( Parameter_Integer, 0 ),   --  : trainhd (Integer)
           1058 => ( Parameter_Integer, 0 ),   --  : trainsp (Integer)
           1059 => ( Parameter_Integer, 0 ),   --  : trnallhd (Integer)
           1060 => ( Parameter_Integer, 0 ),   --  : trnallsp (Integer)
           1061 => ( Parameter_Float, 0.0 ),   --  : ttbprxhd (Amount)
           1062 => ( Parameter_Float, 0.0 ),   --  : ttbprxsp (Amount)
           1063 => ( Parameter_Integer, 0 ),   --  : tuborrhd (Integer)
           1064 => ( Parameter_Integer, 0 ),   --  : tuborrsp (Integer)
           1065 => ( Parameter_Integer, 0 ),   --  : typeedhd (Integer)
           1066 => ( Parameter_Integer, 0 ),   --  : typeedsp (Integer)
           1067 => ( Parameter_Integer, 0 ),   --  : unpd1hd (Integer)
           1068 => ( Parameter_Integer, 0 ),   --  : unpd1sp (Integer)
           1069 => ( Parameter_Integer, 0 ),   --  : unpd2hd (Integer)
           1070 => ( Parameter_Integer, 0 ),   --  : unpd2sp (Integer)
           1071 => ( Parameter_Integer, 0 ),   --  : untrcthd (Integer)
           1072 => ( Parameter_Integer, 0 ),   --  : untrctsp (Integer)
           1073 => ( Parameter_Integer, 0 ),   --  : upersohd (Integer)
           1074 => ( Parameter_Integer, 0 ),   --  : upersosp (Integer)
           1075 => ( Parameter_Integer, 0 ),   --  : agewidhd (Integer)
           1076 => ( Parameter_Integer, 0 ),   --  : agewidsp (Integer)
           1077 => ( Parameter_Integer, 0 ),   --  : kidwidhd (Integer)
           1078 => ( Parameter_Integer, 0 ),   --  : kidwidsp (Integer)
           1079 => ( Parameter_Integer, 0 ),   --  : quchd (Integer)
           1080 => ( Parameter_Integer, 0 ),   --  : qucsp (Integer)
           1081 => ( Parameter_Integer, 0 ),   --  : qhbhd (Integer)
           1082 => ( Parameter_Integer, 0 ),   --  : qhbsp (Integer)
           1083 => ( Parameter_Integer, 0 ),   --  : qwtchd (Integer)
           1084 => ( Parameter_Integer, 0 ),   --  : qwtcsp (Integer)
           1085 => ( Parameter_Integer, 0 ),   --  : qctchd (Integer)
           1086 => ( Parameter_Integer, 0 ),   --  : qctcsp (Integer)
           1087 => ( Parameter_Integer, 0 ),   --  : qishd (Integer)
           1088 => ( Parameter_Integer, 0 ),   --  : qissp (Integer)
           1089 => ( Parameter_Integer, 0 ),   --  : qjsahd (Integer)
           1090 => ( Parameter_Integer, 0 ),   --  : qjsasp (Integer)
           1091 => ( Parameter_Integer, 0 ),   --  : qesahd (Integer)
           1092 => ( Parameter_Integer, 0 ),   --  : qesasp (Integer)
           1093 => ( Parameter_Integer, 0 ),   --  : qcahd (Integer)
           1094 => ( Parameter_Integer, 0 ),   --  : qcasp (Integer)
           1095 => ( Parameter_Integer, 0 ),   --  : waithd (Integer)
           1096 => ( Parameter_Integer, 0 ),   --  : waitsp (Integer)
           1097 => ( Parameter_Integer, 0 ),   --  : whresphd (Integer)
           1098 => ( Parameter_Integer, 0 ),   --  : whrespsp (Integer)
           1099 => ( Parameter_Integer, 0 ),   --  : whoctbhd (Integer)
           1100 => ( Parameter_Integer, 0 ),   --  : whoctbsp (Integer)
           1101 => ( Parameter_Float, 0.0 ),   --  : widocchd (Amount)
           1102 => ( Parameter_Float, 0.0 ),   --  : widoccsp (Amount)
           1103 => ( Parameter_Integer, 0 ),   --  : wintflhd (Integer)
           1104 => ( Parameter_Integer, 0 ),   --  : wintflsp (Integer)
           1105 => ( Parameter_Integer, 0 ),   --  : workinhd (Integer)
           1106 => ( Parameter_Integer, 0 ),   --  : workinsp (Integer)
           1107 => ( Parameter_Integer, 0 ),   --  : wpahd (Integer)
           1108 => ( Parameter_Integer, 0 ),   --  : wpasp (Integer)
           1109 => ( Parameter_Integer, 0 ),   --  : wpbahd (Integer)
           1110 => ( Parameter_Integer, 0 ),   --  : wpbasp (Integer)
           1111 => ( Parameter_Integer, 0 ),   --  : wtclm1hd (Integer)
           1112 => ( Parameter_Integer, 0 ),   --  : wtclm1sp (Integer)
           1113 => ( Parameter_Integer, 0 ),   --  : wtclm2hd (Integer)
           1114 => ( Parameter_Integer, 0 ),   --  : wtclm2sp (Integer)
           1115 => ( Parameter_Integer, 0 ),   --  : yjblevhd (Integer)
           1116 => ( Parameter_Integer, 0 ),   --  : yjblevsp (Integer)
           1117 => ( Parameter_Integer, 0 ),   --  : ystwkhd (Integer)
           1118 => ( Parameter_Integer, 0 ),   --  : ystwksp (Integer)
           1119 => ( Parameter_Float, 0.0 ),   --  : as011hd (Amount)
           1120 => ( Parameter_Float, 0.0 ),   --  : as012hd (Amount)
           1121 => ( Parameter_Float, 0.0 ),   --  : as013hd (Amount)
           1122 => ( Parameter_Integer, 0 ),   --  : as014hd (Integer)
           1123 => ( Parameter_Float, 0.0 ),   --  : as011sp (Amount)
           1124 => ( Parameter_Float, 0.0 ),   --  : as012sp (Amount)
           1125 => ( Parameter_Integer, 0 ),   --  : as013sp (Integer)
           1126 => ( Parameter_Integer, 0 ),   --  : as014sp (Integer)
           1127 => ( Parameter_Integer, 0 ),   --  : as021hd (Integer)
           1128 => ( Parameter_Integer, 0 ),   --  : as022hd (Integer)
           1129 => ( Parameter_Float, 0.0 ),   --  : as021sp (Amount)
           1130 => ( Parameter_Integer, 0 ),   --  : as022sp (Integer)
           1131 => ( Parameter_Integer, 0 ),   --  : as031hd (Integer)
           1132 => ( Parameter_Integer, 0 ),   --  : as031sp (Integer)
           1133 => ( Parameter_Float, 0.0 ),   --  : as051hd (Amount)
           1134 => ( Parameter_Float, 0.0 ),   --  : as052hd (Amount)
           1135 => ( Parameter_Float, 0.0 ),   --  : as053hd (Amount)
           1136 => ( Parameter_Integer, 0 ),   --  : as054hd (Integer)
           1137 => ( Parameter_Integer, 0 ),   --  : as055hd (Integer)
           1138 => ( Parameter_Integer, 0 ),   --  : as056hd (Integer)
           1139 => ( Parameter_Integer, 0 ),   --  : as057hd (Integer)
           1140 => ( Parameter_Float, 0.0 ),   --  : as051sp (Amount)
           1141 => ( Parameter_Float, 0.0 ),   --  : as052sp (Amount)
           1142 => ( Parameter_Float, 0.0 ),   --  : as053sp (Amount)
           1143 => ( Parameter_Integer, 0 ),   --  : as054sp (Integer)
           1144 => ( Parameter_Integer, 0 ),   --  : as055sp (Integer)
           1145 => ( Parameter_Integer, 0 ),   --  : as056sp (Integer)
           1146 => ( Parameter_Integer, 0 ),   --  : as057sp (Integer)
           1147 => ( Parameter_Integer, 0 ),   --  : as061hd (Integer)
           1148 => ( Parameter_Integer, 0 ),   --  : as061sp (Integer)
           1149 => ( Parameter_Integer, 0 ),   --  : as071hd (Integer)
           1150 => ( Parameter_Integer, 0 ),   --  : as071sp (Integer)
           1151 => ( Parameter_Float, 0.0 ),   --  : as081hd (Amount)
           1152 => ( Parameter_Float, 0.0 ),   --  : as082hd (Amount)
           1153 => ( Parameter_Integer, 0 ),   --  : as083hd (Integer)
           1154 => ( Parameter_Integer, 0 ),   --  : as084hd (Integer)
           1155 => ( Parameter_Integer, 0 ),   --  : as085hd (Integer)
           1156 => ( Parameter_Float, 0.0 ),   --  : as081sp (Amount)
           1157 => ( Parameter_Float, 0.0 ),   --  : as082sp (Amount)
           1158 => ( Parameter_Integer, 0 ),   --  : as083sp (Integer)
           1159 => ( Parameter_Integer, 0 ),   --  : as084sp (Integer)
           1160 => ( Parameter_Integer, 0 ),   --  : as085sp (Integer)
           1161 => ( Parameter_Integer, 0 ),   --  : as101hd (Integer)
           1162 => ( Parameter_Integer, 0 ),   --  : as101sp (Integer)
           1163 => ( Parameter_Integer, 0 ),   --  : as111hd (Integer)
           1164 => ( Parameter_Integer, 0 ),   --  : as111sp (Integer)
           1165 => ( Parameter_Integer, 0 ),   --  : as121hd (Integer)
           1166 => ( Parameter_Integer, 0 ),   --  : as121sp (Integer)
           1167 => ( Parameter_Integer, 0 ),   --  : as131hd (Integer)
           1168 => ( Parameter_Integer, 0 ),   --  : as131sp (Integer)
           1169 => ( Parameter_Integer, 0 ),   --  : as141hd (Integer)
           1170 => ( Parameter_Integer, 0 ),   --  : as142hd (Integer)
           1171 => ( Parameter_Integer, 0 ),   --  : as143hd (Integer)
           1172 => ( Parameter_Integer, 0 ),   --  : as141sp (Integer)
           1173 => ( Parameter_Integer, 0 ),   --  : as142sp (Integer)
           1174 => ( Parameter_Integer, 0 ),   --  : as143sp (Integer)
           1175 => ( Parameter_Float, 0.0 ),   --  : as151hd (Amount)
           1176 => ( Parameter_Float, 0.0 ),   --  : as151sp (Amount)
           1177 => ( Parameter_Integer, 0 ),   --  : as161hd (Integer)
           1178 => ( Parameter_Integer, 0 ),   --  : as161sp (Integer)
           1179 => ( Parameter_Integer, 0 ),   --  : as191hd (Integer)
           1180 => ( Parameter_Integer, 0 ),   --  : as191sp (Integer)
           1181 => ( Parameter_Float, 0.0 ),   --  : as211hd (Amount)
           1182 => ( Parameter_Integer, 0 ),   --  : as212hd (Integer)
           1183 => ( Parameter_Integer, 0 ),   --  : as213hd (Integer)
           1184 => ( Parameter_Integer, 0 ),   --  : as214hd (Integer)
           1185 => ( Parameter_Float, 0.0 ),   --  : as211sp (Amount)
           1186 => ( Parameter_Float, 0.0 ),   --  : as212sp (Amount)
           1187 => ( Parameter_Integer, 0 ),   --  : as213sp (Integer)
           1188 => ( Parameter_Integer, 0 ),   --  : as214sp (Integer)
           1189 => ( Parameter_Integer, 0 ),   --  : as261hd (Integer)
           1190 => ( Parameter_Integer, 0 ),   --  : as261sp (Integer)
           1191 => ( Parameter_Float, 0.0 ),   --  : as271hd (Amount)
           1192 => ( Parameter_Integer, 0 ),   --  : as272hd (Integer)
           1193 => ( Parameter_Integer, 0 ),   --  : as271sp (Integer)
           1194 => ( Parameter_Integer, 0 ),   --  : as272sp (Integer)
           1195 => ( Parameter_Integer, 0 ),   --  : as281hd (Integer)
           1196 => ( Parameter_Float, 0.0 ),   --  : as281sp (Amount)
           1197 => ( Parameter_Integer, 0 ),   --  : as291hd (Integer)
           1198 => ( Parameter_Integer, 0 ),   --  : as292hd (Integer)
           1199 => ( Parameter_Integer, 0 ),   --  : as293hd (Integer)
           1200 => ( Parameter_Integer, 0 ),   --  : as291sp (Integer)
           1201 => ( Parameter_Integer, 0 ),   --  : as292sp (Integer)
           1202 => ( Parameter_Integer, 0 ),   --  : as293sp (Integer)
           1203 => ( Parameter_Integer, 0 ),   --  : stdlachd (Integer)
           1204 => ( Parameter_Integer, 0 ),   --  : stdlamhd (Integer)
           1205 => ( Parameter_Integer, 0 ),   --  : stcbhd (Integer)
           1206 => ( Parameter_Integer, 0 ),   --  : stpenchd (Integer)
           1207 => ( Parameter_Integer, 0 ),   --  : strphd (Integer)
           1208 => ( Parameter_Integer, 0 ),   --  : stwphd (Integer)
           1209 => ( Parameter_Integer, 0 ),   --  : stwdphd (Integer)
           1210 => ( Parameter_Integer, 0 ),   --  : stwwphd (Integer)
           1211 => ( Parameter_Integer, 0 ),   --  : stsdahd (Integer)
           1212 => ( Parameter_Integer, 0 ),   --  : staahd (Integer)
           1213 => ( Parameter_Integer, 0 ),   --  : sticahd (Integer)
           1214 => ( Parameter_Integer, 0 ),   --  : stjsahd (Integer)
           1215 => ( Parameter_Integer, 0 ),   --  : stiidbhd (Integer)
           1216 => ( Parameter_Integer, 0 ),   --  : stesahd (Integer)
           1217 => ( Parameter_Integer, 0 ),   --  : stibhd (Integer)
           1218 => ( Parameter_Integer, 0 ),   --  : stishd (Integer)
           1219 => ( Parameter_Integer, 0 ),   --  : stmahd (Integer)
           1220 => ( Parameter_Integer, 0 ),   --  : stshhd (Integer)
           1221 => ( Parameter_Integer, 0 ),   --  : stgahd (Integer)
           1222 => ( Parameter_Integer, 0 ),   --  : stwtchd (Integer)
           1223 => ( Parameter_Integer, 0 ),   --  : stctchd (Integer)
           1224 => ( Parameter_Integer, 0 ),   --  : stwtclhd (Integer)
           1225 => ( Parameter_Integer, 0 ),   --  : stctclhd (Integer)
           1226 => ( Parameter_Integer, 0 ),   --  : stuchd (Integer)
           1227 => ( Parameter_Integer, 0 ),   --  : stpipdhd (Integer)
           1228 => ( Parameter_Integer, 0 ),   --  : stpipmhd (Integer)
           1229 => ( Parameter_Integer, 0 ),   --  : stdlacsp (Integer)
           1230 => ( Parameter_Integer, 0 ),   --  : stdlamsp (Integer)
           1231 => ( Parameter_Integer, 0 ),   --  : stcbsp (Integer)
           1232 => ( Parameter_Integer, 0 ),   --  : stpencsp (Integer)
           1233 => ( Parameter_Integer, 0 ),   --  : strpsp (Integer)
           1234 => ( Parameter_Integer, 0 ),   --  : stwpsp (Integer)
           1235 => ( Parameter_Integer, 0 ),   --  : stwdpsp (Integer)
           1236 => ( Parameter_Integer, 0 ),   --  : stwwpsp (Integer)
           1237 => ( Parameter_Integer, 0 ),   --  : stsdasp (Integer)
           1238 => ( Parameter_Integer, 0 ),   --  : staasp (Integer)
           1239 => ( Parameter_Integer, 0 ),   --  : sticasp (Integer)
           1240 => ( Parameter_Integer, 0 ),   --  : stjsasp (Integer)
           1241 => ( Parameter_Integer, 0 ),   --  : stiidbsp (Integer)
           1242 => ( Parameter_Integer, 0 ),   --  : stesasp (Integer)
           1243 => ( Parameter_Integer, 0 ),   --  : stibsp (Integer)
           1244 => ( Parameter_Integer, 0 ),   --  : stissp (Integer)
           1245 => ( Parameter_Integer, 0 ),   --  : stmasp (Integer)
           1246 => ( Parameter_Integer, 0 ),   --  : stshsp (Integer)
           1247 => ( Parameter_Integer, 0 ),   --  : stgasp (Integer)
           1248 => ( Parameter_Integer, 0 ),   --  : stwtcsp (Integer)
           1249 => ( Parameter_Integer, 0 ),   --  : stctcsp (Integer)
           1250 => ( Parameter_Integer, 0 ),   --  : stwtclsp (Integer)
           1251 => ( Parameter_Integer, 0 ),   --  : stctclsp (Integer)
           1252 => ( Parameter_Integer, 0 ),   --  : stucsp (Integer)
           1253 => ( Parameter_Integer, 0 ),   --  : stpipdsp (Integer)
           1254 => ( Parameter_Integer, 0 ),   --  : stpipmsp (Integer)
           1255 => ( Parameter_Float, 0.0 ),   --  : dlacahd (Amount)
           1256 => ( Parameter_Float, 0.0 ),   --  : dlamohd (Amount)
           1257 => ( Parameter_Float, 0.0 ),   --  : cbhd (Amount)
           1258 => ( Parameter_Float, 0.0 ),   --  : lpencrhd (Amount)
           1259 => ( Parameter_Float, 0.0 ),   --  : rphd (Amount)
           1260 => ( Parameter_Float, 0.0 ),   --  : wphd (Amount)
           1261 => ( Parameter_Float, 0.0 ),   --  : wdphd (Amount)
           1262 => ( Parameter_Float, 0.0 ),   --  : wwphd (Amount)
           1263 => ( Parameter_Float, 0.0 ),   --  : sdahd (Amount)
           1264 => ( Parameter_Float, 0.0 ),   --  : aahd (Amount)
           1265 => ( Parameter_Float, 0.0 ),   --  : icahd (Amount)
           1266 => ( Parameter_Float, 0.0 ),   --  : jsahd (Amount)
           1267 => ( Parameter_Float, 0.0 ),   --  : iidbhd (Amount)
           1268 => ( Parameter_Float, 0.0 ),   --  : esahd (Amount)
           1269 => ( Parameter_Float, 0.0 ),   --  : ibhd (Amount)
           1270 => ( Parameter_Float, 0.0 ),   --  : ishd (Amount)
           1271 => ( Parameter_Float, 0.0 ),   --  : mahd (Amount)
           1272 => ( Parameter_Integer, 0 ),   --  : sfmghd (Integer)
           1273 => ( Parameter_Float, 0.0 ),   --  : sffghd (Amount)
           1274 => ( Parameter_Float, 0.0 ),   --  : othbenhd (Amount)
           1275 => ( Parameter_Float, 0.0 ),   --  : tubenhd (Amount)
           1276 => ( Parameter_Float, 0.0 ),   --  : fsbenhd (Amount)
           1277 => ( Parameter_Float, 0.0 ),   --  : sicinhd (Amount)
           1278 => ( Parameter_Integer, 0 ),   --  : accinhd (Integer)
           1279 => ( Parameter_Float, 0.0 ),   --  : hosinhd (Amount)
           1280 => ( Parameter_Integer, 0 ),   --  : gtshd (Integer)
           1281 => ( Parameter_Float, 0.0 ),   --  : gahd (Amount)
           1282 => ( Parameter_Integer, 0 ),   --  : iwchd (Integer)
           1283 => ( Parameter_Integer, 0 ),   --  : r2wchd (Integer)
           1284 => ( Parameter_Integer, 0 ),   --  : widplhd (Integer)
           1285 => ( Parameter_Float, 0.0 ),   --  : uninshd (Amount)
           1286 => ( Parameter_Integer, 0 ),   --  : wfamthd (Integer)
           1287 => ( Parameter_Float, 0.0 ),   --  : dssdpihd (Amount)
           1288 => ( Parameter_Float, 0.0 ),   --  : dssdpjhd (Amount)
           1289 => ( Parameter_Float, 0.0 ),   --  : sfrpaihd (Amount)
           1290 => ( Parameter_Float, 0.0 ),   --  : sfrpajhd (Amount)
           1291 => ( Parameter_Float, 0.0 ),   --  : exhbhd (Amount)
           1292 => ( Parameter_Float, 0.0 ),   --  : perhinhd (Amount)
           1293 => ( Parameter_Float, 0.0 ),   --  : otsiinhd (Amount)
           1294 => ( Parameter_Float, 0.0 ),   --  : cichd (Amount)
           1295 => ( Parameter_Float, 0.0 ),   --  : bowtchd (Amount)
           1296 => ( Parameter_Float, 0.0 ),   --  : boctchd (Amount)
           1297 => ( Parameter_Float, 0.0 ),   --  : bowtclhd (Amount)
           1298 => ( Parameter_Float, 0.0 ),   --  : boctclhd (Amount)
           1299 => ( Parameter_Float, 0.0 ),   --  : hbhd (Amount)
           1300 => ( Parameter_Float, 0.0 ),   --  : uchd (Amount)
           1301 => ( Parameter_Float, 0.0 ),   --  : pipdhd (Amount)
           1302 => ( Parameter_Float, 0.0 ),   --  : pipmhd (Amount)
           1303 => ( Parameter_Float, 0.0 ),   --  : lndwphd (Amount)
           1304 => ( Parameter_Integer, 0 ),   --  : lnlahd (Integer)
           1305 => ( Parameter_Float, 0.0 ),   --  : dwpauchd (Amount)
           1306 => ( Parameter_Float, 0.0 ),   --  : sfrpuchd (Amount)
           1307 => ( Parameter_Float, 0.0 ),   --  : dlacasp (Amount)
           1308 => ( Parameter_Float, 0.0 ),   --  : dlamosp (Amount)
           1309 => ( Parameter_Float, 0.0 ),   --  : cbsp (Amount)
           1310 => ( Parameter_Float, 0.0 ),   --  : lpencrsp (Amount)
           1311 => ( Parameter_Float, 0.0 ),   --  : rpsp (Amount)
           1312 => ( Parameter_Integer, 0 ),   --  : wpsp (Integer)
           1313 => ( Parameter_Float, 0.0 ),   --  : wdpsp (Amount)
           1314 => ( Parameter_Float, 0.0 ),   --  : wwpsp (Amount)
           1315 => ( Parameter_Float, 0.0 ),   --  : sdasp (Amount)
           1316 => ( Parameter_Float, 0.0 ),   --  : aasp (Amount)
           1317 => ( Parameter_Float, 0.0 ),   --  : icasp (Amount)
           1318 => ( Parameter_Float, 0.0 ),   --  : jsasp (Amount)
           1319 => ( Parameter_Float, 0.0 ),   --  : iidbsp (Amount)
           1320 => ( Parameter_Float, 0.0 ),   --  : esasp (Amount)
           1321 => ( Parameter_Float, 0.0 ),   --  : ibsp (Amount)
           1322 => ( Parameter_Float, 0.0 ),   --  : issp (Amount)
           1323 => ( Parameter_Float, 0.0 ),   --  : masp (Amount)
           1324 => ( Parameter_Integer, 0 ),   --  : sfmgsp (Integer)
           1325 => ( Parameter_Integer, 0 ),   --  : sffgsp (Integer)
           1326 => ( Parameter_Integer, 0 ),   --  : othbensp (Integer)
           1327 => ( Parameter_Integer, 0 ),   --  : tubensp (Integer)
           1328 => ( Parameter_Integer, 0 ),   --  : fsbensp (Integer)
           1329 => ( Parameter_Float, 0.0 ),   --  : sicinsp (Amount)
           1330 => ( Parameter_Integer, 0 ),   --  : accinsp (Integer)
           1331 => ( Parameter_Float, 0.0 ),   --  : hosinsp (Amount)
           1332 => ( Parameter_Integer, 0 ),   --  : gtssp (Integer)
           1333 => ( Parameter_Integer, 0 ),   --  : gasp (Integer)
           1334 => ( Parameter_Integer, 0 ),   --  : iwcsp (Integer)
           1335 => ( Parameter_Integer, 0 ),   --  : r2wcsp (Integer)
           1336 => ( Parameter_Integer, 0 ),   --  : widplsp (Integer)
           1337 => ( Parameter_Float, 0.0 ),   --  : uninssp (Amount)
           1338 => ( Parameter_Integer, 0 ),   --  : wfamtsp (Integer)
           1339 => ( Parameter_Float, 0.0 ),   --  : dssdpisp (Amount)
           1340 => ( Parameter_Float, 0.0 ),   --  : dssdpjsp (Amount)
           1341 => ( Parameter_Float, 0.0 ),   --  : sfrpaisp (Amount)
           1342 => ( Parameter_Float, 0.0 ),   --  : sfrpajsp (Amount)
           1343 => ( Parameter_Integer, 0 ),   --  : exhbsp (Integer)
           1344 => ( Parameter_Float, 0.0 ),   --  : perhinsp (Amount)
           1345 => ( Parameter_Float, 0.0 ),   --  : otsiinsp (Amount)
           1346 => ( Parameter_Integer, 0 ),   --  : cicsp (Integer)
           1347 => ( Parameter_Float, 0.0 ),   --  : bowtcsp (Amount)
           1348 => ( Parameter_Float, 0.0 ),   --  : boctcsp (Amount)
           1349 => ( Parameter_Integer, 0 ),   --  : bowtclsp (Integer)
           1350 => ( Parameter_Float, 0.0 ),   --  : boctclsp (Amount)
           1351 => ( Parameter_Float, 0.0 ),   --  : hbsp (Amount)
           1352 => ( Parameter_Float, 0.0 ),   --  : ucsp (Amount)
           1353 => ( Parameter_Float, 0.0 ),   --  : pipdsp (Amount)
           1354 => ( Parameter_Float, 0.0 ),   --  : pipmsp (Amount)
           1355 => ( Parameter_Integer, 0 ),   --  : lndwpsp (Integer)
           1356 => ( Parameter_Integer, 0 ),   --  : lnlasp (Integer)
           1357 => ( Parameter_Integer, 0 ),   --  : dwpaucsp (Integer)
           1358 => ( Parameter_Float, 0.0 ),   --  : sfrpucsp (Amount)
           1359 => ( Parameter_Integer, 0 ),   --  : ltdlachd (Integer)
           1360 => ( Parameter_Integer, 0 ),   --  : ltdlamhd (Integer)
           1361 => ( Parameter_Integer, 0 ),   --  : ltcbhd (Integer)
           1362 => ( Parameter_Integer, 0 ),   --  : bopenchd (Integer)
           1363 => ( Parameter_Integer, 0 ),   --  : ltrphd (Integer)
           1364 => ( Parameter_Integer, 0 ),   --  : ltwphd (Integer)
           1365 => ( Parameter_Integer, 0 ),   --  : ltwdphd (Integer)
           1366 => ( Parameter_Integer, 0 ),   --  : ltwwphd (Integer)
           1367 => ( Parameter_Integer, 0 ),   --  : ltsdahd (Integer)
           1368 => ( Parameter_Integer, 0 ),   --  : ltaahd (Integer)
           1369 => ( Parameter_Integer, 0 ),   --  : lticahd (Integer)
           1370 => ( Parameter_Integer, 0 ),   --  : ltjsahd (Integer)
           1371 => ( Parameter_Integer, 0 ),   --  : ltiidbhd (Integer)
           1372 => ( Parameter_Integer, 0 ),   --  : ltesahd (Integer)
           1373 => ( Parameter_Integer, 0 ),   --  : ltibhd (Integer)
           1374 => ( Parameter_Integer, 0 ),   --  : ltishd (Integer)
           1375 => ( Parameter_Integer, 0 ),   --  : ltmahd (Integer)
           1376 => ( Parameter_Integer, 0 ),   --  : ltshhd (Integer)
           1377 => ( Parameter_Integer, 0 ),   --  : ltgahd (Integer)
           1378 => ( Parameter_Integer, 0 ),   --  : hwtchd (Integer)
           1379 => ( Parameter_Integer, 0 ),   --  : hctchd (Integer)
           1380 => ( Parameter_Integer, 0 ),   --  : hwtclhd (Integer)
           1381 => ( Parameter_Integer, 0 ),   --  : hctclhd (Integer)
           1382 => ( Parameter_Integer, 0 ),   --  : ltuchd (Integer)
           1383 => ( Parameter_Integer, 0 ),   --  : ltpipdhd (Integer)
           1384 => ( Parameter_Integer, 0 ),   --  : ltpipmhd (Integer)
           1385 => ( Parameter_Integer, 0 ),   --  : ltdlacsp (Integer)
           1386 => ( Parameter_Integer, 0 ),   --  : ltdlamsp (Integer)
           1387 => ( Parameter_Integer, 0 ),   --  : ltcbsp (Integer)
           1388 => ( Parameter_Integer, 0 ),   --  : bopencsp (Integer)
           1389 => ( Parameter_Integer, 0 ),   --  : ltrpsp (Integer)
           1390 => ( Parameter_Integer, 0 ),   --  : ltwpsp (Integer)
           1391 => ( Parameter_Integer, 0 ),   --  : ltwdpsp (Integer)
           1392 => ( Parameter_Integer, 0 ),   --  : ltwwpsp (Integer)
           1393 => ( Parameter_Integer, 0 ),   --  : ltsdasp (Integer)
           1394 => ( Parameter_Integer, 0 ),   --  : ltaasp (Integer)
           1395 => ( Parameter_Integer, 0 ),   --  : lticasp (Integer)
           1396 => ( Parameter_Integer, 0 ),   --  : ltjsasp (Integer)
           1397 => ( Parameter_Integer, 0 ),   --  : ltiidbsp (Integer)
           1398 => ( Parameter_Integer, 0 ),   --  : ltesasp (Integer)
           1399 => ( Parameter_Integer, 0 ),   --  : ltibsp (Integer)
           1400 => ( Parameter_Integer, 0 ),   --  : ltissp (Integer)
           1401 => ( Parameter_Integer, 0 ),   --  : ltmasp (Integer)
           1402 => ( Parameter_Integer, 0 ),   --  : ltshsp (Integer)
           1403 => ( Parameter_Integer, 0 ),   --  : ltgasp (Integer)
           1404 => ( Parameter_Integer, 0 ),   --  : hwtcsp (Integer)
           1405 => ( Parameter_Integer, 0 ),   --  : hctcsp (Integer)
           1406 => ( Parameter_Integer, 0 ),   --  : hwtclsp (Integer)
           1407 => ( Parameter_Integer, 0 ),   --  : hctclsp (Integer)
           1408 => ( Parameter_Integer, 0 ),   --  : ltucsp (Integer)
           1409 => ( Parameter_Integer, 0 ),   --  : ltpipdsp (Integer)
           1410 => ( Parameter_Integer, 0 ),   --  : ltpipmsp (Integer)
           1411 => ( Parameter_Integer, 0 ),   --  : pdlacahd (Integer)
           1412 => ( Parameter_Integer, 0 ),   --  : pdlamohd (Integer)
           1413 => ( Parameter_Integer, 0 ),   --  : pcbhd (Integer)
           1414 => ( Parameter_Integer, 0 ),   --  : hpenchd (Integer)
           1415 => ( Parameter_Integer, 0 ),   --  : prphd (Integer)
           1416 => ( Parameter_Integer, 0 ),   --  : pwphd (Integer)
           1417 => ( Parameter_Integer, 0 ),   --  : pwdphd (Integer)
           1418 => ( Parameter_Integer, 0 ),   --  : pwwphd (Integer)
           1419 => ( Parameter_Integer, 0 ),   --  : psdahd (Integer)
           1420 => ( Parameter_Integer, 0 ),   --  : paahd (Integer)
           1421 => ( Parameter_Integer, 0 ),   --  : picahd (Integer)
           1422 => ( Parameter_Integer, 0 ),   --  : pjsahd (Integer)
           1423 => ( Parameter_Integer, 0 ),   --  : piidbhd (Integer)
           1424 => ( Parameter_Integer, 0 ),   --  : pesahd (Integer)
           1425 => ( Parameter_Integer, 0 ),   --  : pibhd (Integer)
           1426 => ( Parameter_Integer, 0 ),   --  : pishd (Integer)
           1427 => ( Parameter_Integer, 0 ),   --  : pmahd (Integer)
           1428 => ( Parameter_Integer, 0 ),   --  : pothbehd (Integer)
           1429 => ( Parameter_Integer, 0 ),   --  : ptubenhd (Integer)
           1430 => ( Parameter_Integer, 0 ),   --  : pfsbenhd (Integer)
           1431 => ( Parameter_Integer, 0 ),   --  : psicinhd (Integer)
           1432 => ( Parameter_Integer, 0 ),   --  : paccinhd (Integer)
           1433 => ( Parameter_Integer, 0 ),   --  : phosinhd (Integer)
           1434 => ( Parameter_Integer, 0 ),   --  : pgtshd (Integer)
           1435 => ( Parameter_Integer, 0 ),   --  : pgahd (Integer)
           1436 => ( Parameter_Integer, 0 ),   --  : iwcpdhd (Integer)
           1437 => ( Parameter_Integer, 0 ),   --  : r2wcpdhd (Integer)
           1438 => ( Parameter_Integer, 0 ),   --  : puninshd (Integer)
           1439 => ( Parameter_Integer, 0 ),   --  : pdsspihd (Integer)
           1440 => ( Parameter_Integer, 0 ),   --  : pdsspjhd (Integer)
           1441 => ( Parameter_Integer, 0 ),   --  : pexhbhd (Integer)
           1442 => ( Parameter_Integer, 0 ),   --  : ppehinhd (Integer)
           1443 => ( Parameter_Integer, 0 ),   --  : potsinhd (Integer)
           1444 => ( Parameter_Integer, 0 ),   --  : pdcichd (Integer)
           1445 => ( Parameter_Integer, 0 ),   --  : wwtchd (Integer)
           1446 => ( Parameter_Integer, 0 ),   --  : wctchd (Integer)
           1447 => ( Parameter_Integer, 0 ),   --  : wwtclhd (Integer)
           1448 => ( Parameter_Integer, 0 ),   --  : wctclhd (Integer)
           1449 => ( Parameter_Integer, 0 ),   --  : phbhd (Integer)
           1450 => ( Parameter_Integer, 0 ),   --  : puchd (Integer)
           1451 => ( Parameter_Integer, 0 ),   --  : ppipdhd (Integer)
           1452 => ( Parameter_Integer, 0 ),   --  : ppipmhd (Integer)
           1453 => ( Parameter_Integer, 0 ),   --  : pdwpuchd (Integer)
           1454 => ( Parameter_Integer, 0 ),   --  : pdlacasp (Integer)
           1455 => ( Parameter_Integer, 0 ),   --  : pdlamosp (Integer)
           1456 => ( Parameter_Integer, 0 ),   --  : pcbsp (Integer)
           1457 => ( Parameter_Integer, 0 ),   --  : hpencsp (Integer)
           1458 => ( Parameter_Integer, 0 ),   --  : prpsp (Integer)
           1459 => ( Parameter_Integer, 0 ),   --  : pwpsp (Integer)
           1460 => ( Parameter_Integer, 0 ),   --  : pwdpsp (Integer)
           1461 => ( Parameter_Integer, 0 ),   --  : pwwpsp (Integer)
           1462 => ( Parameter_Integer, 0 ),   --  : psdasp (Integer)
           1463 => ( Parameter_Integer, 0 ),   --  : paasp (Integer)
           1464 => ( Parameter_Integer, 0 ),   --  : picasp (Integer)
           1465 => ( Parameter_Integer, 0 ),   --  : pjsasp (Integer)
           1466 => ( Parameter_Integer, 0 ),   --  : piidbsp (Integer)
           1467 => ( Parameter_Integer, 0 ),   --  : pesasp (Integer)
           1468 => ( Parameter_Integer, 0 ),   --  : pibsp (Integer)
           1469 => ( Parameter_Integer, 0 ),   --  : pissp (Integer)
           1470 => ( Parameter_Integer, 0 ),   --  : pmasp (Integer)
           1471 => ( Parameter_Integer, 0 ),   --  : pothbesp (Integer)
           1472 => ( Parameter_Integer, 0 ),   --  : ptubensp (Integer)
           1473 => ( Parameter_Integer, 0 ),   --  : pfsbensp (Integer)
           1474 => ( Parameter_Integer, 0 ),   --  : psicinsp (Integer)
           1475 => ( Parameter_Integer, 0 ),   --  : paccinsp (Integer)
           1476 => ( Parameter_Integer, 0 ),   --  : phosinsp (Integer)
           1477 => ( Parameter_Integer, 0 ),   --  : pgtssp (Integer)
           1478 => ( Parameter_Integer, 0 ),   --  : pgasp (Integer)
           1479 => ( Parameter_Integer, 0 ),   --  : iwcpdsp (Integer)
           1480 => ( Parameter_Integer, 0 ),   --  : r2wcpdsp (Integer)
           1481 => ( Parameter_Integer, 0 ),   --  : puninssp (Integer)
           1482 => ( Parameter_Integer, 0 ),   --  : pdsspisp (Integer)
           1483 => ( Parameter_Integer, 0 ),   --  : pdsspjsp (Integer)
           1484 => ( Parameter_Integer, 0 ),   --  : pexhbsp (Integer)
           1485 => ( Parameter_Integer, 0 ),   --  : ppehinsp (Integer)
           1486 => ( Parameter_Integer, 0 ),   --  : potsinsp (Integer)
           1487 => ( Parameter_Integer, 0 ),   --  : pdcicsp (Integer)
           1488 => ( Parameter_Integer, 0 ),   --  : wwtcsp (Integer)
           1489 => ( Parameter_Integer, 0 ),   --  : wctcsp (Integer)
           1490 => ( Parameter_Integer, 0 ),   --  : wwtclsp (Integer)
           1491 => ( Parameter_Integer, 0 ),   --  : wctclsp (Integer)
           1492 => ( Parameter_Integer, 0 ),   --  : phbsp (Integer)
           1493 => ( Parameter_Integer, 0 ),   --  : pucsp (Integer)
           1494 => ( Parameter_Integer, 0 ),   --  : ppipdsp (Integer)
           1495 => ( Parameter_Integer, 0 ),   --  : ppipmsp (Integer)
           1496 => ( Parameter_Integer, 0 ),   --  : pdwpucsp (Integer)
           1497 => ( Parameter_Integer, 0 ),   --  : cbpayehd (Integer)
           1498 => ( Parameter_Integer, 0 ),   --  : cbpayesp (Integer)
           1499 => ( Parameter_Integer, 0 ),   --  : cbtaxhd (Integer)
           1500 => ( Parameter_Integer, 0 ),   --  : cbtaxsp (Integer)
           1501 => ( Parameter_Integer, 0 ),   --  : pwtchd (Integer)
           1502 => ( Parameter_Integer, 0 ),   --  : pctchd (Integer)
           1503 => ( Parameter_Integer, 0 ),   --  : pwtcsp (Integer)
           1504 => ( Parameter_Integer, 0 ),   --  : pctcsp (Integer)
           1505 => ( Parameter_Integer, 0 ),   --  : npcamthd (Integer)
           1506 => ( Parameter_Float, 0.0 ),   --  : urphd (Amount)
           1507 => ( Parameter_Integer, 0 ),   --  : uwphd (Integer)
           1508 => ( Parameter_Float, 0.0 ),   --  : uesahd (Amount)
           1509 => ( Parameter_Float, 0.0 ),   --  : uishd (Amount)
           1510 => ( Parameter_Float, 0.0 ),   --  : uwtchd (Amount)
           1511 => ( Parameter_Integer, 0 ),   --  : uctchd (Integer)
           1512 => ( Parameter_Integer, 0 ),   --  : npcamtsp (Integer)
           1513 => ( Parameter_Float, 0.0 ),   --  : urpsp (Amount)
           1514 => ( Parameter_Integer, 0 ),   --  : uwpsp (Integer)
           1515 => ( Parameter_Float, 0.0 ),   --  : uesasp (Amount)
           1516 => ( Parameter_Integer, 0 ),   --  : uissp (Integer)
           1517 => ( Parameter_Float, 0.0 ),   --  : uwtcsp (Amount)
           1518 => ( Parameter_Integer, 0 ),   --  : uctcsp (Integer)
           1519 => ( Parameter_Integer, 0 ),   --  : dmpenchd (Integer)
           1520 => ( Parameter_Integer, 0 ),   --  : purphd (Integer)
           1521 => ( Parameter_Integer, 0 ),   --  : puwphd (Integer)
           1522 => ( Parameter_Integer, 0 ),   --  : nupesahd (Integer)
           1523 => ( Parameter_Integer, 0 ),   --  : puishd (Integer)
           1524 => ( Parameter_Integer, 0 ),   --  : dmpencsp (Integer)
           1525 => ( Parameter_Integer, 0 ),   --  : purpsp (Integer)
           1526 => ( Parameter_Integer, 0 ),   --  : puwpsp (Integer)
           1527 => ( Parameter_Integer, 0 ),   --  : nupesasp (Integer)
           1528 => ( Parameter_Integer, 0 ),   --  : puissp (Integer)
           1529 => ( Parameter_Integer, 0 ),   --  : wjsahd (Integer)
           1530 => ( Parameter_Integer, 0 ),   --  : wesahd (Integer)
           1531 => ( Parameter_Integer, 0 ),   --  : wishd (Integer)
           1532 => ( Parameter_Integer, 0 ),   --  : wothbehd (Integer)
           1533 => ( Parameter_Integer, 0 ),   --  : wtubenhd (Integer)
           1534 => ( Parameter_Integer, 0 ),   --  : wfsbenhd (Integer)
           1535 => ( Parameter_Integer, 0 ),   --  : wsicinhd (Integer)
           1536 => ( Parameter_Integer, 0 ),   --  : waccinhd (Integer)
           1537 => ( Parameter_Integer, 0 ),   --  : whosinhd (Integer)
           1538 => ( Parameter_Integer, 0 ),   --  : wkiwchd (Integer)
           1539 => ( Parameter_Integer, 0 ),   --  : wkr2whd (Integer)
           1540 => ( Parameter_Integer, 0 ),   --  : wuninshd (Integer)
           1541 => ( Parameter_Integer, 0 ),   --  : wpehinhd (Integer)
           1542 => ( Parameter_Integer, 0 ),   --  : wotsinhd (Integer)
           1543 => ( Parameter_Integer, 0 ),   --  : wocichd (Integer)
           1544 => ( Parameter_Integer, 0 ),   --  : whbhd (Integer)
           1545 => ( Parameter_Integer, 0 ),   --  : wjsasp (Integer)
           1546 => ( Parameter_Integer, 0 ),   --  : wesasp (Integer)
           1547 => ( Parameter_Integer, 0 ),   --  : wissp (Integer)
           1548 => ( Parameter_Integer, 0 ),   --  : wothbesp (Integer)
           1549 => ( Parameter_Integer, 0 ),   --  : wtubensp (Integer)
           1550 => ( Parameter_Integer, 0 ),   --  : wfsbensp (Integer)
           1551 => ( Parameter_Integer, 0 ),   --  : wsicinsp (Integer)
           1552 => ( Parameter_Integer, 0 ),   --  : waccinsp (Integer)
           1553 => ( Parameter_Integer, 0 ),   --  : whosinsp (Integer)
           1554 => ( Parameter_Integer, 0 ),   --  : wkiwcsp (Integer)
           1555 => ( Parameter_Integer, 0 ),   --  : wkr2wsp (Integer)
           1556 => ( Parameter_Integer, 0 ),   --  : wuninssp (Integer)
           1557 => ( Parameter_Integer, 0 ),   --  : wpehinsp (Integer)
           1558 => ( Parameter_Integer, 0 ),   --  : wotsinsp (Integer)
           1559 => ( Parameter_Integer, 0 ),   --  : wocicsp (Integer)
           1560 => ( Parameter_Integer, 0 ),   --  : whbsp (Integer)
           1561 => ( Parameter_Integer, 0 ),   --  : yjsahd (Integer)
           1562 => ( Parameter_Integer, 0 ),   --  : yesahd (Integer)
           1563 => ( Parameter_Integer, 0 ),   --  : yishd (Integer)
           1564 => ( Parameter_Integer, 0 ),   --  : yhbhd (Integer)
           1565 => ( Parameter_Integer, 0 ),   --  : yjsasp (Integer)
           1566 => ( Parameter_Integer, 0 ),   --  : yesasp (Integer)
           1567 => ( Parameter_Integer, 0 ),   --  : yissp (Integer)
           1568 => ( Parameter_Integer, 0 ),   --  : yhbsp (Integer)
           1569 => ( Parameter_Integer, 0 ),   --  : prothbhd (Integer)
           1570 => ( Parameter_Integer, 0 ),   --  : prtubehd (Integer)
           1571 => ( Parameter_Integer, 0 ),   --  : prfsbehd (Integer)
           1572 => ( Parameter_Integer, 0 ),   --  : prsicihd (Integer)
           1573 => ( Parameter_Integer, 0 ),   --  : praccihd (Integer)
           1574 => ( Parameter_Integer, 0 ),   --  : prhosihd (Integer)
           1575 => ( Parameter_Integer, 0 ),   --  : pruninhd (Integer)
           1576 => ( Parameter_Integer, 0 ),   --  : prphinhd (Integer)
           1577 => ( Parameter_Integer, 0 ),   --  : prosinhd (Integer)
           1578 => ( Parameter_Integer, 0 ),   --  : prcichd (Integer)
           1579 => ( Parameter_Integer, 0 ),   --  : prothbsp (Integer)
           1580 => ( Parameter_Integer, 0 ),   --  : prtubesp (Integer)
           1581 => ( Parameter_Integer, 0 ),   --  : prfsbesp (Integer)
           1582 => ( Parameter_Integer, 0 ),   --  : prsicisp (Integer)
           1583 => ( Parameter_Integer, 0 ),   --  : praccisp (Integer)
           1584 => ( Parameter_Integer, 0 ),   --  : prhosisp (Integer)
           1585 => ( Parameter_Integer, 0 ),   --  : pruninsp (Integer)
           1586 => ( Parameter_Integer, 0 ),   --  : prphinsp (Integer)
           1587 => ( Parameter_Integer, 0 ),   --  : prosinsp (Integer)
           1588 => ( Parameter_Integer, 0 ),   --  : prcicsp (Integer)
           1589 => ( Parameter_Integer, 0 ),   --  : uspenchd (Integer)
           1590 => ( Parameter_Integer, 0 ),   --  : usrphd (Integer)
           1591 => ( Parameter_Integer, 0 ),   --  : uswphd (Integer)
           1592 => ( Parameter_Integer, 0 ),   --  : usjsahd (Integer)
           1593 => ( Parameter_Integer, 0 ),   --  : usishd (Integer)
           1594 => ( Parameter_Integer, 0 ),   --  : uspencsp (Integer)
           1595 => ( Parameter_Integer, 0 ),   --  : usrpsp (Integer)
           1596 => ( Parameter_Integer, 0 ),   --  : uswpsp (Integer)
           1597 => ( Parameter_Integer, 0 ),   --  : usjsasp (Integer)
           1598 => ( Parameter_Integer, 0 ),   --  : usissp (Integer)
           1599 => ( Parameter_Integer, 0 ),   --  : gicacahd (Integer)
           1600 => ( Parameter_Integer, 0 ),   --  : pencrdhd (Integer)
           1601 => ( Parameter_Integer, 0 ),   --  : gicaahd (Integer)
           1602 => ( Parameter_Integer, 0 ),   --  : muibwhd (Integer)
           1603 => ( Parameter_Integer, 0 ),   --  : wfuelhd (Integer)
           1604 => ( Parameter_Integer, 0 ),   --  : exhbtyhd (Integer)
           1605 => ( Parameter_Integer, 0 ),   --  : lnodwphd (Integer)
           1606 => ( Parameter_Integer, 0 ),   --  : lnolahd (Integer)
           1607 => ( Parameter_Integer, 0 ),   --  : gicacasp (Integer)
           1608 => ( Parameter_Integer, 0 ),   --  : pencrdsp (Integer)
           1609 => ( Parameter_Integer, 0 ),   --  : gicaasp (Integer)
           1610 => ( Parameter_Integer, 0 ),   --  : muibwsp (Integer)
           1611 => ( Parameter_Integer, 0 ),   --  : wfuelsp (Integer)
           1612 => ( Parameter_Integer, 0 ),   --  : exhbtysp (Integer)
           1613 => ( Parameter_Integer, 0 ),   --  : lnodwpsp (Integer)
           1614 => ( Parameter_Integer, 0 ),   --  : lnolasp (Integer)
           1615 => ( Parameter_Integer, 0 ),   --  : dcpayhd (Integer)
           1616 => ( Parameter_Integer, 0 ),   --  : dmpayhd (Integer)
           1617 => ( Parameter_Integer, 0 ),   --  : ecpenchd (Integer)
           1618 => ( Parameter_Integer, 0 ),   --  : wporbahd (Integer)
           1619 => ( Parameter_Integer, 0 ),   --  : aapayhd (Integer)
           1620 => ( Parameter_Integer, 0 ),   --  : jsatyphd (Integer)
           1621 => ( Parameter_Integer, 0 ),   --  : esatyphd (Integer)
           1622 => ( Parameter_Integer, 0 ),   --  : mupibhd (Integer)
           1623 => ( Parameter_Integer, 0 ),   --  : dssishd (Integer)
           1624 => ( Parameter_Integer, 0 ),   --  : dssjsahd (Integer)
           1625 => ( Parameter_Integer, 0 ),   --  : sfincihd (Integer)
           1626 => ( Parameter_Integer, 0 ),   --  : sfincjhd (Integer)
           1627 => ( Parameter_Integer, 0 ),   --  : pdlpayhd (Integer)
           1628 => ( Parameter_Integer, 0 ),   --  : pmpayhd (Integer)
           1629 => ( Parameter_Integer, 0 ),   --  : dwpuchd (Integer)
           1630 => ( Parameter_Integer, 0 ),   --  : sfinuchd (Integer)
           1631 => ( Parameter_Integer, 0 ),   --  : dcpaysp (Integer)
           1632 => ( Parameter_Integer, 0 ),   --  : dmpaysp (Integer)
           1633 => ( Parameter_Integer, 0 ),   --  : ecpencsp (Integer)
           1634 => ( Parameter_Integer, 0 ),   --  : wporbasp (Integer)
           1635 => ( Parameter_Integer, 0 ),   --  : aapaysp (Integer)
           1636 => ( Parameter_Integer, 0 ),   --  : jsatypsp (Integer)
           1637 => ( Parameter_Integer, 0 ),   --  : esatypsp (Integer)
           1638 => ( Parameter_Integer, 0 ),   --  : mupibsp (Integer)
           1639 => ( Parameter_Integer, 0 ),   --  : dssissp (Integer)
           1640 => ( Parameter_Integer, 0 ),   --  : dssjsasp (Integer)
           1641 => ( Parameter_Integer, 0 ),   --  : sfincisp (Integer)
           1642 => ( Parameter_Integer, 0 ),   --  : sfincjsp (Integer)
           1643 => ( Parameter_Integer, 0 ),   --  : pdlpaysp (Integer)
           1644 => ( Parameter_Integer, 0 ),   --  : pmpaysp (Integer)
           1645 => ( Parameter_Integer, 0 ),   --  : dwpucsp (Integer)
           1646 => ( Parameter_Integer, 0 ),   --  : sfinucsp (Integer)
           1647 => ( Parameter_Integer, 0 ),   --  : icaperhd (Integer)
           1648 => ( Parameter_Integer, 0 ),   --  : pmuibhd (Integer)
           1649 => ( Parameter_Integer, 0 ),   --  : pipmothd (Integer)
           1650 => ( Parameter_Integer, 0 ),   --  : icapersp (Integer)
           1651 => ( Parameter_Integer, 0 ),   --  : pmuibsp (Integer)
           1652 => ( Parameter_Integer, 0 ),   --  : pipmotsp (Integer)
           1653 => ( Parameter_Integer, 0 ),   --  : r1dlchd (Integer)
           1654 => ( Parameter_Integer, 0 ),   --  : r1dlmhd (Integer)
           1655 => ( Parameter_Integer, 0 ),   --  : r1aahd (Integer)
           1656 => ( Parameter_Integer, 0 ),   --  : r1hbhd (Integer)
           1657 => ( Parameter_Integer, 0 ),   --  : r1pipdhd (Integer)
           1658 => ( Parameter_Integer, 0 ),   --  : r1pipmhd (Integer)
           1659 => ( Parameter_Integer, 0 ),   --  : r1dlcsp (Integer)
           1660 => ( Parameter_Integer, 0 ),   --  : r1dlmsp (Integer)
           1661 => ( Parameter_Integer, 0 ),   --  : r1aasp (Integer)
           1662 => ( Parameter_Integer, 0 ),   --  : r1hbsp (Integer)
           1663 => ( Parameter_Integer, 0 ),   --  : r1pipdsp (Integer)
           1664 => ( Parameter_Integer, 0 ),   --  : r1pipmsp (Integer)
           1665 => ( Parameter_Integer, 0 ),   --  : r2dlchd (Integer)
           1666 => ( Parameter_Integer, 0 ),   --  : r2dlmhd (Integer)
           1667 => ( Parameter_Integer, 0 ),   --  : r2aahd (Integer)
           1668 => ( Parameter_Integer, 0 ),   --  : r2hbhd (Integer)
           1669 => ( Parameter_Integer, 0 ),   --  : r2pipdhd (Integer)
           1670 => ( Parameter_Integer, 0 ),   --  : r2pipmhd (Integer)
           1671 => ( Parameter_Integer, 0 ),   --  : r2dlcsp (Integer)
           1672 => ( Parameter_Integer, 0 ),   --  : r2dlmsp (Integer)
           1673 => ( Parameter_Integer, 0 ),   --  : r2aasp (Integer)
           1674 => ( Parameter_Integer, 0 ),   --  : r2hbsp (Integer)
           1675 => ( Parameter_Integer, 0 ),   --  : r2pipdsp (Integer)
           1676 => ( Parameter_Integer, 0 ),   --  : r2pipmsp (Integer)
           1677 => ( Parameter_Integer, 0 ),   --  : r3dlchd (Integer)
           1678 => ( Parameter_Integer, 0 ),   --  : r3dlmhd (Integer)
           1679 => ( Parameter_Integer, 0 ),   --  : r3aahd (Integer)
           1680 => ( Parameter_Integer, 0 ),   --  : r3hbhd (Integer)
           1681 => ( Parameter_Integer, 0 ),   --  : r3pipdhd (Integer)
           1682 => ( Parameter_Integer, 0 ),   --  : r3pipmhd (Integer)
           1683 => ( Parameter_Integer, 0 ),   --  : r3dlcsp (Integer)
           1684 => ( Parameter_Integer, 0 ),   --  : r3dlmsp (Integer)
           1685 => ( Parameter_Integer, 0 ),   --  : r3aasp (Integer)
           1686 => ( Parameter_Integer, 0 ),   --  : r3hbsp (Integer)
           1687 => ( Parameter_Integer, 0 ),   --  : r3pipdsp (Integer)
           1688 => ( Parameter_Integer, 0 ),   --  : r3pipmsp (Integer)
           1689 => ( Parameter_Integer, 0 ),   --  : r4dlchd (Integer)
           1690 => ( Parameter_Integer, 0 ),   --  : r4dlmhd (Integer)
           1691 => ( Parameter_Integer, 0 ),   --  : r4aahd (Integer)
           1692 => ( Parameter_Integer, 0 ),   --  : r4hbhd (Integer)
           1693 => ( Parameter_Integer, 0 ),   --  : r4pipdhd (Integer)
           1694 => ( Parameter_Integer, 0 ),   --  : r4pipmhd (Integer)
           1695 => ( Parameter_Integer, 0 ),   --  : r4dlcsp (Integer)
           1696 => ( Parameter_Integer, 0 ),   --  : r4dlmsp (Integer)
           1697 => ( Parameter_Integer, 0 ),   --  : r4aasp (Integer)
           1698 => ( Parameter_Integer, 0 ),   --  : r4hbsp (Integer)
           1699 => ( Parameter_Integer, 0 ),   --  : r4pipdsp (Integer)
           1700 => ( Parameter_Integer, 0 ),   --  : r4pipmsp (Integer)
           1701 => ( Parameter_Integer, 0 ),   --  : r5dlchd (Integer)
           1702 => ( Parameter_Integer, 0 ),   --  : r5dlmhd (Integer)
           1703 => ( Parameter_Integer, 0 ),   --  : r5aahd (Integer)
           1704 => ( Parameter_Integer, 0 ),   --  : r5hbhd (Integer)
           1705 => ( Parameter_Integer, 0 ),   --  : r5pipdhd (Integer)
           1706 => ( Parameter_Integer, 0 ),   --  : r5pipmhd (Integer)
           1707 => ( Parameter_Integer, 0 ),   --  : r5dlcsp (Integer)
           1708 => ( Parameter_Integer, 0 ),   --  : r5dlmsp (Integer)
           1709 => ( Parameter_Integer, 0 ),   --  : r5aasp (Integer)
           1710 => ( Parameter_Integer, 0 ),   --  : r5hbsp (Integer)
           1711 => ( Parameter_Integer, 0 ),   --  : r5pipdsp (Integer)
           1712 => ( Parameter_Integer, 0 ),   --  : r5pipmsp (Integer)
           1713 => ( Parameter_Integer, 0 ),   --  : stdlacc1 (Integer)
           1714 => ( Parameter_Integer, 0 ),   --  : stdlamc1 (Integer)
           1715 => ( Parameter_Integer, 0 ),   --  : stdlacc2 (Integer)
           1716 => ( Parameter_Integer, 0 ),   --  : stdlamc2 (Integer)
           1717 => ( Parameter_Integer, 0 ),   --  : stdlacc3 (Integer)
           1718 => ( Parameter_Integer, 0 ),   --  : stdlamc3 (Integer)
           1719 => ( Parameter_Integer, 0 ),   --  : stdlacc4 (Integer)
           1720 => ( Parameter_Integer, 0 ),   --  : stdlamc4 (Integer)
           1721 => ( Parameter_Integer, 0 ),   --  : stdlacc5 (Integer)
           1722 => ( Parameter_Integer, 0 ),   --  : stdlamc5 (Integer)
           1723 => ( Parameter_Integer, 0 ),   --  : stdlacc6 (Integer)
           1724 => ( Parameter_Integer, 0 ),   --  : stdlamc6 (Integer)
           1725 => ( Parameter_Integer, 0 ),   --  : stdlacc7 (Integer)
           1726 => ( Parameter_Integer, 0 ),   --  : stdlamc7 (Integer)
           1727 => ( Parameter_Integer, 0 ),   --  : stdlacc8 (Integer)
           1728 => ( Parameter_Integer, 0 ),   --  : stdlamc8 (Integer)
           1729 => ( Parameter_Integer, 0 ),   --  : stdlacc9 (Integer)
           1730 => ( Parameter_Integer, 0 ),   --  : stdlamc9 (Integer)
           1731 => ( Parameter_Float, 0.0 ),   --  : dlacac1 (Amount)
           1732 => ( Parameter_Float, 0.0 ),   --  : dlamoc1 (Amount)
           1733 => ( Parameter_Float, 0.0 ),   --  : dlacac2 (Amount)
           1734 => ( Parameter_Float, 0.0 ),   --  : dlamoc2 (Amount)
           1735 => ( Parameter_Integer, 0 ),   --  : dlacac3 (Integer)
           1736 => ( Parameter_Integer, 0 ),   --  : dlamoc3 (Integer)
           1737 => ( Parameter_Integer, 0 ),   --  : dlacac4 (Integer)
           1738 => ( Parameter_Integer, 0 ),   --  : dlamoc4 (Integer)
           1739 => ( Parameter_Integer, 0 ),   --  : dlacac5 (Integer)
           1740 => ( Parameter_Integer, 0 ),   --  : dlamoc5 (Integer)
           1741 => ( Parameter_Integer, 0 ),   --  : dlacac6 (Integer)
           1742 => ( Parameter_Integer, 0 ),   --  : dlamoc6 (Integer)
           1743 => ( Parameter_Integer, 0 ),   --  : dlacac7 (Integer)
           1744 => ( Parameter_Integer, 0 ),   --  : dlamoc7 (Integer)
           1745 => ( Parameter_Integer, 0 ),   --  : dlacac8 (Integer)
           1746 => ( Parameter_Integer, 0 ),   --  : dlamoc8 (Integer)
           1747 => ( Parameter_Integer, 0 ),   --  : dlacac9 (Integer)
           1748 => ( Parameter_Integer, 0 ),   --  : dlamoc9 (Integer)
           1749 => ( Parameter_Integer, 0 ),   --  : ltdlacc1 (Integer)
           1750 => ( Parameter_Integer, 0 ),   --  : ltdlamc1 (Integer)
           1751 => ( Parameter_Integer, 0 ),   --  : ltdlacc2 (Integer)
           1752 => ( Parameter_Integer, 0 ),   --  : ltdlamc2 (Integer)
           1753 => ( Parameter_Integer, 0 ),   --  : ltdlacc3 (Integer)
           1754 => ( Parameter_Integer, 0 ),   --  : ltdlamc3 (Integer)
           1755 => ( Parameter_Integer, 0 ),   --  : ltdlacc4 (Integer)
           1756 => ( Parameter_Integer, 0 ),   --  : ltdlamc4 (Integer)
           1757 => ( Parameter_Integer, 0 ),   --  : ltdlacc5 (Integer)
           1758 => ( Parameter_Integer, 0 ),   --  : ltdlamc5 (Integer)
           1759 => ( Parameter_Integer, 0 ),   --  : ltdlacc6 (Integer)
           1760 => ( Parameter_Integer, 0 ),   --  : ltdlamc6 (Integer)
           1761 => ( Parameter_Integer, 0 ),   --  : ltdlacc7 (Integer)
           1762 => ( Parameter_Integer, 0 ),   --  : ltdlamc7 (Integer)
           1763 => ( Parameter_Integer, 0 ),   --  : ltdlacc8 (Integer)
           1764 => ( Parameter_Integer, 0 ),   --  : ltdlamc8 (Integer)
           1765 => ( Parameter_Integer, 0 ),   --  : ltdlacc9 (Integer)
           1766 => ( Parameter_Integer, 0 ),   --  : ltdlamc9 (Integer)
           1767 => ( Parameter_Integer, 0 ),   --  : pdlacac1 (Integer)
           1768 => ( Parameter_Integer, 0 ),   --  : pdlamoc1 (Integer)
           1769 => ( Parameter_Integer, 0 ),   --  : pdlacac2 (Integer)
           1770 => ( Parameter_Integer, 0 ),   --  : pdlamoc2 (Integer)
           1771 => ( Parameter_Integer, 0 ),   --  : pdlacac3 (Integer)
           1772 => ( Parameter_Integer, 0 ),   --  : pdlamoc3 (Integer)
           1773 => ( Parameter_Integer, 0 ),   --  : pdlacac4 (Integer)
           1774 => ( Parameter_Integer, 0 ),   --  : pdlamoc4 (Integer)
           1775 => ( Parameter_Integer, 0 ),   --  : pdlacac5 (Integer)
           1776 => ( Parameter_Integer, 0 ),   --  : pdlamoc5 (Integer)
           1777 => ( Parameter_Integer, 0 ),   --  : pdlacac6 (Integer)
           1778 => ( Parameter_Integer, 0 ),   --  : pdlamoc6 (Integer)
           1779 => ( Parameter_Integer, 0 ),   --  : pdlacac7 (Integer)
           1780 => ( Parameter_Integer, 0 ),   --  : pdlamoc7 (Integer)
           1781 => ( Parameter_Integer, 0 ),   --  : pdlacac8 (Integer)
           1782 => ( Parameter_Integer, 0 ),   --  : pdlamoc8 (Integer)
           1783 => ( Parameter_Integer, 0 ),   --  : pdlacac9 (Integer)
           1784 => ( Parameter_Integer, 0 ),   --  : pdlamoc9 (Integer)
           1785 => ( Parameter_Integer, 0 ),   --  : dcpayc1 (Integer)
           1786 => ( Parameter_Integer, 0 ),   --  : dmpayc1 (Integer)
           1787 => ( Parameter_Integer, 0 ),   --  : dcpayc2 (Integer)
           1788 => ( Parameter_Integer, 0 ),   --  : dmpayc2 (Integer)
           1789 => ( Parameter_Integer, 0 ),   --  : dcpayc3 (Integer)
           1790 => ( Parameter_Integer, 0 ),   --  : dmpayc3 (Integer)
           1791 => ( Parameter_Integer, 0 ),   --  : dcpayc4 (Integer)
           1792 => ( Parameter_Integer, 0 ),   --  : dmpayc4 (Integer)
           1793 => ( Parameter_Integer, 0 ),   --  : dcpayc5 (Integer)
           1794 => ( Parameter_Integer, 0 ),   --  : dmpayc5 (Integer)
           1795 => ( Parameter_Integer, 0 ),   --  : dcpayc6 (Integer)
           1796 => ( Parameter_Integer, 0 ),   --  : dmpayc6 (Integer)
           1797 => ( Parameter_Integer, 0 ),   --  : dcpayc7 (Integer)
           1798 => ( Parameter_Integer, 0 ),   --  : dmpayc7 (Integer)
           1799 => ( Parameter_Integer, 0 ),   --  : dcpayc8 (Integer)
           1800 => ( Parameter_Integer, 0 ),   --  : dmpayc8 (Integer)
           1801 => ( Parameter_Integer, 0 ),   --  : dcpayc9 (Integer)
           1802 => ( Parameter_Integer, 0 ),   --  : dmpayc9 (Integer)
           1803 => ( Parameter_Integer, 0 ),   --  : r1dlcc1 (Integer)
           1804 => ( Parameter_Integer, 0 ),   --  : r1dlmc1 (Integer)
           1805 => ( Parameter_Integer, 0 ),   --  : r1dlcc2 (Integer)
           1806 => ( Parameter_Integer, 0 ),   --  : r1dlmc2 (Integer)
           1807 => ( Parameter_Integer, 0 ),   --  : r1dlcc3 (Integer)
           1808 => ( Parameter_Integer, 0 ),   --  : r1dlmc3 (Integer)
           1809 => ( Parameter_Integer, 0 ),   --  : r1dlcc4 (Integer)
           1810 => ( Parameter_Integer, 0 ),   --  : r1dlmc4 (Integer)
           1811 => ( Parameter_Integer, 0 ),   --  : r1dlcc5 (Integer)
           1812 => ( Parameter_Integer, 0 ),   --  : r1dlmc5 (Integer)
           1813 => ( Parameter_Integer, 0 ),   --  : r1dlcc6 (Integer)
           1814 => ( Parameter_Integer, 0 ),   --  : r1dlmc6 (Integer)
           1815 => ( Parameter_Integer, 0 ),   --  : r1dlcc7 (Integer)
           1816 => ( Parameter_Integer, 0 ),   --  : r1dlmc7 (Integer)
           1817 => ( Parameter_Integer, 0 ),   --  : r1dlcc8 (Integer)
           1818 => ( Parameter_Integer, 0 ),   --  : r1dlmc8 (Integer)
           1819 => ( Parameter_Integer, 0 ),   --  : r1dlcc9 (Integer)
           1820 => ( Parameter_Integer, 0 ),   --  : r1dlmc9 (Integer)
           1821 => ( Parameter_Integer, 0 ),   --  : r2dlcc1 (Integer)
           1822 => ( Parameter_Integer, 0 ),   --  : r2dlmc1 (Integer)
           1823 => ( Parameter_Integer, 0 ),   --  : r2dlcc2 (Integer)
           1824 => ( Parameter_Integer, 0 ),   --  : r2dlmc2 (Integer)
           1825 => ( Parameter_Integer, 0 ),   --  : r2dlcc3 (Integer)
           1826 => ( Parameter_Integer, 0 ),   --  : r2dlmc3 (Integer)
           1827 => ( Parameter_Integer, 0 ),   --  : r2dlcc4 (Integer)
           1828 => ( Parameter_Integer, 0 ),   --  : r2dlmc4 (Integer)
           1829 => ( Parameter_Integer, 0 ),   --  : r2dlcc5 (Integer)
           1830 => ( Parameter_Integer, 0 ),   --  : r2dlmc5 (Integer)
           1831 => ( Parameter_Integer, 0 ),   --  : r2dlcc6 (Integer)
           1832 => ( Parameter_Integer, 0 ),   --  : r2dlmc6 (Integer)
           1833 => ( Parameter_Integer, 0 ),   --  : r2dlcc7 (Integer)
           1834 => ( Parameter_Integer, 0 ),   --  : r2dlmc7 (Integer)
           1835 => ( Parameter_Integer, 0 ),   --  : r2dlcc8 (Integer)
           1836 => ( Parameter_Integer, 0 ),   --  : r2dlmc8 (Integer)
           1837 => ( Parameter_Integer, 0 ),   --  : r2dlcc9 (Integer)
           1838 => ( Parameter_Integer, 0 ),   --  : r2dlmc9 (Integer)
           1839 => ( Parameter_Integer, 0 ),   --  : r3dlcc1 (Integer)
           1840 => ( Parameter_Integer, 0 ),   --  : r3dlmc1 (Integer)
           1841 => ( Parameter_Integer, 0 ),   --  : r3dlcc2 (Integer)
           1842 => ( Parameter_Integer, 0 ),   --  : r3dlmc2 (Integer)
           1843 => ( Parameter_Integer, 0 ),   --  : r3dlcc3 (Integer)
           1844 => ( Parameter_Integer, 0 ),   --  : r3dlmc3 (Integer)
           1845 => ( Parameter_Integer, 0 ),   --  : r3dlcc4 (Integer)
           1846 => ( Parameter_Integer, 0 ),   --  : r3dlmc4 (Integer)
           1847 => ( Parameter_Integer, 0 ),   --  : r3dlcc5 (Integer)
           1848 => ( Parameter_Integer, 0 ),   --  : r3dlmc5 (Integer)
           1849 => ( Parameter_Integer, 0 ),   --  : r3dlcc6 (Integer)
           1850 => ( Parameter_Integer, 0 ),   --  : r3dlmc6 (Integer)
           1851 => ( Parameter_Integer, 0 ),   --  : r3dlcc7 (Integer)
           1852 => ( Parameter_Integer, 0 ),   --  : r3dlmc7 (Integer)
           1853 => ( Parameter_Integer, 0 ),   --  : r3dlcc8 (Integer)
           1854 => ( Parameter_Integer, 0 ),   --  : r3dlmc8 (Integer)
           1855 => ( Parameter_Integer, 0 ),   --  : r3dlcc9 (Integer)
           1856 => ( Parameter_Integer, 0 ),   --  : r3dlmc9 (Integer)
           1857 => ( Parameter_Integer, 0 ),   --  : r4dlcc1 (Integer)
           1858 => ( Parameter_Integer, 0 ),   --  : r4dlmc1 (Integer)
           1859 => ( Parameter_Integer, 0 ),   --  : r4dlcc2 (Integer)
           1860 => ( Parameter_Integer, 0 ),   --  : r4dlmc2 (Integer)
           1861 => ( Parameter_Integer, 0 ),   --  : r4dlcc3 (Integer)
           1862 => ( Parameter_Integer, 0 ),   --  : r4dlmc3 (Integer)
           1863 => ( Parameter_Integer, 0 ),   --  : r4dlcc4 (Integer)
           1864 => ( Parameter_Integer, 0 ),   --  : r4dlmc4 (Integer)
           1865 => ( Parameter_Integer, 0 ),   --  : r4dlcc5 (Integer)
           1866 => ( Parameter_Integer, 0 ),   --  : r4dlmc5 (Integer)
           1867 => ( Parameter_Integer, 0 ),   --  : r4dlcc6 (Integer)
           1868 => ( Parameter_Integer, 0 ),   --  : r4dlmc6 (Integer)
           1869 => ( Parameter_Integer, 0 ),   --  : r4dlcc7 (Integer)
           1870 => ( Parameter_Integer, 0 ),   --  : r4dlmc7 (Integer)
           1871 => ( Parameter_Integer, 0 ),   --  : r4dlcc8 (Integer)
           1872 => ( Parameter_Integer, 0 ),   --  : r4dlmc8 (Integer)
           1873 => ( Parameter_Integer, 0 ),   --  : r4dlcc9 (Integer)
           1874 => ( Parameter_Integer, 0 ),   --  : r4dlmc9 (Integer)
           1875 => ( Parameter_Integer, 0 ),   --  : r5dlcc1 (Integer)
           1876 => ( Parameter_Integer, 0 ),   --  : r5dlmc1 (Integer)
           1877 => ( Parameter_Integer, 0 ),   --  : r5dlcc2 (Integer)
           1878 => ( Parameter_Integer, 0 ),   --  : r5dlmc2 (Integer)
           1879 => ( Parameter_Integer, 0 ),   --  : r5dlcc3 (Integer)
           1880 => ( Parameter_Integer, 0 ),   --  : r5dlmc3 (Integer)
           1881 => ( Parameter_Integer, 0 ),   --  : r5dlcc4 (Integer)
           1882 => ( Parameter_Integer, 0 ),   --  : r5dlmc4 (Integer)
           1883 => ( Parameter_Integer, 0 ),   --  : r5dlcc5 (Integer)
           1884 => ( Parameter_Integer, 0 ),   --  : r5dlmc5 (Integer)
           1885 => ( Parameter_Integer, 0 ),   --  : r5dlcc6 (Integer)
           1886 => ( Parameter_Integer, 0 ),   --  : r5dlmc6 (Integer)
           1887 => ( Parameter_Integer, 0 ),   --  : r5dlcc7 (Integer)
           1888 => ( Parameter_Integer, 0 ),   --  : r5dlmc7 (Integer)
           1889 => ( Parameter_Integer, 0 ),   --  : r5dlcc8 (Integer)
           1890 => ( Parameter_Integer, 0 ),   --  : r5dlmc8 (Integer)
           1891 => ( Parameter_Integer, 0 ),   --  : r5dlcc9 (Integer)
           1892 => ( Parameter_Integer, 0 ),   --  : r5dlmc9 (Integer)
           1893 => ( Parameter_Integer, 0 ),   --  : adbtbl (Integer)
           1894 => ( Parameter_Integer, 0 ),   --  : adddec (Integer)
           1895 => ( Parameter_Integer, 0 ),   --  : addhol (Integer)
           1896 => ( Parameter_Integer, 0 ),   --  : addholr (Integer)
           1897 => ( Parameter_Integer, 0 ),   --  : addins (Integer)
           1898 => ( Parameter_Integer, 0 ),   --  : addmon (Integer)
           1899 => ( Parameter_Integer, 0 ),   --  : adepfur (Integer)
           1900 => ( Parameter_Integer, 0 ),   --  : adles (Integer)
           1901 => ( Parameter_Integer, 0 ),   --  : adlesoa (Integer)
           1902 => ( Parameter_Integer, 0 ),   --  : af1 (Integer)
           1903 => ( Parameter_Integer, 0 ),   --  : afdep2 (Integer)
           1904 => ( Parameter_Integer, 0 ),   --  : cdelply (Integer)
           1905 => ( Parameter_Integer, 0 ),   --  : cdepact (Integer)
           1906 => ( Parameter_Integer, 0 ),   --  : cdepbed (Integer)
           1907 => ( Parameter_Integer, 0 ),   --  : cdepcel (Integer)
           1908 => ( Parameter_Integer, 0 ),   --  : cdepeqp (Integer)
           1909 => ( Parameter_Integer, 0 ),   --  : cdephol (Integer)
           1910 => ( Parameter_Integer, 0 ),   --  : cdeples (Integer)
           1911 => ( Parameter_Integer, 0 ),   --  : cdeptea (Integer)
           1912 => ( Parameter_Integer, 0 ),   --  : cdeptrp (Integer)
           1913 => ( Parameter_Integer, 0 ),   --  : cdepveg (Integer)
           1914 => ( Parameter_Integer, 0 ),   --  : cdpcoat (Integer)
           1915 => ( Parameter_Integer, 0 ),   --  : clothes (Integer)
           1916 => ( Parameter_Integer, 0 ),   --  : cplay (Integer)
           1917 => ( Parameter_Integer, 0 ),   --  : debt10 (Integer)
           1918 => ( Parameter_Integer, 0 ),   --  : debt11 (Integer)
           1919 => ( Parameter_Integer, 0 ),   --  : debt12 (Integer)
           1920 => ( Parameter_Integer, 0 ),   --  : debt13 (Integer)
           1921 => ( Parameter_Integer, 0 ),   --  : debtar01 (Integer)
           1922 => ( Parameter_Integer, 0 ),   --  : debtar02 (Integer)
           1923 => ( Parameter_Integer, 0 ),   --  : debtar03 (Integer)
           1924 => ( Parameter_Integer, 0 ),   --  : debtar04 (Integer)
           1925 => ( Parameter_Integer, 0 ),   --  : debtar05 (Integer)
           1926 => ( Parameter_Integer, 0 ),   --  : debtar06 (Integer)
           1927 => ( Parameter_Integer, 0 ),   --  : debtar07 (Integer)
           1928 => ( Parameter_Integer, 0 ),   --  : debtar08 (Integer)
           1929 => ( Parameter_Integer, 0 ),   --  : debtar09 (Integer)
           1930 => ( Parameter_Integer, 0 ),   --  : debtar10 (Integer)
           1931 => ( Parameter_Integer, 0 ),   --  : debtar11 (Integer)
           1932 => ( Parameter_Integer, 0 ),   --  : debtar12 (Integer)
           1933 => ( Parameter_Integer, 0 ),   --  : debtar13 (Integer)
           1934 => ( Parameter_Integer, 0 ),   --  : debtfre1 (Integer)
           1935 => ( Parameter_Integer, 0 ),   --  : debtfre2 (Integer)
           1936 => ( Parameter_Integer, 0 ),   --  : debtfre3 (Integer)
           1937 => ( Parameter_Integer, 0 ),   --  : hbolng (Integer)
           1938 => ( Parameter_Integer, 0 ),   --  : houshe1 (Integer)
           1939 => ( Parameter_Integer, 0 ),   --  : kidinc (Integer)
           1940 => ( Parameter_Integer, 0 ),   --  : meal (Integer)
           1941 => ( Parameter_Integer, 0 ),   --  : nhhchild (Integer)
           1942 => ( Parameter_Integer, 0 ),   --  : oafur (Integer)
           1943 => ( Parameter_Integer, 0 ),   --  : oapre (Integer)
           1944 => ( Parameter_Integer, 0 ),   --  : outpay (Integer)
           1945 => ( Parameter_Float, 0.0 ),   --  : outpyamt (Amount)
           1946 => ( Parameter_Float, 0.0 ),   --  : regpamt (Amount)
           1947 => ( Parameter_Integer, 0 ),   --  : regularp (Integer)
           1948 => ( Parameter_Integer, 0 ),   --  : shoeoa (Integer)
           1949 => ( Parameter_Integer, 0 ),   --  : totsav (Integer)
           1950 => ( Parameter_Integer, 0 ),   --  : adultb (Integer)
           1951 => ( Parameter_Float, 0.0 ),   --  : boarder (Amount)
           1952 => ( Parameter_Integer, 0 ),   --  : bpeninc (Integer)
           1953 => ( Parameter_Integer, 0 ),   --  : bseinc (Integer)
           1954 => ( Parameter_Integer, 0 ),   --  : budisben (Integer)
           1955 => ( Parameter_Integer, 0 ),   --  : buearns (Integer)
           1956 => ( Parameter_Integer, 0 ),   --  : buethgr3 (Integer)
           1957 => ( Parameter_Integer, 0 ),   --  : buinc (Integer)
           1958 => ( Parameter_Integer, 0 ),   --  : buinv (Integer)
           1959 => ( Parameter_Integer, 0 ),   --  : buirben (Integer)
           1960 => ( Parameter_Integer, 0 ),   --  : bukids (Integer)
           1961 => ( Parameter_Integer, 0 ),   --  : bunirben (Integer)
           1962 => ( Parameter_Integer, 0 ),   --  : buothben (Integer)
           1963 => ( Parameter_Integer, 0 ),   --  : burent (Integer)
           1964 => ( Parameter_Integer, 0 ),   --  : burinc (Integer)
           1965 => ( Parameter_Integer, 0 ),   --  : burpinc (Integer)
           1966 => ( Parameter_Float, 0.0 ),   --  : butvlic (Amount)
           1967 => ( Parameter_Integer, 0 ),   --  : butxcred (Integer)
           1968 => ( Parameter_Integer, 0 ),   --  : depchldb (Integer)
           1969 => ( Parameter_Integer, 0 ),   --  : diswbua1 (Integer)
           1970 => ( Parameter_Integer, 0 ),   --  : diswbuc1 (Integer)
           1971 => ( Parameter_Integer, 0 ),   --  : ecstatbu (Integer)
           1972 => ( Parameter_Integer, 0 ),   --  : famtypb2 (Integer)
           1973 => ( Parameter_Integer, 0 ),   --  : famtypbs (Integer)
           1974 => ( Parameter_Integer, 0 ),   --  : famtypbu (Integer)
           1975 => ( Parameter_Float, 0.0 ),   --  : fsfvbu (Amount)
           1976 => ( Parameter_Float, 0.0 ),   --  : fsmbu (Amount)
           1977 => ( Parameter_Float, 0.0 ),   --  : fsmlkbu (Amount)
           1978 => ( Parameter_Integer, 0 ),   --  : gross4 (Integer)
           1979 => ( Parameter_Integer, 0 ),   --  : hbindbu (Integer)
           1980 => ( Parameter_Integer, 0 ),   --  : hbindbu2 (Integer)
           1981 => ( Parameter_Float, 0.0 ),   --  : heartbu (Amount)
           1982 => ( Parameter_Integer, 0 ),   --  : kid04 (Integer)
           1983 => ( Parameter_Integer, 0 ),   --  : kid1115 (Integer)
           1984 => ( Parameter_Integer, 0 ),   --  : kid1619 (Integer)
           1985 => ( Parameter_Integer, 0 ),   --  : kid510 (Integer)
           1986 => ( Parameter_Float, 0.0 ),   --  : lodger (Amount)
           1987 => ( Parameter_Float, 0.0 ),   --  : subltamt (Amount)
           1988 => ( Parameter_Float, 0.0 ),   --  : totcapb3 (Amount)
           1989 => ( Parameter_Integer, 0 ),   --  : totsavbu (Integer)
           1990 => ( Parameter_Integer, 0 ),   --  : tuburent (Integer)
           1991 => ( Parameter_Integer, 0 ),   --  : youngch (Integer)
           1992 => ( Parameter_Integer, 0 ),   --  : clthsoa (Integer)
           1993 => ( Parameter_Integer, 0 ),   --  : debt1 (Integer)
           1994 => ( Parameter_Integer, 0 ),   --  : debt2 (Integer)
           1995 => ( Parameter_Integer, 0 ),   --  : debt3 (Integer)
           1996 => ( Parameter_Integer, 0 ),   --  : debt4 (Integer)
           1997 => ( Parameter_Integer, 0 ),   --  : debt5 (Integer)
           1998 => ( Parameter_Integer, 0 ),   --  : debt6 (Integer)
           1999 => ( Parameter_Integer, 0 ),   --  : debt7 (Integer)
           2000 => ( Parameter_Integer, 0 ),   --  : debt8 (Integer)
           2001 => ( Parameter_Integer, 0 ),   --  : debt9 (Integer)
           2002 => ( Parameter_Integer, 0 ),   --  : discbua (Integer)
           2003 => ( Parameter_Integer, 0 ),   --  : discbuc (Integer)
           2004 => ( Parameter_Float, 0.0 ),   --  : hbtham (Amount)
           2005 => ( Parameter_Integer, 0 ),   --  : hbthbu (Integer)
           2006 => ( Parameter_Integer, 0 ),   --  : hbthmn (Integer)
           2007 => ( Parameter_Integer, 0 ),   --  : hbthpd (Integer)
           2008 => ( Parameter_Integer, 0 ),   --  : hbthwk (Integer)
           2009 => ( Parameter_Integer, 0 ),   --  : hbthyr (Integer)
           2010 => ( Parameter_Integer, 0 ),   --  : hbwait (Integer)
           2011 => ( Parameter_Integer, 0 ),   --  : intrnt (Integer)
           2012 => ( Parameter_Integer, 0 ),   --  : oadep (Integer)
           2013 => ( Parameter_Integer, 0 ),   --  : oanet (Integer)
           2014 => ( Parameter_Integer, 0 ),   --  : dynhthd (Integer)
           2015 => ( Parameter_Integer, 0 ),   --  : dynhtsp (Integer)
           2016 => ( Parameter_Integer, 0 ),   --  : freqhd (Integer)
           2017 => ( Parameter_Integer, 0 ),   --  : freqsp (Integer)
           2018 => ( Parameter_Integer, 0 ),   --  : hur01hd (Integer)
           2019 => ( Parameter_Integer, 0 ),   --  : hur01sp (Integer)
           2020 => ( Parameter_Integer, 0 ),   --  : hur02hd (Integer)
           2021 => ( Parameter_Integer, 0 ),   --  : hur02sp (Integer)
           2022 => ( Parameter_Integer, 0 ),   --  : hur03hd (Integer)
           2023 => ( Parameter_Integer, 0 ),   --  : hur03sp (Integer)
           2024 => ( Parameter_Integer, 0 ),   --  : hur04hd (Integer)
           2025 => ( Parameter_Integer, 0 ),   --  : hur04sp (Integer)
           2026 => ( Parameter_Integer, 0 ),   --  : hur05hd (Integer)
           2027 => ( Parameter_Integer, 0 ),   --  : hur05sp (Integer)
           2028 => ( Parameter_Integer, 0 ),   --  : hur06hd (Integer)
           2029 => ( Parameter_Integer, 0 ),   --  : hur06sp (Integer)
           2030 => ( Parameter_Integer, 0 ),   --  : hur07hd (Integer)
           2031 => ( Parameter_Integer, 0 ),   --  : hur07sp (Integer)
           2032 => ( Parameter_Integer, 0 ),   --  : hur08hd (Integer)
           2033 => ( Parameter_Integer, 0 ),   --  : hur08sp (Integer)
           2034 => ( Parameter_Integer, 0 ),   --  : hur09hd (Integer)
           2035 => ( Parameter_Integer, 0 ),   --  : hur09sp (Integer)
           2036 => ( Parameter_Integer, 0 ),   --  : hur10hd (Integer)
           2037 => ( Parameter_Integer, 0 ),   --  : hur10sp (Integer)
           2038 => ( Parameter_Integer, 0 ),   --  : hur11hd (Integer)
           2039 => ( Parameter_Integer, 0 ),   --  : hur11sp (Integer)
           2040 => ( Parameter_Integer, 0 ),   --  : hur12hd (Integer)
           2041 => ( Parameter_Integer, 0 ),   --  : hur12sp (Integer)
           2042 => ( Parameter_Integer, 0 ),   --  : hur13hd (Integer)
           2043 => ( Parameter_Integer, 0 ),   --  : hur13sp (Integer)
           2044 => ( Parameter_Integer, 0 ),   --  : hur14hd (Integer)
           2045 => ( Parameter_Integer, 0 ),   --  : hur14sp (Integer)
           2046 => ( Parameter_Integer, 0 ),   --  : hur15hd (Integer)
           2047 => ( Parameter_Integer, 0 ),   --  : hur15sp (Integer)
           2048 => ( Parameter_Integer, 0 ),   --  : hur16hd (Integer)
           2049 => ( Parameter_Integer, 0 ),   --  : hur16sp (Integer)
           2050 => ( Parameter_Integer, 0 ),   --  : hur17hd (Integer)
           2051 => ( Parameter_Integer, 0 ),   --  : hur17sp (Integer)
           2052 => ( Parameter_Integer, 0 ),   --  : hur18hd (Integer)
           2053 => ( Parameter_Integer, 0 ),   --  : hur18sp (Integer)
           2054 => ( Parameter_Integer, 0 ),   --  : hur19hd (Integer)
           2055 => ( Parameter_Integer, 0 ),   --  : hur19sp (Integer)
           2056 => ( Parameter_Integer, 0 ),   --  : hur20hd (Integer)
           2057 => ( Parameter_Integer, 0 ),   --  : hur20sp (Integer)
           2058 => ( Parameter_Integer, 0 ),   --  : whl01hd (Integer)
           2059 => ( Parameter_Integer, 0 ),   --  : whl01sp (Integer)
           2060 => ( Parameter_Integer, 0 ),   --  : whl02hd (Integer)
           2061 => ( Parameter_Integer, 0 ),   --  : whl02sp (Integer)
           2062 => ( Parameter_Integer, 0 ),   --  : whl03hd (Integer)
           2063 => ( Parameter_Integer, 0 ),   --  : whl03sp (Integer)
           2064 => ( Parameter_Integer, 0 ),   --  : whl04hd (Integer)
           2065 => ( Parameter_Integer, 0 ),   --  : whl04sp (Integer)
           2066 => ( Parameter_Integer, 0 ),   --  : whl05hd (Integer)
           2067 => ( Parameter_Integer, 0 ),   --  : whl05sp (Integer)
           2068 => ( Parameter_Integer, 0 ),   --  : whl06hd (Integer)
           2069 => ( Parameter_Integer, 0 ),   --  : whl06sp (Integer)
           2070 => ( Parameter_Integer, 0 ),   --  : whl07hd (Integer)
           2071 => ( Parameter_Integer, 0 ),   --  : whl07sp (Integer)
           2072 => ( Parameter_Integer, 0 ),   --  : whl08hd (Integer)
           2073 => ( Parameter_Integer, 0 ),   --  : whl08sp (Integer)
           2074 => ( Parameter_Integer, 0 ),   --  : whl09hd (Integer)
           2075 => ( Parameter_Integer, 0 ),   --  : whl09sp (Integer)
           2076 => ( Parameter_Integer, 0 ),   --  : whl10hd (Integer)
           2077 => ( Parameter_Integer, 0 ),   --  : whl10sp (Integer)
           2078 => ( Parameter_Integer, 0 ),   --  : whl11hd (Integer)
           2079 => ( Parameter_Integer, 0 ),   --  : whl11sp (Integer)
           2080 => ( Parameter_Integer, 0 ),   --  : whl12hd (Integer)
           2081 => ( Parameter_Integer, 0 ),   --  : whl12sp (Integer)
           2082 => ( Parameter_Integer, 0 ),   --  : whl13hd (Integer)
           2083 => ( Parameter_Integer, 0 ),   --  : whl13sp (Integer)
           2084 => ( Parameter_Integer, 0 ),   --  : whl14hd (Integer)
           2085 => ( Parameter_Integer, 0 ),   --  : whl14sp (Integer)
           2086 => ( Parameter_Integer, 0 ),   --  : whl15hd (Integer)
           2087 => ( Parameter_Integer, 0 ),   --  : whl15sp (Integer)
           2088 => ( Parameter_Integer, 0 ),   --  : whl16hd (Integer)
           2089 => ( Parameter_Integer, 0 ),   --  : whl16sp (Integer)
           2090 => ( Parameter_Integer, 0 ),   --  : whl17hd (Integer)
           2091 => ( Parameter_Integer, 0 ),   --  : whl17sp (Integer)
           2092 => ( Parameter_Integer, 0 ),   --  : whl18hd (Integer)
           2093 => ( Parameter_Integer, 0 ),   --  : whl18sp (Integer)
           2094 => ( Parameter_Integer, 0 ),   --  : whl19hd (Integer)
           2095 => ( Parameter_Integer, 0 ),   --  : whl19sp (Integer)
           2096 => ( Parameter_Integer, 0 ),   --  : whl20hd (Integer)
           2097 => ( Parameter_Integer, 0 ),   --  : whl20sp (Integer)
           2098 => ( Parameter_Integer, 0 ),   --  : dynhtc1 (Integer)
           2099 => ( Parameter_Integer, 0 ),   --  : dynhtc2 (Integer)
           2100 => ( Parameter_Integer, 0 ),   --  : dynhtc3 (Integer)
           2101 => ( Parameter_Integer, 0 ),   --  : dynhtc4 (Integer)
           2102 => ( Parameter_Integer, 0 ),   --  : dynhtc5 (Integer)
           2103 => ( Parameter_Integer, 0 ),   --  : dynhtc6 (Integer)
           2104 => ( Parameter_Integer, 0 ),   --  : dynhtc7 (Integer)
           2105 => ( Parameter_Integer, 0 ),   --  : dynhtc8 (Integer)
           2106 => ( Parameter_Integer, 0 ),   --  : dynhtc9 (Integer)
           2107 => ( Parameter_Integer, 0 ),   --  : freqc1 (Integer)
           2108 => ( Parameter_Integer, 0 ),   --  : freqc2 (Integer)
           2109 => ( Parameter_Integer, 0 ),   --  : freqc3 (Integer)
           2110 => ( Parameter_Integer, 0 ),   --  : freqc4 (Integer)
           2111 => ( Parameter_Integer, 0 ),   --  : freqc5 (Integer)
           2112 => ( Parameter_Integer, 0 ),   --  : freqc6 (Integer)
           2113 => ( Parameter_Integer, 0 ),   --  : freqc7 (Integer)
           2114 => ( Parameter_Integer, 0 ),   --  : freqc8 (Integer)
           2115 => ( Parameter_Integer, 0 ),   --  : freqc9 (Integer)
           2116 => ( Parameter_Integer, 0 ),   --  : hur01c1 (Integer)
           2117 => ( Parameter_Integer, 0 ),   --  : hur01c2 (Integer)
           2118 => ( Parameter_Integer, 0 ),   --  : hur01c3 (Integer)
           2119 => ( Parameter_Integer, 0 ),   --  : hur01c4 (Integer)
           2120 => ( Parameter_Integer, 0 ),   --  : hur01c5 (Integer)
           2121 => ( Parameter_Integer, 0 ),   --  : hur01c6 (Integer)
           2122 => ( Parameter_Integer, 0 ),   --  : hur01c7 (Integer)
           2123 => ( Parameter_Integer, 0 ),   --  : hur01c8 (Integer)
           2124 => ( Parameter_Integer, 0 ),   --  : hur01c9 (Integer)
           2125 => ( Parameter_Integer, 0 ),   --  : hur02c1 (Integer)
           2126 => ( Parameter_Integer, 0 ),   --  : hur02c2 (Integer)
           2127 => ( Parameter_Integer, 0 ),   --  : hur02c3 (Integer)
           2128 => ( Parameter_Integer, 0 ),   --  : hur02c4 (Integer)
           2129 => ( Parameter_Integer, 0 ),   --  : hur02c5 (Integer)
           2130 => ( Parameter_Integer, 0 ),   --  : hur02c6 (Integer)
           2131 => ( Parameter_Integer, 0 ),   --  : hur02c7 (Integer)
           2132 => ( Parameter_Integer, 0 ),   --  : hur02c8 (Integer)
           2133 => ( Parameter_Integer, 0 ),   --  : hur02c9 (Integer)
           2134 => ( Parameter_Integer, 0 ),   --  : hur03c1 (Integer)
           2135 => ( Parameter_Integer, 0 ),   --  : hur03c2 (Integer)
           2136 => ( Parameter_Integer, 0 ),   --  : hur03c3 (Integer)
           2137 => ( Parameter_Integer, 0 ),   --  : hur03c4 (Integer)
           2138 => ( Parameter_Integer, 0 ),   --  : hur03c5 (Integer)
           2139 => ( Parameter_Integer, 0 ),   --  : hur03c6 (Integer)
           2140 => ( Parameter_Integer, 0 ),   --  : hur03c7 (Integer)
           2141 => ( Parameter_Integer, 0 ),   --  : hur03c8 (Integer)
           2142 => ( Parameter_Integer, 0 ),   --  : hur03c9 (Integer)
           2143 => ( Parameter_Integer, 0 ),   --  : hur04c1 (Integer)
           2144 => ( Parameter_Integer, 0 ),   --  : hur04c2 (Integer)
           2145 => ( Parameter_Integer, 0 ),   --  : hur04c3 (Integer)
           2146 => ( Parameter_Integer, 0 ),   --  : hur04c4 (Integer)
           2147 => ( Parameter_Integer, 0 ),   --  : hur04c5 (Integer)
           2148 => ( Parameter_Integer, 0 ),   --  : hur04c6 (Integer)
           2149 => ( Parameter_Integer, 0 ),   --  : hur04c7 (Integer)
           2150 => ( Parameter_Integer, 0 ),   --  : hur04c8 (Integer)
           2151 => ( Parameter_Integer, 0 ),   --  : hur04c9 (Integer)
           2152 => ( Parameter_Integer, 0 ),   --  : hur05c1 (Integer)
           2153 => ( Parameter_Integer, 0 ),   --  : hur05c2 (Integer)
           2154 => ( Parameter_Integer, 0 ),   --  : hur05c3 (Integer)
           2155 => ( Parameter_Integer, 0 ),   --  : hur05c4 (Integer)
           2156 => ( Parameter_Integer, 0 ),   --  : hur05c5 (Integer)
           2157 => ( Parameter_Integer, 0 ),   --  : hur05c6 (Integer)
           2158 => ( Parameter_Integer, 0 ),   --  : hur05c7 (Integer)
           2159 => ( Parameter_Integer, 0 ),   --  : hur05c8 (Integer)
           2160 => ( Parameter_Integer, 0 ),   --  : hur05c9 (Integer)
           2161 => ( Parameter_Integer, 0 ),   --  : hur06c1 (Integer)
           2162 => ( Parameter_Integer, 0 ),   --  : hur06c2 (Integer)
           2163 => ( Parameter_Integer, 0 ),   --  : hur06c3 (Integer)
           2164 => ( Parameter_Integer, 0 ),   --  : hur06c4 (Integer)
           2165 => ( Parameter_Integer, 0 ),   --  : hur06c5 (Integer)
           2166 => ( Parameter_Integer, 0 ),   --  : hur06c6 (Integer)
           2167 => ( Parameter_Integer, 0 ),   --  : hur06c7 (Integer)
           2168 => ( Parameter_Integer, 0 ),   --  : hur06c8 (Integer)
           2169 => ( Parameter_Integer, 0 ),   --  : hur06c9 (Integer)
           2170 => ( Parameter_Integer, 0 ),   --  : hur07c1 (Integer)
           2171 => ( Parameter_Integer, 0 ),   --  : hur07c2 (Integer)
           2172 => ( Parameter_Integer, 0 ),   --  : hur07c3 (Integer)
           2173 => ( Parameter_Integer, 0 ),   --  : hur07c4 (Integer)
           2174 => ( Parameter_Integer, 0 ),   --  : hur07c5 (Integer)
           2175 => ( Parameter_Integer, 0 ),   --  : hur07c6 (Integer)
           2176 => ( Parameter_Integer, 0 ),   --  : hur07c7 (Integer)
           2177 => ( Parameter_Integer, 0 ),   --  : hur07c8 (Integer)
           2178 => ( Parameter_Integer, 0 ),   --  : hur07c9 (Integer)
           2179 => ( Parameter_Integer, 0 ),   --  : hur08c1 (Integer)
           2180 => ( Parameter_Integer, 0 ),   --  : hur08c2 (Integer)
           2181 => ( Parameter_Integer, 0 ),   --  : hur08c3 (Integer)
           2182 => ( Parameter_Integer, 0 ),   --  : hur08c4 (Integer)
           2183 => ( Parameter_Integer, 0 ),   --  : hur08c5 (Integer)
           2184 => ( Parameter_Integer, 0 ),   --  : hur08c6 (Integer)
           2185 => ( Parameter_Integer, 0 ),   --  : hur08c7 (Integer)
           2186 => ( Parameter_Integer, 0 ),   --  : hur08c8 (Integer)
           2187 => ( Parameter_Integer, 0 ),   --  : hur08c9 (Integer)
           2188 => ( Parameter_Integer, 0 ),   --  : hur09c1 (Integer)
           2189 => ( Parameter_Integer, 0 ),   --  : hur09c2 (Integer)
           2190 => ( Parameter_Integer, 0 ),   --  : hur09c3 (Integer)
           2191 => ( Parameter_Integer, 0 ),   --  : hur09c4 (Integer)
           2192 => ( Parameter_Integer, 0 ),   --  : hur09c5 (Integer)
           2193 => ( Parameter_Integer, 0 ),   --  : hur09c6 (Integer)
           2194 => ( Parameter_Integer, 0 ),   --  : hur09c7 (Integer)
           2195 => ( Parameter_Integer, 0 ),   --  : hur09c8 (Integer)
           2196 => ( Parameter_Integer, 0 ),   --  : hur09c9 (Integer)
           2197 => ( Parameter_Integer, 0 ),   --  : hur10c1 (Integer)
           2198 => ( Parameter_Integer, 0 ),   --  : hur10c2 (Integer)
           2199 => ( Parameter_Integer, 0 ),   --  : hur10c3 (Integer)
           2200 => ( Parameter_Integer, 0 ),   --  : hur10c4 (Integer)
           2201 => ( Parameter_Integer, 0 ),   --  : hur10c5 (Integer)
           2202 => ( Parameter_Integer, 0 ),   --  : hur10c6 (Integer)
           2203 => ( Parameter_Integer, 0 ),   --  : hur10c7 (Integer)
           2204 => ( Parameter_Integer, 0 ),   --  : hur10c8 (Integer)
           2205 => ( Parameter_Integer, 0 ),   --  : hur10c9 (Integer)
           2206 => ( Parameter_Integer, 0 ),   --  : hur11c1 (Integer)
           2207 => ( Parameter_Integer, 0 ),   --  : hur11c2 (Integer)
           2208 => ( Parameter_Integer, 0 ),   --  : hur11c3 (Integer)
           2209 => ( Parameter_Integer, 0 ),   --  : hur11c4 (Integer)
           2210 => ( Parameter_Integer, 0 ),   --  : hur11c5 (Integer)
           2211 => ( Parameter_Integer, 0 ),   --  : hur11c6 (Integer)
           2212 => ( Parameter_Integer, 0 ),   --  : hur11c7 (Integer)
           2213 => ( Parameter_Integer, 0 ),   --  : hur11c8 (Integer)
           2214 => ( Parameter_Integer, 0 ),   --  : hur11c9 (Integer)
           2215 => ( Parameter_Integer, 0 ),   --  : hur12c1 (Integer)
           2216 => ( Parameter_Integer, 0 ),   --  : hur12c2 (Integer)
           2217 => ( Parameter_Integer, 0 ),   --  : hur12c3 (Integer)
           2218 => ( Parameter_Integer, 0 ),   --  : hur12c4 (Integer)
           2219 => ( Parameter_Integer, 0 ),   --  : hur12c5 (Integer)
           2220 => ( Parameter_Integer, 0 ),   --  : hur12c6 (Integer)
           2221 => ( Parameter_Integer, 0 ),   --  : hur12c7 (Integer)
           2222 => ( Parameter_Integer, 0 ),   --  : hur12c8 (Integer)
           2223 => ( Parameter_Integer, 0 ),   --  : hur12c9 (Integer)
           2224 => ( Parameter_Integer, 0 ),   --  : hur13c1 (Integer)
           2225 => ( Parameter_Integer, 0 ),   --  : hur13c2 (Integer)
           2226 => ( Parameter_Integer, 0 ),   --  : hur13c3 (Integer)
           2227 => ( Parameter_Integer, 0 ),   --  : hur13c4 (Integer)
           2228 => ( Parameter_Integer, 0 ),   --  : hur13c5 (Integer)
           2229 => ( Parameter_Integer, 0 ),   --  : hur13c6 (Integer)
           2230 => ( Parameter_Integer, 0 ),   --  : hur13c7 (Integer)
           2231 => ( Parameter_Integer, 0 ),   --  : hur13c8 (Integer)
           2232 => ( Parameter_Integer, 0 ),   --  : hur13c9 (Integer)
           2233 => ( Parameter_Integer, 0 ),   --  : hur14c1 (Integer)
           2234 => ( Parameter_Integer, 0 ),   --  : hur14c2 (Integer)
           2235 => ( Parameter_Integer, 0 ),   --  : hur14c3 (Integer)
           2236 => ( Parameter_Integer, 0 ),   --  : hur14c4 (Integer)
           2237 => ( Parameter_Integer, 0 ),   --  : hur14c5 (Integer)
           2238 => ( Parameter_Integer, 0 ),   --  : hur14c6 (Integer)
           2239 => ( Parameter_Integer, 0 ),   --  : hur14c7 (Integer)
           2240 => ( Parameter_Integer, 0 ),   --  : hur14c8 (Integer)
           2241 => ( Parameter_Integer, 0 ),   --  : hur14c9 (Integer)
           2242 => ( Parameter_Integer, 0 ),   --  : hur15c1 (Integer)
           2243 => ( Parameter_Integer, 0 ),   --  : hur15c2 (Integer)
           2244 => ( Parameter_Integer, 0 ),   --  : hur15c3 (Integer)
           2245 => ( Parameter_Integer, 0 ),   --  : hur15c4 (Integer)
           2246 => ( Parameter_Integer, 0 ),   --  : hur15c5 (Integer)
           2247 => ( Parameter_Integer, 0 ),   --  : hur15c6 (Integer)
           2248 => ( Parameter_Integer, 0 ),   --  : hur15c7 (Integer)
           2249 => ( Parameter_Integer, 0 ),   --  : hur15c8 (Integer)
           2250 => ( Parameter_Integer, 0 ),   --  : hur15c9 (Integer)
           2251 => ( Parameter_Integer, 0 ),   --  : hur16c1 (Integer)
           2252 => ( Parameter_Integer, 0 ),   --  : hur16c2 (Integer)
           2253 => ( Parameter_Integer, 0 ),   --  : hur16c3 (Integer)
           2254 => ( Parameter_Integer, 0 ),   --  : hur16c4 (Integer)
           2255 => ( Parameter_Integer, 0 ),   --  : hur16c5 (Integer)
           2256 => ( Parameter_Integer, 0 ),   --  : hur16c6 (Integer)
           2257 => ( Parameter_Integer, 0 ),   --  : hur16c7 (Integer)
           2258 => ( Parameter_Integer, 0 ),   --  : hur16c8 (Integer)
           2259 => ( Parameter_Integer, 0 ),   --  : hur16c9 (Integer)
           2260 => ( Parameter_Integer, 0 ),   --  : hur17c1 (Integer)
           2261 => ( Parameter_Integer, 0 ),   --  : hur17c2 (Integer)
           2262 => ( Parameter_Integer, 0 ),   --  : hur17c3 (Integer)
           2263 => ( Parameter_Integer, 0 ),   --  : hur17c4 (Integer)
           2264 => ( Parameter_Integer, 0 ),   --  : hur17c5 (Integer)
           2265 => ( Parameter_Integer, 0 ),   --  : hur17c6 (Integer)
           2266 => ( Parameter_Integer, 0 ),   --  : hur17c7 (Integer)
           2267 => ( Parameter_Integer, 0 ),   --  : hur17c8 (Integer)
           2268 => ( Parameter_Integer, 0 ),   --  : hur17c9 (Integer)
           2269 => ( Parameter_Integer, 0 ),   --  : hur18c1 (Integer)
           2270 => ( Parameter_Integer, 0 ),   --  : hur18c2 (Integer)
           2271 => ( Parameter_Integer, 0 ),   --  : hur18c3 (Integer)
           2272 => ( Parameter_Integer, 0 ),   --  : hur18c4 (Integer)
           2273 => ( Parameter_Integer, 0 ),   --  : hur18c5 (Integer)
           2274 => ( Parameter_Integer, 0 ),   --  : hur18c6 (Integer)
           2275 => ( Parameter_Integer, 0 ),   --  : hur18c7 (Integer)
           2276 => ( Parameter_Integer, 0 ),   --  : hur18c8 (Integer)
           2277 => ( Parameter_Integer, 0 ),   --  : hur18c9 (Integer)
           2278 => ( Parameter_Integer, 0 ),   --  : hur19c1 (Integer)
           2279 => ( Parameter_Integer, 0 ),   --  : hur19c2 (Integer)
           2280 => ( Parameter_Integer, 0 ),   --  : hur19c3 (Integer)
           2281 => ( Parameter_Integer, 0 ),   --  : hur19c4 (Integer)
           2282 => ( Parameter_Integer, 0 ),   --  : hur19c5 (Integer)
           2283 => ( Parameter_Integer, 0 ),   --  : hur19c6 (Integer)
           2284 => ( Parameter_Integer, 0 ),   --  : hur19c7 (Integer)
           2285 => ( Parameter_Integer, 0 ),   --  : hur19c8 (Integer)
           2286 => ( Parameter_Integer, 0 ),   --  : hur19c9 (Integer)
           2287 => ( Parameter_Integer, 0 ),   --  : hur20c1 (Integer)
           2288 => ( Parameter_Integer, 0 ),   --  : hur20c2 (Integer)
           2289 => ( Parameter_Integer, 0 ),   --  : hur20c3 (Integer)
           2290 => ( Parameter_Integer, 0 ),   --  : hur20c4 (Integer)
           2291 => ( Parameter_Integer, 0 ),   --  : hur20c5 (Integer)
           2292 => ( Parameter_Integer, 0 ),   --  : hur20c6 (Integer)
           2293 => ( Parameter_Integer, 0 ),   --  : hur20c7 (Integer)
           2294 => ( Parameter_Integer, 0 ),   --  : hur20c8 (Integer)
           2295 => ( Parameter_Integer, 0 ),   --  : hur20c9 (Integer)
           2296 => ( Parameter_Integer, 0 ),   --  : whl01c1 (Integer)
           2297 => ( Parameter_Integer, 0 ),   --  : whl01c2 (Integer)
           2298 => ( Parameter_Integer, 0 ),   --  : whl01c3 (Integer)
           2299 => ( Parameter_Integer, 0 ),   --  : whl01c4 (Integer)
           2300 => ( Parameter_Integer, 0 ),   --  : whl01c5 (Integer)
           2301 => ( Parameter_Integer, 0 ),   --  : whl01c6 (Integer)
           2302 => ( Parameter_Integer, 0 ),   --  : whl01c7 (Integer)
           2303 => ( Parameter_Integer, 0 ),   --  : whl01c8 (Integer)
           2304 => ( Parameter_Integer, 0 ),   --  : whl01c9 (Integer)
           2305 => ( Parameter_Integer, 0 ),   --  : whl02c1 (Integer)
           2306 => ( Parameter_Integer, 0 ),   --  : whl02c2 (Integer)
           2307 => ( Parameter_Integer, 0 ),   --  : whl02c3 (Integer)
           2308 => ( Parameter_Integer, 0 ),   --  : whl02c4 (Integer)
           2309 => ( Parameter_Integer, 0 ),   --  : whl02c5 (Integer)
           2310 => ( Parameter_Integer, 0 ),   --  : whl02c6 (Integer)
           2311 => ( Parameter_Integer, 0 ),   --  : whl02c7 (Integer)
           2312 => ( Parameter_Integer, 0 ),   --  : whl02c8 (Integer)
           2313 => ( Parameter_Integer, 0 ),   --  : whl02c9 (Integer)
           2314 => ( Parameter_Integer, 0 ),   --  : whl03c1 (Integer)
           2315 => ( Parameter_Integer, 0 ),   --  : whl03c2 (Integer)
           2316 => ( Parameter_Integer, 0 ),   --  : whl03c3 (Integer)
           2317 => ( Parameter_Integer, 0 ),   --  : whl03c4 (Integer)
           2318 => ( Parameter_Integer, 0 ),   --  : whl03c5 (Integer)
           2319 => ( Parameter_Integer, 0 ),   --  : whl03c6 (Integer)
           2320 => ( Parameter_Integer, 0 ),   --  : whl03c7 (Integer)
           2321 => ( Parameter_Integer, 0 ),   --  : whl03c8 (Integer)
           2322 => ( Parameter_Integer, 0 ),   --  : whl03c9 (Integer)
           2323 => ( Parameter_Integer, 0 ),   --  : whl04c1 (Integer)
           2324 => ( Parameter_Integer, 0 ),   --  : whl04c2 (Integer)
           2325 => ( Parameter_Integer, 0 ),   --  : whl04c3 (Integer)
           2326 => ( Parameter_Integer, 0 ),   --  : whl04c4 (Integer)
           2327 => ( Parameter_Integer, 0 ),   --  : whl04c5 (Integer)
           2328 => ( Parameter_Integer, 0 ),   --  : whl04c6 (Integer)
           2329 => ( Parameter_Integer, 0 ),   --  : whl04c7 (Integer)
           2330 => ( Parameter_Integer, 0 ),   --  : whl04c8 (Integer)
           2331 => ( Parameter_Integer, 0 ),   --  : whl04c9 (Integer)
           2332 => ( Parameter_Integer, 0 ),   --  : whl05c1 (Integer)
           2333 => ( Parameter_Integer, 0 ),   --  : whl05c2 (Integer)
           2334 => ( Parameter_Integer, 0 ),   --  : whl05c3 (Integer)
           2335 => ( Parameter_Integer, 0 ),   --  : whl05c4 (Integer)
           2336 => ( Parameter_Integer, 0 ),   --  : whl05c5 (Integer)
           2337 => ( Parameter_Integer, 0 ),   --  : whl05c6 (Integer)
           2338 => ( Parameter_Integer, 0 ),   --  : whl05c7 (Integer)
           2339 => ( Parameter_Integer, 0 ),   --  : whl05c8 (Integer)
           2340 => ( Parameter_Integer, 0 ),   --  : whl05c9 (Integer)
           2341 => ( Parameter_Integer, 0 ),   --  : whl06c1 (Integer)
           2342 => ( Parameter_Integer, 0 ),   --  : whl06c2 (Integer)
           2343 => ( Parameter_Integer, 0 ),   --  : whl06c3 (Integer)
           2344 => ( Parameter_Integer, 0 ),   --  : whl06c4 (Integer)
           2345 => ( Parameter_Integer, 0 ),   --  : whl06c5 (Integer)
           2346 => ( Parameter_Integer, 0 ),   --  : whl06c6 (Integer)
           2347 => ( Parameter_Integer, 0 ),   --  : whl06c7 (Integer)
           2348 => ( Parameter_Integer, 0 ),   --  : whl06c8 (Integer)
           2349 => ( Parameter_Integer, 0 ),   --  : whl06c9 (Integer)
           2350 => ( Parameter_Integer, 0 ),   --  : whl07c1 (Integer)
           2351 => ( Parameter_Integer, 0 ),   --  : whl07c2 (Integer)
           2352 => ( Parameter_Integer, 0 ),   --  : whl07c3 (Integer)
           2353 => ( Parameter_Integer, 0 ),   --  : whl07c4 (Integer)
           2354 => ( Parameter_Integer, 0 ),   --  : whl07c5 (Integer)
           2355 => ( Parameter_Integer, 0 ),   --  : whl07c6 (Integer)
           2356 => ( Parameter_Integer, 0 ),   --  : whl07c7 (Integer)
           2357 => ( Parameter_Integer, 0 ),   --  : whl07c8 (Integer)
           2358 => ( Parameter_Integer, 0 ),   --  : whl07c9 (Integer)
           2359 => ( Parameter_Integer, 0 ),   --  : whl08c1 (Integer)
           2360 => ( Parameter_Integer, 0 ),   --  : whl08c2 (Integer)
           2361 => ( Parameter_Integer, 0 ),   --  : whl08c3 (Integer)
           2362 => ( Parameter_Integer, 0 ),   --  : whl08c4 (Integer)
           2363 => ( Parameter_Integer, 0 ),   --  : whl08c5 (Integer)
           2364 => ( Parameter_Integer, 0 ),   --  : whl08c6 (Integer)
           2365 => ( Parameter_Integer, 0 ),   --  : whl08c7 (Integer)
           2366 => ( Parameter_Integer, 0 ),   --  : whl08c8 (Integer)
           2367 => ( Parameter_Integer, 0 ),   --  : whl08c9 (Integer)
           2368 => ( Parameter_Integer, 0 ),   --  : whl09c1 (Integer)
           2369 => ( Parameter_Integer, 0 ),   --  : whl09c2 (Integer)
           2370 => ( Parameter_Integer, 0 ),   --  : whl09c3 (Integer)
           2371 => ( Parameter_Integer, 0 ),   --  : whl09c4 (Integer)
           2372 => ( Parameter_Integer, 0 ),   --  : whl09c5 (Integer)
           2373 => ( Parameter_Integer, 0 ),   --  : whl09c6 (Integer)
           2374 => ( Parameter_Integer, 0 ),   --  : whl09c7 (Integer)
           2375 => ( Parameter_Integer, 0 ),   --  : whl09c8 (Integer)
           2376 => ( Parameter_Integer, 0 ),   --  : whl09c9 (Integer)
           2377 => ( Parameter_Integer, 0 ),   --  : whl10c1 (Integer)
           2378 => ( Parameter_Integer, 0 ),   --  : whl10c2 (Integer)
           2379 => ( Parameter_Integer, 0 ),   --  : whl10c3 (Integer)
           2380 => ( Parameter_Integer, 0 ),   --  : whl10c4 (Integer)
           2381 => ( Parameter_Integer, 0 ),   --  : whl10c5 (Integer)
           2382 => ( Parameter_Integer, 0 ),   --  : whl10c6 (Integer)
           2383 => ( Parameter_Integer, 0 ),   --  : whl10c7 (Integer)
           2384 => ( Parameter_Integer, 0 ),   --  : whl10c8 (Integer)
           2385 => ( Parameter_Integer, 0 ),   --  : whl10c9 (Integer)
           2386 => ( Parameter_Integer, 0 ),   --  : whl11c1 (Integer)
           2387 => ( Parameter_Integer, 0 ),   --  : whl11c2 (Integer)
           2388 => ( Parameter_Integer, 0 ),   --  : whl11c3 (Integer)
           2389 => ( Parameter_Integer, 0 ),   --  : whl11c4 (Integer)
           2390 => ( Parameter_Integer, 0 ),   --  : whl11c5 (Integer)
           2391 => ( Parameter_Integer, 0 ),   --  : whl11c6 (Integer)
           2392 => ( Parameter_Integer, 0 ),   --  : whl11c7 (Integer)
           2393 => ( Parameter_Integer, 0 ),   --  : whl11c8 (Integer)
           2394 => ( Parameter_Integer, 0 ),   --  : whl11c9 (Integer)
           2395 => ( Parameter_Integer, 0 ),   --  : whl12c1 (Integer)
           2396 => ( Parameter_Integer, 0 ),   --  : whl12c2 (Integer)
           2397 => ( Parameter_Integer, 0 ),   --  : whl12c3 (Integer)
           2398 => ( Parameter_Integer, 0 ),   --  : whl12c4 (Integer)
           2399 => ( Parameter_Integer, 0 ),   --  : whl12c5 (Integer)
           2400 => ( Parameter_Integer, 0 ),   --  : whl12c6 (Integer)
           2401 => ( Parameter_Integer, 0 ),   --  : whl12c7 (Integer)
           2402 => ( Parameter_Integer, 0 ),   --  : whl12c8 (Integer)
           2403 => ( Parameter_Integer, 0 ),   --  : whl12c9 (Integer)
           2404 => ( Parameter_Integer, 0 ),   --  : whl13c1 (Integer)
           2405 => ( Parameter_Integer, 0 ),   --  : whl13c2 (Integer)
           2406 => ( Parameter_Integer, 0 ),   --  : whl13c3 (Integer)
           2407 => ( Parameter_Integer, 0 ),   --  : whl13c4 (Integer)
           2408 => ( Parameter_Integer, 0 ),   --  : whl13c5 (Integer)
           2409 => ( Parameter_Integer, 0 ),   --  : whl13c6 (Integer)
           2410 => ( Parameter_Integer, 0 ),   --  : whl13c7 (Integer)
           2411 => ( Parameter_Integer, 0 ),   --  : whl13c8 (Integer)
           2412 => ( Parameter_Integer, 0 ),   --  : whl13c9 (Integer)
           2413 => ( Parameter_Integer, 0 ),   --  : whl14c1 (Integer)
           2414 => ( Parameter_Integer, 0 ),   --  : whl14c2 (Integer)
           2415 => ( Parameter_Integer, 0 ),   --  : whl14c3 (Integer)
           2416 => ( Parameter_Integer, 0 ),   --  : whl14c4 (Integer)
           2417 => ( Parameter_Integer, 0 ),   --  : whl14c5 (Integer)
           2418 => ( Parameter_Integer, 0 ),   --  : whl14c6 (Integer)
           2419 => ( Parameter_Integer, 0 ),   --  : whl14c7 (Integer)
           2420 => ( Parameter_Integer, 0 ),   --  : whl14c8 (Integer)
           2421 => ( Parameter_Integer, 0 ),   --  : whl14c9 (Integer)
           2422 => ( Parameter_Integer, 0 ),   --  : whl15c1 (Integer)
           2423 => ( Parameter_Integer, 0 ),   --  : whl15c2 (Integer)
           2424 => ( Parameter_Integer, 0 ),   --  : whl15c3 (Integer)
           2425 => ( Parameter_Integer, 0 ),   --  : whl15c4 (Integer)
           2426 => ( Parameter_Integer, 0 ),   --  : whl15c5 (Integer)
           2427 => ( Parameter_Integer, 0 ),   --  : whl15c6 (Integer)
           2428 => ( Parameter_Integer, 0 ),   --  : whl15c7 (Integer)
           2429 => ( Parameter_Integer, 0 ),   --  : whl15c8 (Integer)
           2430 => ( Parameter_Integer, 0 ),   --  : whl15c9 (Integer)
           2431 => ( Parameter_Integer, 0 ),   --  : whl16c1 (Integer)
           2432 => ( Parameter_Integer, 0 ),   --  : whl16c2 (Integer)
           2433 => ( Parameter_Integer, 0 ),   --  : whl16c3 (Integer)
           2434 => ( Parameter_Integer, 0 ),   --  : whl16c4 (Integer)
           2435 => ( Parameter_Integer, 0 ),   --  : whl16c5 (Integer)
           2436 => ( Parameter_Integer, 0 ),   --  : whl16c6 (Integer)
           2437 => ( Parameter_Integer, 0 ),   --  : whl16c7 (Integer)
           2438 => ( Parameter_Integer, 0 ),   --  : whl16c8 (Integer)
           2439 => ( Parameter_Integer, 0 ),   --  : whl16c9 (Integer)
           2440 => ( Parameter_Integer, 0 ),   --  : whl17c1 (Integer)
           2441 => ( Parameter_Integer, 0 ),   --  : whl17c2 (Integer)
           2442 => ( Parameter_Integer, 0 ),   --  : whl17c3 (Integer)
           2443 => ( Parameter_Integer, 0 ),   --  : whl17c4 (Integer)
           2444 => ( Parameter_Integer, 0 ),   --  : whl17c5 (Integer)
           2445 => ( Parameter_Integer, 0 ),   --  : whl17c6 (Integer)
           2446 => ( Parameter_Integer, 0 ),   --  : whl17c7 (Integer)
           2447 => ( Parameter_Integer, 0 ),   --  : whl17c8 (Integer)
           2448 => ( Parameter_Integer, 0 ),   --  : whl17c9 (Integer)
           2449 => ( Parameter_Integer, 0 ),   --  : whl18c1 (Integer)
           2450 => ( Parameter_Integer, 0 ),   --  : whl18c2 (Integer)
           2451 => ( Parameter_Integer, 0 ),   --  : whl18c3 (Integer)
           2452 => ( Parameter_Integer, 0 ),   --  : whl18c4 (Integer)
           2453 => ( Parameter_Integer, 0 ),   --  : whl18c5 (Integer)
           2454 => ( Parameter_Integer, 0 ),   --  : whl18c6 (Integer)
           2455 => ( Parameter_Integer, 0 ),   --  : whl18c7 (Integer)
           2456 => ( Parameter_Integer, 0 ),   --  : whl18c8 (Integer)
           2457 => ( Parameter_Integer, 0 ),   --  : whl18c9 (Integer)
           2458 => ( Parameter_Integer, 0 ),   --  : whl19c1 (Integer)
           2459 => ( Parameter_Integer, 0 ),   --  : whl19c2 (Integer)
           2460 => ( Parameter_Integer, 0 ),   --  : whl19c3 (Integer)
           2461 => ( Parameter_Integer, 0 ),   --  : whl19c4 (Integer)
           2462 => ( Parameter_Integer, 0 ),   --  : whl19c5 (Integer)
           2463 => ( Parameter_Integer, 0 ),   --  : whl19c6 (Integer)
           2464 => ( Parameter_Integer, 0 ),   --  : whl19c7 (Integer)
           2465 => ( Parameter_Integer, 0 ),   --  : whl19c8 (Integer)
           2466 => ( Parameter_Integer, 0 ),   --  : whl19c9 (Integer)
           2467 => ( Parameter_Integer, 0 ),   --  : whl20c1 (Integer)
           2468 => ( Parameter_Integer, 0 ),   --  : whl20c2 (Integer)
           2469 => ( Parameter_Integer, 0 ),   --  : whl20c3 (Integer)
           2470 => ( Parameter_Integer, 0 ),   --  : whl20c4 (Integer)
           2471 => ( Parameter_Integer, 0 ),   --  : whl20c5 (Integer)
           2472 => ( Parameter_Integer, 0 ),   --  : whl20c6 (Integer)
           2473 => ( Parameter_Integer, 0 ),   --  : whl20c7 (Integer)
           2474 => ( Parameter_Integer, 0 ),   --  : whl20c8 (Integer)
           2475 => ( Parameter_Integer, 0 ),   --  : whl20c9 (Integer)
           2476 => ( Parameter_Integer, 0 ),   --  : agec1 (Integer)
           2477 => ( Parameter_Integer, 0 ),   --  : agec2 (Integer)
           2478 => ( Parameter_Integer, 0 ),   --  : agec3 (Integer)
           2479 => ( Parameter_Integer, 0 ),   --  : agec4 (Integer)
           2480 => ( Parameter_Integer, 0 ),   --  : agec5 (Integer)
           2481 => ( Parameter_Integer, 0 ),   --  : agec6 (Integer)
           2482 => ( Parameter_Integer, 0 ),   --  : agec7 (Integer)
           2483 => ( Parameter_Integer, 0 ),   --  : agec8 (Integer)
           2484 => ( Parameter_Integer, 0 ),   --  : cameyrc1 (Integer)
           2485 => ( Parameter_Integer, 0 ),   --  : cameyrc2 (Integer)
           2486 => ( Parameter_Integer, 0 ),   --  : cameyrc3 (Integer)
           2487 => ( Parameter_Integer, 0 ),   --  : cameyrc4 (Integer)
           2488 => ( Parameter_Integer, 0 ),   --  : cameyrc5 (Integer)
           2489 => ( Parameter_Integer, 0 ),   --  : cameyrc6 (Integer)
           2490 => ( Parameter_Integer, 0 ),   --  : cameyrc7 (Integer)
           2491 => ( Parameter_Integer, 0 ),   --  : cameyrc8 (Integer)
           2492 => ( Parameter_Integer, 0 ),   --  : chcrec1 (Integer)
           2493 => ( Parameter_Integer, 0 ),   --  : chcrec2 (Integer)
           2494 => ( Parameter_Integer, 0 ),   --  : chcrec3 (Integer)
           2495 => ( Parameter_Integer, 0 ),   --  : chcrec4 (Integer)
           2496 => ( Parameter_Integer, 0 ),   --  : chcrec5 (Integer)
           2497 => ( Parameter_Integer, 0 ),   --  : chcrec6 (Integer)
           2498 => ( Parameter_Integer, 0 ),   --  : chcrec7 (Integer)
           2499 => ( Parameter_Integer, 0 ),   --  : chcrec8 (Integer)
           2500 => ( Parameter_Integer, 0 ),   --  : creabc1 (Integer)
           2501 => ( Parameter_Integer, 0 ),   --  : creabc2 (Integer)
           2502 => ( Parameter_Integer, 0 ),   --  : creabc3 (Integer)
           2503 => ( Parameter_Integer, 0 ),   --  : creabc4 (Integer)
           2504 => ( Parameter_Integer, 0 ),   --  : creabc5 (Integer)
           2505 => ( Parameter_Integer, 0 ),   --  : creabc6 (Integer)
           2506 => ( Parameter_Integer, 0 ),   --  : creabc7 (Integer)
           2507 => ( Parameter_Integer, 0 ),   --  : creabc8 (Integer)
           2508 => ( Parameter_Integer, 0 ),   --  : creahc1 (Integer)
           2509 => ( Parameter_Integer, 0 ),   --  : creahc2 (Integer)
           2510 => ( Parameter_Integer, 0 ),   --  : creahc3 (Integer)
           2511 => ( Parameter_Integer, 0 ),   --  : creahc4 (Integer)
           2512 => ( Parameter_Integer, 0 ),   --  : creahc5 (Integer)
           2513 => ( Parameter_Integer, 0 ),   --  : creahc6 (Integer)
           2514 => ( Parameter_Integer, 0 ),   --  : creahc7 (Integer)
           2515 => ( Parameter_Integer, 0 ),   --  : creahc8 (Integer)
           2516 => ( Parameter_Integer, 0 ),   --  : crecbc1 (Integer)
           2517 => ( Parameter_Integer, 0 ),   --  : crecbc2 (Integer)
           2518 => ( Parameter_Integer, 0 ),   --  : crecbc3 (Integer)
           2519 => ( Parameter_Integer, 0 ),   --  : crecbc4 (Integer)
           2520 => ( Parameter_Integer, 0 ),   --  : crecbc5 (Integer)
           2521 => ( Parameter_Integer, 0 ),   --  : crecbc6 (Integer)
           2522 => ( Parameter_Integer, 0 ),   --  : crecbc7 (Integer)
           2523 => ( Parameter_Integer, 0 ),   --  : crecbc8 (Integer)
           2524 => ( Parameter_Integer, 0 ),   --  : crechc1 (Integer)
           2525 => ( Parameter_Integer, 0 ),   --  : crechc2 (Integer)
           2526 => ( Parameter_Integer, 0 ),   --  : crechc3 (Integer)
           2527 => ( Parameter_Integer, 0 ),   --  : crechc4 (Integer)
           2528 => ( Parameter_Integer, 0 ),   --  : crechc5 (Integer)
           2529 => ( Parameter_Integer, 0 ),   --  : crechc6 (Integer)
           2530 => ( Parameter_Integer, 0 ),   --  : crechc7 (Integer)
           2531 => ( Parameter_Integer, 0 ),   --  : crechc8 (Integer)
           2532 => ( Parameter_Integer, 0 ),   --  : creclc1 (Integer)
           2533 => ( Parameter_Integer, 0 ),   --  : creclc2 (Integer)
           2534 => ( Parameter_Integer, 0 ),   --  : creclc3 (Integer)
           2535 => ( Parameter_Integer, 0 ),   --  : creclc4 (Integer)
           2536 => ( Parameter_Integer, 0 ),   --  : creclc5 (Integer)
           2537 => ( Parameter_Integer, 0 ),   --  : creclc6 (Integer)
           2538 => ( Parameter_Integer, 0 ),   --  : creclc7 (Integer)
           2539 => ( Parameter_Integer, 0 ),   --  : creclc8 (Integer)
           2540 => ( Parameter_Integer, 0 ),   --  : crefrc1 (Integer)
           2541 => ( Parameter_Integer, 0 ),   --  : crefrc2 (Integer)
           2542 => ( Parameter_Integer, 0 ),   --  : crefrc3 (Integer)
           2543 => ( Parameter_Integer, 0 ),   --  : crefrc4 (Integer)
           2544 => ( Parameter_Integer, 0 ),   --  : crefrc5 (Integer)
           2545 => ( Parameter_Integer, 0 ),   --  : crefrc6 (Integer)
           2546 => ( Parameter_Integer, 0 ),   --  : crefrc7 (Integer)
           2547 => ( Parameter_Integer, 0 ),   --  : crefrc8 (Integer)
           2548 => ( Parameter_Integer, 0 ),   --  : creotc1 (Integer)
           2549 => ( Parameter_Integer, 0 ),   --  : creotc2 (Integer)
           2550 => ( Parameter_Integer, 0 ),   --  : creotc3 (Integer)
           2551 => ( Parameter_Integer, 0 ),   --  : creotc4 (Integer)
           2552 => ( Parameter_Integer, 0 ),   --  : creotc5 (Integer)
           2553 => ( Parameter_Integer, 0 ),   --  : creotc6 (Integer)
           2554 => ( Parameter_Integer, 0 ),   --  : creotc7 (Integer)
           2555 => ( Parameter_Integer, 0 ),   --  : creotc8 (Integer)
           2556 => ( Parameter_Integer, 0 ),   --  : carerc1 (Integer)
           2557 => ( Parameter_Integer, 0 ),   --  : carerc2 (Integer)
           2558 => ( Parameter_Integer, 0 ),   --  : carerc3 (Integer)
           2559 => ( Parameter_Integer, 0 ),   --  : carerc4 (Integer)
           2560 => ( Parameter_Integer, 0 ),   --  : carerc5 (Integer)
           2561 => ( Parameter_Integer, 0 ),   --  : carerc6 (Integer)
           2562 => ( Parameter_Integer, 0 ),   --  : carerc7 (Integer)
           2563 => ( Parameter_Integer, 0 ),   --  : carerc8 (Integer)
           2564 => ( Parameter_Integer, 0 ),   --  : cdatrec1 (Integer)
           2565 => ( Parameter_Integer, 0 ),   --  : cdatrec2 (Integer)
           2566 => ( Parameter_Integer, 0 ),   --  : cdatrec3 (Integer)
           2567 => ( Parameter_Integer, 0 ),   --  : cdatrec4 (Integer)
           2568 => ( Parameter_Integer, 0 ),   --  : cdatrec5 (Integer)
           2569 => ( Parameter_Integer, 0 ),   --  : cdatrec6 (Integer)
           2570 => ( Parameter_Integer, 0 ),   --  : cdatrec7 (Integer)
           2571 => ( Parameter_Integer, 0 ),   --  : cdatrec8 (Integer)
           2572 => ( Parameter_Integer, 0 ),   --  : cdtrepc1 (Integer)
           2573 => ( Parameter_Integer, 0 ),   --  : cdtrepc2 (Integer)
           2574 => ( Parameter_Integer, 0 ),   --  : cdtrepc3 (Integer)
           2575 => ( Parameter_Integer, 0 ),   --  : cdtrepc4 (Integer)
           2576 => ( Parameter_Integer, 0 ),   --  : cdtrepc5 (Integer)
           2577 => ( Parameter_Integer, 0 ),   --  : cdtrepc6 (Integer)
           2578 => ( Parameter_Integer, 0 ),   --  : cdtrepc7 (Integer)
           2579 => ( Parameter_Integer, 0 ),   --  : cdtrepc8 (Integer)
           2580 => ( Parameter_Integer, 0 ),   --  : cdis1c1 (Integer)
           2581 => ( Parameter_Integer, 0 ),   --  : cdis1c2 (Integer)
           2582 => ( Parameter_Integer, 0 ),   --  : cdis1c3 (Integer)
           2583 => ( Parameter_Integer, 0 ),   --  : cdis1c4 (Integer)
           2584 => ( Parameter_Integer, 0 ),   --  : cdis1c5 (Integer)
           2585 => ( Parameter_Integer, 0 ),   --  : cdis1c6 (Integer)
           2586 => ( Parameter_Integer, 0 ),   --  : cdis1c7 (Integer)
           2587 => ( Parameter_Integer, 0 ),   --  : cdis1c8 (Integer)
           2588 => ( Parameter_Integer, 0 ),   --  : cdis2c1 (Integer)
           2589 => ( Parameter_Integer, 0 ),   --  : cdis2c2 (Integer)
           2590 => ( Parameter_Integer, 0 ),   --  : cdis2c3 (Integer)
           2591 => ( Parameter_Integer, 0 ),   --  : cdis2c4 (Integer)
           2592 => ( Parameter_Integer, 0 ),   --  : cdis2c5 (Integer)
           2593 => ( Parameter_Integer, 0 ),   --  : cdis2c6 (Integer)
           2594 => ( Parameter_Integer, 0 ),   --  : cdis2c7 (Integer)
           2595 => ( Parameter_Integer, 0 ),   --  : cdis2c8 (Integer)
           2596 => ( Parameter_Integer, 0 ),   --  : cdis3c1 (Integer)
           2597 => ( Parameter_Integer, 0 ),   --  : cdis3c2 (Integer)
           2598 => ( Parameter_Integer, 0 ),   --  : cdis3c3 (Integer)
           2599 => ( Parameter_Integer, 0 ),   --  : cdis3c4 (Integer)
           2600 => ( Parameter_Integer, 0 ),   --  : cdis3c5 (Integer)
           2601 => ( Parameter_Integer, 0 ),   --  : cdis3c6 (Integer)
           2602 => ( Parameter_Integer, 0 ),   --  : cdis3c7 (Integer)
           2603 => ( Parameter_Integer, 0 ),   --  : cdis3c8 (Integer)
           2604 => ( Parameter_Integer, 0 ),   --  : cdis4c1 (Integer)
           2605 => ( Parameter_Integer, 0 ),   --  : cdis4c2 (Integer)
           2606 => ( Parameter_Integer, 0 ),   --  : cdis4c3 (Integer)
           2607 => ( Parameter_Integer, 0 ),   --  : cdis4c4 (Integer)
           2608 => ( Parameter_Integer, 0 ),   --  : cdis4c5 (Integer)
           2609 => ( Parameter_Integer, 0 ),   --  : cdis4c6 (Integer)
           2610 => ( Parameter_Integer, 0 ),   --  : cdis4c7 (Integer)
           2611 => ( Parameter_Integer, 0 ),   --  : cdis4c8 (Integer)
           2612 => ( Parameter_Integer, 0 ),   --  : cdis5c1 (Integer)
           2613 => ( Parameter_Integer, 0 ),   --  : cdis5c2 (Integer)
           2614 => ( Parameter_Integer, 0 ),   --  : cdis5c3 (Integer)
           2615 => ( Parameter_Integer, 0 ),   --  : cdis5c4 (Integer)
           2616 => ( Parameter_Integer, 0 ),   --  : cdis5c5 (Integer)
           2617 => ( Parameter_Integer, 0 ),   --  : cdis5c6 (Integer)
           2618 => ( Parameter_Integer, 0 ),   --  : cdis5c7 (Integer)
           2619 => ( Parameter_Integer, 0 ),   --  : cdis5c8 (Integer)
           2620 => ( Parameter_Integer, 0 ),   --  : cdis6c1 (Integer)
           2621 => ( Parameter_Integer, 0 ),   --  : cdis6c2 (Integer)
           2622 => ( Parameter_Integer, 0 ),   --  : cdis6c3 (Integer)
           2623 => ( Parameter_Integer, 0 ),   --  : cdis6c4 (Integer)
           2624 => ( Parameter_Integer, 0 ),   --  : cdis6c5 (Integer)
           2625 => ( Parameter_Integer, 0 ),   --  : cdis6c6 (Integer)
           2626 => ( Parameter_Integer, 0 ),   --  : cdis6c7 (Integer)
           2627 => ( Parameter_Integer, 0 ),   --  : cdis6c8 (Integer)
           2628 => ( Parameter_Integer, 0 ),   --  : cdis7c1 (Integer)
           2629 => ( Parameter_Integer, 0 ),   --  : cdis7c2 (Integer)
           2630 => ( Parameter_Integer, 0 ),   --  : cdis7c3 (Integer)
           2631 => ( Parameter_Integer, 0 ),   --  : cdis7c4 (Integer)
           2632 => ( Parameter_Integer, 0 ),   --  : cdis7c5 (Integer)
           2633 => ( Parameter_Integer, 0 ),   --  : cdis7c6 (Integer)
           2634 => ( Parameter_Integer, 0 ),   --  : cdis7c7 (Integer)
           2635 => ( Parameter_Integer, 0 ),   --  : cdis7c8 (Integer)
           2636 => ( Parameter_Integer, 0 ),   --  : cdis8c1 (Integer)
           2637 => ( Parameter_Integer, 0 ),   --  : cdis8c2 (Integer)
           2638 => ( Parameter_Integer, 0 ),   --  : cdis8c3 (Integer)
           2639 => ( Parameter_Integer, 0 ),   --  : cdis8c4 (Integer)
           2640 => ( Parameter_Integer, 0 ),   --  : cdis8c5 (Integer)
           2641 => ( Parameter_Integer, 0 ),   --  : cdis8c6 (Integer)
           2642 => ( Parameter_Integer, 0 ),   --  : cdis8c7 (Integer)
           2643 => ( Parameter_Integer, 0 ),   --  : cdis8c8 (Integer)
           2644 => ( Parameter_Integer, 0 ),   --  : cdis9c1 (Integer)
           2645 => ( Parameter_Integer, 0 ),   --  : cdis9c2 (Integer)
           2646 => ( Parameter_Integer, 0 ),   --  : cdis9c3 (Integer)
           2647 => ( Parameter_Integer, 0 ),   --  : cdis9c4 (Integer)
           2648 => ( Parameter_Integer, 0 ),   --  : cdis9c5 (Integer)
           2649 => ( Parameter_Integer, 0 ),   --  : cdis9c6 (Integer)
           2650 => ( Parameter_Integer, 0 ),   --  : cdis9c7 (Integer)
           2651 => ( Parameter_Integer, 0 ),   --  : cdis9c8 (Integer)
           2652 => ( Parameter_Integer, 0 ),   --  : cdis10c1 (Integer)
           2653 => ( Parameter_Integer, 0 ),   --  : cdis10c2 (Integer)
           2654 => ( Parameter_Integer, 0 ),   --  : cdis10c3 (Integer)
           2655 => ( Parameter_Integer, 0 ),   --  : cdis10c4 (Integer)
           2656 => ( Parameter_Integer, 0 ),   --  : cdis10c5 (Integer)
           2657 => ( Parameter_Integer, 0 ),   --  : cdis10c6 (Integer)
           2658 => ( Parameter_Integer, 0 ),   --  : cdis10c7 (Integer)
           2659 => ( Parameter_Integer, 0 ),   --  : cdis10c8 (Integer)
           2660 => ( Parameter_Integer, 0 ),   --  : cdifc1 (Integer)
           2661 => ( Parameter_Integer, 0 ),   --  : cdifc2 (Integer)
           2662 => ( Parameter_Integer, 0 ),   --  : cdifc3 (Integer)
           2663 => ( Parameter_Integer, 0 ),   --  : cdifc4 (Integer)
           2664 => ( Parameter_Integer, 0 ),   --  : cdifc5 (Integer)
           2665 => ( Parameter_Integer, 0 ),   --  : cdifc6 (Integer)
           2666 => ( Parameter_Integer, 0 ),   --  : cdifc7 (Integer)
           2667 => ( Parameter_Integer, 0 ),   --  : cdifc8 (Integer)
           2668 => ( Parameter_Float, 0.0 ),   --  : ernamc1 (Amount)
           2669 => ( Parameter_Float, 0.0 ),   --  : ernamc2 (Amount)
           2670 => ( Parameter_Float, 0.0 ),   --  : ernamc3 (Amount)
           2671 => ( Parameter_Integer, 0 ),   --  : ernamc4 (Integer)
           2672 => ( Parameter_Integer, 0 ),   --  : ernamc5 (Integer)
           2673 => ( Parameter_Integer, 0 ),   --  : ernamc6 (Integer)
           2674 => ( Parameter_Integer, 0 ),   --  : ernamc7 (Integer)
           2675 => ( Parameter_Integer, 0 ),   --  : ernamc8 (Integer)
           2676 => ( Parameter_Float, 0.0 ),   --  : trustc1 (Amount)
           2677 => ( Parameter_Float, 0.0 ),   --  : trustc2 (Amount)
           2678 => ( Parameter_Float, 0.0 ),   --  : trustc3 (Amount)
           2679 => ( Parameter_Integer, 0 ),   --  : trustc4 (Integer)
           2680 => ( Parameter_Integer, 0 ),   --  : trustc5 (Integer)
           2681 => ( Parameter_Integer, 0 ),   --  : trustc6 (Integer)
           2682 => ( Parameter_Integer, 0 ),   --  : trustc7 (Integer)
           2683 => ( Parameter_Integer, 0 ),   --  : trustc8 (Integer)
           2684 => ( Parameter_Integer, 0 ),   --  : chbfdc1 (Integer)
           2685 => ( Parameter_Integer, 0 ),   --  : chbfdc2 (Integer)
           2686 => ( Parameter_Integer, 0 ),   --  : chbfdc3 (Integer)
           2687 => ( Parameter_Integer, 0 ),   --  : chbfdc4 (Integer)
           2688 => ( Parameter_Integer, 0 ),   --  : chbfdc5 (Integer)
           2689 => ( Parameter_Integer, 0 ),   --  : chbfdc6 (Integer)
           2690 => ( Parameter_Integer, 0 ),   --  : chbfdc7 (Integer)
           2691 => ( Parameter_Integer, 0 ),   --  : chbfdc8 (Integer)
           2692 => ( Parameter_Float, 0.0 ),   --  : cbfamtc1 (Amount)
           2693 => ( Parameter_Float, 0.0 ),   --  : cbfamtc2 (Amount)
           2694 => ( Parameter_Integer, 0 ),   --  : cbfamtc3 (Integer)
           2695 => ( Parameter_Integer, 0 ),   --  : cbfamtc4 (Integer)
           2696 => ( Parameter_Integer, 0 ),   --  : cbfamtc5 (Integer)
           2697 => ( Parameter_Integer, 0 ),   --  : cbfamtc6 (Integer)
           2698 => ( Parameter_Integer, 0 ),   --  : cbfamtc7 (Integer)
           2699 => ( Parameter_Integer, 0 ),   --  : cbfamtc8 (Integer)
           2700 => ( Parameter_Integer, 0 ),   --  : pbfamtc1 (Integer)
           2701 => ( Parameter_Integer, 0 ),   --  : pbfamtc2 (Integer)
           2702 => ( Parameter_Integer, 0 ),   --  : pbfamtc3 (Integer)
           2703 => ( Parameter_Integer, 0 ),   --  : pbfamtc4 (Integer)
           2704 => ( Parameter_Integer, 0 ),   --  : pbfamtc5 (Integer)
           2705 => ( Parameter_Integer, 0 ),   --  : pbfamtc6 (Integer)
           2706 => ( Parameter_Integer, 0 ),   --  : pbfamtc7 (Integer)
           2707 => ( Parameter_Integer, 0 ),   --  : pbfamtc8 (Integer)
           2708 => ( Parameter_Integer, 0 ),   --  : cbfvalc1 (Integer)
           2709 => ( Parameter_Integer, 0 ),   --  : cbfvalc2 (Integer)
           2710 => ( Parameter_Integer, 0 ),   --  : cbfvalc3 (Integer)
           2711 => ( Parameter_Integer, 0 ),   --  : cbfvalc4 (Integer)
           2712 => ( Parameter_Integer, 0 ),   --  : cbfvalc5 (Integer)
           2713 => ( Parameter_Integer, 0 ),   --  : cbfvalc6 (Integer)
           2714 => ( Parameter_Integer, 0 ),   --  : cbfvalc7 (Integer)
           2715 => ( Parameter_Integer, 0 ),   --  : cbfvalc8 (Integer)
           2716 => ( Parameter_Integer, 0 ),   --  : chcondc1 (Integer)
           2717 => ( Parameter_Integer, 0 ),   --  : chcondc2 (Integer)
           2718 => ( Parameter_Integer, 0 ),   --  : chcondc3 (Integer)
           2719 => ( Parameter_Integer, 0 ),   --  : chcondc4 (Integer)
           2720 => ( Parameter_Integer, 0 ),   --  : chcondc5 (Integer)
           2721 => ( Parameter_Integer, 0 ),   --  : chcondc6 (Integer)
           2722 => ( Parameter_Integer, 0 ),   --  : chcondc7 (Integer)
           2723 => ( Parameter_Integer, 0 ),   --  : chcondc8 (Integer)
           2724 => ( Parameter_Integer, 0 ),   --  : cdla1c1 (Integer)
           2725 => ( Parameter_Integer, 0 ),   --  : cdla1c2 (Integer)
           2726 => ( Parameter_Integer, 0 ),   --  : cdla1c3 (Integer)
           2727 => ( Parameter_Integer, 0 ),   --  : cdla1c4 (Integer)
           2728 => ( Parameter_Integer, 0 ),   --  : cdla1c5 (Integer)
           2729 => ( Parameter_Integer, 0 ),   --  : cdla1c6 (Integer)
           2730 => ( Parameter_Integer, 0 ),   --  : cdla1c7 (Integer)
           2731 => ( Parameter_Integer, 0 ),   --  : cdla1c8 (Integer)
           2732 => ( Parameter_Integer, 0 ),   --  : cdla2c1 (Integer)
           2733 => ( Parameter_Integer, 0 ),   --  : cdla2c2 (Integer)
           2734 => ( Parameter_Integer, 0 ),   --  : cdla2c3 (Integer)
           2735 => ( Parameter_Integer, 0 ),   --  : cdla2c4 (Integer)
           2736 => ( Parameter_Integer, 0 ),   --  : cdla2c5 (Integer)
           2737 => ( Parameter_Integer, 0 ),   --  : cdla2c6 (Integer)
           2738 => ( Parameter_Integer, 0 ),   --  : cdla2c7 (Integer)
           2739 => ( Parameter_Integer, 0 ),   --  : cdla2c8 (Integer)
           2740 => ( Parameter_Integer, 0 ),   --  : chelfc1 (Integer)
           2741 => ( Parameter_Integer, 0 ),   --  : chelfc2 (Integer)
           2742 => ( Parameter_Integer, 0 ),   --  : chelfc3 (Integer)
           2743 => ( Parameter_Integer, 0 ),   --  : chelfc4 (Integer)
           2744 => ( Parameter_Integer, 0 ),   --  : chelfc5 (Integer)
           2745 => ( Parameter_Integer, 0 ),   --  : chelfc6 (Integer)
           2746 => ( Parameter_Integer, 0 ),   --  : chelfc7 (Integer)
           2747 => ( Parameter_Integer, 0 ),   --  : chelfc8 (Integer)
           2748 => ( Parameter_Float, 0.0 ),   --  : chernc1 (Amount)
           2749 => ( Parameter_Float, 0.0 ),   --  : chernc2 (Amount)
           2750 => ( Parameter_Float, 0.0 ),   --  : chernc3 (Amount)
           2751 => ( Parameter_Integer, 0 ),   --  : chernc4 (Integer)
           2752 => ( Parameter_Integer, 0 ),   --  : chernc5 (Integer)
           2753 => ( Parameter_Integer, 0 ),   --  : chernc6 (Integer)
           2754 => ( Parameter_Integer, 0 ),   --  : chernc7 (Integer)
           2755 => ( Parameter_Integer, 0 ),   --  : chernc8 (Integer)
           2756 => ( Parameter_Integer, 0 ),   --  : crns1c1 (Integer)
           2757 => ( Parameter_Integer, 0 ),   --  : crns1c2 (Integer)
           2758 => ( Parameter_Integer, 0 ),   --  : crns1c3 (Integer)
           2759 => ( Parameter_Integer, 0 ),   --  : crns1c4 (Integer)
           2760 => ( Parameter_Integer, 0 ),   --  : crns1c5 (Integer)
           2761 => ( Parameter_Integer, 0 ),   --  : crns1c6 (Integer)
           2762 => ( Parameter_Integer, 0 ),   --  : crns1c7 (Integer)
           2763 => ( Parameter_Integer, 0 ),   --  : crns1c8 (Integer)
           2764 => ( Parameter_Integer, 0 ),   --  : crns2c1 (Integer)
           2765 => ( Parameter_Integer, 0 ),   --  : crns2c2 (Integer)
           2766 => ( Parameter_Integer, 0 ),   --  : crns2c3 (Integer)
           2767 => ( Parameter_Integer, 0 ),   --  : crns2c4 (Integer)
           2768 => ( Parameter_Integer, 0 ),   --  : crns2c5 (Integer)
           2769 => ( Parameter_Integer, 0 ),   --  : crns2c6 (Integer)
           2770 => ( Parameter_Integer, 0 ),   --  : crns2c7 (Integer)
           2771 => ( Parameter_Integer, 0 ),   --  : crns2c8 (Integer)
           2772 => ( Parameter_Integer, 0 ),   --  : crns3c1 (Integer)
           2773 => ( Parameter_Integer, 0 ),   --  : crns3c2 (Integer)
           2774 => ( Parameter_Integer, 0 ),   --  : crns3c3 (Integer)
           2775 => ( Parameter_Integer, 0 ),   --  : crns3c4 (Integer)
           2776 => ( Parameter_Integer, 0 ),   --  : crns3c5 (Integer)
           2777 => ( Parameter_Integer, 0 ),   --  : crns3c6 (Integer)
           2778 => ( Parameter_Integer, 0 ),   --  : crns3c7 (Integer)
           2779 => ( Parameter_Integer, 0 ),   --  : crns3c8 (Integer)
           2780 => ( Parameter_Integer, 0 ),   --  : chemac1 (Integer)
           2781 => ( Parameter_Integer, 0 ),   --  : chemac2 (Integer)
           2782 => ( Parameter_Integer, 0 ),   --  : chemac3 (Integer)
           2783 => ( Parameter_Integer, 0 ),   --  : chemac4 (Integer)
           2784 => ( Parameter_Integer, 0 ),   --  : chemac5 (Integer)
           2785 => ( Parameter_Integer, 0 ),   --  : chemac6 (Integer)
           2786 => ( Parameter_Integer, 0 ),   --  : chemac7 (Integer)
           2787 => ( Parameter_Integer, 0 ),   --  : chemac8 (Integer)
           2788 => ( Parameter_Float, 0.0 ),   --  : emamtc1 (Amount)
           2789 => ( Parameter_Float, 0.0 ),   --  : emamtc2 (Amount)
           2790 => ( Parameter_Integer, 0 ),   --  : emamtc3 (Integer)
           2791 => ( Parameter_Integer, 0 ),   --  : emamtc4 (Integer)
           2792 => ( Parameter_Integer, 0 ),   --  : emamtc5 (Integer)
           2793 => ( Parameter_Integer, 0 ),   --  : emamtc6 (Integer)
           2794 => ( Parameter_Integer, 0 ),   --  : emamtc7 (Integer)
           2795 => ( Parameter_Integer, 0 ),   --  : emamtc8 (Integer)
           2796 => ( Parameter_Integer, 0 ),   --  : emapdc1 (Integer)
           2797 => ( Parameter_Integer, 0 ),   --  : emapdc2 (Integer)
           2798 => ( Parameter_Integer, 0 ),   --  : emapdc3 (Integer)
           2799 => ( Parameter_Integer, 0 ),   --  : emapdc4 (Integer)
           2800 => ( Parameter_Integer, 0 ),   --  : emapdc5 (Integer)
           2801 => ( Parameter_Integer, 0 ),   --  : emapdc6 (Integer)
           2802 => ( Parameter_Integer, 0 ),   --  : emapdc7 (Integer)
           2803 => ( Parameter_Integer, 0 ),   --  : emapdc8 (Integer)
           2804 => ( Parameter_Float, 0.0 ),   --  : chidvc1 (Amount)
           2805 => ( Parameter_Float, 0.0 ),   --  : chidvc2 (Amount)
           2806 => ( Parameter_Float, 0.0 ),   --  : chidvc3 (Amount)
           2807 => ( Parameter_Integer, 0 ),   --  : chidvc4 (Integer)
           2808 => ( Parameter_Integer, 0 ),   --  : chidvc5 (Integer)
           2809 => ( Parameter_Integer, 0 ),   --  : chidvc6 (Integer)
           2810 => ( Parameter_Integer, 0 ),   --  : chidvc7 (Integer)
           2811 => ( Parameter_Integer, 0 ),   --  : chidvc8 (Integer)
           2812 => ( Parameter_Integer, 0 ),   --  : climitc1 (Integer)
           2813 => ( Parameter_Integer, 0 ),   --  : climitc2 (Integer)
           2814 => ( Parameter_Integer, 0 ),   --  : climitc3 (Integer)
           2815 => ( Parameter_Integer, 0 ),   --  : climitc4 (Integer)
           2816 => ( Parameter_Integer, 0 ),   --  : climitc5 (Integer)
           2817 => ( Parameter_Integer, 0 ),   --  : climitc6 (Integer)
           2818 => ( Parameter_Integer, 0 ),   --  : climitc7 (Integer)
           2819 => ( Parameter_Integer, 0 ),   --  : climitc8 (Integer)
           2820 => ( Parameter_Integer, 0 ),   --  : pearnc1 (Integer)
           2821 => ( Parameter_Integer, 0 ),   --  : pearnc2 (Integer)
           2822 => ( Parameter_Integer, 0 ),   --  : pearnc3 (Integer)
           2823 => ( Parameter_Integer, 0 ),   --  : pearnc4 (Integer)
           2824 => ( Parameter_Integer, 0 ),   --  : pearnc5 (Integer)
           2825 => ( Parameter_Integer, 0 ),   --  : pearnc6 (Integer)
           2826 => ( Parameter_Integer, 0 ),   --  : pearnc7 (Integer)
           2827 => ( Parameter_Integer, 0 ),   --  : pearnc8 (Integer)
           2828 => ( Parameter_Integer, 0 ),   --  : ptrusc1 (Integer)
           2829 => ( Parameter_Integer, 0 ),   --  : ptrusc2 (Integer)
           2830 => ( Parameter_Integer, 0 ),   --  : ptrusc3 (Integer)
           2831 => ( Parameter_Integer, 0 ),   --  : ptrusc4 (Integer)
           2832 => ( Parameter_Integer, 0 ),   --  : ptrusc5 (Integer)
           2833 => ( Parameter_Integer, 0 ),   --  : ptrusc6 (Integer)
           2834 => ( Parameter_Integer, 0 ),   --  : ptrusc7 (Integer)
           2835 => ( Parameter_Integer, 0 ),   --  : ptrusc8 (Integer)
           2836 => ( Parameter_Float, 0.0 ),   --  : chrinc1 (Amount)
           2837 => ( Parameter_Float, 0.0 ),   --  : chrinc2 (Amount)
           2838 => ( Parameter_Float, 0.0 ),   --  : chrinc3 (Amount)
           2839 => ( Parameter_Integer, 0 ),   --  : chrinc4 (Integer)
           2840 => ( Parameter_Integer, 0 ),   --  : chrinc5 (Integer)
           2841 => ( Parameter_Integer, 0 ),   --  : chrinc6 (Integer)
           2842 => ( Parameter_Integer, 0 ),   --  : chrinc7 (Integer)
           2843 => ( Parameter_Integer, 0 ),   --  : chrinc8 (Integer)
           2844 => ( Parameter_Integer, 0 ),   --  : csavec1 (Integer)
           2845 => ( Parameter_Integer, 0 ),   --  : csavec2 (Integer)
           2846 => ( Parameter_Integer, 0 ),   --  : csavec3 (Integer)
           2847 => ( Parameter_Integer, 0 ),   --  : csavec4 (Integer)
           2848 => ( Parameter_Integer, 0 ),   --  : csavec5 (Integer)
           2849 => ( Parameter_Integer, 0 ),   --  : csavec6 (Integer)
           2850 => ( Parameter_Integer, 0 ),   --  : csavec7 (Integer)
           2851 => ( Parameter_Integer, 0 ),   --  : csavec8 (Integer)
           2852 => ( Parameter_Float, 0.0 ),   --  : tramtc1 (Amount)
           2853 => ( Parameter_Float, 0.0 ),   --  : tramtc2 (Amount)
           2854 => ( Parameter_Integer, 0 ),   --  : tramtc3 (Integer)
           2855 => ( Parameter_Integer, 0 ),   --  : tramtc4 (Integer)
           2856 => ( Parameter_Integer, 0 ),   --  : tramtc5 (Integer)
           2857 => ( Parameter_Integer, 0 ),   --  : tramtc6 (Integer)
           2858 => ( Parameter_Integer, 0 ),   --  : tramtc7 (Integer)
           2859 => ( Parameter_Integer, 0 ),   --  : tramtc8 (Integer)
           2860 => ( Parameter_Integer, 0 ),   --  : trnpdc1 (Integer)
           2861 => ( Parameter_Integer, 0 ),   --  : trnpdc2 (Integer)
           2862 => ( Parameter_Integer, 0 ),   --  : trnpdc3 (Integer)
           2863 => ( Parameter_Integer, 0 ),   --  : trnpdc4 (Integer)
           2864 => ( Parameter_Integer, 0 ),   --  : trnpdc5 (Integer)
           2865 => ( Parameter_Integer, 0 ),   --  : trnpdc6 (Integer)
           2866 => ( Parameter_Integer, 0 ),   --  : trnpdc7 (Integer)
           2867 => ( Parameter_Integer, 0 ),   --  : trnpdc8 (Integer)
           2868 => ( Parameter_Integer, 0 ),   --  : cohabc1 (Integer)
           2869 => ( Parameter_Integer, 0 ),   --  : cohabc2 (Integer)
           2870 => ( Parameter_Integer, 0 ),   --  : cohabc3 (Integer)
           2871 => ( Parameter_Integer, 0 ),   --  : cohabc4 (Integer)
           2872 => ( Parameter_Integer, 0 ),   --  : cohabc5 (Integer)
           2873 => ( Parameter_Integer, 0 ),   --  : cohabc6 (Integer)
           2874 => ( Parameter_Integer, 0 ),   --  : cohabc7 (Integer)
           2875 => ( Parameter_Integer, 0 ),   --  : cohabc8 (Integer)
           2876 => ( Parameter_Integer, 0 ),   --  : curqulc1 (Integer)
           2877 => ( Parameter_Integer, 0 ),   --  : curqulc2 (Integer)
           2878 => ( Parameter_Integer, 0 ),   --  : curqulc3 (Integer)
           2879 => ( Parameter_Integer, 0 ),   --  : curqulc4 (Integer)
           2880 => ( Parameter_Integer, 0 ),   --  : curqulc5 (Integer)
           2881 => ( Parameter_Integer, 0 ),   --  : curqulc6 (Integer)
           2882 => ( Parameter_Integer, 0 ),   --  : curqulc7 (Integer)
           2883 => ( Parameter_Integer, 0 ),   --  : curqulc8 (Integer)
           2884 => ( Parameter_Integer, 0 ),   --  : disacc1 (Integer)
           2885 => ( Parameter_Integer, 0 ),   --  : disacc2 (Integer)
           2886 => ( Parameter_Integer, 0 ),   --  : disacc3 (Integer)
           2887 => ( Parameter_Integer, 0 ),   --  : disacc4 (Integer)
           2888 => ( Parameter_Integer, 0 ),   --  : disacc5 (Integer)
           2889 => ( Parameter_Integer, 0 ),   --  : disacc6 (Integer)
           2890 => ( Parameter_Integer, 0 ),   --  : disacc7 (Integer)
           2891 => ( Parameter_Integer, 0 ),   --  : disacc8 (Integer)
           2892 => ( Parameter_Integer, 0 ),   --  : discoc1 (Integer)
           2893 => ( Parameter_Integer, 0 ),   --  : discoc2 (Integer)
           2894 => ( Parameter_Integer, 0 ),   --  : discoc3 (Integer)
           2895 => ( Parameter_Integer, 0 ),   --  : discoc4 (Integer)
           2896 => ( Parameter_Integer, 0 ),   --  : discoc5 (Integer)
           2897 => ( Parameter_Integer, 0 ),   --  : discoc6 (Integer)
           2898 => ( Parameter_Integer, 0 ),   --  : discoc7 (Integer)
           2899 => ( Parameter_Integer, 0 ),   --  : discoc8 (Integer)
           2900 => ( Parameter_Integer, 0 ),   --  : dobc1 (Integer)
           2901 => ( Parameter_Integer, 0 ),   --  : dobc2 (Integer)
           2902 => ( Parameter_Integer, 0 ),   --  : dobc3 (Integer)
           2903 => ( Parameter_Integer, 0 ),   --  : dobc4 (Integer)
           2904 => ( Parameter_Integer, 0 ),   --  : dobc5 (Integer)
           2905 => ( Parameter_Integer, 0 ),   --  : dobc6 (Integer)
           2906 => ( Parameter_Integer, 0 ),   --  : dobc7 (Integer)
           2907 => ( Parameter_Integer, 0 ),   --  : dobc8 (Integer)
           2908 => ( Parameter_Integer, 0 ),   --  : dvmarc1 (Integer)
           2909 => ( Parameter_Integer, 0 ),   --  : dvmarc2 (Integer)
           2910 => ( Parameter_Integer, 0 ),   --  : dvmarc3 (Integer)
           2911 => ( Parameter_Integer, 0 ),   --  : dvmarc4 (Integer)
           2912 => ( Parameter_Integer, 0 ),   --  : dvmarc5 (Integer)
           2913 => ( Parameter_Integer, 0 ),   --  : dvmarc6 (Integer)
           2914 => ( Parameter_Integer, 0 ),   --  : dvmarc7 (Integer)
           2915 => ( Parameter_Integer, 0 ),   --  : dvmarc8 (Integer)
           2916 => ( Parameter_Float, 0.0 ),   --  : fsvvlc1 (Amount)
           2917 => ( Parameter_Float, 0.0 ),   --  : fsvvlc2 (Amount)
           2918 => ( Parameter_Float, 0.0 ),   --  : fsvvlc3 (Amount)
           2919 => ( Parameter_Float, 0.0 ),   --  : fsvvlc4 (Amount)
           2920 => ( Parameter_Float, 0.0 ),   --  : fsvvlc5 (Amount)
           2921 => ( Parameter_Float, 0.0 ),   --  : fsvvlc6 (Amount)
           2922 => ( Parameter_Integer, 0 ),   --  : fsvvlc7 (Integer)
           2923 => ( Parameter_Integer, 0 ),   --  : fsvvlc8 (Integer)
           2924 => ( Parameter_Float, 0.0 ),   --  : fsmkvc1 (Amount)
           2925 => ( Parameter_Float, 0.0 ),   --  : fsmkvc2 (Amount)
           2926 => ( Parameter_Float, 0.0 ),   --  : fsmkvc3 (Amount)
           2927 => ( Parameter_Float, 0.0 ),   --  : fsmkvc4 (Amount)
           2928 => ( Parameter_Float, 0.0 ),   --  : fsmkvc5 (Amount)
           2929 => ( Parameter_Integer, 0 ),   --  : fsmkvc6 (Integer)
           2930 => ( Parameter_Integer, 0 ),   --  : fsmkvc7 (Integer)
           2931 => ( Parameter_Integer, 0 ),   --  : fsmkvc8 (Integer)
           2932 => ( Parameter_Float, 0.0 ),   --  : fsmlvc1 (Amount)
           2933 => ( Parameter_Float, 0.0 ),   --  : fsmlvc2 (Amount)
           2934 => ( Parameter_Float, 0.0 ),   --  : fsmlvc3 (Amount)
           2935 => ( Parameter_Float, 0.0 ),   --  : fsmlvc4 (Amount)
           2936 => ( Parameter_Float, 0.0 ),   --  : fsmlvc5 (Amount)
           2937 => ( Parameter_Float, 0.0 ),   --  : fsmlvc6 (Amount)
           2938 => ( Parameter_Integer, 0 ),   --  : fsmlvc7 (Integer)
           2939 => ( Parameter_Integer, 0 ),   --  : fsmlvc8 (Integer)
           2940 => ( Parameter_Integer, 0 ),   --  : ftedc1 (Integer)
           2941 => ( Parameter_Integer, 0 ),   --  : ftedc2 (Integer)
           2942 => ( Parameter_Integer, 0 ),   --  : ftedc3 (Integer)
           2943 => ( Parameter_Integer, 0 ),   --  : ftedc4 (Integer)
           2944 => ( Parameter_Integer, 0 ),   --  : ftedc5 (Integer)
           2945 => ( Parameter_Integer, 0 ),   --  : ftedc6 (Integer)
           2946 => ( Parameter_Integer, 0 ),   --  : ftedc7 (Integer)
           2947 => ( Parameter_Integer, 0 ),   --  : ftedc8 (Integer)
           2948 => ( Parameter_Integer, 0 ),   --  : g1valc1 (Integer)
           2949 => ( Parameter_Integer, 0 ),   --  : g1valc2 (Integer)
           2950 => ( Parameter_Integer, 0 ),   --  : g1valc3 (Integer)
           2951 => ( Parameter_Integer, 0 ),   --  : g1valc4 (Integer)
           2952 => ( Parameter_Integer, 0 ),   --  : g1valc5 (Integer)
           2953 => ( Parameter_Integer, 0 ),   --  : g1valc6 (Integer)
           2954 => ( Parameter_Integer, 0 ),   --  : g1valc7 (Integer)
           2955 => ( Parameter_Integer, 0 ),   --  : g1valc8 (Integer)
           2956 => ( Parameter_Integer, 0 ),   --  : g2valc1 (Integer)
           2957 => ( Parameter_Integer, 0 ),   --  : g2valc2 (Integer)
           2958 => ( Parameter_Integer, 0 ),   --  : g2valc3 (Integer)
           2959 => ( Parameter_Integer, 0 ),   --  : g2valc4 (Integer)
           2960 => ( Parameter_Integer, 0 ),   --  : g2valc5 (Integer)
           2961 => ( Parameter_Integer, 0 ),   --  : g2valc6 (Integer)
           2962 => ( Parameter_Integer, 0 ),   --  : g2valc7 (Integer)
           2963 => ( Parameter_Integer, 0 ),   --  : g2valc8 (Integer)
           2964 => ( Parameter_Integer, 0 ),   --  : g1dirc1 (Integer)
           2965 => ( Parameter_Integer, 0 ),   --  : g1dirc2 (Integer)
           2966 => ( Parameter_Integer, 0 ),   --  : g1dirc3 (Integer)
           2967 => ( Parameter_Integer, 0 ),   --  : g1dirc4 (Integer)
           2968 => ( Parameter_Integer, 0 ),   --  : g1dirc5 (Integer)
           2969 => ( Parameter_Integer, 0 ),   --  : g1dirc6 (Integer)
           2970 => ( Parameter_Integer, 0 ),   --  : g1dirc7 (Integer)
           2971 => ( Parameter_Integer, 0 ),   --  : g1dirc8 (Integer)
           2972 => ( Parameter_Integer, 0 ),   --  : g2dirc1 (Integer)
           2973 => ( Parameter_Integer, 0 ),   --  : g2dirc2 (Integer)
           2974 => ( Parameter_Integer, 0 ),   --  : g2dirc3 (Integer)
           2975 => ( Parameter_Integer, 0 ),   --  : g2dirc4 (Integer)
           2976 => ( Parameter_Integer, 0 ),   --  : g2dirc5 (Integer)
           2977 => ( Parameter_Integer, 0 ),   --  : g2dirc6 (Integer)
           2978 => ( Parameter_Integer, 0 ),   --  : g2dirc7 (Integer)
           2979 => ( Parameter_Integer, 0 ),   --  : g2dirc8 (Integer)
           2980 => ( Parameter_Integer, 0 ),   --  : gtnumc1 (Integer)
           2981 => ( Parameter_Integer, 0 ),   --  : gtnumc2 (Integer)
           2982 => ( Parameter_Integer, 0 ),   --  : gtnumc3 (Integer)
           2983 => ( Parameter_Integer, 0 ),   --  : gtnumc4 (Integer)
           2984 => ( Parameter_Integer, 0 ),   --  : gtnumc5 (Integer)
           2985 => ( Parameter_Integer, 0 ),   --  : gtnumc6 (Integer)
           2986 => ( Parameter_Integer, 0 ),   --  : gtnumc7 (Integer)
           2987 => ( Parameter_Integer, 0 ),   --  : gtnumc8 (Integer)
           2988 => ( Parameter_Integer, 0 ),   --  : gt1scc1 (Integer)
           2989 => ( Parameter_Integer, 0 ),   --  : gt1scc2 (Integer)
           2990 => ( Parameter_Integer, 0 ),   --  : gt1scc3 (Integer)
           2991 => ( Parameter_Integer, 0 ),   --  : gt1scc4 (Integer)
           2992 => ( Parameter_Integer, 0 ),   --  : gt1scc5 (Integer)
           2993 => ( Parameter_Integer, 0 ),   --  : gt1scc6 (Integer)
           2994 => ( Parameter_Integer, 0 ),   --  : gt1scc7 (Integer)
           2995 => ( Parameter_Integer, 0 ),   --  : gt1scc8 (Integer)
           2996 => ( Parameter_Integer, 0 ),   --  : gt2scc1 (Integer)
           2997 => ( Parameter_Integer, 0 ),   --  : gt2scc2 (Integer)
           2998 => ( Parameter_Integer, 0 ),   --  : gt2scc3 (Integer)
           2999 => ( Parameter_Integer, 0 ),   --  : gt2scc4 (Integer)
           3000 => ( Parameter_Integer, 0 ),   --  : gt2scc5 (Integer)
           3001 => ( Parameter_Integer, 0 ),   --  : gt2scc6 (Integer)
           3002 => ( Parameter_Integer, 0 ),   --  : gt2scc7 (Integer)
           3003 => ( Parameter_Integer, 0 ),   --  : gt2scc8 (Integer)
           3004 => ( Parameter_Float, 0.0 ),   --  : gt10sc1 (Amount)
           3005 => ( Parameter_Integer, 0 ),   --  : gt10sc2 (Integer)
           3006 => ( Parameter_Integer, 0 ),   --  : gt10sc3 (Integer)
           3007 => ( Parameter_Integer, 0 ),   --  : gt10sc4 (Integer)
           3008 => ( Parameter_Integer, 0 ),   --  : gt10sc5 (Integer)
           3009 => ( Parameter_Integer, 0 ),   --  : gt10sc6 (Integer)
           3010 => ( Parameter_Integer, 0 ),   --  : gt10sc7 (Integer)
           3011 => ( Parameter_Integer, 0 ),   --  : gt10sc8 (Integer)
           3012 => ( Parameter_Integer, 0 ),   --  : gt20sc1 (Integer)
           3013 => ( Parameter_Integer, 0 ),   --  : gt20sc2 (Integer)
           3014 => ( Parameter_Integer, 0 ),   --  : gt20sc3 (Integer)
           3015 => ( Parameter_Integer, 0 ),   --  : gt20sc4 (Integer)
           3016 => ( Parameter_Integer, 0 ),   --  : gt20sc5 (Integer)
           3017 => ( Parameter_Integer, 0 ),   --  : gt20sc6 (Integer)
           3018 => ( Parameter_Integer, 0 ),   --  : gt20sc7 (Integer)
           3019 => ( Parameter_Integer, 0 ),   --  : gt20sc8 (Integer)
           3020 => ( Parameter_Integer, 0 ),   --  : hartvc1 (Integer)
           3021 => ( Parameter_Integer, 0 ),   --  : hartvc2 (Integer)
           3022 => ( Parameter_Integer, 0 ),   --  : hartvc3 (Integer)
           3023 => ( Parameter_Integer, 0 ),   --  : hartvc4 (Integer)
           3024 => ( Parameter_Integer, 0 ),   --  : hartvc5 (Integer)
           3025 => ( Parameter_Integer, 0 ),   --  : hartvc6 (Integer)
           3026 => ( Parameter_Integer, 0 ),   --  : hartvc7 (Integer)
           3027 => ( Parameter_Integer, 0 ),   --  : hartvc8 (Integer)
           3028 => ( Parameter_Integer, 0 ),   --  : heatchc1 (Integer)
           3029 => ( Parameter_Integer, 0 ),   --  : heatchc2 (Integer)
           3030 => ( Parameter_Integer, 0 ),   --  : heatchc3 (Integer)
           3031 => ( Parameter_Integer, 0 ),   --  : heatchc4 (Integer)
           3032 => ( Parameter_Integer, 0 ),   --  : heatchc5 (Integer)
           3033 => ( Parameter_Integer, 0 ),   --  : heatchc6 (Integer)
           3034 => ( Parameter_Integer, 0 ),   --  : heatchc7 (Integer)
           3035 => ( Parameter_Integer, 0 ),   --  : heatchc8 (Integer)
           3036 => ( Parameter_Integer, 0 ),   --  : hhldrc1 (Integer)
           3037 => ( Parameter_Integer, 0 ),   --  : hhldrc2 (Integer)
           3038 => ( Parameter_Integer, 0 ),   --  : hhldrc3 (Integer)
           3039 => ( Parameter_Integer, 0 ),   --  : hhldrc4 (Integer)
           3040 => ( Parameter_Integer, 0 ),   --  : hhldrc5 (Integer)
           3041 => ( Parameter_Integer, 0 ),   --  : hhldrc6 (Integer)
           3042 => ( Parameter_Integer, 0 ),   --  : hhldrc7 (Integer)
           3043 => ( Parameter_Integer, 0 ),   --  : hhldrc8 (Integer)
           3044 => ( Parameter_Integer, 0 ),   --  : hurabc1 (Integer)
           3045 => ( Parameter_Integer, 0 ),   --  : hurabc2 (Integer)
           3046 => ( Parameter_Integer, 0 ),   --  : hurabc3 (Integer)
           3047 => ( Parameter_Integer, 0 ),   --  : hurabc4 (Integer)
           3048 => ( Parameter_Integer, 0 ),   --  : hurabc5 (Integer)
           3049 => ( Parameter_Integer, 0 ),   --  : hurabc6 (Integer)
           3050 => ( Parameter_Integer, 0 ),   --  : hurabc7 (Integer)
           3051 => ( Parameter_Integer, 0 ),   --  : hurabc8 (Integer)
           3052 => ( Parameter_Integer, 0 ),   --  : hurahc1 (Integer)
           3053 => ( Parameter_Integer, 0 ),   --  : hurahc2 (Integer)
           3054 => ( Parameter_Integer, 0 ),   --  : hurahc3 (Integer)
           3055 => ( Parameter_Integer, 0 ),   --  : hurahc4 (Integer)
           3056 => ( Parameter_Integer, 0 ),   --  : hurahc5 (Integer)
           3057 => ( Parameter_Integer, 0 ),   --  : hurahc6 (Integer)
           3058 => ( Parameter_Integer, 0 ),   --  : hurahc7 (Integer)
           3059 => ( Parameter_Integer, 0 ),   --  : hurahc8 (Integer)
           3060 => ( Parameter_Integer, 0 ),   --  : hurcbc1 (Integer)
           3061 => ( Parameter_Integer, 0 ),   --  : hurcbc2 (Integer)
           3062 => ( Parameter_Integer, 0 ),   --  : hurcbc3 (Integer)
           3063 => ( Parameter_Integer, 0 ),   --  : hurcbc4 (Integer)
           3064 => ( Parameter_Integer, 0 ),   --  : hurcbc5 (Integer)
           3065 => ( Parameter_Integer, 0 ),   --  : hurcbc6 (Integer)
           3066 => ( Parameter_Integer, 0 ),   --  : hurcbc7 (Integer)
           3067 => ( Parameter_Integer, 0 ),   --  : hurcbc8 (Integer)
           3068 => ( Parameter_Integer, 0 ),   --  : hurchc1 (Integer)
           3069 => ( Parameter_Integer, 0 ),   --  : hurchc2 (Integer)
           3070 => ( Parameter_Integer, 0 ),   --  : hurchc3 (Integer)
           3071 => ( Parameter_Integer, 0 ),   --  : hurchc4 (Integer)
           3072 => ( Parameter_Integer, 0 ),   --  : hurchc5 (Integer)
           3073 => ( Parameter_Integer, 0 ),   --  : hurchc6 (Integer)
           3074 => ( Parameter_Integer, 0 ),   --  : hurchc7 (Integer)
           3075 => ( Parameter_Integer, 0 ),   --  : hurchc8 (Integer)
           3076 => ( Parameter_Integer, 0 ),   --  : hurclc1 (Integer)
           3077 => ( Parameter_Integer, 0 ),   --  : hurclc2 (Integer)
           3078 => ( Parameter_Integer, 0 ),   --  : hurclc3 (Integer)
           3079 => ( Parameter_Integer, 0 ),   --  : hurclc4 (Integer)
           3080 => ( Parameter_Integer, 0 ),   --  : hurclc5 (Integer)
           3081 => ( Parameter_Integer, 0 ),   --  : hurclc6 (Integer)
           3082 => ( Parameter_Integer, 0 ),   --  : hurclc7 (Integer)
           3083 => ( Parameter_Integer, 0 ),   --  : hurclc8 (Integer)
           3084 => ( Parameter_Integer, 0 ),   --  : hurfrc1 (Integer)
           3085 => ( Parameter_Integer, 0 ),   --  : hurfrc2 (Integer)
           3086 => ( Parameter_Integer, 0 ),   --  : hurfrc3 (Integer)
           3087 => ( Parameter_Integer, 0 ),   --  : hurfrc4 (Integer)
           3088 => ( Parameter_Integer, 0 ),   --  : hurfrc5 (Integer)
           3089 => ( Parameter_Integer, 0 ),   --  : hurfrc6 (Integer)
           3090 => ( Parameter_Integer, 0 ),   --  : hurfrc7 (Integer)
           3091 => ( Parameter_Integer, 0 ),   --  : hurfrc8 (Integer)
           3092 => ( Parameter_Integer, 0 ),   --  : hurotc1 (Integer)
           3093 => ( Parameter_Integer, 0 ),   --  : hurotc2 (Integer)
           3094 => ( Parameter_Integer, 0 ),   --  : hurotc3 (Integer)
           3095 => ( Parameter_Integer, 0 ),   --  : hurotc4 (Integer)
           3096 => ( Parameter_Integer, 0 ),   --  : hurotc5 (Integer)
           3097 => ( Parameter_Integer, 0 ),   --  : hurotc6 (Integer)
           3098 => ( Parameter_Integer, 0 ),   --  : hurotc7 (Integer)
           3099 => ( Parameter_Integer, 0 ),   --  : hurotc8 (Integer)
           3100 => ( Parameter_Integer, 0 ),   --  : hurrec1 (Integer)
           3101 => ( Parameter_Integer, 0 ),   --  : hurrec2 (Integer)
           3102 => ( Parameter_Integer, 0 ),   --  : hurrec3 (Integer)
           3103 => ( Parameter_Integer, 0 ),   --  : hurrec4 (Integer)
           3104 => ( Parameter_Integer, 0 ),   --  : hurrec5 (Integer)
           3105 => ( Parameter_Integer, 0 ),   --  : hurrec6 (Integer)
           3106 => ( Parameter_Integer, 0 ),   --  : hurrec7 (Integer)
           3107 => ( Parameter_Integer, 0 ),   --  : hurrec8 (Integer)
           3108 => ( Parameter_Integer, 0 ),   --  : hpersc1 (Integer)
           3109 => ( Parameter_Integer, 0 ),   --  : hpersc2 (Integer)
           3110 => ( Parameter_Integer, 0 ),   --  : hpersc3 (Integer)
           3111 => ( Parameter_Integer, 0 ),   --  : hpersc4 (Integer)
           3112 => ( Parameter_Integer, 0 ),   --  : hpersc5 (Integer)
           3113 => ( Parameter_Integer, 0 ),   --  : hpersc6 (Integer)
           3114 => ( Parameter_Integer, 0 ),   --  : hpersc7 (Integer)
           3115 => ( Parameter_Integer, 0 ),   --  : hpersc8 (Integer)
           3116 => ( Parameter_Integer, 0 ),   --  : hrsedc1 (Integer)
           3117 => ( Parameter_Integer, 0 ),   --  : hrsedc2 (Integer)
           3118 => ( Parameter_Integer, 0 ),   --  : hrsedc3 (Integer)
           3119 => ( Parameter_Integer, 0 ),   --  : hrsedc4 (Integer)
           3120 => ( Parameter_Integer, 0 ),   --  : hrsedc5 (Integer)
           3121 => ( Parameter_Integer, 0 ),   --  : hrsedc6 (Integer)
           3122 => ( Parameter_Integer, 0 ),   --  : hrsedc7 (Integer)
           3123 => ( Parameter_Integer, 0 ),   --  : hrsedc8 (Integer)
           3124 => ( Parameter_Integer, 0 ),   --  : hsvprc1 (Integer)
           3125 => ( Parameter_Integer, 0 ),   --  : hsvprc2 (Integer)
           3126 => ( Parameter_Integer, 0 ),   --  : hsvprc3 (Integer)
           3127 => ( Parameter_Integer, 0 ),   --  : hsvprc4 (Integer)
           3128 => ( Parameter_Integer, 0 ),   --  : hsvprc5 (Integer)
           3129 => ( Parameter_Integer, 0 ),   --  : hsvprc6 (Integer)
           3130 => ( Parameter_Integer, 0 ),   --  : hsvprc7 (Integer)
           3131 => ( Parameter_Integer, 0 ),   --  : hsvprc8 (Integer)
           3132 => ( Parameter_Integer, 0 ),   --  : laregc1 (Integer)
           3133 => ( Parameter_Integer, 0 ),   --  : laregc2 (Integer)
           3134 => ( Parameter_Integer, 0 ),   --  : laregc3 (Integer)
           3135 => ( Parameter_Integer, 0 ),   --  : laregc4 (Integer)
           3136 => ( Parameter_Integer, 0 ),   --  : laregc5 (Integer)
           3137 => ( Parameter_Integer, 0 ),   --  : laregc6 (Integer)
           3138 => ( Parameter_Integer, 0 ),   --  : laregc7 (Integer)
           3139 => ( Parameter_Integer, 0 ),   --  : laregc8 (Integer)
           3140 => ( Parameter_Integer, 0 ),   --  : msc1 (Integer)
           3141 => ( Parameter_Integer, 0 ),   --  : msc2 (Integer)
           3142 => ( Parameter_Integer, 0 ),   --  : msc3 (Integer)
           3143 => ( Parameter_Integer, 0 ),   --  : msc4 (Integer)
           3144 => ( Parameter_Integer, 0 ),   --  : msc5 (Integer)
           3145 => ( Parameter_Integer, 0 ),   --  : msc6 (Integer)
           3146 => ( Parameter_Integer, 0 ),   --  : msc7 (Integer)
           3147 => ( Parameter_Integer, 0 ),   --  : msc8 (Integer)
           3148 => ( Parameter_Integer, 0 ),   --  : prsonc1 (Integer)
           3149 => ( Parameter_Integer, 0 ),   --  : prsonc2 (Integer)
           3150 => ( Parameter_Integer, 0 ),   --  : prsonc3 (Integer)
           3151 => ( Parameter_Integer, 0 ),   --  : prsonc4 (Integer)
           3152 => ( Parameter_Integer, 0 ),   --  : prsonc5 (Integer)
           3153 => ( Parameter_Integer, 0 ),   --  : prsonc6 (Integer)
           3154 => ( Parameter_Integer, 0 ),   --  : prsonc7 (Integer)
           3155 => ( Parameter_Integer, 0 ),   --  : prsonc8 (Integer)
           3156 => ( Parameter_Integer, 0 ),   --  : rlp1c1 (Integer)
           3157 => ( Parameter_Integer, 0 ),   --  : rlp1c2 (Integer)
           3158 => ( Parameter_Integer, 0 ),   --  : rlp1c3 (Integer)
           3159 => ( Parameter_Integer, 0 ),   --  : rlp1c4 (Integer)
           3160 => ( Parameter_Integer, 0 ),   --  : rlp1c5 (Integer)
           3161 => ( Parameter_Integer, 0 ),   --  : rlp1c6 (Integer)
           3162 => ( Parameter_Integer, 0 ),   --  : rlp1c7 (Integer)
           3163 => ( Parameter_Integer, 0 ),   --  : rlp1c8 (Integer)
           3164 => ( Parameter_Integer, 0 ),   --  : rlp2c1 (Integer)
           3165 => ( Parameter_Integer, 0 ),   --  : rlp2c2 (Integer)
           3166 => ( Parameter_Integer, 0 ),   --  : rlp2c3 (Integer)
           3167 => ( Parameter_Integer, 0 ),   --  : rlp2c4 (Integer)
           3168 => ( Parameter_Integer, 0 ),   --  : rlp2c5 (Integer)
           3169 => ( Parameter_Integer, 0 ),   --  : rlp2c6 (Integer)
           3170 => ( Parameter_Integer, 0 ),   --  : rlp2c7 (Integer)
           3171 => ( Parameter_Integer, 0 ),   --  : rlp2c8 (Integer)
           3172 => ( Parameter_Integer, 0 ),   --  : rlp3c1 (Integer)
           3173 => ( Parameter_Integer, 0 ),   --  : rlp3c2 (Integer)
           3174 => ( Parameter_Integer, 0 ),   --  : rlp3c3 (Integer)
           3175 => ( Parameter_Integer, 0 ),   --  : rlp3c4 (Integer)
           3176 => ( Parameter_Integer, 0 ),   --  : rlp3c5 (Integer)
           3177 => ( Parameter_Integer, 0 ),   --  : rlp3c6 (Integer)
           3178 => ( Parameter_Integer, 0 ),   --  : rlp3c7 (Integer)
           3179 => ( Parameter_Integer, 0 ),   --  : rlp3c8 (Integer)
           3180 => ( Parameter_Integer, 0 ),   --  : rlp4c1 (Integer)
           3181 => ( Parameter_Integer, 0 ),   --  : rlp4c2 (Integer)
           3182 => ( Parameter_Integer, 0 ),   --  : rlp4c3 (Integer)
           3183 => ( Parameter_Integer, 0 ),   --  : rlp4c4 (Integer)
           3184 => ( Parameter_Integer, 0 ),   --  : rlp4c5 (Integer)
           3185 => ( Parameter_Integer, 0 ),   --  : rlp4c6 (Integer)
           3186 => ( Parameter_Integer, 0 ),   --  : rlp4c7 (Integer)
           3187 => ( Parameter_Integer, 0 ),   --  : rlp4c8 (Integer)
           3188 => ( Parameter_Integer, 0 ),   --  : rlp5c1 (Integer)
           3189 => ( Parameter_Integer, 0 ),   --  : rlp5c2 (Integer)
           3190 => ( Parameter_Integer, 0 ),   --  : rlp5c3 (Integer)
           3191 => ( Parameter_Integer, 0 ),   --  : rlp5c4 (Integer)
           3192 => ( Parameter_Integer, 0 ),   --  : rlp5c5 (Integer)
           3193 => ( Parameter_Integer, 0 ),   --  : rlp5c6 (Integer)
           3194 => ( Parameter_Integer, 0 ),   --  : rlp5c7 (Integer)
           3195 => ( Parameter_Integer, 0 ),   --  : rlp5c8 (Integer)
           3196 => ( Parameter_Integer, 0 ),   --  : rlp6c1 (Integer)
           3197 => ( Parameter_Integer, 0 ),   --  : rlp6c2 (Integer)
           3198 => ( Parameter_Integer, 0 ),   --  : rlp6c3 (Integer)
           3199 => ( Parameter_Integer, 0 ),   --  : rlp6c4 (Integer)
           3200 => ( Parameter_Integer, 0 ),   --  : rlp6c5 (Integer)
           3201 => ( Parameter_Integer, 0 ),   --  : rlp6c6 (Integer)
           3202 => ( Parameter_Integer, 0 ),   --  : rlp6c7 (Integer)
           3203 => ( Parameter_Integer, 0 ),   --  : rlp6c8 (Integer)
           3204 => ( Parameter_Integer, 0 ),   --  : rlp7c1 (Integer)
           3205 => ( Parameter_Integer, 0 ),   --  : rlp7c2 (Integer)
           3206 => ( Parameter_Integer, 0 ),   --  : rlp7c3 (Integer)
           3207 => ( Parameter_Integer, 0 ),   --  : rlp7c4 (Integer)
           3208 => ( Parameter_Integer, 0 ),   --  : rlp7c5 (Integer)
           3209 => ( Parameter_Integer, 0 ),   --  : rlp7c6 (Integer)
           3210 => ( Parameter_Integer, 0 ),   --  : rlp7c7 (Integer)
           3211 => ( Parameter_Integer, 0 ),   --  : rlp7c8 (Integer)
           3212 => ( Parameter_Integer, 0 ),   --  : rlp8c1 (Integer)
           3213 => ( Parameter_Integer, 0 ),   --  : rlp8c2 (Integer)
           3214 => ( Parameter_Integer, 0 ),   --  : rlp8c3 (Integer)
           3215 => ( Parameter_Integer, 0 ),   --  : rlp8c4 (Integer)
           3216 => ( Parameter_Integer, 0 ),   --  : rlp8c5 (Integer)
           3217 => ( Parameter_Integer, 0 ),   --  : rlp8c6 (Integer)
           3218 => ( Parameter_Integer, 0 ),   --  : rlp8c7 (Integer)
           3219 => ( Parameter_Integer, 0 ),   --  : rlp8c8 (Integer)
           3220 => ( Parameter_Integer, 0 ),   --  : rlp9c1 (Integer)
           3221 => ( Parameter_Integer, 0 ),   --  : rlp9c2 (Integer)
           3222 => ( Parameter_Integer, 0 ),   --  : rlp9c3 (Integer)
           3223 => ( Parameter_Integer, 0 ),   --  : rlp9c4 (Integer)
           3224 => ( Parameter_Integer, 0 ),   --  : rlp9c5 (Integer)
           3225 => ( Parameter_Integer, 0 ),   --  : rlp9c6 (Integer)
           3226 => ( Parameter_Integer, 0 ),   --  : rlp9c7 (Integer)
           3227 => ( Parameter_Integer, 0 ),   --  : rlp9c8 (Integer)
           3228 => ( Parameter_Integer, 0 ),   --  : rlp10c1 (Integer)
           3229 => ( Parameter_Integer, 0 ),   --  : rlp10c2 (Integer)
           3230 => ( Parameter_Integer, 0 ),   --  : rlp10c3 (Integer)
           3231 => ( Parameter_Integer, 0 ),   --  : rlp10c4 (Integer)
           3232 => ( Parameter_Integer, 0 ),   --  : rlp10c5 (Integer)
           3233 => ( Parameter_Integer, 0 ),   --  : rlp10c6 (Integer)
           3234 => ( Parameter_Integer, 0 ),   --  : rlp10c7 (Integer)
           3235 => ( Parameter_Integer, 0 ),   --  : rlp10c8 (Integer)
           3236 => ( Parameter_Integer, 0 ),   --  : rlp11c1 (Integer)
           3237 => ( Parameter_Integer, 0 ),   --  : rlp11c2 (Integer)
           3238 => ( Parameter_Integer, 0 ),   --  : rlp11c3 (Integer)
           3239 => ( Parameter_Integer, 0 ),   --  : rlp11c4 (Integer)
           3240 => ( Parameter_Integer, 0 ),   --  : rlp11c5 (Integer)
           3241 => ( Parameter_Integer, 0 ),   --  : rlp11c6 (Integer)
           3242 => ( Parameter_Integer, 0 ),   --  : rlp11c7 (Integer)
           3243 => ( Parameter_Integer, 0 ),   --  : rlp11c8 (Integer)
           3244 => ( Parameter_Integer, 0 ),   --  : rlp12c1 (Integer)
           3245 => ( Parameter_Integer, 0 ),   --  : rlp12c2 (Integer)
           3246 => ( Parameter_Integer, 0 ),   --  : rlp12c3 (Integer)
           3247 => ( Parameter_Integer, 0 ),   --  : rlp12c4 (Integer)
           3248 => ( Parameter_Integer, 0 ),   --  : rlp12c5 (Integer)
           3249 => ( Parameter_Integer, 0 ),   --  : rlp12c6 (Integer)
           3250 => ( Parameter_Integer, 0 ),   --  : rlp12c7 (Integer)
           3251 => ( Parameter_Integer, 0 ),   --  : rlp12c8 (Integer)
           3252 => ( Parameter_Integer, 0 ),   --  : rlp13c1 (Integer)
           3253 => ( Parameter_Integer, 0 ),   --  : rlp13c2 (Integer)
           3254 => ( Parameter_Integer, 0 ),   --  : rlp13c3 (Integer)
           3255 => ( Parameter_Integer, 0 ),   --  : rlp13c4 (Integer)
           3256 => ( Parameter_Integer, 0 ),   --  : rlp13c5 (Integer)
           3257 => ( Parameter_Integer, 0 ),   --  : rlp13c6 (Integer)
           3258 => ( Parameter_Integer, 0 ),   --  : rlp13c7 (Integer)
           3259 => ( Parameter_Integer, 0 ),   --  : rlp13c8 (Integer)
           3260 => ( Parameter_Integer, 0 ),   --  : rlp14c1 (Integer)
           3261 => ( Parameter_Integer, 0 ),   --  : rlp14c2 (Integer)
           3262 => ( Parameter_Integer, 0 ),   --  : rlp14c3 (Integer)
           3263 => ( Parameter_Integer, 0 ),   --  : rlp14c4 (Integer)
           3264 => ( Parameter_Integer, 0 ),   --  : rlp14c5 (Integer)
           3265 => ( Parameter_Integer, 0 ),   --  : rlp14c6 (Integer)
           3266 => ( Parameter_Integer, 0 ),   --  : rlp14c7 (Integer)
           3267 => ( Parameter_Integer, 0 ),   --  : rlp14c8 (Integer)
           3268 => ( Parameter_Integer, 0 ),   --  : rhrpcc1 (Integer)
           3269 => ( Parameter_Integer, 0 ),   --  : rhrpcc2 (Integer)
           3270 => ( Parameter_Integer, 0 ),   --  : rhrpcc3 (Integer)
           3271 => ( Parameter_Integer, 0 ),   --  : rhrpcc4 (Integer)
           3272 => ( Parameter_Integer, 0 ),   --  : rhrpcc5 (Integer)
           3273 => ( Parameter_Integer, 0 ),   --  : rhrpcc6 (Integer)
           3274 => ( Parameter_Integer, 0 ),   --  : rhrpcc7 (Integer)
           3275 => ( Parameter_Integer, 0 ),   --  : rhrpcc8 (Integer)
           3276 => ( Parameter_Integer, 0 ),   --  : sbkitc1 (Integer)
           3277 => ( Parameter_Integer, 0 ),   --  : sbkitc2 (Integer)
           3278 => ( Parameter_Integer, 0 ),   --  : sbkitc3 (Integer)
           3279 => ( Parameter_Integer, 0 ),   --  : sbkitc4 (Integer)
           3280 => ( Parameter_Integer, 0 ),   --  : sbkitc5 (Integer)
           3281 => ( Parameter_Integer, 0 ),   --  : sbkitc6 (Integer)
           3282 => ( Parameter_Integer, 0 ),   --  : sbkitc7 (Integer)
           3283 => ( Parameter_Integer, 0 ),   --  : sbkitc8 (Integer)
           3284 => ( Parameter_Integer, 0 ),   --  : sexc1 (Integer)
           3285 => ( Parameter_Integer, 0 ),   --  : sexc2 (Integer)
           3286 => ( Parameter_Integer, 0 ),   --  : sexc3 (Integer)
           3287 => ( Parameter_Integer, 0 ),   --  : sexc4 (Integer)
           3288 => ( Parameter_Integer, 0 ),   --  : sexc5 (Integer)
           3289 => ( Parameter_Integer, 0 ),   --  : sexc6 (Integer)
           3290 => ( Parameter_Integer, 0 ),   --  : sexc7 (Integer)
           3291 => ( Parameter_Integer, 0 ),   --  : sexc8 (Integer)
           3292 => ( Parameter_Integer, 0 ),   --  : sfvitc1 (Integer)
           3293 => ( Parameter_Integer, 0 ),   --  : sfvitc2 (Integer)
           3294 => ( Parameter_Integer, 0 ),   --  : sfvitc3 (Integer)
           3295 => ( Parameter_Integer, 0 ),   --  : sfvitc4 (Integer)
           3296 => ( Parameter_Integer, 0 ),   --  : sfvitc5 (Integer)
           3297 => ( Parameter_Integer, 0 ),   --  : sfvitc6 (Integer)
           3298 => ( Parameter_Integer, 0 ),   --  : sfvitc7 (Integer)
           3299 => ( Parameter_Integer, 0 ),   --  : sfvitc8 (Integer)
           3300 => ( Parameter_Integer, 0 ),   --  : fmctsc1 (Integer)
           3301 => ( Parameter_Integer, 0 ),   --  : fmctsc2 (Integer)
           3302 => ( Parameter_Integer, 0 ),   --  : fmctsc3 (Integer)
           3303 => ( Parameter_Integer, 0 ),   --  : fmctsc4 (Integer)
           3304 => ( Parameter_Integer, 0 ),   --  : fmctsc5 (Integer)
           3305 => ( Parameter_Integer, 0 ),   --  : fmctsc6 (Integer)
           3306 => ( Parameter_Integer, 0 ),   --  : fmctsc7 (Integer)
           3307 => ( Parameter_Integer, 0 ),   --  : fmctsc8 (Integer)
           3308 => ( Parameter_Integer, 0 ),   --  : fmealc1 (Integer)
           3309 => ( Parameter_Integer, 0 ),   --  : fmealc2 (Integer)
           3310 => ( Parameter_Integer, 0 ),   --  : fmealc3 (Integer)
           3311 => ( Parameter_Integer, 0 ),   --  : fmealc4 (Integer)
           3312 => ( Parameter_Integer, 0 ),   --  : fmealc5 (Integer)
           3313 => ( Parameter_Integer, 0 ),   --  : fmealc6 (Integer)
           3314 => ( Parameter_Integer, 0 ),   --  : fmealc7 (Integer)
           3315 => ( Parameter_Integer, 0 ),   --  : fmealc8 (Integer)
           3316 => ( Parameter_Integer, 0 ),   --  : cblndc1 (Integer)
           3317 => ( Parameter_Integer, 0 ),   --  : cblndc2 (Integer)
           3318 => ( Parameter_Integer, 0 ),   --  : cblndc3 (Integer)
           3319 => ( Parameter_Integer, 0 ),   --  : cblndc4 (Integer)
           3320 => ( Parameter_Integer, 0 ),   --  : cblndc5 (Integer)
           3321 => ( Parameter_Integer, 0 ),   --  : cblndc6 (Integer)
           3322 => ( Parameter_Integer, 0 ),   --  : cblndc7 (Integer)
           3323 => ( Parameter_Integer, 0 ),   --  : cblndc8 (Integer)
           3324 => ( Parameter_Integer, 0 ),   --  : cparsc1 (Integer)
           3325 => ( Parameter_Integer, 0 ),   --  : cparsc2 (Integer)
           3326 => ( Parameter_Integer, 0 ),   --  : cparsc3 (Integer)
           3327 => ( Parameter_Integer, 0 ),   --  : cparsc4 (Integer)
           3328 => ( Parameter_Integer, 0 ),   --  : cparsc5 (Integer)
           3329 => ( Parameter_Integer, 0 ),   --  : cparsc6 (Integer)
           3330 => ( Parameter_Integer, 0 ),   --  : cparsc7 (Integer)
           3331 => ( Parameter_Integer, 0 ),   --  : cparsc8 (Integer)
           3332 => ( Parameter_Integer, 0 ),   --  : cdeafc1 (Integer)
           3333 => ( Parameter_Integer, 0 ),   --  : cdeafc2 (Integer)
           3334 => ( Parameter_Integer, 0 ),   --  : cdeafc3 (Integer)
           3335 => ( Parameter_Integer, 0 ),   --  : cdeafc4 (Integer)
           3336 => ( Parameter_Integer, 0 ),   --  : cdeafc5 (Integer)
           3337 => ( Parameter_Integer, 0 ),   --  : cdeafc6 (Integer)
           3338 => ( Parameter_Integer, 0 ),   --  : cdeafc7 (Integer)
           3339 => ( Parameter_Integer, 0 ),   --  : cdeafc8 (Integer)
           3340 => ( Parameter_Integer, 0 ),   --  : totgtc1 (Integer)
           3341 => ( Parameter_Integer, 0 ),   --  : totgtc2 (Integer)
           3342 => ( Parameter_Integer, 0 ),   --  : totgtc3 (Integer)
           3343 => ( Parameter_Integer, 0 ),   --  : totgtc4 (Integer)
           3344 => ( Parameter_Integer, 0 ),   --  : totgtc5 (Integer)
           3345 => ( Parameter_Integer, 0 ),   --  : totgtc6 (Integer)
           3346 => ( Parameter_Integer, 0 ),   --  : totgtc7 (Integer)
           3347 => ( Parameter_Integer, 0 ),   --  : totgtc8 (Integer)
           3348 => ( Parameter_Integer, 0 ),   --  : totsvc1 (Integer)
           3349 => ( Parameter_Integer, 0 ),   --  : totsvc2 (Integer)
           3350 => ( Parameter_Integer, 0 ),   --  : totsvc3 (Integer)
           3351 => ( Parameter_Integer, 0 ),   --  : totsvc4 (Integer)
           3352 => ( Parameter_Integer, 0 ),   --  : totsvc5 (Integer)
           3353 => ( Parameter_Integer, 0 ),   --  : totsvc6 (Integer)
           3354 => ( Parameter_Integer, 0 ),   --  : totsvc7 (Integer)
           3355 => ( Parameter_Integer, 0 ),   --  : totsvc8 (Integer)
           3356 => ( Parameter_Float, 0.0 ),   --  : tacamc1 (Amount)
           3357 => ( Parameter_Float, 0.0 ),   --  : tacamc2 (Amount)
           3358 => ( Parameter_Float, 0.0 ),   --  : tacamc3 (Amount)
           3359 => ( Parameter_Float, 0.0 ),   --  : tacamc4 (Amount)
           3360 => ( Parameter_Float, 0.0 ),   --  : tacamc5 (Amount)
           3361 => ( Parameter_Float, 0.0 ),   --  : tacamc6 (Amount)
           3362 => ( Parameter_Integer, 0 ),   --  : tacamc7 (Integer)
           3363 => ( Parameter_Integer, 0 ),   --  : tacamc8 (Integer)
           3364 => ( Parameter_Integer, 0 ),   --  : tpeedc1 (Integer)
           3365 => ( Parameter_Integer, 0 ),   --  : tpeedc2 (Integer)
           3366 => ( Parameter_Integer, 0 ),   --  : tpeedc3 (Integer)
           3367 => ( Parameter_Integer, 0 ),   --  : tpeedc4 (Integer)
           3368 => ( Parameter_Integer, 0 ),   --  : tpeedc5 (Integer)
           3369 => ( Parameter_Integer, 0 ),   --  : tpeedc6 (Integer)
           3370 => ( Parameter_Integer, 0 ),   --  : tpeedc7 (Integer)
           3371 => ( Parameter_Integer, 0 ),   --  : tpeedc8 (Integer)
           3372 => ( Parameter_Integer, 0 ),   --  : uprsoc1 (Integer)
           3373 => ( Parameter_Integer, 0 ),   --  : uprsoc2 (Integer)
           3374 => ( Parameter_Integer, 0 ),   --  : uprsoc3 (Integer)
           3375 => ( Parameter_Integer, 0 ),   --  : uprsoc4 (Integer)
           3376 => ( Parameter_Integer, 0 ),   --  : uprsoc5 (Integer)
           3377 => ( Parameter_Integer, 0 ),   --  : uprsoc6 (Integer)
           3378 => ( Parameter_Integer, 0 ),   --  : uprsoc7 (Integer)
           3379 => ( Parameter_Integer, 0 ),   --  : uprsoc8 (Integer)
           3380 => ( Parameter_Integer, 0 ),   --  : govpy1hd (Integer)
           3381 => ( Parameter_Integer, 0 ),   --  : govpy2hd (Integer)
           3382 => ( Parameter_Integer, 0 ),   --  : govpy3hd (Integer)
           3383 => ( Parameter_Integer, 0 ),   --  : govpy4hd (Integer)
           3384 => ( Parameter_Integer, 0 ),   --  : govpy5hd (Integer)
           3385 => ( Parameter_Integer, 0 ),   --  : govpy6hd (Integer)
           3386 => ( Parameter_Integer, 0 ),   --  : govpy7hd (Integer)
           3387 => ( Parameter_Integer, 0 ),   --  : govpy8hd (Integer)
           3388 => ( Parameter_Integer, 0 ),   --  : govpy9hd (Integer)
           3389 => ( Parameter_Integer, 0 ),   --  : gvpy10hd (Integer)
           3390 => ( Parameter_Integer, 0 ),   --  : gvpy11hd (Integer)
           3391 => ( Parameter_Integer, 0 ),   --  : govpy1sp (Integer)
           3392 => ( Parameter_Integer, 0 ),   --  : govpy2sp (Integer)
           3393 => ( Parameter_Integer, 0 ),   --  : govpy3sp (Integer)
           3394 => ( Parameter_Integer, 0 ),   --  : govpy4sp (Integer)
           3395 => ( Parameter_Integer, 0 ),   --  : govpy5sp (Integer)
           3396 => ( Parameter_Integer, 0 ),   --  : govpy6sp (Integer)
           3397 => ( Parameter_Integer, 0 ),   --  : govpy7sp (Integer)
           3398 => ( Parameter_Integer, 0 ),   --  : govpy8sp (Integer)
           3399 => ( Parameter_Integer, 0 ),   --  : govpy9sp (Integer)
           3400 => ( Parameter_Integer, 0 ),   --  : gvpy10sp (Integer)
           3401 => ( Parameter_Integer, 0 ),   --  : gvpy11sp (Integer)
           3402 => ( Parameter_Float, 0.0 ),   --  : nhhamt1 (Amount)
           3403 => ( Parameter_Float, 0.0 ),   --  : nhhamt2 (Amount)
           3404 => ( Parameter_Float, 0.0 ),   --  : nhhamt3 (Amount)
           3405 => ( Parameter_Float, 0.0 ),   --  : nhhamt4 (Amount)
           3406 => ( Parameter_Integer, 0 ),   --  : nhhfee1 (Integer)
           3407 => ( Parameter_Integer, 0 ),   --  : nhhfee2 (Integer)
           3408 => ( Parameter_Integer, 0 ),   --  : nhhfee3 (Integer)
           3409 => ( Parameter_Integer, 0 ),   --  : nhhfee4 (Integer)
           3410 => ( Parameter_Integer, 0 ),   --  : pnhhamt1 (Integer)
           3411 => ( Parameter_Integer, 0 ),   --  : pnhhamt2 (Integer)
           3412 => ( Parameter_Integer, 0 ),   --  : pnhhamt3 (Integer)
           3413 => ( Parameter_Integer, 0 ),   --  : pnhhamt4 (Integer)
           3414 => ( Parameter_Float, 0.0 ),   --  : bona11hd (Amount)
           3415 => ( Parameter_Integer, 0 ),   --  : bona12hd (Integer)
           3416 => ( Parameter_Integer, 0 ),   --  : bona13hd (Integer)
           3417 => ( Parameter_Float, 0.0 ),   --  : bona11sp (Amount)
           3418 => ( Parameter_Integer, 0 ),   --  : bona12sp (Integer)
           3419 => ( Parameter_Integer, 0 ),   --  : bona13sp (Integer)
           3420 => ( Parameter_Float, 0.0 ),   --  : bona21hd (Amount)
           3421 => ( Parameter_Integer, 0 ),   --  : bona22hd (Integer)
           3422 => ( Parameter_Integer, 0 ),   --  : bona23hd (Integer)
           3423 => ( Parameter_Integer, 0 ),   --  : bona21sp (Integer)
           3424 => ( Parameter_Integer, 0 ),   --  : bona22sp (Integer)
           3425 => ( Parameter_Integer, 0 ),   --  : bona23sp (Integer)
           3426 => ( Parameter_Float, 0.0 ),   --  : bona31hd (Amount)
           3427 => ( Parameter_Integer, 0 ),   --  : bona32hd (Integer)
           3428 => ( Parameter_Integer, 0 ),   --  : bona33hd (Integer)
           3429 => ( Parameter_Integer, 0 ),   --  : bona31sp (Integer)
           3430 => ( Parameter_Integer, 0 ),   --  : bona32sp (Integer)
           3431 => ( Parameter_Integer, 0 ),   --  : bona33sp (Integer)
           3432 => ( Parameter_Float, 0.0 ),   --  : bona41hd (Amount)
           3433 => ( Parameter_Integer, 0 ),   --  : bona42hd (Integer)
           3434 => ( Parameter_Integer, 0 ),   --  : bona43hd (Integer)
           3435 => ( Parameter_Integer, 0 ),   --  : bona41sp (Integer)
           3436 => ( Parameter_Integer, 0 ),   --  : bona42sp (Integer)
           3437 => ( Parameter_Integer, 0 ),   --  : bona43sp (Integer)
           3438 => ( Parameter_Float, 0.0 ),   --  : bona51hd (Amount)
           3439 => ( Parameter_Integer, 0 ),   --  : bona52hd (Integer)
           3440 => ( Parameter_Integer, 0 ),   --  : bona53hd (Integer)
           3441 => ( Parameter_Integer, 0 ),   --  : bona51sp (Integer)
           3442 => ( Parameter_Integer, 0 ),   --  : bona52sp (Integer)
           3443 => ( Parameter_Integer, 0 ),   --  : bona53sp (Integer)
           3444 => ( Parameter_Float, 0.0 ),   --  : bona61hd (Amount)
           3445 => ( Parameter_Integer, 0 ),   --  : bona62hd (Integer)
           3446 => ( Parameter_Integer, 0 ),   --  : bona63hd (Integer)
           3447 => ( Parameter_Integer, 0 ),   --  : bona61sp (Integer)
           3448 => ( Parameter_Integer, 0 ),   --  : bona62sp (Integer)
           3449 => ( Parameter_Integer, 0 ),   --  : bona63sp (Integer)
           3450 => ( Parameter_Integer, 0 ),   --  : bont11hd (Integer)
           3451 => ( Parameter_Integer, 0 ),   --  : bont12hd (Integer)
           3452 => ( Parameter_Integer, 0 ),   --  : bont13hd (Integer)
           3453 => ( Parameter_Integer, 0 ),   --  : bont11sp (Integer)
           3454 => ( Parameter_Integer, 0 ),   --  : bont12sp (Integer)
           3455 => ( Parameter_Integer, 0 ),   --  : bont13sp (Integer)
           3456 => ( Parameter_Integer, 0 ),   --  : bont21hd (Integer)
           3457 => ( Parameter_Integer, 0 ),   --  : bont22hd (Integer)
           3458 => ( Parameter_Integer, 0 ),   --  : bont23hd (Integer)
           3459 => ( Parameter_Integer, 0 ),   --  : bont21sp (Integer)
           3460 => ( Parameter_Integer, 0 ),   --  : bont22sp (Integer)
           3461 => ( Parameter_Integer, 0 ),   --  : bont23sp (Integer)
           3462 => ( Parameter_Integer, 0 ),   --  : bont31hd (Integer)
           3463 => ( Parameter_Integer, 0 ),   --  : bont32hd (Integer)
           3464 => ( Parameter_Integer, 0 ),   --  : bont33hd (Integer)
           3465 => ( Parameter_Integer, 0 ),   --  : bont31sp (Integer)
           3466 => ( Parameter_Integer, 0 ),   --  : bont32sp (Integer)
           3467 => ( Parameter_Integer, 0 ),   --  : bont33sp (Integer)
           3468 => ( Parameter_Integer, 0 ),   --  : bont41hd (Integer)
           3469 => ( Parameter_Integer, 0 ),   --  : bont42hd (Integer)
           3470 => ( Parameter_Integer, 0 ),   --  : bont43hd (Integer)
           3471 => ( Parameter_Integer, 0 ),   --  : bont41sp (Integer)
           3472 => ( Parameter_Integer, 0 ),   --  : bont42sp (Integer)
           3473 => ( Parameter_Integer, 0 ),   --  : bont43sp (Integer)
           3474 => ( Parameter_Integer, 0 ),   --  : bont51hd (Integer)
           3475 => ( Parameter_Integer, 0 ),   --  : bont52hd (Integer)
           3476 => ( Parameter_Integer, 0 ),   --  : bont53hd (Integer)
           3477 => ( Parameter_Integer, 0 ),   --  : bont51sp (Integer)
           3478 => ( Parameter_Integer, 0 ),   --  : bont52sp (Integer)
           3479 => ( Parameter_Integer, 0 ),   --  : bont53sp (Integer)
           3480 => ( Parameter_Integer, 0 ),   --  : bont61hd (Integer)
           3481 => ( Parameter_Integer, 0 ),   --  : bont62hd (Integer)
           3482 => ( Parameter_Integer, 0 ),   --  : bont63hd (Integer)
           3483 => ( Parameter_Integer, 0 ),   --  : bont61sp (Integer)
           3484 => ( Parameter_Integer, 0 ),   --  : bont62sp (Integer)
           3485 => ( Parameter_Integer, 0 ),   --  : bont63sp (Integer)
           3486 => ( Parameter_Float, 0.0 ),   --  : btax11hd (Amount)
           3487 => ( Parameter_Float, 0.0 ),   --  : btax12hd (Amount)
           3488 => ( Parameter_Integer, 0 ),   --  : btax13hd (Integer)
           3489 => ( Parameter_Float, 0.0 ),   --  : btax11sp (Amount)
           3490 => ( Parameter_Integer, 0 ),   --  : btax12sp (Integer)
           3491 => ( Parameter_Integer, 0 ),   --  : btax13sp (Integer)
           3492 => ( Parameter_Float, 0.0 ),   --  : btax21hd (Amount)
           3493 => ( Parameter_Integer, 0 ),   --  : btax22hd (Integer)
           3494 => ( Parameter_Integer, 0 ),   --  : btax23hd (Integer)
           3495 => ( Parameter_Float, 0.0 ),   --  : btax21sp (Amount)
           3496 => ( Parameter_Integer, 0 ),   --  : btax22sp (Integer)
           3497 => ( Parameter_Integer, 0 ),   --  : btax23sp (Integer)
           3498 => ( Parameter_Float, 0.0 ),   --  : btax31hd (Amount)
           3499 => ( Parameter_Integer, 0 ),   --  : btax32hd (Integer)
           3500 => ( Parameter_Integer, 0 ),   --  : btax33hd (Integer)
           3501 => ( Parameter_Float, 0.0 ),   --  : btax31sp (Amount)
           3502 => ( Parameter_Integer, 0 ),   --  : btax32sp (Integer)
           3503 => ( Parameter_Integer, 0 ),   --  : btax33sp (Integer)
           3504 => ( Parameter_Float, 0.0 ),   --  : btax41hd (Amount)
           3505 => ( Parameter_Integer, 0 ),   --  : btax42hd (Integer)
           3506 => ( Parameter_Integer, 0 ),   --  : btax43hd (Integer)
           3507 => ( Parameter_Float, 0.0 ),   --  : btax41sp (Amount)
           3508 => ( Parameter_Integer, 0 ),   --  : btax42sp (Integer)
           3509 => ( Parameter_Integer, 0 ),   --  : btax43sp (Integer)
           3510 => ( Parameter_Float, 0.0 ),   --  : btax51hd (Amount)
           3511 => ( Parameter_Integer, 0 ),   --  : btax52hd (Integer)
           3512 => ( Parameter_Integer, 0 ),   --  : btax53hd (Integer)
           3513 => ( Parameter_Float, 0.0 ),   --  : btax51sp (Amount)
           3514 => ( Parameter_Integer, 0 ),   --  : btax52sp (Integer)
           3515 => ( Parameter_Integer, 0 ),   --  : btax53sp (Integer)
           3516 => ( Parameter_Float, 0.0 ),   --  : btax61hd (Amount)
           3517 => ( Parameter_Integer, 0 ),   --  : btax62hd (Integer)
           3518 => ( Parameter_Integer, 0 ),   --  : btax63hd (Integer)
           3519 => ( Parameter_Integer, 0 ),   --  : btax61sp (Integer)
           3520 => ( Parameter_Integer, 0 ),   --  : btax62sp (Integer)
           3521 => ( Parameter_Integer, 0 ),   --  : btax63sp (Integer)
           3522 => ( Parameter_Integer, 0 ),   --  : busac1hd (Integer)
           3523 => ( Parameter_Integer, 0 ),   --  : busac2hd (Integer)
           3524 => ( Parameter_Integer, 0 ),   --  : busac3hd (Integer)
           3525 => ( Parameter_Integer, 0 ),   --  : busac1sp (Integer)
           3526 => ( Parameter_Integer, 0 ),   --  : busac2sp (Integer)
           3527 => ( Parameter_Integer, 0 ),   --  : busac3sp (Integer)
           3528 => ( Parameter_Float, 0.0 ),   --  : caram1hd (Amount)
           3529 => ( Parameter_Integer, 0 ),   --  : caram2hd (Integer)
           3530 => ( Parameter_Integer, 0 ),   --  : caram3hd (Integer)
           3531 => ( Parameter_Float, 0.0 ),   --  : caram1sp (Amount)
           3532 => ( Parameter_Integer, 0 ),   --  : caram2sp (Integer)
           3533 => ( Parameter_Integer, 0 ),   --  : caram3sp (Integer)
           3534 => ( Parameter_Integer, 0 ),   --  : carcn1hd (Integer)
           3535 => ( Parameter_Integer, 0 ),   --  : carcn2hd (Integer)
           3536 => ( Parameter_Integer, 0 ),   --  : carcn3hd (Integer)
           3537 => ( Parameter_Integer, 0 ),   --  : carcn1sp (Integer)
           3538 => ( Parameter_Integer, 0 ),   --  : carcn2sp (Integer)
           3539 => ( Parameter_Integer, 0 ),   --  : carcn3sp (Integer)
           3540 => ( Parameter_Integer, 0 ),   --  : carvl1hd (Integer)
           3541 => ( Parameter_Integer, 0 ),   --  : carvl2hd (Integer)
           3542 => ( Parameter_Integer, 0 ),   --  : carvl3hd (Integer)
           3543 => ( Parameter_Integer, 0 ),   --  : carvl1sp (Integer)
           3544 => ( Parameter_Integer, 0 ),   --  : carvl2sp (Integer)
           3545 => ( Parameter_Integer, 0 ),   --  : carvl3sp (Integer)
           3546 => ( Parameter_Integer, 0 ),   --  : chktx1hd (Integer)
           3547 => ( Parameter_Integer, 0 ),   --  : chktx2hd (Integer)
           3548 => ( Parameter_Integer, 0 ),   --  : chktx3hd (Integer)
           3549 => ( Parameter_Integer, 0 ),   --  : chktx1sp (Integer)
           3550 => ( Parameter_Integer, 0 ),   --  : chktx2sp (Integer)
           3551 => ( Parameter_Integer, 0 ),   --  : chktx3sp (Integer)
           3552 => ( Parameter_Integer, 0 ),   --  : chcom1hd (Integer)
           3553 => ( Parameter_Integer, 0 ),   --  : chcom2hd (Integer)
           3554 => ( Parameter_Integer, 0 ),   --  : chcom3hd (Integer)
           3555 => ( Parameter_Integer, 0 ),   --  : chcom1sp (Integer)
           3556 => ( Parameter_Integer, 0 ),   --  : chcom2sp (Integer)
           3557 => ( Parameter_Integer, 0 ),   --  : chcom3sp (Integer)
           3558 => ( Parameter_Float, 0.0 ),   --  : chvam1hd (Amount)
           3559 => ( Parameter_Integer, 0 ),   --  : chvam2hd (Integer)
           3560 => ( Parameter_Integer, 0 ),   --  : chvam3hd (Integer)
           3561 => ( Parameter_Float, 0.0 ),   --  : chvam1sp (Amount)
           3562 => ( Parameter_Float, 0.0 ),   --  : chvam2sp (Amount)
           3563 => ( Parameter_Integer, 0 ),   --  : chvam3sp (Integer)
           3564 => ( Parameter_Integer, 0 ),   --  : chvpd1hd (Integer)
           3565 => ( Parameter_Integer, 0 ),   --  : chvpd2hd (Integer)
           3566 => ( Parameter_Integer, 0 ),   --  : chvpd3hd (Integer)
           3567 => ( Parameter_Integer, 0 ),   --  : chvpd1sp (Integer)
           3568 => ( Parameter_Integer, 0 ),   --  : chvpd2sp (Integer)
           3569 => ( Parameter_Integer, 0 ),   --  : chvpd3sp (Integer)
           3570 => ( Parameter_Integer, 0 ),   --  : chsac1hd (Integer)
           3571 => ( Parameter_Integer, 0 ),   --  : chsac2hd (Integer)
           3572 => ( Parameter_Integer, 0 ),   --  : chsac3hd (Integer)
           3573 => ( Parameter_Integer, 0 ),   --  : chsac1sp (Integer)
           3574 => ( Parameter_Integer, 0 ),   --  : chsac2sp (Integer)
           3575 => ( Parameter_Integer, 0 ),   --  : chsac3sp (Integer)
           3576 => ( Parameter_Integer, 0 ),   --  : chuam1hd (Integer)
           3577 => ( Parameter_Integer, 0 ),   --  : chuam2hd (Integer)
           3578 => ( Parameter_Integer, 0 ),   --  : chuam3hd (Integer)
           3579 => ( Parameter_Integer, 0 ),   --  : chuam1sp (Integer)
           3580 => ( Parameter_Integer, 0 ),   --  : chuam2sp (Integer)
           3581 => ( Parameter_Integer, 0 ),   --  : chuam3sp (Integer)
           3582 => ( Parameter_Integer, 0 ),   --  : chupd1hd (Integer)
           3583 => ( Parameter_Integer, 0 ),   --  : chupd2hd (Integer)
           3584 => ( Parameter_Integer, 0 ),   --  : chupd3hd (Integer)
           3585 => ( Parameter_Integer, 0 ),   --  : chupd1sp (Integer)
           3586 => ( Parameter_Integer, 0 ),   --  : chupd2sp (Integer)
           3587 => ( Parameter_Integer, 0 ),   --  : chupd3sp (Integer)
           3588 => ( Parameter_Integer, 0 ),   --  : chusu1hd (Integer)
           3589 => ( Parameter_Integer, 0 ),   --  : chusu2hd (Integer)
           3590 => ( Parameter_Integer, 0 ),   --  : chusu3hd (Integer)
           3591 => ( Parameter_Integer, 0 ),   --  : chusu1sp (Integer)
           3592 => ( Parameter_Integer, 0 ),   --  : chusu2sp (Integer)
           3593 => ( Parameter_Integer, 0 ),   --  : chusu3sp (Integer)
           3594 => ( Parameter_Float, 0.0 ),   --  : doth1hd (Amount)
           3595 => ( Parameter_Float, 0.0 ),   --  : doth2hd (Amount)
           3596 => ( Parameter_Integer, 0 ),   --  : doth3hd (Integer)
           3597 => ( Parameter_Float, 0.0 ),   --  : doth1sp (Amount)
           3598 => ( Parameter_Integer, 0 ),   --  : doth2sp (Integer)
           3599 => ( Parameter_Integer, 0 ),   --  : doth3sp (Integer)
           3600 => ( Parameter_Float, 0.0 ),   --  : dpen1hd (Amount)
           3601 => ( Parameter_Float, 0.0 ),   --  : dpen2hd (Amount)
           3602 => ( Parameter_Integer, 0 ),   --  : dpen3hd (Integer)
           3603 => ( Parameter_Float, 0.0 ),   --  : dpen1sp (Amount)
           3604 => ( Parameter_Float, 0.0 ),   --  : dpen2sp (Amount)
           3605 => ( Parameter_Integer, 0 ),   --  : dpen3sp (Integer)
           3606 => ( Parameter_Float, 0.0 ),   --  : davc1hd (Amount)
           3607 => ( Parameter_Integer, 0 ),   --  : davc2hd (Integer)
           3608 => ( Parameter_Integer, 0 ),   --  : davc3hd (Integer)
           3609 => ( Parameter_Float, 0.0 ),   --  : davc1sp (Amount)
           3610 => ( Parameter_Integer, 0 ),   --  : davc2sp (Integer)
           3611 => ( Parameter_Integer, 0 ),   --  : davc3sp (Integer)
           3612 => ( Parameter_Float, 0.0 ),   --  : dtuf1hd (Amount)
           3613 => ( Parameter_Float, 0.0 ),   --  : dtuf2hd (Amount)
           3614 => ( Parameter_Integer, 0 ),   --  : dtuf3hd (Integer)
           3615 => ( Parameter_Float, 0.0 ),   --  : dtuf1sp (Amount)
           3616 => ( Parameter_Float, 0.0 ),   --  : dtuf2sp (Amount)
           3617 => ( Parameter_Integer, 0 ),   --  : dtuf3sp (Integer)
           3618 => ( Parameter_Float, 0.0 ),   --  : dfrso1hd (Amount)
           3619 => ( Parameter_Integer, 0 ),   --  : dfrso2hd (Integer)
           3620 => ( Parameter_Integer, 0 ),   --  : dfrso3hd (Integer)
           3621 => ( Parameter_Float, 0.0 ),   --  : dfrso1sp (Amount)
           3622 => ( Parameter_Integer, 0 ),   --  : dfrso2sp (Integer)
           3623 => ( Parameter_Integer, 0 ),   --  : dfrso3sp (Integer)
           3624 => ( Parameter_Float, 0.0 ),   --  : dspor1hd (Amount)
           3625 => ( Parameter_Integer, 0 ),   --  : dspor2hd (Integer)
           3626 => ( Parameter_Integer, 0 ),   --  : dspor3hd (Integer)
           3627 => ( Parameter_Float, 0.0 ),   --  : dspor1sp (Amount)
           3628 => ( Parameter_Integer, 0 ),   --  : dspor2sp (Integer)
           3629 => ( Parameter_Integer, 0 ),   --  : dspor3sp (Integer)
           3630 => ( Parameter_Float, 0.0 ),   --  : drepl1hd (Amount)
           3631 => ( Parameter_Integer, 0 ),   --  : drepl2hd (Integer)
           3632 => ( Parameter_Integer, 0 ),   --  : drepl3hd (Integer)
           3633 => ( Parameter_Float, 0.0 ),   --  : drepl1sp (Amount)
           3634 => ( Parameter_Integer, 0 ),   --  : drepl2sp (Integer)
           3635 => ( Parameter_Integer, 0 ),   --  : drepl3sp (Integer)
           3636 => ( Parameter_Float, 0.0 ),   --  : dmed1hd (Amount)
           3637 => ( Parameter_Integer, 0 ),   --  : dmed2hd (Integer)
           3638 => ( Parameter_Integer, 0 ),   --  : dmed3hd (Integer)
           3639 => ( Parameter_Float, 0.0 ),   --  : dmed1sp (Amount)
           3640 => ( Parameter_Integer, 0 ),   --  : dmed2sp (Integer)
           3641 => ( Parameter_Integer, 0 ),   --  : dmed3sp (Integer)
           3642 => ( Parameter_Float, 0.0 ),   --  : dchar1hd (Amount)
           3643 => ( Parameter_Float, 0.0 ),   --  : dchar2hd (Amount)
           3644 => ( Parameter_Integer, 0 ),   --  : dchar3hd (Integer)
           3645 => ( Parameter_Float, 0.0 ),   --  : dchar1sp (Amount)
           3646 => ( Parameter_Integer, 0 ),   --  : dchar2sp (Integer)
           3647 => ( Parameter_Integer, 0 ),   --  : dchar3sp (Integer)
           3648 => ( Parameter_Float, 0.0 ),   --  : dslrp1hd (Amount)
           3649 => ( Parameter_Integer, 0 ),   --  : dslrp2hd (Integer)
           3650 => ( Parameter_Integer, 0 ),   --  : dslrp3hd (Integer)
           3651 => ( Parameter_Float, 0.0 ),   --  : dslrp1sp (Amount)
           3652 => ( Parameter_Integer, 0 ),   --  : dslrp2sp (Integer)
           3653 => ( Parameter_Integer, 0 ),   --  : dslrp3sp (Integer)
           3654 => ( Parameter_Integer, 0 ),   --  : dirni1hd (Integer)
           3655 => ( Parameter_Integer, 0 ),   --  : dirni2hd (Integer)
           3656 => ( Parameter_Integer, 0 ),   --  : dirni3hd (Integer)
           3657 => ( Parameter_Integer, 0 ),   --  : dirni1sp (Integer)
           3658 => ( Parameter_Integer, 0 ),   --  : dirni2sp (Integer)
           3659 => ( Parameter_Integer, 0 ),   --  : dirni3sp (Integer)
           3660 => ( Parameter_Integer, 0 ),   --  : totov1hd (Integer)
           3661 => ( Parameter_Integer, 0 ),   --  : totov2hd (Integer)
           3662 => ( Parameter_Integer, 0 ),   --  : totov3hd (Integer)
           3663 => ( Parameter_Integer, 0 ),   --  : totov1sp (Integer)
           3664 => ( Parameter_Integer, 0 ),   --  : totov2sp (Integer)
           3665 => ( Parameter_Integer, 0 ),   --  : totov3sp (Integer)
           3666 => ( Parameter_Float, 0.0 ),   --  : dvuhr1hd (Amount)
           3667 => ( Parameter_Float, 0.0 ),   --  : dvuhr2hd (Amount)
           3668 => ( Parameter_Float, 0.0 ),   --  : dvuhr3hd (Amount)
           3669 => ( Parameter_Float, 0.0 ),   --  : dvuhr1sp (Amount)
           3670 => ( Parameter_Float, 0.0 ),   --  : dvuhr2sp (Amount)
           3671 => ( Parameter_Integer, 0 ),   --  : dvuhr3sp (Integer)
           3672 => ( Parameter_Integer, 0 ),   --  : empan1hd (Integer)
           3673 => ( Parameter_Integer, 0 ),   --  : empan2hd (Integer)
           3674 => ( Parameter_Integer, 0 ),   --  : empan3hd (Integer)
           3675 => ( Parameter_Integer, 0 ),   --  : empan1sp (Integer)
           3676 => ( Parameter_Integer, 0 ),   --  : empan2sp (Integer)
           3677 => ( Parameter_Integer, 0 ),   --  : empan3sp (Integer)
           3678 => ( Parameter_Integer, 0 ),   --  : empen1hd (Integer)
           3679 => ( Parameter_Integer, 0 ),   --  : empen2hd (Integer)
           3680 => ( Parameter_Integer, 0 ),   --  : empen3hd (Integer)
           3681 => ( Parameter_Integer, 0 ),   --  : empen1sp (Integer)
           3682 => ( Parameter_Integer, 0 ),   --  : empen2sp (Integer)
           3683 => ( Parameter_Integer, 0 ),   --  : empen3sp (Integer)
           3684 => ( Parameter_Integer, 0 ),   --  : etype1hd (Integer)
           3685 => ( Parameter_Integer, 0 ),   --  : etype2hd (Integer)
           3686 => ( Parameter_Integer, 0 ),   --  : etype3hd (Integer)
           3687 => ( Parameter_Integer, 0 ),   --  : etype1sp (Integer)
           3688 => ( Parameter_Integer, 0 ),   --  : etype2sp (Integer)
           3689 => ( Parameter_Integer, 0 ),   --  : etype3sp (Integer)
           3690 => ( Parameter_Integer, 0 ),   --  : evrot1hd (Integer)
           3691 => ( Parameter_Integer, 0 ),   --  : evrot2hd (Integer)
           3692 => ( Parameter_Integer, 0 ),   --  : evrot3hd (Integer)
           3693 => ( Parameter_Integer, 0 ),   --  : evrot1sp (Integer)
           3694 => ( Parameter_Integer, 0 ),   --  : evrot2sp (Integer)
           3695 => ( Parameter_Integer, 0 ),   --  : evrot3sp (Integer)
           3696 => ( Parameter_Integer, 0 ),   --  : exb011hd (Integer)
           3697 => ( Parameter_Integer, 0 ),   --  : exb012hd (Integer)
           3698 => ( Parameter_Integer, 0 ),   --  : exb013hd (Integer)
           3699 => ( Parameter_Integer, 0 ),   --  : exb011sp (Integer)
           3700 => ( Parameter_Integer, 0 ),   --  : exb012sp (Integer)
           3701 => ( Parameter_Integer, 0 ),   --  : exb013sp (Integer)
           3702 => ( Parameter_Integer, 0 ),   --  : exb021hd (Integer)
           3703 => ( Parameter_Integer, 0 ),   --  : exb022hd (Integer)
           3704 => ( Parameter_Integer, 0 ),   --  : exb023hd (Integer)
           3705 => ( Parameter_Integer, 0 ),   --  : exb021sp (Integer)
           3706 => ( Parameter_Integer, 0 ),   --  : exb022sp (Integer)
           3707 => ( Parameter_Integer, 0 ),   --  : exb023sp (Integer)
           3708 => ( Parameter_Integer, 0 ),   --  : exb031hd (Integer)
           3709 => ( Parameter_Integer, 0 ),   --  : exb032hd (Integer)
           3710 => ( Parameter_Integer, 0 ),   --  : exb033hd (Integer)
           3711 => ( Parameter_Integer, 0 ),   --  : exb031sp (Integer)
           3712 => ( Parameter_Integer, 0 ),   --  : exb032sp (Integer)
           3713 => ( Parameter_Integer, 0 ),   --  : exb033sp (Integer)
           3714 => ( Parameter_Integer, 0 ),   --  : exb041hd (Integer)
           3715 => ( Parameter_Integer, 0 ),   --  : exb042hd (Integer)
           3716 => ( Parameter_Integer, 0 ),   --  : exb043hd (Integer)
           3717 => ( Parameter_Integer, 0 ),   --  : exb041sp (Integer)
           3718 => ( Parameter_Integer, 0 ),   --  : exb042sp (Integer)
           3719 => ( Parameter_Integer, 0 ),   --  : exb043sp (Integer)
           3720 => ( Parameter_Integer, 0 ),   --  : exb051hd (Integer)
           3721 => ( Parameter_Integer, 0 ),   --  : exb052hd (Integer)
           3722 => ( Parameter_Integer, 0 ),   --  : exb053hd (Integer)
           3723 => ( Parameter_Integer, 0 ),   --  : exb051sp (Integer)
           3724 => ( Parameter_Integer, 0 ),   --  : exb052sp (Integer)
           3725 => ( Parameter_Integer, 0 ),   --  : exb053sp (Integer)
           3726 => ( Parameter_Integer, 0 ),   --  : exb061hd (Integer)
           3727 => ( Parameter_Integer, 0 ),   --  : exb062hd (Integer)
           3728 => ( Parameter_Integer, 0 ),   --  : exb063hd (Integer)
           3729 => ( Parameter_Integer, 0 ),   --  : exb061sp (Integer)
           3730 => ( Parameter_Integer, 0 ),   --  : exb062sp (Integer)
           3731 => ( Parameter_Integer, 0 ),   --  : exb063sp (Integer)
           3732 => ( Parameter_Integer, 0 ),   --  : exb071hd (Integer)
           3733 => ( Parameter_Integer, 0 ),   --  : exb072hd (Integer)
           3734 => ( Parameter_Integer, 0 ),   --  : exb073hd (Integer)
           3735 => ( Parameter_Integer, 0 ),   --  : exb071sp (Integer)
           3736 => ( Parameter_Integer, 0 ),   --  : exb072sp (Integer)
           3737 => ( Parameter_Integer, 0 ),   --  : exb073sp (Integer)
           3738 => ( Parameter_Integer, 0 ),   --  : exb081hd (Integer)
           3739 => ( Parameter_Integer, 0 ),   --  : exb082hd (Integer)
           3740 => ( Parameter_Integer, 0 ),   --  : exb083hd (Integer)
           3741 => ( Parameter_Integer, 0 ),   --  : exb081sp (Integer)
           3742 => ( Parameter_Integer, 0 ),   --  : exb082sp (Integer)
           3743 => ( Parameter_Integer, 0 ),   --  : exb083sp (Integer)
           3744 => ( Parameter_Integer, 0 ),   --  : exb091hd (Integer)
           3745 => ( Parameter_Integer, 0 ),   --  : exb092hd (Integer)
           3746 => ( Parameter_Integer, 0 ),   --  : exb093hd (Integer)
           3747 => ( Parameter_Integer, 0 ),   --  : exb091sp (Integer)
           3748 => ( Parameter_Integer, 0 ),   --  : exb092sp (Integer)
           3749 => ( Parameter_Integer, 0 ),   --  : exb093sp (Integer)
           3750 => ( Parameter_Integer, 0 ),   --  : exb101hd (Integer)
           3751 => ( Parameter_Integer, 0 ),   --  : exb102hd (Integer)
           3752 => ( Parameter_Integer, 0 ),   --  : exb103hd (Integer)
           3753 => ( Parameter_Integer, 0 ),   --  : exb101sp (Integer)
           3754 => ( Parameter_Integer, 0 ),   --  : exb102sp (Integer)
           3755 => ( Parameter_Integer, 0 ),   --  : exb103sp (Integer)
           3756 => ( Parameter_Integer, 0 ),   --  : exb111hd (Integer)
           3757 => ( Parameter_Integer, 0 ),   --  : exb112hd (Integer)
           3758 => ( Parameter_Integer, 0 ),   --  : exb113hd (Integer)
           3759 => ( Parameter_Integer, 0 ),   --  : exb111sp (Integer)
           3760 => ( Parameter_Integer, 0 ),   --  : exb112sp (Integer)
           3761 => ( Parameter_Integer, 0 ),   --  : exb113sp (Integer)
           3762 => ( Parameter_Integer, 0 ),   --  : exb121hd (Integer)
           3763 => ( Parameter_Integer, 0 ),   --  : exb122hd (Integer)
           3764 => ( Parameter_Integer, 0 ),   --  : exb123hd (Integer)
           3765 => ( Parameter_Integer, 0 ),   --  : exb121sp (Integer)
           3766 => ( Parameter_Integer, 0 ),   --  : exb122sp (Integer)
           3767 => ( Parameter_Integer, 0 ),   --  : exb123sp (Integer)
           3768 => ( Parameter_Integer, 0 ),   --  : ftpt1hd (Integer)
           3769 => ( Parameter_Integer, 0 ),   --  : ftpt2hd (Integer)
           3770 => ( Parameter_Integer, 0 ),   --  : ftpt3hd (Integer)
           3771 => ( Parameter_Integer, 0 ),   --  : ftpt1sp (Integer)
           3772 => ( Parameter_Integer, 0 ),   --  : ftpt2sp (Integer)
           3773 => ( Parameter_Integer, 0 ),   --  : ftpt3sp (Integer)
           3774 => ( Parameter_Float, 0.0 ),   --  : fulam1hd (Amount)
           3775 => ( Parameter_Integer, 0 ),   --  : fulam2hd (Integer)
           3776 => ( Parameter_Integer, 0 ),   --  : fulam3hd (Integer)
           3777 => ( Parameter_Float, 0.0 ),   --  : fulam1sp (Amount)
           3778 => ( Parameter_Integer, 0 ),   --  : fulam2sp (Integer)
           3779 => ( Parameter_Integer, 0 ),   --  : fulam3sp (Integer)
           3780 => ( Parameter_Integer, 0 ),   --  : fulbn1hd (Integer)
           3781 => ( Parameter_Integer, 0 ),   --  : fulbn2hd (Integer)
           3782 => ( Parameter_Integer, 0 ),   --  : fulbn3hd (Integer)
           3783 => ( Parameter_Integer, 0 ),   --  : fulbn1sp (Integer)
           3784 => ( Parameter_Integer, 0 ),   --  : fulbn2sp (Integer)
           3785 => ( Parameter_Integer, 0 ),   --  : fulbn3sp (Integer)
           3786 => ( Parameter_Integer, 0 ),   --  : fulpd1hd (Integer)
           3787 => ( Parameter_Integer, 0 ),   --  : fulpd2hd (Integer)
           3788 => ( Parameter_Integer, 0 ),   --  : fulpd3hd (Integer)
           3789 => ( Parameter_Integer, 0 ),   --  : fulpd1sp (Integer)
           3790 => ( Parameter_Integer, 0 ),   --  : fulpd2sp (Integer)
           3791 => ( Parameter_Integer, 0 ),   --  : fulpd3sp (Integer)
           3792 => ( Parameter_Integer, 0 ),   --  : fulty1hd (Integer)
           3793 => ( Parameter_Integer, 0 ),   --  : fulty2hd (Integer)
           3794 => ( Parameter_Integer, 0 ),   --  : fulty3hd (Integer)
           3795 => ( Parameter_Integer, 0 ),   --  : fulty1sp (Integer)
           3796 => ( Parameter_Integer, 0 ),   --  : fulty2sp (Integer)
           3797 => ( Parameter_Integer, 0 ),   --  : fulty3sp (Integer)
           3798 => ( Parameter_Integer, 0 ),   --  : fluam1hd (Integer)
           3799 => ( Parameter_Integer, 0 ),   --  : fluam2hd (Integer)
           3800 => ( Parameter_Integer, 0 ),   --  : fluam3hd (Integer)
           3801 => ( Parameter_Integer, 0 ),   --  : fluam1sp (Integer)
           3802 => ( Parameter_Integer, 0 ),   --  : fluam2sp (Integer)
           3803 => ( Parameter_Integer, 0 ),   --  : fluam3sp (Integer)
           3804 => ( Parameter_Integer, 0 ),   --  : flupd1hd (Integer)
           3805 => ( Parameter_Integer, 0 ),   --  : flupd2hd (Integer)
           3806 => ( Parameter_Integer, 0 ),   --  : flupd3hd (Integer)
           3807 => ( Parameter_Integer, 0 ),   --  : flupd1sp (Integer)
           3808 => ( Parameter_Integer, 0 ),   --  : flupd2sp (Integer)
           3809 => ( Parameter_Integer, 0 ),   --  : flupd3sp (Integer)
           3810 => ( Parameter_Integer, 0 ),   --  : flusu1hd (Integer)
           3811 => ( Parameter_Integer, 0 ),   --  : flusu2hd (Integer)
           3812 => ( Parameter_Integer, 0 ),   --  : flusu3hd (Integer)
           3813 => ( Parameter_Integer, 0 ),   --  : flusu1sp (Integer)
           3814 => ( Parameter_Integer, 0 ),   --  : flusu2sp (Integer)
           3815 => ( Parameter_Integer, 0 ),   --  : flusu3sp (Integer)
           3816 => ( Parameter_Float, 0.0 ),   --  : grwag1hd (Amount)
           3817 => ( Parameter_Float, 0.0 ),   --  : grwag2hd (Amount)
           3818 => ( Parameter_Float, 0.0 ),   --  : grwag3hd (Amount)
           3819 => ( Parameter_Float, 0.0 ),   --  : grwag1sp (Amount)
           3820 => ( Parameter_Float, 0.0 ),   --  : grwag2sp (Amount)
           3821 => ( Parameter_Float, 0.0 ),   --  : grwag3sp (Amount)
           3822 => ( Parameter_Integer, 0 ),   --  : grwap1hd (Integer)
           3823 => ( Parameter_Integer, 0 ),   --  : grwap2hd (Integer)
           3824 => ( Parameter_Integer, 0 ),   --  : grwap3hd (Integer)
           3825 => ( Parameter_Integer, 0 ),   --  : grwap1sp (Integer)
           3826 => ( Parameter_Integer, 0 ),   --  : grwap2sp (Integer)
           3827 => ( Parameter_Integer, 0 ),   --  : grwap3sp (Integer)
           3828 => ( Parameter_Float, 0.0 ),   --  : hha11hd (Amount)
           3829 => ( Parameter_Integer, 0 ),   --  : hha12hd (Integer)
           3830 => ( Parameter_Float, 0.0 ),   --  : hha13hd (Amount)
           3831 => ( Parameter_Float, 0.0 ),   --  : hha11sp (Amount)
           3832 => ( Parameter_Integer, 0 ),   --  : hha12sp (Integer)
           3833 => ( Parameter_Integer, 0 ),   --  : hha13sp (Integer)
           3834 => ( Parameter_Float, 0.0 ),   --  : hha21hd (Amount)
           3835 => ( Parameter_Integer, 0 ),   --  : hha22hd (Integer)
           3836 => ( Parameter_Float, 0.0 ),   --  : hha23hd (Amount)
           3837 => ( Parameter_Float, 0.0 ),   --  : hha21sp (Amount)
           3838 => ( Parameter_Integer, 0 ),   --  : hha22sp (Integer)
           3839 => ( Parameter_Integer, 0 ),   --  : hha23sp (Integer)
           3840 => ( Parameter_Integer, 0 ),   --  : hha31hd (Integer)
           3841 => ( Parameter_Integer, 0 ),   --  : hha32hd (Integer)
           3842 => ( Parameter_Integer, 0 ),   --  : hha33hd (Integer)
           3843 => ( Parameter_Integer, 0 ),   --  : hha31sp (Integer)
           3844 => ( Parameter_Integer, 0 ),   --  : hha32sp (Integer)
           3845 => ( Parameter_Integer, 0 ),   --  : hha33sp (Integer)
           3846 => ( Parameter_Integer, 0 ),   --  : hour1hd (Integer)
           3847 => ( Parameter_Integer, 0 ),   --  : hour2hd (Integer)
           3848 => ( Parameter_Integer, 0 ),   --  : hour3hd (Integer)
           3849 => ( Parameter_Integer, 0 ),   --  : hour1sp (Integer)
           3850 => ( Parameter_Integer, 0 ),   --  : hour2sp (Integer)
           3851 => ( Parameter_Integer, 0 ),   --  : hour3sp (Integer)
           3852 => ( Parameter_Float, 0.0 ),   --  : hrrte1hd (Amount)
           3853 => ( Parameter_Float, 0.0 ),   --  : hrrte2hd (Amount)
           3854 => ( Parameter_Float, 0.0 ),   --  : hrrte3hd (Amount)
           3855 => ( Parameter_Float, 0.0 ),   --  : hrrte1sp (Amount)
           3856 => ( Parameter_Float, 0.0 ),   --  : hrrte2sp (Amount)
           3857 => ( Parameter_Float, 0.0 ),   --  : hrrte3sp (Amount)
           3858 => ( Parameter_Integer, 0 ),   --  : ipay11hd (Integer)
           3859 => ( Parameter_Integer, 0 ),   --  : ipay12hd (Integer)
           3860 => ( Parameter_Integer, 0 ),   --  : ipay13hd (Integer)
           3861 => ( Parameter_Integer, 0 ),   --  : ipay11sp (Integer)
           3862 => ( Parameter_Integer, 0 ),   --  : ipay12sp (Integer)
           3863 => ( Parameter_Integer, 0 ),   --  : ipay13sp (Integer)
           3864 => ( Parameter_Integer, 0 ),   --  : ipay21hd (Integer)
           3865 => ( Parameter_Integer, 0 ),   --  : ipay22hd (Integer)
           3866 => ( Parameter_Integer, 0 ),   --  : ipay23hd (Integer)
           3867 => ( Parameter_Integer, 0 ),   --  : ipay21sp (Integer)
           3868 => ( Parameter_Integer, 0 ),   --  : ipay22sp (Integer)
           3869 => ( Parameter_Integer, 0 ),   --  : ipay23sp (Integer)
           3870 => ( Parameter_Integer, 0 ),   --  : ipay31hd (Integer)
           3871 => ( Parameter_Integer, 0 ),   --  : ipay32hd (Integer)
           3872 => ( Parameter_Integer, 0 ),   --  : ipay33hd (Integer)
           3873 => ( Parameter_Integer, 0 ),   --  : ipay31sp (Integer)
           3874 => ( Parameter_Integer, 0 ),   --  : ipay32sp (Integer)
           3875 => ( Parameter_Integer, 0 ),   --  : ipay33sp (Integer)
           3876 => ( Parameter_Integer, 0 ),   --  : ipay41hd (Integer)
           3877 => ( Parameter_Integer, 0 ),   --  : ipay42hd (Integer)
           3878 => ( Parameter_Integer, 0 ),   --  : ipay43hd (Integer)
           3879 => ( Parameter_Integer, 0 ),   --  : ipay41sp (Integer)
           3880 => ( Parameter_Integer, 0 ),   --  : ipay42sp (Integer)
           3881 => ( Parameter_Integer, 0 ),   --  : ipay43sp (Integer)
           3882 => ( Parameter_Integer, 0 ),   --  : ipay51hd (Integer)
           3883 => ( Parameter_Integer, 0 ),   --  : ipay52hd (Integer)
           3884 => ( Parameter_Integer, 0 ),   --  : ipay53hd (Integer)
           3885 => ( Parameter_Integer, 0 ),   --  : ipay51sp (Integer)
           3886 => ( Parameter_Integer, 0 ),   --  : ipay52sp (Integer)
           3887 => ( Parameter_Integer, 0 ),   --  : ipay53sp (Integer)
           3888 => ( Parameter_Integer, 0 ),   --  : ipay61hd (Integer)
           3889 => ( Parameter_Integer, 0 ),   --  : ipay62hd (Integer)
           3890 => ( Parameter_Integer, 0 ),   --  : ipay63hd (Integer)
           3891 => ( Parameter_Integer, 0 ),   --  : ipay61sp (Integer)
           3892 => ( Parameter_Integer, 0 ),   --  : ipay62sp (Integer)
           3893 => ( Parameter_Integer, 0 ),   --  : ipay63sp (Integer)
           3894 => ( Parameter_Integer, 0 ),   --  : ipay71hd (Integer)
           3895 => ( Parameter_Integer, 0 ),   --  : ipay72hd (Integer)
           3896 => ( Parameter_Integer, 0 ),   --  : ipay73hd (Integer)
           3897 => ( Parameter_Integer, 0 ),   --  : ipay71sp (Integer)
           3898 => ( Parameter_Integer, 0 ),   --  : ipay72sp (Integer)
           3899 => ( Parameter_Integer, 0 ),   --  : ipay73sp (Integer)
           3900 => ( Parameter_Integer, 0 ),   --  : jbchg1hd (Integer)
           3901 => ( Parameter_Integer, 0 ),   --  : jbchg2hd (Integer)
           3902 => ( Parameter_Integer, 0 ),   --  : jbchg3hd (Integer)
           3903 => ( Parameter_Integer, 0 ),   --  : jbchg1sp (Integer)
           3904 => ( Parameter_Integer, 0 ),   --  : jbchg2sp (Integer)
           3905 => ( Parameter_Integer, 0 ),   --  : jbchg3sp (Integer)
           3906 => ( Parameter_Integer, 0 ),   --  : jobus1hd (Integer)
           3907 => ( Parameter_Integer, 0 ),   --  : jobus2hd (Integer)
           3908 => ( Parameter_Integer, 0 ),   --  : jobus3hd (Integer)
           3909 => ( Parameter_Integer, 0 ),   --  : jobus1sp (Integer)
           3910 => ( Parameter_Integer, 0 ),   --  : jobus2sp (Integer)
           3911 => ( Parameter_Integer, 0 ),   --  : jobus3sp (Integer)
           3912 => ( Parameter_Float, 0.0 ),   --  : jbhrs1hd (Amount)
           3913 => ( Parameter_Float, 0.0 ),   --  : jbhrs2hd (Amount)
           3914 => ( Parameter_Float, 0.0 ),   --  : jbhrs3hd (Amount)
           3915 => ( Parameter_Float, 0.0 ),   --  : jbhrs1sp (Amount)
           3916 => ( Parameter_Float, 0.0 ),   --  : jbhrs2sp (Amount)
           3917 => ( Parameter_Integer, 0 ),   --  : jbhrs3sp (Integer)
           3918 => ( Parameter_Integer, 0 ),   --  : lt301hd (Integer)
           3919 => ( Parameter_Integer, 0 ),   --  : lt302hd (Integer)
           3920 => ( Parameter_Integer, 0 ),   --  : lt303hd (Integer)
           3921 => ( Parameter_Integer, 0 ),   --  : lt301sp (Integer)
           3922 => ( Parameter_Integer, 0 ),   --  : lt302sp (Integer)
           3923 => ( Parameter_Integer, 0 ),   --  : lt303sp (Integer)
           3924 => ( Parameter_Integer, 0 ),   --  : madem1hd (Integer)
           3925 => ( Parameter_Integer, 0 ),   --  : madem2hd (Integer)
           3926 => ( Parameter_Integer, 0 ),   --  : madem3hd (Integer)
           3927 => ( Parameter_Integer, 0 ),   --  : madem1sp (Integer)
           3928 => ( Parameter_Integer, 0 ),   --  : madem2sp (Integer)
           3929 => ( Parameter_Integer, 0 ),   --  : madem3sp (Integer)
           3930 => ( Parameter_Float, 0.0 ),   --  : mile1hd (Amount)
           3931 => ( Parameter_Float, 0.0 ),   --  : mile2hd (Amount)
           3932 => ( Parameter_Integer, 0 ),   --  : mile3hd (Integer)
           3933 => ( Parameter_Float, 0.0 ),   --  : mile1sp (Amount)
           3934 => ( Parameter_Float, 0.0 ),   --  : mile2sp (Amount)
           3935 => ( Parameter_Integer, 0 ),   --  : mile3sp (Integer)
           3936 => ( Parameter_Float, 0.0 ),   --  : moref1hd (Amount)
           3937 => ( Parameter_Integer, 0 ),   --  : moref2hd (Integer)
           3938 => ( Parameter_Integer, 0 ),   --  : moref3hd (Integer)
           3939 => ( Parameter_Float, 0.0 ),   --  : moref1sp (Amount)
           3940 => ( Parameter_Float, 0.0 ),   --  : moref2sp (Amount)
           3941 => ( Parameter_Integer, 0 ),   --  : moref3sp (Integer)
           3942 => ( Parameter_Float, 0.0 ),   --  : nic1hd (Amount)
           3943 => ( Parameter_Float, 0.0 ),   --  : nic2hd (Amount)
           3944 => ( Parameter_Float, 0.0 ),   --  : nic3hd (Amount)
           3945 => ( Parameter_Float, 0.0 ),   --  : nic1sp (Amount)
           3946 => ( Parameter_Float, 0.0 ),   --  : nic2sp (Amount)
           3947 => ( Parameter_Integer, 0 ),   --  : nic3sp (Integer)
           3948 => ( Parameter_Float, 0.0 ),   --  : nidam1hd (Amount)
           3949 => ( Parameter_Integer, 0 ),   --  : nidam2hd (Integer)
           3950 => ( Parameter_Integer, 0 ),   --  : nidam3hd (Integer)
           3951 => ( Parameter_Float, 0.0 ),   --  : nidam1sp (Amount)
           3952 => ( Parameter_Float, 0.0 ),   --  : nidam2sp (Amount)
           3953 => ( Parameter_Integer, 0 ),   --  : nidam3sp (Integer)
           3954 => ( Parameter_Integer, 0 ),   --  : nipd1hd (Integer)
           3955 => ( Parameter_Integer, 0 ),   --  : nipd2hd (Integer)
           3956 => ( Parameter_Integer, 0 ),   --  : nipd3hd (Integer)
           3957 => ( Parameter_Integer, 0 ),   --  : nipd1sp (Integer)
           3958 => ( Parameter_Integer, 0 ),   --  : nipd2sp (Integer)
           3959 => ( Parameter_Integer, 0 ),   --  : nipd3sp (Integer)
           3960 => ( Parameter_Integer, 0 ),   --  : noemp1hd (Integer)
           3961 => ( Parameter_Integer, 0 ),   --  : noemp2hd (Integer)
           3962 => ( Parameter_Integer, 0 ),   --  : noemp3hd (Integer)
           3963 => ( Parameter_Integer, 0 ),   --  : noemp1sp (Integer)
           3964 => ( Parameter_Integer, 0 ),   --  : noemp2sp (Integer)
           3965 => ( Parameter_Integer, 0 ),   --  : noemp3sp (Integer)
           3966 => ( Parameter_Integer, 0 ),   --  : oremp1hd (Integer)
           3967 => ( Parameter_Integer, 0 ),   --  : oremp2hd (Integer)
           3968 => ( Parameter_Integer, 0 ),   --  : oremp3hd (Integer)
           3969 => ( Parameter_Integer, 0 ),   --  : oremp1sp (Integer)
           3970 => ( Parameter_Integer, 0 ),   --  : oremp2sp (Integer)
           3971 => ( Parameter_Integer, 0 ),   --  : oremp3sp (Integer)
           3972 => ( Parameter_Integer, 0 ),   --  : othd11hd (Integer)
           3973 => ( Parameter_Integer, 0 ),   --  : othd12hd (Integer)
           3974 => ( Parameter_Integer, 0 ),   --  : othd13hd (Integer)
           3975 => ( Parameter_Integer, 0 ),   --  : othd11sp (Integer)
           3976 => ( Parameter_Integer, 0 ),   --  : othd12sp (Integer)
           3977 => ( Parameter_Integer, 0 ),   --  : othd13sp (Integer)
           3978 => ( Parameter_Integer, 0 ),   --  : othd21hd (Integer)
           3979 => ( Parameter_Integer, 0 ),   --  : othd22hd (Integer)
           3980 => ( Parameter_Integer, 0 ),   --  : othd23hd (Integer)
           3981 => ( Parameter_Integer, 0 ),   --  : othd21sp (Integer)
           3982 => ( Parameter_Integer, 0 ),   --  : othd22sp (Integer)
           3983 => ( Parameter_Integer, 0 ),   --  : othd23sp (Integer)
           3984 => ( Parameter_Integer, 0 ),   --  : othd31hd (Integer)
           3985 => ( Parameter_Integer, 0 ),   --  : othd32hd (Integer)
           3986 => ( Parameter_Integer, 0 ),   --  : othd33hd (Integer)
           3987 => ( Parameter_Integer, 0 ),   --  : othd31sp (Integer)
           3988 => ( Parameter_Integer, 0 ),   --  : othd32sp (Integer)
           3989 => ( Parameter_Integer, 0 ),   --  : othd33sp (Integer)
           3990 => ( Parameter_Integer, 0 ),   --  : othd41hd (Integer)
           3991 => ( Parameter_Integer, 0 ),   --  : othd42hd (Integer)
           3992 => ( Parameter_Integer, 0 ),   --  : othd43hd (Integer)
           3993 => ( Parameter_Integer, 0 ),   --  : othd41sp (Integer)
           3994 => ( Parameter_Integer, 0 ),   --  : othd42sp (Integer)
           3995 => ( Parameter_Integer, 0 ),   --  : othd43sp (Integer)
           3996 => ( Parameter_Integer, 0 ),   --  : othd51hd (Integer)
           3997 => ( Parameter_Integer, 0 ),   --  : othd52hd (Integer)
           3998 => ( Parameter_Integer, 0 ),   --  : othd53hd (Integer)
           3999 => ( Parameter_Integer, 0 ),   --  : othd51sp (Integer)
           4000 => ( Parameter_Integer, 0 ),   --  : othd52sp (Integer)
           4001 => ( Parameter_Integer, 0 ),   --  : othd53sp (Integer)
           4002 => ( Parameter_Integer, 0 ),   --  : othd61hd (Integer)
           4003 => ( Parameter_Integer, 0 ),   --  : othd62hd (Integer)
           4004 => ( Parameter_Integer, 0 ),   --  : othd63hd (Integer)
           4005 => ( Parameter_Integer, 0 ),   --  : othd61sp (Integer)
           4006 => ( Parameter_Integer, 0 ),   --  : othd62sp (Integer)
           4007 => ( Parameter_Integer, 0 ),   --  : othd63sp (Integer)
           4008 => ( Parameter_Integer, 0 ),   --  : othd71hd (Integer)
           4009 => ( Parameter_Integer, 0 ),   --  : othd72hd (Integer)
           4010 => ( Parameter_Integer, 0 ),   --  : othd73hd (Integer)
           4011 => ( Parameter_Integer, 0 ),   --  : othd71sp (Integer)
           4012 => ( Parameter_Integer, 0 ),   --  : othd72sp (Integer)
           4013 => ( Parameter_Integer, 0 ),   --  : othd73sp (Integer)
           4014 => ( Parameter_Integer, 0 ),   --  : othd81hd (Integer)
           4015 => ( Parameter_Integer, 0 ),   --  : othd82hd (Integer)
           4016 => ( Parameter_Integer, 0 ),   --  : othd83hd (Integer)
           4017 => ( Parameter_Integer, 0 ),   --  : othd81sp (Integer)
           4018 => ( Parameter_Integer, 0 ),   --  : othd82sp (Integer)
           4019 => ( Parameter_Integer, 0 ),   --  : othd83sp (Integer)
           4020 => ( Parameter_Integer, 0 ),   --  : othd91hd (Integer)
           4021 => ( Parameter_Integer, 0 ),   --  : othd92hd (Integer)
           4022 => ( Parameter_Integer, 0 ),   --  : othd93hd (Integer)
           4023 => ( Parameter_Integer, 0 ),   --  : othd91sp (Integer)
           4024 => ( Parameter_Integer, 0 ),   --  : othd92sp (Integer)
           4025 => ( Parameter_Integer, 0 ),   --  : othd93sp (Integer)
           4026 => ( Parameter_Integer, 0 ),   --  : otd101hd (Integer)
           4027 => ( Parameter_Integer, 0 ),   --  : otd102hd (Integer)
           4028 => ( Parameter_Integer, 0 ),   --  : otd103hd (Integer)
           4029 => ( Parameter_Integer, 0 ),   --  : otd101sp (Integer)
           4030 => ( Parameter_Integer, 0 ),   --  : otd102sp (Integer)
           4031 => ( Parameter_Integer, 0 ),   --  : otd103sp (Integer)
           4032 => ( Parameter_Float, 0.0 ),   --  : ownam1hd (Amount)
           4033 => ( Parameter_Float, 0.0 ),   --  : ownam2hd (Amount)
           4034 => ( Parameter_Integer, 0 ),   --  : ownam3hd (Integer)
           4035 => ( Parameter_Float, 0.0 ),   --  : ownam1sp (Amount)
           4036 => ( Parameter_Float, 0.0 ),   --  : ownam2sp (Amount)
           4037 => ( Parameter_Float, 0.0 ),   --  : ownam3sp (Amount)
           4038 => ( Parameter_Float, 0.0 ),   --  : ownoa1hd (Amount)
           4039 => ( Parameter_Float, 0.0 ),   --  : ownoa2hd (Amount)
           4040 => ( Parameter_Integer, 0 ),   --  : ownoa3hd (Integer)
           4041 => ( Parameter_Float, 0.0 ),   --  : ownoa1sp (Amount)
           4042 => ( Parameter_Integer, 0 ),   --  : ownoa2sp (Integer)
           4043 => ( Parameter_Integer, 0 ),   --  : ownoa3sp (Integer)
           4044 => ( Parameter_Integer, 0 ),   --  : ownot1hd (Integer)
           4045 => ( Parameter_Integer, 0 ),   --  : ownot2hd (Integer)
           4046 => ( Parameter_Integer, 0 ),   --  : ownot3hd (Integer)
           4047 => ( Parameter_Integer, 0 ),   --  : ownot1sp (Integer)
           4048 => ( Parameter_Integer, 0 ),   --  : ownot2sp (Integer)
           4049 => ( Parameter_Integer, 0 ),   --  : ownot3sp (Integer)
           4050 => ( Parameter_Integer, 0 ),   --  : ownsm1hd (Integer)
           4051 => ( Parameter_Integer, 0 ),   --  : ownsm2hd (Integer)
           4052 => ( Parameter_Integer, 0 ),   --  : ownsm3hd (Integer)
           4053 => ( Parameter_Integer, 0 ),   --  : ownsm1sp (Integer)
           4054 => ( Parameter_Integer, 0 ),   --  : ownsm2sp (Integer)
           4055 => ( Parameter_Integer, 0 ),   --  : ownsm3sp (Integer)
           4056 => ( Parameter_Integer, 0 ),   --  : pappd1hd (Integer)
           4057 => ( Parameter_Integer, 0 ),   --  : pappd2hd (Integer)
           4058 => ( Parameter_Integer, 0 ),   --  : pappd3hd (Integer)
           4059 => ( Parameter_Integer, 0 ),   --  : pappd1sp (Integer)
           4060 => ( Parameter_Integer, 0 ),   --  : pappd2sp (Integer)
           4061 => ( Parameter_Integer, 0 ),   --  : pappd3sp (Integer)
           4062 => ( Parameter_Float, 0.0 ),   --  : payam1hd (Amount)
           4063 => ( Parameter_Float, 0.0 ),   --  : payam2hd (Amount)
           4064 => ( Parameter_Float, 0.0 ),   --  : payam3hd (Amount)
           4065 => ( Parameter_Float, 0.0 ),   --  : payam1sp (Amount)
           4066 => ( Parameter_Float, 0.0 ),   --  : payam2sp (Amount)
           4067 => ( Parameter_Float, 0.0 ),   --  : payam3sp (Amount)
           4068 => ( Parameter_Integer, 0 ),   --  : pdate1hd (Integer)
           4069 => ( Parameter_Integer, 0 ),   --  : pdate2hd (Integer)
           4070 => ( Parameter_Integer, 0 ),   --  : pdate3hd (Integer)
           4071 => ( Parameter_Integer, 0 ),   --  : pdate1sp (Integer)
           4072 => ( Parameter_Integer, 0 ),   --  : pdate2sp (Integer)
           4073 => ( Parameter_Integer, 0 ),   --  : pdate3sp (Integer)
           4074 => ( Parameter_Float, 0.0 ),   --  : paye1hd (Amount)
           4075 => ( Parameter_Float, 0.0 ),   --  : paye2hd (Amount)
           4076 => ( Parameter_Float, 0.0 ),   --  : paye3hd (Amount)
           4077 => ( Parameter_Float, 0.0 ),   --  : paye1sp (Amount)
           4078 => ( Parameter_Float, 0.0 ),   --  : paye2sp (Amount)
           4079 => ( Parameter_Float, 0.0 ),   --  : paye3sp (Amount)
           4080 => ( Parameter_Integer, 0 ),   --  : paype1hd (Integer)
           4081 => ( Parameter_Integer, 0 ),   --  : paype2hd (Integer)
           4082 => ( Parameter_Integer, 0 ),   --  : paype3hd (Integer)
           4083 => ( Parameter_Integer, 0 ),   --  : paype1sp (Integer)
           4084 => ( Parameter_Integer, 0 ),   --  : paype2sp (Integer)
           4085 => ( Parameter_Integer, 0 ),   --  : paype3sp (Integer)
           4086 => ( Parameter_Integer, 0 ),   --  : paysl1hd (Integer)
           4087 => ( Parameter_Integer, 0 ),   --  : paysl2hd (Integer)
           4088 => ( Parameter_Integer, 0 ),   --  : paysl3hd (Integer)
           4089 => ( Parameter_Integer, 0 ),   --  : paysl1sp (Integer)
           4090 => ( Parameter_Integer, 0 ),   --  : paysl2sp (Integer)
           4091 => ( Parameter_Integer, 0 ),   --  : paysl3sp (Integer)
           4092 => ( Parameter_Integer, 0 ),   --  : payus1hd (Integer)
           4093 => ( Parameter_Integer, 0 ),   --  : payus2hd (Integer)
           4094 => ( Parameter_Integer, 0 ),   --  : payus3hd (Integer)
           4095 => ( Parameter_Integer, 0 ),   --  : payus1sp (Integer)
           4096 => ( Parameter_Integer, 0 ),   --  : payus2sp (Integer)
           4097 => ( Parameter_Integer, 0 ),   --  : payus3sp (Integer)
           4098 => ( Parameter_Float, 0.0 ),   --  : pothr1hd (Amount)
           4099 => ( Parameter_Integer, 0 ),   --  : pothr2hd (Integer)
           4100 => ( Parameter_Integer, 0 ),   --  : pothr3hd (Integer)
           4101 => ( Parameter_Float, 0.0 ),   --  : pothr1sp (Amount)
           4102 => ( Parameter_Integer, 0 ),   --  : pothr2sp (Integer)
           4103 => ( Parameter_Integer, 0 ),   --  : pothr3sp (Integer)
           4104 => ( Parameter_Integer, 0 ),   --  : ppppd1hd (Integer)
           4105 => ( Parameter_Integer, 0 ),   --  : ppppd2hd (Integer)
           4106 => ( Parameter_Integer, 0 ),   --  : ppppd3hd (Integer)
           4107 => ( Parameter_Integer, 0 ),   --  : ppppd1sp (Integer)
           4108 => ( Parameter_Integer, 0 ),   --  : ppppd2sp (Integer)
           4109 => ( Parameter_Integer, 0 ),   --  : ppppd3sp (Integer)
           4110 => ( Parameter_Float, 0.0 ),   --  : prbef1hd (Amount)
           4111 => ( Parameter_Float, 0.0 ),   --  : prbef2hd (Amount)
           4112 => ( Parameter_Float, 0.0 ),   --  : prbef3hd (Amount)
           4113 => ( Parameter_Float, 0.0 ),   --  : prbef1sp (Amount)
           4114 => ( Parameter_Float, 0.0 ),   --  : prbef2sp (Amount)
           4115 => ( Parameter_Float, 0.0 ),   --  : prbef3sp (Amount)
           4116 => ( Parameter_Integer, 0 ),   --  : prdoc1hd (Integer)
           4117 => ( Parameter_Integer, 0 ),   --  : prdoc2hd (Integer)
           4118 => ( Parameter_Integer, 0 ),   --  : prdoc3hd (Integer)
           4119 => ( Parameter_Integer, 0 ),   --  : prdoc1sp (Integer)
           4120 => ( Parameter_Integer, 0 ),   --  : prdoc2sp (Integer)
           4121 => ( Parameter_Integer, 0 ),   --  : prdoc3sp (Integer)
           4122 => ( Parameter_Float, 0.0 ),   --  : sepro1hd (Amount)
           4123 => ( Parameter_Float, 0.0 ),   --  : sepro2hd (Amount)
           4124 => ( Parameter_Float, 0.0 ),   --  : sepro3hd (Amount)
           4125 => ( Parameter_Float, 0.0 ),   --  : sepro1sp (Amount)
           4126 => ( Parameter_Float, 0.0 ),   --  : sepro2sp (Amount)
           4127 => ( Parameter_Float, 0.0 ),   --  : sepro3sp (Amount)
           4128 => ( Parameter_Integer, 0 ),   --  : prolo1hd (Integer)
           4129 => ( Parameter_Integer, 0 ),   --  : prolo2hd (Integer)
           4130 => ( Parameter_Integer, 0 ),   --  : prolo3hd (Integer)
           4131 => ( Parameter_Integer, 0 ),   --  : prolo1sp (Integer)
           4132 => ( Parameter_Integer, 0 ),   --  : prolo2sp (Integer)
           4133 => ( Parameter_Integer, 0 ),   --  : prolo3sp (Integer)
           4134 => ( Parameter_Integer, 0 ),   --  : profn1hd (Integer)
           4135 => ( Parameter_Integer, 0 ),   --  : profn2hd (Integer)
           4136 => ( Parameter_Integer, 0 ),   --  : profn3hd (Integer)
           4137 => ( Parameter_Integer, 0 ),   --  : profn1sp (Integer)
           4138 => ( Parameter_Integer, 0 ),   --  : profn2sp (Integer)
           4139 => ( Parameter_Integer, 0 ),   --  : profn3sp (Integer)
           4140 => ( Parameter_Integer, 0 ),   --  : protx1hd (Integer)
           4141 => ( Parameter_Integer, 0 ),   --  : protx2hd (Integer)
           4142 => ( Parameter_Integer, 0 ),   --  : protx3hd (Integer)
           4143 => ( Parameter_Integer, 0 ),   --  : protx1sp (Integer)
           4144 => ( Parameter_Integer, 0 ),   --  : protx2sp (Integer)
           4145 => ( Parameter_Integer, 0 ),   --  : protx3sp (Integer)
           4146 => ( Parameter_Integer, 0 ),   --  : rspvr1hd (Integer)
           4147 => ( Parameter_Integer, 0 ),   --  : rspvr2hd (Integer)
           4148 => ( Parameter_Integer, 0 ),   --  : rspvr3hd (Integer)
           4149 => ( Parameter_Integer, 0 ),   --  : rspvr1sp (Integer)
           4150 => ( Parameter_Integer, 0 ),   --  : rspvr2sp (Integer)
           4151 => ( Parameter_Integer, 0 ),   --  : rspvr3sp (Integer)
           4152 => ( Parameter_Integer, 0 ),   --  : apamt1hd (Integer)
           4153 => ( Parameter_Integer, 0 ),   --  : apamt2hd (Integer)
           4154 => ( Parameter_Integer, 0 ),   --  : apamt3hd (Integer)
           4155 => ( Parameter_Integer, 0 ),   --  : apamt1sp (Integer)
           4156 => ( Parameter_Integer, 0 ),   --  : apamt2sp (Integer)
           4157 => ( Parameter_Integer, 0 ),   --  : apamt3sp (Integer)
           4158 => ( Parameter_Integer, 0 ),   --  : sebeg1hd (Integer)
           4159 => ( Parameter_Integer, 0 ),   --  : sebeg2hd (Integer)
           4160 => ( Parameter_Integer, 0 ),   --  : sebeg3hd (Integer)
           4161 => ( Parameter_Integer, 0 ),   --  : sebeg1sp (Integer)
           4162 => ( Parameter_Integer, 0 ),   --  : sebeg2sp (Integer)
           4163 => ( Parameter_Integer, 0 ),   --  : sebeg3sp (Integer)
           4164 => ( Parameter_Integer, 0 ),   --  : seend1hd (Integer)
           4165 => ( Parameter_Integer, 0 ),   --  : seend2hd (Integer)
           4166 => ( Parameter_Integer, 0 ),   --  : seend3hd (Integer)
           4167 => ( Parameter_Integer, 0 ),   --  : seend1sp (Integer)
           4168 => ( Parameter_Integer, 0 ),   --  : seend2sp (Integer)
           4169 => ( Parameter_Integer, 0 ),   --  : seend3sp (Integer)
           4170 => ( Parameter_Integer, 0 ),   --  : sectr1hd (Integer)
           4171 => ( Parameter_Integer, 0 ),   --  : sectr2hd (Integer)
           4172 => ( Parameter_Integer, 0 ),   --  : sectr3hd (Integer)
           4173 => ( Parameter_Integer, 0 ),   --  : sectr1sp (Integer)
           4174 => ( Parameter_Integer, 0 ),   --  : sectr2sp (Integer)
           4175 => ( Parameter_Integer, 0 ),   --  : sectr3sp (Integer)
           4176 => ( Parameter_Integer, 0 ),   --  : sectt1hd (Integer)
           4177 => ( Parameter_Integer, 0 ),   --  : sectt2hd (Integer)
           4178 => ( Parameter_Integer, 0 ),   --  : sectt3hd (Integer)
           4179 => ( Parameter_Integer, 0 ),   --  : sectt1sp (Integer)
           4180 => ( Parameter_Integer, 0 ),   --  : sectt2sp (Integer)
           4181 => ( Parameter_Integer, 0 ),   --  : sectt3sp (Integer)
           4182 => ( Parameter_Integer, 0 ),   --  : sefin1hd (Integer)
           4183 => ( Parameter_Integer, 0 ),   --  : sefin2hd (Integer)
           4184 => ( Parameter_Integer, 0 ),   --  : sefin3hd (Integer)
           4185 => ( Parameter_Integer, 0 ),   --  : sefin1sp (Integer)
           4186 => ( Parameter_Integer, 0 ),   --  : sefin2sp (Integer)
           4187 => ( Parameter_Integer, 0 ),   --  : sefin3sp (Integer)
           4188 => ( Parameter_Float, 0.0 ),   --  : secam1hd (Amount)
           4189 => ( Parameter_Float, 0.0 ),   --  : secam2hd (Amount)
           4190 => ( Parameter_Float, 0.0 ),   --  : secam3hd (Amount)
           4191 => ( Parameter_Float, 0.0 ),   --  : secam1sp (Amount)
           4192 => ( Parameter_Float, 0.0 ),   --  : secam2sp (Amount)
           4193 => ( Parameter_Float, 0.0 ),   --  : secam3sp (Amount)
           4194 => ( Parameter_Integer, 0 ),   --  : seciw1hd (Integer)
           4195 => ( Parameter_Integer, 0 ),   --  : seciw2hd (Integer)
           4196 => ( Parameter_Integer, 0 ),   --  : seciw3hd (Integer)
           4197 => ( Parameter_Integer, 0 ),   --  : seciw1sp (Integer)
           4198 => ( Parameter_Integer, 0 ),   --  : seciw2sp (Integer)
           4199 => ( Parameter_Integer, 0 ),   --  : seciw3sp (Integer)
           4200 => ( Parameter_Integer, 0 ),   --  : sewks1hd (Integer)
           4201 => ( Parameter_Integer, 0 ),   --  : sewks2hd (Integer)
           4202 => ( Parameter_Integer, 0 ),   --  : sewks3hd (Integer)
           4203 => ( Parameter_Integer, 0 ),   --  : sewks1sp (Integer)
           4204 => ( Parameter_Integer, 0 ),   --  : sewks2sp (Integer)
           4205 => ( Parameter_Integer, 0 ),   --  : sewks3sp (Integer)
           4206 => ( Parameter_Float, 0.0 ),   --  : senam1hd (Amount)
           4207 => ( Parameter_Float, 0.0 ),   --  : senam2hd (Amount)
           4208 => ( Parameter_Integer, 0 ),   --  : senam3hd (Integer)
           4209 => ( Parameter_Float, 0.0 ),   --  : senam1sp (Amount)
           4210 => ( Parameter_Float, 0.0 ),   --  : senam2sp (Amount)
           4211 => ( Parameter_Integer, 0 ),   --  : senam3sp (Integer)
           4212 => ( Parameter_Integer, 0 ),   --  : seiin1hd (Integer)
           4213 => ( Parameter_Integer, 0 ),   --  : seiin2hd (Integer)
           4214 => ( Parameter_Integer, 0 ),   --  : seiin3hd (Integer)
           4215 => ( Parameter_Integer, 0 ),   --  : seiin1sp (Integer)
           4216 => ( Parameter_Integer, 0 ),   --  : seiin2sp (Integer)
           4217 => ( Parameter_Integer, 0 ),   --  : seiin3sp (Integer)
           4218 => ( Parameter_Float, 0.0 ),   --  : senil1hd (Amount)
           4219 => ( Parameter_Float, 0.0 ),   --  : senil2hd (Amount)
           4220 => ( Parameter_Integer, 0 ),   --  : senil3hd (Integer)
           4221 => ( Parameter_Float, 0.0 ),   --  : senil1sp (Amount)
           4222 => ( Parameter_Float, 0.0 ),   --  : senil2sp (Amount)
           4223 => ( Parameter_Integer, 0 ),   --  : senil3sp (Integer)
           4224 => ( Parameter_Float, 0.0 ),   --  : senir1hd (Amount)
           4225 => ( Parameter_Float, 0.0 ),   --  : senir2hd (Amount)
           4226 => ( Parameter_Float, 0.0 ),   --  : senir3hd (Amount)
           4227 => ( Parameter_Float, 0.0 ),   --  : senir1sp (Amount)
           4228 => ( Parameter_Float, 0.0 ),   --  : senir2sp (Amount)
           4229 => ( Parameter_Float, 0.0 ),   --  : senir3sp (Amount)
           4230 => ( Parameter_Integer, 0 ),   --  : psenr1hd (Integer)
           4231 => ( Parameter_Integer, 0 ),   --  : psenr2hd (Integer)
           4232 => ( Parameter_Integer, 0 ),   --  : psenr3hd (Integer)
           4233 => ( Parameter_Integer, 0 ),   --  : psenr1sp (Integer)
           4234 => ( Parameter_Integer, 0 ),   --  : psenr2sp (Integer)
           4235 => ( Parameter_Integer, 0 ),   --  : psenr3sp (Integer)
           4236 => ( Parameter_Float, 0.0 ),   --  : setax1hd (Amount)
           4237 => ( Parameter_Float, 0.0 ),   --  : setax2hd (Amount)
           4238 => ( Parameter_Float, 0.0 ),   --  : setax3hd (Amount)
           4239 => ( Parameter_Float, 0.0 ),   --  : setax1sp (Amount)
           4240 => ( Parameter_Float, 0.0 ),   --  : setax2sp (Amount)
           4241 => ( Parameter_Float, 0.0 ),   --  : setax3sp (Amount)
           4242 => ( Parameter_Float, 0.0 ),   --  : smpam1hd (Amount)
           4243 => ( Parameter_Integer, 0 ),   --  : smpam2hd (Integer)
           4244 => ( Parameter_Integer, 0 ),   --  : smpam3hd (Integer)
           4245 => ( Parameter_Float, 0.0 ),   --  : smpam1sp (Amount)
           4246 => ( Parameter_Float, 0.0 ),   --  : smpam2sp (Amount)
           4247 => ( Parameter_Integer, 0 ),   --  : smpam3sp (Integer)
           4248 => ( Parameter_Integer, 0 ),   --  : smprt1hd (Integer)
           4249 => ( Parameter_Integer, 0 ),   --  : smprt2hd (Integer)
           4250 => ( Parameter_Integer, 0 ),   --  : smprt3hd (Integer)
           4251 => ( Parameter_Integer, 0 ),   --  : smprt1sp (Integer)
           4252 => ( Parameter_Integer, 0 ),   --  : smprt2sp (Integer)
           4253 => ( Parameter_Integer, 0 ),   --  : smprt3sp (Integer)
           4254 => ( Parameter_Integer, 0 ),   --  : sole1hd (Integer)
           4255 => ( Parameter_Integer, 0 ),   --  : sole2hd (Integer)
           4256 => ( Parameter_Integer, 0 ),   --  : sole3hd (Integer)
           4257 => ( Parameter_Integer, 0 ),   --  : sole1sp (Integer)
           4258 => ( Parameter_Integer, 0 ),   --  : sole2sp (Integer)
           4259 => ( Parameter_Integer, 0 ),   --  : sole3sp (Integer)
           4260 => ( Parameter_Float, 0.0 ),   --  : spamt1hd (Amount)
           4261 => ( Parameter_Integer, 0 ),   --  : spamt2hd (Integer)
           4262 => ( Parameter_Integer, 0 ),   --  : spamt3hd (Integer)
           4263 => ( Parameter_Float, 0.0 ),   --  : spamt1sp (Amount)
           4264 => ( Parameter_Integer, 0 ),   --  : spamt2sp (Integer)
           4265 => ( Parameter_Integer, 0 ),   --  : spamt3sp (Integer)
           4266 => ( Parameter_Integer, 0 ),   --  : sppd1hd (Integer)
           4267 => ( Parameter_Integer, 0 ),   --  : sppd2hd (Integer)
           4268 => ( Parameter_Integer, 0 ),   --  : sppd3hd (Integer)
           4269 => ( Parameter_Integer, 0 ),   --  : sppd1sp (Integer)
           4270 => ( Parameter_Integer, 0 ),   --  : sppd2sp (Integer)
           4271 => ( Parameter_Integer, 0 ),   --  : sppd3sp (Integer)
           4272 => ( Parameter_Integer, 0 ),   --  : spsac1hd (Integer)
           4273 => ( Parameter_Integer, 0 ),   --  : spsac2hd (Integer)
           4274 => ( Parameter_Integer, 0 ),   --  : spsac3hd (Integer)
           4275 => ( Parameter_Integer, 0 ),   --  : spsac1sp (Integer)
           4276 => ( Parameter_Integer, 0 ),   --  : spsac2sp (Integer)
           4277 => ( Parameter_Integer, 0 ),   --  : spsac3sp (Integer)
           4278 => ( Parameter_Float, 0.0 ),   --  : spuam1hd (Amount)
           4279 => ( Parameter_Integer, 0 ),   --  : spuam2hd (Integer)
           4280 => ( Parameter_Integer, 0 ),   --  : spuam3hd (Integer)
           4281 => ( Parameter_Integer, 0 ),   --  : spuam1sp (Integer)
           4282 => ( Parameter_Integer, 0 ),   --  : spuam2sp (Integer)
           4283 => ( Parameter_Integer, 0 ),   --  : spuam3sp (Integer)
           4284 => ( Parameter_Integer, 0 ),   --  : spupd1hd (Integer)
           4285 => ( Parameter_Integer, 0 ),   --  : spupd2hd (Integer)
           4286 => ( Parameter_Integer, 0 ),   --  : spupd3hd (Integer)
           4287 => ( Parameter_Integer, 0 ),   --  : spupd1sp (Integer)
           4288 => ( Parameter_Integer, 0 ),   --  : spupd2sp (Integer)
           4289 => ( Parameter_Integer, 0 ),   --  : spupd3sp (Integer)
           4290 => ( Parameter_Integer, 0 ),   --  : spusu1hd (Integer)
           4291 => ( Parameter_Integer, 0 ),   --  : spusu2hd (Integer)
           4292 => ( Parameter_Integer, 0 ),   --  : spusu3hd (Integer)
           4293 => ( Parameter_Integer, 0 ),   --  : spusu1sp (Integer)
           4294 => ( Parameter_Integer, 0 ),   --  : spusu2sp (Integer)
           4295 => ( Parameter_Integer, 0 ),   --  : spusu3sp (Integer)
           4296 => ( Parameter_Float, 0.0 ),   --  : ppamt1hd (Amount)
           4297 => ( Parameter_Integer, 0 ),   --  : ppamt2hd (Integer)
           4298 => ( Parameter_Integer, 0 ),   --  : ppamt3hd (Integer)
           4299 => ( Parameter_Float, 0.0 ),   --  : ppamt1sp (Amount)
           4300 => ( Parameter_Integer, 0 ),   --  : ppamt2sp (Integer)
           4301 => ( Parameter_Integer, 0 ),   --  : ppamt3sp (Integer)
           4302 => ( Parameter_Float, 0.0 ),   --  : sspam1hd (Amount)
           4303 => ( Parameter_Float, 0.0 ),   --  : sspam2hd (Amount)
           4304 => ( Parameter_Integer, 0 ),   --  : sspam3hd (Integer)
           4305 => ( Parameter_Float, 0.0 ),   --  : sspam1sp (Amount)
           4306 => ( Parameter_Integer, 0 ),   --  : sspam2sp (Integer)
           4307 => ( Parameter_Integer, 0 ),   --  : sspam3sp (Integer)
           4308 => ( Parameter_Integer, 0 ),   --  : spsmp1hd (Integer)
           4309 => ( Parameter_Integer, 0 ),   --  : spsmp2hd (Integer)
           4310 => ( Parameter_Integer, 0 ),   --  : spsmp3hd (Integer)
           4311 => ( Parameter_Integer, 0 ),   --  : spsmp1sp (Integer)
           4312 => ( Parameter_Integer, 0 ),   --  : spsmp2sp (Integer)
           4313 => ( Parameter_Integer, 0 ),   --  : spsmp3sp (Integer)
           4314 => ( Parameter_Float, 0.0 ),   --  : taxam1hd (Amount)
           4315 => ( Parameter_Float, 0.0 ),   --  : taxam2hd (Amount)
           4316 => ( Parameter_Integer, 0 ),   --  : taxam3hd (Integer)
           4317 => ( Parameter_Float, 0.0 ),   --  : taxam1sp (Amount)
           4318 => ( Parameter_Integer, 0 ),   --  : taxam2sp (Integer)
           4319 => ( Parameter_Integer, 0 ),   --  : taxam3sp (Integer)
           4320 => ( Parameter_Float, 0.0 ),   --  : taxda1hd (Amount)
           4321 => ( Parameter_Float, 0.0 ),   --  : taxda2hd (Amount)
           4322 => ( Parameter_Float, 0.0 ),   --  : taxda3hd (Amount)
           4323 => ( Parameter_Float, 0.0 ),   --  : taxda1sp (Amount)
           4324 => ( Parameter_Float, 0.0 ),   --  : taxda2sp (Amount)
           4325 => ( Parameter_Integer, 0 ),   --  : taxda3sp (Integer)
           4326 => ( Parameter_Integer, 0 ),   --  : taxpd1hd (Integer)
           4327 => ( Parameter_Integer, 0 ),   --  : taxpd2hd (Integer)
           4328 => ( Parameter_Integer, 0 ),   --  : taxpd3hd (Integer)
           4329 => ( Parameter_Integer, 0 ),   --  : taxpd1sp (Integer)
           4330 => ( Parameter_Integer, 0 ),   --  : taxpd2sp (Integer)
           4331 => ( Parameter_Integer, 0 ),   --  : taxpd3sp (Integer)
           4332 => ( Parameter_Float, 0.0 ),   --  : to1hr1hd (Amount)
           4333 => ( Parameter_Float, 0.0 ),   --  : to1hr2hd (Amount)
           4334 => ( Parameter_Float, 0.0 ),   --  : to1hr3hd (Amount)
           4335 => ( Parameter_Float, 0.0 ),   --  : to1hr1sp (Amount)
           4336 => ( Parameter_Float, 0.0 ),   --  : to1hr2sp (Amount)
           4337 => ( Parameter_Integer, 0 ),   --  : to1hr3sp (Integer)
           4338 => ( Parameter_Float, 0.0 ),   --  : boinu1hd (Amount)
           4339 => ( Parameter_Integer, 0 ),   --  : boinu2hd (Integer)
           4340 => ( Parameter_Integer, 0 ),   --  : boinu3hd (Integer)
           4341 => ( Parameter_Float, 0.0 ),   --  : boinu1sp (Amount)
           4342 => ( Parameter_Integer, 0 ),   --  : boinu2sp (Integer)
           4343 => ( Parameter_Integer, 0 ),   --  : boinu3sp (Integer)
           4344 => ( Parameter_Integer, 0 ),   --  : uincb1hd (Integer)
           4345 => ( Parameter_Integer, 0 ),   --  : uincb2hd (Integer)
           4346 => ( Parameter_Integer, 0 ),   --  : uincb3hd (Integer)
           4347 => ( Parameter_Integer, 0 ),   --  : uincb1sp (Integer)
           4348 => ( Parameter_Integer, 0 ),   --  : uincb2sp (Integer)
           4349 => ( Parameter_Integer, 0 ),   --  : uincb3sp (Integer)
           4350 => ( Parameter_Float, 0.0 ),   --  : uded11hd (Amount)
           4351 => ( Parameter_Integer, 0 ),   --  : uded12hd (Integer)
           4352 => ( Parameter_Integer, 0 ),   --  : uded13hd (Integer)
           4353 => ( Parameter_Float, 0.0 ),   --  : uded11sp (Amount)
           4354 => ( Parameter_Integer, 0 ),   --  : uded12sp (Integer)
           4355 => ( Parameter_Integer, 0 ),   --  : uded13sp (Integer)
           4356 => ( Parameter_Integer, 0 ),   --  : uded21hd (Integer)
           4357 => ( Parameter_Integer, 0 ),   --  : uded22hd (Integer)
           4358 => ( Parameter_Integer, 0 ),   --  : uded23hd (Integer)
           4359 => ( Parameter_Integer, 0 ),   --  : uded21sp (Integer)
           4360 => ( Parameter_Integer, 0 ),   --  : uded22sp (Integer)
           4361 => ( Parameter_Integer, 0 ),   --  : uded23sp (Integer)
           4362 => ( Parameter_Float, 0.0 ),   --  : uded31hd (Amount)
           4363 => ( Parameter_Integer, 0 ),   --  : uded32hd (Integer)
           4364 => ( Parameter_Integer, 0 ),   --  : uded33hd (Integer)
           4365 => ( Parameter_Integer, 0 ),   --  : uded31sp (Integer)
           4366 => ( Parameter_Integer, 0 ),   --  : uded32sp (Integer)
           4367 => ( Parameter_Integer, 0 ),   --  : uded33sp (Integer)
           4368 => ( Parameter_Integer, 0 ),   --  : uded41hd (Integer)
           4369 => ( Parameter_Integer, 0 ),   --  : uded42hd (Integer)
           4370 => ( Parameter_Integer, 0 ),   --  : uded43hd (Integer)
           4371 => ( Parameter_Integer, 0 ),   --  : uded41sp (Integer)
           4372 => ( Parameter_Integer, 0 ),   --  : uded42sp (Integer)
           4373 => ( Parameter_Integer, 0 ),   --  : uded43sp (Integer)
           4374 => ( Parameter_Float, 0.0 ),   --  : uded51hd (Amount)
           4375 => ( Parameter_Integer, 0 ),   --  : uded52hd (Integer)
           4376 => ( Parameter_Integer, 0 ),   --  : uded53hd (Integer)
           4377 => ( Parameter_Float, 0.0 ),   --  : uded51sp (Amount)
           4378 => ( Parameter_Integer, 0 ),   --  : uded52sp (Integer)
           4379 => ( Parameter_Integer, 0 ),   --  : uded53sp (Integer)
           4380 => ( Parameter_Integer, 0 ),   --  : uded61hd (Integer)
           4381 => ( Parameter_Integer, 0 ),   --  : uded62hd (Integer)
           4382 => ( Parameter_Integer, 0 ),   --  : uded63hd (Integer)
           4383 => ( Parameter_Integer, 0 ),   --  : uded61sp (Integer)
           4384 => ( Parameter_Integer, 0 ),   --  : uded62sp (Integer)
           4385 => ( Parameter_Integer, 0 ),   --  : uded63sp (Integer)
           4386 => ( Parameter_Integer, 0 ),   --  : uded71hd (Integer)
           4387 => ( Parameter_Integer, 0 ),   --  : uded72hd (Integer)
           4388 => ( Parameter_Integer, 0 ),   --  : uded73hd (Integer)
           4389 => ( Parameter_Integer, 0 ),   --  : uded71sp (Integer)
           4390 => ( Parameter_Integer, 0 ),   --  : uded72sp (Integer)
           4391 => ( Parameter_Integer, 0 ),   --  : uded73sp (Integer)
           4392 => ( Parameter_Integer, 0 ),   --  : uded81hd (Integer)
           4393 => ( Parameter_Integer, 0 ),   --  : uded82hd (Integer)
           4394 => ( Parameter_Integer, 0 ),   --  : uded83hd (Integer)
           4395 => ( Parameter_Integer, 0 ),   --  : uded81sp (Integer)
           4396 => ( Parameter_Integer, 0 ),   --  : uded82sp (Integer)
           4397 => ( Parameter_Integer, 0 ),   --  : uded83sp (Integer)
           4398 => ( Parameter_Float, 0.0 ),   --  : uded91hd (Amount)
           4399 => ( Parameter_Integer, 0 ),   --  : uded92hd (Integer)
           4400 => ( Parameter_Integer, 0 ),   --  : uded93hd (Integer)
           4401 => ( Parameter_Integer, 0 ),   --  : uded91sp (Integer)
           4402 => ( Parameter_Integer, 0 ),   --  : uded92sp (Integer)
           4403 => ( Parameter_Integer, 0 ),   --  : uded93sp (Integer)
           4404 => ( Parameter_Float, 0.0 ),   --  : ugros1hd (Amount)
           4405 => ( Parameter_Float, 0.0 ),   --  : ugros2hd (Amount)
           4406 => ( Parameter_Integer, 0 ),   --  : ugros3hd (Integer)
           4407 => ( Parameter_Float, 0.0 ),   --  : ugros1sp (Amount)
           4408 => ( Parameter_Float, 0.0 ),   --  : ugros2sp (Amount)
           4409 => ( Parameter_Integer, 0 ),   --  : ugros3sp (Integer)
           4410 => ( Parameter_Text, null, Null_Unbounded_String ),   --  : ugrsp1hd (Unbounded_String)
           4411 => ( Parameter_Float, 0.0 ),   --  : ugrsp2hd (Amount)
           4412 => ( Parameter_Float, 0.0 ),   --  : ugrsp3hd (Amount)
           4413 => ( Parameter_Float, 0.0 ),   --  : ugrsp1sp (Amount)
           4414 => ( Parameter_Float, 0.0 ),   --  : ugrsp2sp (Amount)
           4415 => ( Parameter_Float, 0.0 ),   --  : ugrsp3sp (Amount)
           4416 => ( Parameter_Integer, 0 ),   --  : uinc11hd (Integer)
           4417 => ( Parameter_Integer, 0 ),   --  : uinc12hd (Integer)
           4418 => ( Parameter_Integer, 0 ),   --  : uinc13hd (Integer)
           4419 => ( Parameter_Integer, 0 ),   --  : uinc11sp (Integer)
           4420 => ( Parameter_Integer, 0 ),   --  : uinc12sp (Integer)
           4421 => ( Parameter_Integer, 0 ),   --  : uinc13sp (Integer)
           4422 => ( Parameter_Integer, 0 ),   --  : uinc21hd (Integer)
           4423 => ( Parameter_Integer, 0 ),   --  : uinc22hd (Integer)
           4424 => ( Parameter_Integer, 0 ),   --  : uinc23hd (Integer)
           4425 => ( Parameter_Integer, 0 ),   --  : uinc21sp (Integer)
           4426 => ( Parameter_Integer, 0 ),   --  : uinc22sp (Integer)
           4427 => ( Parameter_Integer, 0 ),   --  : uinc23sp (Integer)
           4428 => ( Parameter_Integer, 0 ),   --  : uinc31hd (Integer)
           4429 => ( Parameter_Integer, 0 ),   --  : uinc32hd (Integer)
           4430 => ( Parameter_Integer, 0 ),   --  : uinc33hd (Integer)
           4431 => ( Parameter_Integer, 0 ),   --  : uinc31sp (Integer)
           4432 => ( Parameter_Integer, 0 ),   --  : uinc32sp (Integer)
           4433 => ( Parameter_Integer, 0 ),   --  : uinc33sp (Integer)
           4434 => ( Parameter_Integer, 0 ),   --  : uinc41hd (Integer)
           4435 => ( Parameter_Integer, 0 ),   --  : uinc42hd (Integer)
           4436 => ( Parameter_Integer, 0 ),   --  : uinc43hd (Integer)
           4437 => ( Parameter_Integer, 0 ),   --  : uinc41sp (Integer)
           4438 => ( Parameter_Integer, 0 ),   --  : uinc42sp (Integer)
           4439 => ( Parameter_Integer, 0 ),   --  : uinc43sp (Integer)
           4440 => ( Parameter_Integer, 0 ),   --  : uinc51hd (Integer)
           4441 => ( Parameter_Integer, 0 ),   --  : uinc52hd (Integer)
           4442 => ( Parameter_Integer, 0 ),   --  : uinc53hd (Integer)
           4443 => ( Parameter_Integer, 0 ),   --  : uinc51sp (Integer)
           4444 => ( Parameter_Integer, 0 ),   --  : uinc52sp (Integer)
           4445 => ( Parameter_Integer, 0 ),   --  : uinc53sp (Integer)
           4446 => ( Parameter_Integer, 0 ),   --  : uinc61hd (Integer)
           4447 => ( Parameter_Integer, 0 ),   --  : uinc62hd (Integer)
           4448 => ( Parameter_Integer, 0 ),   --  : uinc63hd (Integer)
           4449 => ( Parameter_Integer, 0 ),   --  : uinc61sp (Integer)
           4450 => ( Parameter_Integer, 0 ),   --  : uinc62sp (Integer)
           4451 => ( Parameter_Integer, 0 ),   --  : uinc63sp (Integer)
           4452 => ( Parameter_Integer, 0 ),   --  : uinc71hd (Integer)
           4453 => ( Parameter_Integer, 0 ),   --  : uinc72hd (Integer)
           4454 => ( Parameter_Integer, 0 ),   --  : uinc73hd (Integer)
           4455 => ( Parameter_Integer, 0 ),   --  : uinc71sp (Integer)
           4456 => ( Parameter_Integer, 0 ),   --  : uinc72sp (Integer)
           4457 => ( Parameter_Integer, 0 ),   --  : uinc73sp (Integer)
           4458 => ( Parameter_Float, 0.0 ),   --  : umile1hd (Amount)
           4459 => ( Parameter_Integer, 0 ),   --  : umile2hd (Integer)
           4460 => ( Parameter_Integer, 0 ),   --  : umile3hd (Integer)
           4461 => ( Parameter_Float, 0.0 ),   --  : umile1sp (Amount)
           4462 => ( Parameter_Integer, 0 ),   --  : umile2sp (Integer)
           4463 => ( Parameter_Integer, 0 ),   --  : umile3sp (Integer)
           4464 => ( Parameter_Float, 0.0 ),   --  : umot1hd (Amount)
           4465 => ( Parameter_Integer, 0 ),   --  : umot2hd (Integer)
           4466 => ( Parameter_Integer, 0 ),   --  : umot3hd (Integer)
           4467 => ( Parameter_Float, 0.0 ),   --  : umot1sp (Amount)
           4468 => ( Parameter_Integer, 0 ),   --  : umot2sp (Integer)
           4469 => ( Parameter_Integer, 0 ),   --  : umot3sp (Integer)
           4470 => ( Parameter_Float, 0.0 ),   --  : unett1hd (Amount)
           4471 => ( Parameter_Float, 0.0 ),   --  : unett2hd (Amount)
           4472 => ( Parameter_Integer, 0 ),   --  : unett3hd (Integer)
           4473 => ( Parameter_Float, 0.0 ),   --  : unett1sp (Amount)
           4474 => ( Parameter_Float, 0.0 ),   --  : unett2sp (Amount)
           4475 => ( Parameter_Integer, 0 ),   --  : unett3sp (Integer)
           4476 => ( Parameter_Integer, 0 ),   --  : uoth11hd (Integer)
           4477 => ( Parameter_Integer, 0 ),   --  : uoth12hd (Integer)
           4478 => ( Parameter_Integer, 0 ),   --  : uoth13hd (Integer)
           4479 => ( Parameter_Integer, 0 ),   --  : uoth11sp (Integer)
           4480 => ( Parameter_Integer, 0 ),   --  : uoth12sp (Integer)
           4481 => ( Parameter_Integer, 0 ),   --  : uoth13sp (Integer)
           4482 => ( Parameter_Integer, 0 ),   --  : uoth21hd (Integer)
           4483 => ( Parameter_Integer, 0 ),   --  : uoth22hd (Integer)
           4484 => ( Parameter_Integer, 0 ),   --  : uoth23hd (Integer)
           4485 => ( Parameter_Integer, 0 ),   --  : uoth21sp (Integer)
           4486 => ( Parameter_Integer, 0 ),   --  : uoth22sp (Integer)
           4487 => ( Parameter_Integer, 0 ),   --  : uoth23sp (Integer)
           4488 => ( Parameter_Integer, 0 ),   --  : uoth31hd (Integer)
           4489 => ( Parameter_Integer, 0 ),   --  : uoth32hd (Integer)
           4490 => ( Parameter_Integer, 0 ),   --  : uoth33hd (Integer)
           4491 => ( Parameter_Integer, 0 ),   --  : uoth31sp (Integer)
           4492 => ( Parameter_Integer, 0 ),   --  : uoth32sp (Integer)
           4493 => ( Parameter_Integer, 0 ),   --  : uoth33sp (Integer)
           4494 => ( Parameter_Integer, 0 ),   --  : uoth41hd (Integer)
           4495 => ( Parameter_Integer, 0 ),   --  : uoth42hd (Integer)
           4496 => ( Parameter_Integer, 0 ),   --  : uoth43hd (Integer)
           4497 => ( Parameter_Integer, 0 ),   --  : uoth41sp (Integer)
           4498 => ( Parameter_Integer, 0 ),   --  : uoth42sp (Integer)
           4499 => ( Parameter_Integer, 0 ),   --  : uoth43sp (Integer)
           4500 => ( Parameter_Integer, 0 ),   --  : uoth51hd (Integer)
           4501 => ( Parameter_Integer, 0 ),   --  : uoth52hd (Integer)
           4502 => ( Parameter_Integer, 0 ),   --  : uoth53hd (Integer)
           4503 => ( Parameter_Integer, 0 ),   --  : uoth51sp (Integer)
           4504 => ( Parameter_Integer, 0 ),   --  : uoth52sp (Integer)
           4505 => ( Parameter_Integer, 0 ),   --  : uoth53sp (Integer)
           4506 => ( Parameter_Integer, 0 ),   --  : uoth61hd (Integer)
           4507 => ( Parameter_Integer, 0 ),   --  : uoth62hd (Integer)
           4508 => ( Parameter_Integer, 0 ),   --  : uoth63hd (Integer)
           4509 => ( Parameter_Integer, 0 ),   --  : uoth61sp (Integer)
           4510 => ( Parameter_Integer, 0 ),   --  : uoth62sp (Integer)
           4511 => ( Parameter_Integer, 0 ),   --  : uoth63sp (Integer)
           4512 => ( Parameter_Integer, 0 ),   --  : uoth71hd (Integer)
           4513 => ( Parameter_Integer, 0 ),   --  : uoth72hd (Integer)
           4514 => ( Parameter_Integer, 0 ),   --  : uoth73hd (Integer)
           4515 => ( Parameter_Integer, 0 ),   --  : uoth71sp (Integer)
           4516 => ( Parameter_Integer, 0 ),   --  : uoth72sp (Integer)
           4517 => ( Parameter_Integer, 0 ),   --  : uoth73sp (Integer)
           4518 => ( Parameter_Integer, 0 ),   --  : uoth81hd (Integer)
           4519 => ( Parameter_Integer, 0 ),   --  : uoth82hd (Integer)
           4520 => ( Parameter_Integer, 0 ),   --  : uoth83hd (Integer)
           4521 => ( Parameter_Integer, 0 ),   --  : uoth81sp (Integer)
           4522 => ( Parameter_Integer, 0 ),   --  : uoth82sp (Integer)
           4523 => ( Parameter_Integer, 0 ),   --  : uoth83sp (Integer)
           4524 => ( Parameter_Integer, 0 ),   --  : uoth91hd (Integer)
           4525 => ( Parameter_Integer, 0 ),   --  : uoth92hd (Integer)
           4526 => ( Parameter_Integer, 0 ),   --  : uoth93hd (Integer)
           4527 => ( Parameter_Integer, 0 ),   --  : uoth91sp (Integer)
           4528 => ( Parameter_Integer, 0 ),   --  : uoth92sp (Integer)
           4529 => ( Parameter_Integer, 0 ),   --  : uoth93sp (Integer)
           4530 => ( Parameter_Integer, 0 ),   --  : uot101hd (Integer)
           4531 => ( Parameter_Integer, 0 ),   --  : uot102hd (Integer)
           4532 => ( Parameter_Integer, 0 ),   --  : uot103hd (Integer)
           4533 => ( Parameter_Integer, 0 ),   --  : uot101sp (Integer)
           4534 => ( Parameter_Integer, 0 ),   --  : uot102sp (Integer)
           4535 => ( Parameter_Integer, 0 ),   --  : uot103sp (Integer)
           4536 => ( Parameter_Float, 0.0 ),   --  : uotht1hd (Amount)
           4537 => ( Parameter_Integer, 0 ),   --  : uotht2hd (Integer)
           4538 => ( Parameter_Integer, 0 ),   --  : uotht3hd (Integer)
           4539 => ( Parameter_Integer, 0 ),   --  : uotht1sp (Integer)
           4540 => ( Parameter_Integer, 0 ),   --  : uotht2sp (Integer)
           4541 => ( Parameter_Integer, 0 ),   --  : uotht3sp (Integer)
           4542 => ( Parameter_Float, 0.0 ),   --  : uothr1hd (Amount)
           4543 => ( Parameter_Float, 0.0 ),   --  : uothr2hd (Amount)
           4544 => ( Parameter_Integer, 0 ),   --  : uothr3hd (Integer)
           4545 => ( Parameter_Float, 0.0 ),   --  : uothr1sp (Amount)
           4546 => ( Parameter_Float, 0.0 ),   --  : uothr2sp (Amount)
           4547 => ( Parameter_Integer, 0 ),   --  : uothr3sp (Integer)
           4548 => ( Parameter_Integer, 0 ),   --  : upay1hd (Integer)
           4549 => ( Parameter_Integer, 0 ),   --  : upay2hd (Integer)
           4550 => ( Parameter_Integer, 0 ),   --  : upay3hd (Integer)
           4551 => ( Parameter_Integer, 0 ),   --  : upay1sp (Integer)
           4552 => ( Parameter_Integer, 0 ),   --  : upay2sp (Integer)
           4553 => ( Parameter_Integer, 0 ),   --  : upay3sp (Integer)
           4554 => ( Parameter_Integer, 0 ),   --  : usapa1hd (Integer)
           4555 => ( Parameter_Integer, 0 ),   --  : usapa2hd (Integer)
           4556 => ( Parameter_Integer, 0 ),   --  : usapa3hd (Integer)
           4557 => ( Parameter_Integer, 0 ),   --  : usapa1sp (Integer)
           4558 => ( Parameter_Integer, 0 ),   --  : usapa2sp (Integer)
           4559 => ( Parameter_Integer, 0 ),   --  : usapa3sp (Integer)
           4560 => ( Parameter_Float, 0.0 ),   --  : uspam1hd (Amount)
           4561 => ( Parameter_Integer, 0 ),   --  : uspam2hd (Integer)
           4562 => ( Parameter_Integer, 0 ),   --  : uspam3hd (Integer)
           4563 => ( Parameter_Float, 0.0 ),   --  : uspam1sp (Amount)
           4564 => ( Parameter_Integer, 0 ),   --  : uspam2sp (Integer)
           4565 => ( Parameter_Integer, 0 ),   --  : uspam3sp (Integer)
           4566 => ( Parameter_Integer, 0 ),   --  : uspra1hd (Integer)
           4567 => ( Parameter_Integer, 0 ),   --  : uspra2hd (Integer)
           4568 => ( Parameter_Integer, 0 ),   --  : uspra3hd (Integer)
           4569 => ( Parameter_Integer, 0 ),   --  : uspra1sp (Integer)
           4570 => ( Parameter_Integer, 0 ),   --  : uspra2sp (Integer)
           4571 => ( Parameter_Integer, 0 ),   --  : uspra3sp (Integer)
           4572 => ( Parameter_Integer, 0 ),   --  : uppam1hd (Integer)
           4573 => ( Parameter_Integer, 0 ),   --  : uppam2hd (Integer)
           4574 => ( Parameter_Integer, 0 ),   --  : uppam3hd (Integer)
           4575 => ( Parameter_Integer, 0 ),   --  : uppam1sp (Integer)
           4576 => ( Parameter_Integer, 0 ),   --  : uppam2sp (Integer)
           4577 => ( Parameter_Integer, 0 ),   --  : uppam3sp (Integer)
           4578 => ( Parameter_Float, 0.0 ),   --  : usspa1hd (Amount)
           4579 => ( Parameter_Integer, 0 ),   --  : usspa2hd (Integer)
           4580 => ( Parameter_Integer, 0 ),   --  : usspa3hd (Integer)
           4581 => ( Parameter_Integer, 0 ),   --  : usspa1sp (Integer)
           4582 => ( Parameter_Integer, 0 ),   --  : usspa2sp (Integer)
           4583 => ( Parameter_Integer, 0 ),   --  : usspa3sp (Integer)
           4584 => ( Parameter_Float, 0.0 ),   --  : to2hr1hd (Amount)
           4585 => ( Parameter_Float, 0.0 ),   --  : to2hr2hd (Amount)
           4586 => ( Parameter_Integer, 0 ),   --  : to2hr3hd (Integer)
           4587 => ( Parameter_Float, 0.0 ),   --  : to2hr1sp (Amount)
           4588 => ( Parameter_Float, 0.0 ),   --  : to2hr2sp (Amount)
           4589 => ( Parameter_Integer, 0 ),   --  : to2hr3sp (Integer)
           4590 => ( Parameter_Float, 0.0 ),   --  : utaxa1hd (Amount)
           4591 => ( Parameter_Integer, 0 ),   --  : utaxa2hd (Integer)
           4592 => ( Parameter_Integer, 0 ),   --  : utaxa3hd (Integer)
           4593 => ( Parameter_Float, 0.0 ),   --  : utaxa1sp (Amount)
           4594 => ( Parameter_Integer, 0 ),   --  : utaxa2sp (Integer)
           4595 => ( Parameter_Integer, 0 ),   --  : utaxa3sp (Integer)
           4596 => ( Parameter_Float, 0.0 ),   --  : vcamt1hd (Amount)
           4597 => ( Parameter_Integer, 0 ),   --  : vcamt2hd (Integer)
           4598 => ( Parameter_Integer, 0 ),   --  : vcamt3hd (Integer)
           4599 => ( Parameter_Float, 0.0 ),   --  : vcamt1sp (Amount)
           4600 => ( Parameter_Integer, 0 ),   --  : vcamt2sp (Integer)
           4601 => ( Parameter_Integer, 0 ),   --  : vcamt3sp (Integer)
           4602 => ( Parameter_Integer, 0 ),   --  : vcpd1hd (Integer)
           4603 => ( Parameter_Integer, 0 ),   --  : vcpd2hd (Integer)
           4604 => ( Parameter_Integer, 0 ),   --  : vcpd3hd (Integer)
           4605 => ( Parameter_Integer, 0 ),   --  : vcpd1sp (Integer)
           4606 => ( Parameter_Integer, 0 ),   --  : vcpd2sp (Integer)
           4607 => ( Parameter_Integer, 0 ),   --  : vcpd3sp (Integer)
           4608 => ( Parameter_Integer, 0 ),   --  : vcsac1hd (Integer)
           4609 => ( Parameter_Integer, 0 ),   --  : vcsac2hd (Integer)
           4610 => ( Parameter_Integer, 0 ),   --  : vcsac3hd (Integer)
           4611 => ( Parameter_Integer, 0 ),   --  : vcsac1sp (Integer)
           4612 => ( Parameter_Integer, 0 ),   --  : vcsac2sp (Integer)
           4613 => ( Parameter_Integer, 0 ),   --  : vcsac3sp (Integer)
           4614 => ( Parameter_Integer, 0 ),   --  : vcuam1hd (Integer)
           4615 => ( Parameter_Integer, 0 ),   --  : vcuam2hd (Integer)
           4616 => ( Parameter_Integer, 0 ),   --  : vcuam3hd (Integer)
           4617 => ( Parameter_Integer, 0 ),   --  : vcuam1sp (Integer)
           4618 => ( Parameter_Integer, 0 ),   --  : vcuam2sp (Integer)
           4619 => ( Parameter_Integer, 0 ),   --  : vcuam3sp (Integer)
           4620 => ( Parameter_Integer, 0 ),   --  : vcupd1hd (Integer)
           4621 => ( Parameter_Integer, 0 ),   --  : vcupd2hd (Integer)
           4622 => ( Parameter_Integer, 0 ),   --  : vcupd3hd (Integer)
           4623 => ( Parameter_Integer, 0 ),   --  : vcupd1sp (Integer)
           4624 => ( Parameter_Integer, 0 ),   --  : vcupd2sp (Integer)
           4625 => ( Parameter_Integer, 0 ),   --  : vcupd3sp (Integer)
           4626 => ( Parameter_Integer, 0 ),   --  : vcusu1hd (Integer)
           4627 => ( Parameter_Integer, 0 ),   --  : vcusu2hd (Integer)
           4628 => ( Parameter_Integer, 0 ),   --  : vcusu3hd (Integer)
           4629 => ( Parameter_Integer, 0 ),   --  : vcusu1sp (Integer)
           4630 => ( Parameter_Integer, 0 ),   --  : vcusu2sp (Integer)
           4631 => ( Parameter_Integer, 0 ),   --  : vcusu3sp (Integer)
           4632 => ( Parameter_Integer, 0 ),   --  : nou011hd (Integer)
           4633 => ( Parameter_Integer, 0 ),   --  : nou012hd (Integer)
           4634 => ( Parameter_Integer, 0 ),   --  : nou013hd (Integer)
           4635 => ( Parameter_Integer, 0 ),   --  : nou011sp (Integer)
           4636 => ( Parameter_Integer, 0 ),   --  : nou012sp (Integer)
           4637 => ( Parameter_Integer, 0 ),   --  : nou013sp (Integer)
           4638 => ( Parameter_Integer, 0 ),   --  : nou021hd (Integer)
           4639 => ( Parameter_Integer, 0 ),   --  : nou022hd (Integer)
           4640 => ( Parameter_Integer, 0 ),   --  : nou023hd (Integer)
           4641 => ( Parameter_Integer, 0 ),   --  : nou021sp (Integer)
           4642 => ( Parameter_Integer, 0 ),   --  : nou022sp (Integer)
           4643 => ( Parameter_Integer, 0 ),   --  : nou023sp (Integer)
           4644 => ( Parameter_Integer, 0 ),   --  : nou031hd (Integer)
           4645 => ( Parameter_Integer, 0 ),   --  : nou032hd (Integer)
           4646 => ( Parameter_Integer, 0 ),   --  : nou033hd (Integer)
           4647 => ( Parameter_Integer, 0 ),   --  : nou031sp (Integer)
           4648 => ( Parameter_Integer, 0 ),   --  : nou032sp (Integer)
           4649 => ( Parameter_Integer, 0 ),   --  : nou033sp (Integer)
           4650 => ( Parameter_Integer, 0 ),   --  : nou041hd (Integer)
           4651 => ( Parameter_Integer, 0 ),   --  : nou042hd (Integer)
           4652 => ( Parameter_Integer, 0 ),   --  : nou043hd (Integer)
           4653 => ( Parameter_Integer, 0 ),   --  : nou041sp (Integer)
           4654 => ( Parameter_Integer, 0 ),   --  : nou042sp (Integer)
           4655 => ( Parameter_Integer, 0 ),   --  : nou043sp (Integer)
           4656 => ( Parameter_Integer, 0 ),   --  : nou051hd (Integer)
           4657 => ( Parameter_Integer, 0 ),   --  : nou052hd (Integer)
           4658 => ( Parameter_Integer, 0 ),   --  : nou053hd (Integer)
           4659 => ( Parameter_Integer, 0 ),   --  : nou051sp (Integer)
           4660 => ( Parameter_Integer, 0 ),   --  : nou052sp (Integer)
           4661 => ( Parameter_Integer, 0 ),   --  : nou053sp (Integer)
           4662 => ( Parameter_Integer, 0 ),   --  : nou061hd (Integer)
           4663 => ( Parameter_Integer, 0 ),   --  : nou062hd (Integer)
           4664 => ( Parameter_Integer, 0 ),   --  : nou063hd (Integer)
           4665 => ( Parameter_Integer, 0 ),   --  : nou061sp (Integer)
           4666 => ( Parameter_Integer, 0 ),   --  : nou062sp (Integer)
           4667 => ( Parameter_Integer, 0 ),   --  : nou063sp (Integer)
           4668 => ( Parameter_Integer, 0 ),   --  : nou071hd (Integer)
           4669 => ( Parameter_Integer, 0 ),   --  : nou072hd (Integer)
           4670 => ( Parameter_Integer, 0 ),   --  : nou073hd (Integer)
           4671 => ( Parameter_Integer, 0 ),   --  : nou071sp (Integer)
           4672 => ( Parameter_Integer, 0 ),   --  : nou072sp (Integer)
           4673 => ( Parameter_Integer, 0 ),   --  : nou073sp (Integer)
           4674 => ( Parameter_Integer, 0 ),   --  : nou081hd (Integer)
           4675 => ( Parameter_Integer, 0 ),   --  : nou082hd (Integer)
           4676 => ( Parameter_Integer, 0 ),   --  : nou083hd (Integer)
           4677 => ( Parameter_Integer, 0 ),   --  : nou081sp (Integer)
           4678 => ( Parameter_Integer, 0 ),   --  : nou082sp (Integer)
           4679 => ( Parameter_Integer, 0 ),   --  : nou083sp (Integer)
           4680 => ( Parameter_Integer, 0 ),   --  : nou091hd (Integer)
           4681 => ( Parameter_Integer, 0 ),   --  : nou092hd (Integer)
           4682 => ( Parameter_Integer, 0 ),   --  : nou093hd (Integer)
           4683 => ( Parameter_Integer, 0 ),   --  : nou091sp (Integer)
           4684 => ( Parameter_Integer, 0 ),   --  : nou092sp (Integer)
           4685 => ( Parameter_Integer, 0 ),   --  : nou093sp (Integer)
           4686 => ( Parameter_Integer, 0 ),   --  : nou101hd (Integer)
           4687 => ( Parameter_Integer, 0 ),   --  : nou102hd (Integer)
           4688 => ( Parameter_Integer, 0 ),   --  : nou103hd (Integer)
           4689 => ( Parameter_Integer, 0 ),   --  : nou101sp (Integer)
           4690 => ( Parameter_Integer, 0 ),   --  : nou102sp (Integer)
           4691 => ( Parameter_Integer, 0 ),   --  : nou103sp (Integer)
           4692 => ( Parameter_Integer, 0 ),   --  : nou111hd (Integer)
           4693 => ( Parameter_Integer, 0 ),   --  : nou112hd (Integer)
           4694 => ( Parameter_Integer, 0 ),   --  : nou113hd (Integer)
           4695 => ( Parameter_Integer, 0 ),   --  : nou111sp (Integer)
           4696 => ( Parameter_Integer, 0 ),   --  : nou112sp (Integer)
           4697 => ( Parameter_Integer, 0 ),   --  : nou113sp (Integer)
           4698 => ( Parameter_Integer, 0 ),   --  : nou121hd (Integer)
           4699 => ( Parameter_Integer, 0 ),   --  : nou122hd (Integer)
           4700 => ( Parameter_Integer, 0 ),   --  : nou123hd (Integer)
           4701 => ( Parameter_Integer, 0 ),   --  : nou121sp (Integer)
           4702 => ( Parameter_Integer, 0 ),   --  : nou122sp (Integer)
           4703 => ( Parameter_Integer, 0 ),   --  : nou123sp (Integer)
           4704 => ( Parameter_Integer, 0 ),   --  : nou131hd (Integer)
           4705 => ( Parameter_Integer, 0 ),   --  : nou132hd (Integer)
           4706 => ( Parameter_Integer, 0 ),   --  : nou133hd (Integer)
           4707 => ( Parameter_Integer, 0 ),   --  : nou131sp (Integer)
           4708 => ( Parameter_Integer, 0 ),   --  : nou132sp (Integer)
           4709 => ( Parameter_Integer, 0 ),   --  : nou133sp (Integer)
           4710 => ( Parameter_Integer, 0 ),   --  : nou141hd (Integer)
           4711 => ( Parameter_Integer, 0 ),   --  : nou142hd (Integer)
           4712 => ( Parameter_Integer, 0 ),   --  : nou143hd (Integer)
           4713 => ( Parameter_Integer, 0 ),   --  : nou141sp (Integer)
           4714 => ( Parameter_Integer, 0 ),   --  : nou142sp (Integer)
           4715 => ( Parameter_Integer, 0 ),   --  : nou143sp (Integer)
           4716 => ( Parameter_Integer, 0 ),   --  : worka1hd (Integer)
           4717 => ( Parameter_Integer, 0 ),   --  : worka2hd (Integer)
           4718 => ( Parameter_Integer, 0 ),   --  : worka3hd (Integer)
           4719 => ( Parameter_Integer, 0 ),   --  : worka1sp (Integer)
           4720 => ( Parameter_Integer, 0 ),   --  : worka2sp (Integer)
           4721 => ( Parameter_Integer, 0 ),   --  : worka3sp (Integer)
           4722 => ( Parameter_Integer, 0 ),   --  : workm1hd (Integer)
           4723 => ( Parameter_Integer, 0 ),   --  : workm2hd (Integer)
           4724 => ( Parameter_Integer, 0 ),   --  : workm3hd (Integer)
           4725 => ( Parameter_Integer, 0 ),   --  : workm1sp (Integer)
           4726 => ( Parameter_Integer, 0 ),   --  : workm2sp (Integer)
           4727 => ( Parameter_Integer, 0 ),   --  : workm3sp (Integer)
           4728 => ( Parameter_Integer, 0 ),   --  : worky1hd (Integer)
           4729 => ( Parameter_Integer, 0 ),   --  : worky2hd (Integer)
           4730 => ( Parameter_Integer, 0 ),   --  : worky3hd (Integer)
           4731 => ( Parameter_Integer, 0 ),   --  : worky1sp (Integer)
           4732 => ( Parameter_Integer, 0 ),   --  : worky2sp (Integer)
           4733 => ( Parameter_Integer, 0 ),   --  : worky3sp (Integer)
           4734 => ( Parameter_Integer, 0 ),   --  : yjchg1hd (Integer)
           4735 => ( Parameter_Integer, 0 ),   --  : yjchg2hd (Integer)
           4736 => ( Parameter_Integer, 0 ),   --  : yjchg3hd (Integer)
           4737 => ( Parameter_Integer, 0 ),   --  : yjchg1sp (Integer)
           4738 => ( Parameter_Integer, 0 ),   --  : yjchg2sp (Integer)
           4739 => ( Parameter_Integer, 0 ),   --  : yjchg3sp (Integer)
           4740 => ( Parameter_Float, 0.0 ),   --  : mp1hd (Amount)
           4741 => ( Parameter_Float, 0.0 ),   --  : mp2hd (Amount)
           4742 => ( Parameter_Float, 0.0 ),   --  : mp3hd (Amount)
           4743 => ( Parameter_Float, 0.0 ),   --  : mp1sp (Amount)
           4744 => ( Parameter_Float, 0.0 ),   --  : mp2sp (Amount)
           4745 => ( Parameter_Integer, 0 ),   --  : mp3sp (Integer)
           4746 => ( Parameter_Integer, 0 ),   --  : mrar11hd (Integer)
           4747 => ( Parameter_Integer, 0 ),   --  : mrar12hd (Integer)
           4748 => ( Parameter_Integer, 0 ),   --  : mrar13hd (Integer)
           4749 => ( Parameter_Integer, 0 ),   --  : mrar11sp (Integer)
           4750 => ( Parameter_Integer, 0 ),   --  : mrar12sp (Integer)
           4751 => ( Parameter_Integer, 0 ),   --  : mrar13sp (Integer)
           4752 => ( Parameter_Integer, 0 ),   --  : mrar21hd (Integer)
           4753 => ( Parameter_Integer, 0 ),   --  : mrar22hd (Integer)
           4754 => ( Parameter_Integer, 0 ),   --  : mrar23hd (Integer)
           4755 => ( Parameter_Integer, 0 ),   --  : mrar21sp (Integer)
           4756 => ( Parameter_Integer, 0 ),   --  : mrar22sp (Integer)
           4757 => ( Parameter_Integer, 0 ),   --  : mrar23sp (Integer)
           4758 => ( Parameter_Integer, 0 ),   --  : mrar31hd (Integer)
           4759 => ( Parameter_Integer, 0 ),   --  : mrar32hd (Integer)
           4760 => ( Parameter_Integer, 0 ),   --  : mrar33hd (Integer)
           4761 => ( Parameter_Integer, 0 ),   --  : mrar31sp (Integer)
           4762 => ( Parameter_Integer, 0 ),   --  : mrar32sp (Integer)
           4763 => ( Parameter_Integer, 0 ),   --  : mrar33sp (Integer)
           4764 => ( Parameter_Integer, 0 ),   --  : mrar41hd (Integer)
           4765 => ( Parameter_Integer, 0 ),   --  : mrar42hd (Integer)
           4766 => ( Parameter_Integer, 0 ),   --  : mrar43hd (Integer)
           4767 => ( Parameter_Integer, 0 ),   --  : mrar41sp (Integer)
           4768 => ( Parameter_Integer, 0 ),   --  : mrar42sp (Integer)
           4769 => ( Parameter_Integer, 0 ),   --  : mrar43sp (Integer)
           4770 => ( Parameter_Integer, 0 ),   --  : mrar51hd (Integer)
           4771 => ( Parameter_Integer, 0 ),   --  : mrar52hd (Integer)
           4772 => ( Parameter_Integer, 0 ),   --  : mrar53hd (Integer)
           4773 => ( Parameter_Integer, 0 ),   --  : mrar51sp (Integer)
           4774 => ( Parameter_Integer, 0 ),   --  : mrar52sp (Integer)
           4775 => ( Parameter_Integer, 0 ),   --  : mrar53sp (Integer)
           4776 => ( Parameter_Integer, 0 ),   --  : mpnch1hd (Integer)
           4777 => ( Parameter_Integer, 0 ),   --  : mpnch2hd (Integer)
           4778 => ( Parameter_Integer, 0 ),   --  : mpnch3hd (Integer)
           4779 => ( Parameter_Integer, 0 ),   --  : mpnch1sp (Integer)
           4780 => ( Parameter_Integer, 0 ),   --  : mpnch2sp (Integer)
           4781 => ( Parameter_Integer, 0 ),   --  : mpnch3sp (Integer)
           4782 => ( Parameter_Integer, 0 ),   --  : pmp1hd (Integer)
           4783 => ( Parameter_Integer, 0 ),   --  : pmp2hd (Integer)
           4784 => ( Parameter_Integer, 0 ),   --  : pmp3hd (Integer)
           4785 => ( Parameter_Integer, 0 ),   --  : pmp1sp (Integer)
           4786 => ( Parameter_Integer, 0 ),   --  : pmp2sp (Integer)
           4787 => ( Parameter_Integer, 0 ),   --  : pmp3sp (Integer)
           4788 => ( Parameter_Float, 0.0 ),   --  : ump1hd (Amount)
           4789 => ( Parameter_Float, 0.0 ),   --  : ump2hd (Amount)
           4790 => ( Parameter_Integer, 0 ),   --  : ump3hd (Integer)
           4791 => ( Parameter_Float, 0.0 ),   --  : ump1sp (Amount)
           4792 => ( Parameter_Integer, 0 ),   --  : ump2sp (Integer)
           4793 => ( Parameter_Integer, 0 ),   --  : ump3sp (Integer)
           4794 => ( Parameter_Integer, 0 ),   --  : pump1hd (Integer)
           4795 => ( Parameter_Integer, 0 ),   --  : pump2hd (Integer)
           4796 => ( Parameter_Integer, 0 ),   --  : pump3hd (Integer)
           4797 => ( Parameter_Integer, 0 ),   --  : pump1sp (Integer)
           4798 => ( Parameter_Integer, 0 ),   --  : pump2sp (Integer)
           4799 => ( Parameter_Integer, 0 ),   --  : pump3sp (Integer)
           4800 => ( Parameter_Integer, 0 ),   --  : isump1hd (Integer)
           4801 => ( Parameter_Integer, 0 ),   --  : isump2hd (Integer)
           4802 => ( Parameter_Integer, 0 ),   --  : isump3hd (Integer)
           4803 => ( Parameter_Integer, 0 ),   --  : isump1sp (Integer)
           4804 => ( Parameter_Integer, 0 ),   --  : isump2sp (Integer)
           4805 => ( Parameter_Integer, 0 ),   --  : isump3sp (Integer)
           4806 => ( Parameter_Integer, 0 ),   --  : jobst1hd (Integer)
           4807 => ( Parameter_Integer, 0 ),   --  : jobst2hd (Integer)
           4808 => ( Parameter_Integer, 0 ),   --  : jobst1sp (Integer)
           4809 => ( Parameter_Integer, 0 ),   --  : jobst2sp (Integer)
           4810 => ( Parameter_Integer, 0 ),   --  : oddtp1hd (Integer)
           4811 => ( Parameter_Integer, 0 ),   --  : oddtp2hd (Integer)
           4812 => ( Parameter_Integer, 0 ),   --  : oddtp1sp (Integer)
           4813 => ( Parameter_Integer, 0 ),   --  : oddtp2sp (Integer)
           4814 => ( Parameter_Float, 0.0 ),   --  : oddjb1hd (Amount)
           4815 => ( Parameter_Float, 0.0 ),   --  : oddjb2hd (Amount)
           4816 => ( Parameter_Float, 0.0 ),   --  : oddjb1sp (Amount)
           4817 => ( Parameter_Integer, 0 ),   --  : oddjb2sp (Integer)
           4818 => ( Parameter_Integer, 0 ),   --  : oddjn1hd (Integer)
           4819 => ( Parameter_Integer, 0 ),   --  : oddjn2hd (Integer)
           4820 => ( Parameter_Integer, 0 ),   --  : oddjn1sp (Integer)
           4821 => ( Parameter_Integer, 0 ),   --  : oddjn2sp (Integer)
           4822 => ( Parameter_Integer, 0 ),   --  : poth1hd (Integer)
           4823 => ( Parameter_Integer, 0 ),   --  : poth2hd (Integer)
           4824 => ( Parameter_Integer, 0 ),   --  : poth3hd (Integer)
           4825 => ( Parameter_Integer, 0 ),   --  : poth4hd (Integer)
           4826 => ( Parameter_Integer, 0 ),   --  : poth5hd (Integer)
           4827 => ( Parameter_Integer, 0 ),   --  : poth6hd (Integer)
           4828 => ( Parameter_Integer, 0 ),   --  : poth7hd (Integer)
           4829 => ( Parameter_Integer, 0 ),   --  : poth8hd (Integer)
           4830 => ( Parameter_Integer, 0 ),   --  : poth9hd (Integer)
           4831 => ( Parameter_Integer, 0 ),   --  : poth10hd (Integer)
           4832 => ( Parameter_Integer, 0 ),   --  : poth11hd (Integer)
           4833 => ( Parameter_Integer, 0 ),   --  : poth12hd (Integer)
           4834 => ( Parameter_Integer, 0 ),   --  : poth13hd (Integer)
           4835 => ( Parameter_Integer, 0 ),   --  : poth14hd (Integer)
           4836 => ( Parameter_Integer, 0 ),   --  : poth15hd (Integer)
           4837 => ( Parameter_Integer, 0 ),   --  : poth16hd (Integer)
           4838 => ( Parameter_Integer, 0 ),   --  : poth17hd (Integer)
           4839 => ( Parameter_Integer, 0 ),   --  : poth18hd (Integer)
           4840 => ( Parameter_Integer, 0 ),   --  : poth19hd (Integer)
           4841 => ( Parameter_Integer, 0 ),   --  : poth1sp (Integer)
           4842 => ( Parameter_Integer, 0 ),   --  : poth2sp (Integer)
           4843 => ( Parameter_Integer, 0 ),   --  : poth3sp (Integer)
           4844 => ( Parameter_Integer, 0 ),   --  : poth4sp (Integer)
           4845 => ( Parameter_Integer, 0 ),   --  : poth5sp (Integer)
           4846 => ( Parameter_Integer, 0 ),   --  : poth6sp (Integer)
           4847 => ( Parameter_Integer, 0 ),   --  : poth7sp (Integer)
           4848 => ( Parameter_Integer, 0 ),   --  : poth8sp (Integer)
           4849 => ( Parameter_Integer, 0 ),   --  : poth9sp (Integer)
           4850 => ( Parameter_Integer, 0 ),   --  : poth10sp (Integer)
           4851 => ( Parameter_Integer, 0 ),   --  : poth11sp (Integer)
           4852 => ( Parameter_Integer, 0 ),   --  : poth12sp (Integer)
           4853 => ( Parameter_Integer, 0 ),   --  : poth13sp (Integer)
           4854 => ( Parameter_Integer, 0 ),   --  : poth14sp (Integer)
           4855 => ( Parameter_Integer, 0 ),   --  : poth15sp (Integer)
           4856 => ( Parameter_Integer, 0 ),   --  : poth16sp (Integer)
           4857 => ( Parameter_Integer, 0 ),   --  : poth17sp (Integer)
           4858 => ( Parameter_Integer, 0 ),   --  : poth18sp (Integer)
           4859 => ( Parameter_Integer, 0 ),   --  : poth19sp (Integer)
           4860 => ( Parameter_Float, 0.0 ),   --  : ocpen1hd (Amount)
           4861 => ( Parameter_Float, 0.0 ),   --  : ocpen2hd (Amount)
           4862 => ( Parameter_Float, 0.0 ),   --  : ocpen3hd (Amount)
           4863 => ( Parameter_Float, 0.0 ),   --  : ocpen4hd (Amount)
           4864 => ( Parameter_Float, 0.0 ),   --  : wpen1hd (Amount)
           4865 => ( Parameter_Float, 0.0 ),   --  : wpen2hd (Amount)
           4866 => ( Parameter_Float, 0.0 ),   --  : wpen3hd (Amount)
           4867 => ( Parameter_Float, 0.0 ),   --  : ppen1hd (Amount)
           4868 => ( Parameter_Float, 0.0 ),   --  : ppen2hd (Amount)
           4869 => ( Parameter_Float, 0.0 ),   --  : ppen3hd (Amount)
           4870 => ( Parameter_Float, 0.0 ),   --  : tupen1hd (Amount)
           4871 => ( Parameter_Integer, 0 ),   --  : tupen2hd (Integer)
           4872 => ( Parameter_Float, 0.0 ),   --  : anpen1hd (Amount)
           4873 => ( Parameter_Float, 0.0 ),   --  : anpen2hd (Amount)
           4874 => ( Parameter_Integer, 0 ),   --  : anpen3hd (Integer)
           4875 => ( Parameter_Float, 0.0 ),   --  : trust1hd (Amount)
           4876 => ( Parameter_Integer, 0 ),   --  : trust2hd (Integer)
           4877 => ( Parameter_Float, 0.0 ),   --  : expen1hd (Amount)
           4878 => ( Parameter_Integer, 0 ),   --  : expen2hd (Integer)
           4879 => ( Parameter_Float, 0.0 ),   --  : ocpen1sp (Amount)
           4880 => ( Parameter_Float, 0.0 ),   --  : ocpen2sp (Amount)
           4881 => ( Parameter_Float, 0.0 ),   --  : ocpen3sp (Amount)
           4882 => ( Parameter_Float, 0.0 ),   --  : ocpen4sp (Amount)
           4883 => ( Parameter_Float, 0.0 ),   --  : wpen1sp (Amount)
           4884 => ( Parameter_Integer, 0 ),   --  : wpen2sp (Integer)
           4885 => ( Parameter_Integer, 0 ),   --  : wpen3sp (Integer)
           4886 => ( Parameter_Float, 0.0 ),   --  : ppen1sp (Amount)
           4887 => ( Parameter_Float, 0.0 ),   --  : ppen2sp (Amount)
           4888 => ( Parameter_Float, 0.0 ),   --  : ppen3sp (Amount)
           4889 => ( Parameter_Float, 0.0 ),   --  : tupen1sp (Amount)
           4890 => ( Parameter_Integer, 0 ),   --  : tupen2sp (Integer)
           4891 => ( Parameter_Float, 0.0 ),   --  : anpen1sp (Amount)
           4892 => ( Parameter_Float, 0.0 ),   --  : anpen2sp (Amount)
           4893 => ( Parameter_Integer, 0 ),   --  : anpen3sp (Integer)
           4894 => ( Parameter_Float, 0.0 ),   --  : trust1sp (Amount)
           4895 => ( Parameter_Integer, 0 ),   --  : trust2sp (Integer)
           4896 => ( Parameter_Float, 0.0 ),   --  : expen1sp (Amount)
           4897 => ( Parameter_Integer, 0 ),   --  : expen2sp (Integer)
           4898 => ( Parameter_Integer, 0 ),   --  : pcpen1hd (Integer)
           4899 => ( Parameter_Integer, 0 ),   --  : pcpen2hd (Integer)
           4900 => ( Parameter_Integer, 0 ),   --  : pcpen3hd (Integer)
           4901 => ( Parameter_Integer, 0 ),   --  : pcpen4hd (Integer)
           4902 => ( Parameter_Integer, 0 ),   --  : pwpen1hd (Integer)
           4903 => ( Parameter_Integer, 0 ),   --  : pwpen2hd (Integer)
           4904 => ( Parameter_Integer, 0 ),   --  : pwpen3hd (Integer)
           4905 => ( Parameter_Integer, 0 ),   --  : pppen1hd (Integer)
           4906 => ( Parameter_Integer, 0 ),   --  : pppen2hd (Integer)
           4907 => ( Parameter_Integer, 0 ),   --  : pppen3hd (Integer)
           4908 => ( Parameter_Integer, 0 ),   --  : ptupn1hd (Integer)
           4909 => ( Parameter_Integer, 0 ),   --  : ptupn2hd (Integer)
           4910 => ( Parameter_Integer, 0 ),   --  : panpn1hd (Integer)
           4911 => ( Parameter_Integer, 0 ),   --  : panpn2hd (Integer)
           4912 => ( Parameter_Integer, 0 ),   --  : panpn3hd (Integer)
           4913 => ( Parameter_Integer, 0 ),   --  : ptrst1hd (Integer)
           4914 => ( Parameter_Integer, 0 ),   --  : ptrst2hd (Integer)
           4915 => ( Parameter_Integer, 0 ),   --  : pxpen1hd (Integer)
           4916 => ( Parameter_Integer, 0 ),   --  : pxpen2hd (Integer)
           4917 => ( Parameter_Integer, 0 ),   --  : pcpen1sp (Integer)
           4918 => ( Parameter_Integer, 0 ),   --  : pcpen2sp (Integer)
           4919 => ( Parameter_Integer, 0 ),   --  : pcpen3sp (Integer)
           4920 => ( Parameter_Integer, 0 ),   --  : pcpen4sp (Integer)
           4921 => ( Parameter_Integer, 0 ),   --  : pwpen1sp (Integer)
           4922 => ( Parameter_Integer, 0 ),   --  : pwpen2sp (Integer)
           4923 => ( Parameter_Integer, 0 ),   --  : pwpen3sp (Integer)
           4924 => ( Parameter_Integer, 0 ),   --  : pppen1sp (Integer)
           4925 => ( Parameter_Integer, 0 ),   --  : pppen2sp (Integer)
           4926 => ( Parameter_Integer, 0 ),   --  : pppen3sp (Integer)
           4927 => ( Parameter_Integer, 0 ),   --  : ptupn1sp (Integer)
           4928 => ( Parameter_Integer, 0 ),   --  : ptupn2sp (Integer)
           4929 => ( Parameter_Integer, 0 ),   --  : panpn1sp (Integer)
           4930 => ( Parameter_Integer, 0 ),   --  : panpn2sp (Integer)
           4931 => ( Parameter_Integer, 0 ),   --  : panpn3sp (Integer)
           4932 => ( Parameter_Integer, 0 ),   --  : ptrst1sp (Integer)
           4933 => ( Parameter_Integer, 0 ),   --  : ptrst2sp (Integer)
           4934 => ( Parameter_Integer, 0 ),   --  : pxpen1sp (Integer)
           4935 => ( Parameter_Integer, 0 ),   --  : pxpen2sp (Integer)
           4936 => ( Parameter_Integer, 0 ),   --  : ocptd1hd (Integer)
           4937 => ( Parameter_Integer, 0 ),   --  : ocptd2hd (Integer)
           4938 => ( Parameter_Integer, 0 ),   --  : ocptd3hd (Integer)
           4939 => ( Parameter_Integer, 0 ),   --  : ocptd4hd (Integer)
           4940 => ( Parameter_Integer, 0 ),   --  : wpptd1hd (Integer)
           4941 => ( Parameter_Integer, 0 ),   --  : wpptd2hd (Integer)
           4942 => ( Parameter_Integer, 0 ),   --  : wpptd3hd (Integer)
           4943 => ( Parameter_Integer, 0 ),   --  : ppetd1hd (Integer)
           4944 => ( Parameter_Integer, 0 ),   --  : ppetd2hd (Integer)
           4945 => ( Parameter_Integer, 0 ),   --  : ppetd3hd (Integer)
           4946 => ( Parameter_Integer, 0 ),   --  : tuptd1hd (Integer)
           4947 => ( Parameter_Integer, 0 ),   --  : tuptd2hd (Integer)
           4948 => ( Parameter_Integer, 0 ),   --  : aptd1hd (Integer)
           4949 => ( Parameter_Integer, 0 ),   --  : aptd2hd (Integer)
           4950 => ( Parameter_Integer, 0 ),   --  : aptd3hd (Integer)
           4951 => ( Parameter_Integer, 0 ),   --  : trutd1hd (Integer)
           4952 => ( Parameter_Integer, 0 ),   --  : trutd2hd (Integer)
           4953 => ( Parameter_Integer, 0 ),   --  : exptd1hd (Integer)
           4954 => ( Parameter_Integer, 0 ),   --  : exptd2hd (Integer)
           4955 => ( Parameter_Integer, 0 ),   --  : ocptd1sp (Integer)
           4956 => ( Parameter_Integer, 0 ),   --  : ocptd2sp (Integer)
           4957 => ( Parameter_Integer, 0 ),   --  : ocptd3sp (Integer)
           4958 => ( Parameter_Integer, 0 ),   --  : ocptd4sp (Integer)
           4959 => ( Parameter_Integer, 0 ),   --  : wpptd1sp (Integer)
           4960 => ( Parameter_Integer, 0 ),   --  : wpptd2sp (Integer)
           4961 => ( Parameter_Integer, 0 ),   --  : wpptd3sp (Integer)
           4962 => ( Parameter_Integer, 0 ),   --  : ppetd1sp (Integer)
           4963 => ( Parameter_Integer, 0 ),   --  : ppetd2sp (Integer)
           4964 => ( Parameter_Integer, 0 ),   --  : ppetd3sp (Integer)
           4965 => ( Parameter_Integer, 0 ),   --  : tuptd1sp (Integer)
           4966 => ( Parameter_Integer, 0 ),   --  : tuptd2sp (Integer)
           4967 => ( Parameter_Integer, 0 ),   --  : aptd1sp (Integer)
           4968 => ( Parameter_Integer, 0 ),   --  : aptd2sp (Integer)
           4969 => ( Parameter_Integer, 0 ),   --  : aptd3sp (Integer)
           4970 => ( Parameter_Integer, 0 ),   --  : trutd1sp (Integer)
           4971 => ( Parameter_Integer, 0 ),   --  : trutd2sp (Integer)
           4972 => ( Parameter_Integer, 0 ),   --  : exptd1sp (Integer)
           4973 => ( Parameter_Integer, 0 ),   --  : exptd2sp (Integer)
           4974 => ( Parameter_Integer, 0 ),   --  : ocpid1hd (Integer)
           4975 => ( Parameter_Integer, 0 ),   --  : ocpid2hd (Integer)
           4976 => ( Parameter_Integer, 0 ),   --  : ocpid3hd (Integer)
           4977 => ( Parameter_Integer, 0 ),   --  : ocpid4hd (Integer)
           4978 => ( Parameter_Integer, 0 ),   --  : wwpid1hd (Integer)
           4979 => ( Parameter_Integer, 0 ),   --  : wwpid2hd (Integer)
           4980 => ( Parameter_Integer, 0 ),   --  : wwpid3hd (Integer)
           4981 => ( Parameter_Integer, 0 ),   --  : ppeid1hd (Integer)
           4982 => ( Parameter_Integer, 0 ),   --  : ppeid2hd (Integer)
           4983 => ( Parameter_Integer, 0 ),   --  : ppeid3hd (Integer)
           4984 => ( Parameter_Integer, 0 ),   --  : tupid1hd (Integer)
           4985 => ( Parameter_Integer, 0 ),   --  : tupid2hd (Integer)
           4986 => ( Parameter_Integer, 0 ),   --  : apid1hd (Integer)
           4987 => ( Parameter_Integer, 0 ),   --  : apid2hd (Integer)
           4988 => ( Parameter_Integer, 0 ),   --  : apid3hd (Integer)
           4989 => ( Parameter_Integer, 0 ),   --  : truid1hd (Integer)
           4990 => ( Parameter_Integer, 0 ),   --  : truid2hd (Integer)
           4991 => ( Parameter_Integer, 0 ),   --  : expid1hd (Integer)
           4992 => ( Parameter_Integer, 0 ),   --  : expid2hd (Integer)
           4993 => ( Parameter_Integer, 0 ),   --  : ocpid1sp (Integer)
           4994 => ( Parameter_Integer, 0 ),   --  : ocpid2sp (Integer)
           4995 => ( Parameter_Integer, 0 ),   --  : ocpid3sp (Integer)
           4996 => ( Parameter_Integer, 0 ),   --  : ocpid4sp (Integer)
           4997 => ( Parameter_Integer, 0 ),   --  : wwpid1sp (Integer)
           4998 => ( Parameter_Integer, 0 ),   --  : wwpid2sp (Integer)
           4999 => ( Parameter_Integer, 0 ),   --  : wwpid3sp (Integer)
           5000 => ( Parameter_Integer, 0 ),   --  : ppeid1sp (Integer)
           5001 => ( Parameter_Integer, 0 ),   --  : ppeid2sp (Integer)
           5002 => ( Parameter_Integer, 0 ),   --  : ppeid3sp (Integer)
           5003 => ( Parameter_Integer, 0 ),   --  : tupid1sp (Integer)
           5004 => ( Parameter_Integer, 0 ),   --  : tupid2sp (Integer)
           5005 => ( Parameter_Integer, 0 ),   --  : apid1sp (Integer)
           5006 => ( Parameter_Integer, 0 ),   --  : apid2sp (Integer)
           5007 => ( Parameter_Integer, 0 ),   --  : apid3sp (Integer)
           5008 => ( Parameter_Integer, 0 ),   --  : truid1sp (Integer)
           5009 => ( Parameter_Integer, 0 ),   --  : truid2sp (Integer)
           5010 => ( Parameter_Integer, 0 ),   --  : expid1sp (Integer)
           5011 => ( Parameter_Integer, 0 ),   --  : expid2sp (Integer)
           5012 => ( Parameter_Integer, 0 ),   --  : ocptx1hd (Integer)
           5013 => ( Parameter_Integer, 0 ),   --  : ocptx2hd (Integer)
           5014 => ( Parameter_Integer, 0 ),   --  : ocptx3hd (Integer)
           5015 => ( Parameter_Integer, 0 ),   --  : ocptx4hd (Integer)
           5016 => ( Parameter_Integer, 0 ),   --  : wptx1hd (Integer)
           5017 => ( Parameter_Integer, 0 ),   --  : wpptx2hd (Integer)
           5018 => ( Parameter_Integer, 0 ),   --  : wpptx3hd (Integer)
           5019 => ( Parameter_Integer, 0 ),   --  : ppetx1hd (Integer)
           5020 => ( Parameter_Integer, 0 ),   --  : ppetx2hd (Integer)
           5021 => ( Parameter_Integer, 0 ),   --  : ppetx3hd (Integer)
           5022 => ( Parameter_Integer, 0 ),   --  : tuptx1hd (Integer)
           5023 => ( Parameter_Integer, 0 ),   --  : tuptx2hd (Integer)
           5024 => ( Parameter_Integer, 0 ),   --  : aptx1hd (Integer)
           5025 => ( Parameter_Integer, 0 ),   --  : aptx2hd (Integer)
           5026 => ( Parameter_Integer, 0 ),   --  : aptx3hd (Integer)
           5027 => ( Parameter_Integer, 0 ),   --  : ttrtx1hd (Integer)
           5028 => ( Parameter_Integer, 0 ),   --  : ttrtx2hd (Integer)
           5029 => ( Parameter_Integer, 0 ),   --  : exptx1hd (Integer)
           5030 => ( Parameter_Integer, 0 ),   --  : exptx2hd (Integer)
           5031 => ( Parameter_Integer, 0 ),   --  : ocptx1sp (Integer)
           5032 => ( Parameter_Integer, 0 ),   --  : ocptx2sp (Integer)
           5033 => ( Parameter_Integer, 0 ),   --  : ocptx3sp (Integer)
           5034 => ( Parameter_Integer, 0 ),   --  : ocptx4sp (Integer)
           5035 => ( Parameter_Integer, 0 ),   --  : wptx1sp (Integer)
           5036 => ( Parameter_Integer, 0 ),   --  : wpptx2sp (Integer)
           5037 => ( Parameter_Integer, 0 ),   --  : wpptx3sp (Integer)
           5038 => ( Parameter_Integer, 0 ),   --  : ppetx1sp (Integer)
           5039 => ( Parameter_Integer, 0 ),   --  : ppetx2sp (Integer)
           5040 => ( Parameter_Integer, 0 ),   --  : ppetx3sp (Integer)
           5041 => ( Parameter_Integer, 0 ),   --  : tuptx1sp (Integer)
           5042 => ( Parameter_Integer, 0 ),   --  : tuptx2sp (Integer)
           5043 => ( Parameter_Integer, 0 ),   --  : aptx1sp (Integer)
           5044 => ( Parameter_Integer, 0 ),   --  : aptx2sp (Integer)
           5045 => ( Parameter_Integer, 0 ),   --  : aptx3sp (Integer)
           5046 => ( Parameter_Integer, 0 ),   --  : ttrtx1sp (Integer)
           5047 => ( Parameter_Integer, 0 ),   --  : ttrtx2sp (Integer)
           5048 => ( Parameter_Integer, 0 ),   --  : exptx1sp (Integer)
           5049 => ( Parameter_Integer, 0 ),   --  : exptx2sp (Integer)
           5050 => ( Parameter_Float, 0.0 ),   --  : ocpoa1hd (Amount)
           5051 => ( Parameter_Float, 0.0 ),   --  : ocpoa2hd (Amount)
           5052 => ( Parameter_Integer, 0 ),   --  : ocpoa3hd (Integer)
           5053 => ( Parameter_Integer, 0 ),   --  : ocpoa4hd (Integer)
           5054 => ( Parameter_Float, 0.0 ),   --  : wpoa1hd (Amount)
           5055 => ( Parameter_Integer, 0 ),   --  : wwpoa2hd (Integer)
           5056 => ( Parameter_Integer, 0 ),   --  : wwpoa3hd (Integer)
           5057 => ( Parameter_Integer, 0 ),   --  : ppeoa1hd (Integer)
           5058 => ( Parameter_Integer, 0 ),   --  : ppeoa2hd (Integer)
           5059 => ( Parameter_Integer, 0 ),   --  : ppeoa3hd (Integer)
           5060 => ( Parameter_Integer, 0 ),   --  : tupoa1hd (Integer)
           5061 => ( Parameter_Integer, 0 ),   --  : tupoa2hd (Integer)
           5062 => ( Parameter_Integer, 0 ),   --  : apoa1hd (Integer)
           5063 => ( Parameter_Integer, 0 ),   --  : apoa2hd (Integer)
           5064 => ( Parameter_Integer, 0 ),   --  : apoa3hd (Integer)
           5065 => ( Parameter_Integer, 0 ),   --  : truoa1hd (Integer)
           5066 => ( Parameter_Integer, 0 ),   --  : truoa2hd (Integer)
           5067 => ( Parameter_Integer, 0 ),   --  : expoa1hd (Integer)
           5068 => ( Parameter_Integer, 0 ),   --  : expoa2hd (Integer)
           5069 => ( Parameter_Float, 0.0 ),   --  : ocpoa1sp (Amount)
           5070 => ( Parameter_Integer, 0 ),   --  : ocpoa2sp (Integer)
           5071 => ( Parameter_Integer, 0 ),   --  : ocpoa3sp (Integer)
           5072 => ( Parameter_Integer, 0 ),   --  : ocpoa4sp (Integer)
           5073 => ( Parameter_Float, 0.0 ),   --  : wpoa1sp (Amount)
           5074 => ( Parameter_Integer, 0 ),   --  : wwpoa2sp (Integer)
           5075 => ( Parameter_Integer, 0 ),   --  : wwpoa3sp (Integer)
           5076 => ( Parameter_Integer, 0 ),   --  : ppeoa1sp (Integer)
           5077 => ( Parameter_Integer, 0 ),   --  : ppeoa2sp (Integer)
           5078 => ( Parameter_Integer, 0 ),   --  : ppeoa3sp (Integer)
           5079 => ( Parameter_Integer, 0 ),   --  : tupoa1sp (Integer)
           5080 => ( Parameter_Integer, 0 ),   --  : tupoa2sp (Integer)
           5081 => ( Parameter_Integer, 0 ),   --  : apoa1sp (Integer)
           5082 => ( Parameter_Integer, 0 ),   --  : apoa2sp (Integer)
           5083 => ( Parameter_Integer, 0 ),   --  : apoa3sp (Integer)
           5084 => ( Parameter_Integer, 0 ),   --  : truoa1sp (Integer)
           5085 => ( Parameter_Integer, 0 ),   --  : truoa2sp (Integer)
           5086 => ( Parameter_Integer, 0 ),   --  : expoa1sp (Integer)
           5087 => ( Parameter_Integer, 0 ),   --  : expoa2sp (Integer)
           5088 => ( Parameter_Integer, 0 ),   --  : ocpoi1hd (Integer)
           5089 => ( Parameter_Integer, 0 ),   --  : ocpoi2hd (Integer)
           5090 => ( Parameter_Integer, 0 ),   --  : ocpoi3hd (Integer)
           5091 => ( Parameter_Integer, 0 ),   --  : ocpoi4hd (Integer)
           5092 => ( Parameter_Integer, 0 ),   --  : wpoi1hd (Integer)
           5093 => ( Parameter_Integer, 0 ),   --  : wwpoi2hd (Integer)
           5094 => ( Parameter_Integer, 0 ),   --  : wwpoi3hd (Integer)
           5095 => ( Parameter_Integer, 0 ),   --  : ppeoi1hd (Integer)
           5096 => ( Parameter_Integer, 0 ),   --  : ppeoi2hd (Integer)
           5097 => ( Parameter_Integer, 0 ),   --  : ppeoi3hd (Integer)
           5098 => ( Parameter_Integer, 0 ),   --  : tupoi1hd (Integer)
           5099 => ( Parameter_Integer, 0 ),   --  : tupoi2hd (Integer)
           5100 => ( Parameter_Integer, 0 ),   --  : apoi1hd (Integer)
           5101 => ( Parameter_Integer, 0 ),   --  : apoi2hd (Integer)
           5102 => ( Parameter_Integer, 0 ),   --  : apoi3hd (Integer)
           5103 => ( Parameter_Integer, 0 ),   --  : truoi1hd (Integer)
           5104 => ( Parameter_Integer, 0 ),   --  : truoi2hd (Integer)
           5105 => ( Parameter_Integer, 0 ),   --  : expoi1hd (Integer)
           5106 => ( Parameter_Integer, 0 ),   --  : expoi2hd (Integer)
           5107 => ( Parameter_Integer, 0 ),   --  : ocpoi1sp (Integer)
           5108 => ( Parameter_Integer, 0 ),   --  : ocpoi2sp (Integer)
           5109 => ( Parameter_Integer, 0 ),   --  : ocpoi3sp (Integer)
           5110 => ( Parameter_Integer, 0 ),   --  : ocpoi4sp (Integer)
           5111 => ( Parameter_Integer, 0 ),   --  : wpoi1sp (Integer)
           5112 => ( Parameter_Integer, 0 ),   --  : wwpoi2sp (Integer)
           5113 => ( Parameter_Integer, 0 ),   --  : wwpoi3sp (Integer)
           5114 => ( Parameter_Integer, 0 ),   --  : ppeoi1sp (Integer)
           5115 => ( Parameter_Integer, 0 ),   --  : ppeoi2sp (Integer)
           5116 => ( Parameter_Integer, 0 ),   --  : ppeoi3sp (Integer)
           5117 => ( Parameter_Integer, 0 ),   --  : tupoi1sp (Integer)
           5118 => ( Parameter_Integer, 0 ),   --  : tupoi2sp (Integer)
           5119 => ( Parameter_Integer, 0 ),   --  : apoi1sp (Integer)
           5120 => ( Parameter_Integer, 0 ),   --  : apoi2sp (Integer)
           5121 => ( Parameter_Integer, 0 ),   --  : apoi3sp (Integer)
           5122 => ( Parameter_Integer, 0 ),   --  : truoi1sp (Integer)
           5123 => ( Parameter_Integer, 0 ),   --  : truoi2sp (Integer)
           5124 => ( Parameter_Integer, 0 ),   --  : expoi1sp (Integer)
           5125 => ( Parameter_Integer, 0 ),   --  : expoi2sp (Integer)
           5126 => ( Parameter_Float, 0.0 ),   --  : ocpta1hd (Amount)
           5127 => ( Parameter_Float, 0.0 ),   --  : ocpta2hd (Amount)
           5128 => ( Parameter_Float, 0.0 ),   --  : ocpta3hd (Amount)
           5129 => ( Parameter_Float, 0.0 ),   --  : ocpta4hd (Amount)
           5130 => ( Parameter_Float, 0.0 ),   --  : wpta1hd (Amount)
           5131 => ( Parameter_Float, 0.0 ),   --  : wppta2hd (Amount)
           5132 => ( Parameter_Float, 0.0 ),   --  : wppta3hd (Amount)
           5133 => ( Parameter_Float, 0.0 ),   --  : ppeta1hd (Amount)
           5134 => ( Parameter_Float, 0.0 ),   --  : ppeta2hd (Amount)
           5135 => ( Parameter_Float, 0.0 ),   --  : ppeta3hd (Amount)
           5136 => ( Parameter_Integer, 0 ),   --  : tupta1hd (Integer)
           5137 => ( Parameter_Integer, 0 ),   --  : tupta2hd (Integer)
           5138 => ( Parameter_Float, 0.0 ),   --  : apta1hd (Amount)
           5139 => ( Parameter_Float, 0.0 ),   --  : apta2hd (Amount)
           5140 => ( Parameter_Integer, 0 ),   --  : apta3hd (Integer)
           5141 => ( Parameter_Float, 0.0 ),   --  : truta1hd (Amount)
           5142 => ( Parameter_Integer, 0 ),   --  : truta2hd (Integer)
           5143 => ( Parameter_Float, 0.0 ),   --  : expta1hd (Amount)
           5144 => ( Parameter_Integer, 0 ),   --  : expta2hd (Integer)
           5145 => ( Parameter_Float, 0.0 ),   --  : ocpta1sp (Amount)
           5146 => ( Parameter_Float, 0.0 ),   --  : ocpta2sp (Amount)
           5147 => ( Parameter_Float, 0.0 ),   --  : ocpta3sp (Amount)
           5148 => ( Parameter_Integer, 0 ),   --  : ocpta4sp (Integer)
           5149 => ( Parameter_Float, 0.0 ),   --  : wpta1sp (Amount)
           5150 => ( Parameter_Integer, 0 ),   --  : wppta2sp (Integer)
           5151 => ( Parameter_Integer, 0 ),   --  : wppta3sp (Integer)
           5152 => ( Parameter_Float, 0.0 ),   --  : ppeta1sp (Amount)
           5153 => ( Parameter_Float, 0.0 ),   --  : ppeta2sp (Amount)
           5154 => ( Parameter_Float, 0.0 ),   --  : ppeta3sp (Amount)
           5155 => ( Parameter_Integer, 0 ),   --  : tupta1sp (Integer)
           5156 => ( Parameter_Integer, 0 ),   --  : tupta2sp (Integer)
           5157 => ( Parameter_Float, 0.0 ),   --  : apta1sp (Amount)
           5158 => ( Parameter_Float, 0.0 ),   --  : apta2sp (Amount)
           5159 => ( Parameter_Integer, 0 ),   --  : apta3sp (Integer)
           5160 => ( Parameter_Float, 0.0 ),   --  : truta1sp (Amount)
           5161 => ( Parameter_Integer, 0 ),   --  : truta2sp (Integer)
           5162 => ( Parameter_Float, 0.0 ),   --  : expta1sp (Amount)
           5163 => ( Parameter_Integer, 0 ),   --  : expta2sp (Integer)
           5164 => ( Parameter_Integer, 0 ),   --  : ocpti1hd (Integer)
           5165 => ( Parameter_Integer, 0 ),   --  : ocpti2hd (Integer)
           5166 => ( Parameter_Integer, 0 ),   --  : ocpti3hd (Integer)
           5167 => ( Parameter_Integer, 0 ),   --  : ocpti4hd (Integer)
           5168 => ( Parameter_Integer, 0 ),   --  : wpti1hd (Integer)
           5169 => ( Parameter_Integer, 0 ),   --  : wppti2hd (Integer)
           5170 => ( Parameter_Integer, 0 ),   --  : wppti3hd (Integer)
           5171 => ( Parameter_Integer, 0 ),   --  : ppeti1hd (Integer)
           5172 => ( Parameter_Integer, 0 ),   --  : ppeti2hd (Integer)
           5173 => ( Parameter_Integer, 0 ),   --  : ppeti3hd (Integer)
           5174 => ( Parameter_Integer, 0 ),   --  : tupti1hd (Integer)
           5175 => ( Parameter_Integer, 0 ),   --  : tupti2hd (Integer)
           5176 => ( Parameter_Integer, 0 ),   --  : apti1hd (Integer)
           5177 => ( Parameter_Integer, 0 ),   --  : apti2hd (Integer)
           5178 => ( Parameter_Integer, 0 ),   --  : apti3hd (Integer)
           5179 => ( Parameter_Integer, 0 ),   --  : truti1hd (Integer)
           5180 => ( Parameter_Integer, 0 ),   --  : truti2hd (Integer)
           5181 => ( Parameter_Integer, 0 ),   --  : expti1hd (Integer)
           5182 => ( Parameter_Integer, 0 ),   --  : expti2hd (Integer)
           5183 => ( Parameter_Integer, 0 ),   --  : ocpti1sp (Integer)
           5184 => ( Parameter_Integer, 0 ),   --  : ocpti2sp (Integer)
           5185 => ( Parameter_Integer, 0 ),   --  : ocpti3sp (Integer)
           5186 => ( Parameter_Integer, 0 ),   --  : ocpti4sp (Integer)
           5187 => ( Parameter_Integer, 0 ),   --  : wpti1sp (Integer)
           5188 => ( Parameter_Integer, 0 ),   --  : wppti2sp (Integer)
           5189 => ( Parameter_Integer, 0 ),   --  : wppti3sp (Integer)
           5190 => ( Parameter_Integer, 0 ),   --  : ppeti1sp (Integer)
           5191 => ( Parameter_Integer, 0 ),   --  : ppeti2sp (Integer)
           5192 => ( Parameter_Integer, 0 ),   --  : ppeti3sp (Integer)
           5193 => ( Parameter_Integer, 0 ),   --  : tupti1sp (Integer)
           5194 => ( Parameter_Integer, 0 ),   --  : tupti2sp (Integer)
           5195 => ( Parameter_Integer, 0 ),   --  : apti1sp (Integer)
           5196 => ( Parameter_Integer, 0 ),   --  : apti2sp (Integer)
           5197 => ( Parameter_Integer, 0 ),   --  : apti3sp (Integer)
           5198 => ( Parameter_Integer, 0 ),   --  : truti1sp (Integer)
           5199 => ( Parameter_Integer, 0 ),   --  : truti2sp (Integer)
           5200 => ( Parameter_Integer, 0 ),   --  : expti1sp (Integer)
           5201 => ( Parameter_Integer, 0 ),   --  : expti2sp (Integer)
           5202 => ( Parameter_Integer, 0 ),   --  : menpin11 (Integer)
           5203 => ( Parameter_Integer, 0 ),   --  : menpin12 (Integer)
           5204 => ( Parameter_Integer, 0 ),   --  : menpin13 (Integer)
           5205 => ( Parameter_Integer, 0 ),   --  : menpin21 (Integer)
           5206 => ( Parameter_Integer, 0 ),   --  : menpin22 (Integer)
           5207 => ( Parameter_Integer, 0 ),   --  : menpin23 (Integer)
           5208 => ( Parameter_Integer, 0 ),   --  : menpin31 (Integer)
           5209 => ( Parameter_Integer, 0 ),   --  : menpin32 (Integer)
           5210 => ( Parameter_Integer, 0 ),   --  : menpin33 (Integer)
           5211 => ( Parameter_Float, 0.0 ),   --  : menpol11 (Amount)
           5212 => ( Parameter_Float, 0.0 ),   --  : menpol12 (Amount)
           5213 => ( Parameter_Integer, 0 ),   --  : menpol13 (Integer)
           5214 => ( Parameter_Float, 0.0 ),   --  : menpol21 (Amount)
           5215 => ( Parameter_Integer, 0 ),   --  : menpol22 (Integer)
           5216 => ( Parameter_Integer, 0 ),   --  : menpol23 (Integer)
           5217 => ( Parameter_Integer, 0 ),   --  : menpol31 (Integer)
           5218 => ( Parameter_Integer, 0 ),   --  : menpol32 (Integer)
           5219 => ( Parameter_Integer, 0 ),   --  : menpol33 (Integer)
           5220 => ( Parameter_Integer, 0 ),   --  : pmenpo11 (Integer)
           5221 => ( Parameter_Integer, 0 ),   --  : pmenpo12 (Integer)
           5222 => ( Parameter_Integer, 0 ),   --  : pmenpo13 (Integer)
           5223 => ( Parameter_Integer, 0 ),   --  : pmenpo21 (Integer)
           5224 => ( Parameter_Integer, 0 ),   --  : pmenpo22 (Integer)
           5225 => ( Parameter_Integer, 0 ),   --  : pmenpo23 (Integer)
           5226 => ( Parameter_Integer, 0 ),   --  : pmenpo31 (Integer)
           5227 => ( Parameter_Integer, 0 ),   --  : pmenpo32 (Integer)
           5228 => ( Parameter_Integer, 0 ),   --  : pmenpo33 (Integer)
           5229 => ( Parameter_Integer, 0 ),   --  : bedroom (Integer)
           5230 => ( Parameter_Integer, 0 ),   --  : benunits (Integer)
           5231 => ( Parameter_Integer, 0 ),   --  : billrate (Integer)
           5232 => ( Parameter_Integer, 0 ),   --  : brma (Integer)
           5233 => ( Parameter_Integer, 0 ),   --  : burden (Integer)
           5234 => ( Parameter_Integer, 0 ),   --  : busroom (Integer)
           5235 => ( Parameter_Integer, 0 ),   --  : capval (Integer)
           5236 => ( Parameter_Integer, 0 ),   --  : charge1 (Integer)
           5237 => ( Parameter_Integer, 0 ),   --  : charge2 (Integer)
           5238 => ( Parameter_Integer, 0 ),   --  : charge3 (Integer)
           5239 => ( Parameter_Integer, 0 ),   --  : charge4 (Integer)
           5240 => ( Parameter_Integer, 0 ),   --  : charge5 (Integer)
           5241 => ( Parameter_Integer, 0 ),   --  : charge6 (Integer)
           5242 => ( Parameter_Integer, 0 ),   --  : charge7 (Integer)
           5243 => ( Parameter_Integer, 0 ),   --  : charge8 (Integer)
           5244 => ( Parameter_Integer, 0 ),   --  : charge9 (Integer)
           5245 => ( Parameter_Integer, 0 ),   --  : chins (Integer)
           5246 => ( Parameter_Integer, 0 ),   --  : chrgpd1 (Integer)
           5247 => ( Parameter_Integer, 0 ),   --  : chrgpd2 (Integer)
           5248 => ( Parameter_Integer, 0 ),   --  : chrgpd3 (Integer)
           5249 => ( Parameter_Integer, 0 ),   --  : chrgpd4 (Integer)
           5250 => ( Parameter_Integer, 0 ),   --  : chrgpd5 (Integer)
           5251 => ( Parameter_Integer, 0 ),   --  : chrgpd6 (Integer)
           5252 => ( Parameter_Integer, 0 ),   --  : chrgpd7 (Integer)
           5253 => ( Parameter_Integer, 0 ),   --  : chrgpd8 (Integer)
           5254 => ( Parameter_Integer, 0 ),   --  : chrgpd9 (Integer)
           5255 => ( Parameter_Integer, 0 ),   --  : covoths (Integer)
           5256 => ( Parameter_Float, 0.0 ),   --  : csewamt (Amount)
           5257 => ( Parameter_Float, 0.0 ),   --  : csewamt1 (Amount)
           5258 => ( Parameter_Integer, 0 ),   --  : ct25d50d (Integer)
           5259 => ( Parameter_Integer, 0 ),   --  : ctamt (Integer)
           5260 => ( Parameter_Integer, 0 ),   --  : ctannual (Integer)
           5261 => ( Parameter_Integer, 0 ),   --  : ctband (Integer)
           5262 => ( Parameter_Integer, 0 ),   --  : ctbwait (Integer)
           5263 => ( Parameter_Integer, 0 ),   --  : ctcondoc (Integer)
           5264 => ( Parameter_Integer, 0 ),   --  : ctdisc (Integer)
           5265 => ( Parameter_Integer, 0 ),   --  : ctinstal (Integer)
           5266 => ( Parameter_Integer, 0 ),   --  : ctlvband (Integer)
           5267 => ( Parameter_Integer, 0 ),   --  : ctlvchk (Integer)
           5268 => ( Parameter_Integer, 0 ),   --  : ctreb (Integer)
           5269 => ( Parameter_Integer, 0 ),   --  : ctrebamt (Integer)
           5270 => ( Parameter_Integer, 0 ),   --  : ctrebpd (Integer)
           5271 => ( Parameter_Integer, 0 ),   --  : cttime (Integer)
           5272 => ( Parameter_Integer, 0 ),   --  : cwatamt (Integer)
           5273 => ( Parameter_Integer, 0 ),   --  : cwatamt1 (Integer)
           5274 => ( Parameter_Integer, 0 ),   --  : entry1 (Integer)
           5275 => ( Parameter_Integer, 0 ),   --  : entry2 (Integer)
           5276 => ( Parameter_Integer, 0 ),   --  : entry3 (Integer)
           5277 => ( Parameter_Integer, 0 ),   --  : entry4 (Integer)
           5278 => ( Parameter_Integer, 0 ),   --  : gvtregn (Integer)
           5279 => ( Parameter_Integer, 0 ),   --  : gvtregno (Integer)
           5280 => ( Parameter_Integer, 0 ),   --  : hhldr01 (Integer)
           5281 => ( Parameter_Integer, 0 ),   --  : hhldr02 (Integer)
           5282 => ( Parameter_Integer, 0 ),   --  : hhldr03 (Integer)
           5283 => ( Parameter_Integer, 0 ),   --  : hhldr04 (Integer)
           5284 => ( Parameter_Integer, 0 ),   --  : hhldr05 (Integer)
           5285 => ( Parameter_Integer, 0 ),   --  : hhldr06 (Integer)
           5286 => ( Parameter_Integer, 0 ),   --  : hhldr07 (Integer)
           5287 => ( Parameter_Integer, 0 ),   --  : hhldr08 (Integer)
           5288 => ( Parameter_Integer, 0 ),   --  : hhldr09 (Integer)
           5289 => ( Parameter_Integer, 0 ),   --  : hhldr10 (Integer)
           5290 => ( Parameter_Integer, 0 ),   --  : hhldr11 (Integer)
           5291 => ( Parameter_Integer, 0 ),   --  : hhldr12 (Integer)
           5292 => ( Parameter_Integer, 0 ),   --  : hhldr13 (Integer)
           5293 => ( Parameter_Integer, 0 ),   --  : hhldr14 (Integer)
           5294 => ( Parameter_Integer, 0 ),   --  : hhldr97 (Integer)
           5295 => ( Parameter_Integer, 0 ),   --  : hhstat (Integer)
           5296 => ( Parameter_Integer, 0 ),   --  : hlthst (Integer)
           5297 => ( Parameter_Date, Clock ),   --  : intdate (Ada.Calendar.Time)
           5298 => ( Parameter_Integer, 0 ),   --  : mainacc (Integer)
           5299 => ( Parameter_Integer, 0 ),   --  : mnthcode (Integer)
           5300 => ( Parameter_Integer, 0 ),   --  : monlive (Integer)
           5301 => ( Parameter_Integer, 0 ),   --  : multi (Integer)
           5302 => ( Parameter_Integer, 0 ),   --  : nicoun (Integer)
           5303 => ( Parameter_Integer, 0 ),   --  : nidpnd (Integer)
           5304 => ( Parameter_Integer, 0 ),   --  : nmrmshar (Integer)
           5305 => ( Parameter_Integer, 0 ),   --  : nopay (Integer)
           5306 => ( Parameter_Integer, 0 ),   --  : norate (Integer)
           5307 => ( Parameter_Integer, 0 ),   --  : onbsroom (Integer)
           5308 => ( Parameter_Integer, 0 ),   --  : orgid (Integer)
           5309 => ( Parameter_Integer, 0 ),   --  : payrate (Integer)
           5310 => ( Parameter_Integer, 0 ),   --  : ptbsroom (Integer)
           5311 => ( Parameter_Integer, 0 ),   --  : rooms (Integer)
           5312 => ( Parameter_Integer, 0 ),   --  : roomshr (Integer)
           5313 => ( Parameter_Float, 0.0 ),   --  : rt2rebam (Amount)
           5314 => ( Parameter_Float, 0.0 ),   --  : rtannual (Amount)
           5315 => ( Parameter_Integer, 0 ),   --  : rtcondoc (Integer)
           5316 => ( Parameter_Integer, 0 ),   --  : rtdpa (Integer)
           5317 => ( Parameter_Float, 0.0 ),   --  : rtdpaamt (Amount)
           5318 => ( Parameter_Integer, 0 ),   --  : rtene (Integer)
           5319 => ( Parameter_Integer, 0 ),   --  : rteneamt (Integer)
           5320 => ( Parameter_Integer, 0 ),   --  : rtgen (Integer)
           5321 => ( Parameter_Integer, 0 ),   --  : rtinstal (Integer)
           5322 => ( Parameter_Integer, 0 ),   --  : rtlpa (Integer)
           5323 => ( Parameter_Float, 0.0 ),   --  : rtlpaamt (Amount)
           5324 => ( Parameter_Float, 0.0 ),   --  : rtothamt (Amount)
           5325 => ( Parameter_Integer, 0 ),   --  : rtother (Integer)
           5326 => ( Parameter_Integer, 0 ),   --  : rtreb (Integer)
           5327 => ( Parameter_Float, 0.0 ),   --  : rtrebamt (Amount)
           5328 => ( Parameter_Float, 0.0 ),   --  : rtrtramt (Amount)
           5329 => ( Parameter_Integer, 0 ),   --  : rttimepd (Integer)
           5330 => ( Parameter_Integer, 0 ),   --  : schbrk (Integer)
           5331 => ( Parameter_Integer, 0 ),   --  : schfrt (Integer)
           5332 => ( Parameter_Integer, 0 ),   --  : schmeal (Integer)
           5333 => ( Parameter_Integer, 0 ),   --  : schmilk (Integer)
           5334 => ( Parameter_Float, 0.0 ),   --  : seramt1 (Amount)
           5335 => ( Parameter_Float, 0.0 ),   --  : seramt2 (Amount)
           5336 => ( Parameter_Float, 0.0 ),   --  : seramt3 (Amount)
           5337 => ( Parameter_Float, 0.0 ),   --  : seramt4 (Amount)
           5338 => ( Parameter_Float, 0.0 ),   --  : seramt5 (Amount)
           5339 => ( Parameter_Integer, 0 ),   --  : sercomb (Integer)
           5340 => ( Parameter_Integer, 0 ),   --  : serpay1 (Integer)
           5341 => ( Parameter_Integer, 0 ),   --  : serpay2 (Integer)
           5342 => ( Parameter_Integer, 0 ),   --  : serpay3 (Integer)
           5343 => ( Parameter_Integer, 0 ),   --  : serpay4 (Integer)
           5344 => ( Parameter_Integer, 0 ),   --  : serpay5 (Integer)
           5345 => ( Parameter_Float, 0.0 ),   --  : sewamt (Amount)
           5346 => ( Parameter_Float, 0.0 ),   --  : sewanul (Amount)
           5347 => ( Parameter_Integer, 0 ),   --  : sewerpay (Integer)
           5348 => ( Parameter_Integer, 0 ),   --  : sewsep (Integer)
           5349 => ( Parameter_Integer, 0 ),   --  : sewtime (Integer)
           5350 => ( Parameter_Integer, 0 ),   --  : shelter (Integer)
           5351 => ( Parameter_Integer, 0 ),   --  : sobuy (Integer)
           5352 => ( Parameter_Float, 0.0 ),   --  : stramt1 (Amount)
           5353 => ( Parameter_Float, 0.0 ),   --  : stramt2 (Amount)
           5354 => ( Parameter_Integer, 0 ),   --  : strcov (Integer)
           5355 => ( Parameter_Integer, 0 ),   --  : strmort (Integer)
           5356 => ( Parameter_Integer, 0 ),   --  : stroths (Integer)
           5357 => ( Parameter_Integer, 0 ),   --  : strpd1 (Integer)
           5358 => ( Parameter_Integer, 0 ),   --  : strpd2 (Integer)
           5359 => ( Parameter_Integer, 0 ),   --  : suballow (Integer)
           5360 => ( Parameter_Integer, 0 ),   --  : sublet (Integer)
           5361 => ( Parameter_Integer, 0 ),   --  : sublety (Integer)
           5362 => ( Parameter_Float, 0.0 ),   --  : subrent (Amount)
           5363 => ( Parameter_Integer, 0 ),   --  : tenure (Integer)
           5364 => ( Parameter_Integer, 0 ),   --  : tvlic (Integer)
           5365 => ( Parameter_Integer, 0 ),   --  : typeacc (Integer)
           5366 => ( Parameter_Integer, 0 ),   --  : urb (Integer)
           5367 => ( Parameter_Integer, 0 ),   --  : urbrur (Integer)
           5368 => ( Parameter_Integer, 0 ),   --  : urindew (Integer)
           5369 => ( Parameter_Integer, 0 ),   --  : urinds (Integer)
           5370 => ( Parameter_Float, 0.0 ),   --  : watamt (Amount)
           5371 => ( Parameter_Float, 0.0 ),   --  : watanul (Amount)
           5372 => ( Parameter_Integer, 0 ),   --  : watermet (Integer)
           5373 => ( Parameter_Integer, 0 ),   --  : waterpay (Integer)
           5374 => ( Parameter_Integer, 0 ),   --  : watrb (Integer)
           5375 => ( Parameter_Integer, 0 ),   --  : wattime (Integer)
           5376 => ( Parameter_Integer, 0 ),   --  : whoctbot (Integer)
           5377 => ( Parameter_Integer, 0 ),   --  : whorsp01 (Integer)
           5378 => ( Parameter_Integer, 0 ),   --  : whorsp02 (Integer)
           5379 => ( Parameter_Integer, 0 ),   --  : whorsp03 (Integer)
           5380 => ( Parameter_Integer, 0 ),   --  : whorsp04 (Integer)
           5381 => ( Parameter_Integer, 0 ),   --  : whorsp05 (Integer)
           5382 => ( Parameter_Integer, 0 ),   --  : whorsp06 (Integer)
           5383 => ( Parameter_Integer, 0 ),   --  : whorsp07 (Integer)
           5384 => ( Parameter_Integer, 0 ),   --  : whorsp08 (Integer)
           5385 => ( Parameter_Integer, 0 ),   --  : whorsp09 (Integer)
           5386 => ( Parameter_Integer, 0 ),   --  : whorsp10 (Integer)
           5387 => ( Parameter_Integer, 0 ),   --  : whorsp11 (Integer)
           5388 => ( Parameter_Integer, 0 ),   --  : whorsp12 (Integer)
           5389 => ( Parameter_Integer, 0 ),   --  : whorsp13 (Integer)
           5390 => ( Parameter_Integer, 0 ),   --  : whorsp14 (Integer)
           5391 => ( Parameter_Integer, 0 ),   --  : whynoct (Integer)
           5392 => ( Parameter_Float, 0.0 ),   --  : wsewamt (Amount)
           5393 => ( Parameter_Float, 0.0 ),   --  : wsewanul (Amount)
           5394 => ( Parameter_Integer, 0 ),   --  : wsewtime (Integer)
           5395 => ( Parameter_Integer, 0 ),   --  : yearlive (Integer)
           5396 => ( Parameter_Integer, 0 ),   --  : yearwhc (Integer)
           5397 => ( Parameter_Integer, 0 ),   --  : adulth (Integer)
           5398 => ( Parameter_Integer, 0 ),   --  : cwatamtd (Integer)
           5399 => ( Parameter_Integer, 0 ),   --  : depchldh (Integer)
           5400 => ( Parameter_Integer, 0 ),   --  : dischha1 (Integer)
           5401 => ( Parameter_Integer, 0 ),   --  : dischhc1 (Integer)
           5402 => ( Parameter_Integer, 0 ),   --  : diswhha1 (Integer)
           5403 => ( Parameter_Integer, 0 ),   --  : diswhhc1 (Integer)
           5404 => ( Parameter_Float, 0.0 ),   --  : endowpay (Amount)
           5405 => ( Parameter_Integer, 0 ),   --  : gbhscost (Integer)
           5406 => ( Parameter_Integer, 0 ),   --  : grossct (Integer)
           5407 => ( Parameter_Integer, 0 ),   --  : hbeninc (Integer)
           5408 => ( Parameter_Integer, 0 ),   --  : hbindhh (Integer)
           5409 => ( Parameter_Integer, 0 ),   --  : hbindhh2 (Integer)
           5410 => ( Parameter_Integer, 0 ),   --  : hearns (Integer)
           5411 => ( Parameter_Integer, 0 ),   --  : hhdisben (Integer)
           5412 => ( Parameter_Integer, 0 ),   --  : hhinc (Integer)
           5413 => ( Parameter_Integer, 0 ),   --  : hhinv (Integer)
           5414 => ( Parameter_Integer, 0 ),   --  : hhirben (Integer)
           5415 => ( Parameter_Integer, 0 ),   --  : hhnirben (Integer)
           5416 => ( Parameter_Integer, 0 ),   --  : hhothben (Integer)
           5417 => ( Parameter_Integer, 0 ),   --  : hhrent (Integer)
           5418 => ( Parameter_Integer, 0 ),   --  : hhrinc (Integer)
           5419 => ( Parameter_Integer, 0 ),   --  : hhrpinc (Integer)
           5420 => ( Parameter_Float, 0.0 ),   --  : hhtvlic (Amount)
           5421 => ( Parameter_Integer, 0 ),   --  : hhtxcred (Integer)
           5422 => ( Parameter_Integer, 0 ),   --  : hothinc (Integer)
           5423 => ( Parameter_Integer, 0 ),   --  : hpeninc (Integer)
           5424 => ( Parameter_Integer, 0 ),   --  : hseinc (Integer)
           5425 => ( Parameter_Integer, 0 ),   --  : london (Integer)
           5426 => ( Parameter_Float, 0.0 ),   --  : mortint (Amount)
           5427 => ( Parameter_Integer, 0 ),   --  : nihscost (Integer)
           5428 => ( Parameter_Integer, 0 ),   --  : penage (Integer)
           5429 => ( Parameter_Integer, 0 ),   --  : penhrp (Integer)
           5430 => ( Parameter_Integer, 0 ),   --  : ptentyp2 (Integer)
           5431 => ( Parameter_Float, 0.0 ),   --  : servpay (Amount)
           5432 => ( Parameter_Float, 0.0 ),   --  : struins (Amount)
           5433 => ( Parameter_Integer, 0 ),   --  : tentyp2 (Integer)
           5434 => ( Parameter_Integer, 0 ),   --  : tuhhrent (Integer)
           5435 => ( Parameter_Float, 0.0 ),   --  : tuwatsew (Amount)
           5436 => ( Parameter_Float, 0.0 ),   --  : watsewrt (Amount)
           5437 => ( Parameter_Float, 0.0 ),   --  : hcgrent (Amount)
           5438 => ( Parameter_Integer, 0 ),   --  : hcfeudut (Integer)
           5439 => ( Parameter_Float, 0.0 ),   --  : hcchrent (Amount)
           5440 => ( Parameter_Float, 0.0 ),   --  : hcservch (Amount)
           5441 => ( Parameter_Float, 0.0 ),   --  : hcmaint (Amount)
           5442 => ( Parameter_Float, 0.0 ),   --  : hcsirent (Amount)
           5443 => ( Parameter_Float, 0.0 ),   --  : hcfactor (Amount)
           5444 => ( Parameter_Float, 0.0 ),   --  : hcother (Amount)
           5445 => ( Parameter_Float, 0.0 ),   --  : hcpcomb (Amount)
           5446 => ( Parameter_Integer, 0 ),   --  : gvhelp (Integer)
           5447 => ( Parameter_Integer, 0 ),   --  : lacode (Integer)
           5448 => ( Parameter_Integer, 0 ),   --  : lauacode (Integer)
           5449 => ( Parameter_Integer, 0 ),   --  : llcare (Integer)
           5450 => ( Parameter_Integer, 0 ),   --  : needcare (Integer)
           5451 => ( Parameter_Integer, 0 ),   --  : colourtv (Integer)
           5452 => ( Parameter_Integer, 0 ),   --  : bwtv (Integer)
           5453 => ( Parameter_Integer, 0 ),   --  : serpd1 (Integer)
           5454 => ( Parameter_Integer, 0 ),   --  : serpd2 (Integer)
           5455 => ( Parameter_Integer, 0 ),   --  : serpd3 (Integer)
           5456 => ( Parameter_Integer, 0 ),   --  : serpd4 (Integer)
           5457 => ( Parameter_Integer, 0 ),   --  : serpd5 (Integer)
           5458 => ( Parameter_Float, 0.0 ),   --  : outsam11 (Amount)
           5459 => ( Parameter_Float, 0.0 ),   --  : outsam12 (Amount)
           5460 => ( Parameter_Float, 0.0 ),   --  : outsam21 (Amount)
           5461 => ( Parameter_Integer, 0 ),   --  : outsam22 (Integer)
           5462 => ( Parameter_Integer, 0 ),   --  : outsam31 (Integer)
           5463 => ( Parameter_Integer, 0 ),   --  : outsam32 (Integer)
           5464 => ( Parameter_Integer, 0 ),   --  : outsin11 (Integer)
           5465 => ( Parameter_Integer, 0 ),   --  : outsin12 (Integer)
           5466 => ( Parameter_Integer, 0 ),   --  : outsin21 (Integer)
           5467 => ( Parameter_Integer, 0 ),   --  : outsin22 (Integer)
           5468 => ( Parameter_Integer, 0 ),   --  : outsin31 (Integer)
           5469 => ( Parameter_Integer, 0 ),   --  : outsin32 (Integer)
           5470 => ( Parameter_Integer, 0 ),   --  : outspa11 (Integer)
           5471 => ( Parameter_Integer, 0 ),   --  : outspa12 (Integer)
           5472 => ( Parameter_Integer, 0 ),   --  : outspa21 (Integer)
           5473 => ( Parameter_Integer, 0 ),   --  : outspa22 (Integer)
           5474 => ( Parameter_Integer, 0 ),   --  : outspa31 (Integer)
           5475 => ( Parameter_Integer, 0 ),   --  : outspa32 (Integer)
           5476 => ( Parameter_Integer, 0 ),   --  : outspd11 (Integer)
           5477 => ( Parameter_Integer, 0 ),   --  : outspd12 (Integer)
           5478 => ( Parameter_Integer, 0 ),   --  : outspd21 (Integer)
           5479 => ( Parameter_Integer, 0 ),   --  : outspd22 (Integer)
           5480 => ( Parameter_Integer, 0 ),   --  : outspd31 (Integer)
           5481 => ( Parameter_Integer, 0 ),   --  : outspd32 (Integer)
           5482 => ( Parameter_Float, 0.0 ),   --  : borramt1 (Amount)
           5483 => ( Parameter_Integer, 0 ),   --  : borramt2 (Integer)
           5484 => ( Parameter_Integer, 0 ),   --  : borramt3 (Integer)
           5485 => ( Parameter_Integer, 0 ),   --  : endwp11 (Integer)
           5486 => ( Parameter_Integer, 0 ),   --  : endwp12 (Integer)
           5487 => ( Parameter_Integer, 0 ),   --  : endwp13 (Integer)
           5488 => ( Parameter_Integer, 0 ),   --  : endwp21 (Integer)
           5489 => ( Parameter_Integer, 0 ),   --  : endwp22 (Integer)
           5490 => ( Parameter_Integer, 0 ),   --  : endwp23 (Integer)
           5491 => ( Parameter_Integer, 0 ),   --  : endwp31 (Integer)
           5492 => ( Parameter_Integer, 0 ),   --  : endwp32 (Integer)
           5493 => ( Parameter_Integer, 0 ),   --  : endwp33 (Integer)
           5494 => ( Parameter_Integer, 0 ),   --  : endwp41 (Integer)
           5495 => ( Parameter_Integer, 0 ),   --  : endwp42 (Integer)
           5496 => ( Parameter_Integer, 0 ),   --  : endwp43 (Integer)
           5497 => ( Parameter_Integer, 0 ),   --  : endwp51 (Integer)
           5498 => ( Parameter_Integer, 0 ),   --  : endwp52 (Integer)
           5499 => ( Parameter_Integer, 0 ),   --  : endwp53 (Integer)
           5500 => ( Parameter_Integer, 0 ),   --  : incmin11 (Integer)
           5501 => ( Parameter_Integer, 0 ),   --  : incmin12 (Integer)
           5502 => ( Parameter_Integer, 0 ),   --  : incmin13 (Integer)
           5503 => ( Parameter_Integer, 0 ),   --  : incmin21 (Integer)
           5504 => ( Parameter_Integer, 0 ),   --  : incmin22 (Integer)
           5505 => ( Parameter_Integer, 0 ),   --  : incmin23 (Integer)
           5506 => ( Parameter_Integer, 0 ),   --  : incmin31 (Integer)
           5507 => ( Parameter_Integer, 0 ),   --  : incmin32 (Integer)
           5508 => ( Parameter_Integer, 0 ),   --  : incmin33 (Integer)
           5509 => ( Parameter_Integer, 0 ),   --  : incmp11 (Integer)
           5510 => ( Parameter_Integer, 0 ),   --  : incmp12 (Integer)
           5511 => ( Parameter_Integer, 0 ),   --  : incmp13 (Integer)
           5512 => ( Parameter_Integer, 0 ),   --  : incmp21 (Integer)
           5513 => ( Parameter_Integer, 0 ),   --  : incmp22 (Integer)
           5514 => ( Parameter_Integer, 0 ),   --  : incmp23 (Integer)
           5515 => ( Parameter_Integer, 0 ),   --  : incmp31 (Integer)
           5516 => ( Parameter_Integer, 0 ),   --  : incmp32 (Integer)
           5517 => ( Parameter_Integer, 0 ),   --  : incmp33 (Integer)
           5518 => ( Parameter_Float, 0.0 ),   --  : incmpa11 (Amount)
           5519 => ( Parameter_Float, 0.0 ),   --  : incmpa12 (Amount)
           5520 => ( Parameter_Float, 0.0 ),   --  : incmpa13 (Amount)
           5521 => ( Parameter_Float, 0.0 ),   --  : incmpa21 (Amount)
           5522 => ( Parameter_Integer, 0 ),   --  : incmpa22 (Integer)
           5523 => ( Parameter_Integer, 0 ),   --  : incmpa23 (Integer)
           5524 => ( Parameter_Float, 0.0 ),   --  : incmpa31 (Amount)
           5525 => ( Parameter_Integer, 0 ),   --  : incmpa32 (Integer)
           5526 => ( Parameter_Integer, 0 ),   --  : incmpa33 (Integer)
           5527 => ( Parameter_Integer, 0 ),   --  : pincmp11 (Integer)
           5528 => ( Parameter_Integer, 0 ),   --  : pincmp12 (Integer)
           5529 => ( Parameter_Integer, 0 ),   --  : pincmp13 (Integer)
           5530 => ( Parameter_Integer, 0 ),   --  : pincmp21 (Integer)
           5531 => ( Parameter_Integer, 0 ),   --  : pincmp22 (Integer)
           5532 => ( Parameter_Integer, 0 ),   --  : pincmp23 (Integer)
           5533 => ( Parameter_Integer, 0 ),   --  : pincmp31 (Integer)
           5534 => ( Parameter_Integer, 0 ),   --  : pincmp32 (Integer)
           5535 => ( Parameter_Integer, 0 ),   --  : pincmp33 (Integer)
           5536 => ( Parameter_Float, 0.0 ),   --  : intpri1 (Amount)
           5537 => ( Parameter_Float, 0.0 ),   --  : intpri2 (Amount)
           5538 => ( Parameter_Float, 0.0 ),   --  : intpri3 (Amount)
           5539 => ( Parameter_Integer, 0 ),   --  : pintrpi1 (Integer)
           5540 => ( Parameter_Integer, 0 ),   --  : pintrpi2 (Integer)
           5541 => ( Parameter_Integer, 0 ),   --  : pintrpi3 (Integer)
           5542 => ( Parameter_Integer, 0 ),   --  : loanyr1 (Integer)
           5543 => ( Parameter_Integer, 0 ),   --  : loanyr2 (Integer)
           5544 => ( Parameter_Integer, 0 ),   --  : loanyr3 (Integer)
           5545 => ( Parameter_Integer, 0 ),   --  : menpol1 (Integer)
           5546 => ( Parameter_Integer, 0 ),   --  : menpol2 (Integer)
           5547 => ( Parameter_Integer, 0 ),   --  : menpol3 (Integer)
           5548 => ( Parameter_Integer, 0 ),   --  : morall1 (Integer)
           5549 => ( Parameter_Integer, 0 ),   --  : morall2 (Integer)
           5550 => ( Parameter_Integer, 0 ),   --  : morall3 (Integer)
           5551 => ( Parameter_Integer, 0 ),   --  : morflc1 (Integer)
           5552 => ( Parameter_Integer, 0 ),   --  : morflc2 (Integer)
           5553 => ( Parameter_Integer, 0 ),   --  : morflc3 (Integer)
           5554 => ( Parameter_Float, 0.0 ),   --  : morinp1 (Amount)
           5555 => ( Parameter_Float, 0.0 ),   --  : morinp2 (Amount)
           5556 => ( Parameter_Float, 0.0 ),   --  : morinp3 (Amount)
           5557 => ( Parameter_Integer, 0 ),   --  : pmorinp1 (Integer)
           5558 => ( Parameter_Integer, 0 ),   --  : pmorinp2 (Integer)
           5559 => ( Parameter_Integer, 0 ),   --  : pmorinp3 (Integer)
           5560 => ( Parameter_Integer, 0 ),   --  : morinus1 (Integer)
           5561 => ( Parameter_Integer, 0 ),   --  : morinus2 (Integer)
           5562 => ( Parameter_Integer, 0 ),   --  : morinus3 (Integer)
           5563 => ( Parameter_Integer, 0 ),   --  : mortend1 (Integer)
           5564 => ( Parameter_Integer, 0 ),   --  : mortend2 (Integer)
           5565 => ( Parameter_Integer, 0 ),   --  : mortend3 (Integer)
           5566 => ( Parameter_Float, 0.0 ),   --  : mortlef1 (Amount)
           5567 => ( Parameter_Float, 0.0 ),   --  : mortlef2 (Amount)
           5568 => ( Parameter_Integer, 0 ),   --  : mortlef3 (Integer)
           5569 => ( Parameter_Integer, 0 ),   --  : mortpro1 (Integer)
           5570 => ( Parameter_Integer, 0 ),   --  : mortpro2 (Integer)
           5571 => ( Parameter_Integer, 0 ),   --  : mortpro3 (Integer)
           5572 => ( Parameter_Integer, 0 ),   --  : morttyp1 (Integer)
           5573 => ( Parameter_Integer, 0 ),   --  : morttyp2 (Integer)
           5574 => ( Parameter_Integer, 0 ),   --  : morttyp3 (Integer)
           5575 => ( Parameter_Integer, 0 ),   --  : morupd1 (Integer)
           5576 => ( Parameter_Integer, 0 ),   --  : morupd2 (Integer)
           5577 => ( Parameter_Integer, 0 ),   --  : morupd3 (Integer)
           5578 => ( Parameter_Float, 0.0 ),   --  : morus1 (Amount)
           5579 => ( Parameter_Integer, 0 ),   --  : morus2 (Integer)
           5580 => ( Parameter_Integer, 0 ),   --  : morus3 (Integer)
           5581 => ( Parameter_Integer, 0 ),   --  : mpcove11 (Integer)
           5582 => ( Parameter_Integer, 0 ),   --  : mpcove12 (Integer)
           5583 => ( Parameter_Integer, 0 ),   --  : mpcove13 (Integer)
           5584 => ( Parameter_Integer, 0 ),   --  : mpcove21 (Integer)
           5585 => ( Parameter_Integer, 0 ),   --  : mpcove22 (Integer)
           5586 => ( Parameter_Integer, 0 ),   --  : mpcove23 (Integer)
           5587 => ( Parameter_Integer, 0 ),   --  : mpcove31 (Integer)
           5588 => ( Parameter_Integer, 0 ),   --  : mpcove32 (Integer)
           5589 => ( Parameter_Integer, 0 ),   --  : mpcove33 (Integer)
           5590 => ( Parameter_Integer, 0 ),   --  : outsmor1 (Integer)
           5591 => ( Parameter_Integer, 0 ),   --  : outsmor2 (Integer)
           5592 => ( Parameter_Integer, 0 ),   --  : outsmor3 (Integer)
           5593 => ( Parameter_Float, 0.0 ),   --  : rmamt1 (Amount)
           5594 => ( Parameter_Integer, 0 ),   --  : rmamt2 (Integer)
           5595 => ( Parameter_Integer, 0 ),   --  : rmamt3 (Integer)
           5596 => ( Parameter_Integer, 0 ),   --  : rmort1 (Integer)
           5597 => ( Parameter_Integer, 0 ),   --  : rmort2 (Integer)
           5598 => ( Parameter_Integer, 0 ),   --  : rmort3 (Integer)
           5599 => ( Parameter_Integer, 0 ),   --  : rmortyr1 (Integer)
           5600 => ( Parameter_Integer, 0 ),   --  : rmortyr2 (Integer)
           5601 => ( Parameter_Integer, 0 ),   --  : rmortyr3 (Integer)
           5602 => ( Parameter_Integer, 0 ),   --  : rmpur011 (Integer)
           5603 => ( Parameter_Integer, 0 ),   --  : rmpur012 (Integer)
           5604 => ( Parameter_Integer, 0 ),   --  : rmpur013 (Integer)
           5605 => ( Parameter_Integer, 0 ),   --  : rmpur021 (Integer)
           5606 => ( Parameter_Integer, 0 ),   --  : rmpur022 (Integer)
           5607 => ( Parameter_Integer, 0 ),   --  : rmpur023 (Integer)
           5608 => ( Parameter_Integer, 0 ),   --  : rmpur031 (Integer)
           5609 => ( Parameter_Integer, 0 ),   --  : rmpur032 (Integer)
           5610 => ( Parameter_Integer, 0 ),   --  : rmpur033 (Integer)
           5611 => ( Parameter_Integer, 0 ),   --  : rmpur041 (Integer)
           5612 => ( Parameter_Integer, 0 ),   --  : rmpur042 (Integer)
           5613 => ( Parameter_Integer, 0 ),   --  : rmpur043 (Integer)
           5614 => ( Parameter_Integer, 0 ),   --  : rmpur051 (Integer)
           5615 => ( Parameter_Integer, 0 ),   --  : rmpur052 (Integer)
           5616 => ( Parameter_Integer, 0 ),   --  : rmpur053 (Integer)
           5617 => ( Parameter_Integer, 0 ),   --  : rmpur061 (Integer)
           5618 => ( Parameter_Integer, 0 ),   --  : rmpur062 (Integer)
           5619 => ( Parameter_Integer, 0 ),   --  : rmpur063 (Integer)
           5620 => ( Parameter_Integer, 0 ),   --  : rmpur071 (Integer)
           5621 => ( Parameter_Integer, 0 ),   --  : rmpur072 (Integer)
           5622 => ( Parameter_Integer, 0 ),   --  : rmpur073 (Integer)
           5623 => ( Parameter_Integer, 0 ),   --  : rmpur081 (Integer)
           5624 => ( Parameter_Integer, 0 ),   --  : rmpur082 (Integer)
           5625 => ( Parameter_Integer, 0 ),   --  : rmpur083 (Integer)
           5626 => ( Parameter_Integer, 0 ),   --  : buyyear (Integer)
           5627 => ( Parameter_Float, 0.0 ),   --  : purcamt (Amount)
           5628 => ( Parameter_Integer, 0 ),   --  : purcloan (Integer)
           5629 => ( Parameter_Integer, 0 ),   --  : secmpur3 (Integer)
           5630 => ( Parameter_Integer, 0 ),   --  : secmpur4 (Integer)
           5631 => ( Parameter_Integer, 0 ),   --  : secmpur1 (Integer)
           5632 => ( Parameter_Integer, 0 ),   --  : secmpur5 (Integer)
           5633 => ( Parameter_Integer, 0 ),   --  : secmpur6 (Integer)
           5634 => ( Parameter_Integer, 0 ),   --  : secmpur2 (Integer)
           5635 => ( Parameter_Integer, 0 ),   --  : secmpur7 (Integer)
           5636 => ( Parameter_Float, 0.0 ),   --  : rexhham1 (Amount)
           5637 => ( Parameter_Integer, 0 ),   --  : accchk1 (Integer)
           5638 => ( Parameter_Integer, 0 ),   --  : rexhhwh1 (Integer)
           5639 => ( Parameter_Integer, 0 ),   --  : prexhha1 (Integer)
           5640 => ( Parameter_Integer, 0 ),   --  : accjbp10 (Integer)
           5641 => ( Parameter_Integer, 0 ),   --  : accjbp11 (Integer)
           5642 => ( Parameter_Integer, 0 ),   --  : accjbp12 (Integer)
           5643 => ( Parameter_Integer, 0 ),   --  : accjbp13 (Integer)
           5644 => ( Parameter_Integer, 0 ),   --  : accjbp14 (Integer)
           5645 => ( Parameter_Integer, 0 ),   --  : accjob (Integer)
           5646 => ( Parameter_Integer, 0 ),   --  : ctract (Integer)
           5647 => ( Parameter_Float, 0.0 ),   --  : eligamt (Amount)
           5648 => ( Parameter_Integer, 0 ),   --  : eligpd (Integer)
           5649 => ( Parameter_Integer, 0 ),   --  : fairrent (Integer)
           5650 => ( Parameter_Integer, 0 ),   --  : furnish (Integer)
           5651 => ( Parameter_Float, 0.0 ),   --  : hbenamt (Amount)
           5652 => ( Parameter_Integer, 0 ),   --  : hbenchk (Integer)
           5653 => ( Parameter_Integer, 0 ),   --  : hbenefit (Integer)
           5654 => ( Parameter_Integer, 0 ),   --  : hbenpd (Integer)
           5655 => ( Parameter_Integer, 0 ),   --  : hbenwait (Integer)
           5656 => ( Parameter_Integer, 0 ),   --  : hbmnth (Integer)
           5657 => ( Parameter_Integer, 0 ),   --  : hbrecp (Integer)
           5658 => ( Parameter_Integer, 0 ),   --  : hbweeks (Integer)
           5659 => ( Parameter_Integer, 0 ),   --  : hbyear (Integer)
           5660 => ( Parameter_Integer, 0 ),   --  : hbyears (Integer)
           5661 => ( Parameter_Integer, 0 ),   --  : landlord (Integer)
           5662 => ( Parameter_Integer, 0 ),   --  : niystart (Integer)
           5663 => ( Parameter_Integer, 0 ),   --  : othtype (Integer)
           5664 => ( Parameter_Integer, 0 ),   --  : rebate (Integer)
           5665 => ( Parameter_Float, 0.0 ),   --  : rent (Amount)
           5666 => ( Parameter_Integer, 0 ),   --  : rentdoc (Integer)
           5667 => ( Parameter_Integer, 0 ),   --  : renthol (Integer)
           5668 => ( Parameter_Integer, 0 ),   --  : rentpd (Integer)
           5669 => ( Parameter_Integer, 0 ),   --  : rentpd1 (Integer)
           5670 => ( Parameter_Integer, 0 ),   --  : rentpd2 (Integer)
           5671 => ( Parameter_Integer, 0 ),   --  : resll (Integer)
           5672 => ( Parameter_Integer, 0 ),   --  : resll2 (Integer)
           5673 => ( Parameter_Integer, 0 ),   --  : serincam (Integer)
           5674 => ( Parameter_Integer, 0 ),   --  : tentype (Integer)
           5675 => ( Parameter_Integer, 0 ),   --  : weekhol (Integer)
           5676 => ( Parameter_Integer, 0 ),   --  : wsinc (Integer)
           5677 => ( Parameter_Float, 0.0 ),   --  : wsincamt (Amount)
           5678 => ( Parameter_Integer, 0 ),   --  : ystartr (Integer)
           5679 => ( Parameter_Integer, 0 ),   --  : accjbp1 (Integer)
           5680 => ( Parameter_Integer, 0 ),   --  : accjbp2 (Integer)
           5681 => ( Parameter_Integer, 0 ),   --  : accjbp3 (Integer)
           5682 => ( Parameter_Integer, 0 ),   --  : accjbp4 (Integer)
           5683 => ( Parameter_Integer, 0 ),   --  : accjbp5 (Integer)
           5684 => ( Parameter_Integer, 0 ),   --  : accjbp6 (Integer)
           5685 => ( Parameter_Integer, 0 ),   --  : accjbp7 (Integer)
           5686 => ( Parameter_Integer, 0 ),   --  : accjbp8 (Integer)
           5687 => ( Parameter_Integer, 0 ),   --  : accjbp9 (Integer)
           5688 => ( Parameter_Integer, 0 ),   --  : rexhh (Integer)
           5689 => ( Parameter_Float, 0.0 ),   --  : rntfull (Amount)
           5690 => ( Parameter_Integer, 0 ),   --  : lighting (Integer)
           5691 => ( Parameter_Integer, 0 ),   --  : heating (Integer)
           5692 => ( Parameter_Integer, 0 ),   --  : hotwater (Integer)
           5693 => ( Parameter_Integer, 0 ),   --  : fuelcook (Integer)
           5694 => ( Parameter_Integer, 0 ),   --  : tvlice (Integer)
           5695 => ( Parameter_Integer, 0 ),   --  : elec (Integer)
           5696 => ( Parameter_Integer, 0 ),   --  : gas (Integer)
           5697 => ( Parameter_Integer, 0 ),   --  : lsf (Integer)
           5698 => ( Parameter_Integer, 0 ),   --  : user_id (Integer)
           5699 => ( Parameter_Integer, 0 ),   --  : edition (Integer)
           5700 => ( Parameter_Integer, 0 ),   --  : year (Integer)
           5701 => ( Parameter_Bigint, 0 ),   --  : sernum (Sernum_Value)
           5702 => ( Parameter_Integer, 0 )   --  : benunit (Integer)
      ) else (
            1 => ( Parameter_Integer, 0 ),   --  : user_id (Integer)
            2 => ( Parameter_Integer, 0 ),   --  : edition (Integer)
            3 => ( Parameter_Integer, 0 ),   --  : year (Integer)
            4 => ( Parameter_Bigint, 0 ),   --  : sernum (Sernum_Value)
            5 => ( Parameter_Integer, 0 ),   --  : benunit (Integer)
            6 => ( Parameter_Float, 0.0 ),   --  : int1hd (Amount)
            7 => ( Parameter_Float, 0.0 ),   --  : int2hd (Amount)
            8 => ( Parameter_Float, 0.0 ),   --  : int3hd (Amount)
            9 => ( Parameter_Integer, 0 ),   --  : int4hd (Integer)
           10 => ( Parameter_Float, 0.0 ),   --  : int5hd (Amount)
           11 => ( Parameter_Float, 0.0 ),   --  : int6hd (Amount)
           12 => ( Parameter_Float, 0.0 ),   --  : int7hd (Amount)
           13 => ( Parameter_Float, 0.0 ),   --  : int8hd (Amount)
           14 => ( Parameter_Integer, 0 ),   --  : int9hd (Integer)
           15 => ( Parameter_Integer, 0 ),   --  : int10hd (Integer)
           16 => ( Parameter_Integer, 0 ),   --  : int11hd (Integer)
           17 => ( Parameter_Integer, 0 ),   --  : int12hd (Integer)
           18 => ( Parameter_Integer, 0 ),   --  : int13hd (Integer)
           19 => ( Parameter_Integer, 0 ),   --  : int14hd (Integer)
           20 => ( Parameter_Integer, 0 ),   --  : int15hd (Integer)
           21 => ( Parameter_Integer, 0 ),   --  : int16hd (Integer)
           22 => ( Parameter_Integer, 0 ),   --  : int17hd (Integer)
           23 => ( Parameter_Integer, 0 ),   --  : int18hd (Integer)
           24 => ( Parameter_Integer, 0 ),   --  : int19hd (Integer)
           25 => ( Parameter_Float, 0.0 ),   --  : int21hd (Amount)
           26 => ( Parameter_Integer, 0 ),   --  : int22hd (Integer)
           27 => ( Parameter_Integer, 0 ),   --  : int23hd (Integer)
           28 => ( Parameter_Float, 0.0 ),   --  : int24hd (Amount)
           29 => ( Parameter_Integer, 0 ),   --  : int25hd (Integer)
           30 => ( Parameter_Integer, 0 ),   --  : int26hd (Integer)
           31 => ( Parameter_Float, 0.0 ),   --  : int27hd (Amount)
           32 => ( Parameter_Float, 0.0 ),   --  : int28hd (Amount)
           33 => ( Parameter_Integer, 0 ),   --  : int29hd (Integer)
           34 => ( Parameter_Integer, 0 ),   --  : int30hd (Integer)
           35 => ( Parameter_Float, 0.0 ),   --  : int1sp (Amount)
           36 => ( Parameter_Float, 0.0 ),   --  : int2sp (Amount)
           37 => ( Parameter_Float, 0.0 ),   --  : int3sp (Amount)
           38 => ( Parameter_Integer, 0 ),   --  : int4sp (Integer)
           39 => ( Parameter_Float, 0.0 ),   --  : int5sp (Amount)
           40 => ( Parameter_Float, 0.0 ),   --  : int6sp (Amount)
           41 => ( Parameter_Float, 0.0 ),   --  : int7sp (Amount)
           42 => ( Parameter_Float, 0.0 ),   --  : int8sp (Amount)
           43 => ( Parameter_Integer, 0 ),   --  : int9sp (Integer)
           44 => ( Parameter_Integer, 0 ),   --  : int10sp (Integer)
           45 => ( Parameter_Integer, 0 ),   --  : int11sp (Integer)
           46 => ( Parameter_Integer, 0 ),   --  : int12sp (Integer)
           47 => ( Parameter_Integer, 0 ),   --  : int13sp (Integer)
           48 => ( Parameter_Integer, 0 ),   --  : int14sp (Integer)
           49 => ( Parameter_Integer, 0 ),   --  : int15sp (Integer)
           50 => ( Parameter_Integer, 0 ),   --  : int16sp (Integer)
           51 => ( Parameter_Integer, 0 ),   --  : int17sp (Integer)
           52 => ( Parameter_Integer, 0 ),   --  : int18sp (Integer)
           53 => ( Parameter_Integer, 0 ),   --  : int19sp (Integer)
           54 => ( Parameter_Float, 0.0 ),   --  : int21sp (Amount)
           55 => ( Parameter_Integer, 0 ),   --  : int22sp (Integer)
           56 => ( Parameter_Integer, 0 ),   --  : int23sp (Integer)
           57 => ( Parameter_Float, 0.0 ),   --  : int24sp (Amount)
           58 => ( Parameter_Integer, 0 ),   --  : int25sp (Integer)
           59 => ( Parameter_Integer, 0 ),   --  : int26sp (Integer)
           60 => ( Parameter_Float, 0.0 ),   --  : int27sp (Amount)
           61 => ( Parameter_Float, 0.0 ),   --  : int28sp (Amount)
           62 => ( Parameter_Integer, 0 ),   --  : int29sp (Integer)
           63 => ( Parameter_Integer, 0 ),   --  : int30sp (Integer)
           64 => ( Parameter_Integer, 0 ),   --  : intx1hd (Integer)
           65 => ( Parameter_Integer, 0 ),   --  : intx2hd (Integer)
           66 => ( Parameter_Integer, 0 ),   --  : intx3hd (Integer)
           67 => ( Parameter_Integer, 0 ),   --  : intx4hd (Integer)
           68 => ( Parameter_Integer, 0 ),   --  : intx5hd (Integer)
           69 => ( Parameter_Integer, 0 ),   --  : intx6hd (Integer)
           70 => ( Parameter_Integer, 0 ),   --  : intx7hd (Integer)
           71 => ( Parameter_Integer, 0 ),   --  : intx8hd (Integer)
           72 => ( Parameter_Integer, 0 ),   --  : intx9hd (Integer)
           73 => ( Parameter_Integer, 0 ),   --  : intx10hd (Integer)
           74 => ( Parameter_Integer, 0 ),   --  : intx11hd (Integer)
           75 => ( Parameter_Integer, 0 ),   --  : intx12hd (Integer)
           76 => ( Parameter_Integer, 0 ),   --  : intx13hd (Integer)
           77 => ( Parameter_Integer, 0 ),   --  : intx14hd (Integer)
           78 => ( Parameter_Integer, 0 ),   --  : intx15hd (Integer)
           79 => ( Parameter_Integer, 0 ),   --  : intx16hd (Integer)
           80 => ( Parameter_Integer, 0 ),   --  : intx17hd (Integer)
           81 => ( Parameter_Integer, 0 ),   --  : intx18hd (Integer)
           82 => ( Parameter_Integer, 0 ),   --  : intx19hd (Integer)
           83 => ( Parameter_Integer, 0 ),   --  : intx21hd (Integer)
           84 => ( Parameter_Integer, 0 ),   --  : intx22hd (Integer)
           85 => ( Parameter_Integer, 0 ),   --  : intx23hd (Integer)
           86 => ( Parameter_Integer, 0 ),   --  : intx24hd (Integer)
           87 => ( Parameter_Integer, 0 ),   --  : intx25hd (Integer)
           88 => ( Parameter_Integer, 0 ),   --  : intx26hd (Integer)
           89 => ( Parameter_Integer, 0 ),   --  : intx27hd (Integer)
           90 => ( Parameter_Integer, 0 ),   --  : intx28hd (Integer)
           91 => ( Parameter_Integer, 0 ),   --  : intx29hd (Integer)
           92 => ( Parameter_Integer, 0 ),   --  : intx30hd (Integer)
           93 => ( Parameter_Integer, 0 ),   --  : intx1sp (Integer)
           94 => ( Parameter_Integer, 0 ),   --  : intx2sp (Integer)
           95 => ( Parameter_Integer, 0 ),   --  : intx3sp (Integer)
           96 => ( Parameter_Integer, 0 ),   --  : intx4sp (Integer)
           97 => ( Parameter_Integer, 0 ),   --  : intx5sp (Integer)
           98 => ( Parameter_Integer, 0 ),   --  : intx6sp (Integer)
           99 => ( Parameter_Integer, 0 ),   --  : intx7sp (Integer)
           100 => ( Parameter_Integer, 0 ),   --  : intx8sp (Integer)
           101 => ( Parameter_Integer, 0 ),   --  : intx9sp (Integer)
           102 => ( Parameter_Integer, 0 ),   --  : intx10sp (Integer)
           103 => ( Parameter_Integer, 0 ),   --  : intx11sp (Integer)
           104 => ( Parameter_Integer, 0 ),   --  : intx12sp (Integer)
           105 => ( Parameter_Integer, 0 ),   --  : intx13sp (Integer)
           106 => ( Parameter_Integer, 0 ),   --  : intx14sp (Integer)
           107 => ( Parameter_Integer, 0 ),   --  : intx15sp (Integer)
           108 => ( Parameter_Integer, 0 ),   --  : intx16sp (Integer)
           109 => ( Parameter_Integer, 0 ),   --  : intx17sp (Integer)
           110 => ( Parameter_Integer, 0 ),   --  : intx18sp (Integer)
           111 => ( Parameter_Integer, 0 ),   --  : intx19sp (Integer)
           112 => ( Parameter_Integer, 0 ),   --  : intx21sp (Integer)
           113 => ( Parameter_Integer, 0 ),   --  : intx22sp (Integer)
           114 => ( Parameter_Integer, 0 ),   --  : intx23sp (Integer)
           115 => ( Parameter_Integer, 0 ),   --  : intx24sp (Integer)
           116 => ( Parameter_Integer, 0 ),   --  : intx25sp (Integer)
           117 => ( Parameter_Integer, 0 ),   --  : intx26sp (Integer)
           118 => ( Parameter_Integer, 0 ),   --  : intx27sp (Integer)
           119 => ( Parameter_Integer, 0 ),   --  : intx28sp (Integer)
           120 => ( Parameter_Integer, 0 ),   --  : intx29sp (Integer)
           121 => ( Parameter_Integer, 0 ),   --  : intx30sp (Integer)
           122 => ( Parameter_Integer, 0 ),   --  : invt1hd (Integer)
           123 => ( Parameter_Integer, 0 ),   --  : invt2hd (Integer)
           124 => ( Parameter_Integer, 0 ),   --  : invt3hd (Integer)
           125 => ( Parameter_Integer, 0 ),   --  : invt4hd (Integer)
           126 => ( Parameter_Integer, 0 ),   --  : invt5hd (Integer)
           127 => ( Parameter_Integer, 0 ),   --  : invt6hd (Integer)
           128 => ( Parameter_Integer, 0 ),   --  : invt7hd (Integer)
           129 => ( Parameter_Integer, 0 ),   --  : invt8hd (Integer)
           130 => ( Parameter_Integer, 0 ),   --  : invt9hd (Integer)
           131 => ( Parameter_Integer, 0 ),   --  : invt10hd (Integer)
           132 => ( Parameter_Integer, 0 ),   --  : invt11hd (Integer)
           133 => ( Parameter_Integer, 0 ),   --  : invt12hd (Integer)
           134 => ( Parameter_Integer, 0 ),   --  : invt13hd (Integer)
           135 => ( Parameter_Integer, 0 ),   --  : invt14hd (Integer)
           136 => ( Parameter_Integer, 0 ),   --  : invt15hd (Integer)
           137 => ( Parameter_Integer, 0 ),   --  : invt16hd (Integer)
           138 => ( Parameter_Integer, 0 ),   --  : invt17hd (Integer)
           139 => ( Parameter_Integer, 0 ),   --  : invt18hd (Integer)
           140 => ( Parameter_Integer, 0 ),   --  : invt19hd (Integer)
           141 => ( Parameter_Integer, 0 ),   --  : invt21hd (Integer)
           142 => ( Parameter_Integer, 0 ),   --  : invt22hd (Integer)
           143 => ( Parameter_Integer, 0 ),   --  : invt23hd (Integer)
           144 => ( Parameter_Integer, 0 ),   --  : invt24hd (Integer)
           145 => ( Parameter_Integer, 0 ),   --  : invt25hd (Integer)
           146 => ( Parameter_Integer, 0 ),   --  : invt26hd (Integer)
           147 => ( Parameter_Integer, 0 ),   --  : invt27hd (Integer)
           148 => ( Parameter_Integer, 0 ),   --  : invt28hd (Integer)
           149 => ( Parameter_Integer, 0 ),   --  : invt29hd (Integer)
           150 => ( Parameter_Integer, 0 ),   --  : invt30hd (Integer)
           151 => ( Parameter_Integer, 0 ),   --  : invt1sp (Integer)
           152 => ( Parameter_Integer, 0 ),   --  : invt2sp (Integer)
           153 => ( Parameter_Integer, 0 ),   --  : invt3sp (Integer)
           154 => ( Parameter_Integer, 0 ),   --  : invt4sp (Integer)
           155 => ( Parameter_Integer, 0 ),   --  : invt5sp (Integer)
           156 => ( Parameter_Integer, 0 ),   --  : invt6sp (Integer)
           157 => ( Parameter_Integer, 0 ),   --  : invt7sp (Integer)
           158 => ( Parameter_Integer, 0 ),   --  : invt8sp (Integer)
           159 => ( Parameter_Integer, 0 ),   --  : invt9sp (Integer)
           160 => ( Parameter_Integer, 0 ),   --  : invt10sp (Integer)
           161 => ( Parameter_Integer, 0 ),   --  : invt11sp (Integer)
           162 => ( Parameter_Integer, 0 ),   --  : invt12sp (Integer)
           163 => ( Parameter_Integer, 0 ),   --  : invt13sp (Integer)
           164 => ( Parameter_Integer, 0 ),   --  : invt14sp (Integer)
           165 => ( Parameter_Integer, 0 ),   --  : invt15sp (Integer)
           166 => ( Parameter_Integer, 0 ),   --  : invt16sp (Integer)
           167 => ( Parameter_Integer, 0 ),   --  : invt17sp (Integer)
           168 => ( Parameter_Integer, 0 ),   --  : invt18sp (Integer)
           169 => ( Parameter_Integer, 0 ),   --  : invt19sp (Integer)
           170 => ( Parameter_Integer, 0 ),   --  : invt21sp (Integer)
           171 => ( Parameter_Integer, 0 ),   --  : invt22sp (Integer)
           172 => ( Parameter_Integer, 0 ),   --  : invt23sp (Integer)
           173 => ( Parameter_Integer, 0 ),   --  : invt24sp (Integer)
           174 => ( Parameter_Integer, 0 ),   --  : invt25sp (Integer)
           175 => ( Parameter_Integer, 0 ),   --  : invt26sp (Integer)
           176 => ( Parameter_Integer, 0 ),   --  : invt27sp (Integer)
           177 => ( Parameter_Integer, 0 ),   --  : invt28sp (Integer)
           178 => ( Parameter_Integer, 0 ),   --  : invt29sp (Integer)
           179 => ( Parameter_Integer, 0 ),   --  : invt30sp (Integer)
           180 => ( Parameter_Integer, 0 ),   --  : nsa1hd (Integer)
           181 => ( Parameter_Integer, 0 ),   --  : nsa2hd (Integer)
           182 => ( Parameter_Integer, 0 ),   --  : nsa3hd (Integer)
           183 => ( Parameter_Integer, 0 ),   --  : nsa4hd (Integer)
           184 => ( Parameter_Integer, 0 ),   --  : nsa5hd (Integer)
           185 => ( Parameter_Integer, 0 ),   --  : nsa6hd (Integer)
           186 => ( Parameter_Integer, 0 ),   --  : nsa7hd (Integer)
           187 => ( Parameter_Integer, 0 ),   --  : nsa8hd (Integer)
           188 => ( Parameter_Integer, 0 ),   --  : nsa9hd (Integer)
           189 => ( Parameter_Integer, 0 ),   --  : nsa10hd (Integer)
           190 => ( Parameter_Integer, 0 ),   --  : nsa11hd (Integer)
           191 => ( Parameter_Integer, 0 ),   --  : nsa12hd (Integer)
           192 => ( Parameter_Integer, 0 ),   --  : nsa13hd (Integer)
           193 => ( Parameter_Integer, 0 ),   --  : nsa14hd (Integer)
           194 => ( Parameter_Integer, 0 ),   --  : nsa15hd (Integer)
           195 => ( Parameter_Integer, 0 ),   --  : nsa16hd (Integer)
           196 => ( Parameter_Integer, 0 ),   --  : nsa17hd (Integer)
           197 => ( Parameter_Integer, 0 ),   --  : nsa18hd (Integer)
           198 => ( Parameter_Integer, 0 ),   --  : nsa19hd (Integer)
           199 => ( Parameter_Integer, 0 ),   --  : nsa21hd (Integer)
           200 => ( Parameter_Integer, 0 ),   --  : nsa22hd (Integer)
           201 => ( Parameter_Integer, 0 ),   --  : nsa23hd (Integer)
           202 => ( Parameter_Integer, 0 ),   --  : nsa24hd (Integer)
           203 => ( Parameter_Integer, 0 ),   --  : nsa25hd (Integer)
           204 => ( Parameter_Integer, 0 ),   --  : nsa26hd (Integer)
           205 => ( Parameter_Integer, 0 ),   --  : nsa27hd (Integer)
           206 => ( Parameter_Integer, 0 ),   --  : nsa28hd (Integer)
           207 => ( Parameter_Integer, 0 ),   --  : nsa29hd (Integer)
           208 => ( Parameter_Integer, 0 ),   --  : nsa30hd (Integer)
           209 => ( Parameter_Integer, 0 ),   --  : nsa1sp (Integer)
           210 => ( Parameter_Integer, 0 ),   --  : nsa2sp (Integer)
           211 => ( Parameter_Integer, 0 ),   --  : nsa3sp (Integer)
           212 => ( Parameter_Integer, 0 ),   --  : nsa4sp (Integer)
           213 => ( Parameter_Integer, 0 ),   --  : nsa5sp (Integer)
           214 => ( Parameter_Integer, 0 ),   --  : nsa6sp (Integer)
           215 => ( Parameter_Integer, 0 ),   --  : nsa7sp (Integer)
           216 => ( Parameter_Integer, 0 ),   --  : nsa8sp (Integer)
           217 => ( Parameter_Integer, 0 ),   --  : nsa9sp (Integer)
           218 => ( Parameter_Integer, 0 ),   --  : nsa10sp (Integer)
           219 => ( Parameter_Integer, 0 ),   --  : nsa11sp (Integer)
           220 => ( Parameter_Integer, 0 ),   --  : nsa12sp (Integer)
           221 => ( Parameter_Integer, 0 ),   --  : nsa13sp (Integer)
           222 => ( Parameter_Integer, 0 ),   --  : nsa14sp (Integer)
           223 => ( Parameter_Integer, 0 ),   --  : nsa15sp (Integer)
           224 => ( Parameter_Integer, 0 ),   --  : nsa16sp (Integer)
           225 => ( Parameter_Integer, 0 ),   --  : nsa17sp (Integer)
           226 => ( Parameter_Integer, 0 ),   --  : nsa18sp (Integer)
           227 => ( Parameter_Integer, 0 ),   --  : nsa19sp (Integer)
           228 => ( Parameter_Integer, 0 ),   --  : nsa21sp (Integer)
           229 => ( Parameter_Integer, 0 ),   --  : nsa22sp (Integer)
           230 => ( Parameter_Integer, 0 ),   --  : nsa23sp (Integer)
           231 => ( Parameter_Integer, 0 ),   --  : nsa24sp (Integer)
           232 => ( Parameter_Integer, 0 ),   --  : nsa25sp (Integer)
           233 => ( Parameter_Integer, 0 ),   --  : nsa26sp (Integer)
           234 => ( Parameter_Integer, 0 ),   --  : nsa27sp (Integer)
           235 => ( Parameter_Integer, 0 ),   --  : nsa28sp (Integer)
           236 => ( Parameter_Integer, 0 ),   --  : nsa29sp (Integer)
           237 => ( Parameter_Integer, 0 ),   --  : nsa30sp (Integer)
           238 => ( Parameter_Integer, 0 ),   --  : ablehd (Integer)
           239 => ( Parameter_Integer, 0 ),   --  : ablesp (Integer)
           240 => ( Parameter_Integer, 0 ),   --  : abs1pdhd (Integer)
           241 => ( Parameter_Integer, 0 ),   --  : abs1pdsp (Integer)
           242 => ( Parameter_Integer, 0 ),   --  : absparhd (Integer)
           243 => ( Parameter_Integer, 0 ),   --  : absparsp (Integer)
           244 => ( Parameter_Integer, 0 ),   --  : abspayhd (Integer)
           245 => ( Parameter_Integer, 0 ),   --  : abspaysp (Integer)
           246 => ( Parameter_Integer, 0 ),   --  : abswhyhd (Integer)
           247 => ( Parameter_Integer, 0 ),   --  : abswhysp (Integer)
           248 => ( Parameter_Integer, 0 ),   --  : abswkhd (Integer)
           249 => ( Parameter_Integer, 0 ),   --  : abswksp (Integer)
           250 => ( Parameter_Integer, 0 ),   --  : acshd (Integer)
           251 => ( Parameter_Integer, 0 ),   --  : acssp (Integer)
           252 => ( Parameter_Integer, 0 ),   --  : acctqhd (Integer)
           253 => ( Parameter_Integer, 0 ),   --  : acctqsp (Integer)
           254 => ( Parameter_Float, 0.0 ),   --  : acsamthd (Amount)
           255 => ( Parameter_Float, 0.0 ),   --  : acsamtsp (Amount)
           256 => ( Parameter_Integer, 0 ),   --  : acspdhd (Integer)
           257 => ( Parameter_Integer, 0 ),   --  : acspdsp (Integer)
           258 => ( Parameter_Integer, 0 ),   --  : actacihd (Integer)
           259 => ( Parameter_Integer, 0 ),   --  : actacisp (Integer)
           260 => ( Parameter_Integer, 0 ),   --  : emahd (Integer)
           261 => ( Parameter_Integer, 0 ),   --  : emasp (Integer)
           262 => ( Parameter_Float, 0.0 ),   --  : emaamthd (Amount)
           263 => ( Parameter_Integer, 0 ),   --  : emaamtsp (Integer)
           264 => ( Parameter_Integer, 0 ),   --  : emapdhd (Integer)
           265 => ( Parameter_Integer, 0 ),   --  : emapdsp (Integer)
           266 => ( Parameter_Integer, 0 ),   --  : agehd (Integer)
           267 => ( Parameter_Integer, 0 ),   --  : agesp (Integer)
           268 => ( Parameter_Integer, 0 ),   --  : agehqhd (Integer)
           269 => ( Parameter_Integer, 0 ),   --  : agehqsp (Integer)
           270 => ( Parameter_Float, 0.0 ),   --  : aliamthd (Amount)
           271 => ( Parameter_Float, 0.0 ),   --  : aliamtsp (Amount)
           272 => ( Parameter_Integer, 0 ),   --  : alimnyhd (Integer)
           273 => ( Parameter_Integer, 0 ),   --  : alimnysp (Integer)
           274 => ( Parameter_Integer, 0 ),   --  : alipdhd (Integer)
           275 => ( Parameter_Integer, 0 ),   --  : alipdsp (Integer)
           276 => ( Parameter_Integer, 0 ),   --  : aliushd (Integer)
           277 => ( Parameter_Integer, 0 ),   --  : aliussp (Integer)
           278 => ( Parameter_Float, 0.0 ),   --  : absallhd (Amount)
           279 => ( Parameter_Float, 0.0 ),   --  : absallsp (Amount)
           280 => ( Parameter_Float, 0.0 ),   --  : organhd (Amount)
           281 => ( Parameter_Float, 0.0 ),   --  : organsp (Amount)
           282 => ( Parameter_Float, 0.0 ),   --  : fosterhd (Amount)
           283 => ( Parameter_Float, 0.0 ),   --  : fostersp (Amount)
           284 => ( Parameter_Float, 0.0 ),   --  : adopthd (Amount)
           285 => ( Parameter_Float, 0.0 ),   --  : adoptsp (Amount)
           286 => ( Parameter_Integer, 0 ),   --  : pasbalhd (Integer)
           287 => ( Parameter_Integer, 0 ),   --  : pasbalsp (Integer)
           288 => ( Parameter_Integer, 0 ),   --  : porganhd (Integer)
           289 => ( Parameter_Integer, 0 ),   --  : porgansp (Integer)
           290 => ( Parameter_Integer, 0 ),   --  : pfostehd (Integer)
           291 => ( Parameter_Integer, 0 ),   --  : pfostesp (Integer)
           292 => ( Parameter_Integer, 0 ),   --  : padopthd (Integer)
           293 => ( Parameter_Integer, 0 ),   --  : padoptsp (Integer)
           294 => ( Parameter_Integer, 0 ),   --  : aluamthd (Integer)
           295 => ( Parameter_Integer, 0 ),   --  : aluamtsp (Integer)
           296 => ( Parameter_Integer, 0 ),   --  : alupdhd (Integer)
           297 => ( Parameter_Integer, 0 ),   --  : alupdsp (Integer)
           298 => ( Parameter_Integer, 0 ),   --  : anyacchd (Integer)
           299 => ( Parameter_Integer, 0 ),   --  : anyaccsp (Integer)
           300 => ( Parameter_Integer, 0 ),   --  : anyedhd (Integer)
           301 => ( Parameter_Integer, 0 ),   --  : anyedsp (Integer)
           302 => ( Parameter_Integer, 0 ),   --  : anymonhd (Integer)
           303 => ( Parameter_Integer, 0 ),   --  : anymonsp (Integer)
           304 => ( Parameter_Integer, 0 ),   --  : anype1hd (Integer)
           305 => ( Parameter_Integer, 0 ),   --  : anype1sp (Integer)
           306 => ( Parameter_Integer, 0 ),   --  : anype2hd (Integer)
           307 => ( Parameter_Integer, 0 ),   --  : anype2sp (Integer)
           308 => ( Parameter_Integer, 0 ),   --  : anype3hd (Integer)
           309 => ( Parameter_Integer, 0 ),   --  : anype3sp (Integer)
           310 => ( Parameter_Integer, 0 ),   --  : anype4hd (Integer)
           311 => ( Parameter_Integer, 0 ),   --  : anype4sp (Integer)
           312 => ( Parameter_Integer, 0 ),   --  : anype5hd (Integer)
           313 => ( Parameter_Integer, 0 ),   --  : anype5sp (Integer)
           314 => ( Parameter_Integer, 0 ),   --  : anype6hd (Integer)
           315 => ( Parameter_Integer, 0 ),   --  : anype6sp (Integer)
           316 => ( Parameter_Integer, 0 ),   --  : anype7hd (Integer)
           317 => ( Parameter_Integer, 0 ),   --  : anype7sp (Integer)
           318 => ( Parameter_Float, 0.0 ),   --  : abspamhd (Amount)
           319 => ( Parameter_Integer, 0 ),   --  : abspamsp (Integer)
           320 => ( Parameter_Float, 0.0 ),   --  : abspexhd (Amount)
           321 => ( Parameter_Integer, 0 ),   --  : abspexsp (Integer)
           322 => ( Parameter_Integer, 0 ),   --  : apdpdhd (Integer)
           323 => ( Parameter_Integer, 0 ),   --  : apdpdsp (Integer)
           324 => ( Parameter_Integer, 0 ),   --  : pabspahd (Integer)
           325 => ( Parameter_Integer, 0 ),   --  : pabspasp (Integer)
           326 => ( Parameter_Integer, 0 ),   --  : basacthd (Integer)
           327 => ( Parameter_Integer, 0 ),   --  : basactsp (Integer)
           328 => ( Parameter_Integer, 0 ),   --  : bfdhd (Integer)
           329 => ( Parameter_Integer, 0 ),   --  : bfdsp (Integer)
           330 => ( Parameter_Float, 0.0 ),   --  : bfdamthd (Amount)
           331 => ( Parameter_Float, 0.0 ),   --  : bfdamtsp (Amount)
           332 => ( Parameter_Integer, 0 ),   --  : pbfdhd (Integer)
           333 => ( Parameter_Integer, 0 ),   --  : pbfdsp (Integer)
           334 => ( Parameter_Integer, 0 ),   --  : bfdvalhd (Integer)
           335 => ( Parameter_Integer, 0 ),   --  : bfdvalsp (Integer)
           336 => ( Parameter_Integer, 0 ),   --  : careabhd (Integer)
           337 => ( Parameter_Integer, 0 ),   --  : careabsp (Integer)
           338 => ( Parameter_Integer, 0 ),   --  : careahhd (Integer)
           339 => ( Parameter_Integer, 0 ),   --  : careahsp (Integer)
           340 => ( Parameter_Integer, 0 ),   --  : carecbhd (Integer)
           341 => ( Parameter_Integer, 0 ),   --  : carecbsp (Integer)
           342 => ( Parameter_Integer, 0 ),   --  : carechhd (Integer)
           343 => ( Parameter_Integer, 0 ),   --  : carechsp (Integer)
           344 => ( Parameter_Integer, 0 ),   --  : careclhd (Integer)
           345 => ( Parameter_Integer, 0 ),   --  : careclsp (Integer)
           346 => ( Parameter_Integer, 0 ),   --  : careflhd (Integer)
           347 => ( Parameter_Integer, 0 ),   --  : careflsp (Integer)
           348 => ( Parameter_Integer, 0 ),   --  : carefrhd (Integer)
           349 => ( Parameter_Integer, 0 ),   --  : carefrsp (Integer)
           350 => ( Parameter_Integer, 0 ),   --  : careothd (Integer)
           351 => ( Parameter_Integer, 0 ),   --  : careotsp (Integer)
           352 => ( Parameter_Integer, 0 ),   --  : carerhd (Integer)
           353 => ( Parameter_Integer, 0 ),   --  : carersp (Integer)
           354 => ( Parameter_Integer, 0 ),   --  : cbaamthd (Integer)
           355 => ( Parameter_Integer, 0 ),   --  : cbaamtsp (Integer)
           356 => ( Parameter_Integer, 0 ),   --  : cbchkhd (Integer)
           357 => ( Parameter_Integer, 0 ),   --  : cbchksp (Integer)
           358 => ( Parameter_Integer, 0 ),   --  : changehd (Integer)
           359 => ( Parameter_Integer, 0 ),   --  : changesp (Integer)
           360 => ( Parameter_Integer, 0 ),   --  : chbflghd (Integer)
           361 => ( Parameter_Integer, 0 ),   --  : chbflgsp (Integer)
           362 => ( Parameter_Integer, 0 ),   --  : chknophd (Integer)
           363 => ( Parameter_Integer, 0 ),   --  : chknopsp (Integer)
           364 => ( Parameter_Integer, 0 ),   --  : fpchd (Integer)
           365 => ( Parameter_Integer, 0 ),   --  : fpcsp (Integer)
           366 => ( Parameter_Integer, 0 ),   --  : fuchd (Integer)
           367 => ( Parameter_Integer, 0 ),   --  : fucsp (Integer)
           368 => ( Parameter_Integer, 0 ),   --  : fhbhd (Integer)
           369 => ( Parameter_Integer, 0 ),   --  : fhbsp (Integer)
           370 => ( Parameter_Integer, 0 ),   --  : fwtchd (Integer)
           371 => ( Parameter_Integer, 0 ),   --  : fwtcsp (Integer)
           372 => ( Parameter_Integer, 0 ),   --  : fctchd (Integer)
           373 => ( Parameter_Integer, 0 ),   --  : fctcsp (Integer)
           374 => ( Parameter_Integer, 0 ),   --  : fishd (Integer)
           375 => ( Parameter_Integer, 0 ),   --  : fissp (Integer)
           376 => ( Parameter_Integer, 0 ),   --  : fjsahd (Integer)
           377 => ( Parameter_Integer, 0 ),   --  : fjsasp (Integer)
           378 => ( Parameter_Integer, 0 ),   --  : fesahd (Integer)
           379 => ( Parameter_Integer, 0 ),   --  : fesasp (Integer)
           380 => ( Parameter_Integer, 0 ),   --  : claimahd (Integer)
           381 => ( Parameter_Integer, 0 ),   --  : claimasp (Integer)
           382 => ( Parameter_Integer, 0 ),   --  : cohabhd (Integer)
           383 => ( Parameter_Integer, 0 ),   --  : cohabsp (Integer)
           384 => ( Parameter_Integer, 0 ),   --  : condithd (Integer)
           385 => ( Parameter_Integer, 0 ),   --  : conditsp (Integer)
           386 => ( Parameter_Integer, 0 ),   --  : blodgehd (Integer)
           387 => ( Parameter_Integer, 0 ),   --  : blodgesp (Integer)
           388 => ( Parameter_Integer, 0 ),   --  : ctclm1hd (Integer)
           389 => ( Parameter_Integer, 0 ),   --  : ctclm1sp (Integer)
           390 => ( Parameter_Integer, 0 ),   --  : ctclm2hd (Integer)
           391 => ( Parameter_Integer, 0 ),   --  : ctclm2sp (Integer)
           392 => ( Parameter_Integer, 0 ),   --  : cupchkhd (Integer)
           393 => ( Parameter_Integer, 0 ),   --  : cupchksp (Integer)
           394 => ( Parameter_Integer, 0 ),   --  : curacthd (Integer)
           395 => ( Parameter_Integer, 0 ),   --  : curactsp (Integer)
           396 => ( Parameter_Integer, 0 ),   --  : curqulhd (Integer)
           397 => ( Parameter_Integer, 0 ),   --  : curqulsp (Integer)
           398 => ( Parameter_Integer, 0 ),   --  : blheadhd (Integer)
           399 => ( Parameter_Integer, 0 ),   --  : blheadsp (Integer)
           400 => ( Parameter_Float, 0.0 ),   --  : blrenthd (Amount)
           401 => ( Parameter_Float, 0.0 ),   --  : blrentsp (Amount)
           402 => ( Parameter_Integer, 0 ),   --  : pblrenhd (Integer)
           403 => ( Parameter_Integer, 0 ),   --  : pblrensp (Integer)
           404 => ( Parameter_Integer, 0 ),   --  : ddaprghd (Integer)
           405 => ( Parameter_Integer, 0 ),   --  : ddaprgsp (Integer)
           406 => ( Parameter_Integer, 0 ),   --  : ddatrehd (Integer)
           407 => ( Parameter_Integer, 0 ),   --  : ddatresp (Integer)
           408 => ( Parameter_Integer, 0 ),   --  : ddatrphd (Integer)
           409 => ( Parameter_Integer, 0 ),   --  : ddatrpsp (Integer)
           410 => ( Parameter_Integer, 0 ),   --  : defrpnhd (Integer)
           411 => ( Parameter_Integer, 0 ),   --  : defrpnsp (Integer)
           412 => ( Parameter_Integer, 0 ),   --  : dependhd (Integer)
           413 => ( Parameter_Integer, 0 ),   --  : dependsp (Integer)
           414 => ( Parameter_Integer, 0 ),   --  : disacahd (Integer)
           415 => ( Parameter_Integer, 0 ),   --  : disacasp (Integer)
           416 => ( Parameter_Integer, 0 ),   --  : qpiphd (Integer)
           417 => ( Parameter_Integer, 0 ),   --  : qpipsp (Integer)
           418 => ( Parameter_Integer, 0 ),   --  : qdlahd (Integer)
           419 => ( Parameter_Integer, 0 ),   --  : qdlasp (Integer)
           420 => ( Parameter_Integer, 0 ),   --  : qaahd (Integer)
           421 => ( Parameter_Integer, 0 ),   --  : qaasp (Integer)
           422 => ( Parameter_Integer, 0 ),   --  : qsdahd (Integer)
           423 => ( Parameter_Integer, 0 ),   --  : qsdasp (Integer)
           424 => ( Parameter_Integer, 0 ),   --  : qibhd (Integer)
           425 => ( Parameter_Integer, 0 ),   --  : qibsp (Integer)
           426 => ( Parameter_Integer, 0 ),   --  : qiidbhd (Integer)
           427 => ( Parameter_Integer, 0 ),   --  : qiidbsp (Integer)
           428 => ( Parameter_Integer, 0 ),   --  : discoahd (Integer)
           429 => ( Parameter_Integer, 0 ),   --  : discoasp (Integer)
           430 => ( Parameter_Integer, 0 ),   --  : disd01hd (Integer)
           431 => ( Parameter_Integer, 0 ),   --  : disd01sp (Integer)
           432 => ( Parameter_Integer, 0 ),   --  : disd02hd (Integer)
           433 => ( Parameter_Integer, 0 ),   --  : disd02sp (Integer)
           434 => ( Parameter_Integer, 0 ),   --  : disd03hd (Integer)
           435 => ( Parameter_Integer, 0 ),   --  : disd03sp (Integer)
           436 => ( Parameter_Integer, 0 ),   --  : disd04hd (Integer)
           437 => ( Parameter_Integer, 0 ),   --  : disd04sp (Integer)
           438 => ( Parameter_Integer, 0 ),   --  : disd05hd (Integer)
           439 => ( Parameter_Integer, 0 ),   --  : disd05sp (Integer)
           440 => ( Parameter_Integer, 0 ),   --  : disd06hd (Integer)
           441 => ( Parameter_Integer, 0 ),   --  : disd06sp (Integer)
           442 => ( Parameter_Integer, 0 ),   --  : disd07hd (Integer)
           443 => ( Parameter_Integer, 0 ),   --  : disd07sp (Integer)
           444 => ( Parameter_Integer, 0 ),   --  : disd08hd (Integer)
           445 => ( Parameter_Integer, 0 ),   --  : disd08sp (Integer)
           446 => ( Parameter_Integer, 0 ),   --  : disd09hd (Integer)
           447 => ( Parameter_Integer, 0 ),   --  : disd09sp (Integer)
           448 => ( Parameter_Integer, 0 ),   --  : disd10hd (Integer)
           449 => ( Parameter_Integer, 0 ),   --  : disd10sp (Integer)
           450 => ( Parameter_Integer, 0 ),   --  : disdifhd (Integer)
           451 => ( Parameter_Integer, 0 ),   --  : disdifsp (Integer)
           452 => ( Parameter_Integer, 0 ),   --  : dlachd (Integer)
           453 => ( Parameter_Integer, 0 ),   --  : dlacsp (Integer)
           454 => ( Parameter_Integer, 0 ),   --  : dlamhd (Integer)
           455 => ( Parameter_Integer, 0 ),   --  : dlamsp (Integer)
           456 => ( Parameter_Integer, 0 ),   --  : dlshd (Integer)
           457 => ( Parameter_Integer, 0 ),   --  : dlssp (Integer)
           458 => ( Parameter_Float, 0.0 ),   --  : dlsamthd (Amount)
           459 => ( Parameter_Float, 0.0 ),   --  : dlsamtsp (Amount)
           460 => ( Parameter_Integer, 0 ),   --  : pdlshd (Integer)
           461 => ( Parameter_Integer, 0 ),   --  : pdlssp (Integer)
           462 => ( Parameter_Integer, 0 ),   --  : dlsvalhd (Integer)
           463 => ( Parameter_Integer, 0 ),   --  : dlsvalsp (Integer)
           464 => ( Parameter_Integer, 0 ),   --  : dobhd (Integer)
           465 => ( Parameter_Integer, 0 ),   --  : dobsp (Integer)
           466 => ( Parameter_Integer, 0 ),   --  : h3qualhd (Integer)
           467 => ( Parameter_Integer, 0 ),   --  : h3qualsp (Integer)
           468 => ( Parameter_Integer, 0 ),   --  : dvil3ahd (Integer)
           469 => ( Parameter_Integer, 0 ),   --  : dvil3asp (Integer)
           470 => ( Parameter_Integer, 0 ),   --  : dvil4ahd (Integer)
           471 => ( Parameter_Integer, 0 ),   --  : dvil4asp (Integer)
           472 => ( Parameter_Integer, 0 ),   --  : dvjb12hd (Integer)
           473 => ( Parameter_Integer, 0 ),   --  : dvjb12sp (Integer)
           474 => ( Parameter_Integer, 0 ),   --  : dvmarhd (Integer)
           475 => ( Parameter_Integer, 0 ),   --  : dvmarsp (Integer)
           476 => ( Parameter_Integer, 0 ),   --  : edl1ahd (Integer)
           477 => ( Parameter_Integer, 0 ),   --  : edl1asp (Integer)
           478 => ( Parameter_Integer, 0 ),   --  : pedl1ahd (Integer)
           479 => ( Parameter_Integer, 0 ),   --  : pedl1asp (Integer)
           480 => ( Parameter_Integer, 0 ),   --  : edl1obhd (Integer)
           481 => ( Parameter_Integer, 0 ),   --  : edl1obsp (Integer)
           482 => ( Parameter_Integer, 0 ),   --  : edl2ahd (Integer)
           483 => ( Parameter_Integer, 0 ),   --  : edl2asp (Integer)
           484 => ( Parameter_Integer, 0 ),   --  : pedl2ahd (Integer)
           485 => ( Parameter_Integer, 0 ),   --  : pedl2asp (Integer)
           486 => ( Parameter_Integer, 0 ),   --  : edl2obhd (Integer)
           487 => ( Parameter_Integer, 0 ),   --  : edl2obsp (Integer)
           488 => ( Parameter_Integer, 0 ),   --  : edatthd (Integer)
           489 => ( Parameter_Integer, 0 ),   --  : edattsp (Integer)
           490 => ( Parameter_Integer, 0 ),   --  : edhrhd (Integer)
           491 => ( Parameter_Integer, 0 ),   --  : edhrsp (Integer)
           492 => ( Parameter_Integer, 0 ),   --  : edtyphd (Integer)
           493 => ( Parameter_Integer, 0 ),   --  : edtypsp (Integer)
           494 => ( Parameter_Integer, 0 ),   --  : empconhd (Integer)
           495 => ( Parameter_Integer, 0 ),   --  : empconsp (Integer)
           496 => ( Parameter_Float, 0.0 ),   --  : empocchd (Amount)
           497 => ( Parameter_Float, 0.0 ),   --  : empoccsp (Amount)
           498 => ( Parameter_Integer, 0 ),   --  : empshd (Integer)
           499 => ( Parameter_Integer, 0 ),   --  : empssp (Integer)
           500 => ( Parameter_Integer, 0 ),   --  : empbhd (Integer)
           501 => ( Parameter_Integer, 0 ),   --  : empbsp (Integer)
           502 => ( Parameter_Integer, 0 ),   --  : empchd (Integer)
           503 => ( Parameter_Integer, 0 ),   --  : empcsp (Integer)
           504 => ( Parameter_Integer, 0 ),   --  : empilohd (Integer)
           505 => ( Parameter_Integer, 0 ),   --  : empilosp (Integer)
           506 => ( Parameter_Integer, 0 ),   --  : es2000hd (Integer)
           507 => ( Parameter_Integer, 0 ),   --  : es2000sp (Integer)
           508 => ( Parameter_Integer, 0 ),   --  : ethgr3hd (Integer)
           509 => ( Parameter_Integer, 0 ),   --  : ethgr3sp (Integer)
           510 => ( Parameter_Integer, 0 ),   --  : ethgpshd (Integer)
           511 => ( Parameter_Integer, 0 ),   --  : ethgpssp (Integer)
           512 => ( Parameter_Integer, 0 ),   --  : etngrphd (Integer)
           513 => ( Parameter_Integer, 0 ),   --  : etngrpsp (Integer)
           514 => ( Parameter_Float, 0.0 ),   --  : eualamhd (Amount)
           515 => ( Parameter_Float, 0.0 ),   --  : eualamsp (Amount)
           516 => ( Parameter_Integer, 0 ),   --  : eualmnhd (Integer)
           517 => ( Parameter_Integer, 0 ),   --  : eualmnsp (Integer)
           518 => ( Parameter_Integer, 0 ),   --  : peualihd (Integer)
           519 => ( Parameter_Integer, 0 ),   --  : peualisp (Integer)
           520 => ( Parameter_Integer, 0 ),   --  : euetyphd (Integer)
           521 => ( Parameter_Integer, 0 ),   --  : euetypsp (Integer)
           522 => ( Parameter_Integer, 0 ),   --  : everwkhd (Integer)
           523 => ( Parameter_Integer, 0 ),   --  : everwksp (Integer)
           524 => ( Parameter_Integer, 0 ),   --  : ehbct1hd (Integer)
           525 => ( Parameter_Integer, 0 ),   --  : ehbct1sp (Integer)
           526 => ( Parameter_Integer, 0 ),   --  : fllwphd (Integer)
           527 => ( Parameter_Integer, 0 ),   --  : fllwpsp (Integer)
           528 => ( Parameter_Integer, 0 ),   --  : ftedhd (Integer)
           529 => ( Parameter_Integer, 0 ),   --  : ftedsp (Integer)
           530 => ( Parameter_Integer, 0 ),   --  : ftwkyrhd (Integer)
           531 => ( Parameter_Integer, 0 ),   --  : ftwkyrsp (Integer)
           532 => ( Parameter_Integer, 0 ),   --  : gebacthd (Integer)
           533 => ( Parameter_Integer, 0 ),   --  : gebactsp (Integer)
           534 => ( Parameter_Integer, 0 ),   --  : giltcthd (Integer)
           535 => ( Parameter_Integer, 0 ),   --  : giltctsp (Integer)
           536 => ( Parameter_Integer, 0 ),   --  : gpispchd (Integer)
           537 => ( Parameter_Integer, 0 ),   --  : gpispcsp (Integer)
           538 => ( Parameter_Integer, 0 ),   --  : gpjesahd (Integer)
           539 => ( Parameter_Integer, 0 ),   --  : gpjesasp (Integer)
           540 => ( Parameter_Integer, 0 ),   --  : gpuchd (Integer)
           541 => ( Parameter_Integer, 0 ),   --  : gpucsp (Integer)
           542 => ( Parameter_Integer, 0 ),   --  : granthd (Integer)
           543 => ( Parameter_Integer, 0 ),   --  : grantsp (Integer)
           544 => ( Parameter_Integer, 0 ),   --  : gt1valhd (Integer)
           545 => ( Parameter_Float, 0.0 ),   --  : gt1valsp (Amount)
           546 => ( Parameter_Integer, 0 ),   --  : gt2valhd (Integer)
           547 => ( Parameter_Integer, 0 ),   --  : gt2valsp (Integer)
           548 => ( Parameter_Integer, 0 ),   --  : gt1dirhd (Integer)
           549 => ( Parameter_Float, 0.0 ),   --  : gt1dirsp (Amount)
           550 => ( Parameter_Integer, 0 ),   --  : gt2dirhd (Integer)
           551 => ( Parameter_Integer, 0 ),   --  : gt2dirsp (Integer)
           552 => ( Parameter_Integer, 0 ),   --  : grtnumhd (Integer)
           553 => ( Parameter_Integer, 0 ),   --  : grtnumsp (Integer)
           554 => ( Parameter_Integer, 0 ),   --  : gt1scehd (Integer)
           555 => ( Parameter_Integer, 0 ),   --  : gt1scesp (Integer)
           556 => ( Parameter_Integer, 0 ),   --  : gt2scehd (Integer)
           557 => ( Parameter_Integer, 0 ),   --  : gt2scesp (Integer)
           558 => ( Parameter_Integer, 0 ),   --  : gt1oshd (Integer)
           559 => ( Parameter_Integer, 0 ),   --  : gt1ossp (Integer)
           560 => ( Parameter_Integer, 0 ),   --  : gt2oshd (Integer)
           561 => ( Parameter_Integer, 0 ),   --  : gt2ossp (Integer)
           562 => ( Parameter_Integer, 0 ),   --  : gtahd (Integer)
           563 => ( Parameter_Integer, 0 ),   --  : gtasp (Integer)
           564 => ( Parameter_Integer, 0 ),   --  : healthhd (Integer)
           565 => ( Parameter_Integer, 0 ),   --  : healthsp (Integer)
           566 => ( Parameter_Float, 0.0 ),   --  : heartvhd (Amount)
           567 => ( Parameter_Float, 0.0 ),   --  : heartvsp (Amount)
           568 => ( Parameter_Integer, 0 ),   --  : heatadhd (Integer)
           569 => ( Parameter_Integer, 0 ),   --  : heatadsp (Integer)
           570 => ( Parameter_Integer, 0 ),   --  : hholdrhd (Integer)
           571 => ( Parameter_Integer, 0 ),   --  : hholdrsp (Integer)
           572 => ( Parameter_Integer, 0 ),   --  : hourabhd (Integer)
           573 => ( Parameter_Integer, 0 ),   --  : hourabsp (Integer)
           574 => ( Parameter_Integer, 0 ),   --  : hourahhd (Integer)
           575 => ( Parameter_Integer, 0 ),   --  : hourahsp (Integer)
           576 => ( Parameter_Float, 0.0 ),   --  : hrcarehd (Amount)
           577 => ( Parameter_Float, 0.0 ),   --  : hrcaresp (Amount)
           578 => ( Parameter_Integer, 0 ),   --  : hourcbhd (Integer)
           579 => ( Parameter_Integer, 0 ),   --  : hourcbsp (Integer)
           580 => ( Parameter_Integer, 0 ),   --  : hourchhd (Integer)
           581 => ( Parameter_Integer, 0 ),   --  : hourchsp (Integer)
           582 => ( Parameter_Integer, 0 ),   --  : hourclhd (Integer)
           583 => ( Parameter_Integer, 0 ),   --  : hourclsp (Integer)
           584 => ( Parameter_Integer, 0 ),   --  : hourfrhd (Integer)
           585 => ( Parameter_Integer, 0 ),   --  : hourfrsp (Integer)
           586 => ( Parameter_Integer, 0 ),   --  : hourothd (Integer)
           587 => ( Parameter_Integer, 0 ),   --  : hourotsp (Integer)
           588 => ( Parameter_Integer, 0 ),   --  : hourrehd (Integer)
           589 => ( Parameter_Integer, 0 ),   --  : hourresp (Integer)
           590 => ( Parameter_Integer, 0 ),   --  : hourtthd (Integer)
           591 => ( Parameter_Integer, 0 ),   --  : hourttsp (Integer)
           592 => ( Parameter_Integer, 0 ),   --  : hpersohd (Integer)
           593 => ( Parameter_Integer, 0 ),   --  : hpersosp (Integer)
           594 => ( Parameter_Integer, 0 ),   --  : hrpidhd (Integer)
           595 => ( Parameter_Integer, 0 ),   --  : hrpidsp (Integer)
           596 => ( Parameter_Integer, 0 ),   --  : hsvperhd (Integer)
           597 => ( Parameter_Integer, 0 ),   --  : hsvpersp (Integer)
           598 => ( Parameter_Integer, 0 ),   --  : agegp2hd (Integer)
           599 => ( Parameter_Integer, 0 ),   --  : agegp2sp (Integer)
           600 => ( Parameter_Integer, 0 ),   --  : agegphd (Integer)
           601 => ( Parameter_Integer, 0 ),   --  : agegpsp (Integer)
           602 => ( Parameter_Integer, 0 ),   --  : quninshd (Integer)
           603 => ( Parameter_Integer, 0 ),   --  : quninssp (Integer)
           604 => ( Parameter_Integer, 0 ),   --  : qtubenhd (Integer)
           605 => ( Parameter_Integer, 0 ),   --  : qtubensp (Integer)
           606 => ( Parameter_Integer, 0 ),   --  : qsicinhd (Integer)
           607 => ( Parameter_Integer, 0 ),   --  : qsicinsp (Integer)
           608 => ( Parameter_Integer, 0 ),   --  : qaccinhd (Integer)
           609 => ( Parameter_Integer, 0 ),   --  : qaccinsp (Integer)
           610 => ( Parameter_Integer, 0 ),   --  : qpehinhd (Integer)
           611 => ( Parameter_Integer, 0 ),   --  : qpehinsp (Integer)
           612 => ( Parameter_Integer, 0 ),   --  : qhosinhd (Integer)
           613 => ( Parameter_Integer, 0 ),   --  : qhosinsp (Integer)
           614 => ( Parameter_Integer, 0 ),   --  : qfsbenhd (Integer)
           615 => ( Parameter_Integer, 0 ),   --  : qfsbensp (Integer)
           616 => ( Parameter_Integer, 0 ),   --  : qcichd (Integer)
           617 => ( Parameter_Integer, 0 ),   --  : qcicsp (Integer)
           618 => ( Parameter_Integer, 0 ),   --  : qotbenhd (Integer)
           619 => ( Parameter_Integer, 0 ),   --  : qotbensp (Integer)
           620 => ( Parameter_Integer, 0 ),   --  : incdurhd (Integer)
           621 => ( Parameter_Integer, 0 ),   --  : incdursp (Integer)
           622 => ( Parameter_Integer, 0 ),   --  : incsehd (Integer)
           623 => ( Parameter_Integer, 0 ),   --  : incsesp (Integer)
           624 => ( Parameter_Integer, 0 ),   --  : indinchd (Integer)
           625 => ( Parameter_Integer, 0 ),   --  : indincsp (Integer)
           626 => ( Parameter_Integer, 0 ),   --  : indisbhd (Integer)
           627 => ( Parameter_Integer, 0 ),   --  : indisbsp (Integer)
           628 => ( Parameter_Integer, 0 ),   --  : inearnhd (Integer)
           629 => ( Parameter_Integer, 0 ),   --  : inearnsp (Integer)
           630 => ( Parameter_Integer, 0 ),   --  : ininvhd (Integer)
           631 => ( Parameter_Integer, 0 ),   --  : ininvsp (Integer)
           632 => ( Parameter_Integer, 0 ),   --  : inirbehd (Integer)
           633 => ( Parameter_Integer, 0 ),   --  : inirbesp (Integer)
           634 => ( Parameter_Integer, 0 ),   --  : injlonhd (Integer)
           635 => ( Parameter_Integer, 0 ),   --  : injlonsp (Integer)
           636 => ( Parameter_Integer, 0 ),   --  : injhrshd (Integer)
           637 => ( Parameter_Integer, 0 ),   --  : injhrssp (Integer)
           638 => ( Parameter_Integer, 0 ),   --  : innirbhd (Integer)
           639 => ( Parameter_Integer, 0 ),   --  : innirbsp (Integer)
           640 => ( Parameter_Integer, 0 ),   --  : inothbhd (Integer)
           641 => ( Parameter_Integer, 0 ),   --  : inothbsp (Integer)
           642 => ( Parameter_Integer, 0 ),   --  : inpenihd (Integer)
           643 => ( Parameter_Integer, 0 ),   --  : inpenisp (Integer)
           644 => ( Parameter_Integer, 0 ),   --  : inrinchd (Integer)
           645 => ( Parameter_Integer, 0 ),   --  : inrincsp (Integer)
           646 => ( Parameter_Integer, 0 ),   --  : inrpinhd (Integer)
           647 => ( Parameter_Integer, 0 ),   --  : inrpinsp (Integer)
           648 => ( Parameter_Float, 0.0 ),   --  : itvlichd (Amount)
           649 => ( Parameter_Integer, 0 ),   --  : itvlicsp (Integer)
           650 => ( Parameter_Integer, 0 ),   --  : intxcdhd (Integer)
           651 => ( Parameter_Integer, 0 ),   --  : intxcdsp (Integer)
           652 => ( Parameter_Integer, 0 ),   --  : investhd (Integer)
           653 => ( Parameter_Integer, 0 ),   --  : investsp (Integer)
           654 => ( Parameter_Integer, 0 ),   --  : isa1tyhd (Integer)
           655 => ( Parameter_Integer, 0 ),   --  : isa1tysp (Integer)
           656 => ( Parameter_Integer, 0 ),   --  : isa2tyhd (Integer)
           657 => ( Parameter_Integer, 0 ),   --  : isa2tysp (Integer)
           658 => ( Parameter_Integer, 0 ),   --  : isactihd (Integer)
           659 => ( Parameter_Integer, 0 ),   --  : isactisp (Integer)
           660 => ( Parameter_Integer, 0 ),   --  : jobawahd (Integer)
           661 => ( Parameter_Integer, 0 ),   --  : jobawasp (Integer)
           662 => ( Parameter_Integer, 0 ),   --  : jobbyrhd (Integer)
           663 => ( Parameter_Integer, 0 ),   --  : jobbyrsp (Integer)
           664 => ( Parameter_Integer, 0 ),   --  : qcbhd (Integer)
           665 => ( Parameter_Integer, 0 ),   --  : qcbsp (Integer)
           666 => ( Parameter_Integer, 0 ),   --  : qgahd (Integer)
           667 => ( Parameter_Integer, 0 ),   --  : qgasp (Integer)
           668 => ( Parameter_Integer, 0 ),   --  : qmahd (Integer)
           669 => ( Parameter_Integer, 0 ),   --  : qmasp (Integer)
           670 => ( Parameter_Integer, 0 ),   --  : lareghd (Integer)
           671 => ( Parameter_Integer, 0 ),   --  : laregsp (Integer)
           672 => ( Parameter_Integer, 0 ),   --  : likewkhd (Integer)
           673 => ( Parameter_Integer, 0 ),   --  : likewksp (Integer)
           674 => ( Parameter_Integer, 0 ),   --  : limitlhd (Integer)
           675 => ( Parameter_Integer, 0 ),   --  : limitlsp (Integer)
           676 => ( Parameter_Integer, 0 ),   --  : lktimehd (Integer)
           677 => ( Parameter_Integer, 0 ),   --  : lktimesp (Integer)
           678 => ( Parameter_Integer, 0 ),   --  : lktrnhd (Integer)
           679 => ( Parameter_Integer, 0 ),   --  : lktrnsp (Integer)
           680 => ( Parameter_Integer, 0 ),   --  : lkworkhd (Integer)
           681 => ( Parameter_Integer, 0 ),   --  : lkworksp (Integer)
           682 => ( Parameter_Integer, 0 ),   --  : loanhd (Integer)
           683 => ( Parameter_Integer, 0 ),   --  : loansp (Integer)
           684 => ( Parameter_Integer, 0 ),   --  : loannuhd (Integer)
           685 => ( Parameter_Integer, 0 ),   --  : loannusp (Integer)
           686 => ( Parameter_Integer, 0 ),   --  : lstwkmhd (Integer)
           687 => ( Parameter_Integer, 0 ),   --  : lstwkmsp (Integer)
           688 => ( Parameter_Integer, 0 ),   --  : lstwkyhd (Integer)
           689 => ( Parameter_Integer, 0 ),   --  : lstwkysp (Integer)
           690 => ( Parameter_Integer, 0 ),   --  : wkswkdhd (Integer)
           691 => ( Parameter_Integer, 0 ),   --  : wkswkdsp (Integer)
           692 => ( Parameter_Integer, 0 ),   --  : marithd (Integer)
           693 => ( Parameter_Integer, 0 ),   --  : maritsp (Integer)
           694 => ( Parameter_Float, 0.0 ),   --  : mr1hd (Amount)
           695 => ( Parameter_Integer, 0 ),   --  : mr1sp (Integer)
           696 => ( Parameter_Float, 0.0 ),   --  : mr2hd (Amount)
           697 => ( Parameter_Float, 0.0 ),   --  : mr2sp (Amount)
           698 => ( Parameter_Integer, 0 ),   --  : mntar1hd (Integer)
           699 => ( Parameter_Integer, 0 ),   --  : mntar1sp (Integer)
           700 => ( Parameter_Integer, 0 ),   --  : mntar2hd (Integer)
           701 => ( Parameter_Integer, 0 ),   --  : mntar2sp (Integer)
           702 => ( Parameter_Integer, 0 ),   --  : mntar3hd (Integer)
           703 => ( Parameter_Integer, 0 ),   --  : mntar3sp (Integer)
           704 => ( Parameter_Integer, 0 ),   --  : mntar4hd (Integer)
           705 => ( Parameter_Integer, 0 ),   --  : mntar4sp (Integer)
           706 => ( Parameter_Integer, 0 ),   --  : mntar5hd (Integer)
           707 => ( Parameter_Integer, 0 ),   --  : mntar5sp (Integer)
           708 => ( Parameter_Integer, 0 ),   --  : mntnc1hd (Integer)
           709 => ( Parameter_Integer, 0 ),   --  : mntnc1sp (Integer)
           710 => ( Parameter_Integer, 0 ),   --  : mntnc2hd (Integer)
           711 => ( Parameter_Integer, 0 ),   --  : mntnc2sp (Integer)
           712 => ( Parameter_Integer, 0 ),   --  : mntnc3hd (Integer)
           713 => ( Parameter_Integer, 0 ),   --  : mntnc3sp (Integer)
           714 => ( Parameter_Integer, 0 ),   --  : mntnc4hd (Integer)
           715 => ( Parameter_Integer, 0 ),   --  : mntnc4sp (Integer)
           716 => ( Parameter_Integer, 0 ),   --  : mntnc5hd (Integer)
           717 => ( Parameter_Integer, 0 ),   --  : mntnc5sp (Integer)
           718 => ( Parameter_Integer, 0 ),   --  : mntpayhd (Integer)
           719 => ( Parameter_Integer, 0 ),   --  : mntpaysp (Integer)
           720 => ( Parameter_Integer, 0 ),   --  : pmr1hd (Integer)
           721 => ( Parameter_Integer, 0 ),   --  : pmr1sp (Integer)
           722 => ( Parameter_Integer, 0 ),   --  : pmr2hd (Integer)
           723 => ( Parameter_Integer, 0 ),   --  : pmr2sp (Integer)
           724 => ( Parameter_Integer, 0 ),   --  : mntpr1hd (Integer)
           725 => ( Parameter_Integer, 0 ),   --  : mntpr1sp (Integer)
           726 => ( Parameter_Integer, 0 ),   --  : mntpr2hd (Integer)
           727 => ( Parameter_Integer, 0 ),   --  : mntpr2sp (Integer)
           728 => ( Parameter_Integer, 0 ),   --  : mntpr3hd (Integer)
           729 => ( Parameter_Integer, 0 ),   --  : mntpr3sp (Integer)
           730 => ( Parameter_Integer, 0 ),   --  : mr12mhd (Integer)
           731 => ( Parameter_Integer, 0 ),   --  : mr12msp (Integer)
           732 => ( Parameter_Integer, 0 ),   --  : mntt1hd (Integer)
           733 => ( Parameter_Integer, 0 ),   --  : mntt1sp (Integer)
           734 => ( Parameter_Integer, 0 ),   --  : mntt2hd (Integer)
           735 => ( Parameter_Integer, 0 ),   --  : mntt2sp (Integer)
           736 => ( Parameter_Integer, 0 ),   --  : mntt3hd (Integer)
           737 => ( Parameter_Integer, 0 ),   --  : mntt3sp (Integer)
           738 => ( Parameter_Integer, 0 ),   --  : mntus1hd (Integer)
           739 => ( Parameter_Integer, 0 ),   --  : mntus1sp (Integer)
           740 => ( Parameter_Integer, 0 ),   --  : mntus2hd (Integer)
           741 => ( Parameter_Integer, 0 ),   --  : mntus2sp (Integer)
           742 => ( Parameter_Float, 0.0 ),   --  : umr1hd (Amount)
           743 => ( Parameter_Integer, 0 ),   --  : umr1sp (Integer)
           744 => ( Parameter_Float, 0.0 ),   --  : umr2hd (Amount)
           745 => ( Parameter_Integer, 0 ),   --  : umr2sp (Integer)
           746 => ( Parameter_Integer, 0 ),   --  : pumr1hd (Integer)
           747 => ( Parameter_Integer, 0 ),   --  : pumr1sp (Integer)
           748 => ( Parameter_Integer, 0 ),   --  : pumr2hd (Integer)
           749 => ( Parameter_Integer, 0 ),   --  : pumr2sp (Integer)
           750 => ( Parameter_Integer, 0 ),   --  : mntw1hd (Integer)
           751 => ( Parameter_Integer, 0 ),   --  : mntw1sp (Integer)
           752 => ( Parameter_Integer, 0 ),   --  : mntw2hd (Integer)
           753 => ( Parameter_Integer, 0 ),   --  : mntw2sp (Integer)
           754 => ( Parameter_Integer, 0 ),   --  : mntw3hd (Integer)
           755 => ( Parameter_Integer, 0 ),   --  : mntw3sp (Integer)
           756 => ( Parameter_Integer, 0 ),   --  : mntw4hd (Integer)
           757 => ( Parameter_Integer, 0 ),   --  : mntw4sp (Integer)
           758 => ( Parameter_Integer, 0 ),   --  : mntw5hd (Integer)
           759 => ( Parameter_Integer, 0 ),   --  : mntw5sp (Integer)
           760 => ( Parameter_Integer, 0 ),   --  : mshd (Integer)
           761 => ( Parameter_Integer, 0 ),   --  : mssp (Integer)
           762 => ( Parameter_Integer, 0 ),   --  : nanid1hd (Integer)
           763 => ( Parameter_Integer, 0 ),   --  : nanid1sp (Integer)
           764 => ( Parameter_Integer, 0 ),   --  : nanid2hd (Integer)
           765 => ( Parameter_Integer, 0 ),   --  : nanid2sp (Integer)
           766 => ( Parameter_Integer, 0 ),   --  : nanid3hd (Integer)
           767 => ( Parameter_Integer, 0 ),   --  : nanid3sp (Integer)
           768 => ( Parameter_Integer, 0 ),   --  : nanid4hd (Integer)
           769 => ( Parameter_Integer, 0 ),   --  : nanid4sp (Integer)
           770 => ( Parameter_Integer, 0 ),   --  : nanid5hd (Integer)
           771 => ( Parameter_Integer, 0 ),   --  : nanid5sp (Integer)
           772 => ( Parameter_Integer, 0 ),   --  : nanid6hd (Integer)
           773 => ( Parameter_Integer, 0 ),   --  : nanid6sp (Integer)
           774 => ( Parameter_Integer, 0 ),   --  : nitrnhd (Integer)
           775 => ( Parameter_Integer, 0 ),   --  : nitrnsp (Integer)
           776 => ( Parameter_Float, 0.0 ),   --  : niamthd (Amount)
           777 => ( Parameter_Float, 0.0 ),   --  : niamtsp (Amount)
           778 => ( Parameter_Integer, 0 ),   --  : niethghd (Integer)
           779 => ( Parameter_Integer, 0 ),   --  : niethgsp (Integer)
           780 => ( Parameter_Integer, 0 ),   --  : nixhbbhd (Integer)
           781 => ( Parameter_Integer, 0 ),   --  : nixhbbsp (Integer)
           782 => ( Parameter_Integer, 0 ),   --  : ninid1hd (Integer)
           783 => ( Parameter_Integer, 0 ),   --  : ninid1sp (Integer)
           784 => ( Parameter_Integer, 0 ),   --  : ninid2hd (Integer)
           785 => ( Parameter_Integer, 0 ),   --  : ninid2sp (Integer)
           786 => ( Parameter_Integer, 0 ),   --  : ninid3hd (Integer)
           787 => ( Parameter_Integer, 0 ),   --  : ninid3sp (Integer)
           788 => ( Parameter_Integer, 0 ),   --  : ninid4hd (Integer)
           789 => ( Parameter_Integer, 0 ),   --  : ninid4sp (Integer)
           790 => ( Parameter_Integer, 0 ),   --  : ninid5hd (Integer)
           791 => ( Parameter_Integer, 0 ),   --  : ninid5sp (Integer)
           792 => ( Parameter_Integer, 0 ),   --  : ninid6hd (Integer)
           793 => ( Parameter_Integer, 0 ),   --  : ninid6sp (Integer)
           794 => ( Parameter_Integer, 0 ),   --  : ninid7hd (Integer)
           795 => ( Parameter_Integer, 0 ),   --  : ninid7sp (Integer)
           796 => ( Parameter_Integer, 0 ),   --  : nincs2hd (Integer)
           797 => ( Parameter_Integer, 0 ),   --  : nincs2sp (Integer)
           798 => ( Parameter_Integer, 0 ),   --  : nininchd (Integer)
           799 => ( Parameter_Integer, 0 ),   --  : ninincsp (Integer)
           800 => ( Parameter_Integer, 0 ),   --  : ninearhd (Integer)
           801 => ( Parameter_Integer, 0 ),   --  : ninearsp (Integer)
           802 => ( Parameter_Integer, 0 ),   --  : nininvhd (Integer)
           803 => ( Parameter_Integer, 0 ),   --  : nininvsp (Integer)
           804 => ( Parameter_Integer, 0 ),   --  : ninpenhd (Integer)
           805 => ( Parameter_Integer, 0 ),   --  : ninpensp (Integer)
           806 => ( Parameter_Integer, 0 ),   --  : ninrinhd (Integer)
           807 => ( Parameter_Integer, 0 ),   --  : ninrinsp (Integer)
           808 => ( Parameter_Integer, 0 ),   --  : ninseihd (Integer)
           809 => ( Parameter_Integer, 0 ),   --  : ninseisp (Integer)
           810 => ( Parameter_Integer, 0 ),   --  : pniamthd (Integer)
           811 => ( Parameter_Integer, 0 ),   --  : pniamtsp (Integer)
           812 => ( Parameter_Integer, 0 ),   --  : nireghd (Integer)
           813 => ( Parameter_Integer, 0 ),   --  : niregsp (Integer)
           814 => ( Parameter_Integer, 0 ),   --  : nirelghd (Integer)
           815 => ( Parameter_Integer, 0 ),   --  : nirelgsp (Integer)
           816 => ( Parameter_Integer, 0 ),   --  : nolk1hd (Integer)
           817 => ( Parameter_Integer, 0 ),   --  : nolk1sp (Integer)
           818 => ( Parameter_Integer, 0 ),   --  : nolk2hd (Integer)
           819 => ( Parameter_Integer, 0 ),   --  : nolk2sp (Integer)
           820 => ( Parameter_Integer, 0 ),   --  : nolk3hd (Integer)
           821 => ( Parameter_Integer, 0 ),   --  : nolk3sp (Integer)
           822 => ( Parameter_Integer, 0 ),   --  : nowanthd (Integer)
           823 => ( Parameter_Integer, 0 ),   --  : nowantsp (Integer)
           824 => ( Parameter_Float, 0.0 ),   --  : nssechd (Amount)
           825 => ( Parameter_Float, 0.0 ),   --  : nssecsp (Amount)
           826 => ( Parameter_Integer, 0 ),   --  : numjobhd (Integer)
           827 => ( Parameter_Integer, 0 ),   --  : numjobsp (Integer)
           828 => ( Parameter_Integer, 0 ),   --  : numj2hd (Integer)
           829 => ( Parameter_Integer, 0 ),   --  : numj2sp (Integer)
           830 => ( Parameter_Integer, 0 ),   --  : ocnumhd (Integer)
           831 => ( Parameter_Integer, 0 ),   --  : ocnumsp (Integer)
           832 => ( Parameter_Integer, 0 ),   --  : oddjobhd (Integer)
           833 => ( Parameter_Integer, 0 ),   --  : oddjobsp (Integer)
           834 => ( Parameter_Integer, 0 ),   --  : oldstdhd (Integer)
           835 => ( Parameter_Integer, 0 ),   --  : oldstdsp (Integer)
           836 => ( Parameter_Integer, 0 ),   --  : oabparhd (Integer)
           837 => ( Parameter_Integer, 0 ),   --  : oabparsp (Integer)
           838 => ( Parameter_Float, 0.0 ),   --  : otamthd (Amount)
           839 => ( Parameter_Float, 0.0 ),   --  : otamtsp (Amount)
           840 => ( Parameter_Float, 0.0 ),   --  : otpamthd (Amount)
           841 => ( Parameter_Integer, 0 ),   --  : otpamtsp (Integer)
           842 => ( Parameter_Integer, 0 ),   --  : otappdhd (Integer)
           843 => ( Parameter_Integer, 0 ),   --  : otappdsp (Integer)
           844 => ( Parameter_Integer, 0 ),   --  : qehbtbhd (Integer)
           845 => ( Parameter_Integer, 0 ),   --  : qehbtbsp (Integer)
           846 => ( Parameter_Integer, 0 ),   --  : qwidplhd (Integer)
           847 => ( Parameter_Integer, 0 ),   --  : qwidplsp (Integer)
           848 => ( Parameter_Integer, 0 ),   --  : qinwkchd (Integer)
           849 => ( Parameter_Integer, 0 ),   --  : qinwkcsp (Integer)
           850 => ( Parameter_Integer, 0 ),   --  : qrtwkchd (Integer)
           851 => ( Parameter_Integer, 0 ),   --  : qrtwkcsp (Integer)
           852 => ( Parameter_Integer, 0 ),   --  : qothbehd (Integer)
           853 => ( Parameter_Integer, 0 ),   --  : qothbesp (Integer)
           854 => ( Parameter_Integer, 0 ),   --  : othtaxhd (Integer)
           855 => ( Parameter_Integer, 0 ),   --  : othtaxsp (Integer)
           856 => ( Parameter_Integer, 0 ),   --  : otinvahd (Integer)
           857 => ( Parameter_Integer, 0 ),   --  : otinvasp (Integer)
           858 => ( Parameter_Float, 0.0 ),   --  : pareamhd (Amount)
           859 => ( Parameter_Float, 0.0 ),   --  : pareamsp (Amount)
           860 => ( Parameter_Integer, 0 ),   --  : qpchd (Integer)
           861 => ( Parameter_Integer, 0 ),   --  : qpcsp (Integer)
           862 => ( Parameter_Integer, 0 ),   --  : qrphd (Integer)
           863 => ( Parameter_Integer, 0 ),   --  : qrpsp (Integer)
           864 => ( Parameter_Integer, 0 ),   --  : qbbhd (Integer)
           865 => ( Parameter_Integer, 0 ),   --  : qbbsp (Integer)
           866 => ( Parameter_Integer, 0 ),   --  : qafcshd (Integer)
           867 => ( Parameter_Integer, 0 ),   --  : qafcssp (Integer)
           868 => ( Parameter_Integer, 0 ),   --  : qwwphd (Integer)
           869 => ( Parameter_Integer, 0 ),   --  : qwwpsp (Integer)
           870 => ( Parameter_Integer, 0 ),   --  : penflghd (Integer)
           871 => ( Parameter_Integer, 0 ),   --  : penflgsp (Integer)
           872 => ( Parameter_Integer, 0 ),   --  : penwl1hd (Integer)
           873 => ( Parameter_Integer, 0 ),   --  : penwl1sp (Integer)
           874 => ( Parameter_Integer, 0 ),   --  : penwl2hd (Integer)
           875 => ( Parameter_Integer, 0 ),   --  : penwl2sp (Integer)
           876 => ( Parameter_Integer, 0 ),   --  : penwl3hd (Integer)
           877 => ( Parameter_Integer, 0 ),   --  : penwl3sp (Integer)
           878 => ( Parameter_Integer, 0 ),   --  : penwl4hd (Integer)
           879 => ( Parameter_Integer, 0 ),   --  : penwl4sp (Integer)
           880 => ( Parameter_Integer, 0 ),   --  : penwl5hd (Integer)
           881 => ( Parameter_Integer, 0 ),   --  : penwl5sp (Integer)
           882 => ( Parameter_Integer, 0 ),   --  : penwl6hd (Integer)
           883 => ( Parameter_Integer, 0 ),   --  : penwl6sp (Integer)
           884 => ( Parameter_Integer, 0 ),   --  : pepscthd (Integer)
           885 => ( Parameter_Integer, 0 ),   --  : pepsctsp (Integer)
           886 => ( Parameter_Integer, 0 ),   --  : personhd (Integer)
           887 => ( Parameter_Integer, 0 ),   --  : personsp (Integer)
           888 => ( Parameter_Integer, 0 ),   --  : qpipdhd (Integer)
           889 => ( Parameter_Integer, 0 ),   --  : qpipdsp (Integer)
           890 => ( Parameter_Integer, 0 ),   --  : qpipmhd (Integer)
           891 => ( Parameter_Integer, 0 ),   --  : qpipmsp (Integer)
           892 => ( Parameter_Integer, 0 ),   --  : poaccthd (Integer)
           893 => ( Parameter_Integer, 0 ),   --  : poacctsp (Integer)
           894 => ( Parameter_Integer, 0 ),   --  : pocardhd (Integer)
           895 => ( Parameter_Integer, 0 ),   --  : pocardsp (Integer)
           896 => ( Parameter_Integer, 0 ),   --  : ppnumchd (Integer)
           897 => ( Parameter_Integer, 0 ),   --  : ppnumcsp (Integer)
           898 => ( Parameter_Float, 0.0 ),   --  : proptxhd (Amount)
           899 => ( Parameter_Float, 0.0 ),   --  : proptxsp (Amount)
           900 => ( Parameter_Integer, 0 ),   --  : ptwkyrhd (Integer)
           901 => ( Parameter_Integer, 0 ),   --  : ptwkyrsp (Integer)
           902 => ( Parameter_Integer, 0 ),   --  : relp1hd (Integer)
           903 => ( Parameter_Integer, 0 ),   --  : relp1sp (Integer)
           904 => ( Parameter_Integer, 0 ),   --  : relp2hd (Integer)
           905 => ( Parameter_Integer, 0 ),   --  : relp2sp (Integer)
           906 => ( Parameter_Integer, 0 ),   --  : relp3hd (Integer)
           907 => ( Parameter_Integer, 0 ),   --  : relp3sp (Integer)
           908 => ( Parameter_Integer, 0 ),   --  : relp4hd (Integer)
           909 => ( Parameter_Integer, 0 ),   --  : relp4sp (Integer)
           910 => ( Parameter_Integer, 0 ),   --  : relp5hd (Integer)
           911 => ( Parameter_Integer, 0 ),   --  : relp5sp (Integer)
           912 => ( Parameter_Integer, 0 ),   --  : relp6hd (Integer)
           913 => ( Parameter_Integer, 0 ),   --  : relp6sp (Integer)
           914 => ( Parameter_Integer, 0 ),   --  : relp7hd (Integer)
           915 => ( Parameter_Integer, 0 ),   --  : relp7sp (Integer)
           916 => ( Parameter_Integer, 0 ),   --  : relp8hd (Integer)
           917 => ( Parameter_Integer, 0 ),   --  : relp8sp (Integer)
           918 => ( Parameter_Integer, 0 ),   --  : relp9hd (Integer)
           919 => ( Parameter_Integer, 0 ),   --  : relp9sp (Integer)
           920 => ( Parameter_Integer, 0 ),   --  : relp10hd (Integer)
           921 => ( Parameter_Integer, 0 ),   --  : relp10sp (Integer)
           922 => ( Parameter_Integer, 0 ),   --  : relp11hd (Integer)
           923 => ( Parameter_Integer, 0 ),   --  : relp11sp (Integer)
           924 => ( Parameter_Integer, 0 ),   --  : relp12hd (Integer)
           925 => ( Parameter_Integer, 0 ),   --  : relp12sp (Integer)
           926 => ( Parameter_Integer, 0 ),   --  : relp13hd (Integer)
           927 => ( Parameter_Integer, 0 ),   --  : relp13sp (Integer)
           928 => ( Parameter_Integer, 0 ),   --  : relp14hd (Integer)
           929 => ( Parameter_Integer, 0 ),   --  : relp14sp (Integer)
           930 => ( Parameter_Integer, 0 ),   --  : reasonhd (Integer)
           931 => ( Parameter_Integer, 0 ),   --  : reasonsp (Integer)
           932 => ( Parameter_Float, 0.0 ),   --  : redamthd (Amount)
           933 => ( Parameter_Float, 0.0 ),   --  : redamtsp (Amount)
           934 => ( Parameter_Integer, 0 ),   --  : redundhd (Integer)
           935 => ( Parameter_Integer, 0 ),   --  : redundsp (Integer)
           936 => ( Parameter_Integer, 0 ),   --  : rednethd (Integer)
           937 => ( Parameter_Integer, 0 ),   --  : rednetsp (Integer)
           938 => ( Parameter_Integer, 0 ),   --  : redtaxhd (Integer)
           939 => ( Parameter_Integer, 0 ),   --  : redtaxsp (Integer)
           940 => ( Parameter_Integer, 0 ),   --  : relhrphd (Integer)
           941 => ( Parameter_Integer, 0 ),   --  : relhrpsp (Integer)
           942 => ( Parameter_Integer, 0 ),   --  : relgewhd (Integer)
           943 => ( Parameter_Integer, 0 ),   --  : relgewsp (Integer)
           944 => ( Parameter_Integer, 0 ),   --  : relgschd (Integer)
           945 => ( Parameter_Integer, 0 ),   --  : relgscsp (Integer)
           946 => ( Parameter_Integer, 0 ),   --  : rprofhd (Integer)
           947 => ( Parameter_Integer, 0 ),   --  : rprofsp (Integer)
           948 => ( Parameter_Integer, 0 ),   --  : retirehd (Integer)
           949 => ( Parameter_Integer, 0 ),   --  : retiresp (Integer)
           950 => ( Parameter_Integer, 0 ),   --  : retir1hd (Integer)
           951 => ( Parameter_Integer, 0 ),   --  : retir1sp (Integer)
           952 => ( Parameter_Integer, 0 ),   --  : retreshd (Integer)
           953 => ( Parameter_Integer, 0 ),   --  : retressp (Integer)
           954 => ( Parameter_Float, 0.0 ),   --  : renthd (Amount)
           955 => ( Parameter_Float, 0.0 ),   --  : rentsp (Amount)
           956 => ( Parameter_Float, 0.0 ),   --  : royalhd (Amount)
           957 => ( Parameter_Float, 0.0 ),   --  : royalsp (Amount)
           958 => ( Parameter_Float, 0.0 ),   --  : sleephd (Amount)
           959 => ( Parameter_Float, 0.0 ),   --  : sleepsp (Amount)
           960 => ( Parameter_Float, 0.0 ),   --  : forpenhd (Amount)
           961 => ( Parameter_Float, 0.0 ),   --  : forpensp (Amount)
           962 => ( Parameter_Integer, 0 ),   --  : restrchd (Integer)
           963 => ( Parameter_Integer, 0 ),   --  : restrcsp (Integer)
           964 => ( Parameter_Integer, 0 ),   --  : sapadjhd (Integer)
           965 => ( Parameter_Integer, 0 ),   --  : sapadjsp (Integer)
           966 => ( Parameter_Integer, 0 ),   --  : sdem01hd (Integer)
           967 => ( Parameter_Integer, 0 ),   --  : sdem01sp (Integer)
           968 => ( Parameter_Integer, 0 ),   --  : sdem02hd (Integer)
           969 => ( Parameter_Integer, 0 ),   --  : sdem02sp (Integer)
           970 => ( Parameter_Integer, 0 ),   --  : sdem03hd (Integer)
           971 => ( Parameter_Integer, 0 ),   --  : sdem03sp (Integer)
           972 => ( Parameter_Integer, 0 ),   --  : sdem04hd (Integer)
           973 => ( Parameter_Integer, 0 ),   --  : sdem04sp (Integer)
           974 => ( Parameter_Integer, 0 ),   --  : sdem05hd (Integer)
           975 => ( Parameter_Integer, 0 ),   --  : sdem05sp (Integer)
           976 => ( Parameter_Integer, 0 ),   --  : sdem06hd (Integer)
           977 => ( Parameter_Integer, 0 ),   --  : sdem06sp (Integer)
           978 => ( Parameter_Integer, 0 ),   --  : sdem07hd (Integer)
           979 => ( Parameter_Integer, 0 ),   --  : sdem07sp (Integer)
           980 => ( Parameter_Integer, 0 ),   --  : sdem08hd (Integer)
           981 => ( Parameter_Integer, 0 ),   --  : sdem08sp (Integer)
           982 => ( Parameter_Integer, 0 ),   --  : sdem09hd (Integer)
           983 => ( Parameter_Integer, 0 ),   --  : sdem09sp (Integer)
           984 => ( Parameter_Integer, 0 ),   --  : sdem10hd (Integer)
           985 => ( Parameter_Integer, 0 ),   --  : sdem10sp (Integer)
           986 => ( Parameter_Integer, 0 ),   --  : sdem11hd (Integer)
           987 => ( Parameter_Integer, 0 ),   --  : sdem11sp (Integer)
           988 => ( Parameter_Integer, 0 ),   --  : sdem12hd (Integer)
           989 => ( Parameter_Integer, 0 ),   --  : sdem12sp (Integer)
           990 => ( Parameter_Integer, 0 ),   --  : inseinhd (Integer)
           991 => ( Parameter_Integer, 0 ),   --  : inseinsp (Integer)
           992 => ( Parameter_Integer, 0 ),   --  : sdemphd (Integer)
           993 => ( Parameter_Integer, 0 ),   --  : sdempsp (Integer)
           994 => ( Parameter_Integer, 0 ),   --  : sexhd (Integer)
           995 => ( Parameter_Integer, 0 ),   --  : sexsp (Integer)
           996 => ( Parameter_Integer, 0 ),   --  : sichd (Integer)
           997 => ( Parameter_Integer, 0 ),   --  : sicsp (Integer)
           998 => ( Parameter_Integer, 0 ),   --  : sidqnhd (Integer)
           999 => ( Parameter_Integer, 0 ),   --  : sidqnsp (Integer)
           1000 => ( Parameter_Integer, 0 ),   --  : sloshd (Integer)
           1001 => ( Parameter_Integer, 0 ),   --  : slossp (Integer)
           1002 => ( Parameter_Float, 0.0 ),   --  : slramthd (Amount)
           1003 => ( Parameter_Float, 0.0 ),   --  : slramtsp (Amount)
           1004 => ( Parameter_Integer, 0 ),   --  : slrppdhd (Integer)
           1005 => ( Parameter_Integer, 0 ),   --  : slrppdsp (Integer)
           1006 => ( Parameter_Float, 0.0 ),   --  : smpajhd (Amount)
           1007 => ( Parameter_Float, 0.0 ),   --  : smpajsp (Amount)
           1008 => ( Parameter_Integer, 0 ),   --  : sc2010hd (Integer)
           1009 => ( Parameter_Integer, 0 ),   --  : sc2010sp (Integer)
           1010 => ( Parameter_Integer, 0 ),   --  : qsfgrhd (Integer)
           1011 => ( Parameter_Integer, 0 ),   --  : qsfgrsp (Integer)
           1012 => ( Parameter_Integer, 0 ),   --  : qssmthd (Integer)
           1013 => ( Parameter_Integer, 0 ),   --  : qssmtsp (Integer)
           1014 => ( Parameter_Integer, 0 ),   --  : qlgdwphd (Integer)
           1015 => ( Parameter_Integer, 0 ),   --  : qlgdwpsp (Integer)
           1016 => ( Parameter_Integer, 0 ),   --  : qlglahd (Integer)
           1017 => ( Parameter_Integer, 0 ),   --  : qlglasp (Integer)
           1018 => ( Parameter_Integer, 0 ),   --  : blindhd (Integer)
           1019 => ( Parameter_Integer, 0 ),   --  : blindsp (Integer)
           1020 => ( Parameter_Integer, 0 ),   --  : parsihd (Integer)
           1021 => ( Parameter_Integer, 0 ),   --  : parsisp (Integer)
           1022 => ( Parameter_Integer, 0 ),   --  : deafhd (Integer)
           1023 => ( Parameter_Integer, 0 ),   --  : deafsp (Integer)
           1024 => ( Parameter_Integer, 0 ),   --  : spouthd (Integer)
           1025 => ( Parameter_Integer, 0 ),   --  : spoutsp (Integer)
           1026 => ( Parameter_Float, 0.0 ),   --  : sppadjhd (Amount)
           1027 => ( Parameter_Float, 0.0 ),   --  : sppadjsp (Amount)
           1028 => ( Parameter_Integer, 0 ),   --  : spyrothd (Integer)
           1029 => ( Parameter_Integer, 0 ),   --  : spyrotsp (Integer)
           1030 => ( Parameter_Float, 0.0 ),   --  : srentahd (Amount)
           1031 => ( Parameter_Float, 0.0 ),   --  : srentasp (Amount)
           1032 => ( Parameter_Integer, 0 ),   --  : psrenthd (Integer)
           1033 => ( Parameter_Integer, 0 ),   --  : psrentsp (Integer)
           1034 => ( Parameter_Integer, 0 ),   --  : sfispchd (Integer)
           1035 => ( Parameter_Integer, 0 ),   --  : sfispcsp (Integer)
           1036 => ( Parameter_Integer, 0 ),   --  : sfjesahd (Integer)
           1037 => ( Parameter_Integer, 0 ),   --  : sfjesasp (Integer)
           1038 => ( Parameter_Integer, 0 ),   --  : sruchd (Integer)
           1039 => ( Parameter_Integer, 0 ),   --  : srucsp (Integer)
           1040 => ( Parameter_Float, 0.0 ),   --  : sspajhd (Amount)
           1041 => ( Parameter_Float, 0.0 ),   --  : sspajsp (Amount)
           1042 => ( Parameter_Integer, 0 ),   --  : gtsavahd (Integer)
           1043 => ( Parameter_Integer, 0 ),   --  : gtsavasp (Integer)
           1044 => ( Parameter_Integer, 0 ),   --  : stshcthd (Integer)
           1045 => ( Parameter_Integer, 0 ),   --  : stshctsp (Integer)
           1046 => ( Parameter_Integer, 0 ),   --  : tdaywkhd (Integer)
           1047 => ( Parameter_Integer, 0 ),   --  : tdaywksp (Integer)
           1048 => ( Parameter_Integer, 0 ),   --  : agefedhd (Integer)
           1049 => ( Parameter_Integer, 0 ),   --  : agefedsp (Integer)
           1050 => ( Parameter_Integer, 0 ),   --  : tmpjobhd (Integer)
           1051 => ( Parameter_Integer, 0 ),   --  : tmpjobsp (Integer)
           1052 => ( Parameter_Integer, 0 ),   --  : tesscthd (Integer)
           1053 => ( Parameter_Integer, 0 ),   --  : tessctsp (Integer)
           1054 => ( Parameter_Integer, 0 ),   --  : totgrahd (Integer)
           1055 => ( Parameter_Float, 0.0 ),   --  : totgrasp (Amount)
           1056 => ( Parameter_Float, 0.0 ),   --  : tothouhd (Amount)
           1057 => ( Parameter_Float, 0.0 ),   --  : tothousp (Amount)
           1058 => ( Parameter_Float, 0.0 ),   --  : totinthd (Amount)
           1059 => ( Parameter_Float, 0.0 ),   --  : totintsp (Amount)
           1060 => ( Parameter_Float, 0.0 ),   --  : totocchd (Amount)
           1061 => ( Parameter_Float, 0.0 ),   --  : totoccsp (Amount)
           1062 => ( Parameter_Integer, 0 ),   --  : trainhd (Integer)
           1063 => ( Parameter_Integer, 0 ),   --  : trainsp (Integer)
           1064 => ( Parameter_Integer, 0 ),   --  : trnallhd (Integer)
           1065 => ( Parameter_Integer, 0 ),   --  : trnallsp (Integer)
           1066 => ( Parameter_Float, 0.0 ),   --  : ttbprxhd (Amount)
           1067 => ( Parameter_Float, 0.0 ),   --  : ttbprxsp (Amount)
           1068 => ( Parameter_Integer, 0 ),   --  : tuborrhd (Integer)
           1069 => ( Parameter_Integer, 0 ),   --  : tuborrsp (Integer)
           1070 => ( Parameter_Integer, 0 ),   --  : typeedhd (Integer)
           1071 => ( Parameter_Integer, 0 ),   --  : typeedsp (Integer)
           1072 => ( Parameter_Integer, 0 ),   --  : unpd1hd (Integer)
           1073 => ( Parameter_Integer, 0 ),   --  : unpd1sp (Integer)
           1074 => ( Parameter_Integer, 0 ),   --  : unpd2hd (Integer)
           1075 => ( Parameter_Integer, 0 ),   --  : unpd2sp (Integer)
           1076 => ( Parameter_Integer, 0 ),   --  : untrcthd (Integer)
           1077 => ( Parameter_Integer, 0 ),   --  : untrctsp (Integer)
           1078 => ( Parameter_Integer, 0 ),   --  : upersohd (Integer)
           1079 => ( Parameter_Integer, 0 ),   --  : upersosp (Integer)
           1080 => ( Parameter_Integer, 0 ),   --  : agewidhd (Integer)
           1081 => ( Parameter_Integer, 0 ),   --  : agewidsp (Integer)
           1082 => ( Parameter_Integer, 0 ),   --  : kidwidhd (Integer)
           1083 => ( Parameter_Integer, 0 ),   --  : kidwidsp (Integer)
           1084 => ( Parameter_Integer, 0 ),   --  : quchd (Integer)
           1085 => ( Parameter_Integer, 0 ),   --  : qucsp (Integer)
           1086 => ( Parameter_Integer, 0 ),   --  : qhbhd (Integer)
           1087 => ( Parameter_Integer, 0 ),   --  : qhbsp (Integer)
           1088 => ( Parameter_Integer, 0 ),   --  : qwtchd (Integer)
           1089 => ( Parameter_Integer, 0 ),   --  : qwtcsp (Integer)
           1090 => ( Parameter_Integer, 0 ),   --  : qctchd (Integer)
           1091 => ( Parameter_Integer, 0 ),   --  : qctcsp (Integer)
           1092 => ( Parameter_Integer, 0 ),   --  : qishd (Integer)
           1093 => ( Parameter_Integer, 0 ),   --  : qissp (Integer)
           1094 => ( Parameter_Integer, 0 ),   --  : qjsahd (Integer)
           1095 => ( Parameter_Integer, 0 ),   --  : qjsasp (Integer)
           1096 => ( Parameter_Integer, 0 ),   --  : qesahd (Integer)
           1097 => ( Parameter_Integer, 0 ),   --  : qesasp (Integer)
           1098 => ( Parameter_Integer, 0 ),   --  : qcahd (Integer)
           1099 => ( Parameter_Integer, 0 ),   --  : qcasp (Integer)
           1100 => ( Parameter_Integer, 0 ),   --  : waithd (Integer)
           1101 => ( Parameter_Integer, 0 ),   --  : waitsp (Integer)
           1102 => ( Parameter_Integer, 0 ),   --  : whresphd (Integer)
           1103 => ( Parameter_Integer, 0 ),   --  : whrespsp (Integer)
           1104 => ( Parameter_Integer, 0 ),   --  : whoctbhd (Integer)
           1105 => ( Parameter_Integer, 0 ),   --  : whoctbsp (Integer)
           1106 => ( Parameter_Float, 0.0 ),   --  : widocchd (Amount)
           1107 => ( Parameter_Float, 0.0 ),   --  : widoccsp (Amount)
           1108 => ( Parameter_Integer, 0 ),   --  : wintflhd (Integer)
           1109 => ( Parameter_Integer, 0 ),   --  : wintflsp (Integer)
           1110 => ( Parameter_Integer, 0 ),   --  : workinhd (Integer)
           1111 => ( Parameter_Integer, 0 ),   --  : workinsp (Integer)
           1112 => ( Parameter_Integer, 0 ),   --  : wpahd (Integer)
           1113 => ( Parameter_Integer, 0 ),   --  : wpasp (Integer)
           1114 => ( Parameter_Integer, 0 ),   --  : wpbahd (Integer)
           1115 => ( Parameter_Integer, 0 ),   --  : wpbasp (Integer)
           1116 => ( Parameter_Integer, 0 ),   --  : wtclm1hd (Integer)
           1117 => ( Parameter_Integer, 0 ),   --  : wtclm1sp (Integer)
           1118 => ( Parameter_Integer, 0 ),   --  : wtclm2hd (Integer)
           1119 => ( Parameter_Integer, 0 ),   --  : wtclm2sp (Integer)
           1120 => ( Parameter_Integer, 0 ),   --  : yjblevhd (Integer)
           1121 => ( Parameter_Integer, 0 ),   --  : yjblevsp (Integer)
           1122 => ( Parameter_Integer, 0 ),   --  : ystwkhd (Integer)
           1123 => ( Parameter_Integer, 0 ),   --  : ystwksp (Integer)
           1124 => ( Parameter_Float, 0.0 ),   --  : as011hd (Amount)
           1125 => ( Parameter_Float, 0.0 ),   --  : as012hd (Amount)
           1126 => ( Parameter_Float, 0.0 ),   --  : as013hd (Amount)
           1127 => ( Parameter_Integer, 0 ),   --  : as014hd (Integer)
           1128 => ( Parameter_Float, 0.0 ),   --  : as011sp (Amount)
           1129 => ( Parameter_Float, 0.0 ),   --  : as012sp (Amount)
           1130 => ( Parameter_Integer, 0 ),   --  : as013sp (Integer)
           1131 => ( Parameter_Integer, 0 ),   --  : as014sp (Integer)
           1132 => ( Parameter_Integer, 0 ),   --  : as021hd (Integer)
           1133 => ( Parameter_Integer, 0 ),   --  : as022hd (Integer)
           1134 => ( Parameter_Float, 0.0 ),   --  : as021sp (Amount)
           1135 => ( Parameter_Integer, 0 ),   --  : as022sp (Integer)
           1136 => ( Parameter_Integer, 0 ),   --  : as031hd (Integer)
           1137 => ( Parameter_Integer, 0 ),   --  : as031sp (Integer)
           1138 => ( Parameter_Float, 0.0 ),   --  : as051hd (Amount)
           1139 => ( Parameter_Float, 0.0 ),   --  : as052hd (Amount)
           1140 => ( Parameter_Float, 0.0 ),   --  : as053hd (Amount)
           1141 => ( Parameter_Integer, 0 ),   --  : as054hd (Integer)
           1142 => ( Parameter_Integer, 0 ),   --  : as055hd (Integer)
           1143 => ( Parameter_Integer, 0 ),   --  : as056hd (Integer)
           1144 => ( Parameter_Integer, 0 ),   --  : as057hd (Integer)
           1145 => ( Parameter_Float, 0.0 ),   --  : as051sp (Amount)
           1146 => ( Parameter_Float, 0.0 ),   --  : as052sp (Amount)
           1147 => ( Parameter_Float, 0.0 ),   --  : as053sp (Amount)
           1148 => ( Parameter_Integer, 0 ),   --  : as054sp (Integer)
           1149 => ( Parameter_Integer, 0 ),   --  : as055sp (Integer)
           1150 => ( Parameter_Integer, 0 ),   --  : as056sp (Integer)
           1151 => ( Parameter_Integer, 0 ),   --  : as057sp (Integer)
           1152 => ( Parameter_Integer, 0 ),   --  : as061hd (Integer)
           1153 => ( Parameter_Integer, 0 ),   --  : as061sp (Integer)
           1154 => ( Parameter_Integer, 0 ),   --  : as071hd (Integer)
           1155 => ( Parameter_Integer, 0 ),   --  : as071sp (Integer)
           1156 => ( Parameter_Float, 0.0 ),   --  : as081hd (Amount)
           1157 => ( Parameter_Float, 0.0 ),   --  : as082hd (Amount)
           1158 => ( Parameter_Integer, 0 ),   --  : as083hd (Integer)
           1159 => ( Parameter_Integer, 0 ),   --  : as084hd (Integer)
           1160 => ( Parameter_Integer, 0 ),   --  : as085hd (Integer)
           1161 => ( Parameter_Float, 0.0 ),   --  : as081sp (Amount)
           1162 => ( Parameter_Float, 0.0 ),   --  : as082sp (Amount)
           1163 => ( Parameter_Integer, 0 ),   --  : as083sp (Integer)
           1164 => ( Parameter_Integer, 0 ),   --  : as084sp (Integer)
           1165 => ( Parameter_Integer, 0 ),   --  : as085sp (Integer)
           1166 => ( Parameter_Integer, 0 ),   --  : as101hd (Integer)
           1167 => ( Parameter_Integer, 0 ),   --  : as101sp (Integer)
           1168 => ( Parameter_Integer, 0 ),   --  : as111hd (Integer)
           1169 => ( Parameter_Integer, 0 ),   --  : as111sp (Integer)
           1170 => ( Parameter_Integer, 0 ),   --  : as121hd (Integer)
           1171 => ( Parameter_Integer, 0 ),   --  : as121sp (Integer)
           1172 => ( Parameter_Integer, 0 ),   --  : as131hd (Integer)
           1173 => ( Parameter_Integer, 0 ),   --  : as131sp (Integer)
           1174 => ( Parameter_Integer, 0 ),   --  : as141hd (Integer)
           1175 => ( Parameter_Integer, 0 ),   --  : as142hd (Integer)
           1176 => ( Parameter_Integer, 0 ),   --  : as143hd (Integer)
           1177 => ( Parameter_Integer, 0 ),   --  : as141sp (Integer)
           1178 => ( Parameter_Integer, 0 ),   --  : as142sp (Integer)
           1179 => ( Parameter_Integer, 0 ),   --  : as143sp (Integer)
           1180 => ( Parameter_Float, 0.0 ),   --  : as151hd (Amount)
           1181 => ( Parameter_Float, 0.0 ),   --  : as151sp (Amount)
           1182 => ( Parameter_Integer, 0 ),   --  : as161hd (Integer)
           1183 => ( Parameter_Integer, 0 ),   --  : as161sp (Integer)
           1184 => ( Parameter_Integer, 0 ),   --  : as191hd (Integer)
           1185 => ( Parameter_Integer, 0 ),   --  : as191sp (Integer)
           1186 => ( Parameter_Float, 0.0 ),   --  : as211hd (Amount)
           1187 => ( Parameter_Integer, 0 ),   --  : as212hd (Integer)
           1188 => ( Parameter_Integer, 0 ),   --  : as213hd (Integer)
           1189 => ( Parameter_Integer, 0 ),   --  : as214hd (Integer)
           1190 => ( Parameter_Float, 0.0 ),   --  : as211sp (Amount)
           1191 => ( Parameter_Float, 0.0 ),   --  : as212sp (Amount)
           1192 => ( Parameter_Integer, 0 ),   --  : as213sp (Integer)
           1193 => ( Parameter_Integer, 0 ),   --  : as214sp (Integer)
           1194 => ( Parameter_Integer, 0 ),   --  : as261hd (Integer)
           1195 => ( Parameter_Integer, 0 ),   --  : as261sp (Integer)
           1196 => ( Parameter_Float, 0.0 ),   --  : as271hd (Amount)
           1197 => ( Parameter_Integer, 0 ),   --  : as272hd (Integer)
           1198 => ( Parameter_Integer, 0 ),   --  : as271sp (Integer)
           1199 => ( Parameter_Integer, 0 ),   --  : as272sp (Integer)
           1200 => ( Parameter_Integer, 0 ),   --  : as281hd (Integer)
           1201 => ( Parameter_Float, 0.0 ),   --  : as281sp (Amount)
           1202 => ( Parameter_Integer, 0 ),   --  : as291hd (Integer)
           1203 => ( Parameter_Integer, 0 ),   --  : as292hd (Integer)
           1204 => ( Parameter_Integer, 0 ),   --  : as293hd (Integer)
           1205 => ( Parameter_Integer, 0 ),   --  : as291sp (Integer)
           1206 => ( Parameter_Integer, 0 ),   --  : as292sp (Integer)
           1207 => ( Parameter_Integer, 0 ),   --  : as293sp (Integer)
           1208 => ( Parameter_Integer, 0 ),   --  : stdlachd (Integer)
           1209 => ( Parameter_Integer, 0 ),   --  : stdlamhd (Integer)
           1210 => ( Parameter_Integer, 0 ),   --  : stcbhd (Integer)
           1211 => ( Parameter_Integer, 0 ),   --  : stpenchd (Integer)
           1212 => ( Parameter_Integer, 0 ),   --  : strphd (Integer)
           1213 => ( Parameter_Integer, 0 ),   --  : stwphd (Integer)
           1214 => ( Parameter_Integer, 0 ),   --  : stwdphd (Integer)
           1215 => ( Parameter_Integer, 0 ),   --  : stwwphd (Integer)
           1216 => ( Parameter_Integer, 0 ),   --  : stsdahd (Integer)
           1217 => ( Parameter_Integer, 0 ),   --  : staahd (Integer)
           1218 => ( Parameter_Integer, 0 ),   --  : sticahd (Integer)
           1219 => ( Parameter_Integer, 0 ),   --  : stjsahd (Integer)
           1220 => ( Parameter_Integer, 0 ),   --  : stiidbhd (Integer)
           1221 => ( Parameter_Integer, 0 ),   --  : stesahd (Integer)
           1222 => ( Parameter_Integer, 0 ),   --  : stibhd (Integer)
           1223 => ( Parameter_Integer, 0 ),   --  : stishd (Integer)
           1224 => ( Parameter_Integer, 0 ),   --  : stmahd (Integer)
           1225 => ( Parameter_Integer, 0 ),   --  : stshhd (Integer)
           1226 => ( Parameter_Integer, 0 ),   --  : stgahd (Integer)
           1227 => ( Parameter_Integer, 0 ),   --  : stwtchd (Integer)
           1228 => ( Parameter_Integer, 0 ),   --  : stctchd (Integer)
           1229 => ( Parameter_Integer, 0 ),   --  : stwtclhd (Integer)
           1230 => ( Parameter_Integer, 0 ),   --  : stctclhd (Integer)
           1231 => ( Parameter_Integer, 0 ),   --  : stuchd (Integer)
           1232 => ( Parameter_Integer, 0 ),   --  : stpipdhd (Integer)
           1233 => ( Parameter_Integer, 0 ),   --  : stpipmhd (Integer)
           1234 => ( Parameter_Integer, 0 ),   --  : stdlacsp (Integer)
           1235 => ( Parameter_Integer, 0 ),   --  : stdlamsp (Integer)
           1236 => ( Parameter_Integer, 0 ),   --  : stcbsp (Integer)
           1237 => ( Parameter_Integer, 0 ),   --  : stpencsp (Integer)
           1238 => ( Parameter_Integer, 0 ),   --  : strpsp (Integer)
           1239 => ( Parameter_Integer, 0 ),   --  : stwpsp (Integer)
           1240 => ( Parameter_Integer, 0 ),   --  : stwdpsp (Integer)
           1241 => ( Parameter_Integer, 0 ),   --  : stwwpsp (Integer)
           1242 => ( Parameter_Integer, 0 ),   --  : stsdasp (Integer)
           1243 => ( Parameter_Integer, 0 ),   --  : staasp (Integer)
           1244 => ( Parameter_Integer, 0 ),   --  : sticasp (Integer)
           1245 => ( Parameter_Integer, 0 ),   --  : stjsasp (Integer)
           1246 => ( Parameter_Integer, 0 ),   --  : stiidbsp (Integer)
           1247 => ( Parameter_Integer, 0 ),   --  : stesasp (Integer)
           1248 => ( Parameter_Integer, 0 ),   --  : stibsp (Integer)
           1249 => ( Parameter_Integer, 0 ),   --  : stissp (Integer)
           1250 => ( Parameter_Integer, 0 ),   --  : stmasp (Integer)
           1251 => ( Parameter_Integer, 0 ),   --  : stshsp (Integer)
           1252 => ( Parameter_Integer, 0 ),   --  : stgasp (Integer)
           1253 => ( Parameter_Integer, 0 ),   --  : stwtcsp (Integer)
           1254 => ( Parameter_Integer, 0 ),   --  : stctcsp (Integer)
           1255 => ( Parameter_Integer, 0 ),   --  : stwtclsp (Integer)
           1256 => ( Parameter_Integer, 0 ),   --  : stctclsp (Integer)
           1257 => ( Parameter_Integer, 0 ),   --  : stucsp (Integer)
           1258 => ( Parameter_Integer, 0 ),   --  : stpipdsp (Integer)
           1259 => ( Parameter_Integer, 0 ),   --  : stpipmsp (Integer)
           1260 => ( Parameter_Float, 0.0 ),   --  : dlacahd (Amount)
           1261 => ( Parameter_Float, 0.0 ),   --  : dlamohd (Amount)
           1262 => ( Parameter_Float, 0.0 ),   --  : cbhd (Amount)
           1263 => ( Parameter_Float, 0.0 ),   --  : lpencrhd (Amount)
           1264 => ( Parameter_Float, 0.0 ),   --  : rphd (Amount)
           1265 => ( Parameter_Float, 0.0 ),   --  : wphd (Amount)
           1266 => ( Parameter_Float, 0.0 ),   --  : wdphd (Amount)
           1267 => ( Parameter_Float, 0.0 ),   --  : wwphd (Amount)
           1268 => ( Parameter_Float, 0.0 ),   --  : sdahd (Amount)
           1269 => ( Parameter_Float, 0.0 ),   --  : aahd (Amount)
           1270 => ( Parameter_Float, 0.0 ),   --  : icahd (Amount)
           1271 => ( Parameter_Float, 0.0 ),   --  : jsahd (Amount)
           1272 => ( Parameter_Float, 0.0 ),   --  : iidbhd (Amount)
           1273 => ( Parameter_Float, 0.0 ),   --  : esahd (Amount)
           1274 => ( Parameter_Float, 0.0 ),   --  : ibhd (Amount)
           1275 => ( Parameter_Float, 0.0 ),   --  : ishd (Amount)
           1276 => ( Parameter_Float, 0.0 ),   --  : mahd (Amount)
           1277 => ( Parameter_Integer, 0 ),   --  : sfmghd (Integer)
           1278 => ( Parameter_Float, 0.0 ),   --  : sffghd (Amount)
           1279 => ( Parameter_Float, 0.0 ),   --  : othbenhd (Amount)
           1280 => ( Parameter_Float, 0.0 ),   --  : tubenhd (Amount)
           1281 => ( Parameter_Float, 0.0 ),   --  : fsbenhd (Amount)
           1282 => ( Parameter_Float, 0.0 ),   --  : sicinhd (Amount)
           1283 => ( Parameter_Integer, 0 ),   --  : accinhd (Integer)
           1284 => ( Parameter_Float, 0.0 ),   --  : hosinhd (Amount)
           1285 => ( Parameter_Integer, 0 ),   --  : gtshd (Integer)
           1286 => ( Parameter_Float, 0.0 ),   --  : gahd (Amount)
           1287 => ( Parameter_Integer, 0 ),   --  : iwchd (Integer)
           1288 => ( Parameter_Integer, 0 ),   --  : r2wchd (Integer)
           1289 => ( Parameter_Integer, 0 ),   --  : widplhd (Integer)
           1290 => ( Parameter_Float, 0.0 ),   --  : uninshd (Amount)
           1291 => ( Parameter_Integer, 0 ),   --  : wfamthd (Integer)
           1292 => ( Parameter_Float, 0.0 ),   --  : dssdpihd (Amount)
           1293 => ( Parameter_Float, 0.0 ),   --  : dssdpjhd (Amount)
           1294 => ( Parameter_Float, 0.0 ),   --  : sfrpaihd (Amount)
           1295 => ( Parameter_Float, 0.0 ),   --  : sfrpajhd (Amount)
           1296 => ( Parameter_Float, 0.0 ),   --  : exhbhd (Amount)
           1297 => ( Parameter_Float, 0.0 ),   --  : perhinhd (Amount)
           1298 => ( Parameter_Float, 0.0 ),   --  : otsiinhd (Amount)
           1299 => ( Parameter_Float, 0.0 ),   --  : cichd (Amount)
           1300 => ( Parameter_Float, 0.0 ),   --  : bowtchd (Amount)
           1301 => ( Parameter_Float, 0.0 ),   --  : boctchd (Amount)
           1302 => ( Parameter_Float, 0.0 ),   --  : bowtclhd (Amount)
           1303 => ( Parameter_Float, 0.0 ),   --  : boctclhd (Amount)
           1304 => ( Parameter_Float, 0.0 ),   --  : hbhd (Amount)
           1305 => ( Parameter_Float, 0.0 ),   --  : uchd (Amount)
           1306 => ( Parameter_Float, 0.0 ),   --  : pipdhd (Amount)
           1307 => ( Parameter_Float, 0.0 ),   --  : pipmhd (Amount)
           1308 => ( Parameter_Float, 0.0 ),   --  : lndwphd (Amount)
           1309 => ( Parameter_Integer, 0 ),   --  : lnlahd (Integer)
           1310 => ( Parameter_Float, 0.0 ),   --  : dwpauchd (Amount)
           1311 => ( Parameter_Float, 0.0 ),   --  : sfrpuchd (Amount)
           1312 => ( Parameter_Float, 0.0 ),   --  : dlacasp (Amount)
           1313 => ( Parameter_Float, 0.0 ),   --  : dlamosp (Amount)
           1314 => ( Parameter_Float, 0.0 ),   --  : cbsp (Amount)
           1315 => ( Parameter_Float, 0.0 ),   --  : lpencrsp (Amount)
           1316 => ( Parameter_Float, 0.0 ),   --  : rpsp (Amount)
           1317 => ( Parameter_Integer, 0 ),   --  : wpsp (Integer)
           1318 => ( Parameter_Float, 0.0 ),   --  : wdpsp (Amount)
           1319 => ( Parameter_Float, 0.0 ),   --  : wwpsp (Amount)
           1320 => ( Parameter_Float, 0.0 ),   --  : sdasp (Amount)
           1321 => ( Parameter_Float, 0.0 ),   --  : aasp (Amount)
           1322 => ( Parameter_Float, 0.0 ),   --  : icasp (Amount)
           1323 => ( Parameter_Float, 0.0 ),   --  : jsasp (Amount)
           1324 => ( Parameter_Float, 0.0 ),   --  : iidbsp (Amount)
           1325 => ( Parameter_Float, 0.0 ),   --  : esasp (Amount)
           1326 => ( Parameter_Float, 0.0 ),   --  : ibsp (Amount)
           1327 => ( Parameter_Float, 0.0 ),   --  : issp (Amount)
           1328 => ( Parameter_Float, 0.0 ),   --  : masp (Amount)
           1329 => ( Parameter_Integer, 0 ),   --  : sfmgsp (Integer)
           1330 => ( Parameter_Integer, 0 ),   --  : sffgsp (Integer)
           1331 => ( Parameter_Integer, 0 ),   --  : othbensp (Integer)
           1332 => ( Parameter_Integer, 0 ),   --  : tubensp (Integer)
           1333 => ( Parameter_Integer, 0 ),   --  : fsbensp (Integer)
           1334 => ( Parameter_Float, 0.0 ),   --  : sicinsp (Amount)
           1335 => ( Parameter_Integer, 0 ),   --  : accinsp (Integer)
           1336 => ( Parameter_Float, 0.0 ),   --  : hosinsp (Amount)
           1337 => ( Parameter_Integer, 0 ),   --  : gtssp (Integer)
           1338 => ( Parameter_Integer, 0 ),   --  : gasp (Integer)
           1339 => ( Parameter_Integer, 0 ),   --  : iwcsp (Integer)
           1340 => ( Parameter_Integer, 0 ),   --  : r2wcsp (Integer)
           1341 => ( Parameter_Integer, 0 ),   --  : widplsp (Integer)
           1342 => ( Parameter_Float, 0.0 ),   --  : uninssp (Amount)
           1343 => ( Parameter_Integer, 0 ),   --  : wfamtsp (Integer)
           1344 => ( Parameter_Float, 0.0 ),   --  : dssdpisp (Amount)
           1345 => ( Parameter_Float, 0.0 ),   --  : dssdpjsp (Amount)
           1346 => ( Parameter_Float, 0.0 ),   --  : sfrpaisp (Amount)
           1347 => ( Parameter_Float, 0.0 ),   --  : sfrpajsp (Amount)
           1348 => ( Parameter_Integer, 0 ),   --  : exhbsp (Integer)
           1349 => ( Parameter_Float, 0.0 ),   --  : perhinsp (Amount)
           1350 => ( Parameter_Float, 0.0 ),   --  : otsiinsp (Amount)
           1351 => ( Parameter_Integer, 0 ),   --  : cicsp (Integer)
           1352 => ( Parameter_Float, 0.0 ),   --  : bowtcsp (Amount)
           1353 => ( Parameter_Float, 0.0 ),   --  : boctcsp (Amount)
           1354 => ( Parameter_Integer, 0 ),   --  : bowtclsp (Integer)
           1355 => ( Parameter_Float, 0.0 ),   --  : boctclsp (Amount)
           1356 => ( Parameter_Float, 0.0 ),   --  : hbsp (Amount)
           1357 => ( Parameter_Float, 0.0 ),   --  : ucsp (Amount)
           1358 => ( Parameter_Float, 0.0 ),   --  : pipdsp (Amount)
           1359 => ( Parameter_Float, 0.0 ),   --  : pipmsp (Amount)
           1360 => ( Parameter_Integer, 0 ),   --  : lndwpsp (Integer)
           1361 => ( Parameter_Integer, 0 ),   --  : lnlasp (Integer)
           1362 => ( Parameter_Integer, 0 ),   --  : dwpaucsp (Integer)
           1363 => ( Parameter_Float, 0.0 ),   --  : sfrpucsp (Amount)
           1364 => ( Parameter_Integer, 0 ),   --  : ltdlachd (Integer)
           1365 => ( Parameter_Integer, 0 ),   --  : ltdlamhd (Integer)
           1366 => ( Parameter_Integer, 0 ),   --  : ltcbhd (Integer)
           1367 => ( Parameter_Integer, 0 ),   --  : bopenchd (Integer)
           1368 => ( Parameter_Integer, 0 ),   --  : ltrphd (Integer)
           1369 => ( Parameter_Integer, 0 ),   --  : ltwphd (Integer)
           1370 => ( Parameter_Integer, 0 ),   --  : ltwdphd (Integer)
           1371 => ( Parameter_Integer, 0 ),   --  : ltwwphd (Integer)
           1372 => ( Parameter_Integer, 0 ),   --  : ltsdahd (Integer)
           1373 => ( Parameter_Integer, 0 ),   --  : ltaahd (Integer)
           1374 => ( Parameter_Integer, 0 ),   --  : lticahd (Integer)
           1375 => ( Parameter_Integer, 0 ),   --  : ltjsahd (Integer)
           1376 => ( Parameter_Integer, 0 ),   --  : ltiidbhd (Integer)
           1377 => ( Parameter_Integer, 0 ),   --  : ltesahd (Integer)
           1378 => ( Parameter_Integer, 0 ),   --  : ltibhd (Integer)
           1379 => ( Parameter_Integer, 0 ),   --  : ltishd (Integer)
           1380 => ( Parameter_Integer, 0 ),   --  : ltmahd (Integer)
           1381 => ( Parameter_Integer, 0 ),   --  : ltshhd (Integer)
           1382 => ( Parameter_Integer, 0 ),   --  : ltgahd (Integer)
           1383 => ( Parameter_Integer, 0 ),   --  : hwtchd (Integer)
           1384 => ( Parameter_Integer, 0 ),   --  : hctchd (Integer)
           1385 => ( Parameter_Integer, 0 ),   --  : hwtclhd (Integer)
           1386 => ( Parameter_Integer, 0 ),   --  : hctclhd (Integer)
           1387 => ( Parameter_Integer, 0 ),   --  : ltuchd (Integer)
           1388 => ( Parameter_Integer, 0 ),   --  : ltpipdhd (Integer)
           1389 => ( Parameter_Integer, 0 ),   --  : ltpipmhd (Integer)
           1390 => ( Parameter_Integer, 0 ),   --  : ltdlacsp (Integer)
           1391 => ( Parameter_Integer, 0 ),   --  : ltdlamsp (Integer)
           1392 => ( Parameter_Integer, 0 ),   --  : ltcbsp (Integer)
           1393 => ( Parameter_Integer, 0 ),   --  : bopencsp (Integer)
           1394 => ( Parameter_Integer, 0 ),   --  : ltrpsp (Integer)
           1395 => ( Parameter_Integer, 0 ),   --  : ltwpsp (Integer)
           1396 => ( Parameter_Integer, 0 ),   --  : ltwdpsp (Integer)
           1397 => ( Parameter_Integer, 0 ),   --  : ltwwpsp (Integer)
           1398 => ( Parameter_Integer, 0 ),   --  : ltsdasp (Integer)
           1399 => ( Parameter_Integer, 0 ),   --  : ltaasp (Integer)
           1400 => ( Parameter_Integer, 0 ),   --  : lticasp (Integer)
           1401 => ( Parameter_Integer, 0 ),   --  : ltjsasp (Integer)
           1402 => ( Parameter_Integer, 0 ),   --  : ltiidbsp (Integer)
           1403 => ( Parameter_Integer, 0 ),   --  : ltesasp (Integer)
           1404 => ( Parameter_Integer, 0 ),   --  : ltibsp (Integer)
           1405 => ( Parameter_Integer, 0 ),   --  : ltissp (Integer)
           1406 => ( Parameter_Integer, 0 ),   --  : ltmasp (Integer)
           1407 => ( Parameter_Integer, 0 ),   --  : ltshsp (Integer)
           1408 => ( Parameter_Integer, 0 ),   --  : ltgasp (Integer)
           1409 => ( Parameter_Integer, 0 ),   --  : hwtcsp (Integer)
           1410 => ( Parameter_Integer, 0 ),   --  : hctcsp (Integer)
           1411 => ( Parameter_Integer, 0 ),   --  : hwtclsp (Integer)
           1412 => ( Parameter_Integer, 0 ),   --  : hctclsp (Integer)
           1413 => ( Parameter_Integer, 0 ),   --  : ltucsp (Integer)
           1414 => ( Parameter_Integer, 0 ),   --  : ltpipdsp (Integer)
           1415 => ( Parameter_Integer, 0 ),   --  : ltpipmsp (Integer)
           1416 => ( Parameter_Integer, 0 ),   --  : pdlacahd (Integer)
           1417 => ( Parameter_Integer, 0 ),   --  : pdlamohd (Integer)
           1418 => ( Parameter_Integer, 0 ),   --  : pcbhd (Integer)
           1419 => ( Parameter_Integer, 0 ),   --  : hpenchd (Integer)
           1420 => ( Parameter_Integer, 0 ),   --  : prphd (Integer)
           1421 => ( Parameter_Integer, 0 ),   --  : pwphd (Integer)
           1422 => ( Parameter_Integer, 0 ),   --  : pwdphd (Integer)
           1423 => ( Parameter_Integer, 0 ),   --  : pwwphd (Integer)
           1424 => ( Parameter_Integer, 0 ),   --  : psdahd (Integer)
           1425 => ( Parameter_Integer, 0 ),   --  : paahd (Integer)
           1426 => ( Parameter_Integer, 0 ),   --  : picahd (Integer)
           1427 => ( Parameter_Integer, 0 ),   --  : pjsahd (Integer)
           1428 => ( Parameter_Integer, 0 ),   --  : piidbhd (Integer)
           1429 => ( Parameter_Integer, 0 ),   --  : pesahd (Integer)
           1430 => ( Parameter_Integer, 0 ),   --  : pibhd (Integer)
           1431 => ( Parameter_Integer, 0 ),   --  : pishd (Integer)
           1432 => ( Parameter_Integer, 0 ),   --  : pmahd (Integer)
           1433 => ( Parameter_Integer, 0 ),   --  : pothbehd (Integer)
           1434 => ( Parameter_Integer, 0 ),   --  : ptubenhd (Integer)
           1435 => ( Parameter_Integer, 0 ),   --  : pfsbenhd (Integer)
           1436 => ( Parameter_Integer, 0 ),   --  : psicinhd (Integer)
           1437 => ( Parameter_Integer, 0 ),   --  : paccinhd (Integer)
           1438 => ( Parameter_Integer, 0 ),   --  : phosinhd (Integer)
           1439 => ( Parameter_Integer, 0 ),   --  : pgtshd (Integer)
           1440 => ( Parameter_Integer, 0 ),   --  : pgahd (Integer)
           1441 => ( Parameter_Integer, 0 ),   --  : iwcpdhd (Integer)
           1442 => ( Parameter_Integer, 0 ),   --  : r2wcpdhd (Integer)
           1443 => ( Parameter_Integer, 0 ),   --  : puninshd (Integer)
           1444 => ( Parameter_Integer, 0 ),   --  : pdsspihd (Integer)
           1445 => ( Parameter_Integer, 0 ),   --  : pdsspjhd (Integer)
           1446 => ( Parameter_Integer, 0 ),   --  : pexhbhd (Integer)
           1447 => ( Parameter_Integer, 0 ),   --  : ppehinhd (Integer)
           1448 => ( Parameter_Integer, 0 ),   --  : potsinhd (Integer)
           1449 => ( Parameter_Integer, 0 ),   --  : pdcichd (Integer)
           1450 => ( Parameter_Integer, 0 ),   --  : wwtchd (Integer)
           1451 => ( Parameter_Integer, 0 ),   --  : wctchd (Integer)
           1452 => ( Parameter_Integer, 0 ),   --  : wwtclhd (Integer)
           1453 => ( Parameter_Integer, 0 ),   --  : wctclhd (Integer)
           1454 => ( Parameter_Integer, 0 ),   --  : phbhd (Integer)
           1455 => ( Parameter_Integer, 0 ),   --  : puchd (Integer)
           1456 => ( Parameter_Integer, 0 ),   --  : ppipdhd (Integer)
           1457 => ( Parameter_Integer, 0 ),   --  : ppipmhd (Integer)
           1458 => ( Parameter_Integer, 0 ),   --  : pdwpuchd (Integer)
           1459 => ( Parameter_Integer, 0 ),   --  : pdlacasp (Integer)
           1460 => ( Parameter_Integer, 0 ),   --  : pdlamosp (Integer)
           1461 => ( Parameter_Integer, 0 ),   --  : pcbsp (Integer)
           1462 => ( Parameter_Integer, 0 ),   --  : hpencsp (Integer)
           1463 => ( Parameter_Integer, 0 ),   --  : prpsp (Integer)
           1464 => ( Parameter_Integer, 0 ),   --  : pwpsp (Integer)
           1465 => ( Parameter_Integer, 0 ),   --  : pwdpsp (Integer)
           1466 => ( Parameter_Integer, 0 ),   --  : pwwpsp (Integer)
           1467 => ( Parameter_Integer, 0 ),   --  : psdasp (Integer)
           1468 => ( Parameter_Integer, 0 ),   --  : paasp (Integer)
           1469 => ( Parameter_Integer, 0 ),   --  : picasp (Integer)
           1470 => ( Parameter_Integer, 0 ),   --  : pjsasp (Integer)
           1471 => ( Parameter_Integer, 0 ),   --  : piidbsp (Integer)
           1472 => ( Parameter_Integer, 0 ),   --  : pesasp (Integer)
           1473 => ( Parameter_Integer, 0 ),   --  : pibsp (Integer)
           1474 => ( Parameter_Integer, 0 ),   --  : pissp (Integer)
           1475 => ( Parameter_Integer, 0 ),   --  : pmasp (Integer)
           1476 => ( Parameter_Integer, 0 ),   --  : pothbesp (Integer)
           1477 => ( Parameter_Integer, 0 ),   --  : ptubensp (Integer)
           1478 => ( Parameter_Integer, 0 ),   --  : pfsbensp (Integer)
           1479 => ( Parameter_Integer, 0 ),   --  : psicinsp (Integer)
           1480 => ( Parameter_Integer, 0 ),   --  : paccinsp (Integer)
           1481 => ( Parameter_Integer, 0 ),   --  : phosinsp (Integer)
           1482 => ( Parameter_Integer, 0 ),   --  : pgtssp (Integer)
           1483 => ( Parameter_Integer, 0 ),   --  : pgasp (Integer)
           1484 => ( Parameter_Integer, 0 ),   --  : iwcpdsp (Integer)
           1485 => ( Parameter_Integer, 0 ),   --  : r2wcpdsp (Integer)
           1486 => ( Parameter_Integer, 0 ),   --  : puninssp (Integer)
           1487 => ( Parameter_Integer, 0 ),   --  : pdsspisp (Integer)
           1488 => ( Parameter_Integer, 0 ),   --  : pdsspjsp (Integer)
           1489 => ( Parameter_Integer, 0 ),   --  : pexhbsp (Integer)
           1490 => ( Parameter_Integer, 0 ),   --  : ppehinsp (Integer)
           1491 => ( Parameter_Integer, 0 ),   --  : potsinsp (Integer)
           1492 => ( Parameter_Integer, 0 ),   --  : pdcicsp (Integer)
           1493 => ( Parameter_Integer, 0 ),   --  : wwtcsp (Integer)
           1494 => ( Parameter_Integer, 0 ),   --  : wctcsp (Integer)
           1495 => ( Parameter_Integer, 0 ),   --  : wwtclsp (Integer)
           1496 => ( Parameter_Integer, 0 ),   --  : wctclsp (Integer)
           1497 => ( Parameter_Integer, 0 ),   --  : phbsp (Integer)
           1498 => ( Parameter_Integer, 0 ),   --  : pucsp (Integer)
           1499 => ( Parameter_Integer, 0 ),   --  : ppipdsp (Integer)
           1500 => ( Parameter_Integer, 0 ),   --  : ppipmsp (Integer)
           1501 => ( Parameter_Integer, 0 ),   --  : pdwpucsp (Integer)
           1502 => ( Parameter_Integer, 0 ),   --  : cbpayehd (Integer)
           1503 => ( Parameter_Integer, 0 ),   --  : cbpayesp (Integer)
           1504 => ( Parameter_Integer, 0 ),   --  : cbtaxhd (Integer)
           1505 => ( Parameter_Integer, 0 ),   --  : cbtaxsp (Integer)
           1506 => ( Parameter_Integer, 0 ),   --  : pwtchd (Integer)
           1507 => ( Parameter_Integer, 0 ),   --  : pctchd (Integer)
           1508 => ( Parameter_Integer, 0 ),   --  : pwtcsp (Integer)
           1509 => ( Parameter_Integer, 0 ),   --  : pctcsp (Integer)
           1510 => ( Parameter_Integer, 0 ),   --  : npcamthd (Integer)
           1511 => ( Parameter_Float, 0.0 ),   --  : urphd (Amount)
           1512 => ( Parameter_Integer, 0 ),   --  : uwphd (Integer)
           1513 => ( Parameter_Float, 0.0 ),   --  : uesahd (Amount)
           1514 => ( Parameter_Float, 0.0 ),   --  : uishd (Amount)
           1515 => ( Parameter_Float, 0.0 ),   --  : uwtchd (Amount)
           1516 => ( Parameter_Integer, 0 ),   --  : uctchd (Integer)
           1517 => ( Parameter_Integer, 0 ),   --  : npcamtsp (Integer)
           1518 => ( Parameter_Float, 0.0 ),   --  : urpsp (Amount)
           1519 => ( Parameter_Integer, 0 ),   --  : uwpsp (Integer)
           1520 => ( Parameter_Float, 0.0 ),   --  : uesasp (Amount)
           1521 => ( Parameter_Integer, 0 ),   --  : uissp (Integer)
           1522 => ( Parameter_Float, 0.0 ),   --  : uwtcsp (Amount)
           1523 => ( Parameter_Integer, 0 ),   --  : uctcsp (Integer)
           1524 => ( Parameter_Integer, 0 ),   --  : dmpenchd (Integer)
           1525 => ( Parameter_Integer, 0 ),   --  : purphd (Integer)
           1526 => ( Parameter_Integer, 0 ),   --  : puwphd (Integer)
           1527 => ( Parameter_Integer, 0 ),   --  : nupesahd (Integer)
           1528 => ( Parameter_Integer, 0 ),   --  : puishd (Integer)
           1529 => ( Parameter_Integer, 0 ),   --  : dmpencsp (Integer)
           1530 => ( Parameter_Integer, 0 ),   --  : purpsp (Integer)
           1531 => ( Parameter_Integer, 0 ),   --  : puwpsp (Integer)
           1532 => ( Parameter_Integer, 0 ),   --  : nupesasp (Integer)
           1533 => ( Parameter_Integer, 0 ),   --  : puissp (Integer)
           1534 => ( Parameter_Integer, 0 ),   --  : wjsahd (Integer)
           1535 => ( Parameter_Integer, 0 ),   --  : wesahd (Integer)
           1536 => ( Parameter_Integer, 0 ),   --  : wishd (Integer)
           1537 => ( Parameter_Integer, 0 ),   --  : wothbehd (Integer)
           1538 => ( Parameter_Integer, 0 ),   --  : wtubenhd (Integer)
           1539 => ( Parameter_Integer, 0 ),   --  : wfsbenhd (Integer)
           1540 => ( Parameter_Integer, 0 ),   --  : wsicinhd (Integer)
           1541 => ( Parameter_Integer, 0 ),   --  : waccinhd (Integer)
           1542 => ( Parameter_Integer, 0 ),   --  : whosinhd (Integer)
           1543 => ( Parameter_Integer, 0 ),   --  : wkiwchd (Integer)
           1544 => ( Parameter_Integer, 0 ),   --  : wkr2whd (Integer)
           1545 => ( Parameter_Integer, 0 ),   --  : wuninshd (Integer)
           1546 => ( Parameter_Integer, 0 ),   --  : wpehinhd (Integer)
           1547 => ( Parameter_Integer, 0 ),   --  : wotsinhd (Integer)
           1548 => ( Parameter_Integer, 0 ),   --  : wocichd (Integer)
           1549 => ( Parameter_Integer, 0 ),   --  : whbhd (Integer)
           1550 => ( Parameter_Integer, 0 ),   --  : wjsasp (Integer)
           1551 => ( Parameter_Integer, 0 ),   --  : wesasp (Integer)
           1552 => ( Parameter_Integer, 0 ),   --  : wissp (Integer)
           1553 => ( Parameter_Integer, 0 ),   --  : wothbesp (Integer)
           1554 => ( Parameter_Integer, 0 ),   --  : wtubensp (Integer)
           1555 => ( Parameter_Integer, 0 ),   --  : wfsbensp (Integer)
           1556 => ( Parameter_Integer, 0 ),   --  : wsicinsp (Integer)
           1557 => ( Parameter_Integer, 0 ),   --  : waccinsp (Integer)
           1558 => ( Parameter_Integer, 0 ),   --  : whosinsp (Integer)
           1559 => ( Parameter_Integer, 0 ),   --  : wkiwcsp (Integer)
           1560 => ( Parameter_Integer, 0 ),   --  : wkr2wsp (Integer)
           1561 => ( Parameter_Integer, 0 ),   --  : wuninssp (Integer)
           1562 => ( Parameter_Integer, 0 ),   --  : wpehinsp (Integer)
           1563 => ( Parameter_Integer, 0 ),   --  : wotsinsp (Integer)
           1564 => ( Parameter_Integer, 0 ),   --  : wocicsp (Integer)
           1565 => ( Parameter_Integer, 0 ),   --  : whbsp (Integer)
           1566 => ( Parameter_Integer, 0 ),   --  : yjsahd (Integer)
           1567 => ( Parameter_Integer, 0 ),   --  : yesahd (Integer)
           1568 => ( Parameter_Integer, 0 ),   --  : yishd (Integer)
           1569 => ( Parameter_Integer, 0 ),   --  : yhbhd (Integer)
           1570 => ( Parameter_Integer, 0 ),   --  : yjsasp (Integer)
           1571 => ( Parameter_Integer, 0 ),   --  : yesasp (Integer)
           1572 => ( Parameter_Integer, 0 ),   --  : yissp (Integer)
           1573 => ( Parameter_Integer, 0 ),   --  : yhbsp (Integer)
           1574 => ( Parameter_Integer, 0 ),   --  : prothbhd (Integer)
           1575 => ( Parameter_Integer, 0 ),   --  : prtubehd (Integer)
           1576 => ( Parameter_Integer, 0 ),   --  : prfsbehd (Integer)
           1577 => ( Parameter_Integer, 0 ),   --  : prsicihd (Integer)
           1578 => ( Parameter_Integer, 0 ),   --  : praccihd (Integer)
           1579 => ( Parameter_Integer, 0 ),   --  : prhosihd (Integer)
           1580 => ( Parameter_Integer, 0 ),   --  : pruninhd (Integer)
           1581 => ( Parameter_Integer, 0 ),   --  : prphinhd (Integer)
           1582 => ( Parameter_Integer, 0 ),   --  : prosinhd (Integer)
           1583 => ( Parameter_Integer, 0 ),   --  : prcichd (Integer)
           1584 => ( Parameter_Integer, 0 ),   --  : prothbsp (Integer)
           1585 => ( Parameter_Integer, 0 ),   --  : prtubesp (Integer)
           1586 => ( Parameter_Integer, 0 ),   --  : prfsbesp (Integer)
           1587 => ( Parameter_Integer, 0 ),   --  : prsicisp (Integer)
           1588 => ( Parameter_Integer, 0 ),   --  : praccisp (Integer)
           1589 => ( Parameter_Integer, 0 ),   --  : prhosisp (Integer)
           1590 => ( Parameter_Integer, 0 ),   --  : pruninsp (Integer)
           1591 => ( Parameter_Integer, 0 ),   --  : prphinsp (Integer)
           1592 => ( Parameter_Integer, 0 ),   --  : prosinsp (Integer)
           1593 => ( Parameter_Integer, 0 ),   --  : prcicsp (Integer)
           1594 => ( Parameter_Integer, 0 ),   --  : uspenchd (Integer)
           1595 => ( Parameter_Integer, 0 ),   --  : usrphd (Integer)
           1596 => ( Parameter_Integer, 0 ),   --  : uswphd (Integer)
           1597 => ( Parameter_Integer, 0 ),   --  : usjsahd (Integer)
           1598 => ( Parameter_Integer, 0 ),   --  : usishd (Integer)
           1599 => ( Parameter_Integer, 0 ),   --  : uspencsp (Integer)
           1600 => ( Parameter_Integer, 0 ),   --  : usrpsp (Integer)
           1601 => ( Parameter_Integer, 0 ),   --  : uswpsp (Integer)
           1602 => ( Parameter_Integer, 0 ),   --  : usjsasp (Integer)
           1603 => ( Parameter_Integer, 0 ),   --  : usissp (Integer)
           1604 => ( Parameter_Integer, 0 ),   --  : gicacahd (Integer)
           1605 => ( Parameter_Integer, 0 ),   --  : pencrdhd (Integer)
           1606 => ( Parameter_Integer, 0 ),   --  : gicaahd (Integer)
           1607 => ( Parameter_Integer, 0 ),   --  : muibwhd (Integer)
           1608 => ( Parameter_Integer, 0 ),   --  : wfuelhd (Integer)
           1609 => ( Parameter_Integer, 0 ),   --  : exhbtyhd (Integer)
           1610 => ( Parameter_Integer, 0 ),   --  : lnodwphd (Integer)
           1611 => ( Parameter_Integer, 0 ),   --  : lnolahd (Integer)
           1612 => ( Parameter_Integer, 0 ),   --  : gicacasp (Integer)
           1613 => ( Parameter_Integer, 0 ),   --  : pencrdsp (Integer)
           1614 => ( Parameter_Integer, 0 ),   --  : gicaasp (Integer)
           1615 => ( Parameter_Integer, 0 ),   --  : muibwsp (Integer)
           1616 => ( Parameter_Integer, 0 ),   --  : wfuelsp (Integer)
           1617 => ( Parameter_Integer, 0 ),   --  : exhbtysp (Integer)
           1618 => ( Parameter_Integer, 0 ),   --  : lnodwpsp (Integer)
           1619 => ( Parameter_Integer, 0 ),   --  : lnolasp (Integer)
           1620 => ( Parameter_Integer, 0 ),   --  : dcpayhd (Integer)
           1621 => ( Parameter_Integer, 0 ),   --  : dmpayhd (Integer)
           1622 => ( Parameter_Integer, 0 ),   --  : ecpenchd (Integer)
           1623 => ( Parameter_Integer, 0 ),   --  : wporbahd (Integer)
           1624 => ( Parameter_Integer, 0 ),   --  : aapayhd (Integer)
           1625 => ( Parameter_Integer, 0 ),   --  : jsatyphd (Integer)
           1626 => ( Parameter_Integer, 0 ),   --  : esatyphd (Integer)
           1627 => ( Parameter_Integer, 0 ),   --  : mupibhd (Integer)
           1628 => ( Parameter_Integer, 0 ),   --  : dssishd (Integer)
           1629 => ( Parameter_Integer, 0 ),   --  : dssjsahd (Integer)
           1630 => ( Parameter_Integer, 0 ),   --  : sfincihd (Integer)
           1631 => ( Parameter_Integer, 0 ),   --  : sfincjhd (Integer)
           1632 => ( Parameter_Integer, 0 ),   --  : pdlpayhd (Integer)
           1633 => ( Parameter_Integer, 0 ),   --  : pmpayhd (Integer)
           1634 => ( Parameter_Integer, 0 ),   --  : dwpuchd (Integer)
           1635 => ( Parameter_Integer, 0 ),   --  : sfinuchd (Integer)
           1636 => ( Parameter_Integer, 0 ),   --  : dcpaysp (Integer)
           1637 => ( Parameter_Integer, 0 ),   --  : dmpaysp (Integer)
           1638 => ( Parameter_Integer, 0 ),   --  : ecpencsp (Integer)
           1639 => ( Parameter_Integer, 0 ),   --  : wporbasp (Integer)
           1640 => ( Parameter_Integer, 0 ),   --  : aapaysp (Integer)
           1641 => ( Parameter_Integer, 0 ),   --  : jsatypsp (Integer)
           1642 => ( Parameter_Integer, 0 ),   --  : esatypsp (Integer)
           1643 => ( Parameter_Integer, 0 ),   --  : mupibsp (Integer)
           1644 => ( Parameter_Integer, 0 ),   --  : dssissp (Integer)
           1645 => ( Parameter_Integer, 0 ),   --  : dssjsasp (Integer)
           1646 => ( Parameter_Integer, 0 ),   --  : sfincisp (Integer)
           1647 => ( Parameter_Integer, 0 ),   --  : sfincjsp (Integer)
           1648 => ( Parameter_Integer, 0 ),   --  : pdlpaysp (Integer)
           1649 => ( Parameter_Integer, 0 ),   --  : pmpaysp (Integer)
           1650 => ( Parameter_Integer, 0 ),   --  : dwpucsp (Integer)
           1651 => ( Parameter_Integer, 0 ),   --  : sfinucsp (Integer)
           1652 => ( Parameter_Integer, 0 ),   --  : icaperhd (Integer)
           1653 => ( Parameter_Integer, 0 ),   --  : pmuibhd (Integer)
           1654 => ( Parameter_Integer, 0 ),   --  : pipmothd (Integer)
           1655 => ( Parameter_Integer, 0 ),   --  : icapersp (Integer)
           1656 => ( Parameter_Integer, 0 ),   --  : pmuibsp (Integer)
           1657 => ( Parameter_Integer, 0 ),   --  : pipmotsp (Integer)
           1658 => ( Parameter_Integer, 0 ),   --  : r1dlchd (Integer)
           1659 => ( Parameter_Integer, 0 ),   --  : r1dlmhd (Integer)
           1660 => ( Parameter_Integer, 0 ),   --  : r1aahd (Integer)
           1661 => ( Parameter_Integer, 0 ),   --  : r1hbhd (Integer)
           1662 => ( Parameter_Integer, 0 ),   --  : r1pipdhd (Integer)
           1663 => ( Parameter_Integer, 0 ),   --  : r1pipmhd (Integer)
           1664 => ( Parameter_Integer, 0 ),   --  : r1dlcsp (Integer)
           1665 => ( Parameter_Integer, 0 ),   --  : r1dlmsp (Integer)
           1666 => ( Parameter_Integer, 0 ),   --  : r1aasp (Integer)
           1667 => ( Parameter_Integer, 0 ),   --  : r1hbsp (Integer)
           1668 => ( Parameter_Integer, 0 ),   --  : r1pipdsp (Integer)
           1669 => ( Parameter_Integer, 0 ),   --  : r1pipmsp (Integer)
           1670 => ( Parameter_Integer, 0 ),   --  : r2dlchd (Integer)
           1671 => ( Parameter_Integer, 0 ),   --  : r2dlmhd (Integer)
           1672 => ( Parameter_Integer, 0 ),   --  : r2aahd (Integer)
           1673 => ( Parameter_Integer, 0 ),   --  : r2hbhd (Integer)
           1674 => ( Parameter_Integer, 0 ),   --  : r2pipdhd (Integer)
           1675 => ( Parameter_Integer, 0 ),   --  : r2pipmhd (Integer)
           1676 => ( Parameter_Integer, 0 ),   --  : r2dlcsp (Integer)
           1677 => ( Parameter_Integer, 0 ),   --  : r2dlmsp (Integer)
           1678 => ( Parameter_Integer, 0 ),   --  : r2aasp (Integer)
           1679 => ( Parameter_Integer, 0 ),   --  : r2hbsp (Integer)
           1680 => ( Parameter_Integer, 0 ),   --  : r2pipdsp (Integer)
           1681 => ( Parameter_Integer, 0 ),   --  : r2pipmsp (Integer)
           1682 => ( Parameter_Integer, 0 ),   --  : r3dlchd (Integer)
           1683 => ( Parameter_Integer, 0 ),   --  : r3dlmhd (Integer)
           1684 => ( Parameter_Integer, 0 ),   --  : r3aahd (Integer)
           1685 => ( Parameter_Integer, 0 ),   --  : r3hbhd (Integer)
           1686 => ( Parameter_Integer, 0 ),   --  : r3pipdhd (Integer)
           1687 => ( Parameter_Integer, 0 ),   --  : r3pipmhd (Integer)
           1688 => ( Parameter_Integer, 0 ),   --  : r3dlcsp (Integer)
           1689 => ( Parameter_Integer, 0 ),   --  : r3dlmsp (Integer)
           1690 => ( Parameter_Integer, 0 ),   --  : r3aasp (Integer)
           1691 => ( Parameter_Integer, 0 ),   --  : r3hbsp (Integer)
           1692 => ( Parameter_Integer, 0 ),   --  : r3pipdsp (Integer)
           1693 => ( Parameter_Integer, 0 ),   --  : r3pipmsp (Integer)
           1694 => ( Parameter_Integer, 0 ),   --  : r4dlchd (Integer)
           1695 => ( Parameter_Integer, 0 ),   --  : r4dlmhd (Integer)
           1696 => ( Parameter_Integer, 0 ),   --  : r4aahd (Integer)
           1697 => ( Parameter_Integer, 0 ),   --  : r4hbhd (Integer)
           1698 => ( Parameter_Integer, 0 ),   --  : r4pipdhd (Integer)
           1699 => ( Parameter_Integer, 0 ),   --  : r4pipmhd (Integer)
           1700 => ( Parameter_Integer, 0 ),   --  : r4dlcsp (Integer)
           1701 => ( Parameter_Integer, 0 ),   --  : r4dlmsp (Integer)
           1702 => ( Parameter_Integer, 0 ),   --  : r4aasp (Integer)
           1703 => ( Parameter_Integer, 0 ),   --  : r4hbsp (Integer)
           1704 => ( Parameter_Integer, 0 ),   --  : r4pipdsp (Integer)
           1705 => ( Parameter_Integer, 0 ),   --  : r4pipmsp (Integer)
           1706 => ( Parameter_Integer, 0 ),   --  : r5dlchd (Integer)
           1707 => ( Parameter_Integer, 0 ),   --  : r5dlmhd (Integer)
           1708 => ( Parameter_Integer, 0 ),   --  : r5aahd (Integer)
           1709 => ( Parameter_Integer, 0 ),   --  : r5hbhd (Integer)
           1710 => ( Parameter_Integer, 0 ),   --  : r5pipdhd (Integer)
           1711 => ( Parameter_Integer, 0 ),   --  : r5pipmhd (Integer)
           1712 => ( Parameter_Integer, 0 ),   --  : r5dlcsp (Integer)
           1713 => ( Parameter_Integer, 0 ),   --  : r5dlmsp (Integer)
           1714 => ( Parameter_Integer, 0 ),   --  : r5aasp (Integer)
           1715 => ( Parameter_Integer, 0 ),   --  : r5hbsp (Integer)
           1716 => ( Parameter_Integer, 0 ),   --  : r5pipdsp (Integer)
           1717 => ( Parameter_Integer, 0 ),   --  : r5pipmsp (Integer)
           1718 => ( Parameter_Integer, 0 ),   --  : stdlacc1 (Integer)
           1719 => ( Parameter_Integer, 0 ),   --  : stdlamc1 (Integer)
           1720 => ( Parameter_Integer, 0 ),   --  : stdlacc2 (Integer)
           1721 => ( Parameter_Integer, 0 ),   --  : stdlamc2 (Integer)
           1722 => ( Parameter_Integer, 0 ),   --  : stdlacc3 (Integer)
           1723 => ( Parameter_Integer, 0 ),   --  : stdlamc3 (Integer)
           1724 => ( Parameter_Integer, 0 ),   --  : stdlacc4 (Integer)
           1725 => ( Parameter_Integer, 0 ),   --  : stdlamc4 (Integer)
           1726 => ( Parameter_Integer, 0 ),   --  : stdlacc5 (Integer)
           1727 => ( Parameter_Integer, 0 ),   --  : stdlamc5 (Integer)
           1728 => ( Parameter_Integer, 0 ),   --  : stdlacc6 (Integer)
           1729 => ( Parameter_Integer, 0 ),   --  : stdlamc6 (Integer)
           1730 => ( Parameter_Integer, 0 ),   --  : stdlacc7 (Integer)
           1731 => ( Parameter_Integer, 0 ),   --  : stdlamc7 (Integer)
           1732 => ( Parameter_Integer, 0 ),   --  : stdlacc8 (Integer)
           1733 => ( Parameter_Integer, 0 ),   --  : stdlamc8 (Integer)
           1734 => ( Parameter_Integer, 0 ),   --  : stdlacc9 (Integer)
           1735 => ( Parameter_Integer, 0 ),   --  : stdlamc9 (Integer)
           1736 => ( Parameter_Float, 0.0 ),   --  : dlacac1 (Amount)
           1737 => ( Parameter_Float, 0.0 ),   --  : dlamoc1 (Amount)
           1738 => ( Parameter_Float, 0.0 ),   --  : dlacac2 (Amount)
           1739 => ( Parameter_Float, 0.0 ),   --  : dlamoc2 (Amount)
           1740 => ( Parameter_Integer, 0 ),   --  : dlacac3 (Integer)
           1741 => ( Parameter_Integer, 0 ),   --  : dlamoc3 (Integer)
           1742 => ( Parameter_Integer, 0 ),   --  : dlacac4 (Integer)
           1743 => ( Parameter_Integer, 0 ),   --  : dlamoc4 (Integer)
           1744 => ( Parameter_Integer, 0 ),   --  : dlacac5 (Integer)
           1745 => ( Parameter_Integer, 0 ),   --  : dlamoc5 (Integer)
           1746 => ( Parameter_Integer, 0 ),   --  : dlacac6 (Integer)
           1747 => ( Parameter_Integer, 0 ),   --  : dlamoc6 (Integer)
           1748 => ( Parameter_Integer, 0 ),   --  : dlacac7 (Integer)
           1749 => ( Parameter_Integer, 0 ),   --  : dlamoc7 (Integer)
           1750 => ( Parameter_Integer, 0 ),   --  : dlacac8 (Integer)
           1751 => ( Parameter_Integer, 0 ),   --  : dlamoc8 (Integer)
           1752 => ( Parameter_Integer, 0 ),   --  : dlacac9 (Integer)
           1753 => ( Parameter_Integer, 0 ),   --  : dlamoc9 (Integer)
           1754 => ( Parameter_Integer, 0 ),   --  : ltdlacc1 (Integer)
           1755 => ( Parameter_Integer, 0 ),   --  : ltdlamc1 (Integer)
           1756 => ( Parameter_Integer, 0 ),   --  : ltdlacc2 (Integer)
           1757 => ( Parameter_Integer, 0 ),   --  : ltdlamc2 (Integer)
           1758 => ( Parameter_Integer, 0 ),   --  : ltdlacc3 (Integer)
           1759 => ( Parameter_Integer, 0 ),   --  : ltdlamc3 (Integer)
           1760 => ( Parameter_Integer, 0 ),   --  : ltdlacc4 (Integer)
           1761 => ( Parameter_Integer, 0 ),   --  : ltdlamc4 (Integer)
           1762 => ( Parameter_Integer, 0 ),   --  : ltdlacc5 (Integer)
           1763 => ( Parameter_Integer, 0 ),   --  : ltdlamc5 (Integer)
           1764 => ( Parameter_Integer, 0 ),   --  : ltdlacc6 (Integer)
           1765 => ( Parameter_Integer, 0 ),   --  : ltdlamc6 (Integer)
           1766 => ( Parameter_Integer, 0 ),   --  : ltdlacc7 (Integer)
           1767 => ( Parameter_Integer, 0 ),   --  : ltdlamc7 (Integer)
           1768 => ( Parameter_Integer, 0 ),   --  : ltdlacc8 (Integer)
           1769 => ( Parameter_Integer, 0 ),   --  : ltdlamc8 (Integer)
           1770 => ( Parameter_Integer, 0 ),   --  : ltdlacc9 (Integer)
           1771 => ( Parameter_Integer, 0 ),   --  : ltdlamc9 (Integer)
           1772 => ( Parameter_Integer, 0 ),   --  : pdlacac1 (Integer)
           1773 => ( Parameter_Integer, 0 ),   --  : pdlamoc1 (Integer)
           1774 => ( Parameter_Integer, 0 ),   --  : pdlacac2 (Integer)
           1775 => ( Parameter_Integer, 0 ),   --  : pdlamoc2 (Integer)
           1776 => ( Parameter_Integer, 0 ),   --  : pdlacac3 (Integer)
           1777 => ( Parameter_Integer, 0 ),   --  : pdlamoc3 (Integer)
           1778 => ( Parameter_Integer, 0 ),   --  : pdlacac4 (Integer)
           1779 => ( Parameter_Integer, 0 ),   --  : pdlamoc4 (Integer)
           1780 => ( Parameter_Integer, 0 ),   --  : pdlacac5 (Integer)
           1781 => ( Parameter_Integer, 0 ),   --  : pdlamoc5 (Integer)
           1782 => ( Parameter_Integer, 0 ),   --  : pdlacac6 (Integer)
           1783 => ( Parameter_Integer, 0 ),   --  : pdlamoc6 (Integer)
           1784 => ( Parameter_Integer, 0 ),   --  : pdlacac7 (Integer)
           1785 => ( Parameter_Integer, 0 ),   --  : pdlamoc7 (Integer)
           1786 => ( Parameter_Integer, 0 ),   --  : pdlacac8 (Integer)
           1787 => ( Parameter_Integer, 0 ),   --  : pdlamoc8 (Integer)
           1788 => ( Parameter_Integer, 0 ),   --  : pdlacac9 (Integer)
           1789 => ( Parameter_Integer, 0 ),   --  : pdlamoc9 (Integer)
           1790 => ( Parameter_Integer, 0 ),   --  : dcpayc1 (Integer)
           1791 => ( Parameter_Integer, 0 ),   --  : dmpayc1 (Integer)
           1792 => ( Parameter_Integer, 0 ),   --  : dcpayc2 (Integer)
           1793 => ( Parameter_Integer, 0 ),   --  : dmpayc2 (Integer)
           1794 => ( Parameter_Integer, 0 ),   --  : dcpayc3 (Integer)
           1795 => ( Parameter_Integer, 0 ),   --  : dmpayc3 (Integer)
           1796 => ( Parameter_Integer, 0 ),   --  : dcpayc4 (Integer)
           1797 => ( Parameter_Integer, 0 ),   --  : dmpayc4 (Integer)
           1798 => ( Parameter_Integer, 0 ),   --  : dcpayc5 (Integer)
           1799 => ( Parameter_Integer, 0 ),   --  : dmpayc5 (Integer)
           1800 => ( Parameter_Integer, 0 ),   --  : dcpayc6 (Integer)
           1801 => ( Parameter_Integer, 0 ),   --  : dmpayc6 (Integer)
           1802 => ( Parameter_Integer, 0 ),   --  : dcpayc7 (Integer)
           1803 => ( Parameter_Integer, 0 ),   --  : dmpayc7 (Integer)
           1804 => ( Parameter_Integer, 0 ),   --  : dcpayc8 (Integer)
           1805 => ( Parameter_Integer, 0 ),   --  : dmpayc8 (Integer)
           1806 => ( Parameter_Integer, 0 ),   --  : dcpayc9 (Integer)
           1807 => ( Parameter_Integer, 0 ),   --  : dmpayc9 (Integer)
           1808 => ( Parameter_Integer, 0 ),   --  : r1dlcc1 (Integer)
           1809 => ( Parameter_Integer, 0 ),   --  : r1dlmc1 (Integer)
           1810 => ( Parameter_Integer, 0 ),   --  : r1dlcc2 (Integer)
           1811 => ( Parameter_Integer, 0 ),   --  : r1dlmc2 (Integer)
           1812 => ( Parameter_Integer, 0 ),   --  : r1dlcc3 (Integer)
           1813 => ( Parameter_Integer, 0 ),   --  : r1dlmc3 (Integer)
           1814 => ( Parameter_Integer, 0 ),   --  : r1dlcc4 (Integer)
           1815 => ( Parameter_Integer, 0 ),   --  : r1dlmc4 (Integer)
           1816 => ( Parameter_Integer, 0 ),   --  : r1dlcc5 (Integer)
           1817 => ( Parameter_Integer, 0 ),   --  : r1dlmc5 (Integer)
           1818 => ( Parameter_Integer, 0 ),   --  : r1dlcc6 (Integer)
           1819 => ( Parameter_Integer, 0 ),   --  : r1dlmc6 (Integer)
           1820 => ( Parameter_Integer, 0 ),   --  : r1dlcc7 (Integer)
           1821 => ( Parameter_Integer, 0 ),   --  : r1dlmc7 (Integer)
           1822 => ( Parameter_Integer, 0 ),   --  : r1dlcc8 (Integer)
           1823 => ( Parameter_Integer, 0 ),   --  : r1dlmc8 (Integer)
           1824 => ( Parameter_Integer, 0 ),   --  : r1dlcc9 (Integer)
           1825 => ( Parameter_Integer, 0 ),   --  : r1dlmc9 (Integer)
           1826 => ( Parameter_Integer, 0 ),   --  : r2dlcc1 (Integer)
           1827 => ( Parameter_Integer, 0 ),   --  : r2dlmc1 (Integer)
           1828 => ( Parameter_Integer, 0 ),   --  : r2dlcc2 (Integer)
           1829 => ( Parameter_Integer, 0 ),   --  : r2dlmc2 (Integer)
           1830 => ( Parameter_Integer, 0 ),   --  : r2dlcc3 (Integer)
           1831 => ( Parameter_Integer, 0 ),   --  : r2dlmc3 (Integer)
           1832 => ( Parameter_Integer, 0 ),   --  : r2dlcc4 (Integer)
           1833 => ( Parameter_Integer, 0 ),   --  : r2dlmc4 (Integer)
           1834 => ( Parameter_Integer, 0 ),   --  : r2dlcc5 (Integer)
           1835 => ( Parameter_Integer, 0 ),   --  : r2dlmc5 (Integer)
           1836 => ( Parameter_Integer, 0 ),   --  : r2dlcc6 (Integer)
           1837 => ( Parameter_Integer, 0 ),   --  : r2dlmc6 (Integer)
           1838 => ( Parameter_Integer, 0 ),   --  : r2dlcc7 (Integer)
           1839 => ( Parameter_Integer, 0 ),   --  : r2dlmc7 (Integer)
           1840 => ( Parameter_Integer, 0 ),   --  : r2dlcc8 (Integer)
           1841 => ( Parameter_Integer, 0 ),   --  : r2dlmc8 (Integer)
           1842 => ( Parameter_Integer, 0 ),   --  : r2dlcc9 (Integer)
           1843 => ( Parameter_Integer, 0 ),   --  : r2dlmc9 (Integer)
           1844 => ( Parameter_Integer, 0 ),   --  : r3dlcc1 (Integer)
           1845 => ( Parameter_Integer, 0 ),   --  : r3dlmc1 (Integer)
           1846 => ( Parameter_Integer, 0 ),   --  : r3dlcc2 (Integer)
           1847 => ( Parameter_Integer, 0 ),   --  : r3dlmc2 (Integer)
           1848 => ( Parameter_Integer, 0 ),   --  : r3dlcc3 (Integer)
           1849 => ( Parameter_Integer, 0 ),   --  : r3dlmc3 (Integer)
           1850 => ( Parameter_Integer, 0 ),   --  : r3dlcc4 (Integer)
           1851 => ( Parameter_Integer, 0 ),   --  : r3dlmc4 (Integer)
           1852 => ( Parameter_Integer, 0 ),   --  : r3dlcc5 (Integer)
           1853 => ( Parameter_Integer, 0 ),   --  : r3dlmc5 (Integer)
           1854 => ( Parameter_Integer, 0 ),   --  : r3dlcc6 (Integer)
           1855 => ( Parameter_Integer, 0 ),   --  : r3dlmc6 (Integer)
           1856 => ( Parameter_Integer, 0 ),   --  : r3dlcc7 (Integer)
           1857 => ( Parameter_Integer, 0 ),   --  : r3dlmc7 (Integer)
           1858 => ( Parameter_Integer, 0 ),   --  : r3dlcc8 (Integer)
           1859 => ( Parameter_Integer, 0 ),   --  : r3dlmc8 (Integer)
           1860 => ( Parameter_Integer, 0 ),   --  : r3dlcc9 (Integer)
           1861 => ( Parameter_Integer, 0 ),   --  : r3dlmc9 (Integer)
           1862 => ( Parameter_Integer, 0 ),   --  : r4dlcc1 (Integer)
           1863 => ( Parameter_Integer, 0 ),   --  : r4dlmc1 (Integer)
           1864 => ( Parameter_Integer, 0 ),   --  : r4dlcc2 (Integer)
           1865 => ( Parameter_Integer, 0 ),   --  : r4dlmc2 (Integer)
           1866 => ( Parameter_Integer, 0 ),   --  : r4dlcc3 (Integer)
           1867 => ( Parameter_Integer, 0 ),   --  : r4dlmc3 (Integer)
           1868 => ( Parameter_Integer, 0 ),   --  : r4dlcc4 (Integer)
           1869 => ( Parameter_Integer, 0 ),   --  : r4dlmc4 (Integer)
           1870 => ( Parameter_Integer, 0 ),   --  : r4dlcc5 (Integer)
           1871 => ( Parameter_Integer, 0 ),   --  : r4dlmc5 (Integer)
           1872 => ( Parameter_Integer, 0 ),   --  : r4dlcc6 (Integer)
           1873 => ( Parameter_Integer, 0 ),   --  : r4dlmc6 (Integer)
           1874 => ( Parameter_Integer, 0 ),   --  : r4dlcc7 (Integer)
           1875 => ( Parameter_Integer, 0 ),   --  : r4dlmc7 (Integer)
           1876 => ( Parameter_Integer, 0 ),   --  : r4dlcc8 (Integer)
           1877 => ( Parameter_Integer, 0 ),   --  : r4dlmc8 (Integer)
           1878 => ( Parameter_Integer, 0 ),   --  : r4dlcc9 (Integer)
           1879 => ( Parameter_Integer, 0 ),   --  : r4dlmc9 (Integer)
           1880 => ( Parameter_Integer, 0 ),   --  : r5dlcc1 (Integer)
           1881 => ( Parameter_Integer, 0 ),   --  : r5dlmc1 (Integer)
           1882 => ( Parameter_Integer, 0 ),   --  : r5dlcc2 (Integer)
           1883 => ( Parameter_Integer, 0 ),   --  : r5dlmc2 (Integer)
           1884 => ( Parameter_Integer, 0 ),   --  : r5dlcc3 (Integer)
           1885 => ( Parameter_Integer, 0 ),   --  : r5dlmc3 (Integer)
           1886 => ( Parameter_Integer, 0 ),   --  : r5dlcc4 (Integer)
           1887 => ( Parameter_Integer, 0 ),   --  : r5dlmc4 (Integer)
           1888 => ( Parameter_Integer, 0 ),   --  : r5dlcc5 (Integer)
           1889 => ( Parameter_Integer, 0 ),   --  : r5dlmc5 (Integer)
           1890 => ( Parameter_Integer, 0 ),   --  : r5dlcc6 (Integer)
           1891 => ( Parameter_Integer, 0 ),   --  : r5dlmc6 (Integer)
           1892 => ( Parameter_Integer, 0 ),   --  : r5dlcc7 (Integer)
           1893 => ( Parameter_Integer, 0 ),   --  : r5dlmc7 (Integer)
           1894 => ( Parameter_Integer, 0 ),   --  : r5dlcc8 (Integer)
           1895 => ( Parameter_Integer, 0 ),   --  : r5dlmc8 (Integer)
           1896 => ( Parameter_Integer, 0 ),   --  : r5dlcc9 (Integer)
           1897 => ( Parameter_Integer, 0 ),   --  : r5dlmc9 (Integer)
           1898 => ( Parameter_Integer, 0 ),   --  : adbtbl (Integer)
           1899 => ( Parameter_Integer, 0 ),   --  : adddec (Integer)
           1900 => ( Parameter_Integer, 0 ),   --  : addhol (Integer)
           1901 => ( Parameter_Integer, 0 ),   --  : addholr (Integer)
           1902 => ( Parameter_Integer, 0 ),   --  : addins (Integer)
           1903 => ( Parameter_Integer, 0 ),   --  : addmon (Integer)
           1904 => ( Parameter_Integer, 0 ),   --  : adepfur (Integer)
           1905 => ( Parameter_Integer, 0 ),   --  : adles (Integer)
           1906 => ( Parameter_Integer, 0 ),   --  : adlesoa (Integer)
           1907 => ( Parameter_Integer, 0 ),   --  : af1 (Integer)
           1908 => ( Parameter_Integer, 0 ),   --  : afdep2 (Integer)
           1909 => ( Parameter_Integer, 0 ),   --  : cdelply (Integer)
           1910 => ( Parameter_Integer, 0 ),   --  : cdepact (Integer)
           1911 => ( Parameter_Integer, 0 ),   --  : cdepbed (Integer)
           1912 => ( Parameter_Integer, 0 ),   --  : cdepcel (Integer)
           1913 => ( Parameter_Integer, 0 ),   --  : cdepeqp (Integer)
           1914 => ( Parameter_Integer, 0 ),   --  : cdephol (Integer)
           1915 => ( Parameter_Integer, 0 ),   --  : cdeples (Integer)
           1916 => ( Parameter_Integer, 0 ),   --  : cdeptea (Integer)
           1917 => ( Parameter_Integer, 0 ),   --  : cdeptrp (Integer)
           1918 => ( Parameter_Integer, 0 ),   --  : cdepveg (Integer)
           1919 => ( Parameter_Integer, 0 ),   --  : cdpcoat (Integer)
           1920 => ( Parameter_Integer, 0 ),   --  : clothes (Integer)
           1921 => ( Parameter_Integer, 0 ),   --  : cplay (Integer)
           1922 => ( Parameter_Integer, 0 ),   --  : debt10 (Integer)
           1923 => ( Parameter_Integer, 0 ),   --  : debt11 (Integer)
           1924 => ( Parameter_Integer, 0 ),   --  : debt12 (Integer)
           1925 => ( Parameter_Integer, 0 ),   --  : debt13 (Integer)
           1926 => ( Parameter_Integer, 0 ),   --  : debtar01 (Integer)
           1927 => ( Parameter_Integer, 0 ),   --  : debtar02 (Integer)
           1928 => ( Parameter_Integer, 0 ),   --  : debtar03 (Integer)
           1929 => ( Parameter_Integer, 0 ),   --  : debtar04 (Integer)
           1930 => ( Parameter_Integer, 0 ),   --  : debtar05 (Integer)
           1931 => ( Parameter_Integer, 0 ),   --  : debtar06 (Integer)
           1932 => ( Parameter_Integer, 0 ),   --  : debtar07 (Integer)
           1933 => ( Parameter_Integer, 0 ),   --  : debtar08 (Integer)
           1934 => ( Parameter_Integer, 0 ),   --  : debtar09 (Integer)
           1935 => ( Parameter_Integer, 0 ),   --  : debtar10 (Integer)
           1936 => ( Parameter_Integer, 0 ),   --  : debtar11 (Integer)
           1937 => ( Parameter_Integer, 0 ),   --  : debtar12 (Integer)
           1938 => ( Parameter_Integer, 0 ),   --  : debtar13 (Integer)
           1939 => ( Parameter_Integer, 0 ),   --  : debtfre1 (Integer)
           1940 => ( Parameter_Integer, 0 ),   --  : debtfre2 (Integer)
           1941 => ( Parameter_Integer, 0 ),   --  : debtfre3 (Integer)
           1942 => ( Parameter_Integer, 0 ),   --  : hbolng (Integer)
           1943 => ( Parameter_Integer, 0 ),   --  : houshe1 (Integer)
           1944 => ( Parameter_Integer, 0 ),   --  : kidinc (Integer)
           1945 => ( Parameter_Integer, 0 ),   --  : meal (Integer)
           1946 => ( Parameter_Integer, 0 ),   --  : nhhchild (Integer)
           1947 => ( Parameter_Integer, 0 ),   --  : oafur (Integer)
           1948 => ( Parameter_Integer, 0 ),   --  : oapre (Integer)
           1949 => ( Parameter_Integer, 0 ),   --  : outpay (Integer)
           1950 => ( Parameter_Float, 0.0 ),   --  : outpyamt (Amount)
           1951 => ( Parameter_Float, 0.0 ),   --  : regpamt (Amount)
           1952 => ( Parameter_Integer, 0 ),   --  : regularp (Integer)
           1953 => ( Parameter_Integer, 0 ),   --  : shoeoa (Integer)
           1954 => ( Parameter_Integer, 0 ),   --  : totsav (Integer)
           1955 => ( Parameter_Integer, 0 ),   --  : adultb (Integer)
           1956 => ( Parameter_Float, 0.0 ),   --  : boarder (Amount)
           1957 => ( Parameter_Integer, 0 ),   --  : bpeninc (Integer)
           1958 => ( Parameter_Integer, 0 ),   --  : bseinc (Integer)
           1959 => ( Parameter_Integer, 0 ),   --  : budisben (Integer)
           1960 => ( Parameter_Integer, 0 ),   --  : buearns (Integer)
           1961 => ( Parameter_Integer, 0 ),   --  : buethgr3 (Integer)
           1962 => ( Parameter_Integer, 0 ),   --  : buinc (Integer)
           1963 => ( Parameter_Integer, 0 ),   --  : buinv (Integer)
           1964 => ( Parameter_Integer, 0 ),   --  : buirben (Integer)
           1965 => ( Parameter_Integer, 0 ),   --  : bukids (Integer)
           1966 => ( Parameter_Integer, 0 ),   --  : bunirben (Integer)
           1967 => ( Parameter_Integer, 0 ),   --  : buothben (Integer)
           1968 => ( Parameter_Integer, 0 ),   --  : burent (Integer)
           1969 => ( Parameter_Integer, 0 ),   --  : burinc (Integer)
           1970 => ( Parameter_Integer, 0 ),   --  : burpinc (Integer)
           1971 => ( Parameter_Float, 0.0 ),   --  : butvlic (Amount)
           1972 => ( Parameter_Integer, 0 ),   --  : butxcred (Integer)
           1973 => ( Parameter_Integer, 0 ),   --  : depchldb (Integer)
           1974 => ( Parameter_Integer, 0 ),   --  : diswbua1 (Integer)
           1975 => ( Parameter_Integer, 0 ),   --  : diswbuc1 (Integer)
           1976 => ( Parameter_Integer, 0 ),   --  : ecstatbu (Integer)
           1977 => ( Parameter_Integer, 0 ),   --  : famtypb2 (Integer)
           1978 => ( Parameter_Integer, 0 ),   --  : famtypbs (Integer)
           1979 => ( Parameter_Integer, 0 ),   --  : famtypbu (Integer)
           1980 => ( Parameter_Float, 0.0 ),   --  : fsfvbu (Amount)
           1981 => ( Parameter_Float, 0.0 ),   --  : fsmbu (Amount)
           1982 => ( Parameter_Float, 0.0 ),   --  : fsmlkbu (Amount)
           1983 => ( Parameter_Integer, 0 ),   --  : gross4 (Integer)
           1984 => ( Parameter_Integer, 0 ),   --  : hbindbu (Integer)
           1985 => ( Parameter_Integer, 0 ),   --  : hbindbu2 (Integer)
           1986 => ( Parameter_Float, 0.0 ),   --  : heartbu (Amount)
           1987 => ( Parameter_Integer, 0 ),   --  : kid04 (Integer)
           1988 => ( Parameter_Integer, 0 ),   --  : kid1115 (Integer)
           1989 => ( Parameter_Integer, 0 ),   --  : kid1619 (Integer)
           1990 => ( Parameter_Integer, 0 ),   --  : kid510 (Integer)
           1991 => ( Parameter_Float, 0.0 ),   --  : lodger (Amount)
           1992 => ( Parameter_Float, 0.0 ),   --  : subltamt (Amount)
           1993 => ( Parameter_Float, 0.0 ),   --  : totcapb3 (Amount)
           1994 => ( Parameter_Integer, 0 ),   --  : totsavbu (Integer)
           1995 => ( Parameter_Integer, 0 ),   --  : tuburent (Integer)
           1996 => ( Parameter_Integer, 0 ),   --  : youngch (Integer)
           1997 => ( Parameter_Integer, 0 ),   --  : clthsoa (Integer)
           1998 => ( Parameter_Integer, 0 ),   --  : debt1 (Integer)
           1999 => ( Parameter_Integer, 0 ),   --  : debt2 (Integer)
           2000 => ( Parameter_Integer, 0 ),   --  : debt3 (Integer)
           2001 => ( Parameter_Integer, 0 ),   --  : debt4 (Integer)
           2002 => ( Parameter_Integer, 0 ),   --  : debt5 (Integer)
           2003 => ( Parameter_Integer, 0 ),   --  : debt6 (Integer)
           2004 => ( Parameter_Integer, 0 ),   --  : debt7 (Integer)
           2005 => ( Parameter_Integer, 0 ),   --  : debt8 (Integer)
           2006 => ( Parameter_Integer, 0 ),   --  : debt9 (Integer)
           2007 => ( Parameter_Integer, 0 ),   --  : discbua (Integer)
           2008 => ( Parameter_Integer, 0 ),   --  : discbuc (Integer)
           2009 => ( Parameter_Float, 0.0 ),   --  : hbtham (Amount)
           2010 => ( Parameter_Integer, 0 ),   --  : hbthbu (Integer)
           2011 => ( Parameter_Integer, 0 ),   --  : hbthmn (Integer)
           2012 => ( Parameter_Integer, 0 ),   --  : hbthpd (Integer)
           2013 => ( Parameter_Integer, 0 ),   --  : hbthwk (Integer)
           2014 => ( Parameter_Integer, 0 ),   --  : hbthyr (Integer)
           2015 => ( Parameter_Integer, 0 ),   --  : hbwait (Integer)
           2016 => ( Parameter_Integer, 0 ),   --  : intrnt (Integer)
           2017 => ( Parameter_Integer, 0 ),   --  : oadep (Integer)
           2018 => ( Parameter_Integer, 0 ),   --  : oanet (Integer)
           2019 => ( Parameter_Integer, 0 ),   --  : dynhthd (Integer)
           2020 => ( Parameter_Integer, 0 ),   --  : dynhtsp (Integer)
           2021 => ( Parameter_Integer, 0 ),   --  : freqhd (Integer)
           2022 => ( Parameter_Integer, 0 ),   --  : freqsp (Integer)
           2023 => ( Parameter_Integer, 0 ),   --  : hur01hd (Integer)
           2024 => ( Parameter_Integer, 0 ),   --  : hur01sp (Integer)
           2025 => ( Parameter_Integer, 0 ),   --  : hur02hd (Integer)
           2026 => ( Parameter_Integer, 0 ),   --  : hur02sp (Integer)
           2027 => ( Parameter_Integer, 0 ),   --  : hur03hd (Integer)
           2028 => ( Parameter_Integer, 0 ),   --  : hur03sp (Integer)
           2029 => ( Parameter_Integer, 0 ),   --  : hur04hd (Integer)
           2030 => ( Parameter_Integer, 0 ),   --  : hur04sp (Integer)
           2031 => ( Parameter_Integer, 0 ),   --  : hur05hd (Integer)
           2032 => ( Parameter_Integer, 0 ),   --  : hur05sp (Integer)
           2033 => ( Parameter_Integer, 0 ),   --  : hur06hd (Integer)
           2034 => ( Parameter_Integer, 0 ),   --  : hur06sp (Integer)
           2035 => ( Parameter_Integer, 0 ),   --  : hur07hd (Integer)
           2036 => ( Parameter_Integer, 0 ),   --  : hur07sp (Integer)
           2037 => ( Parameter_Integer, 0 ),   --  : hur08hd (Integer)
           2038 => ( Parameter_Integer, 0 ),   --  : hur08sp (Integer)
           2039 => ( Parameter_Integer, 0 ),   --  : hur09hd (Integer)
           2040 => ( Parameter_Integer, 0 ),   --  : hur09sp (Integer)
           2041 => ( Parameter_Integer, 0 ),   --  : hur10hd (Integer)
           2042 => ( Parameter_Integer, 0 ),   --  : hur10sp (Integer)
           2043 => ( Parameter_Integer, 0 ),   --  : hur11hd (Integer)
           2044 => ( Parameter_Integer, 0 ),   --  : hur11sp (Integer)
           2045 => ( Parameter_Integer, 0 ),   --  : hur12hd (Integer)
           2046 => ( Parameter_Integer, 0 ),   --  : hur12sp (Integer)
           2047 => ( Parameter_Integer, 0 ),   --  : hur13hd (Integer)
           2048 => ( Parameter_Integer, 0 ),   --  : hur13sp (Integer)
           2049 => ( Parameter_Integer, 0 ),   --  : hur14hd (Integer)
           2050 => ( Parameter_Integer, 0 ),   --  : hur14sp (Integer)
           2051 => ( Parameter_Integer, 0 ),   --  : hur15hd (Integer)
           2052 => ( Parameter_Integer, 0 ),   --  : hur15sp (Integer)
           2053 => ( Parameter_Integer, 0 ),   --  : hur16hd (Integer)
           2054 => ( Parameter_Integer, 0 ),   --  : hur16sp (Integer)
           2055 => ( Parameter_Integer, 0 ),   --  : hur17hd (Integer)
           2056 => ( Parameter_Integer, 0 ),   --  : hur17sp (Integer)
           2057 => ( Parameter_Integer, 0 ),   --  : hur18hd (Integer)
           2058 => ( Parameter_Integer, 0 ),   --  : hur18sp (Integer)
           2059 => ( Parameter_Integer, 0 ),   --  : hur19hd (Integer)
           2060 => ( Parameter_Integer, 0 ),   --  : hur19sp (Integer)
           2061 => ( Parameter_Integer, 0 ),   --  : hur20hd (Integer)
           2062 => ( Parameter_Integer, 0 ),   --  : hur20sp (Integer)
           2063 => ( Parameter_Integer, 0 ),   --  : whl01hd (Integer)
           2064 => ( Parameter_Integer, 0 ),   --  : whl01sp (Integer)
           2065 => ( Parameter_Integer, 0 ),   --  : whl02hd (Integer)
           2066 => ( Parameter_Integer, 0 ),   --  : whl02sp (Integer)
           2067 => ( Parameter_Integer, 0 ),   --  : whl03hd (Integer)
           2068 => ( Parameter_Integer, 0 ),   --  : whl03sp (Integer)
           2069 => ( Parameter_Integer, 0 ),   --  : whl04hd (Integer)
           2070 => ( Parameter_Integer, 0 ),   --  : whl04sp (Integer)
           2071 => ( Parameter_Integer, 0 ),   --  : whl05hd (Integer)
           2072 => ( Parameter_Integer, 0 ),   --  : whl05sp (Integer)
           2073 => ( Parameter_Integer, 0 ),   --  : whl06hd (Integer)
           2074 => ( Parameter_Integer, 0 ),   --  : whl06sp (Integer)
           2075 => ( Parameter_Integer, 0 ),   --  : whl07hd (Integer)
           2076 => ( Parameter_Integer, 0 ),   --  : whl07sp (Integer)
           2077 => ( Parameter_Integer, 0 ),   --  : whl08hd (Integer)
           2078 => ( Parameter_Integer, 0 ),   --  : whl08sp (Integer)
           2079 => ( Parameter_Integer, 0 ),   --  : whl09hd (Integer)
           2080 => ( Parameter_Integer, 0 ),   --  : whl09sp (Integer)
           2081 => ( Parameter_Integer, 0 ),   --  : whl10hd (Integer)
           2082 => ( Parameter_Integer, 0 ),   --  : whl10sp (Integer)
           2083 => ( Parameter_Integer, 0 ),   --  : whl11hd (Integer)
           2084 => ( Parameter_Integer, 0 ),   --  : whl11sp (Integer)
           2085 => ( Parameter_Integer, 0 ),   --  : whl12hd (Integer)
           2086 => ( Parameter_Integer, 0 ),   --  : whl12sp (Integer)
           2087 => ( Parameter_Integer, 0 ),   --  : whl13hd (Integer)
           2088 => ( Parameter_Integer, 0 ),   --  : whl13sp (Integer)
           2089 => ( Parameter_Integer, 0 ),   --  : whl14hd (Integer)
           2090 => ( Parameter_Integer, 0 ),   --  : whl14sp (Integer)
           2091 => ( Parameter_Integer, 0 ),   --  : whl15hd (Integer)
           2092 => ( Parameter_Integer, 0 ),   --  : whl15sp (Integer)
           2093 => ( Parameter_Integer, 0 ),   --  : whl16hd (Integer)
           2094 => ( Parameter_Integer, 0 ),   --  : whl16sp (Integer)
           2095 => ( Parameter_Integer, 0 ),   --  : whl17hd (Integer)
           2096 => ( Parameter_Integer, 0 ),   --  : whl17sp (Integer)
           2097 => ( Parameter_Integer, 0 ),   --  : whl18hd (Integer)
           2098 => ( Parameter_Integer, 0 ),   --  : whl18sp (Integer)
           2099 => ( Parameter_Integer, 0 ),   --  : whl19hd (Integer)
           2100 => ( Parameter_Integer, 0 ),   --  : whl19sp (Integer)
           2101 => ( Parameter_Integer, 0 ),   --  : whl20hd (Integer)
           2102 => ( Parameter_Integer, 0 ),   --  : whl20sp (Integer)
           2103 => ( Parameter_Integer, 0 ),   --  : dynhtc1 (Integer)
           2104 => ( Parameter_Integer, 0 ),   --  : dynhtc2 (Integer)
           2105 => ( Parameter_Integer, 0 ),   --  : dynhtc3 (Integer)
           2106 => ( Parameter_Integer, 0 ),   --  : dynhtc4 (Integer)
           2107 => ( Parameter_Integer, 0 ),   --  : dynhtc5 (Integer)
           2108 => ( Parameter_Integer, 0 ),   --  : dynhtc6 (Integer)
           2109 => ( Parameter_Integer, 0 ),   --  : dynhtc7 (Integer)
           2110 => ( Parameter_Integer, 0 ),   --  : dynhtc8 (Integer)
           2111 => ( Parameter_Integer, 0 ),   --  : dynhtc9 (Integer)
           2112 => ( Parameter_Integer, 0 ),   --  : freqc1 (Integer)
           2113 => ( Parameter_Integer, 0 ),   --  : freqc2 (Integer)
           2114 => ( Parameter_Integer, 0 ),   --  : freqc3 (Integer)
           2115 => ( Parameter_Integer, 0 ),   --  : freqc4 (Integer)
           2116 => ( Parameter_Integer, 0 ),   --  : freqc5 (Integer)
           2117 => ( Parameter_Integer, 0 ),   --  : freqc6 (Integer)
           2118 => ( Parameter_Integer, 0 ),   --  : freqc7 (Integer)
           2119 => ( Parameter_Integer, 0 ),   --  : freqc8 (Integer)
           2120 => ( Parameter_Integer, 0 ),   --  : freqc9 (Integer)
           2121 => ( Parameter_Integer, 0 ),   --  : hur01c1 (Integer)
           2122 => ( Parameter_Integer, 0 ),   --  : hur01c2 (Integer)
           2123 => ( Parameter_Integer, 0 ),   --  : hur01c3 (Integer)
           2124 => ( Parameter_Integer, 0 ),   --  : hur01c4 (Integer)
           2125 => ( Parameter_Integer, 0 ),   --  : hur01c5 (Integer)
           2126 => ( Parameter_Integer, 0 ),   --  : hur01c6 (Integer)
           2127 => ( Parameter_Integer, 0 ),   --  : hur01c7 (Integer)
           2128 => ( Parameter_Integer, 0 ),   --  : hur01c8 (Integer)
           2129 => ( Parameter_Integer, 0 ),   --  : hur01c9 (Integer)
           2130 => ( Parameter_Integer, 0 ),   --  : hur02c1 (Integer)
           2131 => ( Parameter_Integer, 0 ),   --  : hur02c2 (Integer)
           2132 => ( Parameter_Integer, 0 ),   --  : hur02c3 (Integer)
           2133 => ( Parameter_Integer, 0 ),   --  : hur02c4 (Integer)
           2134 => ( Parameter_Integer, 0 ),   --  : hur02c5 (Integer)
           2135 => ( Parameter_Integer, 0 ),   --  : hur02c6 (Integer)
           2136 => ( Parameter_Integer, 0 ),   --  : hur02c7 (Integer)
           2137 => ( Parameter_Integer, 0 ),   --  : hur02c8 (Integer)
           2138 => ( Parameter_Integer, 0 ),   --  : hur02c9 (Integer)
           2139 => ( Parameter_Integer, 0 ),   --  : hur03c1 (Integer)
           2140 => ( Parameter_Integer, 0 ),   --  : hur03c2 (Integer)
           2141 => ( Parameter_Integer, 0 ),   --  : hur03c3 (Integer)
           2142 => ( Parameter_Integer, 0 ),   --  : hur03c4 (Integer)
           2143 => ( Parameter_Integer, 0 ),   --  : hur03c5 (Integer)
           2144 => ( Parameter_Integer, 0 ),   --  : hur03c6 (Integer)
           2145 => ( Parameter_Integer, 0 ),   --  : hur03c7 (Integer)
           2146 => ( Parameter_Integer, 0 ),   --  : hur03c8 (Integer)
           2147 => ( Parameter_Integer, 0 ),   --  : hur03c9 (Integer)
           2148 => ( Parameter_Integer, 0 ),   --  : hur04c1 (Integer)
           2149 => ( Parameter_Integer, 0 ),   --  : hur04c2 (Integer)
           2150 => ( Parameter_Integer, 0 ),   --  : hur04c3 (Integer)
           2151 => ( Parameter_Integer, 0 ),   --  : hur04c4 (Integer)
           2152 => ( Parameter_Integer, 0 ),   --  : hur04c5 (Integer)
           2153 => ( Parameter_Integer, 0 ),   --  : hur04c6 (Integer)
           2154 => ( Parameter_Integer, 0 ),   --  : hur04c7 (Integer)
           2155 => ( Parameter_Integer, 0 ),   --  : hur04c8 (Integer)
           2156 => ( Parameter_Integer, 0 ),   --  : hur04c9 (Integer)
           2157 => ( Parameter_Integer, 0 ),   --  : hur05c1 (Integer)
           2158 => ( Parameter_Integer, 0 ),   --  : hur05c2 (Integer)
           2159 => ( Parameter_Integer, 0 ),   --  : hur05c3 (Integer)
           2160 => ( Parameter_Integer, 0 ),   --  : hur05c4 (Integer)
           2161 => ( Parameter_Integer, 0 ),   --  : hur05c5 (Integer)
           2162 => ( Parameter_Integer, 0 ),   --  : hur05c6 (Integer)
           2163 => ( Parameter_Integer, 0 ),   --  : hur05c7 (Integer)
           2164 => ( Parameter_Integer, 0 ),   --  : hur05c8 (Integer)
           2165 => ( Parameter_Integer, 0 ),   --  : hur05c9 (Integer)
           2166 => ( Parameter_Integer, 0 ),   --  : hur06c1 (Integer)
           2167 => ( Parameter_Integer, 0 ),   --  : hur06c2 (Integer)
           2168 => ( Parameter_Integer, 0 ),   --  : hur06c3 (Integer)
           2169 => ( Parameter_Integer, 0 ),   --  : hur06c4 (Integer)
           2170 => ( Parameter_Integer, 0 ),   --  : hur06c5 (Integer)
           2171 => ( Parameter_Integer, 0 ),   --  : hur06c6 (Integer)
           2172 => ( Parameter_Integer, 0 ),   --  : hur06c7 (Integer)
           2173 => ( Parameter_Integer, 0 ),   --  : hur06c8 (Integer)
           2174 => ( Parameter_Integer, 0 ),   --  : hur06c9 (Integer)
           2175 => ( Parameter_Integer, 0 ),   --  : hur07c1 (Integer)
           2176 => ( Parameter_Integer, 0 ),   --  : hur07c2 (Integer)
           2177 => ( Parameter_Integer, 0 ),   --  : hur07c3 (Integer)
           2178 => ( Parameter_Integer, 0 ),   --  : hur07c4 (Integer)
           2179 => ( Parameter_Integer, 0 ),   --  : hur07c5 (Integer)
           2180 => ( Parameter_Integer, 0 ),   --  : hur07c6 (Integer)
           2181 => ( Parameter_Integer, 0 ),   --  : hur07c7 (Integer)
           2182 => ( Parameter_Integer, 0 ),   --  : hur07c8 (Integer)
           2183 => ( Parameter_Integer, 0 ),   --  : hur07c9 (Integer)
           2184 => ( Parameter_Integer, 0 ),   --  : hur08c1 (Integer)
           2185 => ( Parameter_Integer, 0 ),   --  : hur08c2 (Integer)
           2186 => ( Parameter_Integer, 0 ),   --  : hur08c3 (Integer)
           2187 => ( Parameter_Integer, 0 ),   --  : hur08c4 (Integer)
           2188 => ( Parameter_Integer, 0 ),   --  : hur08c5 (Integer)
           2189 => ( Parameter_Integer, 0 ),   --  : hur08c6 (Integer)
           2190 => ( Parameter_Integer, 0 ),   --  : hur08c7 (Integer)
           2191 => ( Parameter_Integer, 0 ),   --  : hur08c8 (Integer)
           2192 => ( Parameter_Integer, 0 ),   --  : hur08c9 (Integer)
           2193 => ( Parameter_Integer, 0 ),   --  : hur09c1 (Integer)
           2194 => ( Parameter_Integer, 0 ),   --  : hur09c2 (Integer)
           2195 => ( Parameter_Integer, 0 ),   --  : hur09c3 (Integer)
           2196 => ( Parameter_Integer, 0 ),   --  : hur09c4 (Integer)
           2197 => ( Parameter_Integer, 0 ),   --  : hur09c5 (Integer)
           2198 => ( Parameter_Integer, 0 ),   --  : hur09c6 (Integer)
           2199 => ( Parameter_Integer, 0 ),   --  : hur09c7 (Integer)
           2200 => ( Parameter_Integer, 0 ),   --  : hur09c8 (Integer)
           2201 => ( Parameter_Integer, 0 ),   --  : hur09c9 (Integer)
           2202 => ( Parameter_Integer, 0 ),   --  : hur10c1 (Integer)
           2203 => ( Parameter_Integer, 0 ),   --  : hur10c2 (Integer)
           2204 => ( Parameter_Integer, 0 ),   --  : hur10c3 (Integer)
           2205 => ( Parameter_Integer, 0 ),   --  : hur10c4 (Integer)
           2206 => ( Parameter_Integer, 0 ),   --  : hur10c5 (Integer)
           2207 => ( Parameter_Integer, 0 ),   --  : hur10c6 (Integer)
           2208 => ( Parameter_Integer, 0 ),   --  : hur10c7 (Integer)
           2209 => ( Parameter_Integer, 0 ),   --  : hur10c8 (Integer)
           2210 => ( Parameter_Integer, 0 ),   --  : hur10c9 (Integer)
           2211 => ( Parameter_Integer, 0 ),   --  : hur11c1 (Integer)
           2212 => ( Parameter_Integer, 0 ),   --  : hur11c2 (Integer)
           2213 => ( Parameter_Integer, 0 ),   --  : hur11c3 (Integer)
           2214 => ( Parameter_Integer, 0 ),   --  : hur11c4 (Integer)
           2215 => ( Parameter_Integer, 0 ),   --  : hur11c5 (Integer)
           2216 => ( Parameter_Integer, 0 ),   --  : hur11c6 (Integer)
           2217 => ( Parameter_Integer, 0 ),   --  : hur11c7 (Integer)
           2218 => ( Parameter_Integer, 0 ),   --  : hur11c8 (Integer)
           2219 => ( Parameter_Integer, 0 ),   --  : hur11c9 (Integer)
           2220 => ( Parameter_Integer, 0 ),   --  : hur12c1 (Integer)
           2221 => ( Parameter_Integer, 0 ),   --  : hur12c2 (Integer)
           2222 => ( Parameter_Integer, 0 ),   --  : hur12c3 (Integer)
           2223 => ( Parameter_Integer, 0 ),   --  : hur12c4 (Integer)
           2224 => ( Parameter_Integer, 0 ),   --  : hur12c5 (Integer)
           2225 => ( Parameter_Integer, 0 ),   --  : hur12c6 (Integer)
           2226 => ( Parameter_Integer, 0 ),   --  : hur12c7 (Integer)
           2227 => ( Parameter_Integer, 0 ),   --  : hur12c8 (Integer)
           2228 => ( Parameter_Integer, 0 ),   --  : hur12c9 (Integer)
           2229 => ( Parameter_Integer, 0 ),   --  : hur13c1 (Integer)
           2230 => ( Parameter_Integer, 0 ),   --  : hur13c2 (Integer)
           2231 => ( Parameter_Integer, 0 ),   --  : hur13c3 (Integer)
           2232 => ( Parameter_Integer, 0 ),   --  : hur13c4 (Integer)
           2233 => ( Parameter_Integer, 0 ),   --  : hur13c5 (Integer)
           2234 => ( Parameter_Integer, 0 ),   --  : hur13c6 (Integer)
           2235 => ( Parameter_Integer, 0 ),   --  : hur13c7 (Integer)
           2236 => ( Parameter_Integer, 0 ),   --  : hur13c8 (Integer)
           2237 => ( Parameter_Integer, 0 ),   --  : hur13c9 (Integer)
           2238 => ( Parameter_Integer, 0 ),   --  : hur14c1 (Integer)
           2239 => ( Parameter_Integer, 0 ),   --  : hur14c2 (Integer)
           2240 => ( Parameter_Integer, 0 ),   --  : hur14c3 (Integer)
           2241 => ( Parameter_Integer, 0 ),   --  : hur14c4 (Integer)
           2242 => ( Parameter_Integer, 0 ),   --  : hur14c5 (Integer)
           2243 => ( Parameter_Integer, 0 ),   --  : hur14c6 (Integer)
           2244 => ( Parameter_Integer, 0 ),   --  : hur14c7 (Integer)
           2245 => ( Parameter_Integer, 0 ),   --  : hur14c8 (Integer)
           2246 => ( Parameter_Integer, 0 ),   --  : hur14c9 (Integer)
           2247 => ( Parameter_Integer, 0 ),   --  : hur15c1 (Integer)
           2248 => ( Parameter_Integer, 0 ),   --  : hur15c2 (Integer)
           2249 => ( Parameter_Integer, 0 ),   --  : hur15c3 (Integer)
           2250 => ( Parameter_Integer, 0 ),   --  : hur15c4 (Integer)
           2251 => ( Parameter_Integer, 0 ),   --  : hur15c5 (Integer)
           2252 => ( Parameter_Integer, 0 ),   --  : hur15c6 (Integer)
           2253 => ( Parameter_Integer, 0 ),   --  : hur15c7 (Integer)
           2254 => ( Parameter_Integer, 0 ),   --  : hur15c8 (Integer)
           2255 => ( Parameter_Integer, 0 ),   --  : hur15c9 (Integer)
           2256 => ( Parameter_Integer, 0 ),   --  : hur16c1 (Integer)
           2257 => ( Parameter_Integer, 0 ),   --  : hur16c2 (Integer)
           2258 => ( Parameter_Integer, 0 ),   --  : hur16c3 (Integer)
           2259 => ( Parameter_Integer, 0 ),   --  : hur16c4 (Integer)
           2260 => ( Parameter_Integer, 0 ),   --  : hur16c5 (Integer)
           2261 => ( Parameter_Integer, 0 ),   --  : hur16c6 (Integer)
           2262 => ( Parameter_Integer, 0 ),   --  : hur16c7 (Integer)
           2263 => ( Parameter_Integer, 0 ),   --  : hur16c8 (Integer)
           2264 => ( Parameter_Integer, 0 ),   --  : hur16c9 (Integer)
           2265 => ( Parameter_Integer, 0 ),   --  : hur17c1 (Integer)
           2266 => ( Parameter_Integer, 0 ),   --  : hur17c2 (Integer)
           2267 => ( Parameter_Integer, 0 ),   --  : hur17c3 (Integer)
           2268 => ( Parameter_Integer, 0 ),   --  : hur17c4 (Integer)
           2269 => ( Parameter_Integer, 0 ),   --  : hur17c5 (Integer)
           2270 => ( Parameter_Integer, 0 ),   --  : hur17c6 (Integer)
           2271 => ( Parameter_Integer, 0 ),   --  : hur17c7 (Integer)
           2272 => ( Parameter_Integer, 0 ),   --  : hur17c8 (Integer)
           2273 => ( Parameter_Integer, 0 ),   --  : hur17c9 (Integer)
           2274 => ( Parameter_Integer, 0 ),   --  : hur18c1 (Integer)
           2275 => ( Parameter_Integer, 0 ),   --  : hur18c2 (Integer)
           2276 => ( Parameter_Integer, 0 ),   --  : hur18c3 (Integer)
           2277 => ( Parameter_Integer, 0 ),   --  : hur18c4 (Integer)
           2278 => ( Parameter_Integer, 0 ),   --  : hur18c5 (Integer)
           2279 => ( Parameter_Integer, 0 ),   --  : hur18c6 (Integer)
           2280 => ( Parameter_Integer, 0 ),   --  : hur18c7 (Integer)
           2281 => ( Parameter_Integer, 0 ),   --  : hur18c8 (Integer)
           2282 => ( Parameter_Integer, 0 ),   --  : hur18c9 (Integer)
           2283 => ( Parameter_Integer, 0 ),   --  : hur19c1 (Integer)
           2284 => ( Parameter_Integer, 0 ),   --  : hur19c2 (Integer)
           2285 => ( Parameter_Integer, 0 ),   --  : hur19c3 (Integer)
           2286 => ( Parameter_Integer, 0 ),   --  : hur19c4 (Integer)
           2287 => ( Parameter_Integer, 0 ),   --  : hur19c5 (Integer)
           2288 => ( Parameter_Integer, 0 ),   --  : hur19c6 (Integer)
           2289 => ( Parameter_Integer, 0 ),   --  : hur19c7 (Integer)
           2290 => ( Parameter_Integer, 0 ),   --  : hur19c8 (Integer)
           2291 => ( Parameter_Integer, 0 ),   --  : hur19c9 (Integer)
           2292 => ( Parameter_Integer, 0 ),   --  : hur20c1 (Integer)
           2293 => ( Parameter_Integer, 0 ),   --  : hur20c2 (Integer)
           2294 => ( Parameter_Integer, 0 ),   --  : hur20c3 (Integer)
           2295 => ( Parameter_Integer, 0 ),   --  : hur20c4 (Integer)
           2296 => ( Parameter_Integer, 0 ),   --  : hur20c5 (Integer)
           2297 => ( Parameter_Integer, 0 ),   --  : hur20c6 (Integer)
           2298 => ( Parameter_Integer, 0 ),   --  : hur20c7 (Integer)
           2299 => ( Parameter_Integer, 0 ),   --  : hur20c8 (Integer)
           2300 => ( Parameter_Integer, 0 ),   --  : hur20c9 (Integer)
           2301 => ( Parameter_Integer, 0 ),   --  : whl01c1 (Integer)
           2302 => ( Parameter_Integer, 0 ),   --  : whl01c2 (Integer)
           2303 => ( Parameter_Integer, 0 ),   --  : whl01c3 (Integer)
           2304 => ( Parameter_Integer, 0 ),   --  : whl01c4 (Integer)
           2305 => ( Parameter_Integer, 0 ),   --  : whl01c5 (Integer)
           2306 => ( Parameter_Integer, 0 ),   --  : whl01c6 (Integer)
           2307 => ( Parameter_Integer, 0 ),   --  : whl01c7 (Integer)
           2308 => ( Parameter_Integer, 0 ),   --  : whl01c8 (Integer)
           2309 => ( Parameter_Integer, 0 ),   --  : whl01c9 (Integer)
           2310 => ( Parameter_Integer, 0 ),   --  : whl02c1 (Integer)
           2311 => ( Parameter_Integer, 0 ),   --  : whl02c2 (Integer)
           2312 => ( Parameter_Integer, 0 ),   --  : whl02c3 (Integer)
           2313 => ( Parameter_Integer, 0 ),   --  : whl02c4 (Integer)
           2314 => ( Parameter_Integer, 0 ),   --  : whl02c5 (Integer)
           2315 => ( Parameter_Integer, 0 ),   --  : whl02c6 (Integer)
           2316 => ( Parameter_Integer, 0 ),   --  : whl02c7 (Integer)
           2317 => ( Parameter_Integer, 0 ),   --  : whl02c8 (Integer)
           2318 => ( Parameter_Integer, 0 ),   --  : whl02c9 (Integer)
           2319 => ( Parameter_Integer, 0 ),   --  : whl03c1 (Integer)
           2320 => ( Parameter_Integer, 0 ),   --  : whl03c2 (Integer)
           2321 => ( Parameter_Integer, 0 ),   --  : whl03c3 (Integer)
           2322 => ( Parameter_Integer, 0 ),   --  : whl03c4 (Integer)
           2323 => ( Parameter_Integer, 0 ),   --  : whl03c5 (Integer)
           2324 => ( Parameter_Integer, 0 ),   --  : whl03c6 (Integer)
           2325 => ( Parameter_Integer, 0 ),   --  : whl03c7 (Integer)
           2326 => ( Parameter_Integer, 0 ),   --  : whl03c8 (Integer)
           2327 => ( Parameter_Integer, 0 ),   --  : whl03c9 (Integer)
           2328 => ( Parameter_Integer, 0 ),   --  : whl04c1 (Integer)
           2329 => ( Parameter_Integer, 0 ),   --  : whl04c2 (Integer)
           2330 => ( Parameter_Integer, 0 ),   --  : whl04c3 (Integer)
           2331 => ( Parameter_Integer, 0 ),   --  : whl04c4 (Integer)
           2332 => ( Parameter_Integer, 0 ),   --  : whl04c5 (Integer)
           2333 => ( Parameter_Integer, 0 ),   --  : whl04c6 (Integer)
           2334 => ( Parameter_Integer, 0 ),   --  : whl04c7 (Integer)
           2335 => ( Parameter_Integer, 0 ),   --  : whl04c8 (Integer)
           2336 => ( Parameter_Integer, 0 ),   --  : whl04c9 (Integer)
           2337 => ( Parameter_Integer, 0 ),   --  : whl05c1 (Integer)
           2338 => ( Parameter_Integer, 0 ),   --  : whl05c2 (Integer)
           2339 => ( Parameter_Integer, 0 ),   --  : whl05c3 (Integer)
           2340 => ( Parameter_Integer, 0 ),   --  : whl05c4 (Integer)
           2341 => ( Parameter_Integer, 0 ),   --  : whl05c5 (Integer)
           2342 => ( Parameter_Integer, 0 ),   --  : whl05c6 (Integer)
           2343 => ( Parameter_Integer, 0 ),   --  : whl05c7 (Integer)
           2344 => ( Parameter_Integer, 0 ),   --  : whl05c8 (Integer)
           2345 => ( Parameter_Integer, 0 ),   --  : whl05c9 (Integer)
           2346 => ( Parameter_Integer, 0 ),   --  : whl06c1 (Integer)
           2347 => ( Parameter_Integer, 0 ),   --  : whl06c2 (Integer)
           2348 => ( Parameter_Integer, 0 ),   --  : whl06c3 (Integer)
           2349 => ( Parameter_Integer, 0 ),   --  : whl06c4 (Integer)
           2350 => ( Parameter_Integer, 0 ),   --  : whl06c5 (Integer)
           2351 => ( Parameter_Integer, 0 ),   --  : whl06c6 (Integer)
           2352 => ( Parameter_Integer, 0 ),   --  : whl06c7 (Integer)
           2353 => ( Parameter_Integer, 0 ),   --  : whl06c8 (Integer)
           2354 => ( Parameter_Integer, 0 ),   --  : whl06c9 (Integer)
           2355 => ( Parameter_Integer, 0 ),   --  : whl07c1 (Integer)
           2356 => ( Parameter_Integer, 0 ),   --  : whl07c2 (Integer)
           2357 => ( Parameter_Integer, 0 ),   --  : whl07c3 (Integer)
           2358 => ( Parameter_Integer, 0 ),   --  : whl07c4 (Integer)
           2359 => ( Parameter_Integer, 0 ),   --  : whl07c5 (Integer)
           2360 => ( Parameter_Integer, 0 ),   --  : whl07c6 (Integer)
           2361 => ( Parameter_Integer, 0 ),   --  : whl07c7 (Integer)
           2362 => ( Parameter_Integer, 0 ),   --  : whl07c8 (Integer)
           2363 => ( Parameter_Integer, 0 ),   --  : whl07c9 (Integer)
           2364 => ( Parameter_Integer, 0 ),   --  : whl08c1 (Integer)
           2365 => ( Parameter_Integer, 0 ),   --  : whl08c2 (Integer)
           2366 => ( Parameter_Integer, 0 ),   --  : whl08c3 (Integer)
           2367 => ( Parameter_Integer, 0 ),   --  : whl08c4 (Integer)
           2368 => ( Parameter_Integer, 0 ),   --  : whl08c5 (Integer)
           2369 => ( Parameter_Integer, 0 ),   --  : whl08c6 (Integer)
           2370 => ( Parameter_Integer, 0 ),   --  : whl08c7 (Integer)
           2371 => ( Parameter_Integer, 0 ),   --  : whl08c8 (Integer)
           2372 => ( Parameter_Integer, 0 ),   --  : whl08c9 (Integer)
           2373 => ( Parameter_Integer, 0 ),   --  : whl09c1 (Integer)
           2374 => ( Parameter_Integer, 0 ),   --  : whl09c2 (Integer)
           2375 => ( Parameter_Integer, 0 ),   --  : whl09c3 (Integer)
           2376 => ( Parameter_Integer, 0 ),   --  : whl09c4 (Integer)
           2377 => ( Parameter_Integer, 0 ),   --  : whl09c5 (Integer)
           2378 => ( Parameter_Integer, 0 ),   --  : whl09c6 (Integer)
           2379 => ( Parameter_Integer, 0 ),   --  : whl09c7 (Integer)
           2380 => ( Parameter_Integer, 0 ),   --  : whl09c8 (Integer)
           2381 => ( Parameter_Integer, 0 ),   --  : whl09c9 (Integer)
           2382 => ( Parameter_Integer, 0 ),   --  : whl10c1 (Integer)
           2383 => ( Parameter_Integer, 0 ),   --  : whl10c2 (Integer)
           2384 => ( Parameter_Integer, 0 ),   --  : whl10c3 (Integer)
           2385 => ( Parameter_Integer, 0 ),   --  : whl10c4 (Integer)
           2386 => ( Parameter_Integer, 0 ),   --  : whl10c5 (Integer)
           2387 => ( Parameter_Integer, 0 ),   --  : whl10c6 (Integer)
           2388 => ( Parameter_Integer, 0 ),   --  : whl10c7 (Integer)
           2389 => ( Parameter_Integer, 0 ),   --  : whl10c8 (Integer)
           2390 => ( Parameter_Integer, 0 ),   --  : whl10c9 (Integer)
           2391 => ( Parameter_Integer, 0 ),   --  : whl11c1 (Integer)
           2392 => ( Parameter_Integer, 0 ),   --  : whl11c2 (Integer)
           2393 => ( Parameter_Integer, 0 ),   --  : whl11c3 (Integer)
           2394 => ( Parameter_Integer, 0 ),   --  : whl11c4 (Integer)
           2395 => ( Parameter_Integer, 0 ),   --  : whl11c5 (Integer)
           2396 => ( Parameter_Integer, 0 ),   --  : whl11c6 (Integer)
           2397 => ( Parameter_Integer, 0 ),   --  : whl11c7 (Integer)
           2398 => ( Parameter_Integer, 0 ),   --  : whl11c8 (Integer)
           2399 => ( Parameter_Integer, 0 ),   --  : whl11c9 (Integer)
           2400 => ( Parameter_Integer, 0 ),   --  : whl12c1 (Integer)
           2401 => ( Parameter_Integer, 0 ),   --  : whl12c2 (Integer)
           2402 => ( Parameter_Integer, 0 ),   --  : whl12c3 (Integer)
           2403 => ( Parameter_Integer, 0 ),   --  : whl12c4 (Integer)
           2404 => ( Parameter_Integer, 0 ),   --  : whl12c5 (Integer)
           2405 => ( Parameter_Integer, 0 ),   --  : whl12c6 (Integer)
           2406 => ( Parameter_Integer, 0 ),   --  : whl12c7 (Integer)
           2407 => ( Parameter_Integer, 0 ),   --  : whl12c8 (Integer)
           2408 => ( Parameter_Integer, 0 ),   --  : whl12c9 (Integer)
           2409 => ( Parameter_Integer, 0 ),   --  : whl13c1 (Integer)
           2410 => ( Parameter_Integer, 0 ),   --  : whl13c2 (Integer)
           2411 => ( Parameter_Integer, 0 ),   --  : whl13c3 (Integer)
           2412 => ( Parameter_Integer, 0 ),   --  : whl13c4 (Integer)
           2413 => ( Parameter_Integer, 0 ),   --  : whl13c5 (Integer)
           2414 => ( Parameter_Integer, 0 ),   --  : whl13c6 (Integer)
           2415 => ( Parameter_Integer, 0 ),   --  : whl13c7 (Integer)
           2416 => ( Parameter_Integer, 0 ),   --  : whl13c8 (Integer)
           2417 => ( Parameter_Integer, 0 ),   --  : whl13c9 (Integer)
           2418 => ( Parameter_Integer, 0 ),   --  : whl14c1 (Integer)
           2419 => ( Parameter_Integer, 0 ),   --  : whl14c2 (Integer)
           2420 => ( Parameter_Integer, 0 ),   --  : whl14c3 (Integer)
           2421 => ( Parameter_Integer, 0 ),   --  : whl14c4 (Integer)
           2422 => ( Parameter_Integer, 0 ),   --  : whl14c5 (Integer)
           2423 => ( Parameter_Integer, 0 ),   --  : whl14c6 (Integer)
           2424 => ( Parameter_Integer, 0 ),   --  : whl14c7 (Integer)
           2425 => ( Parameter_Integer, 0 ),   --  : whl14c8 (Integer)
           2426 => ( Parameter_Integer, 0 ),   --  : whl14c9 (Integer)
           2427 => ( Parameter_Integer, 0 ),   --  : whl15c1 (Integer)
           2428 => ( Parameter_Integer, 0 ),   --  : whl15c2 (Integer)
           2429 => ( Parameter_Integer, 0 ),   --  : whl15c3 (Integer)
           2430 => ( Parameter_Integer, 0 ),   --  : whl15c4 (Integer)
           2431 => ( Parameter_Integer, 0 ),   --  : whl15c5 (Integer)
           2432 => ( Parameter_Integer, 0 ),   --  : whl15c6 (Integer)
           2433 => ( Parameter_Integer, 0 ),   --  : whl15c7 (Integer)
           2434 => ( Parameter_Integer, 0 ),   --  : whl15c8 (Integer)
           2435 => ( Parameter_Integer, 0 ),   --  : whl15c9 (Integer)
           2436 => ( Parameter_Integer, 0 ),   --  : whl16c1 (Integer)
           2437 => ( Parameter_Integer, 0 ),   --  : whl16c2 (Integer)
           2438 => ( Parameter_Integer, 0 ),   --  : whl16c3 (Integer)
           2439 => ( Parameter_Integer, 0 ),   --  : whl16c4 (Integer)
           2440 => ( Parameter_Integer, 0 ),   --  : whl16c5 (Integer)
           2441 => ( Parameter_Integer, 0 ),   --  : whl16c6 (Integer)
           2442 => ( Parameter_Integer, 0 ),   --  : whl16c7 (Integer)
           2443 => ( Parameter_Integer, 0 ),   --  : whl16c8 (Integer)
           2444 => ( Parameter_Integer, 0 ),   --  : whl16c9 (Integer)
           2445 => ( Parameter_Integer, 0 ),   --  : whl17c1 (Integer)
           2446 => ( Parameter_Integer, 0 ),   --  : whl17c2 (Integer)
           2447 => ( Parameter_Integer, 0 ),   --  : whl17c3 (Integer)
           2448 => ( Parameter_Integer, 0 ),   --  : whl17c4 (Integer)
           2449 => ( Parameter_Integer, 0 ),   --  : whl17c5 (Integer)
           2450 => ( Parameter_Integer, 0 ),   --  : whl17c6 (Integer)
           2451 => ( Parameter_Integer, 0 ),   --  : whl17c7 (Integer)
           2452 => ( Parameter_Integer, 0 ),   --  : whl17c8 (Integer)
           2453 => ( Parameter_Integer, 0 ),   --  : whl17c9 (Integer)
           2454 => ( Parameter_Integer, 0 ),   --  : whl18c1 (Integer)
           2455 => ( Parameter_Integer, 0 ),   --  : whl18c2 (Integer)
           2456 => ( Parameter_Integer, 0 ),   --  : whl18c3 (Integer)
           2457 => ( Parameter_Integer, 0 ),   --  : whl18c4 (Integer)
           2458 => ( Parameter_Integer, 0 ),   --  : whl18c5 (Integer)
           2459 => ( Parameter_Integer, 0 ),   --  : whl18c6 (Integer)
           2460 => ( Parameter_Integer, 0 ),   --  : whl18c7 (Integer)
           2461 => ( Parameter_Integer, 0 ),   --  : whl18c8 (Integer)
           2462 => ( Parameter_Integer, 0 ),   --  : whl18c9 (Integer)
           2463 => ( Parameter_Integer, 0 ),   --  : whl19c1 (Integer)
           2464 => ( Parameter_Integer, 0 ),   --  : whl19c2 (Integer)
           2465 => ( Parameter_Integer, 0 ),   --  : whl19c3 (Integer)
           2466 => ( Parameter_Integer, 0 ),   --  : whl19c4 (Integer)
           2467 => ( Parameter_Integer, 0 ),   --  : whl19c5 (Integer)
           2468 => ( Parameter_Integer, 0 ),   --  : whl19c6 (Integer)
           2469 => ( Parameter_Integer, 0 ),   --  : whl19c7 (Integer)
           2470 => ( Parameter_Integer, 0 ),   --  : whl19c8 (Integer)
           2471 => ( Parameter_Integer, 0 ),   --  : whl19c9 (Integer)
           2472 => ( Parameter_Integer, 0 ),   --  : whl20c1 (Integer)
           2473 => ( Parameter_Integer, 0 ),   --  : whl20c2 (Integer)
           2474 => ( Parameter_Integer, 0 ),   --  : whl20c3 (Integer)
           2475 => ( Parameter_Integer, 0 ),   --  : whl20c4 (Integer)
           2476 => ( Parameter_Integer, 0 ),   --  : whl20c5 (Integer)
           2477 => ( Parameter_Integer, 0 ),   --  : whl20c6 (Integer)
           2478 => ( Parameter_Integer, 0 ),   --  : whl20c7 (Integer)
           2479 => ( Parameter_Integer, 0 ),   --  : whl20c8 (Integer)
           2480 => ( Parameter_Integer, 0 ),   --  : whl20c9 (Integer)
           2481 => ( Parameter_Integer, 0 ),   --  : agec1 (Integer)
           2482 => ( Parameter_Integer, 0 ),   --  : agec2 (Integer)
           2483 => ( Parameter_Integer, 0 ),   --  : agec3 (Integer)
           2484 => ( Parameter_Integer, 0 ),   --  : agec4 (Integer)
           2485 => ( Parameter_Integer, 0 ),   --  : agec5 (Integer)
           2486 => ( Parameter_Integer, 0 ),   --  : agec6 (Integer)
           2487 => ( Parameter_Integer, 0 ),   --  : agec7 (Integer)
           2488 => ( Parameter_Integer, 0 ),   --  : agec8 (Integer)
           2489 => ( Parameter_Integer, 0 ),   --  : cameyrc1 (Integer)
           2490 => ( Parameter_Integer, 0 ),   --  : cameyrc2 (Integer)
           2491 => ( Parameter_Integer, 0 ),   --  : cameyrc3 (Integer)
           2492 => ( Parameter_Integer, 0 ),   --  : cameyrc4 (Integer)
           2493 => ( Parameter_Integer, 0 ),   --  : cameyrc5 (Integer)
           2494 => ( Parameter_Integer, 0 ),   --  : cameyrc6 (Integer)
           2495 => ( Parameter_Integer, 0 ),   --  : cameyrc7 (Integer)
           2496 => ( Parameter_Integer, 0 ),   --  : cameyrc8 (Integer)
           2497 => ( Parameter_Integer, 0 ),   --  : chcrec1 (Integer)
           2498 => ( Parameter_Integer, 0 ),   --  : chcrec2 (Integer)
           2499 => ( Parameter_Integer, 0 ),   --  : chcrec3 (Integer)
           2500 => ( Parameter_Integer, 0 ),   --  : chcrec4 (Integer)
           2501 => ( Parameter_Integer, 0 ),   --  : chcrec5 (Integer)
           2502 => ( Parameter_Integer, 0 ),   --  : chcrec6 (Integer)
           2503 => ( Parameter_Integer, 0 ),   --  : chcrec7 (Integer)
           2504 => ( Parameter_Integer, 0 ),   --  : chcrec8 (Integer)
           2505 => ( Parameter_Integer, 0 ),   --  : creabc1 (Integer)
           2506 => ( Parameter_Integer, 0 ),   --  : creabc2 (Integer)
           2507 => ( Parameter_Integer, 0 ),   --  : creabc3 (Integer)
           2508 => ( Parameter_Integer, 0 ),   --  : creabc4 (Integer)
           2509 => ( Parameter_Integer, 0 ),   --  : creabc5 (Integer)
           2510 => ( Parameter_Integer, 0 ),   --  : creabc6 (Integer)
           2511 => ( Parameter_Integer, 0 ),   --  : creabc7 (Integer)
           2512 => ( Parameter_Integer, 0 ),   --  : creabc8 (Integer)
           2513 => ( Parameter_Integer, 0 ),   --  : creahc1 (Integer)
           2514 => ( Parameter_Integer, 0 ),   --  : creahc2 (Integer)
           2515 => ( Parameter_Integer, 0 ),   --  : creahc3 (Integer)
           2516 => ( Parameter_Integer, 0 ),   --  : creahc4 (Integer)
           2517 => ( Parameter_Integer, 0 ),   --  : creahc5 (Integer)
           2518 => ( Parameter_Integer, 0 ),   --  : creahc6 (Integer)
           2519 => ( Parameter_Integer, 0 ),   --  : creahc7 (Integer)
           2520 => ( Parameter_Integer, 0 ),   --  : creahc8 (Integer)
           2521 => ( Parameter_Integer, 0 ),   --  : crecbc1 (Integer)
           2522 => ( Parameter_Integer, 0 ),   --  : crecbc2 (Integer)
           2523 => ( Parameter_Integer, 0 ),   --  : crecbc3 (Integer)
           2524 => ( Parameter_Integer, 0 ),   --  : crecbc4 (Integer)
           2525 => ( Parameter_Integer, 0 ),   --  : crecbc5 (Integer)
           2526 => ( Parameter_Integer, 0 ),   --  : crecbc6 (Integer)
           2527 => ( Parameter_Integer, 0 ),   --  : crecbc7 (Integer)
           2528 => ( Parameter_Integer, 0 ),   --  : crecbc8 (Integer)
           2529 => ( Parameter_Integer, 0 ),   --  : crechc1 (Integer)
           2530 => ( Parameter_Integer, 0 ),   --  : crechc2 (Integer)
           2531 => ( Parameter_Integer, 0 ),   --  : crechc3 (Integer)
           2532 => ( Parameter_Integer, 0 ),   --  : crechc4 (Integer)
           2533 => ( Parameter_Integer, 0 ),   --  : crechc5 (Integer)
           2534 => ( Parameter_Integer, 0 ),   --  : crechc6 (Integer)
           2535 => ( Parameter_Integer, 0 ),   --  : crechc7 (Integer)
           2536 => ( Parameter_Integer, 0 ),   --  : crechc8 (Integer)
           2537 => ( Parameter_Integer, 0 ),   --  : creclc1 (Integer)
           2538 => ( Parameter_Integer, 0 ),   --  : creclc2 (Integer)
           2539 => ( Parameter_Integer, 0 ),   --  : creclc3 (Integer)
           2540 => ( Parameter_Integer, 0 ),   --  : creclc4 (Integer)
           2541 => ( Parameter_Integer, 0 ),   --  : creclc5 (Integer)
           2542 => ( Parameter_Integer, 0 ),   --  : creclc6 (Integer)
           2543 => ( Parameter_Integer, 0 ),   --  : creclc7 (Integer)
           2544 => ( Parameter_Integer, 0 ),   --  : creclc8 (Integer)
           2545 => ( Parameter_Integer, 0 ),   --  : crefrc1 (Integer)
           2546 => ( Parameter_Integer, 0 ),   --  : crefrc2 (Integer)
           2547 => ( Parameter_Integer, 0 ),   --  : crefrc3 (Integer)
           2548 => ( Parameter_Integer, 0 ),   --  : crefrc4 (Integer)
           2549 => ( Parameter_Integer, 0 ),   --  : crefrc5 (Integer)
           2550 => ( Parameter_Integer, 0 ),   --  : crefrc6 (Integer)
           2551 => ( Parameter_Integer, 0 ),   --  : crefrc7 (Integer)
           2552 => ( Parameter_Integer, 0 ),   --  : crefrc8 (Integer)
           2553 => ( Parameter_Integer, 0 ),   --  : creotc1 (Integer)
           2554 => ( Parameter_Integer, 0 ),   --  : creotc2 (Integer)
           2555 => ( Parameter_Integer, 0 ),   --  : creotc3 (Integer)
           2556 => ( Parameter_Integer, 0 ),   --  : creotc4 (Integer)
           2557 => ( Parameter_Integer, 0 ),   --  : creotc5 (Integer)
           2558 => ( Parameter_Integer, 0 ),   --  : creotc6 (Integer)
           2559 => ( Parameter_Integer, 0 ),   --  : creotc7 (Integer)
           2560 => ( Parameter_Integer, 0 ),   --  : creotc8 (Integer)
           2561 => ( Parameter_Integer, 0 ),   --  : carerc1 (Integer)
           2562 => ( Parameter_Integer, 0 ),   --  : carerc2 (Integer)
           2563 => ( Parameter_Integer, 0 ),   --  : carerc3 (Integer)
           2564 => ( Parameter_Integer, 0 ),   --  : carerc4 (Integer)
           2565 => ( Parameter_Integer, 0 ),   --  : carerc5 (Integer)
           2566 => ( Parameter_Integer, 0 ),   --  : carerc6 (Integer)
           2567 => ( Parameter_Integer, 0 ),   --  : carerc7 (Integer)
           2568 => ( Parameter_Integer, 0 ),   --  : carerc8 (Integer)
           2569 => ( Parameter_Integer, 0 ),   --  : cdatrec1 (Integer)
           2570 => ( Parameter_Integer, 0 ),   --  : cdatrec2 (Integer)
           2571 => ( Parameter_Integer, 0 ),   --  : cdatrec3 (Integer)
           2572 => ( Parameter_Integer, 0 ),   --  : cdatrec4 (Integer)
           2573 => ( Parameter_Integer, 0 ),   --  : cdatrec5 (Integer)
           2574 => ( Parameter_Integer, 0 ),   --  : cdatrec6 (Integer)
           2575 => ( Parameter_Integer, 0 ),   --  : cdatrec7 (Integer)
           2576 => ( Parameter_Integer, 0 ),   --  : cdatrec8 (Integer)
           2577 => ( Parameter_Integer, 0 ),   --  : cdtrepc1 (Integer)
           2578 => ( Parameter_Integer, 0 ),   --  : cdtrepc2 (Integer)
           2579 => ( Parameter_Integer, 0 ),   --  : cdtrepc3 (Integer)
           2580 => ( Parameter_Integer, 0 ),   --  : cdtrepc4 (Integer)
           2581 => ( Parameter_Integer, 0 ),   --  : cdtrepc5 (Integer)
           2582 => ( Parameter_Integer, 0 ),   --  : cdtrepc6 (Integer)
           2583 => ( Parameter_Integer, 0 ),   --  : cdtrepc7 (Integer)
           2584 => ( Parameter_Integer, 0 ),   --  : cdtrepc8 (Integer)
           2585 => ( Parameter_Integer, 0 ),   --  : cdis1c1 (Integer)
           2586 => ( Parameter_Integer, 0 ),   --  : cdis1c2 (Integer)
           2587 => ( Parameter_Integer, 0 ),   --  : cdis1c3 (Integer)
           2588 => ( Parameter_Integer, 0 ),   --  : cdis1c4 (Integer)
           2589 => ( Parameter_Integer, 0 ),   --  : cdis1c5 (Integer)
           2590 => ( Parameter_Integer, 0 ),   --  : cdis1c6 (Integer)
           2591 => ( Parameter_Integer, 0 ),   --  : cdis1c7 (Integer)
           2592 => ( Parameter_Integer, 0 ),   --  : cdis1c8 (Integer)
           2593 => ( Parameter_Integer, 0 ),   --  : cdis2c1 (Integer)
           2594 => ( Parameter_Integer, 0 ),   --  : cdis2c2 (Integer)
           2595 => ( Parameter_Integer, 0 ),   --  : cdis2c3 (Integer)
           2596 => ( Parameter_Integer, 0 ),   --  : cdis2c4 (Integer)
           2597 => ( Parameter_Integer, 0 ),   --  : cdis2c5 (Integer)
           2598 => ( Parameter_Integer, 0 ),   --  : cdis2c6 (Integer)
           2599 => ( Parameter_Integer, 0 ),   --  : cdis2c7 (Integer)
           2600 => ( Parameter_Integer, 0 ),   --  : cdis2c8 (Integer)
           2601 => ( Parameter_Integer, 0 ),   --  : cdis3c1 (Integer)
           2602 => ( Parameter_Integer, 0 ),   --  : cdis3c2 (Integer)
           2603 => ( Parameter_Integer, 0 ),   --  : cdis3c3 (Integer)
           2604 => ( Parameter_Integer, 0 ),   --  : cdis3c4 (Integer)
           2605 => ( Parameter_Integer, 0 ),   --  : cdis3c5 (Integer)
           2606 => ( Parameter_Integer, 0 ),   --  : cdis3c6 (Integer)
           2607 => ( Parameter_Integer, 0 ),   --  : cdis3c7 (Integer)
           2608 => ( Parameter_Integer, 0 ),   --  : cdis3c8 (Integer)
           2609 => ( Parameter_Integer, 0 ),   --  : cdis4c1 (Integer)
           2610 => ( Parameter_Integer, 0 ),   --  : cdis4c2 (Integer)
           2611 => ( Parameter_Integer, 0 ),   --  : cdis4c3 (Integer)
           2612 => ( Parameter_Integer, 0 ),   --  : cdis4c4 (Integer)
           2613 => ( Parameter_Integer, 0 ),   --  : cdis4c5 (Integer)
           2614 => ( Parameter_Integer, 0 ),   --  : cdis4c6 (Integer)
           2615 => ( Parameter_Integer, 0 ),   --  : cdis4c7 (Integer)
           2616 => ( Parameter_Integer, 0 ),   --  : cdis4c8 (Integer)
           2617 => ( Parameter_Integer, 0 ),   --  : cdis5c1 (Integer)
           2618 => ( Parameter_Integer, 0 ),   --  : cdis5c2 (Integer)
           2619 => ( Parameter_Integer, 0 ),   --  : cdis5c3 (Integer)
           2620 => ( Parameter_Integer, 0 ),   --  : cdis5c4 (Integer)
           2621 => ( Parameter_Integer, 0 ),   --  : cdis5c5 (Integer)
           2622 => ( Parameter_Integer, 0 ),   --  : cdis5c6 (Integer)
           2623 => ( Parameter_Integer, 0 ),   --  : cdis5c7 (Integer)
           2624 => ( Parameter_Integer, 0 ),   --  : cdis5c8 (Integer)
           2625 => ( Parameter_Integer, 0 ),   --  : cdis6c1 (Integer)
           2626 => ( Parameter_Integer, 0 ),   --  : cdis6c2 (Integer)
           2627 => ( Parameter_Integer, 0 ),   --  : cdis6c3 (Integer)
           2628 => ( Parameter_Integer, 0 ),   --  : cdis6c4 (Integer)
           2629 => ( Parameter_Integer, 0 ),   --  : cdis6c5 (Integer)
           2630 => ( Parameter_Integer, 0 ),   --  : cdis6c6 (Integer)
           2631 => ( Parameter_Integer, 0 ),   --  : cdis6c7 (Integer)
           2632 => ( Parameter_Integer, 0 ),   --  : cdis6c8 (Integer)
           2633 => ( Parameter_Integer, 0 ),   --  : cdis7c1 (Integer)
           2634 => ( Parameter_Integer, 0 ),   --  : cdis7c2 (Integer)
           2635 => ( Parameter_Integer, 0 ),   --  : cdis7c3 (Integer)
           2636 => ( Parameter_Integer, 0 ),   --  : cdis7c4 (Integer)
           2637 => ( Parameter_Integer, 0 ),   --  : cdis7c5 (Integer)
           2638 => ( Parameter_Integer, 0 ),   --  : cdis7c6 (Integer)
           2639 => ( Parameter_Integer, 0 ),   --  : cdis7c7 (Integer)
           2640 => ( Parameter_Integer, 0 ),   --  : cdis7c8 (Integer)
           2641 => ( Parameter_Integer, 0 ),   --  : cdis8c1 (Integer)
           2642 => ( Parameter_Integer, 0 ),   --  : cdis8c2 (Integer)
           2643 => ( Parameter_Integer, 0 ),   --  : cdis8c3 (Integer)
           2644 => ( Parameter_Integer, 0 ),   --  : cdis8c4 (Integer)
           2645 => ( Parameter_Integer, 0 ),   --  : cdis8c5 (Integer)
           2646 => ( Parameter_Integer, 0 ),   --  : cdis8c6 (Integer)
           2647 => ( Parameter_Integer, 0 ),   --  : cdis8c7 (Integer)
           2648 => ( Parameter_Integer, 0 ),   --  : cdis8c8 (Integer)
           2649 => ( Parameter_Integer, 0 ),   --  : cdis9c1 (Integer)
           2650 => ( Parameter_Integer, 0 ),   --  : cdis9c2 (Integer)
           2651 => ( Parameter_Integer, 0 ),   --  : cdis9c3 (Integer)
           2652 => ( Parameter_Integer, 0 ),   --  : cdis9c4 (Integer)
           2653 => ( Parameter_Integer, 0 ),   --  : cdis9c5 (Integer)
           2654 => ( Parameter_Integer, 0 ),   --  : cdis9c6 (Integer)
           2655 => ( Parameter_Integer, 0 ),   --  : cdis9c7 (Integer)
           2656 => ( Parameter_Integer, 0 ),   --  : cdis9c8 (Integer)
           2657 => ( Parameter_Integer, 0 ),   --  : cdis10c1 (Integer)
           2658 => ( Parameter_Integer, 0 ),   --  : cdis10c2 (Integer)
           2659 => ( Parameter_Integer, 0 ),   --  : cdis10c3 (Integer)
           2660 => ( Parameter_Integer, 0 ),   --  : cdis10c4 (Integer)
           2661 => ( Parameter_Integer, 0 ),   --  : cdis10c5 (Integer)
           2662 => ( Parameter_Integer, 0 ),   --  : cdis10c6 (Integer)
           2663 => ( Parameter_Integer, 0 ),   --  : cdis10c7 (Integer)
           2664 => ( Parameter_Integer, 0 ),   --  : cdis10c8 (Integer)
           2665 => ( Parameter_Integer, 0 ),   --  : cdifc1 (Integer)
           2666 => ( Parameter_Integer, 0 ),   --  : cdifc2 (Integer)
           2667 => ( Parameter_Integer, 0 ),   --  : cdifc3 (Integer)
           2668 => ( Parameter_Integer, 0 ),   --  : cdifc4 (Integer)
           2669 => ( Parameter_Integer, 0 ),   --  : cdifc5 (Integer)
           2670 => ( Parameter_Integer, 0 ),   --  : cdifc6 (Integer)
           2671 => ( Parameter_Integer, 0 ),   --  : cdifc7 (Integer)
           2672 => ( Parameter_Integer, 0 ),   --  : cdifc8 (Integer)
           2673 => ( Parameter_Float, 0.0 ),   --  : ernamc1 (Amount)
           2674 => ( Parameter_Float, 0.0 ),   --  : ernamc2 (Amount)
           2675 => ( Parameter_Float, 0.0 ),   --  : ernamc3 (Amount)
           2676 => ( Parameter_Integer, 0 ),   --  : ernamc4 (Integer)
           2677 => ( Parameter_Integer, 0 ),   --  : ernamc5 (Integer)
           2678 => ( Parameter_Integer, 0 ),   --  : ernamc6 (Integer)
           2679 => ( Parameter_Integer, 0 ),   --  : ernamc7 (Integer)
           2680 => ( Parameter_Integer, 0 ),   --  : ernamc8 (Integer)
           2681 => ( Parameter_Float, 0.0 ),   --  : trustc1 (Amount)
           2682 => ( Parameter_Float, 0.0 ),   --  : trustc2 (Amount)
           2683 => ( Parameter_Float, 0.0 ),   --  : trustc3 (Amount)
           2684 => ( Parameter_Integer, 0 ),   --  : trustc4 (Integer)
           2685 => ( Parameter_Integer, 0 ),   --  : trustc5 (Integer)
           2686 => ( Parameter_Integer, 0 ),   --  : trustc6 (Integer)
           2687 => ( Parameter_Integer, 0 ),   --  : trustc7 (Integer)
           2688 => ( Parameter_Integer, 0 ),   --  : trustc8 (Integer)
           2689 => ( Parameter_Integer, 0 ),   --  : chbfdc1 (Integer)
           2690 => ( Parameter_Integer, 0 ),   --  : chbfdc2 (Integer)
           2691 => ( Parameter_Integer, 0 ),   --  : chbfdc3 (Integer)
           2692 => ( Parameter_Integer, 0 ),   --  : chbfdc4 (Integer)
           2693 => ( Parameter_Integer, 0 ),   --  : chbfdc5 (Integer)
           2694 => ( Parameter_Integer, 0 ),   --  : chbfdc6 (Integer)
           2695 => ( Parameter_Integer, 0 ),   --  : chbfdc7 (Integer)
           2696 => ( Parameter_Integer, 0 ),   --  : chbfdc8 (Integer)
           2697 => ( Parameter_Float, 0.0 ),   --  : cbfamtc1 (Amount)
           2698 => ( Parameter_Float, 0.0 ),   --  : cbfamtc2 (Amount)
           2699 => ( Parameter_Integer, 0 ),   --  : cbfamtc3 (Integer)
           2700 => ( Parameter_Integer, 0 ),   --  : cbfamtc4 (Integer)
           2701 => ( Parameter_Integer, 0 ),   --  : cbfamtc5 (Integer)
           2702 => ( Parameter_Integer, 0 ),   --  : cbfamtc6 (Integer)
           2703 => ( Parameter_Integer, 0 ),   --  : cbfamtc7 (Integer)
           2704 => ( Parameter_Integer, 0 ),   --  : cbfamtc8 (Integer)
           2705 => ( Parameter_Integer, 0 ),   --  : pbfamtc1 (Integer)
           2706 => ( Parameter_Integer, 0 ),   --  : pbfamtc2 (Integer)
           2707 => ( Parameter_Integer, 0 ),   --  : pbfamtc3 (Integer)
           2708 => ( Parameter_Integer, 0 ),   --  : pbfamtc4 (Integer)
           2709 => ( Parameter_Integer, 0 ),   --  : pbfamtc5 (Integer)
           2710 => ( Parameter_Integer, 0 ),   --  : pbfamtc6 (Integer)
           2711 => ( Parameter_Integer, 0 ),   --  : pbfamtc7 (Integer)
           2712 => ( Parameter_Integer, 0 ),   --  : pbfamtc8 (Integer)
           2713 => ( Parameter_Integer, 0 ),   --  : cbfvalc1 (Integer)
           2714 => ( Parameter_Integer, 0 ),   --  : cbfvalc2 (Integer)
           2715 => ( Parameter_Integer, 0 ),   --  : cbfvalc3 (Integer)
           2716 => ( Parameter_Integer, 0 ),   --  : cbfvalc4 (Integer)
           2717 => ( Parameter_Integer, 0 ),   --  : cbfvalc5 (Integer)
           2718 => ( Parameter_Integer, 0 ),   --  : cbfvalc6 (Integer)
           2719 => ( Parameter_Integer, 0 ),   --  : cbfvalc7 (Integer)
           2720 => ( Parameter_Integer, 0 ),   --  : cbfvalc8 (Integer)
           2721 => ( Parameter_Integer, 0 ),   --  : chcondc1 (Integer)
           2722 => ( Parameter_Integer, 0 ),   --  : chcondc2 (Integer)
           2723 => ( Parameter_Integer, 0 ),   --  : chcondc3 (Integer)
           2724 => ( Parameter_Integer, 0 ),   --  : chcondc4 (Integer)
           2725 => ( Parameter_Integer, 0 ),   --  : chcondc5 (Integer)
           2726 => ( Parameter_Integer, 0 ),   --  : chcondc6 (Integer)
           2727 => ( Parameter_Integer, 0 ),   --  : chcondc7 (Integer)
           2728 => ( Parameter_Integer, 0 ),   --  : chcondc8 (Integer)
           2729 => ( Parameter_Integer, 0 ),   --  : cdla1c1 (Integer)
           2730 => ( Parameter_Integer, 0 ),   --  : cdla1c2 (Integer)
           2731 => ( Parameter_Integer, 0 ),   --  : cdla1c3 (Integer)
           2732 => ( Parameter_Integer, 0 ),   --  : cdla1c4 (Integer)
           2733 => ( Parameter_Integer, 0 ),   --  : cdla1c5 (Integer)
           2734 => ( Parameter_Integer, 0 ),   --  : cdla1c6 (Integer)
           2735 => ( Parameter_Integer, 0 ),   --  : cdla1c7 (Integer)
           2736 => ( Parameter_Integer, 0 ),   --  : cdla1c8 (Integer)
           2737 => ( Parameter_Integer, 0 ),   --  : cdla2c1 (Integer)
           2738 => ( Parameter_Integer, 0 ),   --  : cdla2c2 (Integer)
           2739 => ( Parameter_Integer, 0 ),   --  : cdla2c3 (Integer)
           2740 => ( Parameter_Integer, 0 ),   --  : cdla2c4 (Integer)
           2741 => ( Parameter_Integer, 0 ),   --  : cdla2c5 (Integer)
           2742 => ( Parameter_Integer, 0 ),   --  : cdla2c6 (Integer)
           2743 => ( Parameter_Integer, 0 ),   --  : cdla2c7 (Integer)
           2744 => ( Parameter_Integer, 0 ),   --  : cdla2c8 (Integer)
           2745 => ( Parameter_Integer, 0 ),   --  : chelfc1 (Integer)
           2746 => ( Parameter_Integer, 0 ),   --  : chelfc2 (Integer)
           2747 => ( Parameter_Integer, 0 ),   --  : chelfc3 (Integer)
           2748 => ( Parameter_Integer, 0 ),   --  : chelfc4 (Integer)
           2749 => ( Parameter_Integer, 0 ),   --  : chelfc5 (Integer)
           2750 => ( Parameter_Integer, 0 ),   --  : chelfc6 (Integer)
           2751 => ( Parameter_Integer, 0 ),   --  : chelfc7 (Integer)
           2752 => ( Parameter_Integer, 0 ),   --  : chelfc8 (Integer)
           2753 => ( Parameter_Float, 0.0 ),   --  : chernc1 (Amount)
           2754 => ( Parameter_Float, 0.0 ),   --  : chernc2 (Amount)
           2755 => ( Parameter_Float, 0.0 ),   --  : chernc3 (Amount)
           2756 => ( Parameter_Integer, 0 ),   --  : chernc4 (Integer)
           2757 => ( Parameter_Integer, 0 ),   --  : chernc5 (Integer)
           2758 => ( Parameter_Integer, 0 ),   --  : chernc6 (Integer)
           2759 => ( Parameter_Integer, 0 ),   --  : chernc7 (Integer)
           2760 => ( Parameter_Integer, 0 ),   --  : chernc8 (Integer)
           2761 => ( Parameter_Integer, 0 ),   --  : crns1c1 (Integer)
           2762 => ( Parameter_Integer, 0 ),   --  : crns1c2 (Integer)
           2763 => ( Parameter_Integer, 0 ),   --  : crns1c3 (Integer)
           2764 => ( Parameter_Integer, 0 ),   --  : crns1c4 (Integer)
           2765 => ( Parameter_Integer, 0 ),   --  : crns1c5 (Integer)
           2766 => ( Parameter_Integer, 0 ),   --  : crns1c6 (Integer)
           2767 => ( Parameter_Integer, 0 ),   --  : crns1c7 (Integer)
           2768 => ( Parameter_Integer, 0 ),   --  : crns1c8 (Integer)
           2769 => ( Parameter_Integer, 0 ),   --  : crns2c1 (Integer)
           2770 => ( Parameter_Integer, 0 ),   --  : crns2c2 (Integer)
           2771 => ( Parameter_Integer, 0 ),   --  : crns2c3 (Integer)
           2772 => ( Parameter_Integer, 0 ),   --  : crns2c4 (Integer)
           2773 => ( Parameter_Integer, 0 ),   --  : crns2c5 (Integer)
           2774 => ( Parameter_Integer, 0 ),   --  : crns2c6 (Integer)
           2775 => ( Parameter_Integer, 0 ),   --  : crns2c7 (Integer)
           2776 => ( Parameter_Integer, 0 ),   --  : crns2c8 (Integer)
           2777 => ( Parameter_Integer, 0 ),   --  : crns3c1 (Integer)
           2778 => ( Parameter_Integer, 0 ),   --  : crns3c2 (Integer)
           2779 => ( Parameter_Integer, 0 ),   --  : crns3c3 (Integer)
           2780 => ( Parameter_Integer, 0 ),   --  : crns3c4 (Integer)
           2781 => ( Parameter_Integer, 0 ),   --  : crns3c5 (Integer)
           2782 => ( Parameter_Integer, 0 ),   --  : crns3c6 (Integer)
           2783 => ( Parameter_Integer, 0 ),   --  : crns3c7 (Integer)
           2784 => ( Parameter_Integer, 0 ),   --  : crns3c8 (Integer)
           2785 => ( Parameter_Integer, 0 ),   --  : chemac1 (Integer)
           2786 => ( Parameter_Integer, 0 ),   --  : chemac2 (Integer)
           2787 => ( Parameter_Integer, 0 ),   --  : chemac3 (Integer)
           2788 => ( Parameter_Integer, 0 ),   --  : chemac4 (Integer)
           2789 => ( Parameter_Integer, 0 ),   --  : chemac5 (Integer)
           2790 => ( Parameter_Integer, 0 ),   --  : chemac6 (Integer)
           2791 => ( Parameter_Integer, 0 ),   --  : chemac7 (Integer)
           2792 => ( Parameter_Integer, 0 ),   --  : chemac8 (Integer)
           2793 => ( Parameter_Float, 0.0 ),   --  : emamtc1 (Amount)
           2794 => ( Parameter_Float, 0.0 ),   --  : emamtc2 (Amount)
           2795 => ( Parameter_Integer, 0 ),   --  : emamtc3 (Integer)
           2796 => ( Parameter_Integer, 0 ),   --  : emamtc4 (Integer)
           2797 => ( Parameter_Integer, 0 ),   --  : emamtc5 (Integer)
           2798 => ( Parameter_Integer, 0 ),   --  : emamtc6 (Integer)
           2799 => ( Parameter_Integer, 0 ),   --  : emamtc7 (Integer)
           2800 => ( Parameter_Integer, 0 ),   --  : emamtc8 (Integer)
           2801 => ( Parameter_Integer, 0 ),   --  : emapdc1 (Integer)
           2802 => ( Parameter_Integer, 0 ),   --  : emapdc2 (Integer)
           2803 => ( Parameter_Integer, 0 ),   --  : emapdc3 (Integer)
           2804 => ( Parameter_Integer, 0 ),   --  : emapdc4 (Integer)
           2805 => ( Parameter_Integer, 0 ),   --  : emapdc5 (Integer)
           2806 => ( Parameter_Integer, 0 ),   --  : emapdc6 (Integer)
           2807 => ( Parameter_Integer, 0 ),   --  : emapdc7 (Integer)
           2808 => ( Parameter_Integer, 0 ),   --  : emapdc8 (Integer)
           2809 => ( Parameter_Float, 0.0 ),   --  : chidvc1 (Amount)
           2810 => ( Parameter_Float, 0.0 ),   --  : chidvc2 (Amount)
           2811 => ( Parameter_Float, 0.0 ),   --  : chidvc3 (Amount)
           2812 => ( Parameter_Integer, 0 ),   --  : chidvc4 (Integer)
           2813 => ( Parameter_Integer, 0 ),   --  : chidvc5 (Integer)
           2814 => ( Parameter_Integer, 0 ),   --  : chidvc6 (Integer)
           2815 => ( Parameter_Integer, 0 ),   --  : chidvc7 (Integer)
           2816 => ( Parameter_Integer, 0 ),   --  : chidvc8 (Integer)
           2817 => ( Parameter_Integer, 0 ),   --  : climitc1 (Integer)
           2818 => ( Parameter_Integer, 0 ),   --  : climitc2 (Integer)
           2819 => ( Parameter_Integer, 0 ),   --  : climitc3 (Integer)
           2820 => ( Parameter_Integer, 0 ),   --  : climitc4 (Integer)
           2821 => ( Parameter_Integer, 0 ),   --  : climitc5 (Integer)
           2822 => ( Parameter_Integer, 0 ),   --  : climitc6 (Integer)
           2823 => ( Parameter_Integer, 0 ),   --  : climitc7 (Integer)
           2824 => ( Parameter_Integer, 0 ),   --  : climitc8 (Integer)
           2825 => ( Parameter_Integer, 0 ),   --  : pearnc1 (Integer)
           2826 => ( Parameter_Integer, 0 ),   --  : pearnc2 (Integer)
           2827 => ( Parameter_Integer, 0 ),   --  : pearnc3 (Integer)
           2828 => ( Parameter_Integer, 0 ),   --  : pearnc4 (Integer)
           2829 => ( Parameter_Integer, 0 ),   --  : pearnc5 (Integer)
           2830 => ( Parameter_Integer, 0 ),   --  : pearnc6 (Integer)
           2831 => ( Parameter_Integer, 0 ),   --  : pearnc7 (Integer)
           2832 => ( Parameter_Integer, 0 ),   --  : pearnc8 (Integer)
           2833 => ( Parameter_Integer, 0 ),   --  : ptrusc1 (Integer)
           2834 => ( Parameter_Integer, 0 ),   --  : ptrusc2 (Integer)
           2835 => ( Parameter_Integer, 0 ),   --  : ptrusc3 (Integer)
           2836 => ( Parameter_Integer, 0 ),   --  : ptrusc4 (Integer)
           2837 => ( Parameter_Integer, 0 ),   --  : ptrusc5 (Integer)
           2838 => ( Parameter_Integer, 0 ),   --  : ptrusc6 (Integer)
           2839 => ( Parameter_Integer, 0 ),   --  : ptrusc7 (Integer)
           2840 => ( Parameter_Integer, 0 ),   --  : ptrusc8 (Integer)
           2841 => ( Parameter_Float, 0.0 ),   --  : chrinc1 (Amount)
           2842 => ( Parameter_Float, 0.0 ),   --  : chrinc2 (Amount)
           2843 => ( Parameter_Float, 0.0 ),   --  : chrinc3 (Amount)
           2844 => ( Parameter_Integer, 0 ),   --  : chrinc4 (Integer)
           2845 => ( Parameter_Integer, 0 ),   --  : chrinc5 (Integer)
           2846 => ( Parameter_Integer, 0 ),   --  : chrinc6 (Integer)
           2847 => ( Parameter_Integer, 0 ),   --  : chrinc7 (Integer)
           2848 => ( Parameter_Integer, 0 ),   --  : chrinc8 (Integer)
           2849 => ( Parameter_Integer, 0 ),   --  : csavec1 (Integer)
           2850 => ( Parameter_Integer, 0 ),   --  : csavec2 (Integer)
           2851 => ( Parameter_Integer, 0 ),   --  : csavec3 (Integer)
           2852 => ( Parameter_Integer, 0 ),   --  : csavec4 (Integer)
           2853 => ( Parameter_Integer, 0 ),   --  : csavec5 (Integer)
           2854 => ( Parameter_Integer, 0 ),   --  : csavec6 (Integer)
           2855 => ( Parameter_Integer, 0 ),   --  : csavec7 (Integer)
           2856 => ( Parameter_Integer, 0 ),   --  : csavec8 (Integer)
           2857 => ( Parameter_Float, 0.0 ),   --  : tramtc1 (Amount)
           2858 => ( Parameter_Float, 0.0 ),   --  : tramtc2 (Amount)
           2859 => ( Parameter_Integer, 0 ),   --  : tramtc3 (Integer)
           2860 => ( Parameter_Integer, 0 ),   --  : tramtc4 (Integer)
           2861 => ( Parameter_Integer, 0 ),   --  : tramtc5 (Integer)
           2862 => ( Parameter_Integer, 0 ),   --  : tramtc6 (Integer)
           2863 => ( Parameter_Integer, 0 ),   --  : tramtc7 (Integer)
           2864 => ( Parameter_Integer, 0 ),   --  : tramtc8 (Integer)
           2865 => ( Parameter_Integer, 0 ),   --  : trnpdc1 (Integer)
           2866 => ( Parameter_Integer, 0 ),   --  : trnpdc2 (Integer)
           2867 => ( Parameter_Integer, 0 ),   --  : trnpdc3 (Integer)
           2868 => ( Parameter_Integer, 0 ),   --  : trnpdc4 (Integer)
           2869 => ( Parameter_Integer, 0 ),   --  : trnpdc5 (Integer)
           2870 => ( Parameter_Integer, 0 ),   --  : trnpdc6 (Integer)
           2871 => ( Parameter_Integer, 0 ),   --  : trnpdc7 (Integer)
           2872 => ( Parameter_Integer, 0 ),   --  : trnpdc8 (Integer)
           2873 => ( Parameter_Integer, 0 ),   --  : cohabc1 (Integer)
           2874 => ( Parameter_Integer, 0 ),   --  : cohabc2 (Integer)
           2875 => ( Parameter_Integer, 0 ),   --  : cohabc3 (Integer)
           2876 => ( Parameter_Integer, 0 ),   --  : cohabc4 (Integer)
           2877 => ( Parameter_Integer, 0 ),   --  : cohabc5 (Integer)
           2878 => ( Parameter_Integer, 0 ),   --  : cohabc6 (Integer)
           2879 => ( Parameter_Integer, 0 ),   --  : cohabc7 (Integer)
           2880 => ( Parameter_Integer, 0 ),   --  : cohabc8 (Integer)
           2881 => ( Parameter_Integer, 0 ),   --  : curqulc1 (Integer)
           2882 => ( Parameter_Integer, 0 ),   --  : curqulc2 (Integer)
           2883 => ( Parameter_Integer, 0 ),   --  : curqulc3 (Integer)
           2884 => ( Parameter_Integer, 0 ),   --  : curqulc4 (Integer)
           2885 => ( Parameter_Integer, 0 ),   --  : curqulc5 (Integer)
           2886 => ( Parameter_Integer, 0 ),   --  : curqulc6 (Integer)
           2887 => ( Parameter_Integer, 0 ),   --  : curqulc7 (Integer)
           2888 => ( Parameter_Integer, 0 ),   --  : curqulc8 (Integer)
           2889 => ( Parameter_Integer, 0 ),   --  : disacc1 (Integer)
           2890 => ( Parameter_Integer, 0 ),   --  : disacc2 (Integer)
           2891 => ( Parameter_Integer, 0 ),   --  : disacc3 (Integer)
           2892 => ( Parameter_Integer, 0 ),   --  : disacc4 (Integer)
           2893 => ( Parameter_Integer, 0 ),   --  : disacc5 (Integer)
           2894 => ( Parameter_Integer, 0 ),   --  : disacc6 (Integer)
           2895 => ( Parameter_Integer, 0 ),   --  : disacc7 (Integer)
           2896 => ( Parameter_Integer, 0 ),   --  : disacc8 (Integer)
           2897 => ( Parameter_Integer, 0 ),   --  : discoc1 (Integer)
           2898 => ( Parameter_Integer, 0 ),   --  : discoc2 (Integer)
           2899 => ( Parameter_Integer, 0 ),   --  : discoc3 (Integer)
           2900 => ( Parameter_Integer, 0 ),   --  : discoc4 (Integer)
           2901 => ( Parameter_Integer, 0 ),   --  : discoc5 (Integer)
           2902 => ( Parameter_Integer, 0 ),   --  : discoc6 (Integer)
           2903 => ( Parameter_Integer, 0 ),   --  : discoc7 (Integer)
           2904 => ( Parameter_Integer, 0 ),   --  : discoc8 (Integer)
           2905 => ( Parameter_Integer, 0 ),   --  : dobc1 (Integer)
           2906 => ( Parameter_Integer, 0 ),   --  : dobc2 (Integer)
           2907 => ( Parameter_Integer, 0 ),   --  : dobc3 (Integer)
           2908 => ( Parameter_Integer, 0 ),   --  : dobc4 (Integer)
           2909 => ( Parameter_Integer, 0 ),   --  : dobc5 (Integer)
           2910 => ( Parameter_Integer, 0 ),   --  : dobc6 (Integer)
           2911 => ( Parameter_Integer, 0 ),   --  : dobc7 (Integer)
           2912 => ( Parameter_Integer, 0 ),   --  : dobc8 (Integer)
           2913 => ( Parameter_Integer, 0 ),   --  : dvmarc1 (Integer)
           2914 => ( Parameter_Integer, 0 ),   --  : dvmarc2 (Integer)
           2915 => ( Parameter_Integer, 0 ),   --  : dvmarc3 (Integer)
           2916 => ( Parameter_Integer, 0 ),   --  : dvmarc4 (Integer)
           2917 => ( Parameter_Integer, 0 ),   --  : dvmarc5 (Integer)
           2918 => ( Parameter_Integer, 0 ),   --  : dvmarc6 (Integer)
           2919 => ( Parameter_Integer, 0 ),   --  : dvmarc7 (Integer)
           2920 => ( Parameter_Integer, 0 ),   --  : dvmarc8 (Integer)
           2921 => ( Parameter_Float, 0.0 ),   --  : fsvvlc1 (Amount)
           2922 => ( Parameter_Float, 0.0 ),   --  : fsvvlc2 (Amount)
           2923 => ( Parameter_Float, 0.0 ),   --  : fsvvlc3 (Amount)
           2924 => ( Parameter_Float, 0.0 ),   --  : fsvvlc4 (Amount)
           2925 => ( Parameter_Float, 0.0 ),   --  : fsvvlc5 (Amount)
           2926 => ( Parameter_Float, 0.0 ),   --  : fsvvlc6 (Amount)
           2927 => ( Parameter_Integer, 0 ),   --  : fsvvlc7 (Integer)
           2928 => ( Parameter_Integer, 0 ),   --  : fsvvlc8 (Integer)
           2929 => ( Parameter_Float, 0.0 ),   --  : fsmkvc1 (Amount)
           2930 => ( Parameter_Float, 0.0 ),   --  : fsmkvc2 (Amount)
           2931 => ( Parameter_Float, 0.0 ),   --  : fsmkvc3 (Amount)
           2932 => ( Parameter_Float, 0.0 ),   --  : fsmkvc4 (Amount)
           2933 => ( Parameter_Float, 0.0 ),   --  : fsmkvc5 (Amount)
           2934 => ( Parameter_Integer, 0 ),   --  : fsmkvc6 (Integer)
           2935 => ( Parameter_Integer, 0 ),   --  : fsmkvc7 (Integer)
           2936 => ( Parameter_Integer, 0 ),   --  : fsmkvc8 (Integer)
           2937 => ( Parameter_Float, 0.0 ),   --  : fsmlvc1 (Amount)
           2938 => ( Parameter_Float, 0.0 ),   --  : fsmlvc2 (Amount)
           2939 => ( Parameter_Float, 0.0 ),   --  : fsmlvc3 (Amount)
           2940 => ( Parameter_Float, 0.0 ),   --  : fsmlvc4 (Amount)
           2941 => ( Parameter_Float, 0.0 ),   --  : fsmlvc5 (Amount)
           2942 => ( Parameter_Float, 0.0 ),   --  : fsmlvc6 (Amount)
           2943 => ( Parameter_Integer, 0 ),   --  : fsmlvc7 (Integer)
           2944 => ( Parameter_Integer, 0 ),   --  : fsmlvc8 (Integer)
           2945 => ( Parameter_Integer, 0 ),   --  : ftedc1 (Integer)
           2946 => ( Parameter_Integer, 0 ),   --  : ftedc2 (Integer)
           2947 => ( Parameter_Integer, 0 ),   --  : ftedc3 (Integer)
           2948 => ( Parameter_Integer, 0 ),   --  : ftedc4 (Integer)
           2949 => ( Parameter_Integer, 0 ),   --  : ftedc5 (Integer)
           2950 => ( Parameter_Integer, 0 ),   --  : ftedc6 (Integer)
           2951 => ( Parameter_Integer, 0 ),   --  : ftedc7 (Integer)
           2952 => ( Parameter_Integer, 0 ),   --  : ftedc8 (Integer)
           2953 => ( Parameter_Integer, 0 ),   --  : g1valc1 (Integer)
           2954 => ( Parameter_Integer, 0 ),   --  : g1valc2 (Integer)
           2955 => ( Parameter_Integer, 0 ),   --  : g1valc3 (Integer)
           2956 => ( Parameter_Integer, 0 ),   --  : g1valc4 (Integer)
           2957 => ( Parameter_Integer, 0 ),   --  : g1valc5 (Integer)
           2958 => ( Parameter_Integer, 0 ),   --  : g1valc6 (Integer)
           2959 => ( Parameter_Integer, 0 ),   --  : g1valc7 (Integer)
           2960 => ( Parameter_Integer, 0 ),   --  : g1valc8 (Integer)
           2961 => ( Parameter_Integer, 0 ),   --  : g2valc1 (Integer)
           2962 => ( Parameter_Integer, 0 ),   --  : g2valc2 (Integer)
           2963 => ( Parameter_Integer, 0 ),   --  : g2valc3 (Integer)
           2964 => ( Parameter_Integer, 0 ),   --  : g2valc4 (Integer)
           2965 => ( Parameter_Integer, 0 ),   --  : g2valc5 (Integer)
           2966 => ( Parameter_Integer, 0 ),   --  : g2valc6 (Integer)
           2967 => ( Parameter_Integer, 0 ),   --  : g2valc7 (Integer)
           2968 => ( Parameter_Integer, 0 ),   --  : g2valc8 (Integer)
           2969 => ( Parameter_Integer, 0 ),   --  : g1dirc1 (Integer)
           2970 => ( Parameter_Integer, 0 ),   --  : g1dirc2 (Integer)
           2971 => ( Parameter_Integer, 0 ),   --  : g1dirc3 (Integer)
           2972 => ( Parameter_Integer, 0 ),   --  : g1dirc4 (Integer)
           2973 => ( Parameter_Integer, 0 ),   --  : g1dirc5 (Integer)
           2974 => ( Parameter_Integer, 0 ),   --  : g1dirc6 (Integer)
           2975 => ( Parameter_Integer, 0 ),   --  : g1dirc7 (Integer)
           2976 => ( Parameter_Integer, 0 ),   --  : g1dirc8 (Integer)
           2977 => ( Parameter_Integer, 0 ),   --  : g2dirc1 (Integer)
           2978 => ( Parameter_Integer, 0 ),   --  : g2dirc2 (Integer)
           2979 => ( Parameter_Integer, 0 ),   --  : g2dirc3 (Integer)
           2980 => ( Parameter_Integer, 0 ),   --  : g2dirc4 (Integer)
           2981 => ( Parameter_Integer, 0 ),   --  : g2dirc5 (Integer)
           2982 => ( Parameter_Integer, 0 ),   --  : g2dirc6 (Integer)
           2983 => ( Parameter_Integer, 0 ),   --  : g2dirc7 (Integer)
           2984 => ( Parameter_Integer, 0 ),   --  : g2dirc8 (Integer)
           2985 => ( Parameter_Integer, 0 ),   --  : gtnumc1 (Integer)
           2986 => ( Parameter_Integer, 0 ),   --  : gtnumc2 (Integer)
           2987 => ( Parameter_Integer, 0 ),   --  : gtnumc3 (Integer)
           2988 => ( Parameter_Integer, 0 ),   --  : gtnumc4 (Integer)
           2989 => ( Parameter_Integer, 0 ),   --  : gtnumc5 (Integer)
           2990 => ( Parameter_Integer, 0 ),   --  : gtnumc6 (Integer)
           2991 => ( Parameter_Integer, 0 ),   --  : gtnumc7 (Integer)
           2992 => ( Parameter_Integer, 0 ),   --  : gtnumc8 (Integer)
           2993 => ( Parameter_Integer, 0 ),   --  : gt1scc1 (Integer)
           2994 => ( Parameter_Integer, 0 ),   --  : gt1scc2 (Integer)
           2995 => ( Parameter_Integer, 0 ),   --  : gt1scc3 (Integer)
           2996 => ( Parameter_Integer, 0 ),   --  : gt1scc4 (Integer)
           2997 => ( Parameter_Integer, 0 ),   --  : gt1scc5 (Integer)
           2998 => ( Parameter_Integer, 0 ),   --  : gt1scc6 (Integer)
           2999 => ( Parameter_Integer, 0 ),   --  : gt1scc7 (Integer)
           3000 => ( Parameter_Integer, 0 ),   --  : gt1scc8 (Integer)
           3001 => ( Parameter_Integer, 0 ),   --  : gt2scc1 (Integer)
           3002 => ( Parameter_Integer, 0 ),   --  : gt2scc2 (Integer)
           3003 => ( Parameter_Integer, 0 ),   --  : gt2scc3 (Integer)
           3004 => ( Parameter_Integer, 0 ),   --  : gt2scc4 (Integer)
           3005 => ( Parameter_Integer, 0 ),   --  : gt2scc5 (Integer)
           3006 => ( Parameter_Integer, 0 ),   --  : gt2scc6 (Integer)
           3007 => ( Parameter_Integer, 0 ),   --  : gt2scc7 (Integer)
           3008 => ( Parameter_Integer, 0 ),   --  : gt2scc8 (Integer)
           3009 => ( Parameter_Float, 0.0 ),   --  : gt10sc1 (Amount)
           3010 => ( Parameter_Integer, 0 ),   --  : gt10sc2 (Integer)
           3011 => ( Parameter_Integer, 0 ),   --  : gt10sc3 (Integer)
           3012 => ( Parameter_Integer, 0 ),   --  : gt10sc4 (Integer)
           3013 => ( Parameter_Integer, 0 ),   --  : gt10sc5 (Integer)
           3014 => ( Parameter_Integer, 0 ),   --  : gt10sc6 (Integer)
           3015 => ( Parameter_Integer, 0 ),   --  : gt10sc7 (Integer)
           3016 => ( Parameter_Integer, 0 ),   --  : gt10sc8 (Integer)
           3017 => ( Parameter_Integer, 0 ),   --  : gt20sc1 (Integer)
           3018 => ( Parameter_Integer, 0 ),   --  : gt20sc2 (Integer)
           3019 => ( Parameter_Integer, 0 ),   --  : gt20sc3 (Integer)
           3020 => ( Parameter_Integer, 0 ),   --  : gt20sc4 (Integer)
           3021 => ( Parameter_Integer, 0 ),   --  : gt20sc5 (Integer)
           3022 => ( Parameter_Integer, 0 ),   --  : gt20sc6 (Integer)
           3023 => ( Parameter_Integer, 0 ),   --  : gt20sc7 (Integer)
           3024 => ( Parameter_Integer, 0 ),   --  : gt20sc8 (Integer)
           3025 => ( Parameter_Integer, 0 ),   --  : hartvc1 (Integer)
           3026 => ( Parameter_Integer, 0 ),   --  : hartvc2 (Integer)
           3027 => ( Parameter_Integer, 0 ),   --  : hartvc3 (Integer)
           3028 => ( Parameter_Integer, 0 ),   --  : hartvc4 (Integer)
           3029 => ( Parameter_Integer, 0 ),   --  : hartvc5 (Integer)
           3030 => ( Parameter_Integer, 0 ),   --  : hartvc6 (Integer)
           3031 => ( Parameter_Integer, 0 ),   --  : hartvc7 (Integer)
           3032 => ( Parameter_Integer, 0 ),   --  : hartvc8 (Integer)
           3033 => ( Parameter_Integer, 0 ),   --  : heatchc1 (Integer)
           3034 => ( Parameter_Integer, 0 ),   --  : heatchc2 (Integer)
           3035 => ( Parameter_Integer, 0 ),   --  : heatchc3 (Integer)
           3036 => ( Parameter_Integer, 0 ),   --  : heatchc4 (Integer)
           3037 => ( Parameter_Integer, 0 ),   --  : heatchc5 (Integer)
           3038 => ( Parameter_Integer, 0 ),   --  : heatchc6 (Integer)
           3039 => ( Parameter_Integer, 0 ),   --  : heatchc7 (Integer)
           3040 => ( Parameter_Integer, 0 ),   --  : heatchc8 (Integer)
           3041 => ( Parameter_Integer, 0 ),   --  : hhldrc1 (Integer)
           3042 => ( Parameter_Integer, 0 ),   --  : hhldrc2 (Integer)
           3043 => ( Parameter_Integer, 0 ),   --  : hhldrc3 (Integer)
           3044 => ( Parameter_Integer, 0 ),   --  : hhldrc4 (Integer)
           3045 => ( Parameter_Integer, 0 ),   --  : hhldrc5 (Integer)
           3046 => ( Parameter_Integer, 0 ),   --  : hhldrc6 (Integer)
           3047 => ( Parameter_Integer, 0 ),   --  : hhldrc7 (Integer)
           3048 => ( Parameter_Integer, 0 ),   --  : hhldrc8 (Integer)
           3049 => ( Parameter_Integer, 0 ),   --  : hurabc1 (Integer)
           3050 => ( Parameter_Integer, 0 ),   --  : hurabc2 (Integer)
           3051 => ( Parameter_Integer, 0 ),   --  : hurabc3 (Integer)
           3052 => ( Parameter_Integer, 0 ),   --  : hurabc4 (Integer)
           3053 => ( Parameter_Integer, 0 ),   --  : hurabc5 (Integer)
           3054 => ( Parameter_Integer, 0 ),   --  : hurabc6 (Integer)
           3055 => ( Parameter_Integer, 0 ),   --  : hurabc7 (Integer)
           3056 => ( Parameter_Integer, 0 ),   --  : hurabc8 (Integer)
           3057 => ( Parameter_Integer, 0 ),   --  : hurahc1 (Integer)
           3058 => ( Parameter_Integer, 0 ),   --  : hurahc2 (Integer)
           3059 => ( Parameter_Integer, 0 ),   --  : hurahc3 (Integer)
           3060 => ( Parameter_Integer, 0 ),   --  : hurahc4 (Integer)
           3061 => ( Parameter_Integer, 0 ),   --  : hurahc5 (Integer)
           3062 => ( Parameter_Integer, 0 ),   --  : hurahc6 (Integer)
           3063 => ( Parameter_Integer, 0 ),   --  : hurahc7 (Integer)
           3064 => ( Parameter_Integer, 0 ),   --  : hurahc8 (Integer)
           3065 => ( Parameter_Integer, 0 ),   --  : hurcbc1 (Integer)
           3066 => ( Parameter_Integer, 0 ),   --  : hurcbc2 (Integer)
           3067 => ( Parameter_Integer, 0 ),   --  : hurcbc3 (Integer)
           3068 => ( Parameter_Integer, 0 ),   --  : hurcbc4 (Integer)
           3069 => ( Parameter_Integer, 0 ),   --  : hurcbc5 (Integer)
           3070 => ( Parameter_Integer, 0 ),   --  : hurcbc6 (Integer)
           3071 => ( Parameter_Integer, 0 ),   --  : hurcbc7 (Integer)
           3072 => ( Parameter_Integer, 0 ),   --  : hurcbc8 (Integer)
           3073 => ( Parameter_Integer, 0 ),   --  : hurchc1 (Integer)
           3074 => ( Parameter_Integer, 0 ),   --  : hurchc2 (Integer)
           3075 => ( Parameter_Integer, 0 ),   --  : hurchc3 (Integer)
           3076 => ( Parameter_Integer, 0 ),   --  : hurchc4 (Integer)
           3077 => ( Parameter_Integer, 0 ),   --  : hurchc5 (Integer)
           3078 => ( Parameter_Integer, 0 ),   --  : hurchc6 (Integer)
           3079 => ( Parameter_Integer, 0 ),   --  : hurchc7 (Integer)
           3080 => ( Parameter_Integer, 0 ),   --  : hurchc8 (Integer)
           3081 => ( Parameter_Integer, 0 ),   --  : hurclc1 (Integer)
           3082 => ( Parameter_Integer, 0 ),   --  : hurclc2 (Integer)
           3083 => ( Parameter_Integer, 0 ),   --  : hurclc3 (Integer)
           3084 => ( Parameter_Integer, 0 ),   --  : hurclc4 (Integer)
           3085 => ( Parameter_Integer, 0 ),   --  : hurclc5 (Integer)
           3086 => ( Parameter_Integer, 0 ),   --  : hurclc6 (Integer)
           3087 => ( Parameter_Integer, 0 ),   --  : hurclc7 (Integer)
           3088 => ( Parameter_Integer, 0 ),   --  : hurclc8 (Integer)
           3089 => ( Parameter_Integer, 0 ),   --  : hurfrc1 (Integer)
           3090 => ( Parameter_Integer, 0 ),   --  : hurfrc2 (Integer)
           3091 => ( Parameter_Integer, 0 ),   --  : hurfrc3 (Integer)
           3092 => ( Parameter_Integer, 0 ),   --  : hurfrc4 (Integer)
           3093 => ( Parameter_Integer, 0 ),   --  : hurfrc5 (Integer)
           3094 => ( Parameter_Integer, 0 ),   --  : hurfrc6 (Integer)
           3095 => ( Parameter_Integer, 0 ),   --  : hurfrc7 (Integer)
           3096 => ( Parameter_Integer, 0 ),   --  : hurfrc8 (Integer)
           3097 => ( Parameter_Integer, 0 ),   --  : hurotc1 (Integer)
           3098 => ( Parameter_Integer, 0 ),   --  : hurotc2 (Integer)
           3099 => ( Parameter_Integer, 0 ),   --  : hurotc3 (Integer)
           3100 => ( Parameter_Integer, 0 ),   --  : hurotc4 (Integer)
           3101 => ( Parameter_Integer, 0 ),   --  : hurotc5 (Integer)
           3102 => ( Parameter_Integer, 0 ),   --  : hurotc6 (Integer)
           3103 => ( Parameter_Integer, 0 ),   --  : hurotc7 (Integer)
           3104 => ( Parameter_Integer, 0 ),   --  : hurotc8 (Integer)
           3105 => ( Parameter_Integer, 0 ),   --  : hurrec1 (Integer)
           3106 => ( Parameter_Integer, 0 ),   --  : hurrec2 (Integer)
           3107 => ( Parameter_Integer, 0 ),   --  : hurrec3 (Integer)
           3108 => ( Parameter_Integer, 0 ),   --  : hurrec4 (Integer)
           3109 => ( Parameter_Integer, 0 ),   --  : hurrec5 (Integer)
           3110 => ( Parameter_Integer, 0 ),   --  : hurrec6 (Integer)
           3111 => ( Parameter_Integer, 0 ),   --  : hurrec7 (Integer)
           3112 => ( Parameter_Integer, 0 ),   --  : hurrec8 (Integer)
           3113 => ( Parameter_Integer, 0 ),   --  : hpersc1 (Integer)
           3114 => ( Parameter_Integer, 0 ),   --  : hpersc2 (Integer)
           3115 => ( Parameter_Integer, 0 ),   --  : hpersc3 (Integer)
           3116 => ( Parameter_Integer, 0 ),   --  : hpersc4 (Integer)
           3117 => ( Parameter_Integer, 0 ),   --  : hpersc5 (Integer)
           3118 => ( Parameter_Integer, 0 ),   --  : hpersc6 (Integer)
           3119 => ( Parameter_Integer, 0 ),   --  : hpersc7 (Integer)
           3120 => ( Parameter_Integer, 0 ),   --  : hpersc8 (Integer)
           3121 => ( Parameter_Integer, 0 ),   --  : hrsedc1 (Integer)
           3122 => ( Parameter_Integer, 0 ),   --  : hrsedc2 (Integer)
           3123 => ( Parameter_Integer, 0 ),   --  : hrsedc3 (Integer)
           3124 => ( Parameter_Integer, 0 ),   --  : hrsedc4 (Integer)
           3125 => ( Parameter_Integer, 0 ),   --  : hrsedc5 (Integer)
           3126 => ( Parameter_Integer, 0 ),   --  : hrsedc6 (Integer)
           3127 => ( Parameter_Integer, 0 ),   --  : hrsedc7 (Integer)
           3128 => ( Parameter_Integer, 0 ),   --  : hrsedc8 (Integer)
           3129 => ( Parameter_Integer, 0 ),   --  : hsvprc1 (Integer)
           3130 => ( Parameter_Integer, 0 ),   --  : hsvprc2 (Integer)
           3131 => ( Parameter_Integer, 0 ),   --  : hsvprc3 (Integer)
           3132 => ( Parameter_Integer, 0 ),   --  : hsvprc4 (Integer)
           3133 => ( Parameter_Integer, 0 ),   --  : hsvprc5 (Integer)
           3134 => ( Parameter_Integer, 0 ),   --  : hsvprc6 (Integer)
           3135 => ( Parameter_Integer, 0 ),   --  : hsvprc7 (Integer)
           3136 => ( Parameter_Integer, 0 ),   --  : hsvprc8 (Integer)
           3137 => ( Parameter_Integer, 0 ),   --  : laregc1 (Integer)
           3138 => ( Parameter_Integer, 0 ),   --  : laregc2 (Integer)
           3139 => ( Parameter_Integer, 0 ),   --  : laregc3 (Integer)
           3140 => ( Parameter_Integer, 0 ),   --  : laregc4 (Integer)
           3141 => ( Parameter_Integer, 0 ),   --  : laregc5 (Integer)
           3142 => ( Parameter_Integer, 0 ),   --  : laregc6 (Integer)
           3143 => ( Parameter_Integer, 0 ),   --  : laregc7 (Integer)
           3144 => ( Parameter_Integer, 0 ),   --  : laregc8 (Integer)
           3145 => ( Parameter_Integer, 0 ),   --  : msc1 (Integer)
           3146 => ( Parameter_Integer, 0 ),   --  : msc2 (Integer)
           3147 => ( Parameter_Integer, 0 ),   --  : msc3 (Integer)
           3148 => ( Parameter_Integer, 0 ),   --  : msc4 (Integer)
           3149 => ( Parameter_Integer, 0 ),   --  : msc5 (Integer)
           3150 => ( Parameter_Integer, 0 ),   --  : msc6 (Integer)
           3151 => ( Parameter_Integer, 0 ),   --  : msc7 (Integer)
           3152 => ( Parameter_Integer, 0 ),   --  : msc8 (Integer)
           3153 => ( Parameter_Integer, 0 ),   --  : prsonc1 (Integer)
           3154 => ( Parameter_Integer, 0 ),   --  : prsonc2 (Integer)
           3155 => ( Parameter_Integer, 0 ),   --  : prsonc3 (Integer)
           3156 => ( Parameter_Integer, 0 ),   --  : prsonc4 (Integer)
           3157 => ( Parameter_Integer, 0 ),   --  : prsonc5 (Integer)
           3158 => ( Parameter_Integer, 0 ),   --  : prsonc6 (Integer)
           3159 => ( Parameter_Integer, 0 ),   --  : prsonc7 (Integer)
           3160 => ( Parameter_Integer, 0 ),   --  : prsonc8 (Integer)
           3161 => ( Parameter_Integer, 0 ),   --  : rlp1c1 (Integer)
           3162 => ( Parameter_Integer, 0 ),   --  : rlp1c2 (Integer)
           3163 => ( Parameter_Integer, 0 ),   --  : rlp1c3 (Integer)
           3164 => ( Parameter_Integer, 0 ),   --  : rlp1c4 (Integer)
           3165 => ( Parameter_Integer, 0 ),   --  : rlp1c5 (Integer)
           3166 => ( Parameter_Integer, 0 ),   --  : rlp1c6 (Integer)
           3167 => ( Parameter_Integer, 0 ),   --  : rlp1c7 (Integer)
           3168 => ( Parameter_Integer, 0 ),   --  : rlp1c8 (Integer)
           3169 => ( Parameter_Integer, 0 ),   --  : rlp2c1 (Integer)
           3170 => ( Parameter_Integer, 0 ),   --  : rlp2c2 (Integer)
           3171 => ( Parameter_Integer, 0 ),   --  : rlp2c3 (Integer)
           3172 => ( Parameter_Integer, 0 ),   --  : rlp2c4 (Integer)
           3173 => ( Parameter_Integer, 0 ),   --  : rlp2c5 (Integer)
           3174 => ( Parameter_Integer, 0 ),   --  : rlp2c6 (Integer)
           3175 => ( Parameter_Integer, 0 ),   --  : rlp2c7 (Integer)
           3176 => ( Parameter_Integer, 0 ),   --  : rlp2c8 (Integer)
           3177 => ( Parameter_Integer, 0 ),   --  : rlp3c1 (Integer)
           3178 => ( Parameter_Integer, 0 ),   --  : rlp3c2 (Integer)
           3179 => ( Parameter_Integer, 0 ),   --  : rlp3c3 (Integer)
           3180 => ( Parameter_Integer, 0 ),   --  : rlp3c4 (Integer)
           3181 => ( Parameter_Integer, 0 ),   --  : rlp3c5 (Integer)
           3182 => ( Parameter_Integer, 0 ),   --  : rlp3c6 (Integer)
           3183 => ( Parameter_Integer, 0 ),   --  : rlp3c7 (Integer)
           3184 => ( Parameter_Integer, 0 ),   --  : rlp3c8 (Integer)
           3185 => ( Parameter_Integer, 0 ),   --  : rlp4c1 (Integer)
           3186 => ( Parameter_Integer, 0 ),   --  : rlp4c2 (Integer)
           3187 => ( Parameter_Integer, 0 ),   --  : rlp4c3 (Integer)
           3188 => ( Parameter_Integer, 0 ),   --  : rlp4c4 (Integer)
           3189 => ( Parameter_Integer, 0 ),   --  : rlp4c5 (Integer)
           3190 => ( Parameter_Integer, 0 ),   --  : rlp4c6 (Integer)
           3191 => ( Parameter_Integer, 0 ),   --  : rlp4c7 (Integer)
           3192 => ( Parameter_Integer, 0 ),   --  : rlp4c8 (Integer)
           3193 => ( Parameter_Integer, 0 ),   --  : rlp5c1 (Integer)
           3194 => ( Parameter_Integer, 0 ),   --  : rlp5c2 (Integer)
           3195 => ( Parameter_Integer, 0 ),   --  : rlp5c3 (Integer)
           3196 => ( Parameter_Integer, 0 ),   --  : rlp5c4 (Integer)
           3197 => ( Parameter_Integer, 0 ),   --  : rlp5c5 (Integer)
           3198 => ( Parameter_Integer, 0 ),   --  : rlp5c6 (Integer)
           3199 => ( Parameter_Integer, 0 ),   --  : rlp5c7 (Integer)
           3200 => ( Parameter_Integer, 0 ),   --  : rlp5c8 (Integer)
           3201 => ( Parameter_Integer, 0 ),   --  : rlp6c1 (Integer)
           3202 => ( Parameter_Integer, 0 ),   --  : rlp6c2 (Integer)
           3203 => ( Parameter_Integer, 0 ),   --  : rlp6c3 (Integer)
           3204 => ( Parameter_Integer, 0 ),   --  : rlp6c4 (Integer)
           3205 => ( Parameter_Integer, 0 ),   --  : rlp6c5 (Integer)
           3206 => ( Parameter_Integer, 0 ),   --  : rlp6c6 (Integer)
           3207 => ( Parameter_Integer, 0 ),   --  : rlp6c7 (Integer)
           3208 => ( Parameter_Integer, 0 ),   --  : rlp6c8 (Integer)
           3209 => ( Parameter_Integer, 0 ),   --  : rlp7c1 (Integer)
           3210 => ( Parameter_Integer, 0 ),   --  : rlp7c2 (Integer)
           3211 => ( Parameter_Integer, 0 ),   --  : rlp7c3 (Integer)
           3212 => ( Parameter_Integer, 0 ),   --  : rlp7c4 (Integer)
           3213 => ( Parameter_Integer, 0 ),   --  : rlp7c5 (Integer)
           3214 => ( Parameter_Integer, 0 ),   --  : rlp7c6 (Integer)
           3215 => ( Parameter_Integer, 0 ),   --  : rlp7c7 (Integer)
           3216 => ( Parameter_Integer, 0 ),   --  : rlp7c8 (Integer)
           3217 => ( Parameter_Integer, 0 ),   --  : rlp8c1 (Integer)
           3218 => ( Parameter_Integer, 0 ),   --  : rlp8c2 (Integer)
           3219 => ( Parameter_Integer, 0 ),   --  : rlp8c3 (Integer)
           3220 => ( Parameter_Integer, 0 ),   --  : rlp8c4 (Integer)
           3221 => ( Parameter_Integer, 0 ),   --  : rlp8c5 (Integer)
           3222 => ( Parameter_Integer, 0 ),   --  : rlp8c6 (Integer)
           3223 => ( Parameter_Integer, 0 ),   --  : rlp8c7 (Integer)
           3224 => ( Parameter_Integer, 0 ),   --  : rlp8c8 (Integer)
           3225 => ( Parameter_Integer, 0 ),   --  : rlp9c1 (Integer)
           3226 => ( Parameter_Integer, 0 ),   --  : rlp9c2 (Integer)
           3227 => ( Parameter_Integer, 0 ),   --  : rlp9c3 (Integer)
           3228 => ( Parameter_Integer, 0 ),   --  : rlp9c4 (Integer)
           3229 => ( Parameter_Integer, 0 ),   --  : rlp9c5 (Integer)
           3230 => ( Parameter_Integer, 0 ),   --  : rlp9c6 (Integer)
           3231 => ( Parameter_Integer, 0 ),   --  : rlp9c7 (Integer)
           3232 => ( Parameter_Integer, 0 ),   --  : rlp9c8 (Integer)
           3233 => ( Parameter_Integer, 0 ),   --  : rlp10c1 (Integer)
           3234 => ( Parameter_Integer, 0 ),   --  : rlp10c2 (Integer)
           3235 => ( Parameter_Integer, 0 ),   --  : rlp10c3 (Integer)
           3236 => ( Parameter_Integer, 0 ),   --  : rlp10c4 (Integer)
           3237 => ( Parameter_Integer, 0 ),   --  : rlp10c5 (Integer)
           3238 => ( Parameter_Integer, 0 ),   --  : rlp10c6 (Integer)
           3239 => ( Parameter_Integer, 0 ),   --  : rlp10c7 (Integer)
           3240 => ( Parameter_Integer, 0 ),   --  : rlp10c8 (Integer)
           3241 => ( Parameter_Integer, 0 ),   --  : rlp11c1 (Integer)
           3242 => ( Parameter_Integer, 0 ),   --  : rlp11c2 (Integer)
           3243 => ( Parameter_Integer, 0 ),   --  : rlp11c3 (Integer)
           3244 => ( Parameter_Integer, 0 ),   --  : rlp11c4 (Integer)
           3245 => ( Parameter_Integer, 0 ),   --  : rlp11c5 (Integer)
           3246 => ( Parameter_Integer, 0 ),   --  : rlp11c6 (Integer)
           3247 => ( Parameter_Integer, 0 ),   --  : rlp11c7 (Integer)
           3248 => ( Parameter_Integer, 0 ),   --  : rlp11c8 (Integer)
           3249 => ( Parameter_Integer, 0 ),   --  : rlp12c1 (Integer)
           3250 => ( Parameter_Integer, 0 ),   --  : rlp12c2 (Integer)
           3251 => ( Parameter_Integer, 0 ),   --  : rlp12c3 (Integer)
           3252 => ( Parameter_Integer, 0 ),   --  : rlp12c4 (Integer)
           3253 => ( Parameter_Integer, 0 ),   --  : rlp12c5 (Integer)
           3254 => ( Parameter_Integer, 0 ),   --  : rlp12c6 (Integer)
           3255 => ( Parameter_Integer, 0 ),   --  : rlp12c7 (Integer)
           3256 => ( Parameter_Integer, 0 ),   --  : rlp12c8 (Integer)
           3257 => ( Parameter_Integer, 0 ),   --  : rlp13c1 (Integer)
           3258 => ( Parameter_Integer, 0 ),   --  : rlp13c2 (Integer)
           3259 => ( Parameter_Integer, 0 ),   --  : rlp13c3 (Integer)
           3260 => ( Parameter_Integer, 0 ),   --  : rlp13c4 (Integer)
           3261 => ( Parameter_Integer, 0 ),   --  : rlp13c5 (Integer)
           3262 => ( Parameter_Integer, 0 ),   --  : rlp13c6 (Integer)
           3263 => ( Parameter_Integer, 0 ),   --  : rlp13c7 (Integer)
           3264 => ( Parameter_Integer, 0 ),   --  : rlp13c8 (Integer)
           3265 => ( Parameter_Integer, 0 ),   --  : rlp14c1 (Integer)
           3266 => ( Parameter_Integer, 0 ),   --  : rlp14c2 (Integer)
           3267 => ( Parameter_Integer, 0 ),   --  : rlp14c3 (Integer)
           3268 => ( Parameter_Integer, 0 ),   --  : rlp14c4 (Integer)
           3269 => ( Parameter_Integer, 0 ),   --  : rlp14c5 (Integer)
           3270 => ( Parameter_Integer, 0 ),   --  : rlp14c6 (Integer)
           3271 => ( Parameter_Integer, 0 ),   --  : rlp14c7 (Integer)
           3272 => ( Parameter_Integer, 0 ),   --  : rlp14c8 (Integer)
           3273 => ( Parameter_Integer, 0 ),   --  : rhrpcc1 (Integer)
           3274 => ( Parameter_Integer, 0 ),   --  : rhrpcc2 (Integer)
           3275 => ( Parameter_Integer, 0 ),   --  : rhrpcc3 (Integer)
           3276 => ( Parameter_Integer, 0 ),   --  : rhrpcc4 (Integer)
           3277 => ( Parameter_Integer, 0 ),   --  : rhrpcc5 (Integer)
           3278 => ( Parameter_Integer, 0 ),   --  : rhrpcc6 (Integer)
           3279 => ( Parameter_Integer, 0 ),   --  : rhrpcc7 (Integer)
           3280 => ( Parameter_Integer, 0 ),   --  : rhrpcc8 (Integer)
           3281 => ( Parameter_Integer, 0 ),   --  : sbkitc1 (Integer)
           3282 => ( Parameter_Integer, 0 ),   --  : sbkitc2 (Integer)
           3283 => ( Parameter_Integer, 0 ),   --  : sbkitc3 (Integer)
           3284 => ( Parameter_Integer, 0 ),   --  : sbkitc4 (Integer)
           3285 => ( Parameter_Integer, 0 ),   --  : sbkitc5 (Integer)
           3286 => ( Parameter_Integer, 0 ),   --  : sbkitc6 (Integer)
           3287 => ( Parameter_Integer, 0 ),   --  : sbkitc7 (Integer)
           3288 => ( Parameter_Integer, 0 ),   --  : sbkitc8 (Integer)
           3289 => ( Parameter_Integer, 0 ),   --  : sexc1 (Integer)
           3290 => ( Parameter_Integer, 0 ),   --  : sexc2 (Integer)
           3291 => ( Parameter_Integer, 0 ),   --  : sexc3 (Integer)
           3292 => ( Parameter_Integer, 0 ),   --  : sexc4 (Integer)
           3293 => ( Parameter_Integer, 0 ),   --  : sexc5 (Integer)
           3294 => ( Parameter_Integer, 0 ),   --  : sexc6 (Integer)
           3295 => ( Parameter_Integer, 0 ),   --  : sexc7 (Integer)
           3296 => ( Parameter_Integer, 0 ),   --  : sexc8 (Integer)
           3297 => ( Parameter_Integer, 0 ),   --  : sfvitc1 (Integer)
           3298 => ( Parameter_Integer, 0 ),   --  : sfvitc2 (Integer)
           3299 => ( Parameter_Integer, 0 ),   --  : sfvitc3 (Integer)
           3300 => ( Parameter_Integer, 0 ),   --  : sfvitc4 (Integer)
           3301 => ( Parameter_Integer, 0 ),   --  : sfvitc5 (Integer)
           3302 => ( Parameter_Integer, 0 ),   --  : sfvitc6 (Integer)
           3303 => ( Parameter_Integer, 0 ),   --  : sfvitc7 (Integer)
           3304 => ( Parameter_Integer, 0 ),   --  : sfvitc8 (Integer)
           3305 => ( Parameter_Integer, 0 ),   --  : fmctsc1 (Integer)
           3306 => ( Parameter_Integer, 0 ),   --  : fmctsc2 (Integer)
           3307 => ( Parameter_Integer, 0 ),   --  : fmctsc3 (Integer)
           3308 => ( Parameter_Integer, 0 ),   --  : fmctsc4 (Integer)
           3309 => ( Parameter_Integer, 0 ),   --  : fmctsc5 (Integer)
           3310 => ( Parameter_Integer, 0 ),   --  : fmctsc6 (Integer)
           3311 => ( Parameter_Integer, 0 ),   --  : fmctsc7 (Integer)
           3312 => ( Parameter_Integer, 0 ),   --  : fmctsc8 (Integer)
           3313 => ( Parameter_Integer, 0 ),   --  : fmealc1 (Integer)
           3314 => ( Parameter_Integer, 0 ),   --  : fmealc2 (Integer)
           3315 => ( Parameter_Integer, 0 ),   --  : fmealc3 (Integer)
           3316 => ( Parameter_Integer, 0 ),   --  : fmealc4 (Integer)
           3317 => ( Parameter_Integer, 0 ),   --  : fmealc5 (Integer)
           3318 => ( Parameter_Integer, 0 ),   --  : fmealc6 (Integer)
           3319 => ( Parameter_Integer, 0 ),   --  : fmealc7 (Integer)
           3320 => ( Parameter_Integer, 0 ),   --  : fmealc8 (Integer)
           3321 => ( Parameter_Integer, 0 ),   --  : cblndc1 (Integer)
           3322 => ( Parameter_Integer, 0 ),   --  : cblndc2 (Integer)
           3323 => ( Parameter_Integer, 0 ),   --  : cblndc3 (Integer)
           3324 => ( Parameter_Integer, 0 ),   --  : cblndc4 (Integer)
           3325 => ( Parameter_Integer, 0 ),   --  : cblndc5 (Integer)
           3326 => ( Parameter_Integer, 0 ),   --  : cblndc6 (Integer)
           3327 => ( Parameter_Integer, 0 ),   --  : cblndc7 (Integer)
           3328 => ( Parameter_Integer, 0 ),   --  : cblndc8 (Integer)
           3329 => ( Parameter_Integer, 0 ),   --  : cparsc1 (Integer)
           3330 => ( Parameter_Integer, 0 ),   --  : cparsc2 (Integer)
           3331 => ( Parameter_Integer, 0 ),   --  : cparsc3 (Integer)
           3332 => ( Parameter_Integer, 0 ),   --  : cparsc4 (Integer)
           3333 => ( Parameter_Integer, 0 ),   --  : cparsc5 (Integer)
           3334 => ( Parameter_Integer, 0 ),   --  : cparsc6 (Integer)
           3335 => ( Parameter_Integer, 0 ),   --  : cparsc7 (Integer)
           3336 => ( Parameter_Integer, 0 ),   --  : cparsc8 (Integer)
           3337 => ( Parameter_Integer, 0 ),   --  : cdeafc1 (Integer)
           3338 => ( Parameter_Integer, 0 ),   --  : cdeafc2 (Integer)
           3339 => ( Parameter_Integer, 0 ),   --  : cdeafc3 (Integer)
           3340 => ( Parameter_Integer, 0 ),   --  : cdeafc4 (Integer)
           3341 => ( Parameter_Integer, 0 ),   --  : cdeafc5 (Integer)
           3342 => ( Parameter_Integer, 0 ),   --  : cdeafc6 (Integer)
           3343 => ( Parameter_Integer, 0 ),   --  : cdeafc7 (Integer)
           3344 => ( Parameter_Integer, 0 ),   --  : cdeafc8 (Integer)
           3345 => ( Parameter_Integer, 0 ),   --  : totgtc1 (Integer)
           3346 => ( Parameter_Integer, 0 ),   --  : totgtc2 (Integer)
           3347 => ( Parameter_Integer, 0 ),   --  : totgtc3 (Integer)
           3348 => ( Parameter_Integer, 0 ),   --  : totgtc4 (Integer)
           3349 => ( Parameter_Integer, 0 ),   --  : totgtc5 (Integer)
           3350 => ( Parameter_Integer, 0 ),   --  : totgtc6 (Integer)
           3351 => ( Parameter_Integer, 0 ),   --  : totgtc7 (Integer)
           3352 => ( Parameter_Integer, 0 ),   --  : totgtc8 (Integer)
           3353 => ( Parameter_Integer, 0 ),   --  : totsvc1 (Integer)
           3354 => ( Parameter_Integer, 0 ),   --  : totsvc2 (Integer)
           3355 => ( Parameter_Integer, 0 ),   --  : totsvc3 (Integer)
           3356 => ( Parameter_Integer, 0 ),   --  : totsvc4 (Integer)
           3357 => ( Parameter_Integer, 0 ),   --  : totsvc5 (Integer)
           3358 => ( Parameter_Integer, 0 ),   --  : totsvc6 (Integer)
           3359 => ( Parameter_Integer, 0 ),   --  : totsvc7 (Integer)
           3360 => ( Parameter_Integer, 0 ),   --  : totsvc8 (Integer)
           3361 => ( Parameter_Float, 0.0 ),   --  : tacamc1 (Amount)
           3362 => ( Parameter_Float, 0.0 ),   --  : tacamc2 (Amount)
           3363 => ( Parameter_Float, 0.0 ),   --  : tacamc3 (Amount)
           3364 => ( Parameter_Float, 0.0 ),   --  : tacamc4 (Amount)
           3365 => ( Parameter_Float, 0.0 ),   --  : tacamc5 (Amount)
           3366 => ( Parameter_Float, 0.0 ),   --  : tacamc6 (Amount)
           3367 => ( Parameter_Integer, 0 ),   --  : tacamc7 (Integer)
           3368 => ( Parameter_Integer, 0 ),   --  : tacamc8 (Integer)
           3369 => ( Parameter_Integer, 0 ),   --  : tpeedc1 (Integer)
           3370 => ( Parameter_Integer, 0 ),   --  : tpeedc2 (Integer)
           3371 => ( Parameter_Integer, 0 ),   --  : tpeedc3 (Integer)
           3372 => ( Parameter_Integer, 0 ),   --  : tpeedc4 (Integer)
           3373 => ( Parameter_Integer, 0 ),   --  : tpeedc5 (Integer)
           3374 => ( Parameter_Integer, 0 ),   --  : tpeedc6 (Integer)
           3375 => ( Parameter_Integer, 0 ),   --  : tpeedc7 (Integer)
           3376 => ( Parameter_Integer, 0 ),   --  : tpeedc8 (Integer)
           3377 => ( Parameter_Integer, 0 ),   --  : uprsoc1 (Integer)
           3378 => ( Parameter_Integer, 0 ),   --  : uprsoc2 (Integer)
           3379 => ( Parameter_Integer, 0 ),   --  : uprsoc3 (Integer)
           3380 => ( Parameter_Integer, 0 ),   --  : uprsoc4 (Integer)
           3381 => ( Parameter_Integer, 0 ),   --  : uprsoc5 (Integer)
           3382 => ( Parameter_Integer, 0 ),   --  : uprsoc6 (Integer)
           3383 => ( Parameter_Integer, 0 ),   --  : uprsoc7 (Integer)
           3384 => ( Parameter_Integer, 0 ),   --  : uprsoc8 (Integer)
           3385 => ( Parameter_Integer, 0 ),   --  : govpy1hd (Integer)
           3386 => ( Parameter_Integer, 0 ),   --  : govpy2hd (Integer)
           3387 => ( Parameter_Integer, 0 ),   --  : govpy3hd (Integer)
           3388 => ( Parameter_Integer, 0 ),   --  : govpy4hd (Integer)
           3389 => ( Parameter_Integer, 0 ),   --  : govpy5hd (Integer)
           3390 => ( Parameter_Integer, 0 ),   --  : govpy6hd (Integer)
           3391 => ( Parameter_Integer, 0 ),   --  : govpy7hd (Integer)
           3392 => ( Parameter_Integer, 0 ),   --  : govpy8hd (Integer)
           3393 => ( Parameter_Integer, 0 ),   --  : govpy9hd (Integer)
           3394 => ( Parameter_Integer, 0 ),   --  : gvpy10hd (Integer)
           3395 => ( Parameter_Integer, 0 ),   --  : gvpy11hd (Integer)
           3396 => ( Parameter_Integer, 0 ),   --  : govpy1sp (Integer)
           3397 => ( Parameter_Integer, 0 ),   --  : govpy2sp (Integer)
           3398 => ( Parameter_Integer, 0 ),   --  : govpy3sp (Integer)
           3399 => ( Parameter_Integer, 0 ),   --  : govpy4sp (Integer)
           3400 => ( Parameter_Integer, 0 ),   --  : govpy5sp (Integer)
           3401 => ( Parameter_Integer, 0 ),   --  : govpy6sp (Integer)
           3402 => ( Parameter_Integer, 0 ),   --  : govpy7sp (Integer)
           3403 => ( Parameter_Integer, 0 ),   --  : govpy8sp (Integer)
           3404 => ( Parameter_Integer, 0 ),   --  : govpy9sp (Integer)
           3405 => ( Parameter_Integer, 0 ),   --  : gvpy10sp (Integer)
           3406 => ( Parameter_Integer, 0 ),   --  : gvpy11sp (Integer)
           3407 => ( Parameter_Float, 0.0 ),   --  : nhhamt1 (Amount)
           3408 => ( Parameter_Float, 0.0 ),   --  : nhhamt2 (Amount)
           3409 => ( Parameter_Float, 0.0 ),   --  : nhhamt3 (Amount)
           3410 => ( Parameter_Float, 0.0 ),   --  : nhhamt4 (Amount)
           3411 => ( Parameter_Integer, 0 ),   --  : nhhfee1 (Integer)
           3412 => ( Parameter_Integer, 0 ),   --  : nhhfee2 (Integer)
           3413 => ( Parameter_Integer, 0 ),   --  : nhhfee3 (Integer)
           3414 => ( Parameter_Integer, 0 ),   --  : nhhfee4 (Integer)
           3415 => ( Parameter_Integer, 0 ),   --  : pnhhamt1 (Integer)
           3416 => ( Parameter_Integer, 0 ),   --  : pnhhamt2 (Integer)
           3417 => ( Parameter_Integer, 0 ),   --  : pnhhamt3 (Integer)
           3418 => ( Parameter_Integer, 0 ),   --  : pnhhamt4 (Integer)
           3419 => ( Parameter_Float, 0.0 ),   --  : bona11hd (Amount)
           3420 => ( Parameter_Integer, 0 ),   --  : bona12hd (Integer)
           3421 => ( Parameter_Integer, 0 ),   --  : bona13hd (Integer)
           3422 => ( Parameter_Float, 0.0 ),   --  : bona11sp (Amount)
           3423 => ( Parameter_Integer, 0 ),   --  : bona12sp (Integer)
           3424 => ( Parameter_Integer, 0 ),   --  : bona13sp (Integer)
           3425 => ( Parameter_Float, 0.0 ),   --  : bona21hd (Amount)
           3426 => ( Parameter_Integer, 0 ),   --  : bona22hd (Integer)
           3427 => ( Parameter_Integer, 0 ),   --  : bona23hd (Integer)
           3428 => ( Parameter_Integer, 0 ),   --  : bona21sp (Integer)
           3429 => ( Parameter_Integer, 0 ),   --  : bona22sp (Integer)
           3430 => ( Parameter_Integer, 0 ),   --  : bona23sp (Integer)
           3431 => ( Parameter_Float, 0.0 ),   --  : bona31hd (Amount)
           3432 => ( Parameter_Integer, 0 ),   --  : bona32hd (Integer)
           3433 => ( Parameter_Integer, 0 ),   --  : bona33hd (Integer)
           3434 => ( Parameter_Integer, 0 ),   --  : bona31sp (Integer)
           3435 => ( Parameter_Integer, 0 ),   --  : bona32sp (Integer)
           3436 => ( Parameter_Integer, 0 ),   --  : bona33sp (Integer)
           3437 => ( Parameter_Float, 0.0 ),   --  : bona41hd (Amount)
           3438 => ( Parameter_Integer, 0 ),   --  : bona42hd (Integer)
           3439 => ( Parameter_Integer, 0 ),   --  : bona43hd (Integer)
           3440 => ( Parameter_Integer, 0 ),   --  : bona41sp (Integer)
           3441 => ( Parameter_Integer, 0 ),   --  : bona42sp (Integer)
           3442 => ( Parameter_Integer, 0 ),   --  : bona43sp (Integer)
           3443 => ( Parameter_Float, 0.0 ),   --  : bona51hd (Amount)
           3444 => ( Parameter_Integer, 0 ),   --  : bona52hd (Integer)
           3445 => ( Parameter_Integer, 0 ),   --  : bona53hd (Integer)
           3446 => ( Parameter_Integer, 0 ),   --  : bona51sp (Integer)
           3447 => ( Parameter_Integer, 0 ),   --  : bona52sp (Integer)
           3448 => ( Parameter_Integer, 0 ),   --  : bona53sp (Integer)
           3449 => ( Parameter_Float, 0.0 ),   --  : bona61hd (Amount)
           3450 => ( Parameter_Integer, 0 ),   --  : bona62hd (Integer)
           3451 => ( Parameter_Integer, 0 ),   --  : bona63hd (Integer)
           3452 => ( Parameter_Integer, 0 ),   --  : bona61sp (Integer)
           3453 => ( Parameter_Integer, 0 ),   --  : bona62sp (Integer)
           3454 => ( Parameter_Integer, 0 ),   --  : bona63sp (Integer)
           3455 => ( Parameter_Integer, 0 ),   --  : bont11hd (Integer)
           3456 => ( Parameter_Integer, 0 ),   --  : bont12hd (Integer)
           3457 => ( Parameter_Integer, 0 ),   --  : bont13hd (Integer)
           3458 => ( Parameter_Integer, 0 ),   --  : bont11sp (Integer)
           3459 => ( Parameter_Integer, 0 ),   --  : bont12sp (Integer)
           3460 => ( Parameter_Integer, 0 ),   --  : bont13sp (Integer)
           3461 => ( Parameter_Integer, 0 ),   --  : bont21hd (Integer)
           3462 => ( Parameter_Integer, 0 ),   --  : bont22hd (Integer)
           3463 => ( Parameter_Integer, 0 ),   --  : bont23hd (Integer)
           3464 => ( Parameter_Integer, 0 ),   --  : bont21sp (Integer)
           3465 => ( Parameter_Integer, 0 ),   --  : bont22sp (Integer)
           3466 => ( Parameter_Integer, 0 ),   --  : bont23sp (Integer)
           3467 => ( Parameter_Integer, 0 ),   --  : bont31hd (Integer)
           3468 => ( Parameter_Integer, 0 ),   --  : bont32hd (Integer)
           3469 => ( Parameter_Integer, 0 ),   --  : bont33hd (Integer)
           3470 => ( Parameter_Integer, 0 ),   --  : bont31sp (Integer)
           3471 => ( Parameter_Integer, 0 ),   --  : bont32sp (Integer)
           3472 => ( Parameter_Integer, 0 ),   --  : bont33sp (Integer)
           3473 => ( Parameter_Integer, 0 ),   --  : bont41hd (Integer)
           3474 => ( Parameter_Integer, 0 ),   --  : bont42hd (Integer)
           3475 => ( Parameter_Integer, 0 ),   --  : bont43hd (Integer)
           3476 => ( Parameter_Integer, 0 ),   --  : bont41sp (Integer)
           3477 => ( Parameter_Integer, 0 ),   --  : bont42sp (Integer)
           3478 => ( Parameter_Integer, 0 ),   --  : bont43sp (Integer)
           3479 => ( Parameter_Integer, 0 ),   --  : bont51hd (Integer)
           3480 => ( Parameter_Integer, 0 ),   --  : bont52hd (Integer)
           3481 => ( Parameter_Integer, 0 ),   --  : bont53hd (Integer)
           3482 => ( Parameter_Integer, 0 ),   --  : bont51sp (Integer)
           3483 => ( Parameter_Integer, 0 ),   --  : bont52sp (Integer)
           3484 => ( Parameter_Integer, 0 ),   --  : bont53sp (Integer)
           3485 => ( Parameter_Integer, 0 ),   --  : bont61hd (Integer)
           3486 => ( Parameter_Integer, 0 ),   --  : bont62hd (Integer)
           3487 => ( Parameter_Integer, 0 ),   --  : bont63hd (Integer)
           3488 => ( Parameter_Integer, 0 ),   --  : bont61sp (Integer)
           3489 => ( Parameter_Integer, 0 ),   --  : bont62sp (Integer)
           3490 => ( Parameter_Integer, 0 ),   --  : bont63sp (Integer)
           3491 => ( Parameter_Float, 0.0 ),   --  : btax11hd (Amount)
           3492 => ( Parameter_Float, 0.0 ),   --  : btax12hd (Amount)
           3493 => ( Parameter_Integer, 0 ),   --  : btax13hd (Integer)
           3494 => ( Parameter_Float, 0.0 ),   --  : btax11sp (Amount)
           3495 => ( Parameter_Integer, 0 ),   --  : btax12sp (Integer)
           3496 => ( Parameter_Integer, 0 ),   --  : btax13sp (Integer)
           3497 => ( Parameter_Float, 0.0 ),   --  : btax21hd (Amount)
           3498 => ( Parameter_Integer, 0 ),   --  : btax22hd (Integer)
           3499 => ( Parameter_Integer, 0 ),   --  : btax23hd (Integer)
           3500 => ( Parameter_Float, 0.0 ),   --  : btax21sp (Amount)
           3501 => ( Parameter_Integer, 0 ),   --  : btax22sp (Integer)
           3502 => ( Parameter_Integer, 0 ),   --  : btax23sp (Integer)
           3503 => ( Parameter_Float, 0.0 ),   --  : btax31hd (Amount)
           3504 => ( Parameter_Integer, 0 ),   --  : btax32hd (Integer)
           3505 => ( Parameter_Integer, 0 ),   --  : btax33hd (Integer)
           3506 => ( Parameter_Float, 0.0 ),   --  : btax31sp (Amount)
           3507 => ( Parameter_Integer, 0 ),   --  : btax32sp (Integer)
           3508 => ( Parameter_Integer, 0 ),   --  : btax33sp (Integer)
           3509 => ( Parameter_Float, 0.0 ),   --  : btax41hd (Amount)
           3510 => ( Parameter_Integer, 0 ),   --  : btax42hd (Integer)
           3511 => ( Parameter_Integer, 0 ),   --  : btax43hd (Integer)
           3512 => ( Parameter_Float, 0.0 ),   --  : btax41sp (Amount)
           3513 => ( Parameter_Integer, 0 ),   --  : btax42sp (Integer)
           3514 => ( Parameter_Integer, 0 ),   --  : btax43sp (Integer)
           3515 => ( Parameter_Float, 0.0 ),   --  : btax51hd (Amount)
           3516 => ( Parameter_Integer, 0 ),   --  : btax52hd (Integer)
           3517 => ( Parameter_Integer, 0 ),   --  : btax53hd (Integer)
           3518 => ( Parameter_Float, 0.0 ),   --  : btax51sp (Amount)
           3519 => ( Parameter_Integer, 0 ),   --  : btax52sp (Integer)
           3520 => ( Parameter_Integer, 0 ),   --  : btax53sp (Integer)
           3521 => ( Parameter_Float, 0.0 ),   --  : btax61hd (Amount)
           3522 => ( Parameter_Integer, 0 ),   --  : btax62hd (Integer)
           3523 => ( Parameter_Integer, 0 ),   --  : btax63hd (Integer)
           3524 => ( Parameter_Integer, 0 ),   --  : btax61sp (Integer)
           3525 => ( Parameter_Integer, 0 ),   --  : btax62sp (Integer)
           3526 => ( Parameter_Integer, 0 ),   --  : btax63sp (Integer)
           3527 => ( Parameter_Integer, 0 ),   --  : busac1hd (Integer)
           3528 => ( Parameter_Integer, 0 ),   --  : busac2hd (Integer)
           3529 => ( Parameter_Integer, 0 ),   --  : busac3hd (Integer)
           3530 => ( Parameter_Integer, 0 ),   --  : busac1sp (Integer)
           3531 => ( Parameter_Integer, 0 ),   --  : busac2sp (Integer)
           3532 => ( Parameter_Integer, 0 ),   --  : busac3sp (Integer)
           3533 => ( Parameter_Float, 0.0 ),   --  : caram1hd (Amount)
           3534 => ( Parameter_Integer, 0 ),   --  : caram2hd (Integer)
           3535 => ( Parameter_Integer, 0 ),   --  : caram3hd (Integer)
           3536 => ( Parameter_Float, 0.0 ),   --  : caram1sp (Amount)
           3537 => ( Parameter_Integer, 0 ),   --  : caram2sp (Integer)
           3538 => ( Parameter_Integer, 0 ),   --  : caram3sp (Integer)
           3539 => ( Parameter_Integer, 0 ),   --  : carcn1hd (Integer)
           3540 => ( Parameter_Integer, 0 ),   --  : carcn2hd (Integer)
           3541 => ( Parameter_Integer, 0 ),   --  : carcn3hd (Integer)
           3542 => ( Parameter_Integer, 0 ),   --  : carcn1sp (Integer)
           3543 => ( Parameter_Integer, 0 ),   --  : carcn2sp (Integer)
           3544 => ( Parameter_Integer, 0 ),   --  : carcn3sp (Integer)
           3545 => ( Parameter_Integer, 0 ),   --  : carvl1hd (Integer)
           3546 => ( Parameter_Integer, 0 ),   --  : carvl2hd (Integer)
           3547 => ( Parameter_Integer, 0 ),   --  : carvl3hd (Integer)
           3548 => ( Parameter_Integer, 0 ),   --  : carvl1sp (Integer)
           3549 => ( Parameter_Integer, 0 ),   --  : carvl2sp (Integer)
           3550 => ( Parameter_Integer, 0 ),   --  : carvl3sp (Integer)
           3551 => ( Parameter_Integer, 0 ),   --  : chktx1hd (Integer)
           3552 => ( Parameter_Integer, 0 ),   --  : chktx2hd (Integer)
           3553 => ( Parameter_Integer, 0 ),   --  : chktx3hd (Integer)
           3554 => ( Parameter_Integer, 0 ),   --  : chktx1sp (Integer)
           3555 => ( Parameter_Integer, 0 ),   --  : chktx2sp (Integer)
           3556 => ( Parameter_Integer, 0 ),   --  : chktx3sp (Integer)
           3557 => ( Parameter_Integer, 0 ),   --  : chcom1hd (Integer)
           3558 => ( Parameter_Integer, 0 ),   --  : chcom2hd (Integer)
           3559 => ( Parameter_Integer, 0 ),   --  : chcom3hd (Integer)
           3560 => ( Parameter_Integer, 0 ),   --  : chcom1sp (Integer)
           3561 => ( Parameter_Integer, 0 ),   --  : chcom2sp (Integer)
           3562 => ( Parameter_Integer, 0 ),   --  : chcom3sp (Integer)
           3563 => ( Parameter_Float, 0.0 ),   --  : chvam1hd (Amount)
           3564 => ( Parameter_Integer, 0 ),   --  : chvam2hd (Integer)
           3565 => ( Parameter_Integer, 0 ),   --  : chvam3hd (Integer)
           3566 => ( Parameter_Float, 0.0 ),   --  : chvam1sp (Amount)
           3567 => ( Parameter_Float, 0.0 ),   --  : chvam2sp (Amount)
           3568 => ( Parameter_Integer, 0 ),   --  : chvam3sp (Integer)
           3569 => ( Parameter_Integer, 0 ),   --  : chvpd1hd (Integer)
           3570 => ( Parameter_Integer, 0 ),   --  : chvpd2hd (Integer)
           3571 => ( Parameter_Integer, 0 ),   --  : chvpd3hd (Integer)
           3572 => ( Parameter_Integer, 0 ),   --  : chvpd1sp (Integer)
           3573 => ( Parameter_Integer, 0 ),   --  : chvpd2sp (Integer)
           3574 => ( Parameter_Integer, 0 ),   --  : chvpd3sp (Integer)
           3575 => ( Parameter_Integer, 0 ),   --  : chsac1hd (Integer)
           3576 => ( Parameter_Integer, 0 ),   --  : chsac2hd (Integer)
           3577 => ( Parameter_Integer, 0 ),   --  : chsac3hd (Integer)
           3578 => ( Parameter_Integer, 0 ),   --  : chsac1sp (Integer)
           3579 => ( Parameter_Integer, 0 ),   --  : chsac2sp (Integer)
           3580 => ( Parameter_Integer, 0 ),   --  : chsac3sp (Integer)
           3581 => ( Parameter_Integer, 0 ),   --  : chuam1hd (Integer)
           3582 => ( Parameter_Integer, 0 ),   --  : chuam2hd (Integer)
           3583 => ( Parameter_Integer, 0 ),   --  : chuam3hd (Integer)
           3584 => ( Parameter_Integer, 0 ),   --  : chuam1sp (Integer)
           3585 => ( Parameter_Integer, 0 ),   --  : chuam2sp (Integer)
           3586 => ( Parameter_Integer, 0 ),   --  : chuam3sp (Integer)
           3587 => ( Parameter_Integer, 0 ),   --  : chupd1hd (Integer)
           3588 => ( Parameter_Integer, 0 ),   --  : chupd2hd (Integer)
           3589 => ( Parameter_Integer, 0 ),   --  : chupd3hd (Integer)
           3590 => ( Parameter_Integer, 0 ),   --  : chupd1sp (Integer)
           3591 => ( Parameter_Integer, 0 ),   --  : chupd2sp (Integer)
           3592 => ( Parameter_Integer, 0 ),   --  : chupd3sp (Integer)
           3593 => ( Parameter_Integer, 0 ),   --  : chusu1hd (Integer)
           3594 => ( Parameter_Integer, 0 ),   --  : chusu2hd (Integer)
           3595 => ( Parameter_Integer, 0 ),   --  : chusu3hd (Integer)
           3596 => ( Parameter_Integer, 0 ),   --  : chusu1sp (Integer)
           3597 => ( Parameter_Integer, 0 ),   --  : chusu2sp (Integer)
           3598 => ( Parameter_Integer, 0 ),   --  : chusu3sp (Integer)
           3599 => ( Parameter_Float, 0.0 ),   --  : doth1hd (Amount)
           3600 => ( Parameter_Float, 0.0 ),   --  : doth2hd (Amount)
           3601 => ( Parameter_Integer, 0 ),   --  : doth3hd (Integer)
           3602 => ( Parameter_Float, 0.0 ),   --  : doth1sp (Amount)
           3603 => ( Parameter_Integer, 0 ),   --  : doth2sp (Integer)
           3604 => ( Parameter_Integer, 0 ),   --  : doth3sp (Integer)
           3605 => ( Parameter_Float, 0.0 ),   --  : dpen1hd (Amount)
           3606 => ( Parameter_Float, 0.0 ),   --  : dpen2hd (Amount)
           3607 => ( Parameter_Integer, 0 ),   --  : dpen3hd (Integer)
           3608 => ( Parameter_Float, 0.0 ),   --  : dpen1sp (Amount)
           3609 => ( Parameter_Float, 0.0 ),   --  : dpen2sp (Amount)
           3610 => ( Parameter_Integer, 0 ),   --  : dpen3sp (Integer)
           3611 => ( Parameter_Float, 0.0 ),   --  : davc1hd (Amount)
           3612 => ( Parameter_Integer, 0 ),   --  : davc2hd (Integer)
           3613 => ( Parameter_Integer, 0 ),   --  : davc3hd (Integer)
           3614 => ( Parameter_Float, 0.0 ),   --  : davc1sp (Amount)
           3615 => ( Parameter_Integer, 0 ),   --  : davc2sp (Integer)
           3616 => ( Parameter_Integer, 0 ),   --  : davc3sp (Integer)
           3617 => ( Parameter_Float, 0.0 ),   --  : dtuf1hd (Amount)
           3618 => ( Parameter_Float, 0.0 ),   --  : dtuf2hd (Amount)
           3619 => ( Parameter_Integer, 0 ),   --  : dtuf3hd (Integer)
           3620 => ( Parameter_Float, 0.0 ),   --  : dtuf1sp (Amount)
           3621 => ( Parameter_Float, 0.0 ),   --  : dtuf2sp (Amount)
           3622 => ( Parameter_Integer, 0 ),   --  : dtuf3sp (Integer)
           3623 => ( Parameter_Float, 0.0 ),   --  : dfrso1hd (Amount)
           3624 => ( Parameter_Integer, 0 ),   --  : dfrso2hd (Integer)
           3625 => ( Parameter_Integer, 0 ),   --  : dfrso3hd (Integer)
           3626 => ( Parameter_Float, 0.0 ),   --  : dfrso1sp (Amount)
           3627 => ( Parameter_Integer, 0 ),   --  : dfrso2sp (Integer)
           3628 => ( Parameter_Integer, 0 ),   --  : dfrso3sp (Integer)
           3629 => ( Parameter_Float, 0.0 ),   --  : dspor1hd (Amount)
           3630 => ( Parameter_Integer, 0 ),   --  : dspor2hd (Integer)
           3631 => ( Parameter_Integer, 0 ),   --  : dspor3hd (Integer)
           3632 => ( Parameter_Float, 0.0 ),   --  : dspor1sp (Amount)
           3633 => ( Parameter_Integer, 0 ),   --  : dspor2sp (Integer)
           3634 => ( Parameter_Integer, 0 ),   --  : dspor3sp (Integer)
           3635 => ( Parameter_Float, 0.0 ),   --  : drepl1hd (Amount)
           3636 => ( Parameter_Integer, 0 ),   --  : drepl2hd (Integer)
           3637 => ( Parameter_Integer, 0 ),   --  : drepl3hd (Integer)
           3638 => ( Parameter_Float, 0.0 ),   --  : drepl1sp (Amount)
           3639 => ( Parameter_Integer, 0 ),   --  : drepl2sp (Integer)
           3640 => ( Parameter_Integer, 0 ),   --  : drepl3sp (Integer)
           3641 => ( Parameter_Float, 0.0 ),   --  : dmed1hd (Amount)
           3642 => ( Parameter_Integer, 0 ),   --  : dmed2hd (Integer)
           3643 => ( Parameter_Integer, 0 ),   --  : dmed3hd (Integer)
           3644 => ( Parameter_Float, 0.0 ),   --  : dmed1sp (Amount)
           3645 => ( Parameter_Integer, 0 ),   --  : dmed2sp (Integer)
           3646 => ( Parameter_Integer, 0 ),   --  : dmed3sp (Integer)
           3647 => ( Parameter_Float, 0.0 ),   --  : dchar1hd (Amount)
           3648 => ( Parameter_Float, 0.0 ),   --  : dchar2hd (Amount)
           3649 => ( Parameter_Integer, 0 ),   --  : dchar3hd (Integer)
           3650 => ( Parameter_Float, 0.0 ),   --  : dchar1sp (Amount)
           3651 => ( Parameter_Integer, 0 ),   --  : dchar2sp (Integer)
           3652 => ( Parameter_Integer, 0 ),   --  : dchar3sp (Integer)
           3653 => ( Parameter_Float, 0.0 ),   --  : dslrp1hd (Amount)
           3654 => ( Parameter_Integer, 0 ),   --  : dslrp2hd (Integer)
           3655 => ( Parameter_Integer, 0 ),   --  : dslrp3hd (Integer)
           3656 => ( Parameter_Float, 0.0 ),   --  : dslrp1sp (Amount)
           3657 => ( Parameter_Integer, 0 ),   --  : dslrp2sp (Integer)
           3658 => ( Parameter_Integer, 0 ),   --  : dslrp3sp (Integer)
           3659 => ( Parameter_Integer, 0 ),   --  : dirni1hd (Integer)
           3660 => ( Parameter_Integer, 0 ),   --  : dirni2hd (Integer)
           3661 => ( Parameter_Integer, 0 ),   --  : dirni3hd (Integer)
           3662 => ( Parameter_Integer, 0 ),   --  : dirni1sp (Integer)
           3663 => ( Parameter_Integer, 0 ),   --  : dirni2sp (Integer)
           3664 => ( Parameter_Integer, 0 ),   --  : dirni3sp (Integer)
           3665 => ( Parameter_Integer, 0 ),   --  : totov1hd (Integer)
           3666 => ( Parameter_Integer, 0 ),   --  : totov2hd (Integer)
           3667 => ( Parameter_Integer, 0 ),   --  : totov3hd (Integer)
           3668 => ( Parameter_Integer, 0 ),   --  : totov1sp (Integer)
           3669 => ( Parameter_Integer, 0 ),   --  : totov2sp (Integer)
           3670 => ( Parameter_Integer, 0 ),   --  : totov3sp (Integer)
           3671 => ( Parameter_Float, 0.0 ),   --  : dvuhr1hd (Amount)
           3672 => ( Parameter_Float, 0.0 ),   --  : dvuhr2hd (Amount)
           3673 => ( Parameter_Float, 0.0 ),   --  : dvuhr3hd (Amount)
           3674 => ( Parameter_Float, 0.0 ),   --  : dvuhr1sp (Amount)
           3675 => ( Parameter_Float, 0.0 ),   --  : dvuhr2sp (Amount)
           3676 => ( Parameter_Integer, 0 ),   --  : dvuhr3sp (Integer)
           3677 => ( Parameter_Integer, 0 ),   --  : empan1hd (Integer)
           3678 => ( Parameter_Integer, 0 ),   --  : empan2hd (Integer)
           3679 => ( Parameter_Integer, 0 ),   --  : empan3hd (Integer)
           3680 => ( Parameter_Integer, 0 ),   --  : empan1sp (Integer)
           3681 => ( Parameter_Integer, 0 ),   --  : empan2sp (Integer)
           3682 => ( Parameter_Integer, 0 ),   --  : empan3sp (Integer)
           3683 => ( Parameter_Integer, 0 ),   --  : empen1hd (Integer)
           3684 => ( Parameter_Integer, 0 ),   --  : empen2hd (Integer)
           3685 => ( Parameter_Integer, 0 ),   --  : empen3hd (Integer)
           3686 => ( Parameter_Integer, 0 ),   --  : empen1sp (Integer)
           3687 => ( Parameter_Integer, 0 ),   --  : empen2sp (Integer)
           3688 => ( Parameter_Integer, 0 ),   --  : empen3sp (Integer)
           3689 => ( Parameter_Integer, 0 ),   --  : etype1hd (Integer)
           3690 => ( Parameter_Integer, 0 ),   --  : etype2hd (Integer)
           3691 => ( Parameter_Integer, 0 ),   --  : etype3hd (Integer)
           3692 => ( Parameter_Integer, 0 ),   --  : etype1sp (Integer)
           3693 => ( Parameter_Integer, 0 ),   --  : etype2sp (Integer)
           3694 => ( Parameter_Integer, 0 ),   --  : etype3sp (Integer)
           3695 => ( Parameter_Integer, 0 ),   --  : evrot1hd (Integer)
           3696 => ( Parameter_Integer, 0 ),   --  : evrot2hd (Integer)
           3697 => ( Parameter_Integer, 0 ),   --  : evrot3hd (Integer)
           3698 => ( Parameter_Integer, 0 ),   --  : evrot1sp (Integer)
           3699 => ( Parameter_Integer, 0 ),   --  : evrot2sp (Integer)
           3700 => ( Parameter_Integer, 0 ),   --  : evrot3sp (Integer)
           3701 => ( Parameter_Integer, 0 ),   --  : exb011hd (Integer)
           3702 => ( Parameter_Integer, 0 ),   --  : exb012hd (Integer)
           3703 => ( Parameter_Integer, 0 ),   --  : exb013hd (Integer)
           3704 => ( Parameter_Integer, 0 ),   --  : exb011sp (Integer)
           3705 => ( Parameter_Integer, 0 ),   --  : exb012sp (Integer)
           3706 => ( Parameter_Integer, 0 ),   --  : exb013sp (Integer)
           3707 => ( Parameter_Integer, 0 ),   --  : exb021hd (Integer)
           3708 => ( Parameter_Integer, 0 ),   --  : exb022hd (Integer)
           3709 => ( Parameter_Integer, 0 ),   --  : exb023hd (Integer)
           3710 => ( Parameter_Integer, 0 ),   --  : exb021sp (Integer)
           3711 => ( Parameter_Integer, 0 ),   --  : exb022sp (Integer)
           3712 => ( Parameter_Integer, 0 ),   --  : exb023sp (Integer)
           3713 => ( Parameter_Integer, 0 ),   --  : exb031hd (Integer)
           3714 => ( Parameter_Integer, 0 ),   --  : exb032hd (Integer)
           3715 => ( Parameter_Integer, 0 ),   --  : exb033hd (Integer)
           3716 => ( Parameter_Integer, 0 ),   --  : exb031sp (Integer)
           3717 => ( Parameter_Integer, 0 ),   --  : exb032sp (Integer)
           3718 => ( Parameter_Integer, 0 ),   --  : exb033sp (Integer)
           3719 => ( Parameter_Integer, 0 ),   --  : exb041hd (Integer)
           3720 => ( Parameter_Integer, 0 ),   --  : exb042hd (Integer)
           3721 => ( Parameter_Integer, 0 ),   --  : exb043hd (Integer)
           3722 => ( Parameter_Integer, 0 ),   --  : exb041sp (Integer)
           3723 => ( Parameter_Integer, 0 ),   --  : exb042sp (Integer)
           3724 => ( Parameter_Integer, 0 ),   --  : exb043sp (Integer)
           3725 => ( Parameter_Integer, 0 ),   --  : exb051hd (Integer)
           3726 => ( Parameter_Integer, 0 ),   --  : exb052hd (Integer)
           3727 => ( Parameter_Integer, 0 ),   --  : exb053hd (Integer)
           3728 => ( Parameter_Integer, 0 ),   --  : exb051sp (Integer)
           3729 => ( Parameter_Integer, 0 ),   --  : exb052sp (Integer)
           3730 => ( Parameter_Integer, 0 ),   --  : exb053sp (Integer)
           3731 => ( Parameter_Integer, 0 ),   --  : exb061hd (Integer)
           3732 => ( Parameter_Integer, 0 ),   --  : exb062hd (Integer)
           3733 => ( Parameter_Integer, 0 ),   --  : exb063hd (Integer)
           3734 => ( Parameter_Integer, 0 ),   --  : exb061sp (Integer)
           3735 => ( Parameter_Integer, 0 ),   --  : exb062sp (Integer)
           3736 => ( Parameter_Integer, 0 ),   --  : exb063sp (Integer)
           3737 => ( Parameter_Integer, 0 ),   --  : exb071hd (Integer)
           3738 => ( Parameter_Integer, 0 ),   --  : exb072hd (Integer)
           3739 => ( Parameter_Integer, 0 ),   --  : exb073hd (Integer)
           3740 => ( Parameter_Integer, 0 ),   --  : exb071sp (Integer)
           3741 => ( Parameter_Integer, 0 ),   --  : exb072sp (Integer)
           3742 => ( Parameter_Integer, 0 ),   --  : exb073sp (Integer)
           3743 => ( Parameter_Integer, 0 ),   --  : exb081hd (Integer)
           3744 => ( Parameter_Integer, 0 ),   --  : exb082hd (Integer)
           3745 => ( Parameter_Integer, 0 ),   --  : exb083hd (Integer)
           3746 => ( Parameter_Integer, 0 ),   --  : exb081sp (Integer)
           3747 => ( Parameter_Integer, 0 ),   --  : exb082sp (Integer)
           3748 => ( Parameter_Integer, 0 ),   --  : exb083sp (Integer)
           3749 => ( Parameter_Integer, 0 ),   --  : exb091hd (Integer)
           3750 => ( Parameter_Integer, 0 ),   --  : exb092hd (Integer)
           3751 => ( Parameter_Integer, 0 ),   --  : exb093hd (Integer)
           3752 => ( Parameter_Integer, 0 ),   --  : exb091sp (Integer)
           3753 => ( Parameter_Integer, 0 ),   --  : exb092sp (Integer)
           3754 => ( Parameter_Integer, 0 ),   --  : exb093sp (Integer)
           3755 => ( Parameter_Integer, 0 ),   --  : exb101hd (Integer)
           3756 => ( Parameter_Integer, 0 ),   --  : exb102hd (Integer)
           3757 => ( Parameter_Integer, 0 ),   --  : exb103hd (Integer)
           3758 => ( Parameter_Integer, 0 ),   --  : exb101sp (Integer)
           3759 => ( Parameter_Integer, 0 ),   --  : exb102sp (Integer)
           3760 => ( Parameter_Integer, 0 ),   --  : exb103sp (Integer)
           3761 => ( Parameter_Integer, 0 ),   --  : exb111hd (Integer)
           3762 => ( Parameter_Integer, 0 ),   --  : exb112hd (Integer)
           3763 => ( Parameter_Integer, 0 ),   --  : exb113hd (Integer)
           3764 => ( Parameter_Integer, 0 ),   --  : exb111sp (Integer)
           3765 => ( Parameter_Integer, 0 ),   --  : exb112sp (Integer)
           3766 => ( Parameter_Integer, 0 ),   --  : exb113sp (Integer)
           3767 => ( Parameter_Integer, 0 ),   --  : exb121hd (Integer)
           3768 => ( Parameter_Integer, 0 ),   --  : exb122hd (Integer)
           3769 => ( Parameter_Integer, 0 ),   --  : exb123hd (Integer)
           3770 => ( Parameter_Integer, 0 ),   --  : exb121sp (Integer)
           3771 => ( Parameter_Integer, 0 ),   --  : exb122sp (Integer)
           3772 => ( Parameter_Integer, 0 ),   --  : exb123sp (Integer)
           3773 => ( Parameter_Integer, 0 ),   --  : ftpt1hd (Integer)
           3774 => ( Parameter_Integer, 0 ),   --  : ftpt2hd (Integer)
           3775 => ( Parameter_Integer, 0 ),   --  : ftpt3hd (Integer)
           3776 => ( Parameter_Integer, 0 ),   --  : ftpt1sp (Integer)
           3777 => ( Parameter_Integer, 0 ),   --  : ftpt2sp (Integer)
           3778 => ( Parameter_Integer, 0 ),   --  : ftpt3sp (Integer)
           3779 => ( Parameter_Float, 0.0 ),   --  : fulam1hd (Amount)
           3780 => ( Parameter_Integer, 0 ),   --  : fulam2hd (Integer)
           3781 => ( Parameter_Integer, 0 ),   --  : fulam3hd (Integer)
           3782 => ( Parameter_Float, 0.0 ),   --  : fulam1sp (Amount)
           3783 => ( Parameter_Integer, 0 ),   --  : fulam2sp (Integer)
           3784 => ( Parameter_Integer, 0 ),   --  : fulam3sp (Integer)
           3785 => ( Parameter_Integer, 0 ),   --  : fulbn1hd (Integer)
           3786 => ( Parameter_Integer, 0 ),   --  : fulbn2hd (Integer)
           3787 => ( Parameter_Integer, 0 ),   --  : fulbn3hd (Integer)
           3788 => ( Parameter_Integer, 0 ),   --  : fulbn1sp (Integer)
           3789 => ( Parameter_Integer, 0 ),   --  : fulbn2sp (Integer)
           3790 => ( Parameter_Integer, 0 ),   --  : fulbn3sp (Integer)
           3791 => ( Parameter_Integer, 0 ),   --  : fulpd1hd (Integer)
           3792 => ( Parameter_Integer, 0 ),   --  : fulpd2hd (Integer)
           3793 => ( Parameter_Integer, 0 ),   --  : fulpd3hd (Integer)
           3794 => ( Parameter_Integer, 0 ),   --  : fulpd1sp (Integer)
           3795 => ( Parameter_Integer, 0 ),   --  : fulpd2sp (Integer)
           3796 => ( Parameter_Integer, 0 ),   --  : fulpd3sp (Integer)
           3797 => ( Parameter_Integer, 0 ),   --  : fulty1hd (Integer)
           3798 => ( Parameter_Integer, 0 ),   --  : fulty2hd (Integer)
           3799 => ( Parameter_Integer, 0 ),   --  : fulty3hd (Integer)
           3800 => ( Parameter_Integer, 0 ),   --  : fulty1sp (Integer)
           3801 => ( Parameter_Integer, 0 ),   --  : fulty2sp (Integer)
           3802 => ( Parameter_Integer, 0 ),   --  : fulty3sp (Integer)
           3803 => ( Parameter_Integer, 0 ),   --  : fluam1hd (Integer)
           3804 => ( Parameter_Integer, 0 ),   --  : fluam2hd (Integer)
           3805 => ( Parameter_Integer, 0 ),   --  : fluam3hd (Integer)
           3806 => ( Parameter_Integer, 0 ),   --  : fluam1sp (Integer)
           3807 => ( Parameter_Integer, 0 ),   --  : fluam2sp (Integer)
           3808 => ( Parameter_Integer, 0 ),   --  : fluam3sp (Integer)
           3809 => ( Parameter_Integer, 0 ),   --  : flupd1hd (Integer)
           3810 => ( Parameter_Integer, 0 ),   --  : flupd2hd (Integer)
           3811 => ( Parameter_Integer, 0 ),   --  : flupd3hd (Integer)
           3812 => ( Parameter_Integer, 0 ),   --  : flupd1sp (Integer)
           3813 => ( Parameter_Integer, 0 ),   --  : flupd2sp (Integer)
           3814 => ( Parameter_Integer, 0 ),   --  : flupd3sp (Integer)
           3815 => ( Parameter_Integer, 0 ),   --  : flusu1hd (Integer)
           3816 => ( Parameter_Integer, 0 ),   --  : flusu2hd (Integer)
           3817 => ( Parameter_Integer, 0 ),   --  : flusu3hd (Integer)
           3818 => ( Parameter_Integer, 0 ),   --  : flusu1sp (Integer)
           3819 => ( Parameter_Integer, 0 ),   --  : flusu2sp (Integer)
           3820 => ( Parameter_Integer, 0 ),   --  : flusu3sp (Integer)
           3821 => ( Parameter_Float, 0.0 ),   --  : grwag1hd (Amount)
           3822 => ( Parameter_Float, 0.0 ),   --  : grwag2hd (Amount)
           3823 => ( Parameter_Float, 0.0 ),   --  : grwag3hd (Amount)
           3824 => ( Parameter_Float, 0.0 ),   --  : grwag1sp (Amount)
           3825 => ( Parameter_Float, 0.0 ),   --  : grwag2sp (Amount)
           3826 => ( Parameter_Float, 0.0 ),   --  : grwag3sp (Amount)
           3827 => ( Parameter_Integer, 0 ),   --  : grwap1hd (Integer)
           3828 => ( Parameter_Integer, 0 ),   --  : grwap2hd (Integer)
           3829 => ( Parameter_Integer, 0 ),   --  : grwap3hd (Integer)
           3830 => ( Parameter_Integer, 0 ),   --  : grwap1sp (Integer)
           3831 => ( Parameter_Integer, 0 ),   --  : grwap2sp (Integer)
           3832 => ( Parameter_Integer, 0 ),   --  : grwap3sp (Integer)
           3833 => ( Parameter_Float, 0.0 ),   --  : hha11hd (Amount)
           3834 => ( Parameter_Integer, 0 ),   --  : hha12hd (Integer)
           3835 => ( Parameter_Float, 0.0 ),   --  : hha13hd (Amount)
           3836 => ( Parameter_Float, 0.0 ),   --  : hha11sp (Amount)
           3837 => ( Parameter_Integer, 0 ),   --  : hha12sp (Integer)
           3838 => ( Parameter_Integer, 0 ),   --  : hha13sp (Integer)
           3839 => ( Parameter_Float, 0.0 ),   --  : hha21hd (Amount)
           3840 => ( Parameter_Integer, 0 ),   --  : hha22hd (Integer)
           3841 => ( Parameter_Float, 0.0 ),   --  : hha23hd (Amount)
           3842 => ( Parameter_Float, 0.0 ),   --  : hha21sp (Amount)
           3843 => ( Parameter_Integer, 0 ),   --  : hha22sp (Integer)
           3844 => ( Parameter_Integer, 0 ),   --  : hha23sp (Integer)
           3845 => ( Parameter_Integer, 0 ),   --  : hha31hd (Integer)
           3846 => ( Parameter_Integer, 0 ),   --  : hha32hd (Integer)
           3847 => ( Parameter_Integer, 0 ),   --  : hha33hd (Integer)
           3848 => ( Parameter_Integer, 0 ),   --  : hha31sp (Integer)
           3849 => ( Parameter_Integer, 0 ),   --  : hha32sp (Integer)
           3850 => ( Parameter_Integer, 0 ),   --  : hha33sp (Integer)
           3851 => ( Parameter_Integer, 0 ),   --  : hour1hd (Integer)
           3852 => ( Parameter_Integer, 0 ),   --  : hour2hd (Integer)
           3853 => ( Parameter_Integer, 0 ),   --  : hour3hd (Integer)
           3854 => ( Parameter_Integer, 0 ),   --  : hour1sp (Integer)
           3855 => ( Parameter_Integer, 0 ),   --  : hour2sp (Integer)
           3856 => ( Parameter_Integer, 0 ),   --  : hour3sp (Integer)
           3857 => ( Parameter_Float, 0.0 ),   --  : hrrte1hd (Amount)
           3858 => ( Parameter_Float, 0.0 ),   --  : hrrte2hd (Amount)
           3859 => ( Parameter_Float, 0.0 ),   --  : hrrte3hd (Amount)
           3860 => ( Parameter_Float, 0.0 ),   --  : hrrte1sp (Amount)
           3861 => ( Parameter_Float, 0.0 ),   --  : hrrte2sp (Amount)
           3862 => ( Parameter_Float, 0.0 ),   --  : hrrte3sp (Amount)
           3863 => ( Parameter_Integer, 0 ),   --  : ipay11hd (Integer)
           3864 => ( Parameter_Integer, 0 ),   --  : ipay12hd (Integer)
           3865 => ( Parameter_Integer, 0 ),   --  : ipay13hd (Integer)
           3866 => ( Parameter_Integer, 0 ),   --  : ipay11sp (Integer)
           3867 => ( Parameter_Integer, 0 ),   --  : ipay12sp (Integer)
           3868 => ( Parameter_Integer, 0 ),   --  : ipay13sp (Integer)
           3869 => ( Parameter_Integer, 0 ),   --  : ipay21hd (Integer)
           3870 => ( Parameter_Integer, 0 ),   --  : ipay22hd (Integer)
           3871 => ( Parameter_Integer, 0 ),   --  : ipay23hd (Integer)
           3872 => ( Parameter_Integer, 0 ),   --  : ipay21sp (Integer)
           3873 => ( Parameter_Integer, 0 ),   --  : ipay22sp (Integer)
           3874 => ( Parameter_Integer, 0 ),   --  : ipay23sp (Integer)
           3875 => ( Parameter_Integer, 0 ),   --  : ipay31hd (Integer)
           3876 => ( Parameter_Integer, 0 ),   --  : ipay32hd (Integer)
           3877 => ( Parameter_Integer, 0 ),   --  : ipay33hd (Integer)
           3878 => ( Parameter_Integer, 0 ),   --  : ipay31sp (Integer)
           3879 => ( Parameter_Integer, 0 ),   --  : ipay32sp (Integer)
           3880 => ( Parameter_Integer, 0 ),   --  : ipay33sp (Integer)
           3881 => ( Parameter_Integer, 0 ),   --  : ipay41hd (Integer)
           3882 => ( Parameter_Integer, 0 ),   --  : ipay42hd (Integer)
           3883 => ( Parameter_Integer, 0 ),   --  : ipay43hd (Integer)
           3884 => ( Parameter_Integer, 0 ),   --  : ipay41sp (Integer)
           3885 => ( Parameter_Integer, 0 ),   --  : ipay42sp (Integer)
           3886 => ( Parameter_Integer, 0 ),   --  : ipay43sp (Integer)
           3887 => ( Parameter_Integer, 0 ),   --  : ipay51hd (Integer)
           3888 => ( Parameter_Integer, 0 ),   --  : ipay52hd (Integer)
           3889 => ( Parameter_Integer, 0 ),   --  : ipay53hd (Integer)
           3890 => ( Parameter_Integer, 0 ),   --  : ipay51sp (Integer)
           3891 => ( Parameter_Integer, 0 ),   --  : ipay52sp (Integer)
           3892 => ( Parameter_Integer, 0 ),   --  : ipay53sp (Integer)
           3893 => ( Parameter_Integer, 0 ),   --  : ipay61hd (Integer)
           3894 => ( Parameter_Integer, 0 ),   --  : ipay62hd (Integer)
           3895 => ( Parameter_Integer, 0 ),   --  : ipay63hd (Integer)
           3896 => ( Parameter_Integer, 0 ),   --  : ipay61sp (Integer)
           3897 => ( Parameter_Integer, 0 ),   --  : ipay62sp (Integer)
           3898 => ( Parameter_Integer, 0 ),   --  : ipay63sp (Integer)
           3899 => ( Parameter_Integer, 0 ),   --  : ipay71hd (Integer)
           3900 => ( Parameter_Integer, 0 ),   --  : ipay72hd (Integer)
           3901 => ( Parameter_Integer, 0 ),   --  : ipay73hd (Integer)
           3902 => ( Parameter_Integer, 0 ),   --  : ipay71sp (Integer)
           3903 => ( Parameter_Integer, 0 ),   --  : ipay72sp (Integer)
           3904 => ( Parameter_Integer, 0 ),   --  : ipay73sp (Integer)
           3905 => ( Parameter_Integer, 0 ),   --  : jbchg1hd (Integer)
           3906 => ( Parameter_Integer, 0 ),   --  : jbchg2hd (Integer)
           3907 => ( Parameter_Integer, 0 ),   --  : jbchg3hd (Integer)
           3908 => ( Parameter_Integer, 0 ),   --  : jbchg1sp (Integer)
           3909 => ( Parameter_Integer, 0 ),   --  : jbchg2sp (Integer)
           3910 => ( Parameter_Integer, 0 ),   --  : jbchg3sp (Integer)
           3911 => ( Parameter_Integer, 0 ),   --  : jobus1hd (Integer)
           3912 => ( Parameter_Integer, 0 ),   --  : jobus2hd (Integer)
           3913 => ( Parameter_Integer, 0 ),   --  : jobus3hd (Integer)
           3914 => ( Parameter_Integer, 0 ),   --  : jobus1sp (Integer)
           3915 => ( Parameter_Integer, 0 ),   --  : jobus2sp (Integer)
           3916 => ( Parameter_Integer, 0 ),   --  : jobus3sp (Integer)
           3917 => ( Parameter_Float, 0.0 ),   --  : jbhrs1hd (Amount)
           3918 => ( Parameter_Float, 0.0 ),   --  : jbhrs2hd (Amount)
           3919 => ( Parameter_Float, 0.0 ),   --  : jbhrs3hd (Amount)
           3920 => ( Parameter_Float, 0.0 ),   --  : jbhrs1sp (Amount)
           3921 => ( Parameter_Float, 0.0 ),   --  : jbhrs2sp (Amount)
           3922 => ( Parameter_Integer, 0 ),   --  : jbhrs3sp (Integer)
           3923 => ( Parameter_Integer, 0 ),   --  : lt301hd (Integer)
           3924 => ( Parameter_Integer, 0 ),   --  : lt302hd (Integer)
           3925 => ( Parameter_Integer, 0 ),   --  : lt303hd (Integer)
           3926 => ( Parameter_Integer, 0 ),   --  : lt301sp (Integer)
           3927 => ( Parameter_Integer, 0 ),   --  : lt302sp (Integer)
           3928 => ( Parameter_Integer, 0 ),   --  : lt303sp (Integer)
           3929 => ( Parameter_Integer, 0 ),   --  : madem1hd (Integer)
           3930 => ( Parameter_Integer, 0 ),   --  : madem2hd (Integer)
           3931 => ( Parameter_Integer, 0 ),   --  : madem3hd (Integer)
           3932 => ( Parameter_Integer, 0 ),   --  : madem1sp (Integer)
           3933 => ( Parameter_Integer, 0 ),   --  : madem2sp (Integer)
           3934 => ( Parameter_Integer, 0 ),   --  : madem3sp (Integer)
           3935 => ( Parameter_Float, 0.0 ),   --  : mile1hd (Amount)
           3936 => ( Parameter_Float, 0.0 ),   --  : mile2hd (Amount)
           3937 => ( Parameter_Integer, 0 ),   --  : mile3hd (Integer)
           3938 => ( Parameter_Float, 0.0 ),   --  : mile1sp (Amount)
           3939 => ( Parameter_Float, 0.0 ),   --  : mile2sp (Amount)
           3940 => ( Parameter_Integer, 0 ),   --  : mile3sp (Integer)
           3941 => ( Parameter_Float, 0.0 ),   --  : moref1hd (Amount)
           3942 => ( Parameter_Integer, 0 ),   --  : moref2hd (Integer)
           3943 => ( Parameter_Integer, 0 ),   --  : moref3hd (Integer)
           3944 => ( Parameter_Float, 0.0 ),   --  : moref1sp (Amount)
           3945 => ( Parameter_Float, 0.0 ),   --  : moref2sp (Amount)
           3946 => ( Parameter_Integer, 0 ),   --  : moref3sp (Integer)
           3947 => ( Parameter_Float, 0.0 ),   --  : nic1hd (Amount)
           3948 => ( Parameter_Float, 0.0 ),   --  : nic2hd (Amount)
           3949 => ( Parameter_Float, 0.0 ),   --  : nic3hd (Amount)
           3950 => ( Parameter_Float, 0.0 ),   --  : nic1sp (Amount)
           3951 => ( Parameter_Float, 0.0 ),   --  : nic2sp (Amount)
           3952 => ( Parameter_Integer, 0 ),   --  : nic3sp (Integer)
           3953 => ( Parameter_Float, 0.0 ),   --  : nidam1hd (Amount)
           3954 => ( Parameter_Integer, 0 ),   --  : nidam2hd (Integer)
           3955 => ( Parameter_Integer, 0 ),   --  : nidam3hd (Integer)
           3956 => ( Parameter_Float, 0.0 ),   --  : nidam1sp (Amount)
           3957 => ( Parameter_Float, 0.0 ),   --  : nidam2sp (Amount)
           3958 => ( Parameter_Integer, 0 ),   --  : nidam3sp (Integer)
           3959 => ( Parameter_Integer, 0 ),   --  : nipd1hd (Integer)
           3960 => ( Parameter_Integer, 0 ),   --  : nipd2hd (Integer)
           3961 => ( Parameter_Integer, 0 ),   --  : nipd3hd (Integer)
           3962 => ( Parameter_Integer, 0 ),   --  : nipd1sp (Integer)
           3963 => ( Parameter_Integer, 0 ),   --  : nipd2sp (Integer)
           3964 => ( Parameter_Integer, 0 ),   --  : nipd3sp (Integer)
           3965 => ( Parameter_Integer, 0 ),   --  : noemp1hd (Integer)
           3966 => ( Parameter_Integer, 0 ),   --  : noemp2hd (Integer)
           3967 => ( Parameter_Integer, 0 ),   --  : noemp3hd (Integer)
           3968 => ( Parameter_Integer, 0 ),   --  : noemp1sp (Integer)
           3969 => ( Parameter_Integer, 0 ),   --  : noemp2sp (Integer)
           3970 => ( Parameter_Integer, 0 ),   --  : noemp3sp (Integer)
           3971 => ( Parameter_Integer, 0 ),   --  : oremp1hd (Integer)
           3972 => ( Parameter_Integer, 0 ),   --  : oremp2hd (Integer)
           3973 => ( Parameter_Integer, 0 ),   --  : oremp3hd (Integer)
           3974 => ( Parameter_Integer, 0 ),   --  : oremp1sp (Integer)
           3975 => ( Parameter_Integer, 0 ),   --  : oremp2sp (Integer)
           3976 => ( Parameter_Integer, 0 ),   --  : oremp3sp (Integer)
           3977 => ( Parameter_Integer, 0 ),   --  : othd11hd (Integer)
           3978 => ( Parameter_Integer, 0 ),   --  : othd12hd (Integer)
           3979 => ( Parameter_Integer, 0 ),   --  : othd13hd (Integer)
           3980 => ( Parameter_Integer, 0 ),   --  : othd11sp (Integer)
           3981 => ( Parameter_Integer, 0 ),   --  : othd12sp (Integer)
           3982 => ( Parameter_Integer, 0 ),   --  : othd13sp (Integer)
           3983 => ( Parameter_Integer, 0 ),   --  : othd21hd (Integer)
           3984 => ( Parameter_Integer, 0 ),   --  : othd22hd (Integer)
           3985 => ( Parameter_Integer, 0 ),   --  : othd23hd (Integer)
           3986 => ( Parameter_Integer, 0 ),   --  : othd21sp (Integer)
           3987 => ( Parameter_Integer, 0 ),   --  : othd22sp (Integer)
           3988 => ( Parameter_Integer, 0 ),   --  : othd23sp (Integer)
           3989 => ( Parameter_Integer, 0 ),   --  : othd31hd (Integer)
           3990 => ( Parameter_Integer, 0 ),   --  : othd32hd (Integer)
           3991 => ( Parameter_Integer, 0 ),   --  : othd33hd (Integer)
           3992 => ( Parameter_Integer, 0 ),   --  : othd31sp (Integer)
           3993 => ( Parameter_Integer, 0 ),   --  : othd32sp (Integer)
           3994 => ( Parameter_Integer, 0 ),   --  : othd33sp (Integer)
           3995 => ( Parameter_Integer, 0 ),   --  : othd41hd (Integer)
           3996 => ( Parameter_Integer, 0 ),   --  : othd42hd (Integer)
           3997 => ( Parameter_Integer, 0 ),   --  : othd43hd (Integer)
           3998 => ( Parameter_Integer, 0 ),   --  : othd41sp (Integer)
           3999 => ( Parameter_Integer, 0 ),   --  : othd42sp (Integer)
           4000 => ( Parameter_Integer, 0 ),   --  : othd43sp (Integer)
           4001 => ( Parameter_Integer, 0 ),   --  : othd51hd (Integer)
           4002 => ( Parameter_Integer, 0 ),   --  : othd52hd (Integer)
           4003 => ( Parameter_Integer, 0 ),   --  : othd53hd (Integer)
           4004 => ( Parameter_Integer, 0 ),   --  : othd51sp (Integer)
           4005 => ( Parameter_Integer, 0 ),   --  : othd52sp (Integer)
           4006 => ( Parameter_Integer, 0 ),   --  : othd53sp (Integer)
           4007 => ( Parameter_Integer, 0 ),   --  : othd61hd (Integer)
           4008 => ( Parameter_Integer, 0 ),   --  : othd62hd (Integer)
           4009 => ( Parameter_Integer, 0 ),   --  : othd63hd (Integer)
           4010 => ( Parameter_Integer, 0 ),   --  : othd61sp (Integer)
           4011 => ( Parameter_Integer, 0 ),   --  : othd62sp (Integer)
           4012 => ( Parameter_Integer, 0 ),   --  : othd63sp (Integer)
           4013 => ( Parameter_Integer, 0 ),   --  : othd71hd (Integer)
           4014 => ( Parameter_Integer, 0 ),   --  : othd72hd (Integer)
           4015 => ( Parameter_Integer, 0 ),   --  : othd73hd (Integer)
           4016 => ( Parameter_Integer, 0 ),   --  : othd71sp (Integer)
           4017 => ( Parameter_Integer, 0 ),   --  : othd72sp (Integer)
           4018 => ( Parameter_Integer, 0 ),   --  : othd73sp (Integer)
           4019 => ( Parameter_Integer, 0 ),   --  : othd81hd (Integer)
           4020 => ( Parameter_Integer, 0 ),   --  : othd82hd (Integer)
           4021 => ( Parameter_Integer, 0 ),   --  : othd83hd (Integer)
           4022 => ( Parameter_Integer, 0 ),   --  : othd81sp (Integer)
           4023 => ( Parameter_Integer, 0 ),   --  : othd82sp (Integer)
           4024 => ( Parameter_Integer, 0 ),   --  : othd83sp (Integer)
           4025 => ( Parameter_Integer, 0 ),   --  : othd91hd (Integer)
           4026 => ( Parameter_Integer, 0 ),   --  : othd92hd (Integer)
           4027 => ( Parameter_Integer, 0 ),   --  : othd93hd (Integer)
           4028 => ( Parameter_Integer, 0 ),   --  : othd91sp (Integer)
           4029 => ( Parameter_Integer, 0 ),   --  : othd92sp (Integer)
           4030 => ( Parameter_Integer, 0 ),   --  : othd93sp (Integer)
           4031 => ( Parameter_Integer, 0 ),   --  : otd101hd (Integer)
           4032 => ( Parameter_Integer, 0 ),   --  : otd102hd (Integer)
           4033 => ( Parameter_Integer, 0 ),   --  : otd103hd (Integer)
           4034 => ( Parameter_Integer, 0 ),   --  : otd101sp (Integer)
           4035 => ( Parameter_Integer, 0 ),   --  : otd102sp (Integer)
           4036 => ( Parameter_Integer, 0 ),   --  : otd103sp (Integer)
           4037 => ( Parameter_Float, 0.0 ),   --  : ownam1hd (Amount)
           4038 => ( Parameter_Float, 0.0 ),   --  : ownam2hd (Amount)
           4039 => ( Parameter_Integer, 0 ),   --  : ownam3hd (Integer)
           4040 => ( Parameter_Float, 0.0 ),   --  : ownam1sp (Amount)
           4041 => ( Parameter_Float, 0.0 ),   --  : ownam2sp (Amount)
           4042 => ( Parameter_Float, 0.0 ),   --  : ownam3sp (Amount)
           4043 => ( Parameter_Float, 0.0 ),   --  : ownoa1hd (Amount)
           4044 => ( Parameter_Float, 0.0 ),   --  : ownoa2hd (Amount)
           4045 => ( Parameter_Integer, 0 ),   --  : ownoa3hd (Integer)
           4046 => ( Parameter_Float, 0.0 ),   --  : ownoa1sp (Amount)
           4047 => ( Parameter_Integer, 0 ),   --  : ownoa2sp (Integer)
           4048 => ( Parameter_Integer, 0 ),   --  : ownoa3sp (Integer)
           4049 => ( Parameter_Integer, 0 ),   --  : ownot1hd (Integer)
           4050 => ( Parameter_Integer, 0 ),   --  : ownot2hd (Integer)
           4051 => ( Parameter_Integer, 0 ),   --  : ownot3hd (Integer)
           4052 => ( Parameter_Integer, 0 ),   --  : ownot1sp (Integer)
           4053 => ( Parameter_Integer, 0 ),   --  : ownot2sp (Integer)
           4054 => ( Parameter_Integer, 0 ),   --  : ownot3sp (Integer)
           4055 => ( Parameter_Integer, 0 ),   --  : ownsm1hd (Integer)
           4056 => ( Parameter_Integer, 0 ),   --  : ownsm2hd (Integer)
           4057 => ( Parameter_Integer, 0 ),   --  : ownsm3hd (Integer)
           4058 => ( Parameter_Integer, 0 ),   --  : ownsm1sp (Integer)
           4059 => ( Parameter_Integer, 0 ),   --  : ownsm2sp (Integer)
           4060 => ( Parameter_Integer, 0 ),   --  : ownsm3sp (Integer)
           4061 => ( Parameter_Integer, 0 ),   --  : pappd1hd (Integer)
           4062 => ( Parameter_Integer, 0 ),   --  : pappd2hd (Integer)
           4063 => ( Parameter_Integer, 0 ),   --  : pappd3hd (Integer)
           4064 => ( Parameter_Integer, 0 ),   --  : pappd1sp (Integer)
           4065 => ( Parameter_Integer, 0 ),   --  : pappd2sp (Integer)
           4066 => ( Parameter_Integer, 0 ),   --  : pappd3sp (Integer)
           4067 => ( Parameter_Float, 0.0 ),   --  : payam1hd (Amount)
           4068 => ( Parameter_Float, 0.0 ),   --  : payam2hd (Amount)
           4069 => ( Parameter_Float, 0.0 ),   --  : payam3hd (Amount)
           4070 => ( Parameter_Float, 0.0 ),   --  : payam1sp (Amount)
           4071 => ( Parameter_Float, 0.0 ),   --  : payam2sp (Amount)
           4072 => ( Parameter_Float, 0.0 ),   --  : payam3sp (Amount)
           4073 => ( Parameter_Integer, 0 ),   --  : pdate1hd (Integer)
           4074 => ( Parameter_Integer, 0 ),   --  : pdate2hd (Integer)
           4075 => ( Parameter_Integer, 0 ),   --  : pdate3hd (Integer)
           4076 => ( Parameter_Integer, 0 ),   --  : pdate1sp (Integer)
           4077 => ( Parameter_Integer, 0 ),   --  : pdate2sp (Integer)
           4078 => ( Parameter_Integer, 0 ),   --  : pdate3sp (Integer)
           4079 => ( Parameter_Float, 0.0 ),   --  : paye1hd (Amount)
           4080 => ( Parameter_Float, 0.0 ),   --  : paye2hd (Amount)
           4081 => ( Parameter_Float, 0.0 ),   --  : paye3hd (Amount)
           4082 => ( Parameter_Float, 0.0 ),   --  : paye1sp (Amount)
           4083 => ( Parameter_Float, 0.0 ),   --  : paye2sp (Amount)
           4084 => ( Parameter_Float, 0.0 ),   --  : paye3sp (Amount)
           4085 => ( Parameter_Integer, 0 ),   --  : paype1hd (Integer)
           4086 => ( Parameter_Integer, 0 ),   --  : paype2hd (Integer)
           4087 => ( Parameter_Integer, 0 ),   --  : paype3hd (Integer)
           4088 => ( Parameter_Integer, 0 ),   --  : paype1sp (Integer)
           4089 => ( Parameter_Integer, 0 ),   --  : paype2sp (Integer)
           4090 => ( Parameter_Integer, 0 ),   --  : paype3sp (Integer)
           4091 => ( Parameter_Integer, 0 ),   --  : paysl1hd (Integer)
           4092 => ( Parameter_Integer, 0 ),   --  : paysl2hd (Integer)
           4093 => ( Parameter_Integer, 0 ),   --  : paysl3hd (Integer)
           4094 => ( Parameter_Integer, 0 ),   --  : paysl1sp (Integer)
           4095 => ( Parameter_Integer, 0 ),   --  : paysl2sp (Integer)
           4096 => ( Parameter_Integer, 0 ),   --  : paysl3sp (Integer)
           4097 => ( Parameter_Integer, 0 ),   --  : payus1hd (Integer)
           4098 => ( Parameter_Integer, 0 ),   --  : payus2hd (Integer)
           4099 => ( Parameter_Integer, 0 ),   --  : payus3hd (Integer)
           4100 => ( Parameter_Integer, 0 ),   --  : payus1sp (Integer)
           4101 => ( Parameter_Integer, 0 ),   --  : payus2sp (Integer)
           4102 => ( Parameter_Integer, 0 ),   --  : payus3sp (Integer)
           4103 => ( Parameter_Float, 0.0 ),   --  : pothr1hd (Amount)
           4104 => ( Parameter_Integer, 0 ),   --  : pothr2hd (Integer)
           4105 => ( Parameter_Integer, 0 ),   --  : pothr3hd (Integer)
           4106 => ( Parameter_Float, 0.0 ),   --  : pothr1sp (Amount)
           4107 => ( Parameter_Integer, 0 ),   --  : pothr2sp (Integer)
           4108 => ( Parameter_Integer, 0 ),   --  : pothr3sp (Integer)
           4109 => ( Parameter_Integer, 0 ),   --  : ppppd1hd (Integer)
           4110 => ( Parameter_Integer, 0 ),   --  : ppppd2hd (Integer)
           4111 => ( Parameter_Integer, 0 ),   --  : ppppd3hd (Integer)
           4112 => ( Parameter_Integer, 0 ),   --  : ppppd1sp (Integer)
           4113 => ( Parameter_Integer, 0 ),   --  : ppppd2sp (Integer)
           4114 => ( Parameter_Integer, 0 ),   --  : ppppd3sp (Integer)
           4115 => ( Parameter_Float, 0.0 ),   --  : prbef1hd (Amount)
           4116 => ( Parameter_Float, 0.0 ),   --  : prbef2hd (Amount)
           4117 => ( Parameter_Float, 0.0 ),   --  : prbef3hd (Amount)
           4118 => ( Parameter_Float, 0.0 ),   --  : prbef1sp (Amount)
           4119 => ( Parameter_Float, 0.0 ),   --  : prbef2sp (Amount)
           4120 => ( Parameter_Float, 0.0 ),   --  : prbef3sp (Amount)
           4121 => ( Parameter_Integer, 0 ),   --  : prdoc1hd (Integer)
           4122 => ( Parameter_Integer, 0 ),   --  : prdoc2hd (Integer)
           4123 => ( Parameter_Integer, 0 ),   --  : prdoc3hd (Integer)
           4124 => ( Parameter_Integer, 0 ),   --  : prdoc1sp (Integer)
           4125 => ( Parameter_Integer, 0 ),   --  : prdoc2sp (Integer)
           4126 => ( Parameter_Integer, 0 ),   --  : prdoc3sp (Integer)
           4127 => ( Parameter_Float, 0.0 ),   --  : sepro1hd (Amount)
           4128 => ( Parameter_Float, 0.0 ),   --  : sepro2hd (Amount)
           4129 => ( Parameter_Float, 0.0 ),   --  : sepro3hd (Amount)
           4130 => ( Parameter_Float, 0.0 ),   --  : sepro1sp (Amount)
           4131 => ( Parameter_Float, 0.0 ),   --  : sepro2sp (Amount)
           4132 => ( Parameter_Float, 0.0 ),   --  : sepro3sp (Amount)
           4133 => ( Parameter_Integer, 0 ),   --  : prolo1hd (Integer)
           4134 => ( Parameter_Integer, 0 ),   --  : prolo2hd (Integer)
           4135 => ( Parameter_Integer, 0 ),   --  : prolo3hd (Integer)
           4136 => ( Parameter_Integer, 0 ),   --  : prolo1sp (Integer)
           4137 => ( Parameter_Integer, 0 ),   --  : prolo2sp (Integer)
           4138 => ( Parameter_Integer, 0 ),   --  : prolo3sp (Integer)
           4139 => ( Parameter_Integer, 0 ),   --  : profn1hd (Integer)
           4140 => ( Parameter_Integer, 0 ),   --  : profn2hd (Integer)
           4141 => ( Parameter_Integer, 0 ),   --  : profn3hd (Integer)
           4142 => ( Parameter_Integer, 0 ),   --  : profn1sp (Integer)
           4143 => ( Parameter_Integer, 0 ),   --  : profn2sp (Integer)
           4144 => ( Parameter_Integer, 0 ),   --  : profn3sp (Integer)
           4145 => ( Parameter_Integer, 0 ),   --  : protx1hd (Integer)
           4146 => ( Parameter_Integer, 0 ),   --  : protx2hd (Integer)
           4147 => ( Parameter_Integer, 0 ),   --  : protx3hd (Integer)
           4148 => ( Parameter_Integer, 0 ),   --  : protx1sp (Integer)
           4149 => ( Parameter_Integer, 0 ),   --  : protx2sp (Integer)
           4150 => ( Parameter_Integer, 0 ),   --  : protx3sp (Integer)
           4151 => ( Parameter_Integer, 0 ),   --  : rspvr1hd (Integer)
           4152 => ( Parameter_Integer, 0 ),   --  : rspvr2hd (Integer)
           4153 => ( Parameter_Integer, 0 ),   --  : rspvr3hd (Integer)
           4154 => ( Parameter_Integer, 0 ),   --  : rspvr1sp (Integer)
           4155 => ( Parameter_Integer, 0 ),   --  : rspvr2sp (Integer)
           4156 => ( Parameter_Integer, 0 ),   --  : rspvr3sp (Integer)
           4157 => ( Parameter_Integer, 0 ),   --  : apamt1hd (Integer)
           4158 => ( Parameter_Integer, 0 ),   --  : apamt2hd (Integer)
           4159 => ( Parameter_Integer, 0 ),   --  : apamt3hd (Integer)
           4160 => ( Parameter_Integer, 0 ),   --  : apamt1sp (Integer)
           4161 => ( Parameter_Integer, 0 ),   --  : apamt2sp (Integer)
           4162 => ( Parameter_Integer, 0 ),   --  : apamt3sp (Integer)
           4163 => ( Parameter_Integer, 0 ),   --  : sebeg1hd (Integer)
           4164 => ( Parameter_Integer, 0 ),   --  : sebeg2hd (Integer)
           4165 => ( Parameter_Integer, 0 ),   --  : sebeg3hd (Integer)
           4166 => ( Parameter_Integer, 0 ),   --  : sebeg1sp (Integer)
           4167 => ( Parameter_Integer, 0 ),   --  : sebeg2sp (Integer)
           4168 => ( Parameter_Integer, 0 ),   --  : sebeg3sp (Integer)
           4169 => ( Parameter_Integer, 0 ),   --  : seend1hd (Integer)
           4170 => ( Parameter_Integer, 0 ),   --  : seend2hd (Integer)
           4171 => ( Parameter_Integer, 0 ),   --  : seend3hd (Integer)
           4172 => ( Parameter_Integer, 0 ),   --  : seend1sp (Integer)
           4173 => ( Parameter_Integer, 0 ),   --  : seend2sp (Integer)
           4174 => ( Parameter_Integer, 0 ),   --  : seend3sp (Integer)
           4175 => ( Parameter_Integer, 0 ),   --  : sectr1hd (Integer)
           4176 => ( Parameter_Integer, 0 ),   --  : sectr2hd (Integer)
           4177 => ( Parameter_Integer, 0 ),   --  : sectr3hd (Integer)
           4178 => ( Parameter_Integer, 0 ),   --  : sectr1sp (Integer)
           4179 => ( Parameter_Integer, 0 ),   --  : sectr2sp (Integer)
           4180 => ( Parameter_Integer, 0 ),   --  : sectr3sp (Integer)
           4181 => ( Parameter_Integer, 0 ),   --  : sectt1hd (Integer)
           4182 => ( Parameter_Integer, 0 ),   --  : sectt2hd (Integer)
           4183 => ( Parameter_Integer, 0 ),   --  : sectt3hd (Integer)
           4184 => ( Parameter_Integer, 0 ),   --  : sectt1sp (Integer)
           4185 => ( Parameter_Integer, 0 ),   --  : sectt2sp (Integer)
           4186 => ( Parameter_Integer, 0 ),   --  : sectt3sp (Integer)
           4187 => ( Parameter_Integer, 0 ),   --  : sefin1hd (Integer)
           4188 => ( Parameter_Integer, 0 ),   --  : sefin2hd (Integer)
           4189 => ( Parameter_Integer, 0 ),   --  : sefin3hd (Integer)
           4190 => ( Parameter_Integer, 0 ),   --  : sefin1sp (Integer)
           4191 => ( Parameter_Integer, 0 ),   --  : sefin2sp (Integer)
           4192 => ( Parameter_Integer, 0 ),   --  : sefin3sp (Integer)
           4193 => ( Parameter_Float, 0.0 ),   --  : secam1hd (Amount)
           4194 => ( Parameter_Float, 0.0 ),   --  : secam2hd (Amount)
           4195 => ( Parameter_Float, 0.0 ),   --  : secam3hd (Amount)
           4196 => ( Parameter_Float, 0.0 ),   --  : secam1sp (Amount)
           4197 => ( Parameter_Float, 0.0 ),   --  : secam2sp (Amount)
           4198 => ( Parameter_Float, 0.0 ),   --  : secam3sp (Amount)
           4199 => ( Parameter_Integer, 0 ),   --  : seciw1hd (Integer)
           4200 => ( Parameter_Integer, 0 ),   --  : seciw2hd (Integer)
           4201 => ( Parameter_Integer, 0 ),   --  : seciw3hd (Integer)
           4202 => ( Parameter_Integer, 0 ),   --  : seciw1sp (Integer)
           4203 => ( Parameter_Integer, 0 ),   --  : seciw2sp (Integer)
           4204 => ( Parameter_Integer, 0 ),   --  : seciw3sp (Integer)
           4205 => ( Parameter_Integer, 0 ),   --  : sewks1hd (Integer)
           4206 => ( Parameter_Integer, 0 ),   --  : sewks2hd (Integer)
           4207 => ( Parameter_Integer, 0 ),   --  : sewks3hd (Integer)
           4208 => ( Parameter_Integer, 0 ),   --  : sewks1sp (Integer)
           4209 => ( Parameter_Integer, 0 ),   --  : sewks2sp (Integer)
           4210 => ( Parameter_Integer, 0 ),   --  : sewks3sp (Integer)
           4211 => ( Parameter_Float, 0.0 ),   --  : senam1hd (Amount)
           4212 => ( Parameter_Float, 0.0 ),   --  : senam2hd (Amount)
           4213 => ( Parameter_Integer, 0 ),   --  : senam3hd (Integer)
           4214 => ( Parameter_Float, 0.0 ),   --  : senam1sp (Amount)
           4215 => ( Parameter_Float, 0.0 ),   --  : senam2sp (Amount)
           4216 => ( Parameter_Integer, 0 ),   --  : senam3sp (Integer)
           4217 => ( Parameter_Integer, 0 ),   --  : seiin1hd (Integer)
           4218 => ( Parameter_Integer, 0 ),   --  : seiin2hd (Integer)
           4219 => ( Parameter_Integer, 0 ),   --  : seiin3hd (Integer)
           4220 => ( Parameter_Integer, 0 ),   --  : seiin1sp (Integer)
           4221 => ( Parameter_Integer, 0 ),   --  : seiin2sp (Integer)
           4222 => ( Parameter_Integer, 0 ),   --  : seiin3sp (Integer)
           4223 => ( Parameter_Float, 0.0 ),   --  : senil1hd (Amount)
           4224 => ( Parameter_Float, 0.0 ),   --  : senil2hd (Amount)
           4225 => ( Parameter_Integer, 0 ),   --  : senil3hd (Integer)
           4226 => ( Parameter_Float, 0.0 ),   --  : senil1sp (Amount)
           4227 => ( Parameter_Float, 0.0 ),   --  : senil2sp (Amount)
           4228 => ( Parameter_Integer, 0 ),   --  : senil3sp (Integer)
           4229 => ( Parameter_Float, 0.0 ),   --  : senir1hd (Amount)
           4230 => ( Parameter_Float, 0.0 ),   --  : senir2hd (Amount)
           4231 => ( Parameter_Float, 0.0 ),   --  : senir3hd (Amount)
           4232 => ( Parameter_Float, 0.0 ),   --  : senir1sp (Amount)
           4233 => ( Parameter_Float, 0.0 ),   --  : senir2sp (Amount)
           4234 => ( Parameter_Float, 0.0 ),   --  : senir3sp (Amount)
           4235 => ( Parameter_Integer, 0 ),   --  : psenr1hd (Integer)
           4236 => ( Parameter_Integer, 0 ),   --  : psenr2hd (Integer)
           4237 => ( Parameter_Integer, 0 ),   --  : psenr3hd (Integer)
           4238 => ( Parameter_Integer, 0 ),   --  : psenr1sp (Integer)
           4239 => ( Parameter_Integer, 0 ),   --  : psenr2sp (Integer)
           4240 => ( Parameter_Integer, 0 ),   --  : psenr3sp (Integer)
           4241 => ( Parameter_Float, 0.0 ),   --  : setax1hd (Amount)
           4242 => ( Parameter_Float, 0.0 ),   --  : setax2hd (Amount)
           4243 => ( Parameter_Float, 0.0 ),   --  : setax3hd (Amount)
           4244 => ( Parameter_Float, 0.0 ),   --  : setax1sp (Amount)
           4245 => ( Parameter_Float, 0.0 ),   --  : setax2sp (Amount)
           4246 => ( Parameter_Float, 0.0 ),   --  : setax3sp (Amount)
           4247 => ( Parameter_Float, 0.0 ),   --  : smpam1hd (Amount)
           4248 => ( Parameter_Integer, 0 ),   --  : smpam2hd (Integer)
           4249 => ( Parameter_Integer, 0 ),   --  : smpam3hd (Integer)
           4250 => ( Parameter_Float, 0.0 ),   --  : smpam1sp (Amount)
           4251 => ( Parameter_Float, 0.0 ),   --  : smpam2sp (Amount)
           4252 => ( Parameter_Integer, 0 ),   --  : smpam3sp (Integer)
           4253 => ( Parameter_Integer, 0 ),   --  : smprt1hd (Integer)
           4254 => ( Parameter_Integer, 0 ),   --  : smprt2hd (Integer)
           4255 => ( Parameter_Integer, 0 ),   --  : smprt3hd (Integer)
           4256 => ( Parameter_Integer, 0 ),   --  : smprt1sp (Integer)
           4257 => ( Parameter_Integer, 0 ),   --  : smprt2sp (Integer)
           4258 => ( Parameter_Integer, 0 ),   --  : smprt3sp (Integer)
           4259 => ( Parameter_Integer, 0 ),   --  : sole1hd (Integer)
           4260 => ( Parameter_Integer, 0 ),   --  : sole2hd (Integer)
           4261 => ( Parameter_Integer, 0 ),   --  : sole3hd (Integer)
           4262 => ( Parameter_Integer, 0 ),   --  : sole1sp (Integer)
           4263 => ( Parameter_Integer, 0 ),   --  : sole2sp (Integer)
           4264 => ( Parameter_Integer, 0 ),   --  : sole3sp (Integer)
           4265 => ( Parameter_Float, 0.0 ),   --  : spamt1hd (Amount)
           4266 => ( Parameter_Integer, 0 ),   --  : spamt2hd (Integer)
           4267 => ( Parameter_Integer, 0 ),   --  : spamt3hd (Integer)
           4268 => ( Parameter_Float, 0.0 ),   --  : spamt1sp (Amount)
           4269 => ( Parameter_Integer, 0 ),   --  : spamt2sp (Integer)
           4270 => ( Parameter_Integer, 0 ),   --  : spamt3sp (Integer)
           4271 => ( Parameter_Integer, 0 ),   --  : sppd1hd (Integer)
           4272 => ( Parameter_Integer, 0 ),   --  : sppd2hd (Integer)
           4273 => ( Parameter_Integer, 0 ),   --  : sppd3hd (Integer)
           4274 => ( Parameter_Integer, 0 ),   --  : sppd1sp (Integer)
           4275 => ( Parameter_Integer, 0 ),   --  : sppd2sp (Integer)
           4276 => ( Parameter_Integer, 0 ),   --  : sppd3sp (Integer)
           4277 => ( Parameter_Integer, 0 ),   --  : spsac1hd (Integer)
           4278 => ( Parameter_Integer, 0 ),   --  : spsac2hd (Integer)
           4279 => ( Parameter_Integer, 0 ),   --  : spsac3hd (Integer)
           4280 => ( Parameter_Integer, 0 ),   --  : spsac1sp (Integer)
           4281 => ( Parameter_Integer, 0 ),   --  : spsac2sp (Integer)
           4282 => ( Parameter_Integer, 0 ),   --  : spsac3sp (Integer)
           4283 => ( Parameter_Float, 0.0 ),   --  : spuam1hd (Amount)
           4284 => ( Parameter_Integer, 0 ),   --  : spuam2hd (Integer)
           4285 => ( Parameter_Integer, 0 ),   --  : spuam3hd (Integer)
           4286 => ( Parameter_Integer, 0 ),   --  : spuam1sp (Integer)
           4287 => ( Parameter_Integer, 0 ),   --  : spuam2sp (Integer)
           4288 => ( Parameter_Integer, 0 ),   --  : spuam3sp (Integer)
           4289 => ( Parameter_Integer, 0 ),   --  : spupd1hd (Integer)
           4290 => ( Parameter_Integer, 0 ),   --  : spupd2hd (Integer)
           4291 => ( Parameter_Integer, 0 ),   --  : spupd3hd (Integer)
           4292 => ( Parameter_Integer, 0 ),   --  : spupd1sp (Integer)
           4293 => ( Parameter_Integer, 0 ),   --  : spupd2sp (Integer)
           4294 => ( Parameter_Integer, 0 ),   --  : spupd3sp (Integer)
           4295 => ( Parameter_Integer, 0 ),   --  : spusu1hd (Integer)
           4296 => ( Parameter_Integer, 0 ),   --  : spusu2hd (Integer)
           4297 => ( Parameter_Integer, 0 ),   --  : spusu3hd (Integer)
           4298 => ( Parameter_Integer, 0 ),   --  : spusu1sp (Integer)
           4299 => ( Parameter_Integer, 0 ),   --  : spusu2sp (Integer)
           4300 => ( Parameter_Integer, 0 ),   --  : spusu3sp (Integer)
           4301 => ( Parameter_Float, 0.0 ),   --  : ppamt1hd (Amount)
           4302 => ( Parameter_Integer, 0 ),   --  : ppamt2hd (Integer)
           4303 => ( Parameter_Integer, 0 ),   --  : ppamt3hd (Integer)
           4304 => ( Parameter_Float, 0.0 ),   --  : ppamt1sp (Amount)
           4305 => ( Parameter_Integer, 0 ),   --  : ppamt2sp (Integer)
           4306 => ( Parameter_Integer, 0 ),   --  : ppamt3sp (Integer)
           4307 => ( Parameter_Float, 0.0 ),   --  : sspam1hd (Amount)
           4308 => ( Parameter_Float, 0.0 ),   --  : sspam2hd (Amount)
           4309 => ( Parameter_Integer, 0 ),   --  : sspam3hd (Integer)
           4310 => ( Parameter_Float, 0.0 ),   --  : sspam1sp (Amount)
           4311 => ( Parameter_Integer, 0 ),   --  : sspam2sp (Integer)
           4312 => ( Parameter_Integer, 0 ),   --  : sspam3sp (Integer)
           4313 => ( Parameter_Integer, 0 ),   --  : spsmp1hd (Integer)
           4314 => ( Parameter_Integer, 0 ),   --  : spsmp2hd (Integer)
           4315 => ( Parameter_Integer, 0 ),   --  : spsmp3hd (Integer)
           4316 => ( Parameter_Integer, 0 ),   --  : spsmp1sp (Integer)
           4317 => ( Parameter_Integer, 0 ),   --  : spsmp2sp (Integer)
           4318 => ( Parameter_Integer, 0 ),   --  : spsmp3sp (Integer)
           4319 => ( Parameter_Float, 0.0 ),   --  : taxam1hd (Amount)
           4320 => ( Parameter_Float, 0.0 ),   --  : taxam2hd (Amount)
           4321 => ( Parameter_Integer, 0 ),   --  : taxam3hd (Integer)
           4322 => ( Parameter_Float, 0.0 ),   --  : taxam1sp (Amount)
           4323 => ( Parameter_Integer, 0 ),   --  : taxam2sp (Integer)
           4324 => ( Parameter_Integer, 0 ),   --  : taxam3sp (Integer)
           4325 => ( Parameter_Float, 0.0 ),   --  : taxda1hd (Amount)
           4326 => ( Parameter_Float, 0.0 ),   --  : taxda2hd (Amount)
           4327 => ( Parameter_Float, 0.0 ),   --  : taxda3hd (Amount)
           4328 => ( Parameter_Float, 0.0 ),   --  : taxda1sp (Amount)
           4329 => ( Parameter_Float, 0.0 ),   --  : taxda2sp (Amount)
           4330 => ( Parameter_Integer, 0 ),   --  : taxda3sp (Integer)
           4331 => ( Parameter_Integer, 0 ),   --  : taxpd1hd (Integer)
           4332 => ( Parameter_Integer, 0 ),   --  : taxpd2hd (Integer)
           4333 => ( Parameter_Integer, 0 ),   --  : taxpd3hd (Integer)
           4334 => ( Parameter_Integer, 0 ),   --  : taxpd1sp (Integer)
           4335 => ( Parameter_Integer, 0 ),   --  : taxpd2sp (Integer)
           4336 => ( Parameter_Integer, 0 ),   --  : taxpd3sp (Integer)
           4337 => ( Parameter_Float, 0.0 ),   --  : to1hr1hd (Amount)
           4338 => ( Parameter_Float, 0.0 ),   --  : to1hr2hd (Amount)
           4339 => ( Parameter_Float, 0.0 ),   --  : to1hr3hd (Amount)
           4340 => ( Parameter_Float, 0.0 ),   --  : to1hr1sp (Amount)
           4341 => ( Parameter_Float, 0.0 ),   --  : to1hr2sp (Amount)
           4342 => ( Parameter_Integer, 0 ),   --  : to1hr3sp (Integer)
           4343 => ( Parameter_Float, 0.0 ),   --  : boinu1hd (Amount)
           4344 => ( Parameter_Integer, 0 ),   --  : boinu2hd (Integer)
           4345 => ( Parameter_Integer, 0 ),   --  : boinu3hd (Integer)
           4346 => ( Parameter_Float, 0.0 ),   --  : boinu1sp (Amount)
           4347 => ( Parameter_Integer, 0 ),   --  : boinu2sp (Integer)
           4348 => ( Parameter_Integer, 0 ),   --  : boinu3sp (Integer)
           4349 => ( Parameter_Integer, 0 ),   --  : uincb1hd (Integer)
           4350 => ( Parameter_Integer, 0 ),   --  : uincb2hd (Integer)
           4351 => ( Parameter_Integer, 0 ),   --  : uincb3hd (Integer)
           4352 => ( Parameter_Integer, 0 ),   --  : uincb1sp (Integer)
           4353 => ( Parameter_Integer, 0 ),   --  : uincb2sp (Integer)
           4354 => ( Parameter_Integer, 0 ),   --  : uincb3sp (Integer)
           4355 => ( Parameter_Float, 0.0 ),   --  : uded11hd (Amount)
           4356 => ( Parameter_Integer, 0 ),   --  : uded12hd (Integer)
           4357 => ( Parameter_Integer, 0 ),   --  : uded13hd (Integer)
           4358 => ( Parameter_Float, 0.0 ),   --  : uded11sp (Amount)
           4359 => ( Parameter_Integer, 0 ),   --  : uded12sp (Integer)
           4360 => ( Parameter_Integer, 0 ),   --  : uded13sp (Integer)
           4361 => ( Parameter_Integer, 0 ),   --  : uded21hd (Integer)
           4362 => ( Parameter_Integer, 0 ),   --  : uded22hd (Integer)
           4363 => ( Parameter_Integer, 0 ),   --  : uded23hd (Integer)
           4364 => ( Parameter_Integer, 0 ),   --  : uded21sp (Integer)
           4365 => ( Parameter_Integer, 0 ),   --  : uded22sp (Integer)
           4366 => ( Parameter_Integer, 0 ),   --  : uded23sp (Integer)
           4367 => ( Parameter_Float, 0.0 ),   --  : uded31hd (Amount)
           4368 => ( Parameter_Integer, 0 ),   --  : uded32hd (Integer)
           4369 => ( Parameter_Integer, 0 ),   --  : uded33hd (Integer)
           4370 => ( Parameter_Integer, 0 ),   --  : uded31sp (Integer)
           4371 => ( Parameter_Integer, 0 ),   --  : uded32sp (Integer)
           4372 => ( Parameter_Integer, 0 ),   --  : uded33sp (Integer)
           4373 => ( Parameter_Integer, 0 ),   --  : uded41hd (Integer)
           4374 => ( Parameter_Integer, 0 ),   --  : uded42hd (Integer)
           4375 => ( Parameter_Integer, 0 ),   --  : uded43hd (Integer)
           4376 => ( Parameter_Integer, 0 ),   --  : uded41sp (Integer)
           4377 => ( Parameter_Integer, 0 ),   --  : uded42sp (Integer)
           4378 => ( Parameter_Integer, 0 ),   --  : uded43sp (Integer)
           4379 => ( Parameter_Float, 0.0 ),   --  : uded51hd (Amount)
           4380 => ( Parameter_Integer, 0 ),   --  : uded52hd (Integer)
           4381 => ( Parameter_Integer, 0 ),   --  : uded53hd (Integer)
           4382 => ( Parameter_Float, 0.0 ),   --  : uded51sp (Amount)
           4383 => ( Parameter_Integer, 0 ),   --  : uded52sp (Integer)
           4384 => ( Parameter_Integer, 0 ),   --  : uded53sp (Integer)
           4385 => ( Parameter_Integer, 0 ),   --  : uded61hd (Integer)
           4386 => ( Parameter_Integer, 0 ),   --  : uded62hd (Integer)
           4387 => ( Parameter_Integer, 0 ),   --  : uded63hd (Integer)
           4388 => ( Parameter_Integer, 0 ),   --  : uded61sp (Integer)
           4389 => ( Parameter_Integer, 0 ),   --  : uded62sp (Integer)
           4390 => ( Parameter_Integer, 0 ),   --  : uded63sp (Integer)
           4391 => ( Parameter_Integer, 0 ),   --  : uded71hd (Integer)
           4392 => ( Parameter_Integer, 0 ),   --  : uded72hd (Integer)
           4393 => ( Parameter_Integer, 0 ),   --  : uded73hd (Integer)
           4394 => ( Parameter_Integer, 0 ),   --  : uded71sp (Integer)
           4395 => ( Parameter_Integer, 0 ),   --  : uded72sp (Integer)
           4396 => ( Parameter_Integer, 0 ),   --  : uded73sp (Integer)
           4397 => ( Parameter_Integer, 0 ),   --  : uded81hd (Integer)
           4398 => ( Parameter_Integer, 0 ),   --  : uded82hd (Integer)
           4399 => ( Parameter_Integer, 0 ),   --  : uded83hd (Integer)
           4400 => ( Parameter_Integer, 0 ),   --  : uded81sp (Integer)
           4401 => ( Parameter_Integer, 0 ),   --  : uded82sp (Integer)
           4402 => ( Parameter_Integer, 0 ),   --  : uded83sp (Integer)
           4403 => ( Parameter_Float, 0.0 ),   --  : uded91hd (Amount)
           4404 => ( Parameter_Integer, 0 ),   --  : uded92hd (Integer)
           4405 => ( Parameter_Integer, 0 ),   --  : uded93hd (Integer)
           4406 => ( Parameter_Integer, 0 ),   --  : uded91sp (Integer)
           4407 => ( Parameter_Integer, 0 ),   --  : uded92sp (Integer)
           4408 => ( Parameter_Integer, 0 ),   --  : uded93sp (Integer)
           4409 => ( Parameter_Float, 0.0 ),   --  : ugros1hd (Amount)
           4410 => ( Parameter_Float, 0.0 ),   --  : ugros2hd (Amount)
           4411 => ( Parameter_Integer, 0 ),   --  : ugros3hd (Integer)
           4412 => ( Parameter_Float, 0.0 ),   --  : ugros1sp (Amount)
           4413 => ( Parameter_Float, 0.0 ),   --  : ugros2sp (Amount)
           4414 => ( Parameter_Integer, 0 ),   --  : ugros3sp (Integer)
           4415 => ( Parameter_Text, null, Null_Unbounded_String ),   --  : ugrsp1hd (Unbounded_String)
           4416 => ( Parameter_Float, 0.0 ),   --  : ugrsp2hd (Amount)
           4417 => ( Parameter_Float, 0.0 ),   --  : ugrsp3hd (Amount)
           4418 => ( Parameter_Float, 0.0 ),   --  : ugrsp1sp (Amount)
           4419 => ( Parameter_Float, 0.0 ),   --  : ugrsp2sp (Amount)
           4420 => ( Parameter_Float, 0.0 ),   --  : ugrsp3sp (Amount)
           4421 => ( Parameter_Integer, 0 ),   --  : uinc11hd (Integer)
           4422 => ( Parameter_Integer, 0 ),   --  : uinc12hd (Integer)
           4423 => ( Parameter_Integer, 0 ),   --  : uinc13hd (Integer)
           4424 => ( Parameter_Integer, 0 ),   --  : uinc11sp (Integer)
           4425 => ( Parameter_Integer, 0 ),   --  : uinc12sp (Integer)
           4426 => ( Parameter_Integer, 0 ),   --  : uinc13sp (Integer)
           4427 => ( Parameter_Integer, 0 ),   --  : uinc21hd (Integer)
           4428 => ( Parameter_Integer, 0 ),   --  : uinc22hd (Integer)
           4429 => ( Parameter_Integer, 0 ),   --  : uinc23hd (Integer)
           4430 => ( Parameter_Integer, 0 ),   --  : uinc21sp (Integer)
           4431 => ( Parameter_Integer, 0 ),   --  : uinc22sp (Integer)
           4432 => ( Parameter_Integer, 0 ),   --  : uinc23sp (Integer)
           4433 => ( Parameter_Integer, 0 ),   --  : uinc31hd (Integer)
           4434 => ( Parameter_Integer, 0 ),   --  : uinc32hd (Integer)
           4435 => ( Parameter_Integer, 0 ),   --  : uinc33hd (Integer)
           4436 => ( Parameter_Integer, 0 ),   --  : uinc31sp (Integer)
           4437 => ( Parameter_Integer, 0 ),   --  : uinc32sp (Integer)
           4438 => ( Parameter_Integer, 0 ),   --  : uinc33sp (Integer)
           4439 => ( Parameter_Integer, 0 ),   --  : uinc41hd (Integer)
           4440 => ( Parameter_Integer, 0 ),   --  : uinc42hd (Integer)
           4441 => ( Parameter_Integer, 0 ),   --  : uinc43hd (Integer)
           4442 => ( Parameter_Integer, 0 ),   --  : uinc41sp (Integer)
           4443 => ( Parameter_Integer, 0 ),   --  : uinc42sp (Integer)
           4444 => ( Parameter_Integer, 0 ),   --  : uinc43sp (Integer)
           4445 => ( Parameter_Integer, 0 ),   --  : uinc51hd (Integer)
           4446 => ( Parameter_Integer, 0 ),   --  : uinc52hd (Integer)
           4447 => ( Parameter_Integer, 0 ),   --  : uinc53hd (Integer)
           4448 => ( Parameter_Integer, 0 ),   --  : uinc51sp (Integer)
           4449 => ( Parameter_Integer, 0 ),   --  : uinc52sp (Integer)
           4450 => ( Parameter_Integer, 0 ),   --  : uinc53sp (Integer)
           4451 => ( Parameter_Integer, 0 ),   --  : uinc61hd (Integer)
           4452 => ( Parameter_Integer, 0 ),   --  : uinc62hd (Integer)
           4453 => ( Parameter_Integer, 0 ),   --  : uinc63hd (Integer)
           4454 => ( Parameter_Integer, 0 ),   --  : uinc61sp (Integer)
           4455 => ( Parameter_Integer, 0 ),   --  : uinc62sp (Integer)
           4456 => ( Parameter_Integer, 0 ),   --  : uinc63sp (Integer)
           4457 => ( Parameter_Integer, 0 ),   --  : uinc71hd (Integer)
           4458 => ( Parameter_Integer, 0 ),   --  : uinc72hd (Integer)
           4459 => ( Parameter_Integer, 0 ),   --  : uinc73hd (Integer)
           4460 => ( Parameter_Integer, 0 ),   --  : uinc71sp (Integer)
           4461 => ( Parameter_Integer, 0 ),   --  : uinc72sp (Integer)
           4462 => ( Parameter_Integer, 0 ),   --  : uinc73sp (Integer)
           4463 => ( Parameter_Float, 0.0 ),   --  : umile1hd (Amount)
           4464 => ( Parameter_Integer, 0 ),   --  : umile2hd (Integer)
           4465 => ( Parameter_Integer, 0 ),   --  : umile3hd (Integer)
           4466 => ( Parameter_Float, 0.0 ),   --  : umile1sp (Amount)
           4467 => ( Parameter_Integer, 0 ),   --  : umile2sp (Integer)
           4468 => ( Parameter_Integer, 0 ),   --  : umile3sp (Integer)
           4469 => ( Parameter_Float, 0.0 ),   --  : umot1hd (Amount)
           4470 => ( Parameter_Integer, 0 ),   --  : umot2hd (Integer)
           4471 => ( Parameter_Integer, 0 ),   --  : umot3hd (Integer)
           4472 => ( Parameter_Float, 0.0 ),   --  : umot1sp (Amount)
           4473 => ( Parameter_Integer, 0 ),   --  : umot2sp (Integer)
           4474 => ( Parameter_Integer, 0 ),   --  : umot3sp (Integer)
           4475 => ( Parameter_Float, 0.0 ),   --  : unett1hd (Amount)
           4476 => ( Parameter_Float, 0.0 ),   --  : unett2hd (Amount)
           4477 => ( Parameter_Integer, 0 ),   --  : unett3hd (Integer)
           4478 => ( Parameter_Float, 0.0 ),   --  : unett1sp (Amount)
           4479 => ( Parameter_Float, 0.0 ),   --  : unett2sp (Amount)
           4480 => ( Parameter_Integer, 0 ),   --  : unett3sp (Integer)
           4481 => ( Parameter_Integer, 0 ),   --  : uoth11hd (Integer)
           4482 => ( Parameter_Integer, 0 ),   --  : uoth12hd (Integer)
           4483 => ( Parameter_Integer, 0 ),   --  : uoth13hd (Integer)
           4484 => ( Parameter_Integer, 0 ),   --  : uoth11sp (Integer)
           4485 => ( Parameter_Integer, 0 ),   --  : uoth12sp (Integer)
           4486 => ( Parameter_Integer, 0 ),   --  : uoth13sp (Integer)
           4487 => ( Parameter_Integer, 0 ),   --  : uoth21hd (Integer)
           4488 => ( Parameter_Integer, 0 ),   --  : uoth22hd (Integer)
           4489 => ( Parameter_Integer, 0 ),   --  : uoth23hd (Integer)
           4490 => ( Parameter_Integer, 0 ),   --  : uoth21sp (Integer)
           4491 => ( Parameter_Integer, 0 ),   --  : uoth22sp (Integer)
           4492 => ( Parameter_Integer, 0 ),   --  : uoth23sp (Integer)
           4493 => ( Parameter_Integer, 0 ),   --  : uoth31hd (Integer)
           4494 => ( Parameter_Integer, 0 ),   --  : uoth32hd (Integer)
           4495 => ( Parameter_Integer, 0 ),   --  : uoth33hd (Integer)
           4496 => ( Parameter_Integer, 0 ),   --  : uoth31sp (Integer)
           4497 => ( Parameter_Integer, 0 ),   --  : uoth32sp (Integer)
           4498 => ( Parameter_Integer, 0 ),   --  : uoth33sp (Integer)
           4499 => ( Parameter_Integer, 0 ),   --  : uoth41hd (Integer)
           4500 => ( Parameter_Integer, 0 ),   --  : uoth42hd (Integer)
           4501 => ( Parameter_Integer, 0 ),   --  : uoth43hd (Integer)
           4502 => ( Parameter_Integer, 0 ),   --  : uoth41sp (Integer)
           4503 => ( Parameter_Integer, 0 ),   --  : uoth42sp (Integer)
           4504 => ( Parameter_Integer, 0 ),   --  : uoth43sp (Integer)
           4505 => ( Parameter_Integer, 0 ),   --  : uoth51hd (Integer)
           4506 => ( Parameter_Integer, 0 ),   --  : uoth52hd (Integer)
           4507 => ( Parameter_Integer, 0 ),   --  : uoth53hd (Integer)
           4508 => ( Parameter_Integer, 0 ),   --  : uoth51sp (Integer)
           4509 => ( Parameter_Integer, 0 ),   --  : uoth52sp (Integer)
           4510 => ( Parameter_Integer, 0 ),   --  : uoth53sp (Integer)
           4511 => ( Parameter_Integer, 0 ),   --  : uoth61hd (Integer)
           4512 => ( Parameter_Integer, 0 ),   --  : uoth62hd (Integer)
           4513 => ( Parameter_Integer, 0 ),   --  : uoth63hd (Integer)
           4514 => ( Parameter_Integer, 0 ),   --  : uoth61sp (Integer)
           4515 => ( Parameter_Integer, 0 ),   --  : uoth62sp (Integer)
           4516 => ( Parameter_Integer, 0 ),   --  : uoth63sp (Integer)
           4517 => ( Parameter_Integer, 0 ),   --  : uoth71hd (Integer)
           4518 => ( Parameter_Integer, 0 ),   --  : uoth72hd (Integer)
           4519 => ( Parameter_Integer, 0 ),   --  : uoth73hd (Integer)
           4520 => ( Parameter_Integer, 0 ),   --  : uoth71sp (Integer)
           4521 => ( Parameter_Integer, 0 ),   --  : uoth72sp (Integer)
           4522 => ( Parameter_Integer, 0 ),   --  : uoth73sp (Integer)
           4523 => ( Parameter_Integer, 0 ),   --  : uoth81hd (Integer)
           4524 => ( Parameter_Integer, 0 ),   --  : uoth82hd (Integer)
           4525 => ( Parameter_Integer, 0 ),   --  : uoth83hd (Integer)
           4526 => ( Parameter_Integer, 0 ),   --  : uoth81sp (Integer)
           4527 => ( Parameter_Integer, 0 ),   --  : uoth82sp (Integer)
           4528 => ( Parameter_Integer, 0 ),   --  : uoth83sp (Integer)
           4529 => ( Parameter_Integer, 0 ),   --  : uoth91hd (Integer)
           4530 => ( Parameter_Integer, 0 ),   --  : uoth92hd (Integer)
           4531 => ( Parameter_Integer, 0 ),   --  : uoth93hd (Integer)
           4532 => ( Parameter_Integer, 0 ),   --  : uoth91sp (Integer)
           4533 => ( Parameter_Integer, 0 ),   --  : uoth92sp (Integer)
           4534 => ( Parameter_Integer, 0 ),   --  : uoth93sp (Integer)
           4535 => ( Parameter_Integer, 0 ),   --  : uot101hd (Integer)
           4536 => ( Parameter_Integer, 0 ),   --  : uot102hd (Integer)
           4537 => ( Parameter_Integer, 0 ),   --  : uot103hd (Integer)
           4538 => ( Parameter_Integer, 0 ),   --  : uot101sp (Integer)
           4539 => ( Parameter_Integer, 0 ),   --  : uot102sp (Integer)
           4540 => ( Parameter_Integer, 0 ),   --  : uot103sp (Integer)
           4541 => ( Parameter_Float, 0.0 ),   --  : uotht1hd (Amount)
           4542 => ( Parameter_Integer, 0 ),   --  : uotht2hd (Integer)
           4543 => ( Parameter_Integer, 0 ),   --  : uotht3hd (Integer)
           4544 => ( Parameter_Integer, 0 ),   --  : uotht1sp (Integer)
           4545 => ( Parameter_Integer, 0 ),   --  : uotht2sp (Integer)
           4546 => ( Parameter_Integer, 0 ),   --  : uotht3sp (Integer)
           4547 => ( Parameter_Float, 0.0 ),   --  : uothr1hd (Amount)
           4548 => ( Parameter_Float, 0.0 ),   --  : uothr2hd (Amount)
           4549 => ( Parameter_Integer, 0 ),   --  : uothr3hd (Integer)
           4550 => ( Parameter_Float, 0.0 ),   --  : uothr1sp (Amount)
           4551 => ( Parameter_Float, 0.0 ),   --  : uothr2sp (Amount)
           4552 => ( Parameter_Integer, 0 ),   --  : uothr3sp (Integer)
           4553 => ( Parameter_Integer, 0 ),   --  : upay1hd (Integer)
           4554 => ( Parameter_Integer, 0 ),   --  : upay2hd (Integer)
           4555 => ( Parameter_Integer, 0 ),   --  : upay3hd (Integer)
           4556 => ( Parameter_Integer, 0 ),   --  : upay1sp (Integer)
           4557 => ( Parameter_Integer, 0 ),   --  : upay2sp (Integer)
           4558 => ( Parameter_Integer, 0 ),   --  : upay3sp (Integer)
           4559 => ( Parameter_Integer, 0 ),   --  : usapa1hd (Integer)
           4560 => ( Parameter_Integer, 0 ),   --  : usapa2hd (Integer)
           4561 => ( Parameter_Integer, 0 ),   --  : usapa3hd (Integer)
           4562 => ( Parameter_Integer, 0 ),   --  : usapa1sp (Integer)
           4563 => ( Parameter_Integer, 0 ),   --  : usapa2sp (Integer)
           4564 => ( Parameter_Integer, 0 ),   --  : usapa3sp (Integer)
           4565 => ( Parameter_Float, 0.0 ),   --  : uspam1hd (Amount)
           4566 => ( Parameter_Integer, 0 ),   --  : uspam2hd (Integer)
           4567 => ( Parameter_Integer, 0 ),   --  : uspam3hd (Integer)
           4568 => ( Parameter_Float, 0.0 ),   --  : uspam1sp (Amount)
           4569 => ( Parameter_Integer, 0 ),   --  : uspam2sp (Integer)
           4570 => ( Parameter_Integer, 0 ),   --  : uspam3sp (Integer)
           4571 => ( Parameter_Integer, 0 ),   --  : uspra1hd (Integer)
           4572 => ( Parameter_Integer, 0 ),   --  : uspra2hd (Integer)
           4573 => ( Parameter_Integer, 0 ),   --  : uspra3hd (Integer)
           4574 => ( Parameter_Integer, 0 ),   --  : uspra1sp (Integer)
           4575 => ( Parameter_Integer, 0 ),   --  : uspra2sp (Integer)
           4576 => ( Parameter_Integer, 0 ),   --  : uspra3sp (Integer)
           4577 => ( Parameter_Integer, 0 ),   --  : uppam1hd (Integer)
           4578 => ( Parameter_Integer, 0 ),   --  : uppam2hd (Integer)
           4579 => ( Parameter_Integer, 0 ),   --  : uppam3hd (Integer)
           4580 => ( Parameter_Integer, 0 ),   --  : uppam1sp (Integer)
           4581 => ( Parameter_Integer, 0 ),   --  : uppam2sp (Integer)
           4582 => ( Parameter_Integer, 0 ),   --  : uppam3sp (Integer)
           4583 => ( Parameter_Float, 0.0 ),   --  : usspa1hd (Amount)
           4584 => ( Parameter_Integer, 0 ),   --  : usspa2hd (Integer)
           4585 => ( Parameter_Integer, 0 ),   --  : usspa3hd (Integer)
           4586 => ( Parameter_Integer, 0 ),   --  : usspa1sp (Integer)
           4587 => ( Parameter_Integer, 0 ),   --  : usspa2sp (Integer)
           4588 => ( Parameter_Integer, 0 ),   --  : usspa3sp (Integer)
           4589 => ( Parameter_Float, 0.0 ),   --  : to2hr1hd (Amount)
           4590 => ( Parameter_Float, 0.0 ),   --  : to2hr2hd (Amount)
           4591 => ( Parameter_Integer, 0 ),   --  : to2hr3hd (Integer)
           4592 => ( Parameter_Float, 0.0 ),   --  : to2hr1sp (Amount)
           4593 => ( Parameter_Float, 0.0 ),   --  : to2hr2sp (Amount)
           4594 => ( Parameter_Integer, 0 ),   --  : to2hr3sp (Integer)
           4595 => ( Parameter_Float, 0.0 ),   --  : utaxa1hd (Amount)
           4596 => ( Parameter_Integer, 0 ),   --  : utaxa2hd (Integer)
           4597 => ( Parameter_Integer, 0 ),   --  : utaxa3hd (Integer)
           4598 => ( Parameter_Float, 0.0 ),   --  : utaxa1sp (Amount)
           4599 => ( Parameter_Integer, 0 ),   --  : utaxa2sp (Integer)
           4600 => ( Parameter_Integer, 0 ),   --  : utaxa3sp (Integer)
           4601 => ( Parameter_Float, 0.0 ),   --  : vcamt1hd (Amount)
           4602 => ( Parameter_Integer, 0 ),   --  : vcamt2hd (Integer)
           4603 => ( Parameter_Integer, 0 ),   --  : vcamt3hd (Integer)
           4604 => ( Parameter_Float, 0.0 ),   --  : vcamt1sp (Amount)
           4605 => ( Parameter_Integer, 0 ),   --  : vcamt2sp (Integer)
           4606 => ( Parameter_Integer, 0 ),   --  : vcamt3sp (Integer)
           4607 => ( Parameter_Integer, 0 ),   --  : vcpd1hd (Integer)
           4608 => ( Parameter_Integer, 0 ),   --  : vcpd2hd (Integer)
           4609 => ( Parameter_Integer, 0 ),   --  : vcpd3hd (Integer)
           4610 => ( Parameter_Integer, 0 ),   --  : vcpd1sp (Integer)
           4611 => ( Parameter_Integer, 0 ),   --  : vcpd2sp (Integer)
           4612 => ( Parameter_Integer, 0 ),   --  : vcpd3sp (Integer)
           4613 => ( Parameter_Integer, 0 ),   --  : vcsac1hd (Integer)
           4614 => ( Parameter_Integer, 0 ),   --  : vcsac2hd (Integer)
           4615 => ( Parameter_Integer, 0 ),   --  : vcsac3hd (Integer)
           4616 => ( Parameter_Integer, 0 ),   --  : vcsac1sp (Integer)
           4617 => ( Parameter_Integer, 0 ),   --  : vcsac2sp (Integer)
           4618 => ( Parameter_Integer, 0 ),   --  : vcsac3sp (Integer)
           4619 => ( Parameter_Integer, 0 ),   --  : vcuam1hd (Integer)
           4620 => ( Parameter_Integer, 0 ),   --  : vcuam2hd (Integer)
           4621 => ( Parameter_Integer, 0 ),   --  : vcuam3hd (Integer)
           4622 => ( Parameter_Integer, 0 ),   --  : vcuam1sp (Integer)
           4623 => ( Parameter_Integer, 0 ),   --  : vcuam2sp (Integer)
           4624 => ( Parameter_Integer, 0 ),   --  : vcuam3sp (Integer)
           4625 => ( Parameter_Integer, 0 ),   --  : vcupd1hd (Integer)
           4626 => ( Parameter_Integer, 0 ),   --  : vcupd2hd (Integer)
           4627 => ( Parameter_Integer, 0 ),   --  : vcupd3hd (Integer)
           4628 => ( Parameter_Integer, 0 ),   --  : vcupd1sp (Integer)
           4629 => ( Parameter_Integer, 0 ),   --  : vcupd2sp (Integer)
           4630 => ( Parameter_Integer, 0 ),   --  : vcupd3sp (Integer)
           4631 => ( Parameter_Integer, 0 ),   --  : vcusu1hd (Integer)
           4632 => ( Parameter_Integer, 0 ),   --  : vcusu2hd (Integer)
           4633 => ( Parameter_Integer, 0 ),   --  : vcusu3hd (Integer)
           4634 => ( Parameter_Integer, 0 ),   --  : vcusu1sp (Integer)
           4635 => ( Parameter_Integer, 0 ),   --  : vcusu2sp (Integer)
           4636 => ( Parameter_Integer, 0 ),   --  : vcusu3sp (Integer)
           4637 => ( Parameter_Integer, 0 ),   --  : nou011hd (Integer)
           4638 => ( Parameter_Integer, 0 ),   --  : nou012hd (Integer)
           4639 => ( Parameter_Integer, 0 ),   --  : nou013hd (Integer)
           4640 => ( Parameter_Integer, 0 ),   --  : nou011sp (Integer)
           4641 => ( Parameter_Integer, 0 ),   --  : nou012sp (Integer)
           4642 => ( Parameter_Integer, 0 ),   --  : nou013sp (Integer)
           4643 => ( Parameter_Integer, 0 ),   --  : nou021hd (Integer)
           4644 => ( Parameter_Integer, 0 ),   --  : nou022hd (Integer)
           4645 => ( Parameter_Integer, 0 ),   --  : nou023hd (Integer)
           4646 => ( Parameter_Integer, 0 ),   --  : nou021sp (Integer)
           4647 => ( Parameter_Integer, 0 ),   --  : nou022sp (Integer)
           4648 => ( Parameter_Integer, 0 ),   --  : nou023sp (Integer)
           4649 => ( Parameter_Integer, 0 ),   --  : nou031hd (Integer)
           4650 => ( Parameter_Integer, 0 ),   --  : nou032hd (Integer)
           4651 => ( Parameter_Integer, 0 ),   --  : nou033hd (Integer)
           4652 => ( Parameter_Integer, 0 ),   --  : nou031sp (Integer)
           4653 => ( Parameter_Integer, 0 ),   --  : nou032sp (Integer)
           4654 => ( Parameter_Integer, 0 ),   --  : nou033sp (Integer)
           4655 => ( Parameter_Integer, 0 ),   --  : nou041hd (Integer)
           4656 => ( Parameter_Integer, 0 ),   --  : nou042hd (Integer)
           4657 => ( Parameter_Integer, 0 ),   --  : nou043hd (Integer)
           4658 => ( Parameter_Integer, 0 ),   --  : nou041sp (Integer)
           4659 => ( Parameter_Integer, 0 ),   --  : nou042sp (Integer)
           4660 => ( Parameter_Integer, 0 ),   --  : nou043sp (Integer)
           4661 => ( Parameter_Integer, 0 ),   --  : nou051hd (Integer)
           4662 => ( Parameter_Integer, 0 ),   --  : nou052hd (Integer)
           4663 => ( Parameter_Integer, 0 ),   --  : nou053hd (Integer)
           4664 => ( Parameter_Integer, 0 ),   --  : nou051sp (Integer)
           4665 => ( Parameter_Integer, 0 ),   --  : nou052sp (Integer)
           4666 => ( Parameter_Integer, 0 ),   --  : nou053sp (Integer)
           4667 => ( Parameter_Integer, 0 ),   --  : nou061hd (Integer)
           4668 => ( Parameter_Integer, 0 ),   --  : nou062hd (Integer)
           4669 => ( Parameter_Integer, 0 ),   --  : nou063hd (Integer)
           4670 => ( Parameter_Integer, 0 ),   --  : nou061sp (Integer)
           4671 => ( Parameter_Integer, 0 ),   --  : nou062sp (Integer)
           4672 => ( Parameter_Integer, 0 ),   --  : nou063sp (Integer)
           4673 => ( Parameter_Integer, 0 ),   --  : nou071hd (Integer)
           4674 => ( Parameter_Integer, 0 ),   --  : nou072hd (Integer)
           4675 => ( Parameter_Integer, 0 ),   --  : nou073hd (Integer)
           4676 => ( Parameter_Integer, 0 ),   --  : nou071sp (Integer)
           4677 => ( Parameter_Integer, 0 ),   --  : nou072sp (Integer)
           4678 => ( Parameter_Integer, 0 ),   --  : nou073sp (Integer)
           4679 => ( Parameter_Integer, 0 ),   --  : nou081hd (Integer)
           4680 => ( Parameter_Integer, 0 ),   --  : nou082hd (Integer)
           4681 => ( Parameter_Integer, 0 ),   --  : nou083hd (Integer)
           4682 => ( Parameter_Integer, 0 ),   --  : nou081sp (Integer)
           4683 => ( Parameter_Integer, 0 ),   --  : nou082sp (Integer)
           4684 => ( Parameter_Integer, 0 ),   --  : nou083sp (Integer)
           4685 => ( Parameter_Integer, 0 ),   --  : nou091hd (Integer)
           4686 => ( Parameter_Integer, 0 ),   --  : nou092hd (Integer)
           4687 => ( Parameter_Integer, 0 ),   --  : nou093hd (Integer)
           4688 => ( Parameter_Integer, 0 ),   --  : nou091sp (Integer)
           4689 => ( Parameter_Integer, 0 ),   --  : nou092sp (Integer)
           4690 => ( Parameter_Integer, 0 ),   --  : nou093sp (Integer)
           4691 => ( Parameter_Integer, 0 ),   --  : nou101hd (Integer)
           4692 => ( Parameter_Integer, 0 ),   --  : nou102hd (Integer)
           4693 => ( Parameter_Integer, 0 ),   --  : nou103hd (Integer)
           4694 => ( Parameter_Integer, 0 ),   --  : nou101sp (Integer)
           4695 => ( Parameter_Integer, 0 ),   --  : nou102sp (Integer)
           4696 => ( Parameter_Integer, 0 ),   --  : nou103sp (Integer)
           4697 => ( Parameter_Integer, 0 ),   --  : nou111hd (Integer)
           4698 => ( Parameter_Integer, 0 ),   --  : nou112hd (Integer)
           4699 => ( Parameter_Integer, 0 ),   --  : nou113hd (Integer)
           4700 => ( Parameter_Integer, 0 ),   --  : nou111sp (Integer)
           4701 => ( Parameter_Integer, 0 ),   --  : nou112sp (Integer)
           4702 => ( Parameter_Integer, 0 ),   --  : nou113sp (Integer)
           4703 => ( Parameter_Integer, 0 ),   --  : nou121hd (Integer)
           4704 => ( Parameter_Integer, 0 ),   --  : nou122hd (Integer)
           4705 => ( Parameter_Integer, 0 ),   --  : nou123hd (Integer)
           4706 => ( Parameter_Integer, 0 ),   --  : nou121sp (Integer)
           4707 => ( Parameter_Integer, 0 ),   --  : nou122sp (Integer)
           4708 => ( Parameter_Integer, 0 ),   --  : nou123sp (Integer)
           4709 => ( Parameter_Integer, 0 ),   --  : nou131hd (Integer)
           4710 => ( Parameter_Integer, 0 ),   --  : nou132hd (Integer)
           4711 => ( Parameter_Integer, 0 ),   --  : nou133hd (Integer)
           4712 => ( Parameter_Integer, 0 ),   --  : nou131sp (Integer)
           4713 => ( Parameter_Integer, 0 ),   --  : nou132sp (Integer)
           4714 => ( Parameter_Integer, 0 ),   --  : nou133sp (Integer)
           4715 => ( Parameter_Integer, 0 ),   --  : nou141hd (Integer)
           4716 => ( Parameter_Integer, 0 ),   --  : nou142hd (Integer)
           4717 => ( Parameter_Integer, 0 ),   --  : nou143hd (Integer)
           4718 => ( Parameter_Integer, 0 ),   --  : nou141sp (Integer)
           4719 => ( Parameter_Integer, 0 ),   --  : nou142sp (Integer)
           4720 => ( Parameter_Integer, 0 ),   --  : nou143sp (Integer)
           4721 => ( Parameter_Integer, 0 ),   --  : worka1hd (Integer)
           4722 => ( Parameter_Integer, 0 ),   --  : worka2hd (Integer)
           4723 => ( Parameter_Integer, 0 ),   --  : worka3hd (Integer)
           4724 => ( Parameter_Integer, 0 ),   --  : worka1sp (Integer)
           4725 => ( Parameter_Integer, 0 ),   --  : worka2sp (Integer)
           4726 => ( Parameter_Integer, 0 ),   --  : worka3sp (Integer)
           4727 => ( Parameter_Integer, 0 ),   --  : workm1hd (Integer)
           4728 => ( Parameter_Integer, 0 ),   --  : workm2hd (Integer)
           4729 => ( Parameter_Integer, 0 ),   --  : workm3hd (Integer)
           4730 => ( Parameter_Integer, 0 ),   --  : workm1sp (Integer)
           4731 => ( Parameter_Integer, 0 ),   --  : workm2sp (Integer)
           4732 => ( Parameter_Integer, 0 ),   --  : workm3sp (Integer)
           4733 => ( Parameter_Integer, 0 ),   --  : worky1hd (Integer)
           4734 => ( Parameter_Integer, 0 ),   --  : worky2hd (Integer)
           4735 => ( Parameter_Integer, 0 ),   --  : worky3hd (Integer)
           4736 => ( Parameter_Integer, 0 ),   --  : worky1sp (Integer)
           4737 => ( Parameter_Integer, 0 ),   --  : worky2sp (Integer)
           4738 => ( Parameter_Integer, 0 ),   --  : worky3sp (Integer)
           4739 => ( Parameter_Integer, 0 ),   --  : yjchg1hd (Integer)
           4740 => ( Parameter_Integer, 0 ),   --  : yjchg2hd (Integer)
           4741 => ( Parameter_Integer, 0 ),   --  : yjchg3hd (Integer)
           4742 => ( Parameter_Integer, 0 ),   --  : yjchg1sp (Integer)
           4743 => ( Parameter_Integer, 0 ),   --  : yjchg2sp (Integer)
           4744 => ( Parameter_Integer, 0 ),   --  : yjchg3sp (Integer)
           4745 => ( Parameter_Float, 0.0 ),   --  : mp1hd (Amount)
           4746 => ( Parameter_Float, 0.0 ),   --  : mp2hd (Amount)
           4747 => ( Parameter_Float, 0.0 ),   --  : mp3hd (Amount)
           4748 => ( Parameter_Float, 0.0 ),   --  : mp1sp (Amount)
           4749 => ( Parameter_Float, 0.0 ),   --  : mp2sp (Amount)
           4750 => ( Parameter_Integer, 0 ),   --  : mp3sp (Integer)
           4751 => ( Parameter_Integer, 0 ),   --  : mrar11hd (Integer)
           4752 => ( Parameter_Integer, 0 ),   --  : mrar12hd (Integer)
           4753 => ( Parameter_Integer, 0 ),   --  : mrar13hd (Integer)
           4754 => ( Parameter_Integer, 0 ),   --  : mrar11sp (Integer)
           4755 => ( Parameter_Integer, 0 ),   --  : mrar12sp (Integer)
           4756 => ( Parameter_Integer, 0 ),   --  : mrar13sp (Integer)
           4757 => ( Parameter_Integer, 0 ),   --  : mrar21hd (Integer)
           4758 => ( Parameter_Integer, 0 ),   --  : mrar22hd (Integer)
           4759 => ( Parameter_Integer, 0 ),   --  : mrar23hd (Integer)
           4760 => ( Parameter_Integer, 0 ),   --  : mrar21sp (Integer)
           4761 => ( Parameter_Integer, 0 ),   --  : mrar22sp (Integer)
           4762 => ( Parameter_Integer, 0 ),   --  : mrar23sp (Integer)
           4763 => ( Parameter_Integer, 0 ),   --  : mrar31hd (Integer)
           4764 => ( Parameter_Integer, 0 ),   --  : mrar32hd (Integer)
           4765 => ( Parameter_Integer, 0 ),   --  : mrar33hd (Integer)
           4766 => ( Parameter_Integer, 0 ),   --  : mrar31sp (Integer)
           4767 => ( Parameter_Integer, 0 ),   --  : mrar32sp (Integer)
           4768 => ( Parameter_Integer, 0 ),   --  : mrar33sp (Integer)
           4769 => ( Parameter_Integer, 0 ),   --  : mrar41hd (Integer)
           4770 => ( Parameter_Integer, 0 ),   --  : mrar42hd (Integer)
           4771 => ( Parameter_Integer, 0 ),   --  : mrar43hd (Integer)
           4772 => ( Parameter_Integer, 0 ),   --  : mrar41sp (Integer)
           4773 => ( Parameter_Integer, 0 ),   --  : mrar42sp (Integer)
           4774 => ( Parameter_Integer, 0 ),   --  : mrar43sp (Integer)
           4775 => ( Parameter_Integer, 0 ),   --  : mrar51hd (Integer)
           4776 => ( Parameter_Integer, 0 ),   --  : mrar52hd (Integer)
           4777 => ( Parameter_Integer, 0 ),   --  : mrar53hd (Integer)
           4778 => ( Parameter_Integer, 0 ),   --  : mrar51sp (Integer)
           4779 => ( Parameter_Integer, 0 ),   --  : mrar52sp (Integer)
           4780 => ( Parameter_Integer, 0 ),   --  : mrar53sp (Integer)
           4781 => ( Parameter_Integer, 0 ),   --  : mpnch1hd (Integer)
           4782 => ( Parameter_Integer, 0 ),   --  : mpnch2hd (Integer)
           4783 => ( Parameter_Integer, 0 ),   --  : mpnch3hd (Integer)
           4784 => ( Parameter_Integer, 0 ),   --  : mpnch1sp (Integer)
           4785 => ( Parameter_Integer, 0 ),   --  : mpnch2sp (Integer)
           4786 => ( Parameter_Integer, 0 ),   --  : mpnch3sp (Integer)
           4787 => ( Parameter_Integer, 0 ),   --  : pmp1hd (Integer)
           4788 => ( Parameter_Integer, 0 ),   --  : pmp2hd (Integer)
           4789 => ( Parameter_Integer, 0 ),   --  : pmp3hd (Integer)
           4790 => ( Parameter_Integer, 0 ),   --  : pmp1sp (Integer)
           4791 => ( Parameter_Integer, 0 ),   --  : pmp2sp (Integer)
           4792 => ( Parameter_Integer, 0 ),   --  : pmp3sp (Integer)
           4793 => ( Parameter_Float, 0.0 ),   --  : ump1hd (Amount)
           4794 => ( Parameter_Float, 0.0 ),   --  : ump2hd (Amount)
           4795 => ( Parameter_Integer, 0 ),   --  : ump3hd (Integer)
           4796 => ( Parameter_Float, 0.0 ),   --  : ump1sp (Amount)
           4797 => ( Parameter_Integer, 0 ),   --  : ump2sp (Integer)
           4798 => ( Parameter_Integer, 0 ),   --  : ump3sp (Integer)
           4799 => ( Parameter_Integer, 0 ),   --  : pump1hd (Integer)
           4800 => ( Parameter_Integer, 0 ),   --  : pump2hd (Integer)
           4801 => ( Parameter_Integer, 0 ),   --  : pump3hd (Integer)
           4802 => ( Parameter_Integer, 0 ),   --  : pump1sp (Integer)
           4803 => ( Parameter_Integer, 0 ),   --  : pump2sp (Integer)
           4804 => ( Parameter_Integer, 0 ),   --  : pump3sp (Integer)
           4805 => ( Parameter_Integer, 0 ),   --  : isump1hd (Integer)
           4806 => ( Parameter_Integer, 0 ),   --  : isump2hd (Integer)
           4807 => ( Parameter_Integer, 0 ),   --  : isump3hd (Integer)
           4808 => ( Parameter_Integer, 0 ),   --  : isump1sp (Integer)
           4809 => ( Parameter_Integer, 0 ),   --  : isump2sp (Integer)
           4810 => ( Parameter_Integer, 0 ),   --  : isump3sp (Integer)
           4811 => ( Parameter_Integer, 0 ),   --  : jobst1hd (Integer)
           4812 => ( Parameter_Integer, 0 ),   --  : jobst2hd (Integer)
           4813 => ( Parameter_Integer, 0 ),   --  : jobst1sp (Integer)
           4814 => ( Parameter_Integer, 0 ),   --  : jobst2sp (Integer)
           4815 => ( Parameter_Integer, 0 ),   --  : oddtp1hd (Integer)
           4816 => ( Parameter_Integer, 0 ),   --  : oddtp2hd (Integer)
           4817 => ( Parameter_Integer, 0 ),   --  : oddtp1sp (Integer)
           4818 => ( Parameter_Integer, 0 ),   --  : oddtp2sp (Integer)
           4819 => ( Parameter_Float, 0.0 ),   --  : oddjb1hd (Amount)
           4820 => ( Parameter_Float, 0.0 ),   --  : oddjb2hd (Amount)
           4821 => ( Parameter_Float, 0.0 ),   --  : oddjb1sp (Amount)
           4822 => ( Parameter_Integer, 0 ),   --  : oddjb2sp (Integer)
           4823 => ( Parameter_Integer, 0 ),   --  : oddjn1hd (Integer)
           4824 => ( Parameter_Integer, 0 ),   --  : oddjn2hd (Integer)
           4825 => ( Parameter_Integer, 0 ),   --  : oddjn1sp (Integer)
           4826 => ( Parameter_Integer, 0 ),   --  : oddjn2sp (Integer)
           4827 => ( Parameter_Integer, 0 ),   --  : poth1hd (Integer)
           4828 => ( Parameter_Integer, 0 ),   --  : poth2hd (Integer)
           4829 => ( Parameter_Integer, 0 ),   --  : poth3hd (Integer)
           4830 => ( Parameter_Integer, 0 ),   --  : poth4hd (Integer)
           4831 => ( Parameter_Integer, 0 ),   --  : poth5hd (Integer)
           4832 => ( Parameter_Integer, 0 ),   --  : poth6hd (Integer)
           4833 => ( Parameter_Integer, 0 ),   --  : poth7hd (Integer)
           4834 => ( Parameter_Integer, 0 ),   --  : poth8hd (Integer)
           4835 => ( Parameter_Integer, 0 ),   --  : poth9hd (Integer)
           4836 => ( Parameter_Integer, 0 ),   --  : poth10hd (Integer)
           4837 => ( Parameter_Integer, 0 ),   --  : poth11hd (Integer)
           4838 => ( Parameter_Integer, 0 ),   --  : poth12hd (Integer)
           4839 => ( Parameter_Integer, 0 ),   --  : poth13hd (Integer)
           4840 => ( Parameter_Integer, 0 ),   --  : poth14hd (Integer)
           4841 => ( Parameter_Integer, 0 ),   --  : poth15hd (Integer)
           4842 => ( Parameter_Integer, 0 ),   --  : poth16hd (Integer)
           4843 => ( Parameter_Integer, 0 ),   --  : poth17hd (Integer)
           4844 => ( Parameter_Integer, 0 ),   --  : poth18hd (Integer)
           4845 => ( Parameter_Integer, 0 ),   --  : poth19hd (Integer)
           4846 => ( Parameter_Integer, 0 ),   --  : poth1sp (Integer)
           4847 => ( Parameter_Integer, 0 ),   --  : poth2sp (Integer)
           4848 => ( Parameter_Integer, 0 ),   --  : poth3sp (Integer)
           4849 => ( Parameter_Integer, 0 ),   --  : poth4sp (Integer)
           4850 => ( Parameter_Integer, 0 ),   --  : poth5sp (Integer)
           4851 => ( Parameter_Integer, 0 ),   --  : poth6sp (Integer)
           4852 => ( Parameter_Integer, 0 ),   --  : poth7sp (Integer)
           4853 => ( Parameter_Integer, 0 ),   --  : poth8sp (Integer)
           4854 => ( Parameter_Integer, 0 ),   --  : poth9sp (Integer)
           4855 => ( Parameter_Integer, 0 ),   --  : poth10sp (Integer)
           4856 => ( Parameter_Integer, 0 ),   --  : poth11sp (Integer)
           4857 => ( Parameter_Integer, 0 ),   --  : poth12sp (Integer)
           4858 => ( Parameter_Integer, 0 ),   --  : poth13sp (Integer)
           4859 => ( Parameter_Integer, 0 ),   --  : poth14sp (Integer)
           4860 => ( Parameter_Integer, 0 ),   --  : poth15sp (Integer)
           4861 => ( Parameter_Integer, 0 ),   --  : poth16sp (Integer)
           4862 => ( Parameter_Integer, 0 ),   --  : poth17sp (Integer)
           4863 => ( Parameter_Integer, 0 ),   --  : poth18sp (Integer)
           4864 => ( Parameter_Integer, 0 ),   --  : poth19sp (Integer)
           4865 => ( Parameter_Float, 0.0 ),   --  : ocpen1hd (Amount)
           4866 => ( Parameter_Float, 0.0 ),   --  : ocpen2hd (Amount)
           4867 => ( Parameter_Float, 0.0 ),   --  : ocpen3hd (Amount)
           4868 => ( Parameter_Float, 0.0 ),   --  : ocpen4hd (Amount)
           4869 => ( Parameter_Float, 0.0 ),   --  : wpen1hd (Amount)
           4870 => ( Parameter_Float, 0.0 ),   --  : wpen2hd (Amount)
           4871 => ( Parameter_Float, 0.0 ),   --  : wpen3hd (Amount)
           4872 => ( Parameter_Float, 0.0 ),   --  : ppen1hd (Amount)
           4873 => ( Parameter_Float, 0.0 ),   --  : ppen2hd (Amount)
           4874 => ( Parameter_Float, 0.0 ),   --  : ppen3hd (Amount)
           4875 => ( Parameter_Float, 0.0 ),   --  : tupen1hd (Amount)
           4876 => ( Parameter_Integer, 0 ),   --  : tupen2hd (Integer)
           4877 => ( Parameter_Float, 0.0 ),   --  : anpen1hd (Amount)
           4878 => ( Parameter_Float, 0.0 ),   --  : anpen2hd (Amount)
           4879 => ( Parameter_Integer, 0 ),   --  : anpen3hd (Integer)
           4880 => ( Parameter_Float, 0.0 ),   --  : trust1hd (Amount)
           4881 => ( Parameter_Integer, 0 ),   --  : trust2hd (Integer)
           4882 => ( Parameter_Float, 0.0 ),   --  : expen1hd (Amount)
           4883 => ( Parameter_Integer, 0 ),   --  : expen2hd (Integer)
           4884 => ( Parameter_Float, 0.0 ),   --  : ocpen1sp (Amount)
           4885 => ( Parameter_Float, 0.0 ),   --  : ocpen2sp (Amount)
           4886 => ( Parameter_Float, 0.0 ),   --  : ocpen3sp (Amount)
           4887 => ( Parameter_Float, 0.0 ),   --  : ocpen4sp (Amount)
           4888 => ( Parameter_Float, 0.0 ),   --  : wpen1sp (Amount)
           4889 => ( Parameter_Integer, 0 ),   --  : wpen2sp (Integer)
           4890 => ( Parameter_Integer, 0 ),   --  : wpen3sp (Integer)
           4891 => ( Parameter_Float, 0.0 ),   --  : ppen1sp (Amount)
           4892 => ( Parameter_Float, 0.0 ),   --  : ppen2sp (Amount)
           4893 => ( Parameter_Float, 0.0 ),   --  : ppen3sp (Amount)
           4894 => ( Parameter_Float, 0.0 ),   --  : tupen1sp (Amount)
           4895 => ( Parameter_Integer, 0 ),   --  : tupen2sp (Integer)
           4896 => ( Parameter_Float, 0.0 ),   --  : anpen1sp (Amount)
           4897 => ( Parameter_Float, 0.0 ),   --  : anpen2sp (Amount)
           4898 => ( Parameter_Integer, 0 ),   --  : anpen3sp (Integer)
           4899 => ( Parameter_Float, 0.0 ),   --  : trust1sp (Amount)
           4900 => ( Parameter_Integer, 0 ),   --  : trust2sp (Integer)
           4901 => ( Parameter_Float, 0.0 ),   --  : expen1sp (Amount)
           4902 => ( Parameter_Integer, 0 ),   --  : expen2sp (Integer)
           4903 => ( Parameter_Integer, 0 ),   --  : pcpen1hd (Integer)
           4904 => ( Parameter_Integer, 0 ),   --  : pcpen2hd (Integer)
           4905 => ( Parameter_Integer, 0 ),   --  : pcpen3hd (Integer)
           4906 => ( Parameter_Integer, 0 ),   --  : pcpen4hd (Integer)
           4907 => ( Parameter_Integer, 0 ),   --  : pwpen1hd (Integer)
           4908 => ( Parameter_Integer, 0 ),   --  : pwpen2hd (Integer)
           4909 => ( Parameter_Integer, 0 ),   --  : pwpen3hd (Integer)
           4910 => ( Parameter_Integer, 0 ),   --  : pppen1hd (Integer)
           4911 => ( Parameter_Integer, 0 ),   --  : pppen2hd (Integer)
           4912 => ( Parameter_Integer, 0 ),   --  : pppen3hd (Integer)
           4913 => ( Parameter_Integer, 0 ),   --  : ptupn1hd (Integer)
           4914 => ( Parameter_Integer, 0 ),   --  : ptupn2hd (Integer)
           4915 => ( Parameter_Integer, 0 ),   --  : panpn1hd (Integer)
           4916 => ( Parameter_Integer, 0 ),   --  : panpn2hd (Integer)
           4917 => ( Parameter_Integer, 0 ),   --  : panpn3hd (Integer)
           4918 => ( Parameter_Integer, 0 ),   --  : ptrst1hd (Integer)
           4919 => ( Parameter_Integer, 0 ),   --  : ptrst2hd (Integer)
           4920 => ( Parameter_Integer, 0 ),   --  : pxpen1hd (Integer)
           4921 => ( Parameter_Integer, 0 ),   --  : pxpen2hd (Integer)
           4922 => ( Parameter_Integer, 0 ),   --  : pcpen1sp (Integer)
           4923 => ( Parameter_Integer, 0 ),   --  : pcpen2sp (Integer)
           4924 => ( Parameter_Integer, 0 ),   --  : pcpen3sp (Integer)
           4925 => ( Parameter_Integer, 0 ),   --  : pcpen4sp (Integer)
           4926 => ( Parameter_Integer, 0 ),   --  : pwpen1sp (Integer)
           4927 => ( Parameter_Integer, 0 ),   --  : pwpen2sp (Integer)
           4928 => ( Parameter_Integer, 0 ),   --  : pwpen3sp (Integer)
           4929 => ( Parameter_Integer, 0 ),   --  : pppen1sp (Integer)
           4930 => ( Parameter_Integer, 0 ),   --  : pppen2sp (Integer)
           4931 => ( Parameter_Integer, 0 ),   --  : pppen3sp (Integer)
           4932 => ( Parameter_Integer, 0 ),   --  : ptupn1sp (Integer)
           4933 => ( Parameter_Integer, 0 ),   --  : ptupn2sp (Integer)
           4934 => ( Parameter_Integer, 0 ),   --  : panpn1sp (Integer)
           4935 => ( Parameter_Integer, 0 ),   --  : panpn2sp (Integer)
           4936 => ( Parameter_Integer, 0 ),   --  : panpn3sp (Integer)
           4937 => ( Parameter_Integer, 0 ),   --  : ptrst1sp (Integer)
           4938 => ( Parameter_Integer, 0 ),   --  : ptrst2sp (Integer)
           4939 => ( Parameter_Integer, 0 ),   --  : pxpen1sp (Integer)
           4940 => ( Parameter_Integer, 0 ),   --  : pxpen2sp (Integer)
           4941 => ( Parameter_Integer, 0 ),   --  : ocptd1hd (Integer)
           4942 => ( Parameter_Integer, 0 ),   --  : ocptd2hd (Integer)
           4943 => ( Parameter_Integer, 0 ),   --  : ocptd3hd (Integer)
           4944 => ( Parameter_Integer, 0 ),   --  : ocptd4hd (Integer)
           4945 => ( Parameter_Integer, 0 ),   --  : wpptd1hd (Integer)
           4946 => ( Parameter_Integer, 0 ),   --  : wpptd2hd (Integer)
           4947 => ( Parameter_Integer, 0 ),   --  : wpptd3hd (Integer)
           4948 => ( Parameter_Integer, 0 ),   --  : ppetd1hd (Integer)
           4949 => ( Parameter_Integer, 0 ),   --  : ppetd2hd (Integer)
           4950 => ( Parameter_Integer, 0 ),   --  : ppetd3hd (Integer)
           4951 => ( Parameter_Integer, 0 ),   --  : tuptd1hd (Integer)
           4952 => ( Parameter_Integer, 0 ),   --  : tuptd2hd (Integer)
           4953 => ( Parameter_Integer, 0 ),   --  : aptd1hd (Integer)
           4954 => ( Parameter_Integer, 0 ),   --  : aptd2hd (Integer)
           4955 => ( Parameter_Integer, 0 ),   --  : aptd3hd (Integer)
           4956 => ( Parameter_Integer, 0 ),   --  : trutd1hd (Integer)
           4957 => ( Parameter_Integer, 0 ),   --  : trutd2hd (Integer)
           4958 => ( Parameter_Integer, 0 ),   --  : exptd1hd (Integer)
           4959 => ( Parameter_Integer, 0 ),   --  : exptd2hd (Integer)
           4960 => ( Parameter_Integer, 0 ),   --  : ocptd1sp (Integer)
           4961 => ( Parameter_Integer, 0 ),   --  : ocptd2sp (Integer)
           4962 => ( Parameter_Integer, 0 ),   --  : ocptd3sp (Integer)
           4963 => ( Parameter_Integer, 0 ),   --  : ocptd4sp (Integer)
           4964 => ( Parameter_Integer, 0 ),   --  : wpptd1sp (Integer)
           4965 => ( Parameter_Integer, 0 ),   --  : wpptd2sp (Integer)
           4966 => ( Parameter_Integer, 0 ),   --  : wpptd3sp (Integer)
           4967 => ( Parameter_Integer, 0 ),   --  : ppetd1sp (Integer)
           4968 => ( Parameter_Integer, 0 ),   --  : ppetd2sp (Integer)
           4969 => ( Parameter_Integer, 0 ),   --  : ppetd3sp (Integer)
           4970 => ( Parameter_Integer, 0 ),   --  : tuptd1sp (Integer)
           4971 => ( Parameter_Integer, 0 ),   --  : tuptd2sp (Integer)
           4972 => ( Parameter_Integer, 0 ),   --  : aptd1sp (Integer)
           4973 => ( Parameter_Integer, 0 ),   --  : aptd2sp (Integer)
           4974 => ( Parameter_Integer, 0 ),   --  : aptd3sp (Integer)
           4975 => ( Parameter_Integer, 0 ),   --  : trutd1sp (Integer)
           4976 => ( Parameter_Integer, 0 ),   --  : trutd2sp (Integer)
           4977 => ( Parameter_Integer, 0 ),   --  : exptd1sp (Integer)
           4978 => ( Parameter_Integer, 0 ),   --  : exptd2sp (Integer)
           4979 => ( Parameter_Integer, 0 ),   --  : ocpid1hd (Integer)
           4980 => ( Parameter_Integer, 0 ),   --  : ocpid2hd (Integer)
           4981 => ( Parameter_Integer, 0 ),   --  : ocpid3hd (Integer)
           4982 => ( Parameter_Integer, 0 ),   --  : ocpid4hd (Integer)
           4983 => ( Parameter_Integer, 0 ),   --  : wwpid1hd (Integer)
           4984 => ( Parameter_Integer, 0 ),   --  : wwpid2hd (Integer)
           4985 => ( Parameter_Integer, 0 ),   --  : wwpid3hd (Integer)
           4986 => ( Parameter_Integer, 0 ),   --  : ppeid1hd (Integer)
           4987 => ( Parameter_Integer, 0 ),   --  : ppeid2hd (Integer)
           4988 => ( Parameter_Integer, 0 ),   --  : ppeid3hd (Integer)
           4989 => ( Parameter_Integer, 0 ),   --  : tupid1hd (Integer)
           4990 => ( Parameter_Integer, 0 ),   --  : tupid2hd (Integer)
           4991 => ( Parameter_Integer, 0 ),   --  : apid1hd (Integer)
           4992 => ( Parameter_Integer, 0 ),   --  : apid2hd (Integer)
           4993 => ( Parameter_Integer, 0 ),   --  : apid3hd (Integer)
           4994 => ( Parameter_Integer, 0 ),   --  : truid1hd (Integer)
           4995 => ( Parameter_Integer, 0 ),   --  : truid2hd (Integer)
           4996 => ( Parameter_Integer, 0 ),   --  : expid1hd (Integer)
           4997 => ( Parameter_Integer, 0 ),   --  : expid2hd (Integer)
           4998 => ( Parameter_Integer, 0 ),   --  : ocpid1sp (Integer)
           4999 => ( Parameter_Integer, 0 ),   --  : ocpid2sp (Integer)
           5000 => ( Parameter_Integer, 0 ),   --  : ocpid3sp (Integer)
           5001 => ( Parameter_Integer, 0 ),   --  : ocpid4sp (Integer)
           5002 => ( Parameter_Integer, 0 ),   --  : wwpid1sp (Integer)
           5003 => ( Parameter_Integer, 0 ),   --  : wwpid2sp (Integer)
           5004 => ( Parameter_Integer, 0 ),   --  : wwpid3sp (Integer)
           5005 => ( Parameter_Integer, 0 ),   --  : ppeid1sp (Integer)
           5006 => ( Parameter_Integer, 0 ),   --  : ppeid2sp (Integer)
           5007 => ( Parameter_Integer, 0 ),   --  : ppeid3sp (Integer)
           5008 => ( Parameter_Integer, 0 ),   --  : tupid1sp (Integer)
           5009 => ( Parameter_Integer, 0 ),   --  : tupid2sp (Integer)
           5010 => ( Parameter_Integer, 0 ),   --  : apid1sp (Integer)
           5011 => ( Parameter_Integer, 0 ),   --  : apid2sp (Integer)
           5012 => ( Parameter_Integer, 0 ),   --  : apid3sp (Integer)
           5013 => ( Parameter_Integer, 0 ),   --  : truid1sp (Integer)
           5014 => ( Parameter_Integer, 0 ),   --  : truid2sp (Integer)
           5015 => ( Parameter_Integer, 0 ),   --  : expid1sp (Integer)
           5016 => ( Parameter_Integer, 0 ),   --  : expid2sp (Integer)
           5017 => ( Parameter_Integer, 0 ),   --  : ocptx1hd (Integer)
           5018 => ( Parameter_Integer, 0 ),   --  : ocptx2hd (Integer)
           5019 => ( Parameter_Integer, 0 ),   --  : ocptx3hd (Integer)
           5020 => ( Parameter_Integer, 0 ),   --  : ocptx4hd (Integer)
           5021 => ( Parameter_Integer, 0 ),   --  : wptx1hd (Integer)
           5022 => ( Parameter_Integer, 0 ),   --  : wpptx2hd (Integer)
           5023 => ( Parameter_Integer, 0 ),   --  : wpptx3hd (Integer)
           5024 => ( Parameter_Integer, 0 ),   --  : ppetx1hd (Integer)
           5025 => ( Parameter_Integer, 0 ),   --  : ppetx2hd (Integer)
           5026 => ( Parameter_Integer, 0 ),   --  : ppetx3hd (Integer)
           5027 => ( Parameter_Integer, 0 ),   --  : tuptx1hd (Integer)
           5028 => ( Parameter_Integer, 0 ),   --  : tuptx2hd (Integer)
           5029 => ( Parameter_Integer, 0 ),   --  : aptx1hd (Integer)
           5030 => ( Parameter_Integer, 0 ),   --  : aptx2hd (Integer)
           5031 => ( Parameter_Integer, 0 ),   --  : aptx3hd (Integer)
           5032 => ( Parameter_Integer, 0 ),   --  : ttrtx1hd (Integer)
           5033 => ( Parameter_Integer, 0 ),   --  : ttrtx2hd (Integer)
           5034 => ( Parameter_Integer, 0 ),   --  : exptx1hd (Integer)
           5035 => ( Parameter_Integer, 0 ),   --  : exptx2hd (Integer)
           5036 => ( Parameter_Integer, 0 ),   --  : ocptx1sp (Integer)
           5037 => ( Parameter_Integer, 0 ),   --  : ocptx2sp (Integer)
           5038 => ( Parameter_Integer, 0 ),   --  : ocptx3sp (Integer)
           5039 => ( Parameter_Integer, 0 ),   --  : ocptx4sp (Integer)
           5040 => ( Parameter_Integer, 0 ),   --  : wptx1sp (Integer)
           5041 => ( Parameter_Integer, 0 ),   --  : wpptx2sp (Integer)
           5042 => ( Parameter_Integer, 0 ),   --  : wpptx3sp (Integer)
           5043 => ( Parameter_Integer, 0 ),   --  : ppetx1sp (Integer)
           5044 => ( Parameter_Integer, 0 ),   --  : ppetx2sp (Integer)
           5045 => ( Parameter_Integer, 0 ),   --  : ppetx3sp (Integer)
           5046 => ( Parameter_Integer, 0 ),   --  : tuptx1sp (Integer)
           5047 => ( Parameter_Integer, 0 ),   --  : tuptx2sp (Integer)
           5048 => ( Parameter_Integer, 0 ),   --  : aptx1sp (Integer)
           5049 => ( Parameter_Integer, 0 ),   --  : aptx2sp (Integer)
           5050 => ( Parameter_Integer, 0 ),   --  : aptx3sp (Integer)
           5051 => ( Parameter_Integer, 0 ),   --  : ttrtx1sp (Integer)
           5052 => ( Parameter_Integer, 0 ),   --  : ttrtx2sp (Integer)
           5053 => ( Parameter_Integer, 0 ),   --  : exptx1sp (Integer)
           5054 => ( Parameter_Integer, 0 ),   --  : exptx2sp (Integer)
           5055 => ( Parameter_Float, 0.0 ),   --  : ocpoa1hd (Amount)
           5056 => ( Parameter_Float, 0.0 ),   --  : ocpoa2hd (Amount)
           5057 => ( Parameter_Integer, 0 ),   --  : ocpoa3hd (Integer)
           5058 => ( Parameter_Integer, 0 ),   --  : ocpoa4hd (Integer)
           5059 => ( Parameter_Float, 0.0 ),   --  : wpoa1hd (Amount)
           5060 => ( Parameter_Integer, 0 ),   --  : wwpoa2hd (Integer)
           5061 => ( Parameter_Integer, 0 ),   --  : wwpoa3hd (Integer)
           5062 => ( Parameter_Integer, 0 ),   --  : ppeoa1hd (Integer)
           5063 => ( Parameter_Integer, 0 ),   --  : ppeoa2hd (Integer)
           5064 => ( Parameter_Integer, 0 ),   --  : ppeoa3hd (Integer)
           5065 => ( Parameter_Integer, 0 ),   --  : tupoa1hd (Integer)
           5066 => ( Parameter_Integer, 0 ),   --  : tupoa2hd (Integer)
           5067 => ( Parameter_Integer, 0 ),   --  : apoa1hd (Integer)
           5068 => ( Parameter_Integer, 0 ),   --  : apoa2hd (Integer)
           5069 => ( Parameter_Integer, 0 ),   --  : apoa3hd (Integer)
           5070 => ( Parameter_Integer, 0 ),   --  : truoa1hd (Integer)
           5071 => ( Parameter_Integer, 0 ),   --  : truoa2hd (Integer)
           5072 => ( Parameter_Integer, 0 ),   --  : expoa1hd (Integer)
           5073 => ( Parameter_Integer, 0 ),   --  : expoa2hd (Integer)
           5074 => ( Parameter_Float, 0.0 ),   --  : ocpoa1sp (Amount)
           5075 => ( Parameter_Integer, 0 ),   --  : ocpoa2sp (Integer)
           5076 => ( Parameter_Integer, 0 ),   --  : ocpoa3sp (Integer)
           5077 => ( Parameter_Integer, 0 ),   --  : ocpoa4sp (Integer)
           5078 => ( Parameter_Float, 0.0 ),   --  : wpoa1sp (Amount)
           5079 => ( Parameter_Integer, 0 ),   --  : wwpoa2sp (Integer)
           5080 => ( Parameter_Integer, 0 ),   --  : wwpoa3sp (Integer)
           5081 => ( Parameter_Integer, 0 ),   --  : ppeoa1sp (Integer)
           5082 => ( Parameter_Integer, 0 ),   --  : ppeoa2sp (Integer)
           5083 => ( Parameter_Integer, 0 ),   --  : ppeoa3sp (Integer)
           5084 => ( Parameter_Integer, 0 ),   --  : tupoa1sp (Integer)
           5085 => ( Parameter_Integer, 0 ),   --  : tupoa2sp (Integer)
           5086 => ( Parameter_Integer, 0 ),   --  : apoa1sp (Integer)
           5087 => ( Parameter_Integer, 0 ),   --  : apoa2sp (Integer)
           5088 => ( Parameter_Integer, 0 ),   --  : apoa3sp (Integer)
           5089 => ( Parameter_Integer, 0 ),   --  : truoa1sp (Integer)
           5090 => ( Parameter_Integer, 0 ),   --  : truoa2sp (Integer)
           5091 => ( Parameter_Integer, 0 ),   --  : expoa1sp (Integer)
           5092 => ( Parameter_Integer, 0 ),   --  : expoa2sp (Integer)
           5093 => ( Parameter_Integer, 0 ),   --  : ocpoi1hd (Integer)
           5094 => ( Parameter_Integer, 0 ),   --  : ocpoi2hd (Integer)
           5095 => ( Parameter_Integer, 0 ),   --  : ocpoi3hd (Integer)
           5096 => ( Parameter_Integer, 0 ),   --  : ocpoi4hd (Integer)
           5097 => ( Parameter_Integer, 0 ),   --  : wpoi1hd (Integer)
           5098 => ( Parameter_Integer, 0 ),   --  : wwpoi2hd (Integer)
           5099 => ( Parameter_Integer, 0 ),   --  : wwpoi3hd (Integer)
           5100 => ( Parameter_Integer, 0 ),   --  : ppeoi1hd (Integer)
           5101 => ( Parameter_Integer, 0 ),   --  : ppeoi2hd (Integer)
           5102 => ( Parameter_Integer, 0 ),   --  : ppeoi3hd (Integer)
           5103 => ( Parameter_Integer, 0 ),   --  : tupoi1hd (Integer)
           5104 => ( Parameter_Integer, 0 ),   --  : tupoi2hd (Integer)
           5105 => ( Parameter_Integer, 0 ),   --  : apoi1hd (Integer)
           5106 => ( Parameter_Integer, 0 ),   --  : apoi2hd (Integer)
           5107 => ( Parameter_Integer, 0 ),   --  : apoi3hd (Integer)
           5108 => ( Parameter_Integer, 0 ),   --  : truoi1hd (Integer)
           5109 => ( Parameter_Integer, 0 ),   --  : truoi2hd (Integer)
           5110 => ( Parameter_Integer, 0 ),   --  : expoi1hd (Integer)
           5111 => ( Parameter_Integer, 0 ),   --  : expoi2hd (Integer)
           5112 => ( Parameter_Integer, 0 ),   --  : ocpoi1sp (Integer)
           5113 => ( Parameter_Integer, 0 ),   --  : ocpoi2sp (Integer)
           5114 => ( Parameter_Integer, 0 ),   --  : ocpoi3sp (Integer)
           5115 => ( Parameter_Integer, 0 ),   --  : ocpoi4sp (Integer)
           5116 => ( Parameter_Integer, 0 ),   --  : wpoi1sp (Integer)
           5117 => ( Parameter_Integer, 0 ),   --  : wwpoi2sp (Integer)
           5118 => ( Parameter_Integer, 0 ),   --  : wwpoi3sp (Integer)
           5119 => ( Parameter_Integer, 0 ),   --  : ppeoi1sp (Integer)
           5120 => ( Parameter_Integer, 0 ),   --  : ppeoi2sp (Integer)
           5121 => ( Parameter_Integer, 0 ),   --  : ppeoi3sp (Integer)
           5122 => ( Parameter_Integer, 0 ),   --  : tupoi1sp (Integer)
           5123 => ( Parameter_Integer, 0 ),   --  : tupoi2sp (Integer)
           5124 => ( Parameter_Integer, 0 ),   --  : apoi1sp (Integer)
           5125 => ( Parameter_Integer, 0 ),   --  : apoi2sp (Integer)
           5126 => ( Parameter_Integer, 0 ),   --  : apoi3sp (Integer)
           5127 => ( Parameter_Integer, 0 ),   --  : truoi1sp (Integer)
           5128 => ( Parameter_Integer, 0 ),   --  : truoi2sp (Integer)
           5129 => ( Parameter_Integer, 0 ),   --  : expoi1sp (Integer)
           5130 => ( Parameter_Integer, 0 ),   --  : expoi2sp (Integer)
           5131 => ( Parameter_Float, 0.0 ),   --  : ocpta1hd (Amount)
           5132 => ( Parameter_Float, 0.0 ),   --  : ocpta2hd (Amount)
           5133 => ( Parameter_Float, 0.0 ),   --  : ocpta3hd (Amount)
           5134 => ( Parameter_Float, 0.0 ),   --  : ocpta4hd (Amount)
           5135 => ( Parameter_Float, 0.0 ),   --  : wpta1hd (Amount)
           5136 => ( Parameter_Float, 0.0 ),   --  : wppta2hd (Amount)
           5137 => ( Parameter_Float, 0.0 ),   --  : wppta3hd (Amount)
           5138 => ( Parameter_Float, 0.0 ),   --  : ppeta1hd (Amount)
           5139 => ( Parameter_Float, 0.0 ),   --  : ppeta2hd (Amount)
           5140 => ( Parameter_Float, 0.0 ),   --  : ppeta3hd (Amount)
           5141 => ( Parameter_Integer, 0 ),   --  : tupta1hd (Integer)
           5142 => ( Parameter_Integer, 0 ),   --  : tupta2hd (Integer)
           5143 => ( Parameter_Float, 0.0 ),   --  : apta1hd (Amount)
           5144 => ( Parameter_Float, 0.0 ),   --  : apta2hd (Amount)
           5145 => ( Parameter_Integer, 0 ),   --  : apta3hd (Integer)
           5146 => ( Parameter_Float, 0.0 ),   --  : truta1hd (Amount)
           5147 => ( Parameter_Integer, 0 ),   --  : truta2hd (Integer)
           5148 => ( Parameter_Float, 0.0 ),   --  : expta1hd (Amount)
           5149 => ( Parameter_Integer, 0 ),   --  : expta2hd (Integer)
           5150 => ( Parameter_Float, 0.0 ),   --  : ocpta1sp (Amount)
           5151 => ( Parameter_Float, 0.0 ),   --  : ocpta2sp (Amount)
           5152 => ( Parameter_Float, 0.0 ),   --  : ocpta3sp (Amount)
           5153 => ( Parameter_Integer, 0 ),   --  : ocpta4sp (Integer)
           5154 => ( Parameter_Float, 0.0 ),   --  : wpta1sp (Amount)
           5155 => ( Parameter_Integer, 0 ),   --  : wppta2sp (Integer)
           5156 => ( Parameter_Integer, 0 ),   --  : wppta3sp (Integer)
           5157 => ( Parameter_Float, 0.0 ),   --  : ppeta1sp (Amount)
           5158 => ( Parameter_Float, 0.0 ),   --  : ppeta2sp (Amount)
           5159 => ( Parameter_Float, 0.0 ),   --  : ppeta3sp (Amount)
           5160 => ( Parameter_Integer, 0 ),   --  : tupta1sp (Integer)
           5161 => ( Parameter_Integer, 0 ),   --  : tupta2sp (Integer)
           5162 => ( Parameter_Float, 0.0 ),   --  : apta1sp (Amount)
           5163 => ( Parameter_Float, 0.0 ),   --  : apta2sp (Amount)
           5164 => ( Parameter_Integer, 0 ),   --  : apta3sp (Integer)
           5165 => ( Parameter_Float, 0.0 ),   --  : truta1sp (Amount)
           5166 => ( Parameter_Integer, 0 ),   --  : truta2sp (Integer)
           5167 => ( Parameter_Float, 0.0 ),   --  : expta1sp (Amount)
           5168 => ( Parameter_Integer, 0 ),   --  : expta2sp (Integer)
           5169 => ( Parameter_Integer, 0 ),   --  : ocpti1hd (Integer)
           5170 => ( Parameter_Integer, 0 ),   --  : ocpti2hd (Integer)
           5171 => ( Parameter_Integer, 0 ),   --  : ocpti3hd (Integer)
           5172 => ( Parameter_Integer, 0 ),   --  : ocpti4hd (Integer)
           5173 => ( Parameter_Integer, 0 ),   --  : wpti1hd (Integer)
           5174 => ( Parameter_Integer, 0 ),   --  : wppti2hd (Integer)
           5175 => ( Parameter_Integer, 0 ),   --  : wppti3hd (Integer)
           5176 => ( Parameter_Integer, 0 ),   --  : ppeti1hd (Integer)
           5177 => ( Parameter_Integer, 0 ),   --  : ppeti2hd (Integer)
           5178 => ( Parameter_Integer, 0 ),   --  : ppeti3hd (Integer)
           5179 => ( Parameter_Integer, 0 ),   --  : tupti1hd (Integer)
           5180 => ( Parameter_Integer, 0 ),   --  : tupti2hd (Integer)
           5181 => ( Parameter_Integer, 0 ),   --  : apti1hd (Integer)
           5182 => ( Parameter_Integer, 0 ),   --  : apti2hd (Integer)
           5183 => ( Parameter_Integer, 0 ),   --  : apti3hd (Integer)
           5184 => ( Parameter_Integer, 0 ),   --  : truti1hd (Integer)
           5185 => ( Parameter_Integer, 0 ),   --  : truti2hd (Integer)
           5186 => ( Parameter_Integer, 0 ),   --  : expti1hd (Integer)
           5187 => ( Parameter_Integer, 0 ),   --  : expti2hd (Integer)
           5188 => ( Parameter_Integer, 0 ),   --  : ocpti1sp (Integer)
           5189 => ( Parameter_Integer, 0 ),   --  : ocpti2sp (Integer)
           5190 => ( Parameter_Integer, 0 ),   --  : ocpti3sp (Integer)
           5191 => ( Parameter_Integer, 0 ),   --  : ocpti4sp (Integer)
           5192 => ( Parameter_Integer, 0 ),   --  : wpti1sp (Integer)
           5193 => ( Parameter_Integer, 0 ),   --  : wppti2sp (Integer)
           5194 => ( Parameter_Integer, 0 ),   --  : wppti3sp (Integer)
           5195 => ( Parameter_Integer, 0 ),   --  : ppeti1sp (Integer)
           5196 => ( Parameter_Integer, 0 ),   --  : ppeti2sp (Integer)
           5197 => ( Parameter_Integer, 0 ),   --  : ppeti3sp (Integer)
           5198 => ( Parameter_Integer, 0 ),   --  : tupti1sp (Integer)
           5199 => ( Parameter_Integer, 0 ),   --  : tupti2sp (Integer)
           5200 => ( Parameter_Integer, 0 ),   --  : apti1sp (Integer)
           5201 => ( Parameter_Integer, 0 ),   --  : apti2sp (Integer)
           5202 => ( Parameter_Integer, 0 ),   --  : apti3sp (Integer)
           5203 => ( Parameter_Integer, 0 ),   --  : truti1sp (Integer)
           5204 => ( Parameter_Integer, 0 ),   --  : truti2sp (Integer)
           5205 => ( Parameter_Integer, 0 ),   --  : expti1sp (Integer)
           5206 => ( Parameter_Integer, 0 ),   --  : expti2sp (Integer)
           5207 => ( Parameter_Integer, 0 ),   --  : menpin11 (Integer)
           5208 => ( Parameter_Integer, 0 ),   --  : menpin12 (Integer)
           5209 => ( Parameter_Integer, 0 ),   --  : menpin13 (Integer)
           5210 => ( Parameter_Integer, 0 ),   --  : menpin21 (Integer)
           5211 => ( Parameter_Integer, 0 ),   --  : menpin22 (Integer)
           5212 => ( Parameter_Integer, 0 ),   --  : menpin23 (Integer)
           5213 => ( Parameter_Integer, 0 ),   --  : menpin31 (Integer)
           5214 => ( Parameter_Integer, 0 ),   --  : menpin32 (Integer)
           5215 => ( Parameter_Integer, 0 ),   --  : menpin33 (Integer)
           5216 => ( Parameter_Float, 0.0 ),   --  : menpol11 (Amount)
           5217 => ( Parameter_Float, 0.0 ),   --  : menpol12 (Amount)
           5218 => ( Parameter_Integer, 0 ),   --  : menpol13 (Integer)
           5219 => ( Parameter_Float, 0.0 ),   --  : menpol21 (Amount)
           5220 => ( Parameter_Integer, 0 ),   --  : menpol22 (Integer)
           5221 => ( Parameter_Integer, 0 ),   --  : menpol23 (Integer)
           5222 => ( Parameter_Integer, 0 ),   --  : menpol31 (Integer)
           5223 => ( Parameter_Integer, 0 ),   --  : menpol32 (Integer)
           5224 => ( Parameter_Integer, 0 ),   --  : menpol33 (Integer)
           5225 => ( Parameter_Integer, 0 ),   --  : pmenpo11 (Integer)
           5226 => ( Parameter_Integer, 0 ),   --  : pmenpo12 (Integer)
           5227 => ( Parameter_Integer, 0 ),   --  : pmenpo13 (Integer)
           5228 => ( Parameter_Integer, 0 ),   --  : pmenpo21 (Integer)
           5229 => ( Parameter_Integer, 0 ),   --  : pmenpo22 (Integer)
           5230 => ( Parameter_Integer, 0 ),   --  : pmenpo23 (Integer)
           5231 => ( Parameter_Integer, 0 ),   --  : pmenpo31 (Integer)
           5232 => ( Parameter_Integer, 0 ),   --  : pmenpo32 (Integer)
           5233 => ( Parameter_Integer, 0 ),   --  : pmenpo33 (Integer)
           5234 => ( Parameter_Integer, 0 ),   --  : bedroom (Integer)
           5235 => ( Parameter_Integer, 0 ),   --  : benunits (Integer)
           5236 => ( Parameter_Integer, 0 ),   --  : billrate (Integer)
           5237 => ( Parameter_Integer, 0 ),   --  : brma (Integer)
           5238 => ( Parameter_Integer, 0 ),   --  : burden (Integer)
           5239 => ( Parameter_Integer, 0 ),   --  : busroom (Integer)
           5240 => ( Parameter_Integer, 0 ),   --  : capval (Integer)
           5241 => ( Parameter_Integer, 0 ),   --  : charge1 (Integer)
           5242 => ( Parameter_Integer, 0 ),   --  : charge2 (Integer)
           5243 => ( Parameter_Integer, 0 ),   --  : charge3 (Integer)
           5244 => ( Parameter_Integer, 0 ),   --  : charge4 (Integer)
           5245 => ( Parameter_Integer, 0 ),   --  : charge5 (Integer)
           5246 => ( Parameter_Integer, 0 ),   --  : charge6 (Integer)
           5247 => ( Parameter_Integer, 0 ),   --  : charge7 (Integer)
           5248 => ( Parameter_Integer, 0 ),   --  : charge8 (Integer)
           5249 => ( Parameter_Integer, 0 ),   --  : charge9 (Integer)
           5250 => ( Parameter_Integer, 0 ),   --  : chins (Integer)
           5251 => ( Parameter_Integer, 0 ),   --  : chrgpd1 (Integer)
           5252 => ( Parameter_Integer, 0 ),   --  : chrgpd2 (Integer)
           5253 => ( Parameter_Integer, 0 ),   --  : chrgpd3 (Integer)
           5254 => ( Parameter_Integer, 0 ),   --  : chrgpd4 (Integer)
           5255 => ( Parameter_Integer, 0 ),   --  : chrgpd5 (Integer)
           5256 => ( Parameter_Integer, 0 ),   --  : chrgpd6 (Integer)
           5257 => ( Parameter_Integer, 0 ),   --  : chrgpd7 (Integer)
           5258 => ( Parameter_Integer, 0 ),   --  : chrgpd8 (Integer)
           5259 => ( Parameter_Integer, 0 ),   --  : chrgpd9 (Integer)
           5260 => ( Parameter_Integer, 0 ),   --  : covoths (Integer)
           5261 => ( Parameter_Float, 0.0 ),   --  : csewamt (Amount)
           5262 => ( Parameter_Float, 0.0 ),   --  : csewamt1 (Amount)
           5263 => ( Parameter_Integer, 0 ),   --  : ct25d50d (Integer)
           5264 => ( Parameter_Integer, 0 ),   --  : ctamt (Integer)
           5265 => ( Parameter_Integer, 0 ),   --  : ctannual (Integer)
           5266 => ( Parameter_Integer, 0 ),   --  : ctband (Integer)
           5267 => ( Parameter_Integer, 0 ),   --  : ctbwait (Integer)
           5268 => ( Parameter_Integer, 0 ),   --  : ctcondoc (Integer)
           5269 => ( Parameter_Integer, 0 ),   --  : ctdisc (Integer)
           5270 => ( Parameter_Integer, 0 ),   --  : ctinstal (Integer)
           5271 => ( Parameter_Integer, 0 ),   --  : ctlvband (Integer)
           5272 => ( Parameter_Integer, 0 ),   --  : ctlvchk (Integer)
           5273 => ( Parameter_Integer, 0 ),   --  : ctreb (Integer)
           5274 => ( Parameter_Integer, 0 ),   --  : ctrebamt (Integer)
           5275 => ( Parameter_Integer, 0 ),   --  : ctrebpd (Integer)
           5276 => ( Parameter_Integer, 0 ),   --  : cttime (Integer)
           5277 => ( Parameter_Integer, 0 ),   --  : cwatamt (Integer)
           5278 => ( Parameter_Integer, 0 ),   --  : cwatamt1 (Integer)
           5279 => ( Parameter_Integer, 0 ),   --  : entry1 (Integer)
           5280 => ( Parameter_Integer, 0 ),   --  : entry2 (Integer)
           5281 => ( Parameter_Integer, 0 ),   --  : entry3 (Integer)
           5282 => ( Parameter_Integer, 0 ),   --  : entry4 (Integer)
           5283 => ( Parameter_Integer, 0 ),   --  : gvtregn (Integer)
           5284 => ( Parameter_Integer, 0 ),   --  : gvtregno (Integer)
           5285 => ( Parameter_Integer, 0 ),   --  : hhldr01 (Integer)
           5286 => ( Parameter_Integer, 0 ),   --  : hhldr02 (Integer)
           5287 => ( Parameter_Integer, 0 ),   --  : hhldr03 (Integer)
           5288 => ( Parameter_Integer, 0 ),   --  : hhldr04 (Integer)
           5289 => ( Parameter_Integer, 0 ),   --  : hhldr05 (Integer)
           5290 => ( Parameter_Integer, 0 ),   --  : hhldr06 (Integer)
           5291 => ( Parameter_Integer, 0 ),   --  : hhldr07 (Integer)
           5292 => ( Parameter_Integer, 0 ),   --  : hhldr08 (Integer)
           5293 => ( Parameter_Integer, 0 ),   --  : hhldr09 (Integer)
           5294 => ( Parameter_Integer, 0 ),   --  : hhldr10 (Integer)
           5295 => ( Parameter_Integer, 0 ),   --  : hhldr11 (Integer)
           5296 => ( Parameter_Integer, 0 ),   --  : hhldr12 (Integer)
           5297 => ( Parameter_Integer, 0 ),   --  : hhldr13 (Integer)
           5298 => ( Parameter_Integer, 0 ),   --  : hhldr14 (Integer)
           5299 => ( Parameter_Integer, 0 ),   --  : hhldr97 (Integer)
           5300 => ( Parameter_Integer, 0 ),   --  : hhstat (Integer)
           5301 => ( Parameter_Integer, 0 ),   --  : hlthst (Integer)
           5302 => ( Parameter_Date, Clock ),   --  : intdate (Ada.Calendar.Time)
           5303 => ( Parameter_Integer, 0 ),   --  : mainacc (Integer)
           5304 => ( Parameter_Integer, 0 ),   --  : mnthcode (Integer)
           5305 => ( Parameter_Integer, 0 ),   --  : monlive (Integer)
           5306 => ( Parameter_Integer, 0 ),   --  : multi (Integer)
           5307 => ( Parameter_Integer, 0 ),   --  : nicoun (Integer)
           5308 => ( Parameter_Integer, 0 ),   --  : nidpnd (Integer)
           5309 => ( Parameter_Integer, 0 ),   --  : nmrmshar (Integer)
           5310 => ( Parameter_Integer, 0 ),   --  : nopay (Integer)
           5311 => ( Parameter_Integer, 0 ),   --  : norate (Integer)
           5312 => ( Parameter_Integer, 0 ),   --  : onbsroom (Integer)
           5313 => ( Parameter_Integer, 0 ),   --  : orgid (Integer)
           5314 => ( Parameter_Integer, 0 ),   --  : payrate (Integer)
           5315 => ( Parameter_Integer, 0 ),   --  : ptbsroom (Integer)
           5316 => ( Parameter_Integer, 0 ),   --  : rooms (Integer)
           5317 => ( Parameter_Integer, 0 ),   --  : roomshr (Integer)
           5318 => ( Parameter_Float, 0.0 ),   --  : rt2rebam (Amount)
           5319 => ( Parameter_Float, 0.0 ),   --  : rtannual (Amount)
           5320 => ( Parameter_Integer, 0 ),   --  : rtcondoc (Integer)
           5321 => ( Parameter_Integer, 0 ),   --  : rtdpa (Integer)
           5322 => ( Parameter_Float, 0.0 ),   --  : rtdpaamt (Amount)
           5323 => ( Parameter_Integer, 0 ),   --  : rtene (Integer)
           5324 => ( Parameter_Integer, 0 ),   --  : rteneamt (Integer)
           5325 => ( Parameter_Integer, 0 ),   --  : rtgen (Integer)
           5326 => ( Parameter_Integer, 0 ),   --  : rtinstal (Integer)
           5327 => ( Parameter_Integer, 0 ),   --  : rtlpa (Integer)
           5328 => ( Parameter_Float, 0.0 ),   --  : rtlpaamt (Amount)
           5329 => ( Parameter_Float, 0.0 ),   --  : rtothamt (Amount)
           5330 => ( Parameter_Integer, 0 ),   --  : rtother (Integer)
           5331 => ( Parameter_Integer, 0 ),   --  : rtreb (Integer)
           5332 => ( Parameter_Float, 0.0 ),   --  : rtrebamt (Amount)
           5333 => ( Parameter_Float, 0.0 ),   --  : rtrtramt (Amount)
           5334 => ( Parameter_Integer, 0 ),   --  : rttimepd (Integer)
           5335 => ( Parameter_Integer, 0 ),   --  : schbrk (Integer)
           5336 => ( Parameter_Integer, 0 ),   --  : schfrt (Integer)
           5337 => ( Parameter_Integer, 0 ),   --  : schmeal (Integer)
           5338 => ( Parameter_Integer, 0 ),   --  : schmilk (Integer)
           5339 => ( Parameter_Float, 0.0 ),   --  : seramt1 (Amount)
           5340 => ( Parameter_Float, 0.0 ),   --  : seramt2 (Amount)
           5341 => ( Parameter_Float, 0.0 ),   --  : seramt3 (Amount)
           5342 => ( Parameter_Float, 0.0 ),   --  : seramt4 (Amount)
           5343 => ( Parameter_Float, 0.0 ),   --  : seramt5 (Amount)
           5344 => ( Parameter_Integer, 0 ),   --  : sercomb (Integer)
           5345 => ( Parameter_Integer, 0 ),   --  : serpay1 (Integer)
           5346 => ( Parameter_Integer, 0 ),   --  : serpay2 (Integer)
           5347 => ( Parameter_Integer, 0 ),   --  : serpay3 (Integer)
           5348 => ( Parameter_Integer, 0 ),   --  : serpay4 (Integer)
           5349 => ( Parameter_Integer, 0 ),   --  : serpay5 (Integer)
           5350 => ( Parameter_Float, 0.0 ),   --  : sewamt (Amount)
           5351 => ( Parameter_Float, 0.0 ),   --  : sewanul (Amount)
           5352 => ( Parameter_Integer, 0 ),   --  : sewerpay (Integer)
           5353 => ( Parameter_Integer, 0 ),   --  : sewsep (Integer)
           5354 => ( Parameter_Integer, 0 ),   --  : sewtime (Integer)
           5355 => ( Parameter_Integer, 0 ),   --  : shelter (Integer)
           5356 => ( Parameter_Integer, 0 ),   --  : sobuy (Integer)
           5357 => ( Parameter_Float, 0.0 ),   --  : stramt1 (Amount)
           5358 => ( Parameter_Float, 0.0 ),   --  : stramt2 (Amount)
           5359 => ( Parameter_Integer, 0 ),   --  : strcov (Integer)
           5360 => ( Parameter_Integer, 0 ),   --  : strmort (Integer)
           5361 => ( Parameter_Integer, 0 ),   --  : stroths (Integer)
           5362 => ( Parameter_Integer, 0 ),   --  : strpd1 (Integer)
           5363 => ( Parameter_Integer, 0 ),   --  : strpd2 (Integer)
           5364 => ( Parameter_Integer, 0 ),   --  : suballow (Integer)
           5365 => ( Parameter_Integer, 0 ),   --  : sublet (Integer)
           5366 => ( Parameter_Integer, 0 ),   --  : sublety (Integer)
           5367 => ( Parameter_Float, 0.0 ),   --  : subrent (Amount)
           5368 => ( Parameter_Integer, 0 ),   --  : tenure (Integer)
           5369 => ( Parameter_Integer, 0 ),   --  : tvlic (Integer)
           5370 => ( Parameter_Integer, 0 ),   --  : typeacc (Integer)
           5371 => ( Parameter_Integer, 0 ),   --  : urb (Integer)
           5372 => ( Parameter_Integer, 0 ),   --  : urbrur (Integer)
           5373 => ( Parameter_Integer, 0 ),   --  : urindew (Integer)
           5374 => ( Parameter_Integer, 0 ),   --  : urinds (Integer)
           5375 => ( Parameter_Float, 0.0 ),   --  : watamt (Amount)
           5376 => ( Parameter_Float, 0.0 ),   --  : watanul (Amount)
           5377 => ( Parameter_Integer, 0 ),   --  : watermet (Integer)
           5378 => ( Parameter_Integer, 0 ),   --  : waterpay (Integer)
           5379 => ( Parameter_Integer, 0 ),   --  : watrb (Integer)
           5380 => ( Parameter_Integer, 0 ),   --  : wattime (Integer)
           5381 => ( Parameter_Integer, 0 ),   --  : whoctbot (Integer)
           5382 => ( Parameter_Integer, 0 ),   --  : whorsp01 (Integer)
           5383 => ( Parameter_Integer, 0 ),   --  : whorsp02 (Integer)
           5384 => ( Parameter_Integer, 0 ),   --  : whorsp03 (Integer)
           5385 => ( Parameter_Integer, 0 ),   --  : whorsp04 (Integer)
           5386 => ( Parameter_Integer, 0 ),   --  : whorsp05 (Integer)
           5387 => ( Parameter_Integer, 0 ),   --  : whorsp06 (Integer)
           5388 => ( Parameter_Integer, 0 ),   --  : whorsp07 (Integer)
           5389 => ( Parameter_Integer, 0 ),   --  : whorsp08 (Integer)
           5390 => ( Parameter_Integer, 0 ),   --  : whorsp09 (Integer)
           5391 => ( Parameter_Integer, 0 ),   --  : whorsp10 (Integer)
           5392 => ( Parameter_Integer, 0 ),   --  : whorsp11 (Integer)
           5393 => ( Parameter_Integer, 0 ),   --  : whorsp12 (Integer)
           5394 => ( Parameter_Integer, 0 ),   --  : whorsp13 (Integer)
           5395 => ( Parameter_Integer, 0 ),   --  : whorsp14 (Integer)
           5396 => ( Parameter_Integer, 0 ),   --  : whynoct (Integer)
           5397 => ( Parameter_Float, 0.0 ),   --  : wsewamt (Amount)
           5398 => ( Parameter_Float, 0.0 ),   --  : wsewanul (Amount)
           5399 => ( Parameter_Integer, 0 ),   --  : wsewtime (Integer)
           5400 => ( Parameter_Integer, 0 ),   --  : yearlive (Integer)
           5401 => ( Parameter_Integer, 0 ),   --  : yearwhc (Integer)
           5402 => ( Parameter_Integer, 0 ),   --  : adulth (Integer)
           5403 => ( Parameter_Integer, 0 ),   --  : cwatamtd (Integer)
           5404 => ( Parameter_Integer, 0 ),   --  : depchldh (Integer)
           5405 => ( Parameter_Integer, 0 ),   --  : dischha1 (Integer)
           5406 => ( Parameter_Integer, 0 ),   --  : dischhc1 (Integer)
           5407 => ( Parameter_Integer, 0 ),   --  : diswhha1 (Integer)
           5408 => ( Parameter_Integer, 0 ),   --  : diswhhc1 (Integer)
           5409 => ( Parameter_Float, 0.0 ),   --  : endowpay (Amount)
           5410 => ( Parameter_Integer, 0 ),   --  : gbhscost (Integer)
           5411 => ( Parameter_Integer, 0 ),   --  : grossct (Integer)
           5412 => ( Parameter_Integer, 0 ),   --  : hbeninc (Integer)
           5413 => ( Parameter_Integer, 0 ),   --  : hbindhh (Integer)
           5414 => ( Parameter_Integer, 0 ),   --  : hbindhh2 (Integer)
           5415 => ( Parameter_Integer, 0 ),   --  : hearns (Integer)
           5416 => ( Parameter_Integer, 0 ),   --  : hhdisben (Integer)
           5417 => ( Parameter_Integer, 0 ),   --  : hhinc (Integer)
           5418 => ( Parameter_Integer, 0 ),   --  : hhinv (Integer)
           5419 => ( Parameter_Integer, 0 ),   --  : hhirben (Integer)
           5420 => ( Parameter_Integer, 0 ),   --  : hhnirben (Integer)
           5421 => ( Parameter_Integer, 0 ),   --  : hhothben (Integer)
           5422 => ( Parameter_Integer, 0 ),   --  : hhrent (Integer)
           5423 => ( Parameter_Integer, 0 ),   --  : hhrinc (Integer)
           5424 => ( Parameter_Integer, 0 ),   --  : hhrpinc (Integer)
           5425 => ( Parameter_Float, 0.0 ),   --  : hhtvlic (Amount)
           5426 => ( Parameter_Integer, 0 ),   --  : hhtxcred (Integer)
           5427 => ( Parameter_Integer, 0 ),   --  : hothinc (Integer)
           5428 => ( Parameter_Integer, 0 ),   --  : hpeninc (Integer)
           5429 => ( Parameter_Integer, 0 ),   --  : hseinc (Integer)
           5430 => ( Parameter_Integer, 0 ),   --  : london (Integer)
           5431 => ( Parameter_Float, 0.0 ),   --  : mortint (Amount)
           5432 => ( Parameter_Integer, 0 ),   --  : nihscost (Integer)
           5433 => ( Parameter_Integer, 0 ),   --  : penage (Integer)
           5434 => ( Parameter_Integer, 0 ),   --  : penhrp (Integer)
           5435 => ( Parameter_Integer, 0 ),   --  : ptentyp2 (Integer)
           5436 => ( Parameter_Float, 0.0 ),   --  : servpay (Amount)
           5437 => ( Parameter_Float, 0.0 ),   --  : struins (Amount)
           5438 => ( Parameter_Integer, 0 ),   --  : tentyp2 (Integer)
           5439 => ( Parameter_Integer, 0 ),   --  : tuhhrent (Integer)
           5440 => ( Parameter_Float, 0.0 ),   --  : tuwatsew (Amount)
           5441 => ( Parameter_Float, 0.0 ),   --  : watsewrt (Amount)
           5442 => ( Parameter_Float, 0.0 ),   --  : hcgrent (Amount)
           5443 => ( Parameter_Integer, 0 ),   --  : hcfeudut (Integer)
           5444 => ( Parameter_Float, 0.0 ),   --  : hcchrent (Amount)
           5445 => ( Parameter_Float, 0.0 ),   --  : hcservch (Amount)
           5446 => ( Parameter_Float, 0.0 ),   --  : hcmaint (Amount)
           5447 => ( Parameter_Float, 0.0 ),   --  : hcsirent (Amount)
           5448 => ( Parameter_Float, 0.0 ),   --  : hcfactor (Amount)
           5449 => ( Parameter_Float, 0.0 ),   --  : hcother (Amount)
           5450 => ( Parameter_Float, 0.0 ),   --  : hcpcomb (Amount)
           5451 => ( Parameter_Integer, 0 ),   --  : gvhelp (Integer)
           5452 => ( Parameter_Integer, 0 ),   --  : lacode (Integer)
           5453 => ( Parameter_Integer, 0 ),   --  : lauacode (Integer)
           5454 => ( Parameter_Integer, 0 ),   --  : llcare (Integer)
           5455 => ( Parameter_Integer, 0 ),   --  : needcare (Integer)
           5456 => ( Parameter_Integer, 0 ),   --  : colourtv (Integer)
           5457 => ( Parameter_Integer, 0 ),   --  : bwtv (Integer)
           5458 => ( Parameter_Integer, 0 ),   --  : serpd1 (Integer)
           5459 => ( Parameter_Integer, 0 ),   --  : serpd2 (Integer)
           5460 => ( Parameter_Integer, 0 ),   --  : serpd3 (Integer)
           5461 => ( Parameter_Integer, 0 ),   --  : serpd4 (Integer)
           5462 => ( Parameter_Integer, 0 ),   --  : serpd5 (Integer)
           5463 => ( Parameter_Float, 0.0 ),   --  : outsam11 (Amount)
           5464 => ( Parameter_Float, 0.0 ),   --  : outsam12 (Amount)
           5465 => ( Parameter_Float, 0.0 ),   --  : outsam21 (Amount)
           5466 => ( Parameter_Integer, 0 ),   --  : outsam22 (Integer)
           5467 => ( Parameter_Integer, 0 ),   --  : outsam31 (Integer)
           5468 => ( Parameter_Integer, 0 ),   --  : outsam32 (Integer)
           5469 => ( Parameter_Integer, 0 ),   --  : outsin11 (Integer)
           5470 => ( Parameter_Integer, 0 ),   --  : outsin12 (Integer)
           5471 => ( Parameter_Integer, 0 ),   --  : outsin21 (Integer)
           5472 => ( Parameter_Integer, 0 ),   --  : outsin22 (Integer)
           5473 => ( Parameter_Integer, 0 ),   --  : outsin31 (Integer)
           5474 => ( Parameter_Integer, 0 ),   --  : outsin32 (Integer)
           5475 => ( Parameter_Integer, 0 ),   --  : outspa11 (Integer)
           5476 => ( Parameter_Integer, 0 ),   --  : outspa12 (Integer)
           5477 => ( Parameter_Integer, 0 ),   --  : outspa21 (Integer)
           5478 => ( Parameter_Integer, 0 ),   --  : outspa22 (Integer)
           5479 => ( Parameter_Integer, 0 ),   --  : outspa31 (Integer)
           5480 => ( Parameter_Integer, 0 ),   --  : outspa32 (Integer)
           5481 => ( Parameter_Integer, 0 ),   --  : outspd11 (Integer)
           5482 => ( Parameter_Integer, 0 ),   --  : outspd12 (Integer)
           5483 => ( Parameter_Integer, 0 ),   --  : outspd21 (Integer)
           5484 => ( Parameter_Integer, 0 ),   --  : outspd22 (Integer)
           5485 => ( Parameter_Integer, 0 ),   --  : outspd31 (Integer)
           5486 => ( Parameter_Integer, 0 ),   --  : outspd32 (Integer)
           5487 => ( Parameter_Float, 0.0 ),   --  : borramt1 (Amount)
           5488 => ( Parameter_Integer, 0 ),   --  : borramt2 (Integer)
           5489 => ( Parameter_Integer, 0 ),   --  : borramt3 (Integer)
           5490 => ( Parameter_Integer, 0 ),   --  : endwp11 (Integer)
           5491 => ( Parameter_Integer, 0 ),   --  : endwp12 (Integer)
           5492 => ( Parameter_Integer, 0 ),   --  : endwp13 (Integer)
           5493 => ( Parameter_Integer, 0 ),   --  : endwp21 (Integer)
           5494 => ( Parameter_Integer, 0 ),   --  : endwp22 (Integer)
           5495 => ( Parameter_Integer, 0 ),   --  : endwp23 (Integer)
           5496 => ( Parameter_Integer, 0 ),   --  : endwp31 (Integer)
           5497 => ( Parameter_Integer, 0 ),   --  : endwp32 (Integer)
           5498 => ( Parameter_Integer, 0 ),   --  : endwp33 (Integer)
           5499 => ( Parameter_Integer, 0 ),   --  : endwp41 (Integer)
           5500 => ( Parameter_Integer, 0 ),   --  : endwp42 (Integer)
           5501 => ( Parameter_Integer, 0 ),   --  : endwp43 (Integer)
           5502 => ( Parameter_Integer, 0 ),   --  : endwp51 (Integer)
           5503 => ( Parameter_Integer, 0 ),   --  : endwp52 (Integer)
           5504 => ( Parameter_Integer, 0 ),   --  : endwp53 (Integer)
           5505 => ( Parameter_Integer, 0 ),   --  : incmin11 (Integer)
           5506 => ( Parameter_Integer, 0 ),   --  : incmin12 (Integer)
           5507 => ( Parameter_Integer, 0 ),   --  : incmin13 (Integer)
           5508 => ( Parameter_Integer, 0 ),   --  : incmin21 (Integer)
           5509 => ( Parameter_Integer, 0 ),   --  : incmin22 (Integer)
           5510 => ( Parameter_Integer, 0 ),   --  : incmin23 (Integer)
           5511 => ( Parameter_Integer, 0 ),   --  : incmin31 (Integer)
           5512 => ( Parameter_Integer, 0 ),   --  : incmin32 (Integer)
           5513 => ( Parameter_Integer, 0 ),   --  : incmin33 (Integer)
           5514 => ( Parameter_Integer, 0 ),   --  : incmp11 (Integer)
           5515 => ( Parameter_Integer, 0 ),   --  : incmp12 (Integer)
           5516 => ( Parameter_Integer, 0 ),   --  : incmp13 (Integer)
           5517 => ( Parameter_Integer, 0 ),   --  : incmp21 (Integer)
           5518 => ( Parameter_Integer, 0 ),   --  : incmp22 (Integer)
           5519 => ( Parameter_Integer, 0 ),   --  : incmp23 (Integer)
           5520 => ( Parameter_Integer, 0 ),   --  : incmp31 (Integer)
           5521 => ( Parameter_Integer, 0 ),   --  : incmp32 (Integer)
           5522 => ( Parameter_Integer, 0 ),   --  : incmp33 (Integer)
           5523 => ( Parameter_Float, 0.0 ),   --  : incmpa11 (Amount)
           5524 => ( Parameter_Float, 0.0 ),   --  : incmpa12 (Amount)
           5525 => ( Parameter_Float, 0.0 ),   --  : incmpa13 (Amount)
           5526 => ( Parameter_Float, 0.0 ),   --  : incmpa21 (Amount)
           5527 => ( Parameter_Integer, 0 ),   --  : incmpa22 (Integer)
           5528 => ( Parameter_Integer, 0 ),   --  : incmpa23 (Integer)
           5529 => ( Parameter_Float, 0.0 ),   --  : incmpa31 (Amount)
           5530 => ( Parameter_Integer, 0 ),   --  : incmpa32 (Integer)
           5531 => ( Parameter_Integer, 0 ),   --  : incmpa33 (Integer)
           5532 => ( Parameter_Integer, 0 ),   --  : pincmp11 (Integer)
           5533 => ( Parameter_Integer, 0 ),   --  : pincmp12 (Integer)
           5534 => ( Parameter_Integer, 0 ),   --  : pincmp13 (Integer)
           5535 => ( Parameter_Integer, 0 ),   --  : pincmp21 (Integer)
           5536 => ( Parameter_Integer, 0 ),   --  : pincmp22 (Integer)
           5537 => ( Parameter_Integer, 0 ),   --  : pincmp23 (Integer)
           5538 => ( Parameter_Integer, 0 ),   --  : pincmp31 (Integer)
           5539 => ( Parameter_Integer, 0 ),   --  : pincmp32 (Integer)
           5540 => ( Parameter_Integer, 0 ),   --  : pincmp33 (Integer)
           5541 => ( Parameter_Float, 0.0 ),   --  : intpri1 (Amount)
           5542 => ( Parameter_Float, 0.0 ),   --  : intpri2 (Amount)
           5543 => ( Parameter_Float, 0.0 ),   --  : intpri3 (Amount)
           5544 => ( Parameter_Integer, 0 ),   --  : pintrpi1 (Integer)
           5545 => ( Parameter_Integer, 0 ),   --  : pintrpi2 (Integer)
           5546 => ( Parameter_Integer, 0 ),   --  : pintrpi3 (Integer)
           5547 => ( Parameter_Integer, 0 ),   --  : loanyr1 (Integer)
           5548 => ( Parameter_Integer, 0 ),   --  : loanyr2 (Integer)
           5549 => ( Parameter_Integer, 0 ),   --  : loanyr3 (Integer)
           5550 => ( Parameter_Integer, 0 ),   --  : menpol1 (Integer)
           5551 => ( Parameter_Integer, 0 ),   --  : menpol2 (Integer)
           5552 => ( Parameter_Integer, 0 ),   --  : menpol3 (Integer)
           5553 => ( Parameter_Integer, 0 ),   --  : morall1 (Integer)
           5554 => ( Parameter_Integer, 0 ),   --  : morall2 (Integer)
           5555 => ( Parameter_Integer, 0 ),   --  : morall3 (Integer)
           5556 => ( Parameter_Integer, 0 ),   --  : morflc1 (Integer)
           5557 => ( Parameter_Integer, 0 ),   --  : morflc2 (Integer)
           5558 => ( Parameter_Integer, 0 ),   --  : morflc3 (Integer)
           5559 => ( Parameter_Float, 0.0 ),   --  : morinp1 (Amount)
           5560 => ( Parameter_Float, 0.0 ),   --  : morinp2 (Amount)
           5561 => ( Parameter_Float, 0.0 ),   --  : morinp3 (Amount)
           5562 => ( Parameter_Integer, 0 ),   --  : pmorinp1 (Integer)
           5563 => ( Parameter_Integer, 0 ),   --  : pmorinp2 (Integer)
           5564 => ( Parameter_Integer, 0 ),   --  : pmorinp3 (Integer)
           5565 => ( Parameter_Integer, 0 ),   --  : morinus1 (Integer)
           5566 => ( Parameter_Integer, 0 ),   --  : morinus2 (Integer)
           5567 => ( Parameter_Integer, 0 ),   --  : morinus3 (Integer)
           5568 => ( Parameter_Integer, 0 ),   --  : mortend1 (Integer)
           5569 => ( Parameter_Integer, 0 ),   --  : mortend2 (Integer)
           5570 => ( Parameter_Integer, 0 ),   --  : mortend3 (Integer)
           5571 => ( Parameter_Float, 0.0 ),   --  : mortlef1 (Amount)
           5572 => ( Parameter_Float, 0.0 ),   --  : mortlef2 (Amount)
           5573 => ( Parameter_Integer, 0 ),   --  : mortlef3 (Integer)
           5574 => ( Parameter_Integer, 0 ),   --  : mortpro1 (Integer)
           5575 => ( Parameter_Integer, 0 ),   --  : mortpro2 (Integer)
           5576 => ( Parameter_Integer, 0 ),   --  : mortpro3 (Integer)
           5577 => ( Parameter_Integer, 0 ),   --  : morttyp1 (Integer)
           5578 => ( Parameter_Integer, 0 ),   --  : morttyp2 (Integer)
           5579 => ( Parameter_Integer, 0 ),   --  : morttyp3 (Integer)
           5580 => ( Parameter_Integer, 0 ),   --  : morupd1 (Integer)
           5581 => ( Parameter_Integer, 0 ),   --  : morupd2 (Integer)
           5582 => ( Parameter_Integer, 0 ),   --  : morupd3 (Integer)
           5583 => ( Parameter_Float, 0.0 ),   --  : morus1 (Amount)
           5584 => ( Parameter_Integer, 0 ),   --  : morus2 (Integer)
           5585 => ( Parameter_Integer, 0 ),   --  : morus3 (Integer)
           5586 => ( Parameter_Integer, 0 ),   --  : mpcove11 (Integer)
           5587 => ( Parameter_Integer, 0 ),   --  : mpcove12 (Integer)
           5588 => ( Parameter_Integer, 0 ),   --  : mpcove13 (Integer)
           5589 => ( Parameter_Integer, 0 ),   --  : mpcove21 (Integer)
           5590 => ( Parameter_Integer, 0 ),   --  : mpcove22 (Integer)
           5591 => ( Parameter_Integer, 0 ),   --  : mpcove23 (Integer)
           5592 => ( Parameter_Integer, 0 ),   --  : mpcove31 (Integer)
           5593 => ( Parameter_Integer, 0 ),   --  : mpcove32 (Integer)
           5594 => ( Parameter_Integer, 0 ),   --  : mpcove33 (Integer)
           5595 => ( Parameter_Integer, 0 ),   --  : outsmor1 (Integer)
           5596 => ( Parameter_Integer, 0 ),   --  : outsmor2 (Integer)
           5597 => ( Parameter_Integer, 0 ),   --  : outsmor3 (Integer)
           5598 => ( Parameter_Float, 0.0 ),   --  : rmamt1 (Amount)
           5599 => ( Parameter_Integer, 0 ),   --  : rmamt2 (Integer)
           5600 => ( Parameter_Integer, 0 ),   --  : rmamt3 (Integer)
           5601 => ( Parameter_Integer, 0 ),   --  : rmort1 (Integer)
           5602 => ( Parameter_Integer, 0 ),   --  : rmort2 (Integer)
           5603 => ( Parameter_Integer, 0 ),   --  : rmort3 (Integer)
           5604 => ( Parameter_Integer, 0 ),   --  : rmortyr1 (Integer)
           5605 => ( Parameter_Integer, 0 ),   --  : rmortyr2 (Integer)
           5606 => ( Parameter_Integer, 0 ),   --  : rmortyr3 (Integer)
           5607 => ( Parameter_Integer, 0 ),   --  : rmpur011 (Integer)
           5608 => ( Parameter_Integer, 0 ),   --  : rmpur012 (Integer)
           5609 => ( Parameter_Integer, 0 ),   --  : rmpur013 (Integer)
           5610 => ( Parameter_Integer, 0 ),   --  : rmpur021 (Integer)
           5611 => ( Parameter_Integer, 0 ),   --  : rmpur022 (Integer)
           5612 => ( Parameter_Integer, 0 ),   --  : rmpur023 (Integer)
           5613 => ( Parameter_Integer, 0 ),   --  : rmpur031 (Integer)
           5614 => ( Parameter_Integer, 0 ),   --  : rmpur032 (Integer)
           5615 => ( Parameter_Integer, 0 ),   --  : rmpur033 (Integer)
           5616 => ( Parameter_Integer, 0 ),   --  : rmpur041 (Integer)
           5617 => ( Parameter_Integer, 0 ),   --  : rmpur042 (Integer)
           5618 => ( Parameter_Integer, 0 ),   --  : rmpur043 (Integer)
           5619 => ( Parameter_Integer, 0 ),   --  : rmpur051 (Integer)
           5620 => ( Parameter_Integer, 0 ),   --  : rmpur052 (Integer)
           5621 => ( Parameter_Integer, 0 ),   --  : rmpur053 (Integer)
           5622 => ( Parameter_Integer, 0 ),   --  : rmpur061 (Integer)
           5623 => ( Parameter_Integer, 0 ),   --  : rmpur062 (Integer)
           5624 => ( Parameter_Integer, 0 ),   --  : rmpur063 (Integer)
           5625 => ( Parameter_Integer, 0 ),   --  : rmpur071 (Integer)
           5626 => ( Parameter_Integer, 0 ),   --  : rmpur072 (Integer)
           5627 => ( Parameter_Integer, 0 ),   --  : rmpur073 (Integer)
           5628 => ( Parameter_Integer, 0 ),   --  : rmpur081 (Integer)
           5629 => ( Parameter_Integer, 0 ),   --  : rmpur082 (Integer)
           5630 => ( Parameter_Integer, 0 ),   --  : rmpur083 (Integer)
           5631 => ( Parameter_Integer, 0 ),   --  : buyyear (Integer)
           5632 => ( Parameter_Float, 0.0 ),   --  : purcamt (Amount)
           5633 => ( Parameter_Integer, 0 ),   --  : purcloan (Integer)
           5634 => ( Parameter_Integer, 0 ),   --  : secmpur3 (Integer)
           5635 => ( Parameter_Integer, 0 ),   --  : secmpur4 (Integer)
           5636 => ( Parameter_Integer, 0 ),   --  : secmpur1 (Integer)
           5637 => ( Parameter_Integer, 0 ),   --  : secmpur5 (Integer)
           5638 => ( Parameter_Integer, 0 ),   --  : secmpur6 (Integer)
           5639 => ( Parameter_Integer, 0 ),   --  : secmpur2 (Integer)
           5640 => ( Parameter_Integer, 0 ),   --  : secmpur7 (Integer)
           5641 => ( Parameter_Float, 0.0 ),   --  : rexhham1 (Amount)
           5642 => ( Parameter_Integer, 0 ),   --  : accchk1 (Integer)
           5643 => ( Parameter_Integer, 0 ),   --  : rexhhwh1 (Integer)
           5644 => ( Parameter_Integer, 0 ),   --  : prexhha1 (Integer)
           5645 => ( Parameter_Integer, 0 ),   --  : accjbp10 (Integer)
           5646 => ( Parameter_Integer, 0 ),   --  : accjbp11 (Integer)
           5647 => ( Parameter_Integer, 0 ),   --  : accjbp12 (Integer)
           5648 => ( Parameter_Integer, 0 ),   --  : accjbp13 (Integer)
           5649 => ( Parameter_Integer, 0 ),   --  : accjbp14 (Integer)
           5650 => ( Parameter_Integer, 0 ),   --  : accjob (Integer)
           5651 => ( Parameter_Integer, 0 ),   --  : ctract (Integer)
           5652 => ( Parameter_Float, 0.0 ),   --  : eligamt (Amount)
           5653 => ( Parameter_Integer, 0 ),   --  : eligpd (Integer)
           5654 => ( Parameter_Integer, 0 ),   --  : fairrent (Integer)
           5655 => ( Parameter_Integer, 0 ),   --  : furnish (Integer)
           5656 => ( Parameter_Float, 0.0 ),   --  : hbenamt (Amount)
           5657 => ( Parameter_Integer, 0 ),   --  : hbenchk (Integer)
           5658 => ( Parameter_Integer, 0 ),   --  : hbenefit (Integer)
           5659 => ( Parameter_Integer, 0 ),   --  : hbenpd (Integer)
           5660 => ( Parameter_Integer, 0 ),   --  : hbenwait (Integer)
           5661 => ( Parameter_Integer, 0 ),   --  : hbmnth (Integer)
           5662 => ( Parameter_Integer, 0 ),   --  : hbrecp (Integer)
           5663 => ( Parameter_Integer, 0 ),   --  : hbweeks (Integer)
           5664 => ( Parameter_Integer, 0 ),   --  : hbyear (Integer)
           5665 => ( Parameter_Integer, 0 ),   --  : hbyears (Integer)
           5666 => ( Parameter_Integer, 0 ),   --  : landlord (Integer)
           5667 => ( Parameter_Integer, 0 ),   --  : niystart (Integer)
           5668 => ( Parameter_Integer, 0 ),   --  : othtype (Integer)
           5669 => ( Parameter_Integer, 0 ),   --  : rebate (Integer)
           5670 => ( Parameter_Float, 0.0 ),   --  : rent (Amount)
           5671 => ( Parameter_Integer, 0 ),   --  : rentdoc (Integer)
           5672 => ( Parameter_Integer, 0 ),   --  : renthol (Integer)
           5673 => ( Parameter_Integer, 0 ),   --  : rentpd (Integer)
           5674 => ( Parameter_Integer, 0 ),   --  : rentpd1 (Integer)
           5675 => ( Parameter_Integer, 0 ),   --  : rentpd2 (Integer)
           5676 => ( Parameter_Integer, 0 ),   --  : resll (Integer)
           5677 => ( Parameter_Integer, 0 ),   --  : resll2 (Integer)
           5678 => ( Parameter_Integer, 0 ),   --  : serincam (Integer)
           5679 => ( Parameter_Integer, 0 ),   --  : tentype (Integer)
           5680 => ( Parameter_Integer, 0 ),   --  : weekhol (Integer)
           5681 => ( Parameter_Integer, 0 ),   --  : wsinc (Integer)
           5682 => ( Parameter_Float, 0.0 ),   --  : wsincamt (Amount)
           5683 => ( Parameter_Integer, 0 ),   --  : ystartr (Integer)
           5684 => ( Parameter_Integer, 0 ),   --  : accjbp1 (Integer)
           5685 => ( Parameter_Integer, 0 ),   --  : accjbp2 (Integer)
           5686 => ( Parameter_Integer, 0 ),   --  : accjbp3 (Integer)
           5687 => ( Parameter_Integer, 0 ),   --  : accjbp4 (Integer)
           5688 => ( Parameter_Integer, 0 ),   --  : accjbp5 (Integer)
           5689 => ( Parameter_Integer, 0 ),   --  : accjbp6 (Integer)
           5690 => ( Parameter_Integer, 0 ),   --  : accjbp7 (Integer)
           5691 => ( Parameter_Integer, 0 ),   --  : accjbp8 (Integer)
           5692 => ( Parameter_Integer, 0 ),   --  : accjbp9 (Integer)
           5693 => ( Parameter_Integer, 0 ),   --  : rexhh (Integer)
           5694 => ( Parameter_Float, 0.0 ),   --  : rntfull (Amount)
           5695 => ( Parameter_Integer, 0 ),   --  : lighting (Integer)
           5696 => ( Parameter_Integer, 0 ),   --  : heating (Integer)
           5697 => ( Parameter_Integer, 0 ),   --  : hotwater (Integer)
           5698 => ( Parameter_Integer, 0 ),   --  : fuelcook (Integer)
           5699 => ( Parameter_Integer, 0 ),   --  : tvlice (Integer)
           5700 => ( Parameter_Integer, 0 ),   --  : elec (Integer)
           5701 => ( Parameter_Integer, 0 ),   --  : gas (Integer)
           5702 => ( Parameter_Integer, 0 )   --  : lsf (Integer)
      
      ));
   begin
      return params;
   end Get_Configured_Insert_Params;



   function Get_Prepared_Insert_Statement return gse.Prepared_Statement is 
      ps : gse.Prepared_Statement; 
      query : constant String := DB_Commons.Add_Schema_To_Query( INSERT_PART, SCHEMA_NAME ) & " ( $1, $2, $3, $4, $5, $6, $7, $8, $9, $10, $11, $12, $13, $14, $15, $16, $17, $18, $19, $20, $21, $22, $23, $24, $25, $26, $27, $28, $29, $30, $31, $32, $33, $34, $35, $36, $37, $38, $39, $40, $41, $42, $43, $44, $45, $46, $47, $48, $49, $50, $51, $52, $53, $54, $55, $56, $57, $58, $59, $60, $61, $62, $63, $64, $65, $66, $67, $68, $69, $70, $71, $72, $73, $74, $75, $76, $77, $78, $79, $80, $81, $82, $83, $84, $85, $86, $87, $88, $89, $90, $91, $92, $93, $94, $95, $96, $97, $98, $99, $100, $101, $102, $103, $104, $105, $106, $107, $108, $109, $110, $111, $112, $113, $114, $115, $116, $117, $118, $119, $120, $121, $122, $123, $124, $125, $126, $127, $128, $129, $130, $131, $132, $133, $134, $135, $136, $137, $138, $139, $140, $141, $142, $143, $144, $145, $146, $147, $148, $149, $150, $151, $152, $153, $154, $155, $156, $157, $158, $159, $160, $161, $162, $163, $164, $165, $166, $167, $168, $169, $170, $171, $172, $173, $174, $175, $176, $177, $178, $179, $180, $181, $182, $183, $184, $185, $186, $187, $188, $189, $190, $191, $192, $193, $194, $195, $196, $197, $198, $199, $200, $201, $202, $203, $204, $205, $206, $207, $208, $209, $210, $211, $212, $213, $214, $215, $216, $217, $218, $219, $220, $221, $222, $223, $224, $225, $226, $227, $228, $229, $230, $231, $232, $233, $234, $235, $236, $237, $238, $239, $240, $241, $242, $243, $244, $245, $246, $247, $248, $249, $250, $251, $252, $253, $254, $255, $256, $257, $258, $259, $260, $261, $262, $263, $264, $265, $266, $267, $268, $269, $270, $271, $272, $273, $274, $275, $276, $277, $278, $279, $280, $281, $282, $283, $284, $285, $286, $287, $288, $289, $290, $291, $292, $293, $294, $295, $296, $297, $298, $299, $300, $301, $302, $303, $304, $305, $306, $307, $308, $309, $310, $311, $312, $313, $314, $315, $316, $317, $318, $319, $320, $321, $322, $323, $324, $325, $326, $327, $328, $329, $330, $331, $332, $333, $334, $335, $336, $337, $338, $339, $340, $341, $342, $343, $344, $345, $346, $347, $348, $349, $350, $351, $352, $353, $354, $355, $356, $357, $358, $359, $360, $361, $362, $363, $364, $365, $366, $367, $368, $369, $370, $371, $372, $373, $374, $375, $376, $377, $378, $379, $380, $381, $382, $383, $384, $385, $386, $387, $388, $389, $390, $391, $392, $393, $394, $395, $396, $397, $398, $399, $400, $401, $402, $403, $404, $405, $406, $407, $408, $409, $410, $411, $412, $413, $414, $415, $416, $417, $418, $419, $420, $421, $422, $423, $424, $425, $426, $427, $428, $429, $430, $431, $432, $433, $434, $435, $436, $437, $438, $439, $440, $441, $442, $443, $444, $445, $446, $447, $448, $449, $450, $451, $452, $453, $454, $455, $456, $457, $458, $459, $460, $461, $462, $463, $464, $465, $466, $467, $468, $469, $470, $471, $472, $473, $474, $475, $476, $477, $478, $479, $480, $481, $482, $483, $484, $485, $486, $487, $488, $489, $490, $491, $492, $493, $494, $495, $496, $497, $498, $499, $500, $501, $502, $503, $504, $505, $506, $507, $508, $509, $510, $511, $512, $513, $514, $515, $516, $517, $518, $519, $520, $521, $522, $523, $524, $525, $526, $527, $528, $529, $530, $531, $532, $533, $534, $535, $536, $537, $538, $539, $540, $541, $542, $543, $544, $545, $546, $547, $548, $549, $550, $551, $552, $553, $554, $555, $556, $557, $558, $559, $560, $561, $562, $563, $564, $565, $566, $567, $568, $569, $570, $571, $572, $573, $574, $575, $576, $577, $578, $579, $580, $581, $582, $583, $584, $585, $586, $587, $588, $589, $590, $591, $592, $593, $594, $595, $596, $597, $598, $599, $600, $601, $602, $603, $604, $605, $606, $607, $608, $609, $610, $611, $612, $613, $614, $615, $616, $617, $618, $619, $620, $621, $622, $623, $624, $625, $626, $627, $628, $629, $630, $631, $632, $633, $634, $635, $636, $637, $638, $639, $640, $641, $642, $643, $644, $645, $646, $647, $648, $649, $650, $651, $652, $653, $654, $655, $656, $657, $658, $659, $660, $661, $662, $663, $664, $665, $666, $667, $668, $669, $670, $671, $672, $673, $674, $675, $676, $677, $678, $679, $680, $681, $682, $683, $684, $685, $686, $687, $688, $689, $690, $691, $692, $693, $694, $695, $696, $697, $698, $699, $700, $701, $702, $703, $704, $705, $706, $707, $708, $709, $710, $711, $712, $713, $714, $715, $716, $717, $718, $719, $720, $721, $722, $723, $724, $725, $726, $727, $728, $729, $730, $731, $732, $733, $734, $735, $736, $737, $738, $739, $740, $741, $742, $743, $744, $745, $746, $747, $748, $749, $750, $751, $752, $753, $754, $755, $756, $757, $758, $759, $760, $761, $762, $763, $764, $765, $766, $767, $768, $769, $770, $771, $772, $773, $774, $775, $776, $777, $778, $779, $780, $781, $782, $783, $784, $785, $786, $787, $788, $789, $790, $791, $792, $793, $794, $795, $796, $797, $798, $799, $800, $801, $802, $803, $804, $805, $806, $807, $808, $809, $810, $811, $812, $813, $814, $815, $816, $817, $818, $819, $820, $821, $822, $823, $824, $825, $826, $827, $828, $829, $830, $831, $832, $833, $834, $835, $836, $837, $838, $839, $840, $841, $842, $843, $844, $845, $846, $847, $848, $849, $850, $851, $852, $853, $854, $855, $856, $857, $858, $859, $860, $861, $862, $863, $864, $865, $866, $867, $868, $869, $870, $871, $872, $873, $874, $875, $876, $877, $878, $879, $880, $881, $882, $883, $884, $885, $886, $887, $888, $889, $890, $891, $892, $893, $894, $895, $896, $897, $898, $899, $900, $901, $902, $903, $904, $905, $906, $907, $908, $909, $910, $911, $912, $913, $914, $915, $916, $917, $918, $919, $920, $921, $922, $923, $924, $925, $926, $927, $928, $929, $930, $931, $932, $933, $934, $935, $936, $937, $938, $939, $940, $941, $942, $943, $944, $945, $946, $947, $948, $949, $950, $951, $952, $953, $954, $955, $956, $957, $958, $959, $960, $961, $962, $963, $964, $965, $966, $967, $968, $969, $970, $971, $972, $973, $974, $975, $976, $977, $978, $979, $980, $981, $982, $983, $984, $985, $986, $987, $988, $989, $990, $991, $992, $993, $994, $995, $996, $997, $998, $999, $1000, $1001, $1002, $1003, $1004, $1005, $1006, $1007, $1008, $1009, $1010, $1011, $1012, $1013, $1014, $1015, $1016, $1017, $1018, $1019, $1020, $1021, $1022, $1023, $1024, $1025, $1026, $1027, $1028, $1029, $1030, $1031, $1032, $1033, $1034, $1035, $1036, $1037, $1038, $1039, $1040, $1041, $1042, $1043, $1044, $1045, $1046, $1047, $1048, $1049, $1050, $1051, $1052, $1053, $1054, $1055, $1056, $1057, $1058, $1059, $1060, $1061, $1062, $1063, $1064, $1065, $1066, $1067, $1068, $1069, $1070, $1071, $1072, $1073, $1074, $1075, $1076, $1077, $1078, $1079, $1080, $1081, $1082, $1083, $1084, $1085, $1086, $1087, $1088, $1089, $1090, $1091, $1092, $1093, $1094, $1095, $1096, $1097, $1098, $1099, $1100, $1101, $1102, $1103, $1104, $1105, $1106, $1107, $1108, $1109, $1110, $1111, $1112, $1113, $1114, $1115, $1116, $1117, $1118, $1119, $1120, $1121, $1122, $1123, $1124, $1125, $1126, $1127, $1128, $1129, $1130, $1131, $1132, $1133, $1134, $1135, $1136, $1137, $1138, $1139, $1140, $1141, $1142, $1143, $1144, $1145, $1146, $1147, $1148, $1149, $1150, $1151, $1152, $1153, $1154, $1155, $1156, $1157, $1158, $1159, $1160, $1161, $1162, $1163, $1164, $1165, $1166, $1167, $1168, $1169, $1170, $1171, $1172, $1173, $1174, $1175, $1176, $1177, $1178, $1179, $1180, $1181, $1182, $1183, $1184, $1185, $1186, $1187, $1188, $1189, $1190, $1191, $1192, $1193, $1194, $1195, $1196, $1197, $1198, $1199, $1200, $1201, $1202, $1203, $1204, $1205, $1206, $1207, $1208, $1209, $1210, $1211, $1212, $1213, $1214, $1215, $1216, $1217, $1218, $1219, $1220, $1221, $1222, $1223, $1224, $1225, $1226, $1227, $1228, $1229, $1230, $1231, $1232, $1233, $1234, $1235, $1236, $1237, $1238, $1239, $1240, $1241, $1242, $1243, $1244, $1245, $1246, $1247, $1248, $1249, $1250, $1251, $1252, $1253, $1254, $1255, $1256, $1257, $1258, $1259, $1260, $1261, $1262, $1263, $1264, $1265, $1266, $1267, $1268, $1269, $1270, $1271, $1272, $1273, $1274, $1275, $1276, $1277, $1278, $1279, $1280, $1281, $1282, $1283, $1284, $1285, $1286, $1287, $1288, $1289, $1290, $1291, $1292, $1293, $1294, $1295, $1296, $1297, $1298, $1299, $1300, $1301, $1302, $1303, $1304, $1305, $1306, $1307, $1308, $1309, $1310, $1311, $1312, $1313, $1314, $1315, $1316, $1317, $1318, $1319, $1320, $1321, $1322, $1323, $1324, $1325, $1326, $1327, $1328, $1329, $1330, $1331, $1332, $1333, $1334, $1335, $1336, $1337, $1338, $1339, $1340, $1341, $1342, $1343, $1344, $1345, $1346, $1347, $1348, $1349, $1350, $1351, $1352, $1353, $1354, $1355, $1356, $1357, $1358, $1359, $1360, $1361, $1362, $1363, $1364, $1365, $1366, $1367, $1368, $1369, $1370, $1371, $1372, $1373, $1374, $1375, $1376, $1377, $1378, $1379, $1380, $1381, $1382, $1383, $1384, $1385, $1386, $1387, $1388, $1389, $1390, $1391, $1392, $1393, $1394, $1395, $1396, $1397, $1398, $1399, $1400, $1401, $1402, $1403, $1404, $1405, $1406, $1407, $1408, $1409, $1410, $1411, $1412, $1413, $1414, $1415, $1416, $1417, $1418, $1419, $1420, $1421, $1422, $1423, $1424, $1425, $1426, $1427, $1428, $1429, $1430, $1431, $1432, $1433, $1434, $1435, $1436, $1437, $1438, $1439, $1440, $1441, $1442, $1443, $1444, $1445, $1446, $1447, $1448, $1449, $1450, $1451, $1452, $1453, $1454, $1455, $1456, $1457, $1458, $1459, $1460, $1461, $1462, $1463, $1464, $1465, $1466, $1467, $1468, $1469, $1470, $1471, $1472, $1473, $1474, $1475, $1476, $1477, $1478, $1479, $1480, $1481, $1482, $1483, $1484, $1485, $1486, $1487, $1488, $1489, $1490, $1491, $1492, $1493, $1494, $1495, $1496, $1497, $1498, $1499, $1500, $1501, $1502, $1503, $1504, $1505, $1506, $1507, $1508, $1509, $1510, $1511, $1512, $1513, $1514, $1515, $1516, $1517, $1518, $1519, $1520, $1521, $1522, $1523, $1524, $1525, $1526, $1527, $1528, $1529, $1530, $1531, $1532, $1533, $1534, $1535, $1536, $1537, $1538, $1539, $1540, $1541, $1542, $1543, $1544, $1545, $1546, $1547, $1548, $1549, $1550, $1551, $1552, $1553, $1554, $1555, $1556, $1557, $1558, $1559, $1560, $1561, $1562, $1563, $1564, $1565, $1566, $1567, $1568, $1569, $1570, $1571, $1572, $1573, $1574, $1575, $1576, $1577, $1578, $1579, $1580, $1581, $1582, $1583, $1584, $1585, $1586, $1587, $1588, $1589, $1590, $1591, $1592, $1593, $1594, $1595, $1596, $1597, $1598, $1599, $1600, $1601, $1602, $1603, $1604, $1605, $1606, $1607, $1608, $1609, $1610, $1611, $1612, $1613, $1614, $1615, $1616, $1617, $1618, $1619, $1620, $1621, $1622, $1623, $1624, $1625, $1626, $1627, $1628, $1629, $1630, $1631, $1632, $1633, $1634, $1635, $1636, $1637, $1638, $1639, $1640, $1641, $1642, $1643, $1644, $1645, $1646, $1647, $1648, $1649, $1650, $1651, $1652, $1653, $1654, $1655, $1656, $1657, $1658, $1659, $1660, $1661, $1662, $1663, $1664, $1665, $1666, $1667, $1668, $1669, $1670, $1671, $1672, $1673, $1674, $1675, $1676, $1677, $1678, $1679, $1680, $1681, $1682, $1683, $1684, $1685, $1686, $1687, $1688, $1689, $1690, $1691, $1692, $1693, $1694, $1695, $1696, $1697, $1698, $1699, $1700, $1701, $1702, $1703, $1704, $1705, $1706, $1707, $1708, $1709, $1710, $1711, $1712, $1713, $1714, $1715, $1716, $1717, $1718, $1719, $1720, $1721, $1722, $1723, $1724, $1725, $1726, $1727, $1728, $1729, $1730, $1731, $1732, $1733, $1734, $1735, $1736, $1737, $1738, $1739, $1740, $1741, $1742, $1743, $1744, $1745, $1746, $1747, $1748, $1749, $1750, $1751, $1752, $1753, $1754, $1755, $1756, $1757, $1758, $1759, $1760, $1761, $1762, $1763, $1764, $1765, $1766, $1767, $1768, $1769, $1770, $1771, $1772, $1773, $1774, $1775, $1776, $1777, $1778, $1779, $1780, $1781, $1782, $1783, $1784, $1785, $1786, $1787, $1788, $1789, $1790, $1791, $1792, $1793, $1794, $1795, $1796, $1797, $1798, $1799, $1800, $1801, $1802, $1803, $1804, $1805, $1806, $1807, $1808, $1809, $1810, $1811, $1812, $1813, $1814, $1815, $1816, $1817, $1818, $1819, $1820, $1821, $1822, $1823, $1824, $1825, $1826, $1827, $1828, $1829, $1830, $1831, $1832, $1833, $1834, $1835, $1836, $1837, $1838, $1839, $1840, $1841, $1842, $1843, $1844, $1845, $1846, $1847, $1848, $1849, $1850, $1851, $1852, $1853, $1854, $1855, $1856, $1857, $1858, $1859, $1860, $1861, $1862, $1863, $1864, $1865, $1866, $1867, $1868, $1869, $1870, $1871, $1872, $1873, $1874, $1875, $1876, $1877, $1878, $1879, $1880, $1881, $1882, $1883, $1884, $1885, $1886, $1887, $1888, $1889, $1890, $1891, $1892, $1893, $1894, $1895, $1896, $1897, $1898, $1899, $1900, $1901, $1902, $1903, $1904, $1905, $1906, $1907, $1908, $1909, $1910, $1911, $1912, $1913, $1914, $1915, $1916, $1917, $1918, $1919, $1920, $1921, $1922, $1923, $1924, $1925, $1926, $1927, $1928, $1929, $1930, $1931, $1932, $1933, $1934, $1935, $1936, $1937, $1938, $1939, $1940, $1941, $1942, $1943, $1944, $1945, $1946, $1947, $1948, $1949, $1950, $1951, $1952, $1953, $1954, $1955, $1956, $1957, $1958, $1959, $1960, $1961, $1962, $1963, $1964, $1965, $1966, $1967, $1968, $1969, $1970, $1971, $1972, $1973, $1974, $1975, $1976, $1977, $1978, $1979, $1980, $1981, $1982, $1983, $1984, $1985, $1986, $1987, $1988, $1989, $1990, $1991, $1992, $1993, $1994, $1995, $1996, $1997, $1998, $1999, $2000, $2001, $2002, $2003, $2004, $2005, $2006, $2007, $2008, $2009, $2010, $2011, $2012, $2013, $2014, $2015, $2016, $2017, $2018, $2019, $2020, $2021, $2022, $2023, $2024, $2025, $2026, $2027, $2028, $2029, $2030, $2031, $2032, $2033, $2034, $2035, $2036, $2037, $2038, $2039, $2040, $2041, $2042, $2043, $2044, $2045, $2046, $2047, $2048, $2049, $2050, $2051, $2052, $2053, $2054, $2055, $2056, $2057, $2058, $2059, $2060, $2061, $2062, $2063, $2064, $2065, $2066, $2067, $2068, $2069, $2070, $2071, $2072, $2073, $2074, $2075, $2076, $2077, $2078, $2079, $2080, $2081, $2082, $2083, $2084, $2085, $2086, $2087, $2088, $2089, $2090, $2091, $2092, $2093, $2094, $2095, $2096, $2097, $2098, $2099, $2100, $2101, $2102, $2103, $2104, $2105, $2106, $2107, $2108, $2109, $2110, $2111, $2112, $2113, $2114, $2115, $2116, $2117, $2118, $2119, $2120, $2121, $2122, $2123, $2124, $2125, $2126, $2127, $2128, $2129, $2130, $2131, $2132, $2133, $2134, $2135, $2136, $2137, $2138, $2139, $2140, $2141, $2142, $2143, $2144, $2145, $2146, $2147, $2148, $2149, $2150, $2151, $2152, $2153, $2154, $2155, $2156, $2157, $2158, $2159, $2160, $2161, $2162, $2163, $2164, $2165, $2166, $2167, $2168, $2169, $2170, $2171, $2172, $2173, $2174, $2175, $2176, $2177, $2178, $2179, $2180, $2181, $2182, $2183, $2184, $2185, $2186, $2187, $2188, $2189, $2190, $2191, $2192, $2193, $2194, $2195, $2196, $2197, $2198, $2199, $2200, $2201, $2202, $2203, $2204, $2205, $2206, $2207, $2208, $2209, $2210, $2211, $2212, $2213, $2214, $2215, $2216, $2217, $2218, $2219, $2220, $2221, $2222, $2223, $2224, $2225, $2226, $2227, $2228, $2229, $2230, $2231, $2232, $2233, $2234, $2235, $2236, $2237, $2238, $2239, $2240, $2241, $2242, $2243, $2244, $2245, $2246, $2247, $2248, $2249, $2250, $2251, $2252, $2253, $2254, $2255, $2256, $2257, $2258, $2259, $2260, $2261, $2262, $2263, $2264, $2265, $2266, $2267, $2268, $2269, $2270, $2271, $2272, $2273, $2274, $2275, $2276, $2277, $2278, $2279, $2280, $2281, $2282, $2283, $2284, $2285, $2286, $2287, $2288, $2289, $2290, $2291, $2292, $2293, $2294, $2295, $2296, $2297, $2298, $2299, $2300, $2301, $2302, $2303, $2304, $2305, $2306, $2307, $2308, $2309, $2310, $2311, $2312, $2313, $2314, $2315, $2316, $2317, $2318, $2319, $2320, $2321, $2322, $2323, $2324, $2325, $2326, $2327, $2328, $2329, $2330, $2331, $2332, $2333, $2334, $2335, $2336, $2337, $2338, $2339, $2340, $2341, $2342, $2343, $2344, $2345, $2346, $2347, $2348, $2349, $2350, $2351, $2352, $2353, $2354, $2355, $2356, $2357, $2358, $2359, $2360, $2361, $2362, $2363, $2364, $2365, $2366, $2367, $2368, $2369, $2370, $2371, $2372, $2373, $2374, $2375, $2376, $2377, $2378, $2379, $2380, $2381, $2382, $2383, $2384, $2385, $2386, $2387, $2388, $2389, $2390, $2391, $2392, $2393, $2394, $2395, $2396, $2397, $2398, $2399, $2400, $2401, $2402, $2403, $2404, $2405, $2406, $2407, $2408, $2409, $2410, $2411, $2412, $2413, $2414, $2415, $2416, $2417, $2418, $2419, $2420, $2421, $2422, $2423, $2424, $2425, $2426, $2427, $2428, $2429, $2430, $2431, $2432, $2433, $2434, $2435, $2436, $2437, $2438, $2439, $2440, $2441, $2442, $2443, $2444, $2445, $2446, $2447, $2448, $2449, $2450, $2451, $2452, $2453, $2454, $2455, $2456, $2457, $2458, $2459, $2460, $2461, $2462, $2463, $2464, $2465, $2466, $2467, $2468, $2469, $2470, $2471, $2472, $2473, $2474, $2475, $2476, $2477, $2478, $2479, $2480, $2481, $2482, $2483, $2484, $2485, $2486, $2487, $2488, $2489, $2490, $2491, $2492, $2493, $2494, $2495, $2496, $2497, $2498, $2499, $2500, $2501, $2502, $2503, $2504, $2505, $2506, $2507, $2508, $2509, $2510, $2511, $2512, $2513, $2514, $2515, $2516, $2517, $2518, $2519, $2520, $2521, $2522, $2523, $2524, $2525, $2526, $2527, $2528, $2529, $2530, $2531, $2532, $2533, $2534, $2535, $2536, $2537, $2538, $2539, $2540, $2541, $2542, $2543, $2544, $2545, $2546, $2547, $2548, $2549, $2550, $2551, $2552, $2553, $2554, $2555, $2556, $2557, $2558, $2559, $2560, $2561, $2562, $2563, $2564, $2565, $2566, $2567, $2568, $2569, $2570, $2571, $2572, $2573, $2574, $2575, $2576, $2577, $2578, $2579, $2580, $2581, $2582, $2583, $2584, $2585, $2586, $2587, $2588, $2589, $2590, $2591, $2592, $2593, $2594, $2595, $2596, $2597, $2598, $2599, $2600, $2601, $2602, $2603, $2604, $2605, $2606, $2607, $2608, $2609, $2610, $2611, $2612, $2613, $2614, $2615, $2616, $2617, $2618, $2619, $2620, $2621, $2622, $2623, $2624, $2625, $2626, $2627, $2628, $2629, $2630, $2631, $2632, $2633, $2634, $2635, $2636, $2637, $2638, $2639, $2640, $2641, $2642, $2643, $2644, $2645, $2646, $2647, $2648, $2649, $2650, $2651, $2652, $2653, $2654, $2655, $2656, $2657, $2658, $2659, $2660, $2661, $2662, $2663, $2664, $2665, $2666, $2667, $2668, $2669, $2670, $2671, $2672, $2673, $2674, $2675, $2676, $2677, $2678, $2679, $2680, $2681, $2682, $2683, $2684, $2685, $2686, $2687, $2688, $2689, $2690, $2691, $2692, $2693, $2694, $2695, $2696, $2697, $2698, $2699, $2700, $2701, $2702, $2703, $2704, $2705, $2706, $2707, $2708, $2709, $2710, $2711, $2712, $2713, $2714, $2715, $2716, $2717, $2718, $2719, $2720, $2721, $2722, $2723, $2724, $2725, $2726, $2727, $2728, $2729, $2730, $2731, $2732, $2733, $2734, $2735, $2736, $2737, $2738, $2739, $2740, $2741, $2742, $2743, $2744, $2745, $2746, $2747, $2748, $2749, $2750, $2751, $2752, $2753, $2754, $2755, $2756, $2757, $2758, $2759, $2760, $2761, $2762, $2763, $2764, $2765, $2766, $2767, $2768, $2769, $2770, $2771, $2772, $2773, $2774, $2775, $2776, $2777, $2778, $2779, $2780, $2781, $2782, $2783, $2784, $2785, $2786, $2787, $2788, $2789, $2790, $2791, $2792, $2793, $2794, $2795, $2796, $2797, $2798, $2799, $2800, $2801, $2802, $2803, $2804, $2805, $2806, $2807, $2808, $2809, $2810, $2811, $2812, $2813, $2814, $2815, $2816, $2817, $2818, $2819, $2820, $2821, $2822, $2823, $2824, $2825, $2826, $2827, $2828, $2829, $2830, $2831, $2832, $2833, $2834, $2835, $2836, $2837, $2838, $2839, $2840, $2841, $2842, $2843, $2844, $2845, $2846, $2847, $2848, $2849, $2850, $2851, $2852, $2853, $2854, $2855, $2856, $2857, $2858, $2859, $2860, $2861, $2862, $2863, $2864, $2865, $2866, $2867, $2868, $2869, $2870, $2871, $2872, $2873, $2874, $2875, $2876, $2877, $2878, $2879, $2880, $2881, $2882, $2883, $2884, $2885, $2886, $2887, $2888, $2889, $2890, $2891, $2892, $2893, $2894, $2895, $2896, $2897, $2898, $2899, $2900, $2901, $2902, $2903, $2904, $2905, $2906, $2907, $2908, $2909, $2910, $2911, $2912, $2913, $2914, $2915, $2916, $2917, $2918, $2919, $2920, $2921, $2922, $2923, $2924, $2925, $2926, $2927, $2928, $2929, $2930, $2931, $2932, $2933, $2934, $2935, $2936, $2937, $2938, $2939, $2940, $2941, $2942, $2943, $2944, $2945, $2946, $2947, $2948, $2949, $2950, $2951, $2952, $2953, $2954, $2955, $2956, $2957, $2958, $2959, $2960, $2961, $2962, $2963, $2964, $2965, $2966, $2967, $2968, $2969, $2970, $2971, $2972, $2973, $2974, $2975, $2976, $2977, $2978, $2979, $2980, $2981, $2982, $2983, $2984, $2985, $2986, $2987, $2988, $2989, $2990, $2991, $2992, $2993, $2994, $2995, $2996, $2997, $2998, $2999, $3000, $3001, $3002, $3003, $3004, $3005, $3006, $3007, $3008, $3009, $3010, $3011, $3012, $3013, $3014, $3015, $3016, $3017, $3018, $3019, $3020, $3021, $3022, $3023, $3024, $3025, $3026, $3027, $3028, $3029, $3030, $3031, $3032, $3033, $3034, $3035, $3036, $3037, $3038, $3039, $3040, $3041, $3042, $3043, $3044, $3045, $3046, $3047, $3048, $3049, $3050, $3051, $3052, $3053, $3054, $3055, $3056, $3057, $3058, $3059, $3060, $3061, $3062, $3063, $3064, $3065, $3066, $3067, $3068, $3069, $3070, $3071, $3072, $3073, $3074, $3075, $3076, $3077, $3078, $3079, $3080, $3081, $3082, $3083, $3084, $3085, $3086, $3087, $3088, $3089, $3090, $3091, $3092, $3093, $3094, $3095, $3096, $3097, $3098, $3099, $3100, $3101, $3102, $3103, $3104, $3105, $3106, $3107, $3108, $3109, $3110, $3111, $3112, $3113, $3114, $3115, $3116, $3117, $3118, $3119, $3120, $3121, $3122, $3123, $3124, $3125, $3126, $3127, $3128, $3129, $3130, $3131, $3132, $3133, $3134, $3135, $3136, $3137, $3138, $3139, $3140, $3141, $3142, $3143, $3144, $3145, $3146, $3147, $3148, $3149, $3150, $3151, $3152, $3153, $3154, $3155, $3156, $3157, $3158, $3159, $3160, $3161, $3162, $3163, $3164, $3165, $3166, $3167, $3168, $3169, $3170, $3171, $3172, $3173, $3174, $3175, $3176, $3177, $3178, $3179, $3180, $3181, $3182, $3183, $3184, $3185, $3186, $3187, $3188, $3189, $3190, $3191, $3192, $3193, $3194, $3195, $3196, $3197, $3198, $3199, $3200, $3201, $3202, $3203, $3204, $3205, $3206, $3207, $3208, $3209, $3210, $3211, $3212, $3213, $3214, $3215, $3216, $3217, $3218, $3219, $3220, $3221, $3222, $3223, $3224, $3225, $3226, $3227, $3228, $3229, $3230, $3231, $3232, $3233, $3234, $3235, $3236, $3237, $3238, $3239, $3240, $3241, $3242, $3243, $3244, $3245, $3246, $3247, $3248, $3249, $3250, $3251, $3252, $3253, $3254, $3255, $3256, $3257, $3258, $3259, $3260, $3261, $3262, $3263, $3264, $3265, $3266, $3267, $3268, $3269, $3270, $3271, $3272, $3273, $3274, $3275, $3276, $3277, $3278, $3279, $3280, $3281, $3282, $3283, $3284, $3285, $3286, $3287, $3288, $3289, $3290, $3291, $3292, $3293, $3294, $3295, $3296, $3297, $3298, $3299, $3300, $3301, $3302, $3303, $3304, $3305, $3306, $3307, $3308, $3309, $3310, $3311, $3312, $3313, $3314, $3315, $3316, $3317, $3318, $3319, $3320, $3321, $3322, $3323, $3324, $3325, $3326, $3327, $3328, $3329, $3330, $3331, $3332, $3333, $3334, $3335, $3336, $3337, $3338, $3339, $3340, $3341, $3342, $3343, $3344, $3345, $3346, $3347, $3348, $3349, $3350, $3351, $3352, $3353, $3354, $3355, $3356, $3357, $3358, $3359, $3360, $3361, $3362, $3363, $3364, $3365, $3366, $3367, $3368, $3369, $3370, $3371, $3372, $3373, $3374, $3375, $3376, $3377, $3378, $3379, $3380, $3381, $3382, $3383, $3384, $3385, $3386, $3387, $3388, $3389, $3390, $3391, $3392, $3393, $3394, $3395, $3396, $3397, $3398, $3399, $3400, $3401, $3402, $3403, $3404, $3405, $3406, $3407, $3408, $3409, $3410, $3411, $3412, $3413, $3414, $3415, $3416, $3417, $3418, $3419, $3420, $3421, $3422, $3423, $3424, $3425, $3426, $3427, $3428, $3429, $3430, $3431, $3432, $3433, $3434, $3435, $3436, $3437, $3438, $3439, $3440, $3441, $3442, $3443, $3444, $3445, $3446, $3447, $3448, $3449, $3450, $3451, $3452, $3453, $3454, $3455, $3456, $3457, $3458, $3459, $3460, $3461, $3462, $3463, $3464, $3465, $3466, $3467, $3468, $3469, $3470, $3471, $3472, $3473, $3474, $3475, $3476, $3477, $3478, $3479, $3480, $3481, $3482, $3483, $3484, $3485, $3486, $3487, $3488, $3489, $3490, $3491, $3492, $3493, $3494, $3495, $3496, $3497, $3498, $3499, $3500, $3501, $3502, $3503, $3504, $3505, $3506, $3507, $3508, $3509, $3510, $3511, $3512, $3513, $3514, $3515, $3516, $3517, $3518, $3519, $3520, $3521, $3522, $3523, $3524, $3525, $3526, $3527, $3528, $3529, $3530, $3531, $3532, $3533, $3534, $3535, $3536, $3537, $3538, $3539, $3540, $3541, $3542, $3543, $3544, $3545, $3546, $3547, $3548, $3549, $3550, $3551, $3552, $3553, $3554, $3555, $3556, $3557, $3558, $3559, $3560, $3561, $3562, $3563, $3564, $3565, $3566, $3567, $3568, $3569, $3570, $3571, $3572, $3573, $3574, $3575, $3576, $3577, $3578, $3579, $3580, $3581, $3582, $3583, $3584, $3585, $3586, $3587, $3588, $3589, $3590, $3591, $3592, $3593, $3594, $3595, $3596, $3597, $3598, $3599, $3600, $3601, $3602, $3603, $3604, $3605, $3606, $3607, $3608, $3609, $3610, $3611, $3612, $3613, $3614, $3615, $3616, $3617, $3618, $3619, $3620, $3621, $3622, $3623, $3624, $3625, $3626, $3627, $3628, $3629, $3630, $3631, $3632, $3633, $3634, $3635, $3636, $3637, $3638, $3639, $3640, $3641, $3642, $3643, $3644, $3645, $3646, $3647, $3648, $3649, $3650, $3651, $3652, $3653, $3654, $3655, $3656, $3657, $3658, $3659, $3660, $3661, $3662, $3663, $3664, $3665, $3666, $3667, $3668, $3669, $3670, $3671, $3672, $3673, $3674, $3675, $3676, $3677, $3678, $3679, $3680, $3681, $3682, $3683, $3684, $3685, $3686, $3687, $3688, $3689, $3690, $3691, $3692, $3693, $3694, $3695, $3696, $3697, $3698, $3699, $3700, $3701, $3702, $3703, $3704, $3705, $3706, $3707, $3708, $3709, $3710, $3711, $3712, $3713, $3714, $3715, $3716, $3717, $3718, $3719, $3720, $3721, $3722, $3723, $3724, $3725, $3726, $3727, $3728, $3729, $3730, $3731, $3732, $3733, $3734, $3735, $3736, $3737, $3738, $3739, $3740, $3741, $3742, $3743, $3744, $3745, $3746, $3747, $3748, $3749, $3750, $3751, $3752, $3753, $3754, $3755, $3756, $3757, $3758, $3759, $3760, $3761, $3762, $3763, $3764, $3765, $3766, $3767, $3768, $3769, $3770, $3771, $3772, $3773, $3774, $3775, $3776, $3777, $3778, $3779, $3780, $3781, $3782, $3783, $3784, $3785, $3786, $3787, $3788, $3789, $3790, $3791, $3792, $3793, $3794, $3795, $3796, $3797, $3798, $3799, $3800, $3801, $3802, $3803, $3804, $3805, $3806, $3807, $3808, $3809, $3810, $3811, $3812, $3813, $3814, $3815, $3816, $3817, $3818, $3819, $3820, $3821, $3822, $3823, $3824, $3825, $3826, $3827, $3828, $3829, $3830, $3831, $3832, $3833, $3834, $3835, $3836, $3837, $3838, $3839, $3840, $3841, $3842, $3843, $3844, $3845, $3846, $3847, $3848, $3849, $3850, $3851, $3852, $3853, $3854, $3855, $3856, $3857, $3858, $3859, $3860, $3861, $3862, $3863, $3864, $3865, $3866, $3867, $3868, $3869, $3870, $3871, $3872, $3873, $3874, $3875, $3876, $3877, $3878, $3879, $3880, $3881, $3882, $3883, $3884, $3885, $3886, $3887, $3888, $3889, $3890, $3891, $3892, $3893, $3894, $3895, $3896, $3897, $3898, $3899, $3900, $3901, $3902, $3903, $3904, $3905, $3906, $3907, $3908, $3909, $3910, $3911, $3912, $3913, $3914, $3915, $3916, $3917, $3918, $3919, $3920, $3921, $3922, $3923, $3924, $3925, $3926, $3927, $3928, $3929, $3930, $3931, $3932, $3933, $3934, $3935, $3936, $3937, $3938, $3939, $3940, $3941, $3942, $3943, $3944, $3945, $3946, $3947, $3948, $3949, $3950, $3951, $3952, $3953, $3954, $3955, $3956, $3957, $3958, $3959, $3960, $3961, $3962, $3963, $3964, $3965, $3966, $3967, $3968, $3969, $3970, $3971, $3972, $3973, $3974, $3975, $3976, $3977, $3978, $3979, $3980, $3981, $3982, $3983, $3984, $3985, $3986, $3987, $3988, $3989, $3990, $3991, $3992, $3993, $3994, $3995, $3996, $3997, $3998, $3999, $4000, $4001, $4002, $4003, $4004, $4005, $4006, $4007, $4008, $4009, $4010, $4011, $4012, $4013, $4014, $4015, $4016, $4017, $4018, $4019, $4020, $4021, $4022, $4023, $4024, $4025, $4026, $4027, $4028, $4029, $4030, $4031, $4032, $4033, $4034, $4035, $4036, $4037, $4038, $4039, $4040, $4041, $4042, $4043, $4044, $4045, $4046, $4047, $4048, $4049, $4050, $4051, $4052, $4053, $4054, $4055, $4056, $4057, $4058, $4059, $4060, $4061, $4062, $4063, $4064, $4065, $4066, $4067, $4068, $4069, $4070, $4071, $4072, $4073, $4074, $4075, $4076, $4077, $4078, $4079, $4080, $4081, $4082, $4083, $4084, $4085, $4086, $4087, $4088, $4089, $4090, $4091, $4092, $4093, $4094, $4095, $4096, $4097, $4098, $4099, $4100, $4101, $4102, $4103, $4104, $4105, $4106, $4107, $4108, $4109, $4110, $4111, $4112, $4113, $4114, $4115, $4116, $4117, $4118, $4119, $4120, $4121, $4122, $4123, $4124, $4125, $4126, $4127, $4128, $4129, $4130, $4131, $4132, $4133, $4134, $4135, $4136, $4137, $4138, $4139, $4140, $4141, $4142, $4143, $4144, $4145, $4146, $4147, $4148, $4149, $4150, $4151, $4152, $4153, $4154, $4155, $4156, $4157, $4158, $4159, $4160, $4161, $4162, $4163, $4164, $4165, $4166, $4167, $4168, $4169, $4170, $4171, $4172, $4173, $4174, $4175, $4176, $4177, $4178, $4179, $4180, $4181, $4182, $4183, $4184, $4185, $4186, $4187, $4188, $4189, $4190, $4191, $4192, $4193, $4194, $4195, $4196, $4197, $4198, $4199, $4200, $4201, $4202, $4203, $4204, $4205, $4206, $4207, $4208, $4209, $4210, $4211, $4212, $4213, $4214, $4215, $4216, $4217, $4218, $4219, $4220, $4221, $4222, $4223, $4224, $4225, $4226, $4227, $4228, $4229, $4230, $4231, $4232, $4233, $4234, $4235, $4236, $4237, $4238, $4239, $4240, $4241, $4242, $4243, $4244, $4245, $4246, $4247, $4248, $4249, $4250, $4251, $4252, $4253, $4254, $4255, $4256, $4257, $4258, $4259, $4260, $4261, $4262, $4263, $4264, $4265, $4266, $4267, $4268, $4269, $4270, $4271, $4272, $4273, $4274, $4275, $4276, $4277, $4278, $4279, $4280, $4281, $4282, $4283, $4284, $4285, $4286, $4287, $4288, $4289, $4290, $4291, $4292, $4293, $4294, $4295, $4296, $4297, $4298, $4299, $4300, $4301, $4302, $4303, $4304, $4305, $4306, $4307, $4308, $4309, $4310, $4311, $4312, $4313, $4314, $4315, $4316, $4317, $4318, $4319, $4320, $4321, $4322, $4323, $4324, $4325, $4326, $4327, $4328, $4329, $4330, $4331, $4332, $4333, $4334, $4335, $4336, $4337, $4338, $4339, $4340, $4341, $4342, $4343, $4344, $4345, $4346, $4347, $4348, $4349, $4350, $4351, $4352, $4353, $4354, $4355, $4356, $4357, $4358, $4359, $4360, $4361, $4362, $4363, $4364, $4365, $4366, $4367, $4368, $4369, $4370, $4371, $4372, $4373, $4374, $4375, $4376, $4377, $4378, $4379, $4380, $4381, $4382, $4383, $4384, $4385, $4386, $4387, $4388, $4389, $4390, $4391, $4392, $4393, $4394, $4395, $4396, $4397, $4398, $4399, $4400, $4401, $4402, $4403, $4404, $4405, $4406, $4407, $4408, $4409, $4410, $4411, $4412, $4413, $4414, $4415, $4416, $4417, $4418, $4419, $4420, $4421, $4422, $4423, $4424, $4425, $4426, $4427, $4428, $4429, $4430, $4431, $4432, $4433, $4434, $4435, $4436, $4437, $4438, $4439, $4440, $4441, $4442, $4443, $4444, $4445, $4446, $4447, $4448, $4449, $4450, $4451, $4452, $4453, $4454, $4455, $4456, $4457, $4458, $4459, $4460, $4461, $4462, $4463, $4464, $4465, $4466, $4467, $4468, $4469, $4470, $4471, $4472, $4473, $4474, $4475, $4476, $4477, $4478, $4479, $4480, $4481, $4482, $4483, $4484, $4485, $4486, $4487, $4488, $4489, $4490, $4491, $4492, $4493, $4494, $4495, $4496, $4497, $4498, $4499, $4500, $4501, $4502, $4503, $4504, $4505, $4506, $4507, $4508, $4509, $4510, $4511, $4512, $4513, $4514, $4515, $4516, $4517, $4518, $4519, $4520, $4521, $4522, $4523, $4524, $4525, $4526, $4527, $4528, $4529, $4530, $4531, $4532, $4533, $4534, $4535, $4536, $4537, $4538, $4539, $4540, $4541, $4542, $4543, $4544, $4545, $4546, $4547, $4548, $4549, $4550, $4551, $4552, $4553, $4554, $4555, $4556, $4557, $4558, $4559, $4560, $4561, $4562, $4563, $4564, $4565, $4566, $4567, $4568, $4569, $4570, $4571, $4572, $4573, $4574, $4575, $4576, $4577, $4578, $4579, $4580, $4581, $4582, $4583, $4584, $4585, $4586, $4587, $4588, $4589, $4590, $4591, $4592, $4593, $4594, $4595, $4596, $4597, $4598, $4599, $4600, $4601, $4602, $4603, $4604, $4605, $4606, $4607, $4608, $4609, $4610, $4611, $4612, $4613, $4614, $4615, $4616, $4617, $4618, $4619, $4620, $4621, $4622, $4623, $4624, $4625, $4626, $4627, $4628, $4629, $4630, $4631, $4632, $4633, $4634, $4635, $4636, $4637, $4638, $4639, $4640, $4641, $4642, $4643, $4644, $4645, $4646, $4647, $4648, $4649, $4650, $4651, $4652, $4653, $4654, $4655, $4656, $4657, $4658, $4659, $4660, $4661, $4662, $4663, $4664, $4665, $4666, $4667, $4668, $4669, $4670, $4671, $4672, $4673, $4674, $4675, $4676, $4677, $4678, $4679, $4680, $4681, $4682, $4683, $4684, $4685, $4686, $4687, $4688, $4689, $4690, $4691, $4692, $4693, $4694, $4695, $4696, $4697, $4698, $4699, $4700, $4701, $4702, $4703, $4704, $4705, $4706, $4707, $4708, $4709, $4710, $4711, $4712, $4713, $4714, $4715, $4716, $4717, $4718, $4719, $4720, $4721, $4722, $4723, $4724, $4725, $4726, $4727, $4728, $4729, $4730, $4731, $4732, $4733, $4734, $4735, $4736, $4737, $4738, $4739, $4740, $4741, $4742, $4743, $4744, $4745, $4746, $4747, $4748, $4749, $4750, $4751, $4752, $4753, $4754, $4755, $4756, $4757, $4758, $4759, $4760, $4761, $4762, $4763, $4764, $4765, $4766, $4767, $4768, $4769, $4770, $4771, $4772, $4773, $4774, $4775, $4776, $4777, $4778, $4779, $4780, $4781, $4782, $4783, $4784, $4785, $4786, $4787, $4788, $4789, $4790, $4791, $4792, $4793, $4794, $4795, $4796, $4797, $4798, $4799, $4800, $4801, $4802, $4803, $4804, $4805, $4806, $4807, $4808, $4809, $4810, $4811, $4812, $4813, $4814, $4815, $4816, $4817, $4818, $4819, $4820, $4821, $4822, $4823, $4824, $4825, $4826, $4827, $4828, $4829, $4830, $4831, $4832, $4833, $4834, $4835, $4836, $4837, $4838, $4839, $4840, $4841, $4842, $4843, $4844, $4845, $4846, $4847, $4848, $4849, $4850, $4851, $4852, $4853, $4854, $4855, $4856, $4857, $4858, $4859, $4860, $4861, $4862, $4863, $4864, $4865, $4866, $4867, $4868, $4869, $4870, $4871, $4872, $4873, $4874, $4875, $4876, $4877, $4878, $4879, $4880, $4881, $4882, $4883, $4884, $4885, $4886, $4887, $4888, $4889, $4890, $4891, $4892, $4893, $4894, $4895, $4896, $4897, $4898, $4899, $4900, $4901, $4902, $4903, $4904, $4905, $4906, $4907, $4908, $4909, $4910, $4911, $4912, $4913, $4914, $4915, $4916, $4917, $4918, $4919, $4920, $4921, $4922, $4923, $4924, $4925, $4926, $4927, $4928, $4929, $4930, $4931, $4932, $4933, $4934, $4935, $4936, $4937, $4938, $4939, $4940, $4941, $4942, $4943, $4944, $4945, $4946, $4947, $4948, $4949, $4950, $4951, $4952, $4953, $4954, $4955, $4956, $4957, $4958, $4959, $4960, $4961, $4962, $4963, $4964, $4965, $4966, $4967, $4968, $4969, $4970, $4971, $4972, $4973, $4974, $4975, $4976, $4977, $4978, $4979, $4980, $4981, $4982, $4983, $4984, $4985, $4986, $4987, $4988, $4989, $4990, $4991, $4992, $4993, $4994, $4995, $4996, $4997, $4998, $4999, $5000, $5001, $5002, $5003, $5004, $5005, $5006, $5007, $5008, $5009, $5010, $5011, $5012, $5013, $5014, $5015, $5016, $5017, $5018, $5019, $5020, $5021, $5022, $5023, $5024, $5025, $5026, $5027, $5028, $5029, $5030, $5031, $5032, $5033, $5034, $5035, $5036, $5037, $5038, $5039, $5040, $5041, $5042, $5043, $5044, $5045, $5046, $5047, $5048, $5049, $5050, $5051, $5052, $5053, $5054, $5055, $5056, $5057, $5058, $5059, $5060, $5061, $5062, $5063, $5064, $5065, $5066, $5067, $5068, $5069, $5070, $5071, $5072, $5073, $5074, $5075, $5076, $5077, $5078, $5079, $5080, $5081, $5082, $5083, $5084, $5085, $5086, $5087, $5088, $5089, $5090, $5091, $5092, $5093, $5094, $5095, $5096, $5097, $5098, $5099, $5100, $5101, $5102, $5103, $5104, $5105, $5106, $5107, $5108, $5109, $5110, $5111, $5112, $5113, $5114, $5115, $5116, $5117, $5118, $5119, $5120, $5121, $5122, $5123, $5124, $5125, $5126, $5127, $5128, $5129, $5130, $5131, $5132, $5133, $5134, $5135, $5136, $5137, $5138, $5139, $5140, $5141, $5142, $5143, $5144, $5145, $5146, $5147, $5148, $5149, $5150, $5151, $5152, $5153, $5154, $5155, $5156, $5157, $5158, $5159, $5160, $5161, $5162, $5163, $5164, $5165, $5166, $5167, $5168, $5169, $5170, $5171, $5172, $5173, $5174, $5175, $5176, $5177, $5178, $5179, $5180, $5181, $5182, $5183, $5184, $5185, $5186, $5187, $5188, $5189, $5190, $5191, $5192, $5193, $5194, $5195, $5196, $5197, $5198, $5199, $5200, $5201, $5202, $5203, $5204, $5205, $5206, $5207, $5208, $5209, $5210, $5211, $5212, $5213, $5214, $5215, $5216, $5217, $5218, $5219, $5220, $5221, $5222, $5223, $5224, $5225, $5226, $5227, $5228, $5229, $5230, $5231, $5232, $5233, $5234, $5235, $5236, $5237, $5238, $5239, $5240, $5241, $5242, $5243, $5244, $5245, $5246, $5247, $5248, $5249, $5250, $5251, $5252, $5253, $5254, $5255, $5256, $5257, $5258, $5259, $5260, $5261, $5262, $5263, $5264, $5265, $5266, $5267, $5268, $5269, $5270, $5271, $5272, $5273, $5274, $5275, $5276, $5277, $5278, $5279, $5280, $5281, $5282, $5283, $5284, $5285, $5286, $5287, $5288, $5289, $5290, $5291, $5292, $5293, $5294, $5295, $5296, $5297, $5298, $5299, $5300, $5301, $5302, $5303, $5304, $5305, $5306, $5307, $5308, $5309, $5310, $5311, $5312, $5313, $5314, $5315, $5316, $5317, $5318, $5319, $5320, $5321, $5322, $5323, $5324, $5325, $5326, $5327, $5328, $5329, $5330, $5331, $5332, $5333, $5334, $5335, $5336, $5337, $5338, $5339, $5340, $5341, $5342, $5343, $5344, $5345, $5346, $5347, $5348, $5349, $5350, $5351, $5352, $5353, $5354, $5355, $5356, $5357, $5358, $5359, $5360, $5361, $5362, $5363, $5364, $5365, $5366, $5367, $5368, $5369, $5370, $5371, $5372, $5373, $5374, $5375, $5376, $5377, $5378, $5379, $5380, $5381, $5382, $5383, $5384, $5385, $5386, $5387, $5388, $5389, $5390, $5391, $5392, $5393, $5394, $5395, $5396, $5397, $5398, $5399, $5400, $5401, $5402, $5403, $5404, $5405, $5406, $5407, $5408, $5409, $5410, $5411, $5412, $5413, $5414, $5415, $5416, $5417, $5418, $5419, $5420, $5421, $5422, $5423, $5424, $5425, $5426, $5427, $5428, $5429, $5430, $5431, $5432, $5433, $5434, $5435, $5436, $5437, $5438, $5439, $5440, $5441, $5442, $5443, $5444, $5445, $5446, $5447, $5448, $5449, $5450, $5451, $5452, $5453, $5454, $5455, $5456, $5457, $5458, $5459, $5460, $5461, $5462, $5463, $5464, $5465, $5466, $5467, $5468, $5469, $5470, $5471, $5472, $5473, $5474, $5475, $5476, $5477, $5478, $5479, $5480, $5481, $5482, $5483, $5484, $5485, $5486, $5487, $5488, $5489, $5490, $5491, $5492, $5493, $5494, $5495, $5496, $5497, $5498, $5499, $5500, $5501, $5502, $5503, $5504, $5505, $5506, $5507, $5508, $5509, $5510, $5511, $5512, $5513, $5514, $5515, $5516, $5517, $5518, $5519, $5520, $5521, $5522, $5523, $5524, $5525, $5526, $5527, $5528, $5529, $5530, $5531, $5532, $5533, $5534, $5535, $5536, $5537, $5538, $5539, $5540, $5541, $5542, $5543, $5544, $5545, $5546, $5547, $5548, $5549, $5550, $5551, $5552, $5553, $5554, $5555, $5556, $5557, $5558, $5559, $5560, $5561, $5562, $5563, $5564, $5565, $5566, $5567, $5568, $5569, $5570, $5571, $5572, $5573, $5574, $5575, $5576, $5577, $5578, $5579, $5580, $5581, $5582, $5583, $5584, $5585, $5586, $5587, $5588, $5589, $5590, $5591, $5592, $5593, $5594, $5595, $5596, $5597, $5598, $5599, $5600, $5601, $5602, $5603, $5604, $5605, $5606, $5607, $5608, $5609, $5610, $5611, $5612, $5613, $5614, $5615, $5616, $5617, $5618, $5619, $5620, $5621, $5622, $5623, $5624, $5625, $5626, $5627, $5628, $5629, $5630, $5631, $5632, $5633, $5634, $5635, $5636, $5637, $5638, $5639, $5640, $5641, $5642, $5643, $5644, $5645, $5646, $5647, $5648, $5649, $5650, $5651, $5652, $5653, $5654, $5655, $5656, $5657, $5658, $5659, $5660, $5661, $5662, $5663, $5664, $5665, $5666, $5667, $5668, $5669, $5670, $5671, $5672, $5673, $5674, $5675, $5676, $5677, $5678, $5679, $5680, $5681, $5682, $5683, $5684, $5685, $5686, $5687, $5688, $5689, $5690, $5691, $5692, $5693, $5694, $5695, $5696, $5697, $5698, $5699, $5700, $5701, $5702 )"; 
   begin 
      ps := gse.Prepare( query, On_Server => True ); 
      return ps; 
   end Get_Prepared_Insert_Statement; 



   function Get_Configured_Retrieve_Params return GNATCOLL.SQL.Exec.SQL_Parameters is
   use GNATCOLL.SQL_Impl;
      params : constant SQL_Parameters( 1 .. 5 ) := (
            1 => ( Parameter_Integer, 0 ),   --  : user_id (Integer)
            2 => ( Parameter_Integer, 0 ),   --  : edition (Integer)
            3 => ( Parameter_Integer, 0 ),   --  : year (Integer)
            4 => ( Parameter_Bigint, 0 ),   --  : sernum (Sernum_Value)
            5 => ( Parameter_Integer, 0 )   --  : benunit (Integer)
      );
   begin
      return params;
   end Get_Configured_Retrieve_Params;



   function Get_Prepared_Retrieve_Statement return gse.Prepared_Statement is 
      s : constant String := " where user_id = $1 and edition = $2 and year = $3 and sernum = $4 and benunit = $5"; 
   begin 
      return Get_Prepared_Retrieve_Statement( s ); 
   end Get_Prepared_Retrieve_Statement; 

   function Get_Prepared_Retrieve_Statement( crit : d.Criteria ) return gse.Prepared_Statement is 
   begin 
      return Get_Prepared_Retrieve_Statement( d.To_String( crit )); 
   end Get_Prepared_Retrieve_Statement; 

   function Get_Prepared_Retrieve_Statement( sqlstr : String ) return gse.Prepared_Statement is 
      ps : gse.Prepared_Statement; 
      query : constant String := DB_Commons.Add_Schema_To_Query( SELECT_PART, SCHEMA_NAME ) & sqlstr; 
   begin 
      ps := gse.Prepare( 
        query, 
        On_Server => True ); 
      return ps; 
   end Get_Prepared_Retrieve_Statement; 


   function Get_Prepared_Update_Statement return gse.Prepared_Statement is 
      ps : gse.Prepared_Statement; 
      
      query : constant String := DB_Commons.Add_Schema_To_Query( UPDATE_PART, SCHEMA_NAME ) & " int1hd = $1, int2hd = $2, int3hd = $3, int4hd = $4, int5hd = $5, int6hd = $6, int7hd = $7, int8hd = $8, int9hd = $9, int10hd = $10, int11hd = $11, int12hd = $12, int13hd = $13, int14hd = $14, int15hd = $15, int16hd = $16, int17hd = $17, int18hd = $18, int19hd = $19, int21hd = $20, int22hd = $21, int23hd = $22, int24hd = $23, int25hd = $24, int26hd = $25, int27hd = $26, int28hd = $27, int29hd = $28, int30hd = $29, int1sp = $30, int2sp = $31, int3sp = $32, int4sp = $33, int5sp = $34, int6sp = $35, int7sp = $36, int8sp = $37, int9sp = $38, int10sp = $39, int11sp = $40, int12sp = $41, int13sp = $42, int14sp = $43, int15sp = $44, int16sp = $45, int17sp = $46, int18sp = $47, int19sp = $48, int21sp = $49, int22sp = $50, int23sp = $51, int24sp = $52, int25sp = $53, int26sp = $54, int27sp = $55, int28sp = $56, int29sp = $57, int30sp = $58, intx1hd = $59, intx2hd = $60, intx3hd = $61, intx4hd = $62, intx5hd = $63, intx6hd = $64, intx7hd = $65, intx8hd = $66, intx9hd = $67, intx10hd = $68, intx11hd = $69, intx12hd = $70, intx13hd = $71, intx14hd = $72, intx15hd = $73, intx16hd = $74, intx17hd = $75, intx18hd = $76, intx19hd = $77, intx21hd = $78, intx22hd = $79, intx23hd = $80, intx24hd = $81, intx25hd = $82, intx26hd = $83, intx27hd = $84, intx28hd = $85, intx29hd = $86, intx30hd = $87, intx1sp = $88, intx2sp = $89, intx3sp = $90, intx4sp = $91, intx5sp = $92, intx6sp = $93, intx7sp = $94, intx8sp = $95, intx9sp = $96, intx10sp = $97, intx11sp = $98, intx12sp = $99, intx13sp = $100, intx14sp = $101, intx15sp = $102, intx16sp = $103, intx17sp = $104, intx18sp = $105, intx19sp = $106, intx21sp = $107, intx22sp = $108, intx23sp = $109, intx24sp = $110, intx25sp = $111, intx26sp = $112, intx27sp = $113, intx28sp = $114, intx29sp = $115, intx30sp = $116, invt1hd = $117, invt2hd = $118, invt3hd = $119, invt4hd = $120, invt5hd = $121, invt6hd = $122, invt7hd = $123, invt8hd = $124, invt9hd = $125, invt10hd = $126, invt11hd = $127, invt12hd = $128, invt13hd = $129, invt14hd = $130, invt15hd = $131, invt16hd = $132, invt17hd = $133, invt18hd = $134, invt19hd = $135, invt21hd = $136, invt22hd = $137, invt23hd = $138, invt24hd = $139, invt25hd = $140, invt26hd = $141, invt27hd = $142, invt28hd = $143, invt29hd = $144, invt30hd = $145, invt1sp = $146, invt2sp = $147, invt3sp = $148, invt4sp = $149, invt5sp = $150, invt6sp = $151, invt7sp = $152, invt8sp = $153, invt9sp = $154, invt10sp = $155, invt11sp = $156, invt12sp = $157, invt13sp = $158, invt14sp = $159, invt15sp = $160, invt16sp = $161, invt17sp = $162, invt18sp = $163, invt19sp = $164, invt21sp = $165, invt22sp = $166, invt23sp = $167, invt24sp = $168, invt25sp = $169, invt26sp = $170, invt27sp = $171, invt28sp = $172, invt29sp = $173, invt30sp = $174, nsa1hd = $175, nsa2hd = $176, nsa3hd = $177, nsa4hd = $178, nsa5hd = $179, nsa6hd = $180, nsa7hd = $181, nsa8hd = $182, nsa9hd = $183, nsa10hd = $184, nsa11hd = $185, nsa12hd = $186, nsa13hd = $187, nsa14hd = $188, nsa15hd = $189, nsa16hd = $190, nsa17hd = $191, nsa18hd = $192, nsa19hd = $193, nsa21hd = $194, nsa22hd = $195, nsa23hd = $196, nsa24hd = $197, nsa25hd = $198, nsa26hd = $199, nsa27hd = $200, nsa28hd = $201, nsa29hd = $202, nsa30hd = $203, nsa1sp = $204, nsa2sp = $205, nsa3sp = $206, nsa4sp = $207, nsa5sp = $208, nsa6sp = $209, nsa7sp = $210, nsa8sp = $211, nsa9sp = $212, nsa10sp = $213, nsa11sp = $214, nsa12sp = $215, nsa13sp = $216, nsa14sp = $217, nsa15sp = $218, nsa16sp = $219, nsa17sp = $220, nsa18sp = $221, nsa19sp = $222, nsa21sp = $223, nsa22sp = $224, nsa23sp = $225, nsa24sp = $226, nsa25sp = $227, nsa26sp = $228, nsa27sp = $229, nsa28sp = $230, nsa29sp = $231, nsa30sp = $232, ablehd = $233, ablesp = $234, abs1pdhd = $235, abs1pdsp = $236, absparhd = $237, absparsp = $238, abspayhd = $239, abspaysp = $240, abswhyhd = $241, abswhysp = $242, abswkhd = $243, abswksp = $244, acshd = $245, acssp = $246, acctqhd = $247, acctqsp = $248, acsamthd = $249, acsamtsp = $250, acspdhd = $251, acspdsp = $252, actacihd = $253, actacisp = $254, emahd = $255, emasp = $256, emaamthd = $257, emaamtsp = $258, emapdhd = $259, emapdsp = $260, agehd = $261, agesp = $262, agehqhd = $263, agehqsp = $264, aliamthd = $265, aliamtsp = $266, alimnyhd = $267, alimnysp = $268, alipdhd = $269, alipdsp = $270, aliushd = $271, aliussp = $272, absallhd = $273, absallsp = $274, organhd = $275, organsp = $276, fosterhd = $277, fostersp = $278, adopthd = $279, adoptsp = $280, pasbalhd = $281, pasbalsp = $282, porganhd = $283, porgansp = $284, pfostehd = $285, pfostesp = $286, padopthd = $287, padoptsp = $288, aluamthd = $289, aluamtsp = $290, alupdhd = $291, alupdsp = $292, anyacchd = $293, anyaccsp = $294, anyedhd = $295, anyedsp = $296, anymonhd = $297, anymonsp = $298, anype1hd = $299, anype1sp = $300, anype2hd = $301, anype2sp = $302, anype3hd = $303, anype3sp = $304, anype4hd = $305, anype4sp = $306, anype5hd = $307, anype5sp = $308, anype6hd = $309, anype6sp = $310, anype7hd = $311, anype7sp = $312, abspamhd = $313, abspamsp = $314, abspexhd = $315, abspexsp = $316, apdpdhd = $317, apdpdsp = $318, pabspahd = $319, pabspasp = $320, basacthd = $321, basactsp = $322, bfdhd = $323, bfdsp = $324, bfdamthd = $325, bfdamtsp = $326, pbfdhd = $327, pbfdsp = $328, bfdvalhd = $329, bfdvalsp = $330, careabhd = $331, careabsp = $332, careahhd = $333, careahsp = $334, carecbhd = $335, carecbsp = $336, carechhd = $337, carechsp = $338, careclhd = $339, careclsp = $340, careflhd = $341, careflsp = $342, carefrhd = $343, carefrsp = $344, careothd = $345, careotsp = $346, carerhd = $347, carersp = $348, cbaamthd = $349, cbaamtsp = $350, cbchkhd = $351, cbchksp = $352, changehd = $353, changesp = $354, chbflghd = $355, chbflgsp = $356, chknophd = $357, chknopsp = $358, fpchd = $359, fpcsp = $360, fuchd = $361, fucsp = $362, fhbhd = $363, fhbsp = $364, fwtchd = $365, fwtcsp = $366, fctchd = $367, fctcsp = $368, fishd = $369, fissp = $370, fjsahd = $371, fjsasp = $372, fesahd = $373, fesasp = $374, claimahd = $375, claimasp = $376, cohabhd = $377, cohabsp = $378, condithd = $379, conditsp = $380, blodgehd = $381, blodgesp = $382, ctclm1hd = $383, ctclm1sp = $384, ctclm2hd = $385, ctclm2sp = $386, cupchkhd = $387, cupchksp = $388, curacthd = $389, curactsp = $390, curqulhd = $391, curqulsp = $392, blheadhd = $393, blheadsp = $394, blrenthd = $395, blrentsp = $396, pblrenhd = $397, pblrensp = $398, ddaprghd = $399, ddaprgsp = $400, ddatrehd = $401, ddatresp = $402, ddatrphd = $403, ddatrpsp = $404, defrpnhd = $405, defrpnsp = $406, dependhd = $407, dependsp = $408, disacahd = $409, disacasp = $410, qpiphd = $411, qpipsp = $412, qdlahd = $413, qdlasp = $414, qaahd = $415, qaasp = $416, qsdahd = $417, qsdasp = $418, qibhd = $419, qibsp = $420, qiidbhd = $421, qiidbsp = $422, discoahd = $423, discoasp = $424, disd01hd = $425, disd01sp = $426, disd02hd = $427, disd02sp = $428, disd03hd = $429, disd03sp = $430, disd04hd = $431, disd04sp = $432, disd05hd = $433, disd05sp = $434, disd06hd = $435, disd06sp = $436, disd07hd = $437, disd07sp = $438, disd08hd = $439, disd08sp = $440, disd09hd = $441, disd09sp = $442, disd10hd = $443, disd10sp = $444, disdifhd = $445, disdifsp = $446, dlachd = $447, dlacsp = $448, dlamhd = $449, dlamsp = $450, dlshd = $451, dlssp = $452, dlsamthd = $453, dlsamtsp = $454, pdlshd = $455, pdlssp = $456, dlsvalhd = $457, dlsvalsp = $458, dobhd = $459, dobsp = $460, h3qualhd = $461, h3qualsp = $462, dvil3ahd = $463, dvil3asp = $464, dvil4ahd = $465, dvil4asp = $466, dvjb12hd = $467, dvjb12sp = $468, dvmarhd = $469, dvmarsp = $470, edl1ahd = $471, edl1asp = $472, pedl1ahd = $473, pedl1asp = $474, edl1obhd = $475, edl1obsp = $476, edl2ahd = $477, edl2asp = $478, pedl2ahd = $479, pedl2asp = $480, edl2obhd = $481, edl2obsp = $482, edatthd = $483, edattsp = $484, edhrhd = $485, edhrsp = $486, edtyphd = $487, edtypsp = $488, empconhd = $489, empconsp = $490, empocchd = $491, empoccsp = $492, empshd = $493, empssp = $494, empbhd = $495, empbsp = $496, empchd = $497, empcsp = $498, empilohd = $499, empilosp = $500, es2000hd = $501, es2000sp = $502, ethgr3hd = $503, ethgr3sp = $504, ethgpshd = $505, ethgpssp = $506, etngrphd = $507, etngrpsp = $508, eualamhd = $509, eualamsp = $510, eualmnhd = $511, eualmnsp = $512, peualihd = $513, peualisp = $514, euetyphd = $515, euetypsp = $516, everwkhd = $517, everwksp = $518, ehbct1hd = $519, ehbct1sp = $520, fllwphd = $521, fllwpsp = $522, ftedhd = $523, ftedsp = $524, ftwkyrhd = $525, ftwkyrsp = $526, gebacthd = $527, gebactsp = $528, giltcthd = $529, giltctsp = $530, gpispchd = $531, gpispcsp = $532, gpjesahd = $533, gpjesasp = $534, gpuchd = $535, gpucsp = $536, granthd = $537, grantsp = $538, gt1valhd = $539, gt1valsp = $540, gt2valhd = $541, gt2valsp = $542, gt1dirhd = $543, gt1dirsp = $544, gt2dirhd = $545, gt2dirsp = $546, grtnumhd = $547, grtnumsp = $548, gt1scehd = $549, gt1scesp = $550, gt2scehd = $551, gt2scesp = $552, gt1oshd = $553, gt1ossp = $554, gt2oshd = $555, gt2ossp = $556, gtahd = $557, gtasp = $558, healthhd = $559, healthsp = $560, heartvhd = $561, heartvsp = $562, heatadhd = $563, heatadsp = $564, hholdrhd = $565, hholdrsp = $566, hourabhd = $567, hourabsp = $568, hourahhd = $569, hourahsp = $570, hrcarehd = $571, hrcaresp = $572, hourcbhd = $573, hourcbsp = $574, hourchhd = $575, hourchsp = $576, hourclhd = $577, hourclsp = $578, hourfrhd = $579, hourfrsp = $580, hourothd = $581, hourotsp = $582, hourrehd = $583, hourresp = $584, hourtthd = $585, hourttsp = $586, hpersohd = $587, hpersosp = $588, hrpidhd = $589, hrpidsp = $590, hsvperhd = $591, hsvpersp = $592, agegp2hd = $593, agegp2sp = $594, agegphd = $595, agegpsp = $596, quninshd = $597, quninssp = $598, qtubenhd = $599, qtubensp = $600, qsicinhd = $601, qsicinsp = $602, qaccinhd = $603, qaccinsp = $604, qpehinhd = $605, qpehinsp = $606, qhosinhd = $607, qhosinsp = $608, qfsbenhd = $609, qfsbensp = $610, qcichd = $611, qcicsp = $612, qotbenhd = $613, qotbensp = $614, incdurhd = $615, incdursp = $616, incsehd = $617, incsesp = $618, indinchd = $619, indincsp = $620, indisbhd = $621, indisbsp = $622, inearnhd = $623, inearnsp = $624, ininvhd = $625, ininvsp = $626, inirbehd = $627, inirbesp = $628, injlonhd = $629, injlonsp = $630, injhrshd = $631, injhrssp = $632, innirbhd = $633, innirbsp = $634, inothbhd = $635, inothbsp = $636, inpenihd = $637, inpenisp = $638, inrinchd = $639, inrincsp = $640, inrpinhd = $641, inrpinsp = $642, itvlichd = $643, itvlicsp = $644, intxcdhd = $645, intxcdsp = $646, investhd = $647, investsp = $648, isa1tyhd = $649, isa1tysp = $650, isa2tyhd = $651, isa2tysp = $652, isactihd = $653, isactisp = $654, jobawahd = $655, jobawasp = $656, jobbyrhd = $657, jobbyrsp = $658, qcbhd = $659, qcbsp = $660, qgahd = $661, qgasp = $662, qmahd = $663, qmasp = $664, lareghd = $665, laregsp = $666, likewkhd = $667, likewksp = $668, limitlhd = $669, limitlsp = $670, lktimehd = $671, lktimesp = $672, lktrnhd = $673, lktrnsp = $674, lkworkhd = $675, lkworksp = $676, loanhd = $677, loansp = $678, loannuhd = $679, loannusp = $680, lstwkmhd = $681, lstwkmsp = $682, lstwkyhd = $683, lstwkysp = $684, wkswkdhd = $685, wkswkdsp = $686, marithd = $687, maritsp = $688, mr1hd = $689, mr1sp = $690, mr2hd = $691, mr2sp = $692, mntar1hd = $693, mntar1sp = $694, mntar2hd = $695, mntar2sp = $696, mntar3hd = $697, mntar3sp = $698, mntar4hd = $699, mntar4sp = $700, mntar5hd = $701, mntar5sp = $702, mntnc1hd = $703, mntnc1sp = $704, mntnc2hd = $705, mntnc2sp = $706, mntnc3hd = $707, mntnc3sp = $708, mntnc4hd = $709, mntnc4sp = $710, mntnc5hd = $711, mntnc5sp = $712, mntpayhd = $713, mntpaysp = $714, pmr1hd = $715, pmr1sp = $716, pmr2hd = $717, pmr2sp = $718, mntpr1hd = $719, mntpr1sp = $720, mntpr2hd = $721, mntpr2sp = $722, mntpr3hd = $723, mntpr3sp = $724, mr12mhd = $725, mr12msp = $726, mntt1hd = $727, mntt1sp = $728, mntt2hd = $729, mntt2sp = $730, mntt3hd = $731, mntt3sp = $732, mntus1hd = $733, mntus1sp = $734, mntus2hd = $735, mntus2sp = $736, umr1hd = $737, umr1sp = $738, umr2hd = $739, umr2sp = $740, pumr1hd = $741, pumr1sp = $742, pumr2hd = $743, pumr2sp = $744, mntw1hd = $745, mntw1sp = $746, mntw2hd = $747, mntw2sp = $748, mntw3hd = $749, mntw3sp = $750, mntw4hd = $751, mntw4sp = $752, mntw5hd = $753, mntw5sp = $754, mshd = $755, mssp = $756, nanid1hd = $757, nanid1sp = $758, nanid2hd = $759, nanid2sp = $760, nanid3hd = $761, nanid3sp = $762, nanid4hd = $763, nanid4sp = $764, nanid5hd = $765, nanid5sp = $766, nanid6hd = $767, nanid6sp = $768, nitrnhd = $769, nitrnsp = $770, niamthd = $771, niamtsp = $772, niethghd = $773, niethgsp = $774, nixhbbhd = $775, nixhbbsp = $776, ninid1hd = $777, ninid1sp = $778, ninid2hd = $779, ninid2sp = $780, ninid3hd = $781, ninid3sp = $782, ninid4hd = $783, ninid4sp = $784, ninid5hd = $785, ninid5sp = $786, ninid6hd = $787, ninid6sp = $788, ninid7hd = $789, ninid7sp = $790, nincs2hd = $791, nincs2sp = $792, nininchd = $793, ninincsp = $794, ninearhd = $795, ninearsp = $796, nininvhd = $797, nininvsp = $798, ninpenhd = $799, ninpensp = $800, ninrinhd = $801, ninrinsp = $802, ninseihd = $803, ninseisp = $804, pniamthd = $805, pniamtsp = $806, nireghd = $807, niregsp = $808, nirelghd = $809, nirelgsp = $810, nolk1hd = $811, nolk1sp = $812, nolk2hd = $813, nolk2sp = $814, nolk3hd = $815, nolk3sp = $816, nowanthd = $817, nowantsp = $818, nssechd = $819, nssecsp = $820, numjobhd = $821, numjobsp = $822, numj2hd = $823, numj2sp = $824, ocnumhd = $825, ocnumsp = $826, oddjobhd = $827, oddjobsp = $828, oldstdhd = $829, oldstdsp = $830, oabparhd = $831, oabparsp = $832, otamthd = $833, otamtsp = $834, otpamthd = $835, otpamtsp = $836, otappdhd = $837, otappdsp = $838, qehbtbhd = $839, qehbtbsp = $840, qwidplhd = $841, qwidplsp = $842, qinwkchd = $843, qinwkcsp = $844, qrtwkchd = $845, qrtwkcsp = $846, qothbehd = $847, qothbesp = $848, othtaxhd = $849, othtaxsp = $850, otinvahd = $851, otinvasp = $852, pareamhd = $853, pareamsp = $854, qpchd = $855, qpcsp = $856, qrphd = $857, qrpsp = $858, qbbhd = $859, qbbsp = $860, qafcshd = $861, qafcssp = $862, qwwphd = $863, qwwpsp = $864, penflghd = $865, penflgsp = $866, penwl1hd = $867, penwl1sp = $868, penwl2hd = $869, penwl2sp = $870, penwl3hd = $871, penwl3sp = $872, penwl4hd = $873, penwl4sp = $874, penwl5hd = $875, penwl5sp = $876, penwl6hd = $877, penwl6sp = $878, pepscthd = $879, pepsctsp = $880, personhd = $881, personsp = $882, qpipdhd = $883, qpipdsp = $884, qpipmhd = $885, qpipmsp = $886, poaccthd = $887, poacctsp = $888, pocardhd = $889, pocardsp = $890, ppnumchd = $891, ppnumcsp = $892, proptxhd = $893, proptxsp = $894, ptwkyrhd = $895, ptwkyrsp = $896, relp1hd = $897, relp1sp = $898, relp2hd = $899, relp2sp = $900, relp3hd = $901, relp3sp = $902, relp4hd = $903, relp4sp = $904, relp5hd = $905, relp5sp = $906, relp6hd = $907, relp6sp = $908, relp7hd = $909, relp7sp = $910, relp8hd = $911, relp8sp = $912, relp9hd = $913, relp9sp = $914, relp10hd = $915, relp10sp = $916, relp11hd = $917, relp11sp = $918, relp12hd = $919, relp12sp = $920, relp13hd = $921, relp13sp = $922, relp14hd = $923, relp14sp = $924, reasonhd = $925, reasonsp = $926, redamthd = $927, redamtsp = $928, redundhd = $929, redundsp = $930, rednethd = $931, rednetsp = $932, redtaxhd = $933, redtaxsp = $934, relhrphd = $935, relhrpsp = $936, relgewhd = $937, relgewsp = $938, relgschd = $939, relgscsp = $940, rprofhd = $941, rprofsp = $942, retirehd = $943, retiresp = $944, retir1hd = $945, retir1sp = $946, retreshd = $947, retressp = $948, renthd = $949, rentsp = $950, royalhd = $951, royalsp = $952, sleephd = $953, sleepsp = $954, forpenhd = $955, forpensp = $956, restrchd = $957, restrcsp = $958, sapadjhd = $959, sapadjsp = $960, sdem01hd = $961, sdem01sp = $962, sdem02hd = $963, sdem02sp = $964, sdem03hd = $965, sdem03sp = $966, sdem04hd = $967, sdem04sp = $968, sdem05hd = $969, sdem05sp = $970, sdem06hd = $971, sdem06sp = $972, sdem07hd = $973, sdem07sp = $974, sdem08hd = $975, sdem08sp = $976, sdem09hd = $977, sdem09sp = $978, sdem10hd = $979, sdem10sp = $980, sdem11hd = $981, sdem11sp = $982, sdem12hd = $983, sdem12sp = $984, inseinhd = $985, inseinsp = $986, sdemphd = $987, sdempsp = $988, sexhd = $989, sexsp = $990, sichd = $991, sicsp = $992, sidqnhd = $993, sidqnsp = $994, sloshd = $995, slossp = $996, slramthd = $997, slramtsp = $998, slrppdhd = $999, slrppdsp = $1000, smpajhd = $1001, smpajsp = $1002, sc2010hd = $1003, sc2010sp = $1004, qsfgrhd = $1005, qsfgrsp = $1006, qssmthd = $1007, qssmtsp = $1008, qlgdwphd = $1009, qlgdwpsp = $1010, qlglahd = $1011, qlglasp = $1012, blindhd = $1013, blindsp = $1014, parsihd = $1015, parsisp = $1016, deafhd = $1017, deafsp = $1018, spouthd = $1019, spoutsp = $1020, sppadjhd = $1021, sppadjsp = $1022, spyrothd = $1023, spyrotsp = $1024, srentahd = $1025, srentasp = $1026, psrenthd = $1027, psrentsp = $1028, sfispchd = $1029, sfispcsp = $1030, sfjesahd = $1031, sfjesasp = $1032, sruchd = $1033, srucsp = $1034, sspajhd = $1035, sspajsp = $1036, gtsavahd = $1037, gtsavasp = $1038, stshcthd = $1039, stshctsp = $1040, tdaywkhd = $1041, tdaywksp = $1042, agefedhd = $1043, agefedsp = $1044, tmpjobhd = $1045, tmpjobsp = $1046, tesscthd = $1047, tessctsp = $1048, totgrahd = $1049, totgrasp = $1050, tothouhd = $1051, tothousp = $1052, totinthd = $1053, totintsp = $1054, totocchd = $1055, totoccsp = $1056, trainhd = $1057, trainsp = $1058, trnallhd = $1059, trnallsp = $1060, ttbprxhd = $1061, ttbprxsp = $1062, tuborrhd = $1063, tuborrsp = $1064, typeedhd = $1065, typeedsp = $1066, unpd1hd = $1067, unpd1sp = $1068, unpd2hd = $1069, unpd2sp = $1070, untrcthd = $1071, untrctsp = $1072, upersohd = $1073, upersosp = $1074, agewidhd = $1075, agewidsp = $1076, kidwidhd = $1077, kidwidsp = $1078, quchd = $1079, qucsp = $1080, qhbhd = $1081, qhbsp = $1082, qwtchd = $1083, qwtcsp = $1084, qctchd = $1085, qctcsp = $1086, qishd = $1087, qissp = $1088, qjsahd = $1089, qjsasp = $1090, qesahd = $1091, qesasp = $1092, qcahd = $1093, qcasp = $1094, waithd = $1095, waitsp = $1096, whresphd = $1097, whrespsp = $1098, whoctbhd = $1099, whoctbsp = $1100, widocchd = $1101, widoccsp = $1102, wintflhd = $1103, wintflsp = $1104, workinhd = $1105, workinsp = $1106, wpahd = $1107, wpasp = $1108, wpbahd = $1109, wpbasp = $1110, wtclm1hd = $1111, wtclm1sp = $1112, wtclm2hd = $1113, wtclm2sp = $1114, yjblevhd = $1115, yjblevsp = $1116, ystwkhd = $1117, ystwksp = $1118, as011hd = $1119, as012hd = $1120, as013hd = $1121, as014hd = $1122, as011sp = $1123, as012sp = $1124, as013sp = $1125, as014sp = $1126, as021hd = $1127, as022hd = $1128, as021sp = $1129, as022sp = $1130, as031hd = $1131, as031sp = $1132, as051hd = $1133, as052hd = $1134, as053hd = $1135, as054hd = $1136, as055hd = $1137, as056hd = $1138, as057hd = $1139, as051sp = $1140, as052sp = $1141, as053sp = $1142, as054sp = $1143, as055sp = $1144, as056sp = $1145, as057sp = $1146, as061hd = $1147, as061sp = $1148, as071hd = $1149, as071sp = $1150, as081hd = $1151, as082hd = $1152, as083hd = $1153, as084hd = $1154, as085hd = $1155, as081sp = $1156, as082sp = $1157, as083sp = $1158, as084sp = $1159, as085sp = $1160, as101hd = $1161, as101sp = $1162, as111hd = $1163, as111sp = $1164, as121hd = $1165, as121sp = $1166, as131hd = $1167, as131sp = $1168, as141hd = $1169, as142hd = $1170, as143hd = $1171, as141sp = $1172, as142sp = $1173, as143sp = $1174, as151hd = $1175, as151sp = $1176, as161hd = $1177, as161sp = $1178, as191hd = $1179, as191sp = $1180, as211hd = $1181, as212hd = $1182, as213hd = $1183, as214hd = $1184, as211sp = $1185, as212sp = $1186, as213sp = $1187, as214sp = $1188, as261hd = $1189, as261sp = $1190, as271hd = $1191, as272hd = $1192, as271sp = $1193, as272sp = $1194, as281hd = $1195, as281sp = $1196, as291hd = $1197, as292hd = $1198, as293hd = $1199, as291sp = $1200, as292sp = $1201, as293sp = $1202, stdlachd = $1203, stdlamhd = $1204, stcbhd = $1205, stpenchd = $1206, strphd = $1207, stwphd = $1208, stwdphd = $1209, stwwphd = $1210, stsdahd = $1211, staahd = $1212, sticahd = $1213, stjsahd = $1214, stiidbhd = $1215, stesahd = $1216, stibhd = $1217, stishd = $1218, stmahd = $1219, stshhd = $1220, stgahd = $1221, stwtchd = $1222, stctchd = $1223, stwtclhd = $1224, stctclhd = $1225, stuchd = $1226, stpipdhd = $1227, stpipmhd = $1228, stdlacsp = $1229, stdlamsp = $1230, stcbsp = $1231, stpencsp = $1232, strpsp = $1233, stwpsp = $1234, stwdpsp = $1235, stwwpsp = $1236, stsdasp = $1237, staasp = $1238, sticasp = $1239, stjsasp = $1240, stiidbsp = $1241, stesasp = $1242, stibsp = $1243, stissp = $1244, stmasp = $1245, stshsp = $1246, stgasp = $1247, stwtcsp = $1248, stctcsp = $1249, stwtclsp = $1250, stctclsp = $1251, stucsp = $1252, stpipdsp = $1253, stpipmsp = $1254, dlacahd = $1255, dlamohd = $1256, cbhd = $1257, lpencrhd = $1258, rphd = $1259, wphd = $1260, wdphd = $1261, wwphd = $1262, sdahd = $1263, aahd = $1264, icahd = $1265, jsahd = $1266, iidbhd = $1267, esahd = $1268, ibhd = $1269, ishd = $1270, mahd = $1271, sfmghd = $1272, sffghd = $1273, othbenhd = $1274, tubenhd = $1275, fsbenhd = $1276, sicinhd = $1277, accinhd = $1278, hosinhd = $1279, gtshd = $1280, gahd = $1281, iwchd = $1282, r2wchd = $1283, widplhd = $1284, uninshd = $1285, wfamthd = $1286, dssdpihd = $1287, dssdpjhd = $1288, sfrpaihd = $1289, sfrpajhd = $1290, exhbhd = $1291, perhinhd = $1292, otsiinhd = $1293, cichd = $1294, bowtchd = $1295, boctchd = $1296, bowtclhd = $1297, boctclhd = $1298, hbhd = $1299, uchd = $1300, pipdhd = $1301, pipmhd = $1302, lndwphd = $1303, lnlahd = $1304, dwpauchd = $1305, sfrpuchd = $1306, dlacasp = $1307, dlamosp = $1308, cbsp = $1309, lpencrsp = $1310, rpsp = $1311, wpsp = $1312, wdpsp = $1313, wwpsp = $1314, sdasp = $1315, aasp = $1316, icasp = $1317, jsasp = $1318, iidbsp = $1319, esasp = $1320, ibsp = $1321, issp = $1322, masp = $1323, sfmgsp = $1324, sffgsp = $1325, othbensp = $1326, tubensp = $1327, fsbensp = $1328, sicinsp = $1329, accinsp = $1330, hosinsp = $1331, gtssp = $1332, gasp = $1333, iwcsp = $1334, r2wcsp = $1335, widplsp = $1336, uninssp = $1337, wfamtsp = $1338, dssdpisp = $1339, dssdpjsp = $1340, sfrpaisp = $1341, sfrpajsp = $1342, exhbsp = $1343, perhinsp = $1344, otsiinsp = $1345, cicsp = $1346, bowtcsp = $1347, boctcsp = $1348, bowtclsp = $1349, boctclsp = $1350, hbsp = $1351, ucsp = $1352, pipdsp = $1353, pipmsp = $1354, lndwpsp = $1355, lnlasp = $1356, dwpaucsp = $1357, sfrpucsp = $1358, ltdlachd = $1359, ltdlamhd = $1360, ltcbhd = $1361, bopenchd = $1362, ltrphd = $1363, ltwphd = $1364, ltwdphd = $1365, ltwwphd = $1366, ltsdahd = $1367, ltaahd = $1368, lticahd = $1369, ltjsahd = $1370, ltiidbhd = $1371, ltesahd = $1372, ltibhd = $1373, ltishd = $1374, ltmahd = $1375, ltshhd = $1376, ltgahd = $1377, hwtchd = $1378, hctchd = $1379, hwtclhd = $1380, hctclhd = $1381, ltuchd = $1382, ltpipdhd = $1383, ltpipmhd = $1384, ltdlacsp = $1385, ltdlamsp = $1386, ltcbsp = $1387, bopencsp = $1388, ltrpsp = $1389, ltwpsp = $1390, ltwdpsp = $1391, ltwwpsp = $1392, ltsdasp = $1393, ltaasp = $1394, lticasp = $1395, ltjsasp = $1396, ltiidbsp = $1397, ltesasp = $1398, ltibsp = $1399, ltissp = $1400, ltmasp = $1401, ltshsp = $1402, ltgasp = $1403, hwtcsp = $1404, hctcsp = $1405, hwtclsp = $1406, hctclsp = $1407, ltucsp = $1408, ltpipdsp = $1409, ltpipmsp = $1410, pdlacahd = $1411, pdlamohd = $1412, pcbhd = $1413, hpenchd = $1414, prphd = $1415, pwphd = $1416, pwdphd = $1417, pwwphd = $1418, psdahd = $1419, paahd = $1420, picahd = $1421, pjsahd = $1422, piidbhd = $1423, pesahd = $1424, pibhd = $1425, pishd = $1426, pmahd = $1427, pothbehd = $1428, ptubenhd = $1429, pfsbenhd = $1430, psicinhd = $1431, paccinhd = $1432, phosinhd = $1433, pgtshd = $1434, pgahd = $1435, iwcpdhd = $1436, r2wcpdhd = $1437, puninshd = $1438, pdsspihd = $1439, pdsspjhd = $1440, pexhbhd = $1441, ppehinhd = $1442, potsinhd = $1443, pdcichd = $1444, wwtchd = $1445, wctchd = $1446, wwtclhd = $1447, wctclhd = $1448, phbhd = $1449, puchd = $1450, ppipdhd = $1451, ppipmhd = $1452, pdwpuchd = $1453, pdlacasp = $1454, pdlamosp = $1455, pcbsp = $1456, hpencsp = $1457, prpsp = $1458, pwpsp = $1459, pwdpsp = $1460, pwwpsp = $1461, psdasp = $1462, paasp = $1463, picasp = $1464, pjsasp = $1465, piidbsp = $1466, pesasp = $1467, pibsp = $1468, pissp = $1469, pmasp = $1470, pothbesp = $1471, ptubensp = $1472, pfsbensp = $1473, psicinsp = $1474, paccinsp = $1475, phosinsp = $1476, pgtssp = $1477, pgasp = $1478, iwcpdsp = $1479, r2wcpdsp = $1480, puninssp = $1481, pdsspisp = $1482, pdsspjsp = $1483, pexhbsp = $1484, ppehinsp = $1485, potsinsp = $1486, pdcicsp = $1487, wwtcsp = $1488, wctcsp = $1489, wwtclsp = $1490, wctclsp = $1491, phbsp = $1492, pucsp = $1493, ppipdsp = $1494, ppipmsp = $1495, pdwpucsp = $1496, cbpayehd = $1497, cbpayesp = $1498, cbtaxhd = $1499, cbtaxsp = $1500, pwtchd = $1501, pctchd = $1502, pwtcsp = $1503, pctcsp = $1504, npcamthd = $1505, urphd = $1506, uwphd = $1507, uesahd = $1508, uishd = $1509, uwtchd = $1510, uctchd = $1511, npcamtsp = $1512, urpsp = $1513, uwpsp = $1514, uesasp = $1515, uissp = $1516, uwtcsp = $1517, uctcsp = $1518, dmpenchd = $1519, purphd = $1520, puwphd = $1521, nupesahd = $1522, puishd = $1523, dmpencsp = $1524, purpsp = $1525, puwpsp = $1526, nupesasp = $1527, puissp = $1528, wjsahd = $1529, wesahd = $1530, wishd = $1531, wothbehd = $1532, wtubenhd = $1533, wfsbenhd = $1534, wsicinhd = $1535, waccinhd = $1536, whosinhd = $1537, wkiwchd = $1538, wkr2whd = $1539, wuninshd = $1540, wpehinhd = $1541, wotsinhd = $1542, wocichd = $1543, whbhd = $1544, wjsasp = $1545, wesasp = $1546, wissp = $1547, wothbesp = $1548, wtubensp = $1549, wfsbensp = $1550, wsicinsp = $1551, waccinsp = $1552, whosinsp = $1553, wkiwcsp = $1554, wkr2wsp = $1555, wuninssp = $1556, wpehinsp = $1557, wotsinsp = $1558, wocicsp = $1559, whbsp = $1560, yjsahd = $1561, yesahd = $1562, yishd = $1563, yhbhd = $1564, yjsasp = $1565, yesasp = $1566, yissp = $1567, yhbsp = $1568, prothbhd = $1569, prtubehd = $1570, prfsbehd = $1571, prsicihd = $1572, praccihd = $1573, prhosihd = $1574, pruninhd = $1575, prphinhd = $1576, prosinhd = $1577, prcichd = $1578, prothbsp = $1579, prtubesp = $1580, prfsbesp = $1581, prsicisp = $1582, praccisp = $1583, prhosisp = $1584, pruninsp = $1585, prphinsp = $1586, prosinsp = $1587, prcicsp = $1588, uspenchd = $1589, usrphd = $1590, uswphd = $1591, usjsahd = $1592, usishd = $1593, uspencsp = $1594, usrpsp = $1595, uswpsp = $1596, usjsasp = $1597, usissp = $1598, gicacahd = $1599, pencrdhd = $1600, gicaahd = $1601, muibwhd = $1602, wfuelhd = $1603, exhbtyhd = $1604, lnodwphd = $1605, lnolahd = $1606, gicacasp = $1607, pencrdsp = $1608, gicaasp = $1609, muibwsp = $1610, wfuelsp = $1611, exhbtysp = $1612, lnodwpsp = $1613, lnolasp = $1614, dcpayhd = $1615, dmpayhd = $1616, ecpenchd = $1617, wporbahd = $1618, aapayhd = $1619, jsatyphd = $1620, esatyphd = $1621, mupibhd = $1622, dssishd = $1623, dssjsahd = $1624, sfincihd = $1625, sfincjhd = $1626, pdlpayhd = $1627, pmpayhd = $1628, dwpuchd = $1629, sfinuchd = $1630, dcpaysp = $1631, dmpaysp = $1632, ecpencsp = $1633, wporbasp = $1634, aapaysp = $1635, jsatypsp = $1636, esatypsp = $1637, mupibsp = $1638, dssissp = $1639, dssjsasp = $1640, sfincisp = $1641, sfincjsp = $1642, pdlpaysp = $1643, pmpaysp = $1644, dwpucsp = $1645, sfinucsp = $1646, icaperhd = $1647, pmuibhd = $1648, pipmothd = $1649, icapersp = $1650, pmuibsp = $1651, pipmotsp = $1652, r1dlchd = $1653, r1dlmhd = $1654, r1aahd = $1655, r1hbhd = $1656, r1pipdhd = $1657, r1pipmhd = $1658, r1dlcsp = $1659, r1dlmsp = $1660, r1aasp = $1661, r1hbsp = $1662, r1pipdsp = $1663, r1pipmsp = $1664, r2dlchd = $1665, r2dlmhd = $1666, r2aahd = $1667, r2hbhd = $1668, r2pipdhd = $1669, r2pipmhd = $1670, r2dlcsp = $1671, r2dlmsp = $1672, r2aasp = $1673, r2hbsp = $1674, r2pipdsp = $1675, r2pipmsp = $1676, r3dlchd = $1677, r3dlmhd = $1678, r3aahd = $1679, r3hbhd = $1680, r3pipdhd = $1681, r3pipmhd = $1682, r3dlcsp = $1683, r3dlmsp = $1684, r3aasp = $1685, r3hbsp = $1686, r3pipdsp = $1687, r3pipmsp = $1688, r4dlchd = $1689, r4dlmhd = $1690, r4aahd = $1691, r4hbhd = $1692, r4pipdhd = $1693, r4pipmhd = $1694, r4dlcsp = $1695, r4dlmsp = $1696, r4aasp = $1697, r4hbsp = $1698, r4pipdsp = $1699, r4pipmsp = $1700, r5dlchd = $1701, r5dlmhd = $1702, r5aahd = $1703, r5hbhd = $1704, r5pipdhd = $1705, r5pipmhd = $1706, r5dlcsp = $1707, r5dlmsp = $1708, r5aasp = $1709, r5hbsp = $1710, r5pipdsp = $1711, r5pipmsp = $1712, stdlacc1 = $1713, stdlamc1 = $1714, stdlacc2 = $1715, stdlamc2 = $1716, stdlacc3 = $1717, stdlamc3 = $1718, stdlacc4 = $1719, stdlamc4 = $1720, stdlacc5 = $1721, stdlamc5 = $1722, stdlacc6 = $1723, stdlamc6 = $1724, stdlacc7 = $1725, stdlamc7 = $1726, stdlacc8 = $1727, stdlamc8 = $1728, stdlacc9 = $1729, stdlamc9 = $1730, dlacac1 = $1731, dlamoc1 = $1732, dlacac2 = $1733, dlamoc2 = $1734, dlacac3 = $1735, dlamoc3 = $1736, dlacac4 = $1737, dlamoc4 = $1738, dlacac5 = $1739, dlamoc5 = $1740, dlacac6 = $1741, dlamoc6 = $1742, dlacac7 = $1743, dlamoc7 = $1744, dlacac8 = $1745, dlamoc8 = $1746, dlacac9 = $1747, dlamoc9 = $1748, ltdlacc1 = $1749, ltdlamc1 = $1750, ltdlacc2 = $1751, ltdlamc2 = $1752, ltdlacc3 = $1753, ltdlamc3 = $1754, ltdlacc4 = $1755, ltdlamc4 = $1756, ltdlacc5 = $1757, ltdlamc5 = $1758, ltdlacc6 = $1759, ltdlamc6 = $1760, ltdlacc7 = $1761, ltdlamc7 = $1762, ltdlacc8 = $1763, ltdlamc8 = $1764, ltdlacc9 = $1765, ltdlamc9 = $1766, pdlacac1 = $1767, pdlamoc1 = $1768, pdlacac2 = $1769, pdlamoc2 = $1770, pdlacac3 = $1771, pdlamoc3 = $1772, pdlacac4 = $1773, pdlamoc4 = $1774, pdlacac5 = $1775, pdlamoc5 = $1776, pdlacac6 = $1777, pdlamoc6 = $1778, pdlacac7 = $1779, pdlamoc7 = $1780, pdlacac8 = $1781, pdlamoc8 = $1782, pdlacac9 = $1783, pdlamoc9 = $1784, dcpayc1 = $1785, dmpayc1 = $1786, dcpayc2 = $1787, dmpayc2 = $1788, dcpayc3 = $1789, dmpayc3 = $1790, dcpayc4 = $1791, dmpayc4 = $1792, dcpayc5 = $1793, dmpayc5 = $1794, dcpayc6 = $1795, dmpayc6 = $1796, dcpayc7 = $1797, dmpayc7 = $1798, dcpayc8 = $1799, dmpayc8 = $1800, dcpayc9 = $1801, dmpayc9 = $1802, r1dlcc1 = $1803, r1dlmc1 = $1804, r1dlcc2 = $1805, r1dlmc2 = $1806, r1dlcc3 = $1807, r1dlmc3 = $1808, r1dlcc4 = $1809, r1dlmc4 = $1810, r1dlcc5 = $1811, r1dlmc5 = $1812, r1dlcc6 = $1813, r1dlmc6 = $1814, r1dlcc7 = $1815, r1dlmc7 = $1816, r1dlcc8 = $1817, r1dlmc8 = $1818, r1dlcc9 = $1819, r1dlmc9 = $1820, r2dlcc1 = $1821, r2dlmc1 = $1822, r2dlcc2 = $1823, r2dlmc2 = $1824, r2dlcc3 = $1825, r2dlmc3 = $1826, r2dlcc4 = $1827, r2dlmc4 = $1828, r2dlcc5 = $1829, r2dlmc5 = $1830, r2dlcc6 = $1831, r2dlmc6 = $1832, r2dlcc7 = $1833, r2dlmc7 = $1834, r2dlcc8 = $1835, r2dlmc8 = $1836, r2dlcc9 = $1837, r2dlmc9 = $1838, r3dlcc1 = $1839, r3dlmc1 = $1840, r3dlcc2 = $1841, r3dlmc2 = $1842, r3dlcc3 = $1843, r3dlmc3 = $1844, r3dlcc4 = $1845, r3dlmc4 = $1846, r3dlcc5 = $1847, r3dlmc5 = $1848, r3dlcc6 = $1849, r3dlmc6 = $1850, r3dlcc7 = $1851, r3dlmc7 = $1852, r3dlcc8 = $1853, r3dlmc8 = $1854, r3dlcc9 = $1855, r3dlmc9 = $1856, r4dlcc1 = $1857, r4dlmc1 = $1858, r4dlcc2 = $1859, r4dlmc2 = $1860, r4dlcc3 = $1861, r4dlmc3 = $1862, r4dlcc4 = $1863, r4dlmc4 = $1864, r4dlcc5 = $1865, r4dlmc5 = $1866, r4dlcc6 = $1867, r4dlmc6 = $1868, r4dlcc7 = $1869, r4dlmc7 = $1870, r4dlcc8 = $1871, r4dlmc8 = $1872, r4dlcc9 = $1873, r4dlmc9 = $1874, r5dlcc1 = $1875, r5dlmc1 = $1876, r5dlcc2 = $1877, r5dlmc2 = $1878, r5dlcc3 = $1879, r5dlmc3 = $1880, r5dlcc4 = $1881, r5dlmc4 = $1882, r5dlcc5 = $1883, r5dlmc5 = $1884, r5dlcc6 = $1885, r5dlmc6 = $1886, r5dlcc7 = $1887, r5dlmc7 = $1888, r5dlcc8 = $1889, r5dlmc8 = $1890, r5dlcc9 = $1891, r5dlmc9 = $1892, adbtbl = $1893, adddec = $1894, addhol = $1895, addholr = $1896, addins = $1897, addmon = $1898, adepfur = $1899, adles = $1900, adlesoa = $1901, af1 = $1902, afdep2 = $1903, cdelply = $1904, cdepact = $1905, cdepbed = $1906, cdepcel = $1907, cdepeqp = $1908, cdephol = $1909, cdeples = $1910, cdeptea = $1911, cdeptrp = $1912, cdepveg = $1913, cdpcoat = $1914, clothes = $1915, cplay = $1916, debt10 = $1917, debt11 = $1918, debt12 = $1919, debt13 = $1920, debtar01 = $1921, debtar02 = $1922, debtar03 = $1923, debtar04 = $1924, debtar05 = $1925, debtar06 = $1926, debtar07 = $1927, debtar08 = $1928, debtar09 = $1929, debtar10 = $1930, debtar11 = $1931, debtar12 = $1932, debtar13 = $1933, debtfre1 = $1934, debtfre2 = $1935, debtfre3 = $1936, hbolng = $1937, houshe1 = $1938, kidinc = $1939, meal = $1940, nhhchild = $1941, oafur = $1942, oapre = $1943, outpay = $1944, outpyamt = $1945, regpamt = $1946, regularp = $1947, shoeoa = $1948, totsav = $1949, adultb = $1950, boarder = $1951, bpeninc = $1952, bseinc = $1953, budisben = $1954, buearns = $1955, buethgr3 = $1956, buinc = $1957, buinv = $1958, buirben = $1959, bukids = $1960, bunirben = $1961, buothben = $1962, burent = $1963, burinc = $1964, burpinc = $1965, butvlic = $1966, butxcred = $1967, depchldb = $1968, diswbua1 = $1969, diswbuc1 = $1970, ecstatbu = $1971, famtypb2 = $1972, famtypbs = $1973, famtypbu = $1974, fsfvbu = $1975, fsmbu = $1976, fsmlkbu = $1977, gross4 = $1978, hbindbu = $1979, hbindbu2 = $1980, heartbu = $1981, kid04 = $1982, kid1115 = $1983, kid1619 = $1984, kid510 = $1985, lodger = $1986, subltamt = $1987, totcapb3 = $1988, totsavbu = $1989, tuburent = $1990, youngch = $1991, clthsoa = $1992, debt1 = $1993, debt2 = $1994, debt3 = $1995, debt4 = $1996, debt5 = $1997, debt6 = $1998, debt7 = $1999, debt8 = $2000, debt9 = $2001, discbua = $2002, discbuc = $2003, hbtham = $2004, hbthbu = $2005, hbthmn = $2006, hbthpd = $2007, hbthwk = $2008, hbthyr = $2009, hbwait = $2010, intrnt = $2011, oadep = $2012, oanet = $2013, dynhthd = $2014, dynhtsp = $2015, freqhd = $2016, freqsp = $2017, hur01hd = $2018, hur01sp = $2019, hur02hd = $2020, hur02sp = $2021, hur03hd = $2022, hur03sp = $2023, hur04hd = $2024, hur04sp = $2025, hur05hd = $2026, hur05sp = $2027, hur06hd = $2028, hur06sp = $2029, hur07hd = $2030, hur07sp = $2031, hur08hd = $2032, hur08sp = $2033, hur09hd = $2034, hur09sp = $2035, hur10hd = $2036, hur10sp = $2037, hur11hd = $2038, hur11sp = $2039, hur12hd = $2040, hur12sp = $2041, hur13hd = $2042, hur13sp = $2043, hur14hd = $2044, hur14sp = $2045, hur15hd = $2046, hur15sp = $2047, hur16hd = $2048, hur16sp = $2049, hur17hd = $2050, hur17sp = $2051, hur18hd = $2052, hur18sp = $2053, hur19hd = $2054, hur19sp = $2055, hur20hd = $2056, hur20sp = $2057, whl01hd = $2058, whl01sp = $2059, whl02hd = $2060, whl02sp = $2061, whl03hd = $2062, whl03sp = $2063, whl04hd = $2064, whl04sp = $2065, whl05hd = $2066, whl05sp = $2067, whl06hd = $2068, whl06sp = $2069, whl07hd = $2070, whl07sp = $2071, whl08hd = $2072, whl08sp = $2073, whl09hd = $2074, whl09sp = $2075, whl10hd = $2076, whl10sp = $2077, whl11hd = $2078, whl11sp = $2079, whl12hd = $2080, whl12sp = $2081, whl13hd = $2082, whl13sp = $2083, whl14hd = $2084, whl14sp = $2085, whl15hd = $2086, whl15sp = $2087, whl16hd = $2088, whl16sp = $2089, whl17hd = $2090, whl17sp = $2091, whl18hd = $2092, whl18sp = $2093, whl19hd = $2094, whl19sp = $2095, whl20hd = $2096, whl20sp = $2097, dynhtc1 = $2098, dynhtc2 = $2099, dynhtc3 = $2100, dynhtc4 = $2101, dynhtc5 = $2102, dynhtc6 = $2103, dynhtc7 = $2104, dynhtc8 = $2105, dynhtc9 = $2106, freqc1 = $2107, freqc2 = $2108, freqc3 = $2109, freqc4 = $2110, freqc5 = $2111, freqc6 = $2112, freqc7 = $2113, freqc8 = $2114, freqc9 = $2115, hur01c1 = $2116, hur01c2 = $2117, hur01c3 = $2118, hur01c4 = $2119, hur01c5 = $2120, hur01c6 = $2121, hur01c7 = $2122, hur01c8 = $2123, hur01c9 = $2124, hur02c1 = $2125, hur02c2 = $2126, hur02c3 = $2127, hur02c4 = $2128, hur02c5 = $2129, hur02c6 = $2130, hur02c7 = $2131, hur02c8 = $2132, hur02c9 = $2133, hur03c1 = $2134, hur03c2 = $2135, hur03c3 = $2136, hur03c4 = $2137, hur03c5 = $2138, hur03c6 = $2139, hur03c7 = $2140, hur03c8 = $2141, hur03c9 = $2142, hur04c1 = $2143, hur04c2 = $2144, hur04c3 = $2145, hur04c4 = $2146, hur04c5 = $2147, hur04c6 = $2148, hur04c7 = $2149, hur04c8 = $2150, hur04c9 = $2151, hur05c1 = $2152, hur05c2 = $2153, hur05c3 = $2154, hur05c4 = $2155, hur05c5 = $2156, hur05c6 = $2157, hur05c7 = $2158, hur05c8 = $2159, hur05c9 = $2160, hur06c1 = $2161, hur06c2 = $2162, hur06c3 = $2163, hur06c4 = $2164, hur06c5 = $2165, hur06c6 = $2166, hur06c7 = $2167, hur06c8 = $2168, hur06c9 = $2169, hur07c1 = $2170, hur07c2 = $2171, hur07c3 = $2172, hur07c4 = $2173, hur07c5 = $2174, hur07c6 = $2175, hur07c7 = $2176, hur07c8 = $2177, hur07c9 = $2178, hur08c1 = $2179, hur08c2 = $2180, hur08c3 = $2181, hur08c4 = $2182, hur08c5 = $2183, hur08c6 = $2184, hur08c7 = $2185, hur08c8 = $2186, hur08c9 = $2187, hur09c1 = $2188, hur09c2 = $2189, hur09c3 = $2190, hur09c4 = $2191, hur09c5 = $2192, hur09c6 = $2193, hur09c7 = $2194, hur09c8 = $2195, hur09c9 = $2196, hur10c1 = $2197, hur10c2 = $2198, hur10c3 = $2199, hur10c4 = $2200, hur10c5 = $2201, hur10c6 = $2202, hur10c7 = $2203, hur10c8 = $2204, hur10c9 = $2205, hur11c1 = $2206, hur11c2 = $2207, hur11c3 = $2208, hur11c4 = $2209, hur11c5 = $2210, hur11c6 = $2211, hur11c7 = $2212, hur11c8 = $2213, hur11c9 = $2214, hur12c1 = $2215, hur12c2 = $2216, hur12c3 = $2217, hur12c4 = $2218, hur12c5 = $2219, hur12c6 = $2220, hur12c7 = $2221, hur12c8 = $2222, hur12c9 = $2223, hur13c1 = $2224, hur13c2 = $2225, hur13c3 = $2226, hur13c4 = $2227, hur13c5 = $2228, hur13c6 = $2229, hur13c7 = $2230, hur13c8 = $2231, hur13c9 = $2232, hur14c1 = $2233, hur14c2 = $2234, hur14c3 = $2235, hur14c4 = $2236, hur14c5 = $2237, hur14c6 = $2238, hur14c7 = $2239, hur14c8 = $2240, hur14c9 = $2241, hur15c1 = $2242, hur15c2 = $2243, hur15c3 = $2244, hur15c4 = $2245, hur15c5 = $2246, hur15c6 = $2247, hur15c7 = $2248, hur15c8 = $2249, hur15c9 = $2250, hur16c1 = $2251, hur16c2 = $2252, hur16c3 = $2253, hur16c4 = $2254, hur16c5 = $2255, hur16c6 = $2256, hur16c7 = $2257, hur16c8 = $2258, hur16c9 = $2259, hur17c1 = $2260, hur17c2 = $2261, hur17c3 = $2262, hur17c4 = $2263, hur17c5 = $2264, hur17c6 = $2265, hur17c7 = $2266, hur17c8 = $2267, hur17c9 = $2268, hur18c1 = $2269, hur18c2 = $2270, hur18c3 = $2271, hur18c4 = $2272, hur18c5 = $2273, hur18c6 = $2274, hur18c7 = $2275, hur18c8 = $2276, hur18c9 = $2277, hur19c1 = $2278, hur19c2 = $2279, hur19c3 = $2280, hur19c4 = $2281, hur19c5 = $2282, hur19c6 = $2283, hur19c7 = $2284, hur19c8 = $2285, hur19c9 = $2286, hur20c1 = $2287, hur20c2 = $2288, hur20c3 = $2289, hur20c4 = $2290, hur20c5 = $2291, hur20c6 = $2292, hur20c7 = $2293, hur20c8 = $2294, hur20c9 = $2295, whl01c1 = $2296, whl01c2 = $2297, whl01c3 = $2298, whl01c4 = $2299, whl01c5 = $2300, whl01c6 = $2301, whl01c7 = $2302, whl01c8 = $2303, whl01c9 = $2304, whl02c1 = $2305, whl02c2 = $2306, whl02c3 = $2307, whl02c4 = $2308, whl02c5 = $2309, whl02c6 = $2310, whl02c7 = $2311, whl02c8 = $2312, whl02c9 = $2313, whl03c1 = $2314, whl03c2 = $2315, whl03c3 = $2316, whl03c4 = $2317, whl03c5 = $2318, whl03c6 = $2319, whl03c7 = $2320, whl03c8 = $2321, whl03c9 = $2322, whl04c1 = $2323, whl04c2 = $2324, whl04c3 = $2325, whl04c4 = $2326, whl04c5 = $2327, whl04c6 = $2328, whl04c7 = $2329, whl04c8 = $2330, whl04c9 = $2331, whl05c1 = $2332, whl05c2 = $2333, whl05c3 = $2334, whl05c4 = $2335, whl05c5 = $2336, whl05c6 = $2337, whl05c7 = $2338, whl05c8 = $2339, whl05c9 = $2340, whl06c1 = $2341, whl06c2 = $2342, whl06c3 = $2343, whl06c4 = $2344, whl06c5 = $2345, whl06c6 = $2346, whl06c7 = $2347, whl06c8 = $2348, whl06c9 = $2349, whl07c1 = $2350, whl07c2 = $2351, whl07c3 = $2352, whl07c4 = $2353, whl07c5 = $2354, whl07c6 = $2355, whl07c7 = $2356, whl07c8 = $2357, whl07c9 = $2358, whl08c1 = $2359, whl08c2 = $2360, whl08c3 = $2361, whl08c4 = $2362, whl08c5 = $2363, whl08c6 = $2364, whl08c7 = $2365, whl08c8 = $2366, whl08c9 = $2367, whl09c1 = $2368, whl09c2 = $2369, whl09c3 = $2370, whl09c4 = $2371, whl09c5 = $2372, whl09c6 = $2373, whl09c7 = $2374, whl09c8 = $2375, whl09c9 = $2376, whl10c1 = $2377, whl10c2 = $2378, whl10c3 = $2379, whl10c4 = $2380, whl10c5 = $2381, whl10c6 = $2382, whl10c7 = $2383, whl10c8 = $2384, whl10c9 = $2385, whl11c1 = $2386, whl11c2 = $2387, whl11c3 = $2388, whl11c4 = $2389, whl11c5 = $2390, whl11c6 = $2391, whl11c7 = $2392, whl11c8 = $2393, whl11c9 = $2394, whl12c1 = $2395, whl12c2 = $2396, whl12c3 = $2397, whl12c4 = $2398, whl12c5 = $2399, whl12c6 = $2400, whl12c7 = $2401, whl12c8 = $2402, whl12c9 = $2403, whl13c1 = $2404, whl13c2 = $2405, whl13c3 = $2406, whl13c4 = $2407, whl13c5 = $2408, whl13c6 = $2409, whl13c7 = $2410, whl13c8 = $2411, whl13c9 = $2412, whl14c1 = $2413, whl14c2 = $2414, whl14c3 = $2415, whl14c4 = $2416, whl14c5 = $2417, whl14c6 = $2418, whl14c7 = $2419, whl14c8 = $2420, whl14c9 = $2421, whl15c1 = $2422, whl15c2 = $2423, whl15c3 = $2424, whl15c4 = $2425, whl15c5 = $2426, whl15c6 = $2427, whl15c7 = $2428, whl15c8 = $2429, whl15c9 = $2430, whl16c1 = $2431, whl16c2 = $2432, whl16c3 = $2433, whl16c4 = $2434, whl16c5 = $2435, whl16c6 = $2436, whl16c7 = $2437, whl16c8 = $2438, whl16c9 = $2439, whl17c1 = $2440, whl17c2 = $2441, whl17c3 = $2442, whl17c4 = $2443, whl17c5 = $2444, whl17c6 = $2445, whl17c7 = $2446, whl17c8 = $2447, whl17c9 = $2448, whl18c1 = $2449, whl18c2 = $2450, whl18c3 = $2451, whl18c4 = $2452, whl18c5 = $2453, whl18c6 = $2454, whl18c7 = $2455, whl18c8 = $2456, whl18c9 = $2457, whl19c1 = $2458, whl19c2 = $2459, whl19c3 = $2460, whl19c4 = $2461, whl19c5 = $2462, whl19c6 = $2463, whl19c7 = $2464, whl19c8 = $2465, whl19c9 = $2466, whl20c1 = $2467, whl20c2 = $2468, whl20c3 = $2469, whl20c4 = $2470, whl20c5 = $2471, whl20c6 = $2472, whl20c7 = $2473, whl20c8 = $2474, whl20c9 = $2475, agec1 = $2476, agec2 = $2477, agec3 = $2478, agec4 = $2479, agec5 = $2480, agec6 = $2481, agec7 = $2482, agec8 = $2483, cameyrc1 = $2484, cameyrc2 = $2485, cameyrc3 = $2486, cameyrc4 = $2487, cameyrc5 = $2488, cameyrc6 = $2489, cameyrc7 = $2490, cameyrc8 = $2491, chcrec1 = $2492, chcrec2 = $2493, chcrec3 = $2494, chcrec4 = $2495, chcrec5 = $2496, chcrec6 = $2497, chcrec7 = $2498, chcrec8 = $2499, creabc1 = $2500, creabc2 = $2501, creabc3 = $2502, creabc4 = $2503, creabc5 = $2504, creabc6 = $2505, creabc7 = $2506, creabc8 = $2507, creahc1 = $2508, creahc2 = $2509, creahc3 = $2510, creahc4 = $2511, creahc5 = $2512, creahc6 = $2513, creahc7 = $2514, creahc8 = $2515, crecbc1 = $2516, crecbc2 = $2517, crecbc3 = $2518, crecbc4 = $2519, crecbc5 = $2520, crecbc6 = $2521, crecbc7 = $2522, crecbc8 = $2523, crechc1 = $2524, crechc2 = $2525, crechc3 = $2526, crechc4 = $2527, crechc5 = $2528, crechc6 = $2529, crechc7 = $2530, crechc8 = $2531, creclc1 = $2532, creclc2 = $2533, creclc3 = $2534, creclc4 = $2535, creclc5 = $2536, creclc6 = $2537, creclc7 = $2538, creclc8 = $2539, crefrc1 = $2540, crefrc2 = $2541, crefrc3 = $2542, crefrc4 = $2543, crefrc5 = $2544, crefrc6 = $2545, crefrc7 = $2546, crefrc8 = $2547, creotc1 = $2548, creotc2 = $2549, creotc3 = $2550, creotc4 = $2551, creotc5 = $2552, creotc6 = $2553, creotc7 = $2554, creotc8 = $2555, carerc1 = $2556, carerc2 = $2557, carerc3 = $2558, carerc4 = $2559, carerc5 = $2560, carerc6 = $2561, carerc7 = $2562, carerc8 = $2563, cdatrec1 = $2564, cdatrec2 = $2565, cdatrec3 = $2566, cdatrec4 = $2567, cdatrec5 = $2568, cdatrec6 = $2569, cdatrec7 = $2570, cdatrec8 = $2571, cdtrepc1 = $2572, cdtrepc2 = $2573, cdtrepc3 = $2574, cdtrepc4 = $2575, cdtrepc5 = $2576, cdtrepc6 = $2577, cdtrepc7 = $2578, cdtrepc8 = $2579, cdis1c1 = $2580, cdis1c2 = $2581, cdis1c3 = $2582, cdis1c4 = $2583, cdis1c5 = $2584, cdis1c6 = $2585, cdis1c7 = $2586, cdis1c8 = $2587, cdis2c1 = $2588, cdis2c2 = $2589, cdis2c3 = $2590, cdis2c4 = $2591, cdis2c5 = $2592, cdis2c6 = $2593, cdis2c7 = $2594, cdis2c8 = $2595, cdis3c1 = $2596, cdis3c2 = $2597, cdis3c3 = $2598, cdis3c4 = $2599, cdis3c5 = $2600, cdis3c6 = $2601, cdis3c7 = $2602, cdis3c8 = $2603, cdis4c1 = $2604, cdis4c2 = $2605, cdis4c3 = $2606, cdis4c4 = $2607, cdis4c5 = $2608, cdis4c6 = $2609, cdis4c7 = $2610, cdis4c8 = $2611, cdis5c1 = $2612, cdis5c2 = $2613, cdis5c3 = $2614, cdis5c4 = $2615, cdis5c5 = $2616, cdis5c6 = $2617, cdis5c7 = $2618, cdis5c8 = $2619, cdis6c1 = $2620, cdis6c2 = $2621, cdis6c3 = $2622, cdis6c4 = $2623, cdis6c5 = $2624, cdis6c6 = $2625, cdis6c7 = $2626, cdis6c8 = $2627, cdis7c1 = $2628, cdis7c2 = $2629, cdis7c3 = $2630, cdis7c4 = $2631, cdis7c5 = $2632, cdis7c6 = $2633, cdis7c7 = $2634, cdis7c8 = $2635, cdis8c1 = $2636, cdis8c2 = $2637, cdis8c3 = $2638, cdis8c4 = $2639, cdis8c5 = $2640, cdis8c6 = $2641, cdis8c7 = $2642, cdis8c8 = $2643, cdis9c1 = $2644, cdis9c2 = $2645, cdis9c3 = $2646, cdis9c4 = $2647, cdis9c5 = $2648, cdis9c6 = $2649, cdis9c7 = $2650, cdis9c8 = $2651, cdis10c1 = $2652, cdis10c2 = $2653, cdis10c3 = $2654, cdis10c4 = $2655, cdis10c5 = $2656, cdis10c6 = $2657, cdis10c7 = $2658, cdis10c8 = $2659, cdifc1 = $2660, cdifc2 = $2661, cdifc3 = $2662, cdifc4 = $2663, cdifc5 = $2664, cdifc6 = $2665, cdifc7 = $2666, cdifc8 = $2667, ernamc1 = $2668, ernamc2 = $2669, ernamc3 = $2670, ernamc4 = $2671, ernamc5 = $2672, ernamc6 = $2673, ernamc7 = $2674, ernamc8 = $2675, trustc1 = $2676, trustc2 = $2677, trustc3 = $2678, trustc4 = $2679, trustc5 = $2680, trustc6 = $2681, trustc7 = $2682, trustc8 = $2683, chbfdc1 = $2684, chbfdc2 = $2685, chbfdc3 = $2686, chbfdc4 = $2687, chbfdc5 = $2688, chbfdc6 = $2689, chbfdc7 = $2690, chbfdc8 = $2691, cbfamtc1 = $2692, cbfamtc2 = $2693, cbfamtc3 = $2694, cbfamtc4 = $2695, cbfamtc5 = $2696, cbfamtc6 = $2697, cbfamtc7 = $2698, cbfamtc8 = $2699, pbfamtc1 = $2700, pbfamtc2 = $2701, pbfamtc3 = $2702, pbfamtc4 = $2703, pbfamtc5 = $2704, pbfamtc6 = $2705, pbfamtc7 = $2706, pbfamtc8 = $2707, cbfvalc1 = $2708, cbfvalc2 = $2709, cbfvalc3 = $2710, cbfvalc4 = $2711, cbfvalc5 = $2712, cbfvalc6 = $2713, cbfvalc7 = $2714, cbfvalc8 = $2715, chcondc1 = $2716, chcondc2 = $2717, chcondc3 = $2718, chcondc4 = $2719, chcondc5 = $2720, chcondc6 = $2721, chcondc7 = $2722, chcondc8 = $2723, cdla1c1 = $2724, cdla1c2 = $2725, cdla1c3 = $2726, cdla1c4 = $2727, cdla1c5 = $2728, cdla1c6 = $2729, cdla1c7 = $2730, cdla1c8 = $2731, cdla2c1 = $2732, cdla2c2 = $2733, cdla2c3 = $2734, cdla2c4 = $2735, cdla2c5 = $2736, cdla2c6 = $2737, cdla2c7 = $2738, cdla2c8 = $2739, chelfc1 = $2740, chelfc2 = $2741, chelfc3 = $2742, chelfc4 = $2743, chelfc5 = $2744, chelfc6 = $2745, chelfc7 = $2746, chelfc8 = $2747, chernc1 = $2748, chernc2 = $2749, chernc3 = $2750, chernc4 = $2751, chernc5 = $2752, chernc6 = $2753, chernc7 = $2754, chernc8 = $2755, crns1c1 = $2756, crns1c2 = $2757, crns1c3 = $2758, crns1c4 = $2759, crns1c5 = $2760, crns1c6 = $2761, crns1c7 = $2762, crns1c8 = $2763, crns2c1 = $2764, crns2c2 = $2765, crns2c3 = $2766, crns2c4 = $2767, crns2c5 = $2768, crns2c6 = $2769, crns2c7 = $2770, crns2c8 = $2771, crns3c1 = $2772, crns3c2 = $2773, crns3c3 = $2774, crns3c4 = $2775, crns3c5 = $2776, crns3c6 = $2777, crns3c7 = $2778, crns3c8 = $2779, chemac1 = $2780, chemac2 = $2781, chemac3 = $2782, chemac4 = $2783, chemac5 = $2784, chemac6 = $2785, chemac7 = $2786, chemac8 = $2787, emamtc1 = $2788, emamtc2 = $2789, emamtc3 = $2790, emamtc4 = $2791, emamtc5 = $2792, emamtc6 = $2793, emamtc7 = $2794, emamtc8 = $2795, emapdc1 = $2796, emapdc2 = $2797, emapdc3 = $2798, emapdc4 = $2799, emapdc5 = $2800, emapdc6 = $2801, emapdc7 = $2802, emapdc8 = $2803, chidvc1 = $2804, chidvc2 = $2805, chidvc3 = $2806, chidvc4 = $2807, chidvc5 = $2808, chidvc6 = $2809, chidvc7 = $2810, chidvc8 = $2811, climitc1 = $2812, climitc2 = $2813, climitc3 = $2814, climitc4 = $2815, climitc5 = $2816, climitc6 = $2817, climitc7 = $2818, climitc8 = $2819, pearnc1 = $2820, pearnc2 = $2821, pearnc3 = $2822, pearnc4 = $2823, pearnc5 = $2824, pearnc6 = $2825, pearnc7 = $2826, pearnc8 = $2827, ptrusc1 = $2828, ptrusc2 = $2829, ptrusc3 = $2830, ptrusc4 = $2831, ptrusc5 = $2832, ptrusc6 = $2833, ptrusc7 = $2834, ptrusc8 = $2835, chrinc1 = $2836, chrinc2 = $2837, chrinc3 = $2838, chrinc4 = $2839, chrinc5 = $2840, chrinc6 = $2841, chrinc7 = $2842, chrinc8 = $2843, csavec1 = $2844, csavec2 = $2845, csavec3 = $2846, csavec4 = $2847, csavec5 = $2848, csavec6 = $2849, csavec7 = $2850, csavec8 = $2851, tramtc1 = $2852, tramtc2 = $2853, tramtc3 = $2854, tramtc4 = $2855, tramtc5 = $2856, tramtc6 = $2857, tramtc7 = $2858, tramtc8 = $2859, trnpdc1 = $2860, trnpdc2 = $2861, trnpdc3 = $2862, trnpdc4 = $2863, trnpdc5 = $2864, trnpdc6 = $2865, trnpdc7 = $2866, trnpdc8 = $2867, cohabc1 = $2868, cohabc2 = $2869, cohabc3 = $2870, cohabc4 = $2871, cohabc5 = $2872, cohabc6 = $2873, cohabc7 = $2874, cohabc8 = $2875, curqulc1 = $2876, curqulc2 = $2877, curqulc3 = $2878, curqulc4 = $2879, curqulc5 = $2880, curqulc6 = $2881, curqulc7 = $2882, curqulc8 = $2883, disacc1 = $2884, disacc2 = $2885, disacc3 = $2886, disacc4 = $2887, disacc5 = $2888, disacc6 = $2889, disacc7 = $2890, disacc8 = $2891, discoc1 = $2892, discoc2 = $2893, discoc3 = $2894, discoc4 = $2895, discoc5 = $2896, discoc6 = $2897, discoc7 = $2898, discoc8 = $2899, dobc1 = $2900, dobc2 = $2901, dobc3 = $2902, dobc4 = $2903, dobc5 = $2904, dobc6 = $2905, dobc7 = $2906, dobc8 = $2907, dvmarc1 = $2908, dvmarc2 = $2909, dvmarc3 = $2910, dvmarc4 = $2911, dvmarc5 = $2912, dvmarc6 = $2913, dvmarc7 = $2914, dvmarc8 = $2915, fsvvlc1 = $2916, fsvvlc2 = $2917, fsvvlc3 = $2918, fsvvlc4 = $2919, fsvvlc5 = $2920, fsvvlc6 = $2921, fsvvlc7 = $2922, fsvvlc8 = $2923, fsmkvc1 = $2924, fsmkvc2 = $2925, fsmkvc3 = $2926, fsmkvc4 = $2927, fsmkvc5 = $2928, fsmkvc6 = $2929, fsmkvc7 = $2930, fsmkvc8 = $2931, fsmlvc1 = $2932, fsmlvc2 = $2933, fsmlvc3 = $2934, fsmlvc4 = $2935, fsmlvc5 = $2936, fsmlvc6 = $2937, fsmlvc7 = $2938, fsmlvc8 = $2939, ftedc1 = $2940, ftedc2 = $2941, ftedc3 = $2942, ftedc4 = $2943, ftedc5 = $2944, ftedc6 = $2945, ftedc7 = $2946, ftedc8 = $2947, g1valc1 = $2948, g1valc2 = $2949, g1valc3 = $2950, g1valc4 = $2951, g1valc5 = $2952, g1valc6 = $2953, g1valc7 = $2954, g1valc8 = $2955, g2valc1 = $2956, g2valc2 = $2957, g2valc3 = $2958, g2valc4 = $2959, g2valc5 = $2960, g2valc6 = $2961, g2valc7 = $2962, g2valc8 = $2963, g1dirc1 = $2964, g1dirc2 = $2965, g1dirc3 = $2966, g1dirc4 = $2967, g1dirc5 = $2968, g1dirc6 = $2969, g1dirc7 = $2970, g1dirc8 = $2971, g2dirc1 = $2972, g2dirc2 = $2973, g2dirc3 = $2974, g2dirc4 = $2975, g2dirc5 = $2976, g2dirc6 = $2977, g2dirc7 = $2978, g2dirc8 = $2979, gtnumc1 = $2980, gtnumc2 = $2981, gtnumc3 = $2982, gtnumc4 = $2983, gtnumc5 = $2984, gtnumc6 = $2985, gtnumc7 = $2986, gtnumc8 = $2987, gt1scc1 = $2988, gt1scc2 = $2989, gt1scc3 = $2990, gt1scc4 = $2991, gt1scc5 = $2992, gt1scc6 = $2993, gt1scc7 = $2994, gt1scc8 = $2995, gt2scc1 = $2996, gt2scc2 = $2997, gt2scc3 = $2998, gt2scc4 = $2999, gt2scc5 = $3000, gt2scc6 = $3001, gt2scc7 = $3002, gt2scc8 = $3003, gt10sc1 = $3004, gt10sc2 = $3005, gt10sc3 = $3006, gt10sc4 = $3007, gt10sc5 = $3008, gt10sc6 = $3009, gt10sc7 = $3010, gt10sc8 = $3011, gt20sc1 = $3012, gt20sc2 = $3013, gt20sc3 = $3014, gt20sc4 = $3015, gt20sc5 = $3016, gt20sc6 = $3017, gt20sc7 = $3018, gt20sc8 = $3019, hartvc1 = $3020, hartvc2 = $3021, hartvc3 = $3022, hartvc4 = $3023, hartvc5 = $3024, hartvc6 = $3025, hartvc7 = $3026, hartvc8 = $3027, heatchc1 = $3028, heatchc2 = $3029, heatchc3 = $3030, heatchc4 = $3031, heatchc5 = $3032, heatchc6 = $3033, heatchc7 = $3034, heatchc8 = $3035, hhldrc1 = $3036, hhldrc2 = $3037, hhldrc3 = $3038, hhldrc4 = $3039, hhldrc5 = $3040, hhldrc6 = $3041, hhldrc7 = $3042, hhldrc8 = $3043, hurabc1 = $3044, hurabc2 = $3045, hurabc3 = $3046, hurabc4 = $3047, hurabc5 = $3048, hurabc6 = $3049, hurabc7 = $3050, hurabc8 = $3051, hurahc1 = $3052, hurahc2 = $3053, hurahc3 = $3054, hurahc4 = $3055, hurahc5 = $3056, hurahc6 = $3057, hurahc7 = $3058, hurahc8 = $3059, hurcbc1 = $3060, hurcbc2 = $3061, hurcbc3 = $3062, hurcbc4 = $3063, hurcbc5 = $3064, hurcbc6 = $3065, hurcbc7 = $3066, hurcbc8 = $3067, hurchc1 = $3068, hurchc2 = $3069, hurchc3 = $3070, hurchc4 = $3071, hurchc5 = $3072, hurchc6 = $3073, hurchc7 = $3074, hurchc8 = $3075, hurclc1 = $3076, hurclc2 = $3077, hurclc3 = $3078, hurclc4 = $3079, hurclc5 = $3080, hurclc6 = $3081, hurclc7 = $3082, hurclc8 = $3083, hurfrc1 = $3084, hurfrc2 = $3085, hurfrc3 = $3086, hurfrc4 = $3087, hurfrc5 = $3088, hurfrc6 = $3089, hurfrc7 = $3090, hurfrc8 = $3091, hurotc1 = $3092, hurotc2 = $3093, hurotc3 = $3094, hurotc4 = $3095, hurotc5 = $3096, hurotc6 = $3097, hurotc7 = $3098, hurotc8 = $3099, hurrec1 = $3100, hurrec2 = $3101, hurrec3 = $3102, hurrec4 = $3103, hurrec5 = $3104, hurrec6 = $3105, hurrec7 = $3106, hurrec8 = $3107, hpersc1 = $3108, hpersc2 = $3109, hpersc3 = $3110, hpersc4 = $3111, hpersc5 = $3112, hpersc6 = $3113, hpersc7 = $3114, hpersc8 = $3115, hrsedc1 = $3116, hrsedc2 = $3117, hrsedc3 = $3118, hrsedc4 = $3119, hrsedc5 = $3120, hrsedc6 = $3121, hrsedc7 = $3122, hrsedc8 = $3123, hsvprc1 = $3124, hsvprc2 = $3125, hsvprc3 = $3126, hsvprc4 = $3127, hsvprc5 = $3128, hsvprc6 = $3129, hsvprc7 = $3130, hsvprc8 = $3131, laregc1 = $3132, laregc2 = $3133, laregc3 = $3134, laregc4 = $3135, laregc5 = $3136, laregc6 = $3137, laregc7 = $3138, laregc8 = $3139, msc1 = $3140, msc2 = $3141, msc3 = $3142, msc4 = $3143, msc5 = $3144, msc6 = $3145, msc7 = $3146, msc8 = $3147, prsonc1 = $3148, prsonc2 = $3149, prsonc3 = $3150, prsonc4 = $3151, prsonc5 = $3152, prsonc6 = $3153, prsonc7 = $3154, prsonc8 = $3155, rlp1c1 = $3156, rlp1c2 = $3157, rlp1c3 = $3158, rlp1c4 = $3159, rlp1c5 = $3160, rlp1c6 = $3161, rlp1c7 = $3162, rlp1c8 = $3163, rlp2c1 = $3164, rlp2c2 = $3165, rlp2c3 = $3166, rlp2c4 = $3167, rlp2c5 = $3168, rlp2c6 = $3169, rlp2c7 = $3170, rlp2c8 = $3171, rlp3c1 = $3172, rlp3c2 = $3173, rlp3c3 = $3174, rlp3c4 = $3175, rlp3c5 = $3176, rlp3c6 = $3177, rlp3c7 = $3178, rlp3c8 = $3179, rlp4c1 = $3180, rlp4c2 = $3181, rlp4c3 = $3182, rlp4c4 = $3183, rlp4c5 = $3184, rlp4c6 = $3185, rlp4c7 = $3186, rlp4c8 = $3187, rlp5c1 = $3188, rlp5c2 = $3189, rlp5c3 = $3190, rlp5c4 = $3191, rlp5c5 = $3192, rlp5c6 = $3193, rlp5c7 = $3194, rlp5c8 = $3195, rlp6c1 = $3196, rlp6c2 = $3197, rlp6c3 = $3198, rlp6c4 = $3199, rlp6c5 = $3200, rlp6c6 = $3201, rlp6c7 = $3202, rlp6c8 = $3203, rlp7c1 = $3204, rlp7c2 = $3205, rlp7c3 = $3206, rlp7c4 = $3207, rlp7c5 = $3208, rlp7c6 = $3209, rlp7c7 = $3210, rlp7c8 = $3211, rlp8c1 = $3212, rlp8c2 = $3213, rlp8c3 = $3214, rlp8c4 = $3215, rlp8c5 = $3216, rlp8c6 = $3217, rlp8c7 = $3218, rlp8c8 = $3219, rlp9c1 = $3220, rlp9c2 = $3221, rlp9c3 = $3222, rlp9c4 = $3223, rlp9c5 = $3224, rlp9c6 = $3225, rlp9c7 = $3226, rlp9c8 = $3227, rlp10c1 = $3228, rlp10c2 = $3229, rlp10c3 = $3230, rlp10c4 = $3231, rlp10c5 = $3232, rlp10c6 = $3233, rlp10c7 = $3234, rlp10c8 = $3235, rlp11c1 = $3236, rlp11c2 = $3237, rlp11c3 = $3238, rlp11c4 = $3239, rlp11c5 = $3240, rlp11c6 = $3241, rlp11c7 = $3242, rlp11c8 = $3243, rlp12c1 = $3244, rlp12c2 = $3245, rlp12c3 = $3246, rlp12c4 = $3247, rlp12c5 = $3248, rlp12c6 = $3249, rlp12c7 = $3250, rlp12c8 = $3251, rlp13c1 = $3252, rlp13c2 = $3253, rlp13c3 = $3254, rlp13c4 = $3255, rlp13c5 = $3256, rlp13c6 = $3257, rlp13c7 = $3258, rlp13c8 = $3259, rlp14c1 = $3260, rlp14c2 = $3261, rlp14c3 = $3262, rlp14c4 = $3263, rlp14c5 = $3264, rlp14c6 = $3265, rlp14c7 = $3266, rlp14c8 = $3267, rhrpcc1 = $3268, rhrpcc2 = $3269, rhrpcc3 = $3270, rhrpcc4 = $3271, rhrpcc5 = $3272, rhrpcc6 = $3273, rhrpcc7 = $3274, rhrpcc8 = $3275, sbkitc1 = $3276, sbkitc2 = $3277, sbkitc3 = $3278, sbkitc4 = $3279, sbkitc5 = $3280, sbkitc6 = $3281, sbkitc7 = $3282, sbkitc8 = $3283, sexc1 = $3284, sexc2 = $3285, sexc3 = $3286, sexc4 = $3287, sexc5 = $3288, sexc6 = $3289, sexc7 = $3290, sexc8 = $3291, sfvitc1 = $3292, sfvitc2 = $3293, sfvitc3 = $3294, sfvitc4 = $3295, sfvitc5 = $3296, sfvitc6 = $3297, sfvitc7 = $3298, sfvitc8 = $3299, fmctsc1 = $3300, fmctsc2 = $3301, fmctsc3 = $3302, fmctsc4 = $3303, fmctsc5 = $3304, fmctsc6 = $3305, fmctsc7 = $3306, fmctsc8 = $3307, fmealc1 = $3308, fmealc2 = $3309, fmealc3 = $3310, fmealc4 = $3311, fmealc5 = $3312, fmealc6 = $3313, fmealc7 = $3314, fmealc8 = $3315, cblndc1 = $3316, cblndc2 = $3317, cblndc3 = $3318, cblndc4 = $3319, cblndc5 = $3320, cblndc6 = $3321, cblndc7 = $3322, cblndc8 = $3323, cparsc1 = $3324, cparsc2 = $3325, cparsc3 = $3326, cparsc4 = $3327, cparsc5 = $3328, cparsc6 = $3329, cparsc7 = $3330, cparsc8 = $3331, cdeafc1 = $3332, cdeafc2 = $3333, cdeafc3 = $3334, cdeafc4 = $3335, cdeafc5 = $3336, cdeafc6 = $3337, cdeafc7 = $3338, cdeafc8 = $3339, totgtc1 = $3340, totgtc2 = $3341, totgtc3 = $3342, totgtc4 = $3343, totgtc5 = $3344, totgtc6 = $3345, totgtc7 = $3346, totgtc8 = $3347, totsvc1 = $3348, totsvc2 = $3349, totsvc3 = $3350, totsvc4 = $3351, totsvc5 = $3352, totsvc6 = $3353, totsvc7 = $3354, totsvc8 = $3355, tacamc1 = $3356, tacamc2 = $3357, tacamc3 = $3358, tacamc4 = $3359, tacamc5 = $3360, tacamc6 = $3361, tacamc7 = $3362, tacamc8 = $3363, tpeedc1 = $3364, tpeedc2 = $3365, tpeedc3 = $3366, tpeedc4 = $3367, tpeedc5 = $3368, tpeedc6 = $3369, tpeedc7 = $3370, tpeedc8 = $3371, uprsoc1 = $3372, uprsoc2 = $3373, uprsoc3 = $3374, uprsoc4 = $3375, uprsoc5 = $3376, uprsoc6 = $3377, uprsoc7 = $3378, uprsoc8 = $3379, govpy1hd = $3380, govpy2hd = $3381, govpy3hd = $3382, govpy4hd = $3383, govpy5hd = $3384, govpy6hd = $3385, govpy7hd = $3386, govpy8hd = $3387, govpy9hd = $3388, gvpy10hd = $3389, gvpy11hd = $3390, govpy1sp = $3391, govpy2sp = $3392, govpy3sp = $3393, govpy4sp = $3394, govpy5sp = $3395, govpy6sp = $3396, govpy7sp = $3397, govpy8sp = $3398, govpy9sp = $3399, gvpy10sp = $3400, gvpy11sp = $3401, nhhamt1 = $3402, nhhamt2 = $3403, nhhamt3 = $3404, nhhamt4 = $3405, nhhfee1 = $3406, nhhfee2 = $3407, nhhfee3 = $3408, nhhfee4 = $3409, pnhhamt1 = $3410, pnhhamt2 = $3411, pnhhamt3 = $3412, pnhhamt4 = $3413, bona11hd = $3414, bona12hd = $3415, bona13hd = $3416, bona11sp = $3417, bona12sp = $3418, bona13sp = $3419, bona21hd = $3420, bona22hd = $3421, bona23hd = $3422, bona21sp = $3423, bona22sp = $3424, bona23sp = $3425, bona31hd = $3426, bona32hd = $3427, bona33hd = $3428, bona31sp = $3429, bona32sp = $3430, bona33sp = $3431, bona41hd = $3432, bona42hd = $3433, bona43hd = $3434, bona41sp = $3435, bona42sp = $3436, bona43sp = $3437, bona51hd = $3438, bona52hd = $3439, bona53hd = $3440, bona51sp = $3441, bona52sp = $3442, bona53sp = $3443, bona61hd = $3444, bona62hd = $3445, bona63hd = $3446, bona61sp = $3447, bona62sp = $3448, bona63sp = $3449, bont11hd = $3450, bont12hd = $3451, bont13hd = $3452, bont11sp = $3453, bont12sp = $3454, bont13sp = $3455, bont21hd = $3456, bont22hd = $3457, bont23hd = $3458, bont21sp = $3459, bont22sp = $3460, bont23sp = $3461, bont31hd = $3462, bont32hd = $3463, bont33hd = $3464, bont31sp = $3465, bont32sp = $3466, bont33sp = $3467, bont41hd = $3468, bont42hd = $3469, bont43hd = $3470, bont41sp = $3471, bont42sp = $3472, bont43sp = $3473, bont51hd = $3474, bont52hd = $3475, bont53hd = $3476, bont51sp = $3477, bont52sp = $3478, bont53sp = $3479, bont61hd = $3480, bont62hd = $3481, bont63hd = $3482, bont61sp = $3483, bont62sp = $3484, bont63sp = $3485, btax11hd = $3486, btax12hd = $3487, btax13hd = $3488, btax11sp = $3489, btax12sp = $3490, btax13sp = $3491, btax21hd = $3492, btax22hd = $3493, btax23hd = $3494, btax21sp = $3495, btax22sp = $3496, btax23sp = $3497, btax31hd = $3498, btax32hd = $3499, btax33hd = $3500, btax31sp = $3501, btax32sp = $3502, btax33sp = $3503, btax41hd = $3504, btax42hd = $3505, btax43hd = $3506, btax41sp = $3507, btax42sp = $3508, btax43sp = $3509, btax51hd = $3510, btax52hd = $3511, btax53hd = $3512, btax51sp = $3513, btax52sp = $3514, btax53sp = $3515, btax61hd = $3516, btax62hd = $3517, btax63hd = $3518, btax61sp = $3519, btax62sp = $3520, btax63sp = $3521, busac1hd = $3522, busac2hd = $3523, busac3hd = $3524, busac1sp = $3525, busac2sp = $3526, busac3sp = $3527, caram1hd = $3528, caram2hd = $3529, caram3hd = $3530, caram1sp = $3531, caram2sp = $3532, caram3sp = $3533, carcn1hd = $3534, carcn2hd = $3535, carcn3hd = $3536, carcn1sp = $3537, carcn2sp = $3538, carcn3sp = $3539, carvl1hd = $3540, carvl2hd = $3541, carvl3hd = $3542, carvl1sp = $3543, carvl2sp = $3544, carvl3sp = $3545, chktx1hd = $3546, chktx2hd = $3547, chktx3hd = $3548, chktx1sp = $3549, chktx2sp = $3550, chktx3sp = $3551, chcom1hd = $3552, chcom2hd = $3553, chcom3hd = $3554, chcom1sp = $3555, chcom2sp = $3556, chcom3sp = $3557, chvam1hd = $3558, chvam2hd = $3559, chvam3hd = $3560, chvam1sp = $3561, chvam2sp = $3562, chvam3sp = $3563, chvpd1hd = $3564, chvpd2hd = $3565, chvpd3hd = $3566, chvpd1sp = $3567, chvpd2sp = $3568, chvpd3sp = $3569, chsac1hd = $3570, chsac2hd = $3571, chsac3hd = $3572, chsac1sp = $3573, chsac2sp = $3574, chsac3sp = $3575, chuam1hd = $3576, chuam2hd = $3577, chuam3hd = $3578, chuam1sp = $3579, chuam2sp = $3580, chuam3sp = $3581, chupd1hd = $3582, chupd2hd = $3583, chupd3hd = $3584, chupd1sp = $3585, chupd2sp = $3586, chupd3sp = $3587, chusu1hd = $3588, chusu2hd = $3589, chusu3hd = $3590, chusu1sp = $3591, chusu2sp = $3592, chusu3sp = $3593, doth1hd = $3594, doth2hd = $3595, doth3hd = $3596, doth1sp = $3597, doth2sp = $3598, doth3sp = $3599, dpen1hd = $3600, dpen2hd = $3601, dpen3hd = $3602, dpen1sp = $3603, dpen2sp = $3604, dpen3sp = $3605, davc1hd = $3606, davc2hd = $3607, davc3hd = $3608, davc1sp = $3609, davc2sp = $3610, davc3sp = $3611, dtuf1hd = $3612, dtuf2hd = $3613, dtuf3hd = $3614, dtuf1sp = $3615, dtuf2sp = $3616, dtuf3sp = $3617, dfrso1hd = $3618, dfrso2hd = $3619, dfrso3hd = $3620, dfrso1sp = $3621, dfrso2sp = $3622, dfrso3sp = $3623, dspor1hd = $3624, dspor2hd = $3625, dspor3hd = $3626, dspor1sp = $3627, dspor2sp = $3628, dspor3sp = $3629, drepl1hd = $3630, drepl2hd = $3631, drepl3hd = $3632, drepl1sp = $3633, drepl2sp = $3634, drepl3sp = $3635, dmed1hd = $3636, dmed2hd = $3637, dmed3hd = $3638, dmed1sp = $3639, dmed2sp = $3640, dmed3sp = $3641, dchar1hd = $3642, dchar2hd = $3643, dchar3hd = $3644, dchar1sp = $3645, dchar2sp = $3646, dchar3sp = $3647, dslrp1hd = $3648, dslrp2hd = $3649, dslrp3hd = $3650, dslrp1sp = $3651, dslrp2sp = $3652, dslrp3sp = $3653, dirni1hd = $3654, dirni2hd = $3655, dirni3hd = $3656, dirni1sp = $3657, dirni2sp = $3658, dirni3sp = $3659, totov1hd = $3660, totov2hd = $3661, totov3hd = $3662, totov1sp = $3663, totov2sp = $3664, totov3sp = $3665, dvuhr1hd = $3666, dvuhr2hd = $3667, dvuhr3hd = $3668, dvuhr1sp = $3669, dvuhr2sp = $3670, dvuhr3sp = $3671, empan1hd = $3672, empan2hd = $3673, empan3hd = $3674, empan1sp = $3675, empan2sp = $3676, empan3sp = $3677, empen1hd = $3678, empen2hd = $3679, empen3hd = $3680, empen1sp = $3681, empen2sp = $3682, empen3sp = $3683, etype1hd = $3684, etype2hd = $3685, etype3hd = $3686, etype1sp = $3687, etype2sp = $3688, etype3sp = $3689, evrot1hd = $3690, evrot2hd = $3691, evrot3hd = $3692, evrot1sp = $3693, evrot2sp = $3694, evrot3sp = $3695, exb011hd = $3696, exb012hd = $3697, exb013hd = $3698, exb011sp = $3699, exb012sp = $3700, exb013sp = $3701, exb021hd = $3702, exb022hd = $3703, exb023hd = $3704, exb021sp = $3705, exb022sp = $3706, exb023sp = $3707, exb031hd = $3708, exb032hd = $3709, exb033hd = $3710, exb031sp = $3711, exb032sp = $3712, exb033sp = $3713, exb041hd = $3714, exb042hd = $3715, exb043hd = $3716, exb041sp = $3717, exb042sp = $3718, exb043sp = $3719, exb051hd = $3720, exb052hd = $3721, exb053hd = $3722, exb051sp = $3723, exb052sp = $3724, exb053sp = $3725, exb061hd = $3726, exb062hd = $3727, exb063hd = $3728, exb061sp = $3729, exb062sp = $3730, exb063sp = $3731, exb071hd = $3732, exb072hd = $3733, exb073hd = $3734, exb071sp = $3735, exb072sp = $3736, exb073sp = $3737, exb081hd = $3738, exb082hd = $3739, exb083hd = $3740, exb081sp = $3741, exb082sp = $3742, exb083sp = $3743, exb091hd = $3744, exb092hd = $3745, exb093hd = $3746, exb091sp = $3747, exb092sp = $3748, exb093sp = $3749, exb101hd = $3750, exb102hd = $3751, exb103hd = $3752, exb101sp = $3753, exb102sp = $3754, exb103sp = $3755, exb111hd = $3756, exb112hd = $3757, exb113hd = $3758, exb111sp = $3759, exb112sp = $3760, exb113sp = $3761, exb121hd = $3762, exb122hd = $3763, exb123hd = $3764, exb121sp = $3765, exb122sp = $3766, exb123sp = $3767, ftpt1hd = $3768, ftpt2hd = $3769, ftpt3hd = $3770, ftpt1sp = $3771, ftpt2sp = $3772, ftpt3sp = $3773, fulam1hd = $3774, fulam2hd = $3775, fulam3hd = $3776, fulam1sp = $3777, fulam2sp = $3778, fulam3sp = $3779, fulbn1hd = $3780, fulbn2hd = $3781, fulbn3hd = $3782, fulbn1sp = $3783, fulbn2sp = $3784, fulbn3sp = $3785, fulpd1hd = $3786, fulpd2hd = $3787, fulpd3hd = $3788, fulpd1sp = $3789, fulpd2sp = $3790, fulpd3sp = $3791, fulty1hd = $3792, fulty2hd = $3793, fulty3hd = $3794, fulty1sp = $3795, fulty2sp = $3796, fulty3sp = $3797, fluam1hd = $3798, fluam2hd = $3799, fluam3hd = $3800, fluam1sp = $3801, fluam2sp = $3802, fluam3sp = $3803, flupd1hd = $3804, flupd2hd = $3805, flupd3hd = $3806, flupd1sp = $3807, flupd2sp = $3808, flupd3sp = $3809, flusu1hd = $3810, flusu2hd = $3811, flusu3hd = $3812, flusu1sp = $3813, flusu2sp = $3814, flusu3sp = $3815, grwag1hd = $3816, grwag2hd = $3817, grwag3hd = $3818, grwag1sp = $3819, grwag2sp = $3820, grwag3sp = $3821, grwap1hd = $3822, grwap2hd = $3823, grwap3hd = $3824, grwap1sp = $3825, grwap2sp = $3826, grwap3sp = $3827, hha11hd = $3828, hha12hd = $3829, hha13hd = $3830, hha11sp = $3831, hha12sp = $3832, hha13sp = $3833, hha21hd = $3834, hha22hd = $3835, hha23hd = $3836, hha21sp = $3837, hha22sp = $3838, hha23sp = $3839, hha31hd = $3840, hha32hd = $3841, hha33hd = $3842, hha31sp = $3843, hha32sp = $3844, hha33sp = $3845, hour1hd = $3846, hour2hd = $3847, hour3hd = $3848, hour1sp = $3849, hour2sp = $3850, hour3sp = $3851, hrrte1hd = $3852, hrrte2hd = $3853, hrrte3hd = $3854, hrrte1sp = $3855, hrrte2sp = $3856, hrrte3sp = $3857, ipay11hd = $3858, ipay12hd = $3859, ipay13hd = $3860, ipay11sp = $3861, ipay12sp = $3862, ipay13sp = $3863, ipay21hd = $3864, ipay22hd = $3865, ipay23hd = $3866, ipay21sp = $3867, ipay22sp = $3868, ipay23sp = $3869, ipay31hd = $3870, ipay32hd = $3871, ipay33hd = $3872, ipay31sp = $3873, ipay32sp = $3874, ipay33sp = $3875, ipay41hd = $3876, ipay42hd = $3877, ipay43hd = $3878, ipay41sp = $3879, ipay42sp = $3880, ipay43sp = $3881, ipay51hd = $3882, ipay52hd = $3883, ipay53hd = $3884, ipay51sp = $3885, ipay52sp = $3886, ipay53sp = $3887, ipay61hd = $3888, ipay62hd = $3889, ipay63hd = $3890, ipay61sp = $3891, ipay62sp = $3892, ipay63sp = $3893, ipay71hd = $3894, ipay72hd = $3895, ipay73hd = $3896, ipay71sp = $3897, ipay72sp = $3898, ipay73sp = $3899, jbchg1hd = $3900, jbchg2hd = $3901, jbchg3hd = $3902, jbchg1sp = $3903, jbchg2sp = $3904, jbchg3sp = $3905, jobus1hd = $3906, jobus2hd = $3907, jobus3hd = $3908, jobus1sp = $3909, jobus2sp = $3910, jobus3sp = $3911, jbhrs1hd = $3912, jbhrs2hd = $3913, jbhrs3hd = $3914, jbhrs1sp = $3915, jbhrs2sp = $3916, jbhrs3sp = $3917, lt301hd = $3918, lt302hd = $3919, lt303hd = $3920, lt301sp = $3921, lt302sp = $3922, lt303sp = $3923, madem1hd = $3924, madem2hd = $3925, madem3hd = $3926, madem1sp = $3927, madem2sp = $3928, madem3sp = $3929, mile1hd = $3930, mile2hd = $3931, mile3hd = $3932, mile1sp = $3933, mile2sp = $3934, mile3sp = $3935, moref1hd = $3936, moref2hd = $3937, moref3hd = $3938, moref1sp = $3939, moref2sp = $3940, moref3sp = $3941, nic1hd = $3942, nic2hd = $3943, nic3hd = $3944, nic1sp = $3945, nic2sp = $3946, nic3sp = $3947, nidam1hd = $3948, nidam2hd = $3949, nidam3hd = $3950, nidam1sp = $3951, nidam2sp = $3952, nidam3sp = $3953, nipd1hd = $3954, nipd2hd = $3955, nipd3hd = $3956, nipd1sp = $3957, nipd2sp = $3958, nipd3sp = $3959, noemp1hd = $3960, noemp2hd = $3961, noemp3hd = $3962, noemp1sp = $3963, noemp2sp = $3964, noemp3sp = $3965, oremp1hd = $3966, oremp2hd = $3967, oremp3hd = $3968, oremp1sp = $3969, oremp2sp = $3970, oremp3sp = $3971, othd11hd = $3972, othd12hd = $3973, othd13hd = $3974, othd11sp = $3975, othd12sp = $3976, othd13sp = $3977, othd21hd = $3978, othd22hd = $3979, othd23hd = $3980, othd21sp = $3981, othd22sp = $3982, othd23sp = $3983, othd31hd = $3984, othd32hd = $3985, othd33hd = $3986, othd31sp = $3987, othd32sp = $3988, othd33sp = $3989, othd41hd = $3990, othd42hd = $3991, othd43hd = $3992, othd41sp = $3993, othd42sp = $3994, othd43sp = $3995, othd51hd = $3996, othd52hd = $3997, othd53hd = $3998, othd51sp = $3999, othd52sp = $4000, othd53sp = $4001, othd61hd = $4002, othd62hd = $4003, othd63hd = $4004, othd61sp = $4005, othd62sp = $4006, othd63sp = $4007, othd71hd = $4008, othd72hd = $4009, othd73hd = $4010, othd71sp = $4011, othd72sp = $4012, othd73sp = $4013, othd81hd = $4014, othd82hd = $4015, othd83hd = $4016, othd81sp = $4017, othd82sp = $4018, othd83sp = $4019, othd91hd = $4020, othd92hd = $4021, othd93hd = $4022, othd91sp = $4023, othd92sp = $4024, othd93sp = $4025, otd101hd = $4026, otd102hd = $4027, otd103hd = $4028, otd101sp = $4029, otd102sp = $4030, otd103sp = $4031, ownam1hd = $4032, ownam2hd = $4033, ownam3hd = $4034, ownam1sp = $4035, ownam2sp = $4036, ownam3sp = $4037, ownoa1hd = $4038, ownoa2hd = $4039, ownoa3hd = $4040, ownoa1sp = $4041, ownoa2sp = $4042, ownoa3sp = $4043, ownot1hd = $4044, ownot2hd = $4045, ownot3hd = $4046, ownot1sp = $4047, ownot2sp = $4048, ownot3sp = $4049, ownsm1hd = $4050, ownsm2hd = $4051, ownsm3hd = $4052, ownsm1sp = $4053, ownsm2sp = $4054, ownsm3sp = $4055, pappd1hd = $4056, pappd2hd = $4057, pappd3hd = $4058, pappd1sp = $4059, pappd2sp = $4060, pappd3sp = $4061, payam1hd = $4062, payam2hd = $4063, payam3hd = $4064, payam1sp = $4065, payam2sp = $4066, payam3sp = $4067, pdate1hd = $4068, pdate2hd = $4069, pdate3hd = $4070, pdate1sp = $4071, pdate2sp = $4072, pdate3sp = $4073, paye1hd = $4074, paye2hd = $4075, paye3hd = $4076, paye1sp = $4077, paye2sp = $4078, paye3sp = $4079, paype1hd = $4080, paype2hd = $4081, paype3hd = $4082, paype1sp = $4083, paype2sp = $4084, paype3sp = $4085, paysl1hd = $4086, paysl2hd = $4087, paysl3hd = $4088, paysl1sp = $4089, paysl2sp = $4090, paysl3sp = $4091, payus1hd = $4092, payus2hd = $4093, payus3hd = $4094, payus1sp = $4095, payus2sp = $4096, payus3sp = $4097, pothr1hd = $4098, pothr2hd = $4099, pothr3hd = $4100, pothr1sp = $4101, pothr2sp = $4102, pothr3sp = $4103, ppppd1hd = $4104, ppppd2hd = $4105, ppppd3hd = $4106, ppppd1sp = $4107, ppppd2sp = $4108, ppppd3sp = $4109, prbef1hd = $4110, prbef2hd = $4111, prbef3hd = $4112, prbef1sp = $4113, prbef2sp = $4114, prbef3sp = $4115, prdoc1hd = $4116, prdoc2hd = $4117, prdoc3hd = $4118, prdoc1sp = $4119, prdoc2sp = $4120, prdoc3sp = $4121, sepro1hd = $4122, sepro2hd = $4123, sepro3hd = $4124, sepro1sp = $4125, sepro2sp = $4126, sepro3sp = $4127, prolo1hd = $4128, prolo2hd = $4129, prolo3hd = $4130, prolo1sp = $4131, prolo2sp = $4132, prolo3sp = $4133, profn1hd = $4134, profn2hd = $4135, profn3hd = $4136, profn1sp = $4137, profn2sp = $4138, profn3sp = $4139, protx1hd = $4140, protx2hd = $4141, protx3hd = $4142, protx1sp = $4143, protx2sp = $4144, protx3sp = $4145, rspvr1hd = $4146, rspvr2hd = $4147, rspvr3hd = $4148, rspvr1sp = $4149, rspvr2sp = $4150, rspvr3sp = $4151, apamt1hd = $4152, apamt2hd = $4153, apamt3hd = $4154, apamt1sp = $4155, apamt2sp = $4156, apamt3sp = $4157, sebeg1hd = $4158, sebeg2hd = $4159, sebeg3hd = $4160, sebeg1sp = $4161, sebeg2sp = $4162, sebeg3sp = $4163, seend1hd = $4164, seend2hd = $4165, seend3hd = $4166, seend1sp = $4167, seend2sp = $4168, seend3sp = $4169, sectr1hd = $4170, sectr2hd = $4171, sectr3hd = $4172, sectr1sp = $4173, sectr2sp = $4174, sectr3sp = $4175, sectt1hd = $4176, sectt2hd = $4177, sectt3hd = $4178, sectt1sp = $4179, sectt2sp = $4180, sectt3sp = $4181, sefin1hd = $4182, sefin2hd = $4183, sefin3hd = $4184, sefin1sp = $4185, sefin2sp = $4186, sefin3sp = $4187, secam1hd = $4188, secam2hd = $4189, secam3hd = $4190, secam1sp = $4191, secam2sp = $4192, secam3sp = $4193, seciw1hd = $4194, seciw2hd = $4195, seciw3hd = $4196, seciw1sp = $4197, seciw2sp = $4198, seciw3sp = $4199, sewks1hd = $4200, sewks2hd = $4201, sewks3hd = $4202, sewks1sp = $4203, sewks2sp = $4204, sewks3sp = $4205, senam1hd = $4206, senam2hd = $4207, senam3hd = $4208, senam1sp = $4209, senam2sp = $4210, senam3sp = $4211, seiin1hd = $4212, seiin2hd = $4213, seiin3hd = $4214, seiin1sp = $4215, seiin2sp = $4216, seiin3sp = $4217, senil1hd = $4218, senil2hd = $4219, senil3hd = $4220, senil1sp = $4221, senil2sp = $4222, senil3sp = $4223, senir1hd = $4224, senir2hd = $4225, senir3hd = $4226, senir1sp = $4227, senir2sp = $4228, senir3sp = $4229, psenr1hd = $4230, psenr2hd = $4231, psenr3hd = $4232, psenr1sp = $4233, psenr2sp = $4234, psenr3sp = $4235, setax1hd = $4236, setax2hd = $4237, setax3hd = $4238, setax1sp = $4239, setax2sp = $4240, setax3sp = $4241, smpam1hd = $4242, smpam2hd = $4243, smpam3hd = $4244, smpam1sp = $4245, smpam2sp = $4246, smpam3sp = $4247, smprt1hd = $4248, smprt2hd = $4249, smprt3hd = $4250, smprt1sp = $4251, smprt2sp = $4252, smprt3sp = $4253, sole1hd = $4254, sole2hd = $4255, sole3hd = $4256, sole1sp = $4257, sole2sp = $4258, sole3sp = $4259, spamt1hd = $4260, spamt2hd = $4261, spamt3hd = $4262, spamt1sp = $4263, spamt2sp = $4264, spamt3sp = $4265, sppd1hd = $4266, sppd2hd = $4267, sppd3hd = $4268, sppd1sp = $4269, sppd2sp = $4270, sppd3sp = $4271, spsac1hd = $4272, spsac2hd = $4273, spsac3hd = $4274, spsac1sp = $4275, spsac2sp = $4276, spsac3sp = $4277, spuam1hd = $4278, spuam2hd = $4279, spuam3hd = $4280, spuam1sp = $4281, spuam2sp = $4282, spuam3sp = $4283, spupd1hd = $4284, spupd2hd = $4285, spupd3hd = $4286, spupd1sp = $4287, spupd2sp = $4288, spupd3sp = $4289, spusu1hd = $4290, spusu2hd = $4291, spusu3hd = $4292, spusu1sp = $4293, spusu2sp = $4294, spusu3sp = $4295, ppamt1hd = $4296, ppamt2hd = $4297, ppamt3hd = $4298, ppamt1sp = $4299, ppamt2sp = $4300, ppamt3sp = $4301, sspam1hd = $4302, sspam2hd = $4303, sspam3hd = $4304, sspam1sp = $4305, sspam2sp = $4306, sspam3sp = $4307, spsmp1hd = $4308, spsmp2hd = $4309, spsmp3hd = $4310, spsmp1sp = $4311, spsmp2sp = $4312, spsmp3sp = $4313, taxam1hd = $4314, taxam2hd = $4315, taxam3hd = $4316, taxam1sp = $4317, taxam2sp = $4318, taxam3sp = $4319, taxda1hd = $4320, taxda2hd = $4321, taxda3hd = $4322, taxda1sp = $4323, taxda2sp = $4324, taxda3sp = $4325, taxpd1hd = $4326, taxpd2hd = $4327, taxpd3hd = $4328, taxpd1sp = $4329, taxpd2sp = $4330, taxpd3sp = $4331, to1hr1hd = $4332, to1hr2hd = $4333, to1hr3hd = $4334, to1hr1sp = $4335, to1hr2sp = $4336, to1hr3sp = $4337, boinu1hd = $4338, boinu2hd = $4339, boinu3hd = $4340, boinu1sp = $4341, boinu2sp = $4342, boinu3sp = $4343, uincb1hd = $4344, uincb2hd = $4345, uincb3hd = $4346, uincb1sp = $4347, uincb2sp = $4348, uincb3sp = $4349, uded11hd = $4350, uded12hd = $4351, uded13hd = $4352, uded11sp = $4353, uded12sp = $4354, uded13sp = $4355, uded21hd = $4356, uded22hd = $4357, uded23hd = $4358, uded21sp = $4359, uded22sp = $4360, uded23sp = $4361, uded31hd = $4362, uded32hd = $4363, uded33hd = $4364, uded31sp = $4365, uded32sp = $4366, uded33sp = $4367, uded41hd = $4368, uded42hd = $4369, uded43hd = $4370, uded41sp = $4371, uded42sp = $4372, uded43sp = $4373, uded51hd = $4374, uded52hd = $4375, uded53hd = $4376, uded51sp = $4377, uded52sp = $4378, uded53sp = $4379, uded61hd = $4380, uded62hd = $4381, uded63hd = $4382, uded61sp = $4383, uded62sp = $4384, uded63sp = $4385, uded71hd = $4386, uded72hd = $4387, uded73hd = $4388, uded71sp = $4389, uded72sp = $4390, uded73sp = $4391, uded81hd = $4392, uded82hd = $4393, uded83hd = $4394, uded81sp = $4395, uded82sp = $4396, uded83sp = $4397, uded91hd = $4398, uded92hd = $4399, uded93hd = $4400, uded91sp = $4401, uded92sp = $4402, uded93sp = $4403, ugros1hd = $4404, ugros2hd = $4405, ugros3hd = $4406, ugros1sp = $4407, ugros2sp = $4408, ugros3sp = $4409, ugrsp1hd = $4410, ugrsp2hd = $4411, ugrsp3hd = $4412, ugrsp1sp = $4413, ugrsp2sp = $4414, ugrsp3sp = $4415, uinc11hd = $4416, uinc12hd = $4417, uinc13hd = $4418, uinc11sp = $4419, uinc12sp = $4420, uinc13sp = $4421, uinc21hd = $4422, uinc22hd = $4423, uinc23hd = $4424, uinc21sp = $4425, uinc22sp = $4426, uinc23sp = $4427, uinc31hd = $4428, uinc32hd = $4429, uinc33hd = $4430, uinc31sp = $4431, uinc32sp = $4432, uinc33sp = $4433, uinc41hd = $4434, uinc42hd = $4435, uinc43hd = $4436, uinc41sp = $4437, uinc42sp = $4438, uinc43sp = $4439, uinc51hd = $4440, uinc52hd = $4441, uinc53hd = $4442, uinc51sp = $4443, uinc52sp = $4444, uinc53sp = $4445, uinc61hd = $4446, uinc62hd = $4447, uinc63hd = $4448, uinc61sp = $4449, uinc62sp = $4450, uinc63sp = $4451, uinc71hd = $4452, uinc72hd = $4453, uinc73hd = $4454, uinc71sp = $4455, uinc72sp = $4456, uinc73sp = $4457, umile1hd = $4458, umile2hd = $4459, umile3hd = $4460, umile1sp = $4461, umile2sp = $4462, umile3sp = $4463, umot1hd = $4464, umot2hd = $4465, umot3hd = $4466, umot1sp = $4467, umot2sp = $4468, umot3sp = $4469, unett1hd = $4470, unett2hd = $4471, unett3hd = $4472, unett1sp = $4473, unett2sp = $4474, unett3sp = $4475, uoth11hd = $4476, uoth12hd = $4477, uoth13hd = $4478, uoth11sp = $4479, uoth12sp = $4480, uoth13sp = $4481, uoth21hd = $4482, uoth22hd = $4483, uoth23hd = $4484, uoth21sp = $4485, uoth22sp = $4486, uoth23sp = $4487, uoth31hd = $4488, uoth32hd = $4489, uoth33hd = $4490, uoth31sp = $4491, uoth32sp = $4492, uoth33sp = $4493, uoth41hd = $4494, uoth42hd = $4495, uoth43hd = $4496, uoth41sp = $4497, uoth42sp = $4498, uoth43sp = $4499, uoth51hd = $4500, uoth52hd = $4501, uoth53hd = $4502, uoth51sp = $4503, uoth52sp = $4504, uoth53sp = $4505, uoth61hd = $4506, uoth62hd = $4507, uoth63hd = $4508, uoth61sp = $4509, uoth62sp = $4510, uoth63sp = $4511, uoth71hd = $4512, uoth72hd = $4513, uoth73hd = $4514, uoth71sp = $4515, uoth72sp = $4516, uoth73sp = $4517, uoth81hd = $4518, uoth82hd = $4519, uoth83hd = $4520, uoth81sp = $4521, uoth82sp = $4522, uoth83sp = $4523, uoth91hd = $4524, uoth92hd = $4525, uoth93hd = $4526, uoth91sp = $4527, uoth92sp = $4528, uoth93sp = $4529, uot101hd = $4530, uot102hd = $4531, uot103hd = $4532, uot101sp = $4533, uot102sp = $4534, uot103sp = $4535, uotht1hd = $4536, uotht2hd = $4537, uotht3hd = $4538, uotht1sp = $4539, uotht2sp = $4540, uotht3sp = $4541, uothr1hd = $4542, uothr2hd = $4543, uothr3hd = $4544, uothr1sp = $4545, uothr2sp = $4546, uothr3sp = $4547, upay1hd = $4548, upay2hd = $4549, upay3hd = $4550, upay1sp = $4551, upay2sp = $4552, upay3sp = $4553, usapa1hd = $4554, usapa2hd = $4555, usapa3hd = $4556, usapa1sp = $4557, usapa2sp = $4558, usapa3sp = $4559, uspam1hd = $4560, uspam2hd = $4561, uspam3hd = $4562, uspam1sp = $4563, uspam2sp = $4564, uspam3sp = $4565, uspra1hd = $4566, uspra2hd = $4567, uspra3hd = $4568, uspra1sp = $4569, uspra2sp = $4570, uspra3sp = $4571, uppam1hd = $4572, uppam2hd = $4573, uppam3hd = $4574, uppam1sp = $4575, uppam2sp = $4576, uppam3sp = $4577, usspa1hd = $4578, usspa2hd = $4579, usspa3hd = $4580, usspa1sp = $4581, usspa2sp = $4582, usspa3sp = $4583, to2hr1hd = $4584, to2hr2hd = $4585, to2hr3hd = $4586, to2hr1sp = $4587, to2hr2sp = $4588, to2hr3sp = $4589, utaxa1hd = $4590, utaxa2hd = $4591, utaxa3hd = $4592, utaxa1sp = $4593, utaxa2sp = $4594, utaxa3sp = $4595, vcamt1hd = $4596, vcamt2hd = $4597, vcamt3hd = $4598, vcamt1sp = $4599, vcamt2sp = $4600, vcamt3sp = $4601, vcpd1hd = $4602, vcpd2hd = $4603, vcpd3hd = $4604, vcpd1sp = $4605, vcpd2sp = $4606, vcpd3sp = $4607, vcsac1hd = $4608, vcsac2hd = $4609, vcsac3hd = $4610, vcsac1sp = $4611, vcsac2sp = $4612, vcsac3sp = $4613, vcuam1hd = $4614, vcuam2hd = $4615, vcuam3hd = $4616, vcuam1sp = $4617, vcuam2sp = $4618, vcuam3sp = $4619, vcupd1hd = $4620, vcupd2hd = $4621, vcupd3hd = $4622, vcupd1sp = $4623, vcupd2sp = $4624, vcupd3sp = $4625, vcusu1hd = $4626, vcusu2hd = $4627, vcusu3hd = $4628, vcusu1sp = $4629, vcusu2sp = $4630, vcusu3sp = $4631, nou011hd = $4632, nou012hd = $4633, nou013hd = $4634, nou011sp = $4635, nou012sp = $4636, nou013sp = $4637, nou021hd = $4638, nou022hd = $4639, nou023hd = $4640, nou021sp = $4641, nou022sp = $4642, nou023sp = $4643, nou031hd = $4644, nou032hd = $4645, nou033hd = $4646, nou031sp = $4647, nou032sp = $4648, nou033sp = $4649, nou041hd = $4650, nou042hd = $4651, nou043hd = $4652, nou041sp = $4653, nou042sp = $4654, nou043sp = $4655, nou051hd = $4656, nou052hd = $4657, nou053hd = $4658, nou051sp = $4659, nou052sp = $4660, nou053sp = $4661, nou061hd = $4662, nou062hd = $4663, nou063hd = $4664, nou061sp = $4665, nou062sp = $4666, nou063sp = $4667, nou071hd = $4668, nou072hd = $4669, nou073hd = $4670, nou071sp = $4671, nou072sp = $4672, nou073sp = $4673, nou081hd = $4674, nou082hd = $4675, nou083hd = $4676, nou081sp = $4677, nou082sp = $4678, nou083sp = $4679, nou091hd = $4680, nou092hd = $4681, nou093hd = $4682, nou091sp = $4683, nou092sp = $4684, nou093sp = $4685, nou101hd = $4686, nou102hd = $4687, nou103hd = $4688, nou101sp = $4689, nou102sp = $4690, nou103sp = $4691, nou111hd = $4692, nou112hd = $4693, nou113hd = $4694, nou111sp = $4695, nou112sp = $4696, nou113sp = $4697, nou121hd = $4698, nou122hd = $4699, nou123hd = $4700, nou121sp = $4701, nou122sp = $4702, nou123sp = $4703, nou131hd = $4704, nou132hd = $4705, nou133hd = $4706, nou131sp = $4707, nou132sp = $4708, nou133sp = $4709, nou141hd = $4710, nou142hd = $4711, nou143hd = $4712, nou141sp = $4713, nou142sp = $4714, nou143sp = $4715, worka1hd = $4716, worka2hd = $4717, worka3hd = $4718, worka1sp = $4719, worka2sp = $4720, worka3sp = $4721, workm1hd = $4722, workm2hd = $4723, workm3hd = $4724, workm1sp = $4725, workm2sp = $4726, workm3sp = $4727, worky1hd = $4728, worky2hd = $4729, worky3hd = $4730, worky1sp = $4731, worky2sp = $4732, worky3sp = $4733, yjchg1hd = $4734, yjchg2hd = $4735, yjchg3hd = $4736, yjchg1sp = $4737, yjchg2sp = $4738, yjchg3sp = $4739, mp1hd = $4740, mp2hd = $4741, mp3hd = $4742, mp1sp = $4743, mp2sp = $4744, mp3sp = $4745, mrar11hd = $4746, mrar12hd = $4747, mrar13hd = $4748, mrar11sp = $4749, mrar12sp = $4750, mrar13sp = $4751, mrar21hd = $4752, mrar22hd = $4753, mrar23hd = $4754, mrar21sp = $4755, mrar22sp = $4756, mrar23sp = $4757, mrar31hd = $4758, mrar32hd = $4759, mrar33hd = $4760, mrar31sp = $4761, mrar32sp = $4762, mrar33sp = $4763, mrar41hd = $4764, mrar42hd = $4765, mrar43hd = $4766, mrar41sp = $4767, mrar42sp = $4768, mrar43sp = $4769, mrar51hd = $4770, mrar52hd = $4771, mrar53hd = $4772, mrar51sp = $4773, mrar52sp = $4774, mrar53sp = $4775, mpnch1hd = $4776, mpnch2hd = $4777, mpnch3hd = $4778, mpnch1sp = $4779, mpnch2sp = $4780, mpnch3sp = $4781, pmp1hd = $4782, pmp2hd = $4783, pmp3hd = $4784, pmp1sp = $4785, pmp2sp = $4786, pmp3sp = $4787, ump1hd = $4788, ump2hd = $4789, ump3hd = $4790, ump1sp = $4791, ump2sp = $4792, ump3sp = $4793, pump1hd = $4794, pump2hd = $4795, pump3hd = $4796, pump1sp = $4797, pump2sp = $4798, pump3sp = $4799, isump1hd = $4800, isump2hd = $4801, isump3hd = $4802, isump1sp = $4803, isump2sp = $4804, isump3sp = $4805, jobst1hd = $4806, jobst2hd = $4807, jobst1sp = $4808, jobst2sp = $4809, oddtp1hd = $4810, oddtp2hd = $4811, oddtp1sp = $4812, oddtp2sp = $4813, oddjb1hd = $4814, oddjb2hd = $4815, oddjb1sp = $4816, oddjb2sp = $4817, oddjn1hd = $4818, oddjn2hd = $4819, oddjn1sp = $4820, oddjn2sp = $4821, poth1hd = $4822, poth2hd = $4823, poth3hd = $4824, poth4hd = $4825, poth5hd = $4826, poth6hd = $4827, poth7hd = $4828, poth8hd = $4829, poth9hd = $4830, poth10hd = $4831, poth11hd = $4832, poth12hd = $4833, poth13hd = $4834, poth14hd = $4835, poth15hd = $4836, poth16hd = $4837, poth17hd = $4838, poth18hd = $4839, poth19hd = $4840, poth1sp = $4841, poth2sp = $4842, poth3sp = $4843, poth4sp = $4844, poth5sp = $4845, poth6sp = $4846, poth7sp = $4847, poth8sp = $4848, poth9sp = $4849, poth10sp = $4850, poth11sp = $4851, poth12sp = $4852, poth13sp = $4853, poth14sp = $4854, poth15sp = $4855, poth16sp = $4856, poth17sp = $4857, poth18sp = $4858, poth19sp = $4859, ocpen1hd = $4860, ocpen2hd = $4861, ocpen3hd = $4862, ocpen4hd = $4863, wpen1hd = $4864, wpen2hd = $4865, wpen3hd = $4866, ppen1hd = $4867, ppen2hd = $4868, ppen3hd = $4869, tupen1hd = $4870, tupen2hd = $4871, anpen1hd = $4872, anpen2hd = $4873, anpen3hd = $4874, trust1hd = $4875, trust2hd = $4876, expen1hd = $4877, expen2hd = $4878, ocpen1sp = $4879, ocpen2sp = $4880, ocpen3sp = $4881, ocpen4sp = $4882, wpen1sp = $4883, wpen2sp = $4884, wpen3sp = $4885, ppen1sp = $4886, ppen2sp = $4887, ppen3sp = $4888, tupen1sp = $4889, tupen2sp = $4890, anpen1sp = $4891, anpen2sp = $4892, anpen3sp = $4893, trust1sp = $4894, trust2sp = $4895, expen1sp = $4896, expen2sp = $4897, pcpen1hd = $4898, pcpen2hd = $4899, pcpen3hd = $4900, pcpen4hd = $4901, pwpen1hd = $4902, pwpen2hd = $4903, pwpen3hd = $4904, pppen1hd = $4905, pppen2hd = $4906, pppen3hd = $4907, ptupn1hd = $4908, ptupn2hd = $4909, panpn1hd = $4910, panpn2hd = $4911, panpn3hd = $4912, ptrst1hd = $4913, ptrst2hd = $4914, pxpen1hd = $4915, pxpen2hd = $4916, pcpen1sp = $4917, pcpen2sp = $4918, pcpen3sp = $4919, pcpen4sp = $4920, pwpen1sp = $4921, pwpen2sp = $4922, pwpen3sp = $4923, pppen1sp = $4924, pppen2sp = $4925, pppen3sp = $4926, ptupn1sp = $4927, ptupn2sp = $4928, panpn1sp = $4929, panpn2sp = $4930, panpn3sp = $4931, ptrst1sp = $4932, ptrst2sp = $4933, pxpen1sp = $4934, pxpen2sp = $4935, ocptd1hd = $4936, ocptd2hd = $4937, ocptd3hd = $4938, ocptd4hd = $4939, wpptd1hd = $4940, wpptd2hd = $4941, wpptd3hd = $4942, ppetd1hd = $4943, ppetd2hd = $4944, ppetd3hd = $4945, tuptd1hd = $4946, tuptd2hd = $4947, aptd1hd = $4948, aptd2hd = $4949, aptd3hd = $4950, trutd1hd = $4951, trutd2hd = $4952, exptd1hd = $4953, exptd2hd = $4954, ocptd1sp = $4955, ocptd2sp = $4956, ocptd3sp = $4957, ocptd4sp = $4958, wpptd1sp = $4959, wpptd2sp = $4960, wpptd3sp = $4961, ppetd1sp = $4962, ppetd2sp = $4963, ppetd3sp = $4964, tuptd1sp = $4965, tuptd2sp = $4966, aptd1sp = $4967, aptd2sp = $4968, aptd3sp = $4969, trutd1sp = $4970, trutd2sp = $4971, exptd1sp = $4972, exptd2sp = $4973, ocpid1hd = $4974, ocpid2hd = $4975, ocpid3hd = $4976, ocpid4hd = $4977, wwpid1hd = $4978, wwpid2hd = $4979, wwpid3hd = $4980, ppeid1hd = $4981, ppeid2hd = $4982, ppeid3hd = $4983, tupid1hd = $4984, tupid2hd = $4985, apid1hd = $4986, apid2hd = $4987, apid3hd = $4988, truid1hd = $4989, truid2hd = $4990, expid1hd = $4991, expid2hd = $4992, ocpid1sp = $4993, ocpid2sp = $4994, ocpid3sp = $4995, ocpid4sp = $4996, wwpid1sp = $4997, wwpid2sp = $4998, wwpid3sp = $4999, ppeid1sp = $5000, ppeid2sp = $5001, ppeid3sp = $5002, tupid1sp = $5003, tupid2sp = $5004, apid1sp = $5005, apid2sp = $5006, apid3sp = $5007, truid1sp = $5008, truid2sp = $5009, expid1sp = $5010, expid2sp = $5011, ocptx1hd = $5012, ocptx2hd = $5013, ocptx3hd = $5014, ocptx4hd = $5015, wptx1hd = $5016, wpptx2hd = $5017, wpptx3hd = $5018, ppetx1hd = $5019, ppetx2hd = $5020, ppetx3hd = $5021, tuptx1hd = $5022, tuptx2hd = $5023, aptx1hd = $5024, aptx2hd = $5025, aptx3hd = $5026, ttrtx1hd = $5027, ttrtx2hd = $5028, exptx1hd = $5029, exptx2hd = $5030, ocptx1sp = $5031, ocptx2sp = $5032, ocptx3sp = $5033, ocptx4sp = $5034, wptx1sp = $5035, wpptx2sp = $5036, wpptx3sp = $5037, ppetx1sp = $5038, ppetx2sp = $5039, ppetx3sp = $5040, tuptx1sp = $5041, tuptx2sp = $5042, aptx1sp = $5043, aptx2sp = $5044, aptx3sp = $5045, ttrtx1sp = $5046, ttrtx2sp = $5047, exptx1sp = $5048, exptx2sp = $5049, ocpoa1hd = $5050, ocpoa2hd = $5051, ocpoa3hd = $5052, ocpoa4hd = $5053, wpoa1hd = $5054, wwpoa2hd = $5055, wwpoa3hd = $5056, ppeoa1hd = $5057, ppeoa2hd = $5058, ppeoa3hd = $5059, tupoa1hd = $5060, tupoa2hd = $5061, apoa1hd = $5062, apoa2hd = $5063, apoa3hd = $5064, truoa1hd = $5065, truoa2hd = $5066, expoa1hd = $5067, expoa2hd = $5068, ocpoa1sp = $5069, ocpoa2sp = $5070, ocpoa3sp = $5071, ocpoa4sp = $5072, wpoa1sp = $5073, wwpoa2sp = $5074, wwpoa3sp = $5075, ppeoa1sp = $5076, ppeoa2sp = $5077, ppeoa3sp = $5078, tupoa1sp = $5079, tupoa2sp = $5080, apoa1sp = $5081, apoa2sp = $5082, apoa3sp = $5083, truoa1sp = $5084, truoa2sp = $5085, expoa1sp = $5086, expoa2sp = $5087, ocpoi1hd = $5088, ocpoi2hd = $5089, ocpoi3hd = $5090, ocpoi4hd = $5091, wpoi1hd = $5092, wwpoi2hd = $5093, wwpoi3hd = $5094, ppeoi1hd = $5095, ppeoi2hd = $5096, ppeoi3hd = $5097, tupoi1hd = $5098, tupoi2hd = $5099, apoi1hd = $5100, apoi2hd = $5101, apoi3hd = $5102, truoi1hd = $5103, truoi2hd = $5104, expoi1hd = $5105, expoi2hd = $5106, ocpoi1sp = $5107, ocpoi2sp = $5108, ocpoi3sp = $5109, ocpoi4sp = $5110, wpoi1sp = $5111, wwpoi2sp = $5112, wwpoi3sp = $5113, ppeoi1sp = $5114, ppeoi2sp = $5115, ppeoi3sp = $5116, tupoi1sp = $5117, tupoi2sp = $5118, apoi1sp = $5119, apoi2sp = $5120, apoi3sp = $5121, truoi1sp = $5122, truoi2sp = $5123, expoi1sp = $5124, expoi2sp = $5125, ocpta1hd = $5126, ocpta2hd = $5127, ocpta3hd = $5128, ocpta4hd = $5129, wpta1hd = $5130, wppta2hd = $5131, wppta3hd = $5132, ppeta1hd = $5133, ppeta2hd = $5134, ppeta3hd = $5135, tupta1hd = $5136, tupta2hd = $5137, apta1hd = $5138, apta2hd = $5139, apta3hd = $5140, truta1hd = $5141, truta2hd = $5142, expta1hd = $5143, expta2hd = $5144, ocpta1sp = $5145, ocpta2sp = $5146, ocpta3sp = $5147, ocpta4sp = $5148, wpta1sp = $5149, wppta2sp = $5150, wppta3sp = $5151, ppeta1sp = $5152, ppeta2sp = $5153, ppeta3sp = $5154, tupta1sp = $5155, tupta2sp = $5156, apta1sp = $5157, apta2sp = $5158, apta3sp = $5159, truta1sp = $5160, truta2sp = $5161, expta1sp = $5162, expta2sp = $5163, ocpti1hd = $5164, ocpti2hd = $5165, ocpti3hd = $5166, ocpti4hd = $5167, wpti1hd = $5168, wppti2hd = $5169, wppti3hd = $5170, ppeti1hd = $5171, ppeti2hd = $5172, ppeti3hd = $5173, tupti1hd = $5174, tupti2hd = $5175, apti1hd = $5176, apti2hd = $5177, apti3hd = $5178, truti1hd = $5179, truti2hd = $5180, expti1hd = $5181, expti2hd = $5182, ocpti1sp = $5183, ocpti2sp = $5184, ocpti3sp = $5185, ocpti4sp = $5186, wpti1sp = $5187, wppti2sp = $5188, wppti3sp = $5189, ppeti1sp = $5190, ppeti2sp = $5191, ppeti3sp = $5192, tupti1sp = $5193, tupti2sp = $5194, apti1sp = $5195, apti2sp = $5196, apti3sp = $5197, truti1sp = $5198, truti2sp = $5199, expti1sp = $5200, expti2sp = $5201, menpin11 = $5202, menpin12 = $5203, menpin13 = $5204, menpin21 = $5205, menpin22 = $5206, menpin23 = $5207, menpin31 = $5208, menpin32 = $5209, menpin33 = $5210, menpol11 = $5211, menpol12 = $5212, menpol13 = $5213, menpol21 = $5214, menpol22 = $5215, menpol23 = $5216, menpol31 = $5217, menpol32 = $5218, menpol33 = $5219, pmenpo11 = $5220, pmenpo12 = $5221, pmenpo13 = $5222, pmenpo21 = $5223, pmenpo22 = $5224, pmenpo23 = $5225, pmenpo31 = $5226, pmenpo32 = $5227, pmenpo33 = $5228, bedroom = $5229, benunits = $5230, billrate = $5231, brma = $5232, burden = $5233, busroom = $5234, capval = $5235, charge1 = $5236, charge2 = $5237, charge3 = $5238, charge4 = $5239, charge5 = $5240, charge6 = $5241, charge7 = $5242, charge8 = $5243, charge9 = $5244, chins = $5245, chrgpd1 = $5246, chrgpd2 = $5247, chrgpd3 = $5248, chrgpd4 = $5249, chrgpd5 = $5250, chrgpd6 = $5251, chrgpd7 = $5252, chrgpd8 = $5253, chrgpd9 = $5254, covoths = $5255, csewamt = $5256, csewamt1 = $5257, ct25d50d = $5258, ctamt = $5259, ctannual = $5260, ctband = $5261, ctbwait = $5262, ctcondoc = $5263, ctdisc = $5264, ctinstal = $5265, ctlvband = $5266, ctlvchk = $5267, ctreb = $5268, ctrebamt = $5269, ctrebpd = $5270, cttime = $5271, cwatamt = $5272, cwatamt1 = $5273, entry1 = $5274, entry2 = $5275, entry3 = $5276, entry4 = $5277, gvtregn = $5278, gvtregno = $5279, hhldr01 = $5280, hhldr02 = $5281, hhldr03 = $5282, hhldr04 = $5283, hhldr05 = $5284, hhldr06 = $5285, hhldr07 = $5286, hhldr08 = $5287, hhldr09 = $5288, hhldr10 = $5289, hhldr11 = $5290, hhldr12 = $5291, hhldr13 = $5292, hhldr14 = $5293, hhldr97 = $5294, hhstat = $5295, hlthst = $5296, intdate = $5297, mainacc = $5298, mnthcode = $5299, monlive = $5300, multi = $5301, nicoun = $5302, nidpnd = $5303, nmrmshar = $5304, nopay = $5305, norate = $5306, onbsroom = $5307, orgid = $5308, payrate = $5309, ptbsroom = $5310, rooms = $5311, roomshr = $5312, rt2rebam = $5313, rtannual = $5314, rtcondoc = $5315, rtdpa = $5316, rtdpaamt = $5317, rtene = $5318, rteneamt = $5319, rtgen = $5320, rtinstal = $5321, rtlpa = $5322, rtlpaamt = $5323, rtothamt = $5324, rtother = $5325, rtreb = $5326, rtrebamt = $5327, rtrtramt = $5328, rttimepd = $5329, schbrk = $5330, schfrt = $5331, schmeal = $5332, schmilk = $5333, seramt1 = $5334, seramt2 = $5335, seramt3 = $5336, seramt4 = $5337, seramt5 = $5338, sercomb = $5339, serpay1 = $5340, serpay2 = $5341, serpay3 = $5342, serpay4 = $5343, serpay5 = $5344, sewamt = $5345, sewanul = $5346, sewerpay = $5347, sewsep = $5348, sewtime = $5349, shelter = $5350, sobuy = $5351, stramt1 = $5352, stramt2 = $5353, strcov = $5354, strmort = $5355, stroths = $5356, strpd1 = $5357, strpd2 = $5358, suballow = $5359, sublet = $5360, sublety = $5361, subrent = $5362, tenure = $5363, tvlic = $5364, typeacc = $5365, urb = $5366, urbrur = $5367, urindew = $5368, urinds = $5369, watamt = $5370, watanul = $5371, watermet = $5372, waterpay = $5373, watrb = $5374, wattime = $5375, whoctbot = $5376, whorsp01 = $5377, whorsp02 = $5378, whorsp03 = $5379, whorsp04 = $5380, whorsp05 = $5381, whorsp06 = $5382, whorsp07 = $5383, whorsp08 = $5384, whorsp09 = $5385, whorsp10 = $5386, whorsp11 = $5387, whorsp12 = $5388, whorsp13 = $5389, whorsp14 = $5390, whynoct = $5391, wsewamt = $5392, wsewanul = $5393, wsewtime = $5394, yearlive = $5395, yearwhc = $5396, adulth = $5397, cwatamtd = $5398, depchldh = $5399, dischha1 = $5400, dischhc1 = $5401, diswhha1 = $5402, diswhhc1 = $5403, endowpay = $5404, gbhscost = $5405, grossct = $5406, hbeninc = $5407, hbindhh = $5408, hbindhh2 = $5409, hearns = $5410, hhdisben = $5411, hhinc = $5412, hhinv = $5413, hhirben = $5414, hhnirben = $5415, hhothben = $5416, hhrent = $5417, hhrinc = $5418, hhrpinc = $5419, hhtvlic = $5420, hhtxcred = $5421, hothinc = $5422, hpeninc = $5423, hseinc = $5424, london = $5425, mortint = $5426, nihscost = $5427, penage = $5428, penhrp = $5429, ptentyp2 = $5430, servpay = $5431, struins = $5432, tentyp2 = $5433, tuhhrent = $5434, tuwatsew = $5435, watsewrt = $5436, hcgrent = $5437, hcfeudut = $5438, hcchrent = $5439, hcservch = $5440, hcmaint = $5441, hcsirent = $5442, hcfactor = $5443, hcother = $5444, hcpcomb = $5445, gvhelp = $5446, lacode = $5447, lauacode = $5448, llcare = $5449, needcare = $5450, colourtv = $5451, bwtv = $5452, serpd1 = $5453, serpd2 = $5454, serpd3 = $5455, serpd4 = $5456, serpd5 = $5457, outsam11 = $5458, outsam12 = $5459, outsam21 = $5460, outsam22 = $5461, outsam31 = $5462, outsam32 = $5463, outsin11 = $5464, outsin12 = $5465, outsin21 = $5466, outsin22 = $5467, outsin31 = $5468, outsin32 = $5469, outspa11 = $5470, outspa12 = $5471, outspa21 = $5472, outspa22 = $5473, outspa31 = $5474, outspa32 = $5475, outspd11 = $5476, outspd12 = $5477, outspd21 = $5478, outspd22 = $5479, outspd31 = $5480, outspd32 = $5481, borramt1 = $5482, borramt2 = $5483, borramt3 = $5484, endwp11 = $5485, endwp12 = $5486, endwp13 = $5487, endwp21 = $5488, endwp22 = $5489, endwp23 = $5490, endwp31 = $5491, endwp32 = $5492, endwp33 = $5493, endwp41 = $5494, endwp42 = $5495, endwp43 = $5496, endwp51 = $5497, endwp52 = $5498, endwp53 = $5499, incmin11 = $5500, incmin12 = $5501, incmin13 = $5502, incmin21 = $5503, incmin22 = $5504, incmin23 = $5505, incmin31 = $5506, incmin32 = $5507, incmin33 = $5508, incmp11 = $5509, incmp12 = $5510, incmp13 = $5511, incmp21 = $5512, incmp22 = $5513, incmp23 = $5514, incmp31 = $5515, incmp32 = $5516, incmp33 = $5517, incmpa11 = $5518, incmpa12 = $5519, incmpa13 = $5520, incmpa21 = $5521, incmpa22 = $5522, incmpa23 = $5523, incmpa31 = $5524, incmpa32 = $5525, incmpa33 = $5526, pincmp11 = $5527, pincmp12 = $5528, pincmp13 = $5529, pincmp21 = $5530, pincmp22 = $5531, pincmp23 = $5532, pincmp31 = $5533, pincmp32 = $5534, pincmp33 = $5535, intpri1 = $5536, intpri2 = $5537, intpri3 = $5538, pintrpi1 = $5539, pintrpi2 = $5540, pintrpi3 = $5541, loanyr1 = $5542, loanyr2 = $5543, loanyr3 = $5544, menpol1 = $5545, menpol2 = $5546, menpol3 = $5547, morall1 = $5548, morall2 = $5549, morall3 = $5550, morflc1 = $5551, morflc2 = $5552, morflc3 = $5553, morinp1 = $5554, morinp2 = $5555, morinp3 = $5556, pmorinp1 = $5557, pmorinp2 = $5558, pmorinp3 = $5559, morinus1 = $5560, morinus2 = $5561, morinus3 = $5562, mortend1 = $5563, mortend2 = $5564, mortend3 = $5565, mortlef1 = $5566, mortlef2 = $5567, mortlef3 = $5568, mortpro1 = $5569, mortpro2 = $5570, mortpro3 = $5571, morttyp1 = $5572, morttyp2 = $5573, morttyp3 = $5574, morupd1 = $5575, morupd2 = $5576, morupd3 = $5577, morus1 = $5578, morus2 = $5579, morus3 = $5580, mpcove11 = $5581, mpcove12 = $5582, mpcove13 = $5583, mpcove21 = $5584, mpcove22 = $5585, mpcove23 = $5586, mpcove31 = $5587, mpcove32 = $5588, mpcove33 = $5589, outsmor1 = $5590, outsmor2 = $5591, outsmor3 = $5592, rmamt1 = $5593, rmamt2 = $5594, rmamt3 = $5595, rmort1 = $5596, rmort2 = $5597, rmort3 = $5598, rmortyr1 = $5599, rmortyr2 = $5600, rmortyr3 = $5601, rmpur011 = $5602, rmpur012 = $5603, rmpur013 = $5604, rmpur021 = $5605, rmpur022 = $5606, rmpur023 = $5607, rmpur031 = $5608, rmpur032 = $5609, rmpur033 = $5610, rmpur041 = $5611, rmpur042 = $5612, rmpur043 = $5613, rmpur051 = $5614, rmpur052 = $5615, rmpur053 = $5616, rmpur061 = $5617, rmpur062 = $5618, rmpur063 = $5619, rmpur071 = $5620, rmpur072 = $5621, rmpur073 = $5622, rmpur081 = $5623, rmpur082 = $5624, rmpur083 = $5625, buyyear = $5626, purcamt = $5627, purcloan = $5628, secmpur3 = $5629, secmpur4 = $5630, secmpur1 = $5631, secmpur5 = $5632, secmpur6 = $5633, secmpur2 = $5634, secmpur7 = $5635, rexhham1 = $5636, accchk1 = $5637, rexhhwh1 = $5638, prexhha1 = $5639, accjbp10 = $5640, accjbp11 = $5641, accjbp12 = $5642, accjbp13 = $5643, accjbp14 = $5644, accjob = $5645, ctract = $5646, eligamt = $5647, eligpd = $5648, fairrent = $5649, furnish = $5650, hbenamt = $5651, hbenchk = $5652, hbenefit = $5653, hbenpd = $5654, hbenwait = $5655, hbmnth = $5656, hbrecp = $5657, hbweeks = $5658, hbyear = $5659, hbyears = $5660, landlord = $5661, niystart = $5662, othtype = $5663, rebate = $5664, rent = $5665, rentdoc = $5666, renthol = $5667, rentpd = $5668, rentpd1 = $5669, rentpd2 = $5670, resll = $5671, resll2 = $5672, serincam = $5673, tentype = $5674, weekhol = $5675, wsinc = $5676, wsincamt = $5677, ystartr = $5678, accjbp1 = $5679, accjbp2 = $5680, accjbp3 = $5681, accjbp4 = $5682, accjbp5 = $5683, accjbp6 = $5684, accjbp7 = $5685, accjbp8 = $5686, accjbp9 = $5687, rexhh = $5688, rntfull = $5689, lighting = $5690, heating = $5691, hotwater = $5692, fuelcook = $5693, tvlice = $5694, elec = $5695, gas = $5696, lsf = $5697 where user_id = $5698 and edition = $5699 and year = $5700 and sernum = $5701 and benunit = $5702"; 
   begin 
      ps := gse.Prepare( 
        query, 
        On_Server => True ); 
      return ps; 
   end Get_Prepared_Update_Statement; 


   
   
   procedure Check_Result( conn : in out gse.Database_Connection ) is
      error_msg : constant String := gse.Error( conn );
   begin
      if( error_msg /= "" )then
         Log( error_msg );
         Connection_Pool.Return_Connection( conn );
         Raise_Exception( db_commons.DB_Exception'Identity, error_msg );
      end if;
   end  Check_Result;     


   
   Next_Free_user_id_query : constant String := 
         DB_Commons.Add_Schema_To_Query( "select coalesce( max( user_id ) + 1, 1 ) from frs.frs1516", SCHEMA_NAME );
   Next_Free_user_id_ps : gse.Prepared_Statement := 
        gse.Prepare( Next_Free_user_id_query, On_Server => True );
   -- 
   -- Next highest avaiable value of user_id - useful for saving  
   --
   function Next_Free_user_id( connection : Database_Connection := null) return Integer is
      cursor              : gse.Forward_Cursor;
      ai                  : Integer;
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
   begin
      if( connection = null )then
         local_connection := Connection_Pool.Lease;
         is_local_connection := True;
      else
         local_connection := connection;          
         is_local_connection := False;
      end if;
      
      cursor.Fetch( local_connection, Next_Free_user_id_ps );
      Check_Result( local_connection );
      if( gse.Has_Row( cursor ))then
         ai := gse.Integer_Value( cursor, 0, 0 );

      end if;
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return ai;
   end Next_Free_user_id;


   Next_Free_edition_query : constant String := 
         DB_Commons.Add_Schema_To_Query( "select coalesce( max( edition ) + 1, 1 ) from frs.frs1516", SCHEMA_NAME );
   Next_Free_edition_ps : gse.Prepared_Statement := 
        gse.Prepare( Next_Free_edition_query, On_Server => True );
   -- 
   -- Next highest avaiable value of edition - useful for saving  
   --
   function Next_Free_edition( connection : Database_Connection := null) return Integer is
      cursor              : gse.Forward_Cursor;
      ai                  : Integer;
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
   begin
      if( connection = null )then
         local_connection := Connection_Pool.Lease;
         is_local_connection := True;
      else
         local_connection := connection;          
         is_local_connection := False;
      end if;
      
      cursor.Fetch( local_connection, Next_Free_edition_ps );
      Check_Result( local_connection );
      if( gse.Has_Row( cursor ))then
         ai := gse.Integer_Value( cursor, 0, 0 );

      end if;
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return ai;
   end Next_Free_edition;


   Next_Free_year_query : constant String := 
         DB_Commons.Add_Schema_To_Query( "select coalesce( max( year ) + 1, 1 ) from frs.frs1516", SCHEMA_NAME );
   Next_Free_year_ps : gse.Prepared_Statement := 
        gse.Prepare( Next_Free_year_query, On_Server => True );
   -- 
   -- Next highest avaiable value of year - useful for saving  
   --
   function Next_Free_year( connection : Database_Connection := null) return Integer is
      cursor              : gse.Forward_Cursor;
      ai                  : Integer;
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
   begin
      if( connection = null )then
         local_connection := Connection_Pool.Lease;
         is_local_connection := True;
      else
         local_connection := connection;          
         is_local_connection := False;
      end if;
      
      cursor.Fetch( local_connection, Next_Free_year_ps );
      Check_Result( local_connection );
      if( gse.Has_Row( cursor ))then
         ai := gse.Integer_Value( cursor, 0, 0 );

      end if;
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return ai;
   end Next_Free_year;


   Next_Free_sernum_query : constant String := 
         DB_Commons.Add_Schema_To_Query( "select coalesce( max( sernum ) + 1, 1 ) from frs.frs1516", SCHEMA_NAME );
   Next_Free_sernum_ps : gse.Prepared_Statement := 
        gse.Prepare( Next_Free_sernum_query, On_Server => True );
   -- 
   -- Next highest avaiable value of sernum - useful for saving  
   --
   function Next_Free_sernum( connection : Database_Connection := null) return Sernum_Value is
      cursor              : gse.Forward_Cursor;
      ai                  : Sernum_Value;
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
   begin
      if( connection = null )then
         local_connection := Connection_Pool.Lease;
         is_local_connection := True;
      else
         local_connection := connection;          
         is_local_connection := False;
      end if;
      
      cursor.Fetch( local_connection, Next_Free_sernum_ps );
      Check_Result( local_connection );
      if( gse.Has_Row( cursor ))then
         ai := Sernum_Value'Value( gse.Value( cursor, 0 ));

      end if;
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return ai;
   end Next_Free_sernum;


   Next_Free_benunit_query : constant String := 
         DB_Commons.Add_Schema_To_Query( "select coalesce( max( benunit ) + 1, 1 ) from frs.frs1516", SCHEMA_NAME );
   Next_Free_benunit_ps : gse.Prepared_Statement := 
        gse.Prepare( Next_Free_benunit_query, On_Server => True );
   -- 
   -- Next highest avaiable value of benunit - useful for saving  
   --
   function Next_Free_benunit( connection : Database_Connection := null) return Integer is
      cursor              : gse.Forward_Cursor;
      ai                  : Integer;
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
   begin
      if( connection = null )then
         local_connection := Connection_Pool.Lease;
         is_local_connection := True;
      else
         local_connection := connection;          
         is_local_connection := False;
      end if;
      
      cursor.Fetch( local_connection, Next_Free_benunit_ps );
      Check_Result( local_connection );
      if( gse.Has_Row( cursor ))then
         ai := gse.Integer_Value( cursor, 0, 0 );

      end if;
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return ai;
   end Next_Free_benunit;



   --
   -- returns true if the primary key parts of Ukds.Frs.Frs1516 match the defaults in Ukds.Frs.Null_Frs1516
   --
   --
   -- Does this Ukds.Frs.Frs1516 equal the default Ukds.Frs.Null_Frs1516 ?
   --
   function Is_Null( a_frs1516 : Frs1516 ) return Boolean is
   begin
      return a_frs1516 = Ukds.Frs.Null_Frs1516;
   end Is_Null;


   
   --
   -- returns the single Ukds.Frs.Frs1516 matching the primary key fields, or the Ukds.Frs.Null_Frs1516 record
   -- if no such record exists
   --
   function Retrieve_By_PK( user_id : Integer; edition : Integer; year : Integer; sernum : Sernum_Value; benunit : Integer; connection : Database_Connection := null ) return Ukds.Frs.Frs1516 is
      l : Ukds.Frs.Frs1516_List;
      a_frs1516 : Ukds.Frs.Frs1516;
      c : d.Criteria;
   begin      
      Add_user_id( c, user_id );
      Add_edition( c, edition );
      Add_year( c, year );
      Add_sernum( c, sernum );
      Add_benunit( c, benunit );
      l := Retrieve( c, connection );
      if( not Ukds.Frs.Frs1516_List_Package.is_empty( l ) ) then
         a_frs1516 := Ukds.Frs.Frs1516_List_Package.First_Element( l );
      else
         a_frs1516 := Ukds.Frs.Null_Frs1516;
      end if;
      return a_frs1516;
   end Retrieve_By_PK;


   --
   -- Returns true if record with the given primary key exists
   --
   EXISTS_PS : constant gse.Prepared_Statement := gse.Prepare( 
        "select 1 from frs.frs1516 where user_id = $1 and edition = $2 and year = $3 and sernum = $4 and benunit = $5", 
        On_Server => True );
        
   function Exists( user_id : Integer; edition : Integer; year : Integer; sernum : Sernum_Value; benunit : Integer; connection : Database_Connection := null ) return Boolean  is
      params : gse.SQL_Parameters := Get_Configured_Retrieve_Params;
      cursor : gse.Forward_Cursor;
      local_connection : Database_Connection;
      is_local_connection : Boolean;
      found : Boolean;        
   begin 
      if( connection = null )then
         local_connection := Connection_Pool.Lease;
         is_local_connection := True;
      else
         local_connection := connection;          
         is_local_connection := False;
      end if;
      params( 1 ) := "+"( Integer'Pos( user_id ));
      params( 2 ) := "+"( Integer'Pos( edition ));
      params( 3 ) := "+"( Integer'Pos( year ));
      params( 4 ) := As_Bigint( sernum );
      params( 5 ) := "+"( Integer'Pos( benunit ));
      cursor.Fetch( local_connection, EXISTS_PS, params );
      Check_Result( local_connection );
      found := gse.Has_Row( cursor );
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return found;
   end Exists;

   
   --
   -- Retrieves a list of Frs1516 matching the criteria, or throws an exception
   --
   function Retrieve( c : d.Criteria; connection : Database_Connection := null ) return Ukds.Frs.Frs1516_List is
   begin      
      return Retrieve( d.to_string( c ) );
   end Retrieve;

   
   --
   -- Retrieves a list of Frs1516 retrived by the sql string, or throws an exception
   --
   function Map_From_Cursor( cursor : gse.Forward_Cursor ) return Ukds.Frs.Frs1516 is
      a_frs1516 : Ukds.Frs.Frs1516;
   begin
      if not gse.Is_Null( cursor, 0 )then
         a_frs1516.user_id := gse.Integer_Value( cursor, 0 );
      end if;
      if not gse.Is_Null( cursor, 1 )then
         a_frs1516.edition := gse.Integer_Value( cursor, 1 );
      end if;
      if not gse.Is_Null( cursor, 2 )then
         a_frs1516.year := gse.Integer_Value( cursor, 2 );
      end if;
      if not gse.Is_Null( cursor, 3 )then
         a_frs1516.sernum := Sernum_Value'Value( gse.Value( cursor, 3 ));
      end if;
      if not gse.Is_Null( cursor, 4 )then
         a_frs1516.benunit := gse.Integer_Value( cursor, 4 );
      end if;
      if not gse.Is_Null( cursor, 5 )then
         a_frs1516.int1hd:= Amount'Value( gse.Value( cursor, 5 ));
      end if;
      if not gse.Is_Null( cursor, 6 )then
         a_frs1516.int2hd:= Amount'Value( gse.Value( cursor, 6 ));
      end if;
      if not gse.Is_Null( cursor, 7 )then
         a_frs1516.int3hd:= Amount'Value( gse.Value( cursor, 7 ));
      end if;
      if not gse.Is_Null( cursor, 8 )then
         a_frs1516.int4hd := gse.Integer_Value( cursor, 8 );
      end if;
      if not gse.Is_Null( cursor, 9 )then
         a_frs1516.int5hd:= Amount'Value( gse.Value( cursor, 9 ));
      end if;
      if not gse.Is_Null( cursor, 10 )then
         a_frs1516.int6hd:= Amount'Value( gse.Value( cursor, 10 ));
      end if;
      if not gse.Is_Null( cursor, 11 )then
         a_frs1516.int7hd:= Amount'Value( gse.Value( cursor, 11 ));
      end if;
      if not gse.Is_Null( cursor, 12 )then
         a_frs1516.int8hd:= Amount'Value( gse.Value( cursor, 12 ));
      end if;
      if not gse.Is_Null( cursor, 13 )then
         a_frs1516.int9hd := gse.Integer_Value( cursor, 13 );
      end if;
      if not gse.Is_Null( cursor, 14 )then
         a_frs1516.int10hd := gse.Integer_Value( cursor, 14 );
      end if;
      if not gse.Is_Null( cursor, 15 )then
         a_frs1516.int11hd := gse.Integer_Value( cursor, 15 );
      end if;
      if not gse.Is_Null( cursor, 16 )then
         a_frs1516.int12hd := gse.Integer_Value( cursor, 16 );
      end if;
      if not gse.Is_Null( cursor, 17 )then
         a_frs1516.int13hd := gse.Integer_Value( cursor, 17 );
      end if;
      if not gse.Is_Null( cursor, 18 )then
         a_frs1516.int14hd := gse.Integer_Value( cursor, 18 );
      end if;
      if not gse.Is_Null( cursor, 19 )then
         a_frs1516.int15hd := gse.Integer_Value( cursor, 19 );
      end if;
      if not gse.Is_Null( cursor, 20 )then
         a_frs1516.int16hd := gse.Integer_Value( cursor, 20 );
      end if;
      if not gse.Is_Null( cursor, 21 )then
         a_frs1516.int17hd := gse.Integer_Value( cursor, 21 );
      end if;
      if not gse.Is_Null( cursor, 22 )then
         a_frs1516.int18hd := gse.Integer_Value( cursor, 22 );
      end if;
      if not gse.Is_Null( cursor, 23 )then
         a_frs1516.int19hd := gse.Integer_Value( cursor, 23 );
      end if;
      if not gse.Is_Null( cursor, 24 )then
         a_frs1516.int21hd:= Amount'Value( gse.Value( cursor, 24 ));
      end if;
      if not gse.Is_Null( cursor, 25 )then
         a_frs1516.int22hd := gse.Integer_Value( cursor, 25 );
      end if;
      if not gse.Is_Null( cursor, 26 )then
         a_frs1516.int23hd := gse.Integer_Value( cursor, 26 );
      end if;
      if not gse.Is_Null( cursor, 27 )then
         a_frs1516.int24hd:= Amount'Value( gse.Value( cursor, 27 ));
      end if;
      if not gse.Is_Null( cursor, 28 )then
         a_frs1516.int25hd := gse.Integer_Value( cursor, 28 );
      end if;
      if not gse.Is_Null( cursor, 29 )then
         a_frs1516.int26hd := gse.Integer_Value( cursor, 29 );
      end if;
      if not gse.Is_Null( cursor, 30 )then
         a_frs1516.int27hd:= Amount'Value( gse.Value( cursor, 30 ));
      end if;
      if not gse.Is_Null( cursor, 31 )then
         a_frs1516.int28hd:= Amount'Value( gse.Value( cursor, 31 ));
      end if;
      if not gse.Is_Null( cursor, 32 )then
         a_frs1516.int29hd := gse.Integer_Value( cursor, 32 );
      end if;
      if not gse.Is_Null( cursor, 33 )then
         a_frs1516.int30hd := gse.Integer_Value( cursor, 33 );
      end if;
      if not gse.Is_Null( cursor, 34 )then
         a_frs1516.int1sp:= Amount'Value( gse.Value( cursor, 34 ));
      end if;
      if not gse.Is_Null( cursor, 35 )then
         a_frs1516.int2sp:= Amount'Value( gse.Value( cursor, 35 ));
      end if;
      if not gse.Is_Null( cursor, 36 )then
         a_frs1516.int3sp:= Amount'Value( gse.Value( cursor, 36 ));
      end if;
      if not gse.Is_Null( cursor, 37 )then
         a_frs1516.int4sp := gse.Integer_Value( cursor, 37 );
      end if;
      if not gse.Is_Null( cursor, 38 )then
         a_frs1516.int5sp:= Amount'Value( gse.Value( cursor, 38 ));
      end if;
      if not gse.Is_Null( cursor, 39 )then
         a_frs1516.int6sp:= Amount'Value( gse.Value( cursor, 39 ));
      end if;
      if not gse.Is_Null( cursor, 40 )then
         a_frs1516.int7sp:= Amount'Value( gse.Value( cursor, 40 ));
      end if;
      if not gse.Is_Null( cursor, 41 )then
         a_frs1516.int8sp:= Amount'Value( gse.Value( cursor, 41 ));
      end if;
      if not gse.Is_Null( cursor, 42 )then
         a_frs1516.int9sp := gse.Integer_Value( cursor, 42 );
      end if;
      if not gse.Is_Null( cursor, 43 )then
         a_frs1516.int10sp := gse.Integer_Value( cursor, 43 );
      end if;
      if not gse.Is_Null( cursor, 44 )then
         a_frs1516.int11sp := gse.Integer_Value( cursor, 44 );
      end if;
      if not gse.Is_Null( cursor, 45 )then
         a_frs1516.int12sp := gse.Integer_Value( cursor, 45 );
      end if;
      if not gse.Is_Null( cursor, 46 )then
         a_frs1516.int13sp := gse.Integer_Value( cursor, 46 );
      end if;
      if not gse.Is_Null( cursor, 47 )then
         a_frs1516.int14sp := gse.Integer_Value( cursor, 47 );
      end if;
      if not gse.Is_Null( cursor, 48 )then
         a_frs1516.int15sp := gse.Integer_Value( cursor, 48 );
      end if;
      if not gse.Is_Null( cursor, 49 )then
         a_frs1516.int16sp := gse.Integer_Value( cursor, 49 );
      end if;
      if not gse.Is_Null( cursor, 50 )then
         a_frs1516.int17sp := gse.Integer_Value( cursor, 50 );
      end if;
      if not gse.Is_Null( cursor, 51 )then
         a_frs1516.int18sp := gse.Integer_Value( cursor, 51 );
      end if;
      if not gse.Is_Null( cursor, 52 )then
         a_frs1516.int19sp := gse.Integer_Value( cursor, 52 );
      end if;
      if not gse.Is_Null( cursor, 53 )then
         a_frs1516.int21sp:= Amount'Value( gse.Value( cursor, 53 ));
      end if;
      if not gse.Is_Null( cursor, 54 )then
         a_frs1516.int22sp := gse.Integer_Value( cursor, 54 );
      end if;
      if not gse.Is_Null( cursor, 55 )then
         a_frs1516.int23sp := gse.Integer_Value( cursor, 55 );
      end if;
      if not gse.Is_Null( cursor, 56 )then
         a_frs1516.int24sp:= Amount'Value( gse.Value( cursor, 56 ));
      end if;
      if not gse.Is_Null( cursor, 57 )then
         a_frs1516.int25sp := gse.Integer_Value( cursor, 57 );
      end if;
      if not gse.Is_Null( cursor, 58 )then
         a_frs1516.int26sp := gse.Integer_Value( cursor, 58 );
      end if;
      if not gse.Is_Null( cursor, 59 )then
         a_frs1516.int27sp:= Amount'Value( gse.Value( cursor, 59 ));
      end if;
      if not gse.Is_Null( cursor, 60 )then
         a_frs1516.int28sp:= Amount'Value( gse.Value( cursor, 60 ));
      end if;
      if not gse.Is_Null( cursor, 61 )then
         a_frs1516.int29sp := gse.Integer_Value( cursor, 61 );
      end if;
      if not gse.Is_Null( cursor, 62 )then
         a_frs1516.int30sp := gse.Integer_Value( cursor, 62 );
      end if;
      if not gse.Is_Null( cursor, 63 )then
         a_frs1516.intx1hd := gse.Integer_Value( cursor, 63 );
      end if;
      if not gse.Is_Null( cursor, 64 )then
         a_frs1516.intx2hd := gse.Integer_Value( cursor, 64 );
      end if;
      if not gse.Is_Null( cursor, 65 )then
         a_frs1516.intx3hd := gse.Integer_Value( cursor, 65 );
      end if;
      if not gse.Is_Null( cursor, 66 )then
         a_frs1516.intx4hd := gse.Integer_Value( cursor, 66 );
      end if;
      if not gse.Is_Null( cursor, 67 )then
         a_frs1516.intx5hd := gse.Integer_Value( cursor, 67 );
      end if;
      if not gse.Is_Null( cursor, 68 )then
         a_frs1516.intx6hd := gse.Integer_Value( cursor, 68 );
      end if;
      if not gse.Is_Null( cursor, 69 )then
         a_frs1516.intx7hd := gse.Integer_Value( cursor, 69 );
      end if;
      if not gse.Is_Null( cursor, 70 )then
         a_frs1516.intx8hd := gse.Integer_Value( cursor, 70 );
      end if;
      if not gse.Is_Null( cursor, 71 )then
         a_frs1516.intx9hd := gse.Integer_Value( cursor, 71 );
      end if;
      if not gse.Is_Null( cursor, 72 )then
         a_frs1516.intx10hd := gse.Integer_Value( cursor, 72 );
      end if;
      if not gse.Is_Null( cursor, 73 )then
         a_frs1516.intx11hd := gse.Integer_Value( cursor, 73 );
      end if;
      if not gse.Is_Null( cursor, 74 )then
         a_frs1516.intx12hd := gse.Integer_Value( cursor, 74 );
      end if;
      if not gse.Is_Null( cursor, 75 )then
         a_frs1516.intx13hd := gse.Integer_Value( cursor, 75 );
      end if;
      if not gse.Is_Null( cursor, 76 )then
         a_frs1516.intx14hd := gse.Integer_Value( cursor, 76 );
      end if;
      if not gse.Is_Null( cursor, 77 )then
         a_frs1516.intx15hd := gse.Integer_Value( cursor, 77 );
      end if;
      if not gse.Is_Null( cursor, 78 )then
         a_frs1516.intx16hd := gse.Integer_Value( cursor, 78 );
      end if;
      if not gse.Is_Null( cursor, 79 )then
         a_frs1516.intx17hd := gse.Integer_Value( cursor, 79 );
      end if;
      if not gse.Is_Null( cursor, 80 )then
         a_frs1516.intx18hd := gse.Integer_Value( cursor, 80 );
      end if;
      if not gse.Is_Null( cursor, 81 )then
         a_frs1516.intx19hd := gse.Integer_Value( cursor, 81 );
      end if;
      if not gse.Is_Null( cursor, 82 )then
         a_frs1516.intx21hd := gse.Integer_Value( cursor, 82 );
      end if;
      if not gse.Is_Null( cursor, 83 )then
         a_frs1516.intx22hd := gse.Integer_Value( cursor, 83 );
      end if;
      if not gse.Is_Null( cursor, 84 )then
         a_frs1516.intx23hd := gse.Integer_Value( cursor, 84 );
      end if;
      if not gse.Is_Null( cursor, 85 )then
         a_frs1516.intx24hd := gse.Integer_Value( cursor, 85 );
      end if;
      if not gse.Is_Null( cursor, 86 )then
         a_frs1516.intx25hd := gse.Integer_Value( cursor, 86 );
      end if;
      if not gse.Is_Null( cursor, 87 )then
         a_frs1516.intx26hd := gse.Integer_Value( cursor, 87 );
      end if;
      if not gse.Is_Null( cursor, 88 )then
         a_frs1516.intx27hd := gse.Integer_Value( cursor, 88 );
      end if;
      if not gse.Is_Null( cursor, 89 )then
         a_frs1516.intx28hd := gse.Integer_Value( cursor, 89 );
      end if;
      if not gse.Is_Null( cursor, 90 )then
         a_frs1516.intx29hd := gse.Integer_Value( cursor, 90 );
      end if;
      if not gse.Is_Null( cursor, 91 )then
         a_frs1516.intx30hd := gse.Integer_Value( cursor, 91 );
      end if;
      if not gse.Is_Null( cursor, 92 )then
         a_frs1516.intx1sp := gse.Integer_Value( cursor, 92 );
      end if;
      if not gse.Is_Null( cursor, 93 )then
         a_frs1516.intx2sp := gse.Integer_Value( cursor, 93 );
      end if;
      if not gse.Is_Null( cursor, 94 )then
         a_frs1516.intx3sp := gse.Integer_Value( cursor, 94 );
      end if;
      if not gse.Is_Null( cursor, 95 )then
         a_frs1516.intx4sp := gse.Integer_Value( cursor, 95 );
      end if;
      if not gse.Is_Null( cursor, 96 )then
         a_frs1516.intx5sp := gse.Integer_Value( cursor, 96 );
      end if;
      if not gse.Is_Null( cursor, 97 )then
         a_frs1516.intx6sp := gse.Integer_Value( cursor, 97 );
      end if;
      if not gse.Is_Null( cursor, 98 )then
         a_frs1516.intx7sp := gse.Integer_Value( cursor, 98 );
      end if;
      if not gse.Is_Null( cursor, 99 )then
         a_frs1516.intx8sp := gse.Integer_Value( cursor, 99 );
      end if;
      if not gse.Is_Null( cursor, 100 )then
         a_frs1516.intx9sp := gse.Integer_Value( cursor, 100 );
      end if;
      if not gse.Is_Null( cursor, 101 )then
         a_frs1516.intx10sp := gse.Integer_Value( cursor, 101 );
      end if;
      if not gse.Is_Null( cursor, 102 )then
         a_frs1516.intx11sp := gse.Integer_Value( cursor, 102 );
      end if;
      if not gse.Is_Null( cursor, 103 )then
         a_frs1516.intx12sp := gse.Integer_Value( cursor, 103 );
      end if;
      if not gse.Is_Null( cursor, 104 )then
         a_frs1516.intx13sp := gse.Integer_Value( cursor, 104 );
      end if;
      if not gse.Is_Null( cursor, 105 )then
         a_frs1516.intx14sp := gse.Integer_Value( cursor, 105 );
      end if;
      if not gse.Is_Null( cursor, 106 )then
         a_frs1516.intx15sp := gse.Integer_Value( cursor, 106 );
      end if;
      if not gse.Is_Null( cursor, 107 )then
         a_frs1516.intx16sp := gse.Integer_Value( cursor, 107 );
      end if;
      if not gse.Is_Null( cursor, 108 )then
         a_frs1516.intx17sp := gse.Integer_Value( cursor, 108 );
      end if;
      if not gse.Is_Null( cursor, 109 )then
         a_frs1516.intx18sp := gse.Integer_Value( cursor, 109 );
      end if;
      if not gse.Is_Null( cursor, 110 )then
         a_frs1516.intx19sp := gse.Integer_Value( cursor, 110 );
      end if;
      if not gse.Is_Null( cursor, 111 )then
         a_frs1516.intx21sp := gse.Integer_Value( cursor, 111 );
      end if;
      if not gse.Is_Null( cursor, 112 )then
         a_frs1516.intx22sp := gse.Integer_Value( cursor, 112 );
      end if;
      if not gse.Is_Null( cursor, 113 )then
         a_frs1516.intx23sp := gse.Integer_Value( cursor, 113 );
      end if;
      if not gse.Is_Null( cursor, 114 )then
         a_frs1516.intx24sp := gse.Integer_Value( cursor, 114 );
      end if;
      if not gse.Is_Null( cursor, 115 )then
         a_frs1516.intx25sp := gse.Integer_Value( cursor, 115 );
      end if;
      if not gse.Is_Null( cursor, 116 )then
         a_frs1516.intx26sp := gse.Integer_Value( cursor, 116 );
      end if;
      if not gse.Is_Null( cursor, 117 )then
         a_frs1516.intx27sp := gse.Integer_Value( cursor, 117 );
      end if;
      if not gse.Is_Null( cursor, 118 )then
         a_frs1516.intx28sp := gse.Integer_Value( cursor, 118 );
      end if;
      if not gse.Is_Null( cursor, 119 )then
         a_frs1516.intx29sp := gse.Integer_Value( cursor, 119 );
      end if;
      if not gse.Is_Null( cursor, 120 )then
         a_frs1516.intx30sp := gse.Integer_Value( cursor, 120 );
      end if;
      if not gse.Is_Null( cursor, 121 )then
         a_frs1516.invt1hd := gse.Integer_Value( cursor, 121 );
      end if;
      if not gse.Is_Null( cursor, 122 )then
         a_frs1516.invt2hd := gse.Integer_Value( cursor, 122 );
      end if;
      if not gse.Is_Null( cursor, 123 )then
         a_frs1516.invt3hd := gse.Integer_Value( cursor, 123 );
      end if;
      if not gse.Is_Null( cursor, 124 )then
         a_frs1516.invt4hd := gse.Integer_Value( cursor, 124 );
      end if;
      if not gse.Is_Null( cursor, 125 )then
         a_frs1516.invt5hd := gse.Integer_Value( cursor, 125 );
      end if;
      if not gse.Is_Null( cursor, 126 )then
         a_frs1516.invt6hd := gse.Integer_Value( cursor, 126 );
      end if;
      if not gse.Is_Null( cursor, 127 )then
         a_frs1516.invt7hd := gse.Integer_Value( cursor, 127 );
      end if;
      if not gse.Is_Null( cursor, 128 )then
         a_frs1516.invt8hd := gse.Integer_Value( cursor, 128 );
      end if;
      if not gse.Is_Null( cursor, 129 )then
         a_frs1516.invt9hd := gse.Integer_Value( cursor, 129 );
      end if;
      if not gse.Is_Null( cursor, 130 )then
         a_frs1516.invt10hd := gse.Integer_Value( cursor, 130 );
      end if;
      if not gse.Is_Null( cursor, 131 )then
         a_frs1516.invt11hd := gse.Integer_Value( cursor, 131 );
      end if;
      if not gse.Is_Null( cursor, 132 )then
         a_frs1516.invt12hd := gse.Integer_Value( cursor, 132 );
      end if;
      if not gse.Is_Null( cursor, 133 )then
         a_frs1516.invt13hd := gse.Integer_Value( cursor, 133 );
      end if;
      if not gse.Is_Null( cursor, 134 )then
         a_frs1516.invt14hd := gse.Integer_Value( cursor, 134 );
      end if;
      if not gse.Is_Null( cursor, 135 )then
         a_frs1516.invt15hd := gse.Integer_Value( cursor, 135 );
      end if;
      if not gse.Is_Null( cursor, 136 )then
         a_frs1516.invt16hd := gse.Integer_Value( cursor, 136 );
      end if;
      if not gse.Is_Null( cursor, 137 )then
         a_frs1516.invt17hd := gse.Integer_Value( cursor, 137 );
      end if;
      if not gse.Is_Null( cursor, 138 )then
         a_frs1516.invt18hd := gse.Integer_Value( cursor, 138 );
      end if;
      if not gse.Is_Null( cursor, 139 )then
         a_frs1516.invt19hd := gse.Integer_Value( cursor, 139 );
      end if;
      if not gse.Is_Null( cursor, 140 )then
         a_frs1516.invt21hd := gse.Integer_Value( cursor, 140 );
      end if;
      if not gse.Is_Null( cursor, 141 )then
         a_frs1516.invt22hd := gse.Integer_Value( cursor, 141 );
      end if;
      if not gse.Is_Null( cursor, 142 )then
         a_frs1516.invt23hd := gse.Integer_Value( cursor, 142 );
      end if;
      if not gse.Is_Null( cursor, 143 )then
         a_frs1516.invt24hd := gse.Integer_Value( cursor, 143 );
      end if;
      if not gse.Is_Null( cursor, 144 )then
         a_frs1516.invt25hd := gse.Integer_Value( cursor, 144 );
      end if;
      if not gse.Is_Null( cursor, 145 )then
         a_frs1516.invt26hd := gse.Integer_Value( cursor, 145 );
      end if;
      if not gse.Is_Null( cursor, 146 )then
         a_frs1516.invt27hd := gse.Integer_Value( cursor, 146 );
      end if;
      if not gse.Is_Null( cursor, 147 )then
         a_frs1516.invt28hd := gse.Integer_Value( cursor, 147 );
      end if;
      if not gse.Is_Null( cursor, 148 )then
         a_frs1516.invt29hd := gse.Integer_Value( cursor, 148 );
      end if;
      if not gse.Is_Null( cursor, 149 )then
         a_frs1516.invt30hd := gse.Integer_Value( cursor, 149 );
      end if;
      if not gse.Is_Null( cursor, 150 )then
         a_frs1516.invt1sp := gse.Integer_Value( cursor, 150 );
      end if;
      if not gse.Is_Null( cursor, 151 )then
         a_frs1516.invt2sp := gse.Integer_Value( cursor, 151 );
      end if;
      if not gse.Is_Null( cursor, 152 )then
         a_frs1516.invt3sp := gse.Integer_Value( cursor, 152 );
      end if;
      if not gse.Is_Null( cursor, 153 )then
         a_frs1516.invt4sp := gse.Integer_Value( cursor, 153 );
      end if;
      if not gse.Is_Null( cursor, 154 )then
         a_frs1516.invt5sp := gse.Integer_Value( cursor, 154 );
      end if;
      if not gse.Is_Null( cursor, 155 )then
         a_frs1516.invt6sp := gse.Integer_Value( cursor, 155 );
      end if;
      if not gse.Is_Null( cursor, 156 )then
         a_frs1516.invt7sp := gse.Integer_Value( cursor, 156 );
      end if;
      if not gse.Is_Null( cursor, 157 )then
         a_frs1516.invt8sp := gse.Integer_Value( cursor, 157 );
      end if;
      if not gse.Is_Null( cursor, 158 )then
         a_frs1516.invt9sp := gse.Integer_Value( cursor, 158 );
      end if;
      if not gse.Is_Null( cursor, 159 )then
         a_frs1516.invt10sp := gse.Integer_Value( cursor, 159 );
      end if;
      if not gse.Is_Null( cursor, 160 )then
         a_frs1516.invt11sp := gse.Integer_Value( cursor, 160 );
      end if;
      if not gse.Is_Null( cursor, 161 )then
         a_frs1516.invt12sp := gse.Integer_Value( cursor, 161 );
      end if;
      if not gse.Is_Null( cursor, 162 )then
         a_frs1516.invt13sp := gse.Integer_Value( cursor, 162 );
      end if;
      if not gse.Is_Null( cursor, 163 )then
         a_frs1516.invt14sp := gse.Integer_Value( cursor, 163 );
      end if;
      if not gse.Is_Null( cursor, 164 )then
         a_frs1516.invt15sp := gse.Integer_Value( cursor, 164 );
      end if;
      if not gse.Is_Null( cursor, 165 )then
         a_frs1516.invt16sp := gse.Integer_Value( cursor, 165 );
      end if;
      if not gse.Is_Null( cursor, 166 )then
         a_frs1516.invt17sp := gse.Integer_Value( cursor, 166 );
      end if;
      if not gse.Is_Null( cursor, 167 )then
         a_frs1516.invt18sp := gse.Integer_Value( cursor, 167 );
      end if;
      if not gse.Is_Null( cursor, 168 )then
         a_frs1516.invt19sp := gse.Integer_Value( cursor, 168 );
      end if;
      if not gse.Is_Null( cursor, 169 )then
         a_frs1516.invt21sp := gse.Integer_Value( cursor, 169 );
      end if;
      if not gse.Is_Null( cursor, 170 )then
         a_frs1516.invt22sp := gse.Integer_Value( cursor, 170 );
      end if;
      if not gse.Is_Null( cursor, 171 )then
         a_frs1516.invt23sp := gse.Integer_Value( cursor, 171 );
      end if;
      if not gse.Is_Null( cursor, 172 )then
         a_frs1516.invt24sp := gse.Integer_Value( cursor, 172 );
      end if;
      if not gse.Is_Null( cursor, 173 )then
         a_frs1516.invt25sp := gse.Integer_Value( cursor, 173 );
      end if;
      if not gse.Is_Null( cursor, 174 )then
         a_frs1516.invt26sp := gse.Integer_Value( cursor, 174 );
      end if;
      if not gse.Is_Null( cursor, 175 )then
         a_frs1516.invt27sp := gse.Integer_Value( cursor, 175 );
      end if;
      if not gse.Is_Null( cursor, 176 )then
         a_frs1516.invt28sp := gse.Integer_Value( cursor, 176 );
      end if;
      if not gse.Is_Null( cursor, 177 )then
         a_frs1516.invt29sp := gse.Integer_Value( cursor, 177 );
      end if;
      if not gse.Is_Null( cursor, 178 )then
         a_frs1516.invt30sp := gse.Integer_Value( cursor, 178 );
      end if;
      if not gse.Is_Null( cursor, 179 )then
         a_frs1516.nsa1hd := gse.Integer_Value( cursor, 179 );
      end if;
      if not gse.Is_Null( cursor, 180 )then
         a_frs1516.nsa2hd := gse.Integer_Value( cursor, 180 );
      end if;
      if not gse.Is_Null( cursor, 181 )then
         a_frs1516.nsa3hd := gse.Integer_Value( cursor, 181 );
      end if;
      if not gse.Is_Null( cursor, 182 )then
         a_frs1516.nsa4hd := gse.Integer_Value( cursor, 182 );
      end if;
      if not gse.Is_Null( cursor, 183 )then
         a_frs1516.nsa5hd := gse.Integer_Value( cursor, 183 );
      end if;
      if not gse.Is_Null( cursor, 184 )then
         a_frs1516.nsa6hd := gse.Integer_Value( cursor, 184 );
      end if;
      if not gse.Is_Null( cursor, 185 )then
         a_frs1516.nsa7hd := gse.Integer_Value( cursor, 185 );
      end if;
      if not gse.Is_Null( cursor, 186 )then
         a_frs1516.nsa8hd := gse.Integer_Value( cursor, 186 );
      end if;
      if not gse.Is_Null( cursor, 187 )then
         a_frs1516.nsa9hd := gse.Integer_Value( cursor, 187 );
      end if;
      if not gse.Is_Null( cursor, 188 )then
         a_frs1516.nsa10hd := gse.Integer_Value( cursor, 188 );
      end if;
      if not gse.Is_Null( cursor, 189 )then
         a_frs1516.nsa11hd := gse.Integer_Value( cursor, 189 );
      end if;
      if not gse.Is_Null( cursor, 190 )then
         a_frs1516.nsa12hd := gse.Integer_Value( cursor, 190 );
      end if;
      if not gse.Is_Null( cursor, 191 )then
         a_frs1516.nsa13hd := gse.Integer_Value( cursor, 191 );
      end if;
      if not gse.Is_Null( cursor, 192 )then
         a_frs1516.nsa14hd := gse.Integer_Value( cursor, 192 );
      end if;
      if not gse.Is_Null( cursor, 193 )then
         a_frs1516.nsa15hd := gse.Integer_Value( cursor, 193 );
      end if;
      if not gse.Is_Null( cursor, 194 )then
         a_frs1516.nsa16hd := gse.Integer_Value( cursor, 194 );
      end if;
      if not gse.Is_Null( cursor, 195 )then
         a_frs1516.nsa17hd := gse.Integer_Value( cursor, 195 );
      end if;
      if not gse.Is_Null( cursor, 196 )then
         a_frs1516.nsa18hd := gse.Integer_Value( cursor, 196 );
      end if;
      if not gse.Is_Null( cursor, 197 )then
         a_frs1516.nsa19hd := gse.Integer_Value( cursor, 197 );
      end if;
      if not gse.Is_Null( cursor, 198 )then
         a_frs1516.nsa21hd := gse.Integer_Value( cursor, 198 );
      end if;
      if not gse.Is_Null( cursor, 199 )then
         a_frs1516.nsa22hd := gse.Integer_Value( cursor, 199 );
      end if;
      if not gse.Is_Null( cursor, 200 )then
         a_frs1516.nsa23hd := gse.Integer_Value( cursor, 200 );
      end if;
      if not gse.Is_Null( cursor, 201 )then
         a_frs1516.nsa24hd := gse.Integer_Value( cursor, 201 );
      end if;
      if not gse.Is_Null( cursor, 202 )then
         a_frs1516.nsa25hd := gse.Integer_Value( cursor, 202 );
      end if;
      if not gse.Is_Null( cursor, 203 )then
         a_frs1516.nsa26hd := gse.Integer_Value( cursor, 203 );
      end if;
      if not gse.Is_Null( cursor, 204 )then
         a_frs1516.nsa27hd := gse.Integer_Value( cursor, 204 );
      end if;
      if not gse.Is_Null( cursor, 205 )then
         a_frs1516.nsa28hd := gse.Integer_Value( cursor, 205 );
      end if;
      if not gse.Is_Null( cursor, 206 )then
         a_frs1516.nsa29hd := gse.Integer_Value( cursor, 206 );
      end if;
      if not gse.Is_Null( cursor, 207 )then
         a_frs1516.nsa30hd := gse.Integer_Value( cursor, 207 );
      end if;
      if not gse.Is_Null( cursor, 208 )then
         a_frs1516.nsa1sp := gse.Integer_Value( cursor, 208 );
      end if;
      if not gse.Is_Null( cursor, 209 )then
         a_frs1516.nsa2sp := gse.Integer_Value( cursor, 209 );
      end if;
      if not gse.Is_Null( cursor, 210 )then
         a_frs1516.nsa3sp := gse.Integer_Value( cursor, 210 );
      end if;
      if not gse.Is_Null( cursor, 211 )then
         a_frs1516.nsa4sp := gse.Integer_Value( cursor, 211 );
      end if;
      if not gse.Is_Null( cursor, 212 )then
         a_frs1516.nsa5sp := gse.Integer_Value( cursor, 212 );
      end if;
      if not gse.Is_Null( cursor, 213 )then
         a_frs1516.nsa6sp := gse.Integer_Value( cursor, 213 );
      end if;
      if not gse.Is_Null( cursor, 214 )then
         a_frs1516.nsa7sp := gse.Integer_Value( cursor, 214 );
      end if;
      if not gse.Is_Null( cursor, 215 )then
         a_frs1516.nsa8sp := gse.Integer_Value( cursor, 215 );
      end if;
      if not gse.Is_Null( cursor, 216 )then
         a_frs1516.nsa9sp := gse.Integer_Value( cursor, 216 );
      end if;
      if not gse.Is_Null( cursor, 217 )then
         a_frs1516.nsa10sp := gse.Integer_Value( cursor, 217 );
      end if;
      if not gse.Is_Null( cursor, 218 )then
         a_frs1516.nsa11sp := gse.Integer_Value( cursor, 218 );
      end if;
      if not gse.Is_Null( cursor, 219 )then
         a_frs1516.nsa12sp := gse.Integer_Value( cursor, 219 );
      end if;
      if not gse.Is_Null( cursor, 220 )then
         a_frs1516.nsa13sp := gse.Integer_Value( cursor, 220 );
      end if;
      if not gse.Is_Null( cursor, 221 )then
         a_frs1516.nsa14sp := gse.Integer_Value( cursor, 221 );
      end if;
      if not gse.Is_Null( cursor, 222 )then
         a_frs1516.nsa15sp := gse.Integer_Value( cursor, 222 );
      end if;
      if not gse.Is_Null( cursor, 223 )then
         a_frs1516.nsa16sp := gse.Integer_Value( cursor, 223 );
      end if;
      if not gse.Is_Null( cursor, 224 )then
         a_frs1516.nsa17sp := gse.Integer_Value( cursor, 224 );
      end if;
      if not gse.Is_Null( cursor, 225 )then
         a_frs1516.nsa18sp := gse.Integer_Value( cursor, 225 );
      end if;
      if not gse.Is_Null( cursor, 226 )then
         a_frs1516.nsa19sp := gse.Integer_Value( cursor, 226 );
      end if;
      if not gse.Is_Null( cursor, 227 )then
         a_frs1516.nsa21sp := gse.Integer_Value( cursor, 227 );
      end if;
      if not gse.Is_Null( cursor, 228 )then
         a_frs1516.nsa22sp := gse.Integer_Value( cursor, 228 );
      end if;
      if not gse.Is_Null( cursor, 229 )then
         a_frs1516.nsa23sp := gse.Integer_Value( cursor, 229 );
      end if;
      if not gse.Is_Null( cursor, 230 )then
         a_frs1516.nsa24sp := gse.Integer_Value( cursor, 230 );
      end if;
      if not gse.Is_Null( cursor, 231 )then
         a_frs1516.nsa25sp := gse.Integer_Value( cursor, 231 );
      end if;
      if not gse.Is_Null( cursor, 232 )then
         a_frs1516.nsa26sp := gse.Integer_Value( cursor, 232 );
      end if;
      if not gse.Is_Null( cursor, 233 )then
         a_frs1516.nsa27sp := gse.Integer_Value( cursor, 233 );
      end if;
      if not gse.Is_Null( cursor, 234 )then
         a_frs1516.nsa28sp := gse.Integer_Value( cursor, 234 );
      end if;
      if not gse.Is_Null( cursor, 235 )then
         a_frs1516.nsa29sp := gse.Integer_Value( cursor, 235 );
      end if;
      if not gse.Is_Null( cursor, 236 )then
         a_frs1516.nsa30sp := gse.Integer_Value( cursor, 236 );
      end if;
      if not gse.Is_Null( cursor, 237 )then
         a_frs1516.ablehd := gse.Integer_Value( cursor, 237 );
      end if;
      if not gse.Is_Null( cursor, 238 )then
         a_frs1516.ablesp := gse.Integer_Value( cursor, 238 );
      end if;
      if not gse.Is_Null( cursor, 239 )then
         a_frs1516.abs1pdhd := gse.Integer_Value( cursor, 239 );
      end if;
      if not gse.Is_Null( cursor, 240 )then
         a_frs1516.abs1pdsp := gse.Integer_Value( cursor, 240 );
      end if;
      if not gse.Is_Null( cursor, 241 )then
         a_frs1516.absparhd := gse.Integer_Value( cursor, 241 );
      end if;
      if not gse.Is_Null( cursor, 242 )then
         a_frs1516.absparsp := gse.Integer_Value( cursor, 242 );
      end if;
      if not gse.Is_Null( cursor, 243 )then
         a_frs1516.abspayhd := gse.Integer_Value( cursor, 243 );
      end if;
      if not gse.Is_Null( cursor, 244 )then
         a_frs1516.abspaysp := gse.Integer_Value( cursor, 244 );
      end if;
      if not gse.Is_Null( cursor, 245 )then
         a_frs1516.abswhyhd := gse.Integer_Value( cursor, 245 );
      end if;
      if not gse.Is_Null( cursor, 246 )then
         a_frs1516.abswhysp := gse.Integer_Value( cursor, 246 );
      end if;
      if not gse.Is_Null( cursor, 247 )then
         a_frs1516.abswkhd := gse.Integer_Value( cursor, 247 );
      end if;
      if not gse.Is_Null( cursor, 248 )then
         a_frs1516.abswksp := gse.Integer_Value( cursor, 248 );
      end if;
      if not gse.Is_Null( cursor, 249 )then
         a_frs1516.acshd := gse.Integer_Value( cursor, 249 );
      end if;
      if not gse.Is_Null( cursor, 250 )then
         a_frs1516.acssp := gse.Integer_Value( cursor, 250 );
      end if;
      if not gse.Is_Null( cursor, 251 )then
         a_frs1516.acctqhd := gse.Integer_Value( cursor, 251 );
      end if;
      if not gse.Is_Null( cursor, 252 )then
         a_frs1516.acctqsp := gse.Integer_Value( cursor, 252 );
      end if;
      if not gse.Is_Null( cursor, 253 )then
         a_frs1516.acsamthd:= Amount'Value( gse.Value( cursor, 253 ));
      end if;
      if not gse.Is_Null( cursor, 254 )then
         a_frs1516.acsamtsp:= Amount'Value( gse.Value( cursor, 254 ));
      end if;
      if not gse.Is_Null( cursor, 255 )then
         a_frs1516.acspdhd := gse.Integer_Value( cursor, 255 );
      end if;
      if not gse.Is_Null( cursor, 256 )then
         a_frs1516.acspdsp := gse.Integer_Value( cursor, 256 );
      end if;
      if not gse.Is_Null( cursor, 257 )then
         a_frs1516.actacihd := gse.Integer_Value( cursor, 257 );
      end if;
      if not gse.Is_Null( cursor, 258 )then
         a_frs1516.actacisp := gse.Integer_Value( cursor, 258 );
      end if;
      if not gse.Is_Null( cursor, 259 )then
         a_frs1516.emahd := gse.Integer_Value( cursor, 259 );
      end if;
      if not gse.Is_Null( cursor, 260 )then
         a_frs1516.emasp := gse.Integer_Value( cursor, 260 );
      end if;
      if not gse.Is_Null( cursor, 261 )then
         a_frs1516.emaamthd:= Amount'Value( gse.Value( cursor, 261 ));
      end if;
      if not gse.Is_Null( cursor, 262 )then
         a_frs1516.emaamtsp := gse.Integer_Value( cursor, 262 );
      end if;
      if not gse.Is_Null( cursor, 263 )then
         a_frs1516.emapdhd := gse.Integer_Value( cursor, 263 );
      end if;
      if not gse.Is_Null( cursor, 264 )then
         a_frs1516.emapdsp := gse.Integer_Value( cursor, 264 );
      end if;
      if not gse.Is_Null( cursor, 265 )then
         a_frs1516.agehd := gse.Integer_Value( cursor, 265 );
      end if;
      if not gse.Is_Null( cursor, 266 )then
         a_frs1516.agesp := gse.Integer_Value( cursor, 266 );
      end if;
      if not gse.Is_Null( cursor, 267 )then
         a_frs1516.agehqhd := gse.Integer_Value( cursor, 267 );
      end if;
      if not gse.Is_Null( cursor, 268 )then
         a_frs1516.agehqsp := gse.Integer_Value( cursor, 268 );
      end if;
      if not gse.Is_Null( cursor, 269 )then
         a_frs1516.aliamthd:= Amount'Value( gse.Value( cursor, 269 ));
      end if;
      if not gse.Is_Null( cursor, 270 )then
         a_frs1516.aliamtsp:= Amount'Value( gse.Value( cursor, 270 ));
      end if;
      if not gse.Is_Null( cursor, 271 )then
         a_frs1516.alimnyhd := gse.Integer_Value( cursor, 271 );
      end if;
      if not gse.Is_Null( cursor, 272 )then
         a_frs1516.alimnysp := gse.Integer_Value( cursor, 272 );
      end if;
      if not gse.Is_Null( cursor, 273 )then
         a_frs1516.alipdhd := gse.Integer_Value( cursor, 273 );
      end if;
      if not gse.Is_Null( cursor, 274 )then
         a_frs1516.alipdsp := gse.Integer_Value( cursor, 274 );
      end if;
      if not gse.Is_Null( cursor, 275 )then
         a_frs1516.aliushd := gse.Integer_Value( cursor, 275 );
      end if;
      if not gse.Is_Null( cursor, 276 )then
         a_frs1516.aliussp := gse.Integer_Value( cursor, 276 );
      end if;
      if not gse.Is_Null( cursor, 277 )then
         a_frs1516.absallhd:= Amount'Value( gse.Value( cursor, 277 ));
      end if;
      if not gse.Is_Null( cursor, 278 )then
         a_frs1516.absallsp:= Amount'Value( gse.Value( cursor, 278 ));
      end if;
      if not gse.Is_Null( cursor, 279 )then
         a_frs1516.organhd:= Amount'Value( gse.Value( cursor, 279 ));
      end if;
      if not gse.Is_Null( cursor, 280 )then
         a_frs1516.organsp:= Amount'Value( gse.Value( cursor, 280 ));
      end if;
      if not gse.Is_Null( cursor, 281 )then
         a_frs1516.fosterhd:= Amount'Value( gse.Value( cursor, 281 ));
      end if;
      if not gse.Is_Null( cursor, 282 )then
         a_frs1516.fostersp:= Amount'Value( gse.Value( cursor, 282 ));
      end if;
      if not gse.Is_Null( cursor, 283 )then
         a_frs1516.adopthd:= Amount'Value( gse.Value( cursor, 283 ));
      end if;
      if not gse.Is_Null( cursor, 284 )then
         a_frs1516.adoptsp:= Amount'Value( gse.Value( cursor, 284 ));
      end if;
      if not gse.Is_Null( cursor, 285 )then
         a_frs1516.pasbalhd := gse.Integer_Value( cursor, 285 );
      end if;
      if not gse.Is_Null( cursor, 286 )then
         a_frs1516.pasbalsp := gse.Integer_Value( cursor, 286 );
      end if;
      if not gse.Is_Null( cursor, 287 )then
         a_frs1516.porganhd := gse.Integer_Value( cursor, 287 );
      end if;
      if not gse.Is_Null( cursor, 288 )then
         a_frs1516.porgansp := gse.Integer_Value( cursor, 288 );
      end if;
      if not gse.Is_Null( cursor, 289 )then
         a_frs1516.pfostehd := gse.Integer_Value( cursor, 289 );
      end if;
      if not gse.Is_Null( cursor, 290 )then
         a_frs1516.pfostesp := gse.Integer_Value( cursor, 290 );
      end if;
      if not gse.Is_Null( cursor, 291 )then
         a_frs1516.padopthd := gse.Integer_Value( cursor, 291 );
      end if;
      if not gse.Is_Null( cursor, 292 )then
         a_frs1516.padoptsp := gse.Integer_Value( cursor, 292 );
      end if;
      if not gse.Is_Null( cursor, 293 )then
         a_frs1516.aluamthd := gse.Integer_Value( cursor, 293 );
      end if;
      if not gse.Is_Null( cursor, 294 )then
         a_frs1516.aluamtsp := gse.Integer_Value( cursor, 294 );
      end if;
      if not gse.Is_Null( cursor, 295 )then
         a_frs1516.alupdhd := gse.Integer_Value( cursor, 295 );
      end if;
      if not gse.Is_Null( cursor, 296 )then
         a_frs1516.alupdsp := gse.Integer_Value( cursor, 296 );
      end if;
      if not gse.Is_Null( cursor, 297 )then
         a_frs1516.anyacchd := gse.Integer_Value( cursor, 297 );
      end if;
      if not gse.Is_Null( cursor, 298 )then
         a_frs1516.anyaccsp := gse.Integer_Value( cursor, 298 );
      end if;
      if not gse.Is_Null( cursor, 299 )then
         a_frs1516.anyedhd := gse.Integer_Value( cursor, 299 );
      end if;
      if not gse.Is_Null( cursor, 300 )then
         a_frs1516.anyedsp := gse.Integer_Value( cursor, 300 );
      end if;
      if not gse.Is_Null( cursor, 301 )then
         a_frs1516.anymonhd := gse.Integer_Value( cursor, 301 );
      end if;
      if not gse.Is_Null( cursor, 302 )then
         a_frs1516.anymonsp := gse.Integer_Value( cursor, 302 );
      end if;
      if not gse.Is_Null( cursor, 303 )then
         a_frs1516.anype1hd := gse.Integer_Value( cursor, 303 );
      end if;
      if not gse.Is_Null( cursor, 304 )then
         a_frs1516.anype1sp := gse.Integer_Value( cursor, 304 );
      end if;
      if not gse.Is_Null( cursor, 305 )then
         a_frs1516.anype2hd := gse.Integer_Value( cursor, 305 );
      end if;
      if not gse.Is_Null( cursor, 306 )then
         a_frs1516.anype2sp := gse.Integer_Value( cursor, 306 );
      end if;
      if not gse.Is_Null( cursor, 307 )then
         a_frs1516.anype3hd := gse.Integer_Value( cursor, 307 );
      end if;
      if not gse.Is_Null( cursor, 308 )then
         a_frs1516.anype3sp := gse.Integer_Value( cursor, 308 );
      end if;
      if not gse.Is_Null( cursor, 309 )then
         a_frs1516.anype4hd := gse.Integer_Value( cursor, 309 );
      end if;
      if not gse.Is_Null( cursor, 310 )then
         a_frs1516.anype4sp := gse.Integer_Value( cursor, 310 );
      end if;
      if not gse.Is_Null( cursor, 311 )then
         a_frs1516.anype5hd := gse.Integer_Value( cursor, 311 );
      end if;
      if not gse.Is_Null( cursor, 312 )then
         a_frs1516.anype5sp := gse.Integer_Value( cursor, 312 );
      end if;
      if not gse.Is_Null( cursor, 313 )then
         a_frs1516.anype6hd := gse.Integer_Value( cursor, 313 );
      end if;
      if not gse.Is_Null( cursor, 314 )then
         a_frs1516.anype6sp := gse.Integer_Value( cursor, 314 );
      end if;
      if not gse.Is_Null( cursor, 315 )then
         a_frs1516.anype7hd := gse.Integer_Value( cursor, 315 );
      end if;
      if not gse.Is_Null( cursor, 316 )then
         a_frs1516.anype7sp := gse.Integer_Value( cursor, 316 );
      end if;
      if not gse.Is_Null( cursor, 317 )then
         a_frs1516.abspamhd:= Amount'Value( gse.Value( cursor, 317 ));
      end if;
      if not gse.Is_Null( cursor, 318 )then
         a_frs1516.abspamsp := gse.Integer_Value( cursor, 318 );
      end if;
      if not gse.Is_Null( cursor, 319 )then
         a_frs1516.abspexhd:= Amount'Value( gse.Value( cursor, 319 ));
      end if;
      if not gse.Is_Null( cursor, 320 )then
         a_frs1516.abspexsp := gse.Integer_Value( cursor, 320 );
      end if;
      if not gse.Is_Null( cursor, 321 )then
         a_frs1516.apdpdhd := gse.Integer_Value( cursor, 321 );
      end if;
      if not gse.Is_Null( cursor, 322 )then
         a_frs1516.apdpdsp := gse.Integer_Value( cursor, 322 );
      end if;
      if not gse.Is_Null( cursor, 323 )then
         a_frs1516.pabspahd := gse.Integer_Value( cursor, 323 );
      end if;
      if not gse.Is_Null( cursor, 324 )then
         a_frs1516.pabspasp := gse.Integer_Value( cursor, 324 );
      end if;
      if not gse.Is_Null( cursor, 325 )then
         a_frs1516.basacthd := gse.Integer_Value( cursor, 325 );
      end if;
      if not gse.Is_Null( cursor, 326 )then
         a_frs1516.basactsp := gse.Integer_Value( cursor, 326 );
      end if;
      if not gse.Is_Null( cursor, 327 )then
         a_frs1516.bfdhd := gse.Integer_Value( cursor, 327 );
      end if;
      if not gse.Is_Null( cursor, 328 )then
         a_frs1516.bfdsp := gse.Integer_Value( cursor, 328 );
      end if;
      if not gse.Is_Null( cursor, 329 )then
         a_frs1516.bfdamthd:= Amount'Value( gse.Value( cursor, 329 ));
      end if;
      if not gse.Is_Null( cursor, 330 )then
         a_frs1516.bfdamtsp:= Amount'Value( gse.Value( cursor, 330 ));
      end if;
      if not gse.Is_Null( cursor, 331 )then
         a_frs1516.pbfdhd := gse.Integer_Value( cursor, 331 );
      end if;
      if not gse.Is_Null( cursor, 332 )then
         a_frs1516.pbfdsp := gse.Integer_Value( cursor, 332 );
      end if;
      if not gse.Is_Null( cursor, 333 )then
         a_frs1516.bfdvalhd := gse.Integer_Value( cursor, 333 );
      end if;
      if not gse.Is_Null( cursor, 334 )then
         a_frs1516.bfdvalsp := gse.Integer_Value( cursor, 334 );
      end if;
      if not gse.Is_Null( cursor, 335 )then
         a_frs1516.careabhd := gse.Integer_Value( cursor, 335 );
      end if;
      if not gse.Is_Null( cursor, 336 )then
         a_frs1516.careabsp := gse.Integer_Value( cursor, 336 );
      end if;
      if not gse.Is_Null( cursor, 337 )then
         a_frs1516.careahhd := gse.Integer_Value( cursor, 337 );
      end if;
      if not gse.Is_Null( cursor, 338 )then
         a_frs1516.careahsp := gse.Integer_Value( cursor, 338 );
      end if;
      if not gse.Is_Null( cursor, 339 )then
         a_frs1516.carecbhd := gse.Integer_Value( cursor, 339 );
      end if;
      if not gse.Is_Null( cursor, 340 )then
         a_frs1516.carecbsp := gse.Integer_Value( cursor, 340 );
      end if;
      if not gse.Is_Null( cursor, 341 )then
         a_frs1516.carechhd := gse.Integer_Value( cursor, 341 );
      end if;
      if not gse.Is_Null( cursor, 342 )then
         a_frs1516.carechsp := gse.Integer_Value( cursor, 342 );
      end if;
      if not gse.Is_Null( cursor, 343 )then
         a_frs1516.careclhd := gse.Integer_Value( cursor, 343 );
      end if;
      if not gse.Is_Null( cursor, 344 )then
         a_frs1516.careclsp := gse.Integer_Value( cursor, 344 );
      end if;
      if not gse.Is_Null( cursor, 345 )then
         a_frs1516.careflhd := gse.Integer_Value( cursor, 345 );
      end if;
      if not gse.Is_Null( cursor, 346 )then
         a_frs1516.careflsp := gse.Integer_Value( cursor, 346 );
      end if;
      if not gse.Is_Null( cursor, 347 )then
         a_frs1516.carefrhd := gse.Integer_Value( cursor, 347 );
      end if;
      if not gse.Is_Null( cursor, 348 )then
         a_frs1516.carefrsp := gse.Integer_Value( cursor, 348 );
      end if;
      if not gse.Is_Null( cursor, 349 )then
         a_frs1516.careothd := gse.Integer_Value( cursor, 349 );
      end if;
      if not gse.Is_Null( cursor, 350 )then
         a_frs1516.careotsp := gse.Integer_Value( cursor, 350 );
      end if;
      if not gse.Is_Null( cursor, 351 )then
         a_frs1516.carerhd := gse.Integer_Value( cursor, 351 );
      end if;
      if not gse.Is_Null( cursor, 352 )then
         a_frs1516.carersp := gse.Integer_Value( cursor, 352 );
      end if;
      if not gse.Is_Null( cursor, 353 )then
         a_frs1516.cbaamthd := gse.Integer_Value( cursor, 353 );
      end if;
      if not gse.Is_Null( cursor, 354 )then
         a_frs1516.cbaamtsp := gse.Integer_Value( cursor, 354 );
      end if;
      if not gse.Is_Null( cursor, 355 )then
         a_frs1516.cbchkhd := gse.Integer_Value( cursor, 355 );
      end if;
      if not gse.Is_Null( cursor, 356 )then
         a_frs1516.cbchksp := gse.Integer_Value( cursor, 356 );
      end if;
      if not gse.Is_Null( cursor, 357 )then
         a_frs1516.changehd := gse.Integer_Value( cursor, 357 );
      end if;
      if not gse.Is_Null( cursor, 358 )then
         a_frs1516.changesp := gse.Integer_Value( cursor, 358 );
      end if;
      if not gse.Is_Null( cursor, 359 )then
         a_frs1516.chbflghd := gse.Integer_Value( cursor, 359 );
      end if;
      if not gse.Is_Null( cursor, 360 )then
         a_frs1516.chbflgsp := gse.Integer_Value( cursor, 360 );
      end if;
      if not gse.Is_Null( cursor, 361 )then
         a_frs1516.chknophd := gse.Integer_Value( cursor, 361 );
      end if;
      if not gse.Is_Null( cursor, 362 )then
         a_frs1516.chknopsp := gse.Integer_Value( cursor, 362 );
      end if;
      if not gse.Is_Null( cursor, 363 )then
         a_frs1516.fpchd := gse.Integer_Value( cursor, 363 );
      end if;
      if not gse.Is_Null( cursor, 364 )then
         a_frs1516.fpcsp := gse.Integer_Value( cursor, 364 );
      end if;
      if not gse.Is_Null( cursor, 365 )then
         a_frs1516.fuchd := gse.Integer_Value( cursor, 365 );
      end if;
      if not gse.Is_Null( cursor, 366 )then
         a_frs1516.fucsp := gse.Integer_Value( cursor, 366 );
      end if;
      if not gse.Is_Null( cursor, 367 )then
         a_frs1516.fhbhd := gse.Integer_Value( cursor, 367 );
      end if;
      if not gse.Is_Null( cursor, 368 )then
         a_frs1516.fhbsp := gse.Integer_Value( cursor, 368 );
      end if;
      if not gse.Is_Null( cursor, 369 )then
         a_frs1516.fwtchd := gse.Integer_Value( cursor, 369 );
      end if;
      if not gse.Is_Null( cursor, 370 )then
         a_frs1516.fwtcsp := gse.Integer_Value( cursor, 370 );
      end if;
      if not gse.Is_Null( cursor, 371 )then
         a_frs1516.fctchd := gse.Integer_Value( cursor, 371 );
      end if;
      if not gse.Is_Null( cursor, 372 )then
         a_frs1516.fctcsp := gse.Integer_Value( cursor, 372 );
      end if;
      if not gse.Is_Null( cursor, 373 )then
         a_frs1516.fishd := gse.Integer_Value( cursor, 373 );
      end if;
      if not gse.Is_Null( cursor, 374 )then
         a_frs1516.fissp := gse.Integer_Value( cursor, 374 );
      end if;
      if not gse.Is_Null( cursor, 375 )then
         a_frs1516.fjsahd := gse.Integer_Value( cursor, 375 );
      end if;
      if not gse.Is_Null( cursor, 376 )then
         a_frs1516.fjsasp := gse.Integer_Value( cursor, 376 );
      end if;
      if not gse.Is_Null( cursor, 377 )then
         a_frs1516.fesahd := gse.Integer_Value( cursor, 377 );
      end if;
      if not gse.Is_Null( cursor, 378 )then
         a_frs1516.fesasp := gse.Integer_Value( cursor, 378 );
      end if;
      if not gse.Is_Null( cursor, 379 )then
         a_frs1516.claimahd := gse.Integer_Value( cursor, 379 );
      end if;
      if not gse.Is_Null( cursor, 380 )then
         a_frs1516.claimasp := gse.Integer_Value( cursor, 380 );
      end if;
      if not gse.Is_Null( cursor, 381 )then
         a_frs1516.cohabhd := gse.Integer_Value( cursor, 381 );
      end if;
      if not gse.Is_Null( cursor, 382 )then
         a_frs1516.cohabsp := gse.Integer_Value( cursor, 382 );
      end if;
      if not gse.Is_Null( cursor, 383 )then
         a_frs1516.condithd := gse.Integer_Value( cursor, 383 );
      end if;
      if not gse.Is_Null( cursor, 384 )then
         a_frs1516.conditsp := gse.Integer_Value( cursor, 384 );
      end if;
      if not gse.Is_Null( cursor, 385 )then
         a_frs1516.blodgehd := gse.Integer_Value( cursor, 385 );
      end if;
      if not gse.Is_Null( cursor, 386 )then
         a_frs1516.blodgesp := gse.Integer_Value( cursor, 386 );
      end if;
      if not gse.Is_Null( cursor, 387 )then
         a_frs1516.ctclm1hd := gse.Integer_Value( cursor, 387 );
      end if;
      if not gse.Is_Null( cursor, 388 )then
         a_frs1516.ctclm1sp := gse.Integer_Value( cursor, 388 );
      end if;
      if not gse.Is_Null( cursor, 389 )then
         a_frs1516.ctclm2hd := gse.Integer_Value( cursor, 389 );
      end if;
      if not gse.Is_Null( cursor, 390 )then
         a_frs1516.ctclm2sp := gse.Integer_Value( cursor, 390 );
      end if;
      if not gse.Is_Null( cursor, 391 )then
         a_frs1516.cupchkhd := gse.Integer_Value( cursor, 391 );
      end if;
      if not gse.Is_Null( cursor, 392 )then
         a_frs1516.cupchksp := gse.Integer_Value( cursor, 392 );
      end if;
      if not gse.Is_Null( cursor, 393 )then
         a_frs1516.curacthd := gse.Integer_Value( cursor, 393 );
      end if;
      if not gse.Is_Null( cursor, 394 )then
         a_frs1516.curactsp := gse.Integer_Value( cursor, 394 );
      end if;
      if not gse.Is_Null( cursor, 395 )then
         a_frs1516.curqulhd := gse.Integer_Value( cursor, 395 );
      end if;
      if not gse.Is_Null( cursor, 396 )then
         a_frs1516.curqulsp := gse.Integer_Value( cursor, 396 );
      end if;
      if not gse.Is_Null( cursor, 397 )then
         a_frs1516.blheadhd := gse.Integer_Value( cursor, 397 );
      end if;
      if not gse.Is_Null( cursor, 398 )then
         a_frs1516.blheadsp := gse.Integer_Value( cursor, 398 );
      end if;
      if not gse.Is_Null( cursor, 399 )then
         a_frs1516.blrenthd:= Amount'Value( gse.Value( cursor, 399 ));
      end if;
      if not gse.Is_Null( cursor, 400 )then
         a_frs1516.blrentsp:= Amount'Value( gse.Value( cursor, 400 ));
      end if;
      if not gse.Is_Null( cursor, 401 )then
         a_frs1516.pblrenhd := gse.Integer_Value( cursor, 401 );
      end if;
      if not gse.Is_Null( cursor, 402 )then
         a_frs1516.pblrensp := gse.Integer_Value( cursor, 402 );
      end if;
      if not gse.Is_Null( cursor, 403 )then
         a_frs1516.ddaprghd := gse.Integer_Value( cursor, 403 );
      end if;
      if not gse.Is_Null( cursor, 404 )then
         a_frs1516.ddaprgsp := gse.Integer_Value( cursor, 404 );
      end if;
      if not gse.Is_Null( cursor, 405 )then
         a_frs1516.ddatrehd := gse.Integer_Value( cursor, 405 );
      end if;
      if not gse.Is_Null( cursor, 406 )then
         a_frs1516.ddatresp := gse.Integer_Value( cursor, 406 );
      end if;
      if not gse.Is_Null( cursor, 407 )then
         a_frs1516.ddatrphd := gse.Integer_Value( cursor, 407 );
      end if;
      if not gse.Is_Null( cursor, 408 )then
         a_frs1516.ddatrpsp := gse.Integer_Value( cursor, 408 );
      end if;
      if not gse.Is_Null( cursor, 409 )then
         a_frs1516.defrpnhd := gse.Integer_Value( cursor, 409 );
      end if;
      if not gse.Is_Null( cursor, 410 )then
         a_frs1516.defrpnsp := gse.Integer_Value( cursor, 410 );
      end if;
      if not gse.Is_Null( cursor, 411 )then
         a_frs1516.dependhd := gse.Integer_Value( cursor, 411 );
      end if;
      if not gse.Is_Null( cursor, 412 )then
         a_frs1516.dependsp := gse.Integer_Value( cursor, 412 );
      end if;
      if not gse.Is_Null( cursor, 413 )then
         a_frs1516.disacahd := gse.Integer_Value( cursor, 413 );
      end if;
      if not gse.Is_Null( cursor, 414 )then
         a_frs1516.disacasp := gse.Integer_Value( cursor, 414 );
      end if;
      if not gse.Is_Null( cursor, 415 )then
         a_frs1516.qpiphd := gse.Integer_Value( cursor, 415 );
      end if;
      if not gse.Is_Null( cursor, 416 )then
         a_frs1516.qpipsp := gse.Integer_Value( cursor, 416 );
      end if;
      if not gse.Is_Null( cursor, 417 )then
         a_frs1516.qdlahd := gse.Integer_Value( cursor, 417 );
      end if;
      if not gse.Is_Null( cursor, 418 )then
         a_frs1516.qdlasp := gse.Integer_Value( cursor, 418 );
      end if;
      if not gse.Is_Null( cursor, 419 )then
         a_frs1516.qaahd := gse.Integer_Value( cursor, 419 );
      end if;
      if not gse.Is_Null( cursor, 420 )then
         a_frs1516.qaasp := gse.Integer_Value( cursor, 420 );
      end if;
      if not gse.Is_Null( cursor, 421 )then
         a_frs1516.qsdahd := gse.Integer_Value( cursor, 421 );
      end if;
      if not gse.Is_Null( cursor, 422 )then
         a_frs1516.qsdasp := gse.Integer_Value( cursor, 422 );
      end if;
      if not gse.Is_Null( cursor, 423 )then
         a_frs1516.qibhd := gse.Integer_Value( cursor, 423 );
      end if;
      if not gse.Is_Null( cursor, 424 )then
         a_frs1516.qibsp := gse.Integer_Value( cursor, 424 );
      end if;
      if not gse.Is_Null( cursor, 425 )then
         a_frs1516.qiidbhd := gse.Integer_Value( cursor, 425 );
      end if;
      if not gse.Is_Null( cursor, 426 )then
         a_frs1516.qiidbsp := gse.Integer_Value( cursor, 426 );
      end if;
      if not gse.Is_Null( cursor, 427 )then
         a_frs1516.discoahd := gse.Integer_Value( cursor, 427 );
      end if;
      if not gse.Is_Null( cursor, 428 )then
         a_frs1516.discoasp := gse.Integer_Value( cursor, 428 );
      end if;
      if not gse.Is_Null( cursor, 429 )then
         a_frs1516.disd01hd := gse.Integer_Value( cursor, 429 );
      end if;
      if not gse.Is_Null( cursor, 430 )then
         a_frs1516.disd01sp := gse.Integer_Value( cursor, 430 );
      end if;
      if not gse.Is_Null( cursor, 431 )then
         a_frs1516.disd02hd := gse.Integer_Value( cursor, 431 );
      end if;
      if not gse.Is_Null( cursor, 432 )then
         a_frs1516.disd02sp := gse.Integer_Value( cursor, 432 );
      end if;
      if not gse.Is_Null( cursor, 433 )then
         a_frs1516.disd03hd := gse.Integer_Value( cursor, 433 );
      end if;
      if not gse.Is_Null( cursor, 434 )then
         a_frs1516.disd03sp := gse.Integer_Value( cursor, 434 );
      end if;
      if not gse.Is_Null( cursor, 435 )then
         a_frs1516.disd04hd := gse.Integer_Value( cursor, 435 );
      end if;
      if not gse.Is_Null( cursor, 436 )then
         a_frs1516.disd04sp := gse.Integer_Value( cursor, 436 );
      end if;
      if not gse.Is_Null( cursor, 437 )then
         a_frs1516.disd05hd := gse.Integer_Value( cursor, 437 );
      end if;
      if not gse.Is_Null( cursor, 438 )then
         a_frs1516.disd05sp := gse.Integer_Value( cursor, 438 );
      end if;
      if not gse.Is_Null( cursor, 439 )then
         a_frs1516.disd06hd := gse.Integer_Value( cursor, 439 );
      end if;
      if not gse.Is_Null( cursor, 440 )then
         a_frs1516.disd06sp := gse.Integer_Value( cursor, 440 );
      end if;
      if not gse.Is_Null( cursor, 441 )then
         a_frs1516.disd07hd := gse.Integer_Value( cursor, 441 );
      end if;
      if not gse.Is_Null( cursor, 442 )then
         a_frs1516.disd07sp := gse.Integer_Value( cursor, 442 );
      end if;
      if not gse.Is_Null( cursor, 443 )then
         a_frs1516.disd08hd := gse.Integer_Value( cursor, 443 );
      end if;
      if not gse.Is_Null( cursor, 444 )then
         a_frs1516.disd08sp := gse.Integer_Value( cursor, 444 );
      end if;
      if not gse.Is_Null( cursor, 445 )then
         a_frs1516.disd09hd := gse.Integer_Value( cursor, 445 );
      end if;
      if not gse.Is_Null( cursor, 446 )then
         a_frs1516.disd09sp := gse.Integer_Value( cursor, 446 );
      end if;
      if not gse.Is_Null( cursor, 447 )then
         a_frs1516.disd10hd := gse.Integer_Value( cursor, 447 );
      end if;
      if not gse.Is_Null( cursor, 448 )then
         a_frs1516.disd10sp := gse.Integer_Value( cursor, 448 );
      end if;
      if not gse.Is_Null( cursor, 449 )then
         a_frs1516.disdifhd := gse.Integer_Value( cursor, 449 );
      end if;
      if not gse.Is_Null( cursor, 450 )then
         a_frs1516.disdifsp := gse.Integer_Value( cursor, 450 );
      end if;
      if not gse.Is_Null( cursor, 451 )then
         a_frs1516.dlachd := gse.Integer_Value( cursor, 451 );
      end if;
      if not gse.Is_Null( cursor, 452 )then
         a_frs1516.dlacsp := gse.Integer_Value( cursor, 452 );
      end if;
      if not gse.Is_Null( cursor, 453 )then
         a_frs1516.dlamhd := gse.Integer_Value( cursor, 453 );
      end if;
      if not gse.Is_Null( cursor, 454 )then
         a_frs1516.dlamsp := gse.Integer_Value( cursor, 454 );
      end if;
      if not gse.Is_Null( cursor, 455 )then
         a_frs1516.dlshd := gse.Integer_Value( cursor, 455 );
      end if;
      if not gse.Is_Null( cursor, 456 )then
         a_frs1516.dlssp := gse.Integer_Value( cursor, 456 );
      end if;
      if not gse.Is_Null( cursor, 457 )then
         a_frs1516.dlsamthd:= Amount'Value( gse.Value( cursor, 457 ));
      end if;
      if not gse.Is_Null( cursor, 458 )then
         a_frs1516.dlsamtsp:= Amount'Value( gse.Value( cursor, 458 ));
      end if;
      if not gse.Is_Null( cursor, 459 )then
         a_frs1516.pdlshd := gse.Integer_Value( cursor, 459 );
      end if;
      if not gse.Is_Null( cursor, 460 )then
         a_frs1516.pdlssp := gse.Integer_Value( cursor, 460 );
      end if;
      if not gse.Is_Null( cursor, 461 )then
         a_frs1516.dlsvalhd := gse.Integer_Value( cursor, 461 );
      end if;
      if not gse.Is_Null( cursor, 462 )then
         a_frs1516.dlsvalsp := gse.Integer_Value( cursor, 462 );
      end if;
      if not gse.Is_Null( cursor, 463 )then
         a_frs1516.dobhd := gse.Integer_Value( cursor, 463 );
      end if;
      if not gse.Is_Null( cursor, 464 )then
         a_frs1516.dobsp := gse.Integer_Value( cursor, 464 );
      end if;
      if not gse.Is_Null( cursor, 465 )then
         a_frs1516.h3qualhd := gse.Integer_Value( cursor, 465 );
      end if;
      if not gse.Is_Null( cursor, 466 )then
         a_frs1516.h3qualsp := gse.Integer_Value( cursor, 466 );
      end if;
      if not gse.Is_Null( cursor, 467 )then
         a_frs1516.dvil3ahd := gse.Integer_Value( cursor, 467 );
      end if;
      if not gse.Is_Null( cursor, 468 )then
         a_frs1516.dvil3asp := gse.Integer_Value( cursor, 468 );
      end if;
      if not gse.Is_Null( cursor, 469 )then
         a_frs1516.dvil4ahd := gse.Integer_Value( cursor, 469 );
      end if;
      if not gse.Is_Null( cursor, 470 )then
         a_frs1516.dvil4asp := gse.Integer_Value( cursor, 470 );
      end if;
      if not gse.Is_Null( cursor, 471 )then
         a_frs1516.dvjb12hd := gse.Integer_Value( cursor, 471 );
      end if;
      if not gse.Is_Null( cursor, 472 )then
         a_frs1516.dvjb12sp := gse.Integer_Value( cursor, 472 );
      end if;
      if not gse.Is_Null( cursor, 473 )then
         a_frs1516.dvmarhd := gse.Integer_Value( cursor, 473 );
      end if;
      if not gse.Is_Null( cursor, 474 )then
         a_frs1516.dvmarsp := gse.Integer_Value( cursor, 474 );
      end if;
      if not gse.Is_Null( cursor, 475 )then
         a_frs1516.edl1ahd := gse.Integer_Value( cursor, 475 );
      end if;
      if not gse.Is_Null( cursor, 476 )then
         a_frs1516.edl1asp := gse.Integer_Value( cursor, 476 );
      end if;
      if not gse.Is_Null( cursor, 477 )then
         a_frs1516.pedl1ahd := gse.Integer_Value( cursor, 477 );
      end if;
      if not gse.Is_Null( cursor, 478 )then
         a_frs1516.pedl1asp := gse.Integer_Value( cursor, 478 );
      end if;
      if not gse.Is_Null( cursor, 479 )then
         a_frs1516.edl1obhd := gse.Integer_Value( cursor, 479 );
      end if;
      if not gse.Is_Null( cursor, 480 )then
         a_frs1516.edl1obsp := gse.Integer_Value( cursor, 480 );
      end if;
      if not gse.Is_Null( cursor, 481 )then
         a_frs1516.edl2ahd := gse.Integer_Value( cursor, 481 );
      end if;
      if not gse.Is_Null( cursor, 482 )then
         a_frs1516.edl2asp := gse.Integer_Value( cursor, 482 );
      end if;
      if not gse.Is_Null( cursor, 483 )then
         a_frs1516.pedl2ahd := gse.Integer_Value( cursor, 483 );
      end if;
      if not gse.Is_Null( cursor, 484 )then
         a_frs1516.pedl2asp := gse.Integer_Value( cursor, 484 );
      end if;
      if not gse.Is_Null( cursor, 485 )then
         a_frs1516.edl2obhd := gse.Integer_Value( cursor, 485 );
      end if;
      if not gse.Is_Null( cursor, 486 )then
         a_frs1516.edl2obsp := gse.Integer_Value( cursor, 486 );
      end if;
      if not gse.Is_Null( cursor, 487 )then
         a_frs1516.edatthd := gse.Integer_Value( cursor, 487 );
      end if;
      if not gse.Is_Null( cursor, 488 )then
         a_frs1516.edattsp := gse.Integer_Value( cursor, 488 );
      end if;
      if not gse.Is_Null( cursor, 489 )then
         a_frs1516.edhrhd := gse.Integer_Value( cursor, 489 );
      end if;
      if not gse.Is_Null( cursor, 490 )then
         a_frs1516.edhrsp := gse.Integer_Value( cursor, 490 );
      end if;
      if not gse.Is_Null( cursor, 491 )then
         a_frs1516.edtyphd := gse.Integer_Value( cursor, 491 );
      end if;
      if not gse.Is_Null( cursor, 492 )then
         a_frs1516.edtypsp := gse.Integer_Value( cursor, 492 );
      end if;
      if not gse.Is_Null( cursor, 493 )then
         a_frs1516.empconhd := gse.Integer_Value( cursor, 493 );
      end if;
      if not gse.Is_Null( cursor, 494 )then
         a_frs1516.empconsp := gse.Integer_Value( cursor, 494 );
      end if;
      if not gse.Is_Null( cursor, 495 )then
         a_frs1516.empocchd:= Amount'Value( gse.Value( cursor, 495 ));
      end if;
      if not gse.Is_Null( cursor, 496 )then
         a_frs1516.empoccsp:= Amount'Value( gse.Value( cursor, 496 ));
      end if;
      if not gse.Is_Null( cursor, 497 )then
         a_frs1516.empshd := gse.Integer_Value( cursor, 497 );
      end if;
      if not gse.Is_Null( cursor, 498 )then
         a_frs1516.empssp := gse.Integer_Value( cursor, 498 );
      end if;
      if not gse.Is_Null( cursor, 499 )then
         a_frs1516.empbhd := gse.Integer_Value( cursor, 499 );
      end if;
      if not gse.Is_Null( cursor, 500 )then
         a_frs1516.empbsp := gse.Integer_Value( cursor, 500 );
      end if;
      if not gse.Is_Null( cursor, 501 )then
         a_frs1516.empchd := gse.Integer_Value( cursor, 501 );
      end if;
      if not gse.Is_Null( cursor, 502 )then
         a_frs1516.empcsp := gse.Integer_Value( cursor, 502 );
      end if;
      if not gse.Is_Null( cursor, 503 )then
         a_frs1516.empilohd := gse.Integer_Value( cursor, 503 );
      end if;
      if not gse.Is_Null( cursor, 504 )then
         a_frs1516.empilosp := gse.Integer_Value( cursor, 504 );
      end if;
      if not gse.Is_Null( cursor, 505 )then
         a_frs1516.es2000hd := gse.Integer_Value( cursor, 505 );
      end if;
      if not gse.Is_Null( cursor, 506 )then
         a_frs1516.es2000sp := gse.Integer_Value( cursor, 506 );
      end if;
      if not gse.Is_Null( cursor, 507 )then
         a_frs1516.ethgr3hd := gse.Integer_Value( cursor, 507 );
      end if;
      if not gse.Is_Null( cursor, 508 )then
         a_frs1516.ethgr3sp := gse.Integer_Value( cursor, 508 );
      end if;
      if not gse.Is_Null( cursor, 509 )then
         a_frs1516.ethgpshd := gse.Integer_Value( cursor, 509 );
      end if;
      if not gse.Is_Null( cursor, 510 )then
         a_frs1516.ethgpssp := gse.Integer_Value( cursor, 510 );
      end if;
      if not gse.Is_Null( cursor, 511 )then
         a_frs1516.etngrphd := gse.Integer_Value( cursor, 511 );
      end if;
      if not gse.Is_Null( cursor, 512 )then
         a_frs1516.etngrpsp := gse.Integer_Value( cursor, 512 );
      end if;
      if not gse.Is_Null( cursor, 513 )then
         a_frs1516.eualamhd:= Amount'Value( gse.Value( cursor, 513 ));
      end if;
      if not gse.Is_Null( cursor, 514 )then
         a_frs1516.eualamsp:= Amount'Value( gse.Value( cursor, 514 ));
      end if;
      if not gse.Is_Null( cursor, 515 )then
         a_frs1516.eualmnhd := gse.Integer_Value( cursor, 515 );
      end if;
      if not gse.Is_Null( cursor, 516 )then
         a_frs1516.eualmnsp := gse.Integer_Value( cursor, 516 );
      end if;
      if not gse.Is_Null( cursor, 517 )then
         a_frs1516.peualihd := gse.Integer_Value( cursor, 517 );
      end if;
      if not gse.Is_Null( cursor, 518 )then
         a_frs1516.peualisp := gse.Integer_Value( cursor, 518 );
      end if;
      if not gse.Is_Null( cursor, 519 )then
         a_frs1516.euetyphd := gse.Integer_Value( cursor, 519 );
      end if;
      if not gse.Is_Null( cursor, 520 )then
         a_frs1516.euetypsp := gse.Integer_Value( cursor, 520 );
      end if;
      if not gse.Is_Null( cursor, 521 )then
         a_frs1516.everwkhd := gse.Integer_Value( cursor, 521 );
      end if;
      if not gse.Is_Null( cursor, 522 )then
         a_frs1516.everwksp := gse.Integer_Value( cursor, 522 );
      end if;
      if not gse.Is_Null( cursor, 523 )then
         a_frs1516.ehbct1hd := gse.Integer_Value( cursor, 523 );
      end if;
      if not gse.Is_Null( cursor, 524 )then
         a_frs1516.ehbct1sp := gse.Integer_Value( cursor, 524 );
      end if;
      if not gse.Is_Null( cursor, 525 )then
         a_frs1516.fllwphd := gse.Integer_Value( cursor, 525 );
      end if;
      if not gse.Is_Null( cursor, 526 )then
         a_frs1516.fllwpsp := gse.Integer_Value( cursor, 526 );
      end if;
      if not gse.Is_Null( cursor, 527 )then
         a_frs1516.ftedhd := gse.Integer_Value( cursor, 527 );
      end if;
      if not gse.Is_Null( cursor, 528 )then
         a_frs1516.ftedsp := gse.Integer_Value( cursor, 528 );
      end if;
      if not gse.Is_Null( cursor, 529 )then
         a_frs1516.ftwkyrhd := gse.Integer_Value( cursor, 529 );
      end if;
      if not gse.Is_Null( cursor, 530 )then
         a_frs1516.ftwkyrsp := gse.Integer_Value( cursor, 530 );
      end if;
      if not gse.Is_Null( cursor, 531 )then
         a_frs1516.gebacthd := gse.Integer_Value( cursor, 531 );
      end if;
      if not gse.Is_Null( cursor, 532 )then
         a_frs1516.gebactsp := gse.Integer_Value( cursor, 532 );
      end if;
      if not gse.Is_Null( cursor, 533 )then
         a_frs1516.giltcthd := gse.Integer_Value( cursor, 533 );
      end if;
      if not gse.Is_Null( cursor, 534 )then
         a_frs1516.giltctsp := gse.Integer_Value( cursor, 534 );
      end if;
      if not gse.Is_Null( cursor, 535 )then
         a_frs1516.gpispchd := gse.Integer_Value( cursor, 535 );
      end if;
      if not gse.Is_Null( cursor, 536 )then
         a_frs1516.gpispcsp := gse.Integer_Value( cursor, 536 );
      end if;
      if not gse.Is_Null( cursor, 537 )then
         a_frs1516.gpjesahd := gse.Integer_Value( cursor, 537 );
      end if;
      if not gse.Is_Null( cursor, 538 )then
         a_frs1516.gpjesasp := gse.Integer_Value( cursor, 538 );
      end if;
      if not gse.Is_Null( cursor, 539 )then
         a_frs1516.gpuchd := gse.Integer_Value( cursor, 539 );
      end if;
      if not gse.Is_Null( cursor, 540 )then
         a_frs1516.gpucsp := gse.Integer_Value( cursor, 540 );
      end if;
      if not gse.Is_Null( cursor, 541 )then
         a_frs1516.granthd := gse.Integer_Value( cursor, 541 );
      end if;
      if not gse.Is_Null( cursor, 542 )then
         a_frs1516.grantsp := gse.Integer_Value( cursor, 542 );
      end if;
      if not gse.Is_Null( cursor, 543 )then
         a_frs1516.gt1valhd := gse.Integer_Value( cursor, 543 );
      end if;
      if not gse.Is_Null( cursor, 544 )then
         a_frs1516.gt1valsp:= Amount'Value( gse.Value( cursor, 544 ));
      end if;
      if not gse.Is_Null( cursor, 545 )then
         a_frs1516.gt2valhd := gse.Integer_Value( cursor, 545 );
      end if;
      if not gse.Is_Null( cursor, 546 )then
         a_frs1516.gt2valsp := gse.Integer_Value( cursor, 546 );
      end if;
      if not gse.Is_Null( cursor, 547 )then
         a_frs1516.gt1dirhd := gse.Integer_Value( cursor, 547 );
      end if;
      if not gse.Is_Null( cursor, 548 )then
         a_frs1516.gt1dirsp:= Amount'Value( gse.Value( cursor, 548 ));
      end if;
      if not gse.Is_Null( cursor, 549 )then
         a_frs1516.gt2dirhd := gse.Integer_Value( cursor, 549 );
      end if;
      if not gse.Is_Null( cursor, 550 )then
         a_frs1516.gt2dirsp := gse.Integer_Value( cursor, 550 );
      end if;
      if not gse.Is_Null( cursor, 551 )then
         a_frs1516.grtnumhd := gse.Integer_Value( cursor, 551 );
      end if;
      if not gse.Is_Null( cursor, 552 )then
         a_frs1516.grtnumsp := gse.Integer_Value( cursor, 552 );
      end if;
      if not gse.Is_Null( cursor, 553 )then
         a_frs1516.gt1scehd := gse.Integer_Value( cursor, 553 );
      end if;
      if not gse.Is_Null( cursor, 554 )then
         a_frs1516.gt1scesp := gse.Integer_Value( cursor, 554 );
      end if;
      if not gse.Is_Null( cursor, 555 )then
         a_frs1516.gt2scehd := gse.Integer_Value( cursor, 555 );
      end if;
      if not gse.Is_Null( cursor, 556 )then
         a_frs1516.gt2scesp := gse.Integer_Value( cursor, 556 );
      end if;
      if not gse.Is_Null( cursor, 557 )then
         a_frs1516.gt1oshd := gse.Integer_Value( cursor, 557 );
      end if;
      if not gse.Is_Null( cursor, 558 )then
         a_frs1516.gt1ossp := gse.Integer_Value( cursor, 558 );
      end if;
      if not gse.Is_Null( cursor, 559 )then
         a_frs1516.gt2oshd := gse.Integer_Value( cursor, 559 );
      end if;
      if not gse.Is_Null( cursor, 560 )then
         a_frs1516.gt2ossp := gse.Integer_Value( cursor, 560 );
      end if;
      if not gse.Is_Null( cursor, 561 )then
         a_frs1516.gtahd := gse.Integer_Value( cursor, 561 );
      end if;
      if not gse.Is_Null( cursor, 562 )then
         a_frs1516.gtasp := gse.Integer_Value( cursor, 562 );
      end if;
      if not gse.Is_Null( cursor, 563 )then
         a_frs1516.healthhd := gse.Integer_Value( cursor, 563 );
      end if;
      if not gse.Is_Null( cursor, 564 )then
         a_frs1516.healthsp := gse.Integer_Value( cursor, 564 );
      end if;
      if not gse.Is_Null( cursor, 565 )then
         a_frs1516.heartvhd:= Amount'Value( gse.Value( cursor, 565 ));
      end if;
      if not gse.Is_Null( cursor, 566 )then
         a_frs1516.heartvsp:= Amount'Value( gse.Value( cursor, 566 ));
      end if;
      if not gse.Is_Null( cursor, 567 )then
         a_frs1516.heatadhd := gse.Integer_Value( cursor, 567 );
      end if;
      if not gse.Is_Null( cursor, 568 )then
         a_frs1516.heatadsp := gse.Integer_Value( cursor, 568 );
      end if;
      if not gse.Is_Null( cursor, 569 )then
         a_frs1516.hholdrhd := gse.Integer_Value( cursor, 569 );
      end if;
      if not gse.Is_Null( cursor, 570 )then
         a_frs1516.hholdrsp := gse.Integer_Value( cursor, 570 );
      end if;
      if not gse.Is_Null( cursor, 571 )then
         a_frs1516.hourabhd := gse.Integer_Value( cursor, 571 );
      end if;
      if not gse.Is_Null( cursor, 572 )then
         a_frs1516.hourabsp := gse.Integer_Value( cursor, 572 );
      end if;
      if not gse.Is_Null( cursor, 573 )then
         a_frs1516.hourahhd := gse.Integer_Value( cursor, 573 );
      end if;
      if not gse.Is_Null( cursor, 574 )then
         a_frs1516.hourahsp := gse.Integer_Value( cursor, 574 );
      end if;
      if not gse.Is_Null( cursor, 575 )then
         a_frs1516.hrcarehd:= Amount'Value( gse.Value( cursor, 575 ));
      end if;
      if not gse.Is_Null( cursor, 576 )then
         a_frs1516.hrcaresp:= Amount'Value( gse.Value( cursor, 576 ));
      end if;
      if not gse.Is_Null( cursor, 577 )then
         a_frs1516.hourcbhd := gse.Integer_Value( cursor, 577 );
      end if;
      if not gse.Is_Null( cursor, 578 )then
         a_frs1516.hourcbsp := gse.Integer_Value( cursor, 578 );
      end if;
      if not gse.Is_Null( cursor, 579 )then
         a_frs1516.hourchhd := gse.Integer_Value( cursor, 579 );
      end if;
      if not gse.Is_Null( cursor, 580 )then
         a_frs1516.hourchsp := gse.Integer_Value( cursor, 580 );
      end if;
      if not gse.Is_Null( cursor, 581 )then
         a_frs1516.hourclhd := gse.Integer_Value( cursor, 581 );
      end if;
      if not gse.Is_Null( cursor, 582 )then
         a_frs1516.hourclsp := gse.Integer_Value( cursor, 582 );
      end if;
      if not gse.Is_Null( cursor, 583 )then
         a_frs1516.hourfrhd := gse.Integer_Value( cursor, 583 );
      end if;
      if not gse.Is_Null( cursor, 584 )then
         a_frs1516.hourfrsp := gse.Integer_Value( cursor, 584 );
      end if;
      if not gse.Is_Null( cursor, 585 )then
         a_frs1516.hourothd := gse.Integer_Value( cursor, 585 );
      end if;
      if not gse.Is_Null( cursor, 586 )then
         a_frs1516.hourotsp := gse.Integer_Value( cursor, 586 );
      end if;
      if not gse.Is_Null( cursor, 587 )then
         a_frs1516.hourrehd := gse.Integer_Value( cursor, 587 );
      end if;
      if not gse.Is_Null( cursor, 588 )then
         a_frs1516.hourresp := gse.Integer_Value( cursor, 588 );
      end if;
      if not gse.Is_Null( cursor, 589 )then
         a_frs1516.hourtthd := gse.Integer_Value( cursor, 589 );
      end if;
      if not gse.Is_Null( cursor, 590 )then
         a_frs1516.hourttsp := gse.Integer_Value( cursor, 590 );
      end if;
      if not gse.Is_Null( cursor, 591 )then
         a_frs1516.hpersohd := gse.Integer_Value( cursor, 591 );
      end if;
      if not gse.Is_Null( cursor, 592 )then
         a_frs1516.hpersosp := gse.Integer_Value( cursor, 592 );
      end if;
      if not gse.Is_Null( cursor, 593 )then
         a_frs1516.hrpidhd := gse.Integer_Value( cursor, 593 );
      end if;
      if not gse.Is_Null( cursor, 594 )then
         a_frs1516.hrpidsp := gse.Integer_Value( cursor, 594 );
      end if;
      if not gse.Is_Null( cursor, 595 )then
         a_frs1516.hsvperhd := gse.Integer_Value( cursor, 595 );
      end if;
      if not gse.Is_Null( cursor, 596 )then
         a_frs1516.hsvpersp := gse.Integer_Value( cursor, 596 );
      end if;
      if not gse.Is_Null( cursor, 597 )then
         a_frs1516.agegp2hd := gse.Integer_Value( cursor, 597 );
      end if;
      if not gse.Is_Null( cursor, 598 )then
         a_frs1516.agegp2sp := gse.Integer_Value( cursor, 598 );
      end if;
      if not gse.Is_Null( cursor, 599 )then
         a_frs1516.agegphd := gse.Integer_Value( cursor, 599 );
      end if;
      if not gse.Is_Null( cursor, 600 )then
         a_frs1516.agegpsp := gse.Integer_Value( cursor, 600 );
      end if;
      if not gse.Is_Null( cursor, 601 )then
         a_frs1516.quninshd := gse.Integer_Value( cursor, 601 );
      end if;
      if not gse.Is_Null( cursor, 602 )then
         a_frs1516.quninssp := gse.Integer_Value( cursor, 602 );
      end if;
      if not gse.Is_Null( cursor, 603 )then
         a_frs1516.qtubenhd := gse.Integer_Value( cursor, 603 );
      end if;
      if not gse.Is_Null( cursor, 604 )then
         a_frs1516.qtubensp := gse.Integer_Value( cursor, 604 );
      end if;
      if not gse.Is_Null( cursor, 605 )then
         a_frs1516.qsicinhd := gse.Integer_Value( cursor, 605 );
      end if;
      if not gse.Is_Null( cursor, 606 )then
         a_frs1516.qsicinsp := gse.Integer_Value( cursor, 606 );
      end if;
      if not gse.Is_Null( cursor, 607 )then
         a_frs1516.qaccinhd := gse.Integer_Value( cursor, 607 );
      end if;
      if not gse.Is_Null( cursor, 608 )then
         a_frs1516.qaccinsp := gse.Integer_Value( cursor, 608 );
      end if;
      if not gse.Is_Null( cursor, 609 )then
         a_frs1516.qpehinhd := gse.Integer_Value( cursor, 609 );
      end if;
      if not gse.Is_Null( cursor, 610 )then
         a_frs1516.qpehinsp := gse.Integer_Value( cursor, 610 );
      end if;
      if not gse.Is_Null( cursor, 611 )then
         a_frs1516.qhosinhd := gse.Integer_Value( cursor, 611 );
      end if;
      if not gse.Is_Null( cursor, 612 )then
         a_frs1516.qhosinsp := gse.Integer_Value( cursor, 612 );
      end if;
      if not gse.Is_Null( cursor, 613 )then
         a_frs1516.qfsbenhd := gse.Integer_Value( cursor, 613 );
      end if;
      if not gse.Is_Null( cursor, 614 )then
         a_frs1516.qfsbensp := gse.Integer_Value( cursor, 614 );
      end if;
      if not gse.Is_Null( cursor, 615 )then
         a_frs1516.qcichd := gse.Integer_Value( cursor, 615 );
      end if;
      if not gse.Is_Null( cursor, 616 )then
         a_frs1516.qcicsp := gse.Integer_Value( cursor, 616 );
      end if;
      if not gse.Is_Null( cursor, 617 )then
         a_frs1516.qotbenhd := gse.Integer_Value( cursor, 617 );
      end if;
      if not gse.Is_Null( cursor, 618 )then
         a_frs1516.qotbensp := gse.Integer_Value( cursor, 618 );
      end if;
      if not gse.Is_Null( cursor, 619 )then
         a_frs1516.incdurhd := gse.Integer_Value( cursor, 619 );
      end if;
      if not gse.Is_Null( cursor, 620 )then
         a_frs1516.incdursp := gse.Integer_Value( cursor, 620 );
      end if;
      if not gse.Is_Null( cursor, 621 )then
         a_frs1516.incsehd := gse.Integer_Value( cursor, 621 );
      end if;
      if not gse.Is_Null( cursor, 622 )then
         a_frs1516.incsesp := gse.Integer_Value( cursor, 622 );
      end if;
      if not gse.Is_Null( cursor, 623 )then
         a_frs1516.indinchd := gse.Integer_Value( cursor, 623 );
      end if;
      if not gse.Is_Null( cursor, 624 )then
         a_frs1516.indincsp := gse.Integer_Value( cursor, 624 );
      end if;
      if not gse.Is_Null( cursor, 625 )then
         a_frs1516.indisbhd := gse.Integer_Value( cursor, 625 );
      end if;
      if not gse.Is_Null( cursor, 626 )then
         a_frs1516.indisbsp := gse.Integer_Value( cursor, 626 );
      end if;
      if not gse.Is_Null( cursor, 627 )then
         a_frs1516.inearnhd := gse.Integer_Value( cursor, 627 );
      end if;
      if not gse.Is_Null( cursor, 628 )then
         a_frs1516.inearnsp := gse.Integer_Value( cursor, 628 );
      end if;
      if not gse.Is_Null( cursor, 629 )then
         a_frs1516.ininvhd := gse.Integer_Value( cursor, 629 );
      end if;
      if not gse.Is_Null( cursor, 630 )then
         a_frs1516.ininvsp := gse.Integer_Value( cursor, 630 );
      end if;
      if not gse.Is_Null( cursor, 631 )then
         a_frs1516.inirbehd := gse.Integer_Value( cursor, 631 );
      end if;
      if not gse.Is_Null( cursor, 632 )then
         a_frs1516.inirbesp := gse.Integer_Value( cursor, 632 );
      end if;
      if not gse.Is_Null( cursor, 633 )then
         a_frs1516.injlonhd := gse.Integer_Value( cursor, 633 );
      end if;
      if not gse.Is_Null( cursor, 634 )then
         a_frs1516.injlonsp := gse.Integer_Value( cursor, 634 );
      end if;
      if not gse.Is_Null( cursor, 635 )then
         a_frs1516.injhrshd := gse.Integer_Value( cursor, 635 );
      end if;
      if not gse.Is_Null( cursor, 636 )then
         a_frs1516.injhrssp := gse.Integer_Value( cursor, 636 );
      end if;
      if not gse.Is_Null( cursor, 637 )then
         a_frs1516.innirbhd := gse.Integer_Value( cursor, 637 );
      end if;
      if not gse.Is_Null( cursor, 638 )then
         a_frs1516.innirbsp := gse.Integer_Value( cursor, 638 );
      end if;
      if not gse.Is_Null( cursor, 639 )then
         a_frs1516.inothbhd := gse.Integer_Value( cursor, 639 );
      end if;
      if not gse.Is_Null( cursor, 640 )then
         a_frs1516.inothbsp := gse.Integer_Value( cursor, 640 );
      end if;
      if not gse.Is_Null( cursor, 641 )then
         a_frs1516.inpenihd := gse.Integer_Value( cursor, 641 );
      end if;
      if not gse.Is_Null( cursor, 642 )then
         a_frs1516.inpenisp := gse.Integer_Value( cursor, 642 );
      end if;
      if not gse.Is_Null( cursor, 643 )then
         a_frs1516.inrinchd := gse.Integer_Value( cursor, 643 );
      end if;
      if not gse.Is_Null( cursor, 644 )then
         a_frs1516.inrincsp := gse.Integer_Value( cursor, 644 );
      end if;
      if not gse.Is_Null( cursor, 645 )then
         a_frs1516.inrpinhd := gse.Integer_Value( cursor, 645 );
      end if;
      if not gse.Is_Null( cursor, 646 )then
         a_frs1516.inrpinsp := gse.Integer_Value( cursor, 646 );
      end if;
      if not gse.Is_Null( cursor, 647 )then
         a_frs1516.itvlichd:= Amount'Value( gse.Value( cursor, 647 ));
      end if;
      if not gse.Is_Null( cursor, 648 )then
         a_frs1516.itvlicsp := gse.Integer_Value( cursor, 648 );
      end if;
      if not gse.Is_Null( cursor, 649 )then
         a_frs1516.intxcdhd := gse.Integer_Value( cursor, 649 );
      end if;
      if not gse.Is_Null( cursor, 650 )then
         a_frs1516.intxcdsp := gse.Integer_Value( cursor, 650 );
      end if;
      if not gse.Is_Null( cursor, 651 )then
         a_frs1516.investhd := gse.Integer_Value( cursor, 651 );
      end if;
      if not gse.Is_Null( cursor, 652 )then
         a_frs1516.investsp := gse.Integer_Value( cursor, 652 );
      end if;
      if not gse.Is_Null( cursor, 653 )then
         a_frs1516.isa1tyhd := gse.Integer_Value( cursor, 653 );
      end if;
      if not gse.Is_Null( cursor, 654 )then
         a_frs1516.isa1tysp := gse.Integer_Value( cursor, 654 );
      end if;
      if not gse.Is_Null( cursor, 655 )then
         a_frs1516.isa2tyhd := gse.Integer_Value( cursor, 655 );
      end if;
      if not gse.Is_Null( cursor, 656 )then
         a_frs1516.isa2tysp := gse.Integer_Value( cursor, 656 );
      end if;
      if not gse.Is_Null( cursor, 657 )then
         a_frs1516.isactihd := gse.Integer_Value( cursor, 657 );
      end if;
      if not gse.Is_Null( cursor, 658 )then
         a_frs1516.isactisp := gse.Integer_Value( cursor, 658 );
      end if;
      if not gse.Is_Null( cursor, 659 )then
         a_frs1516.jobawahd := gse.Integer_Value( cursor, 659 );
      end if;
      if not gse.Is_Null( cursor, 660 )then
         a_frs1516.jobawasp := gse.Integer_Value( cursor, 660 );
      end if;
      if not gse.Is_Null( cursor, 661 )then
         a_frs1516.jobbyrhd := gse.Integer_Value( cursor, 661 );
      end if;
      if not gse.Is_Null( cursor, 662 )then
         a_frs1516.jobbyrsp := gse.Integer_Value( cursor, 662 );
      end if;
      if not gse.Is_Null( cursor, 663 )then
         a_frs1516.qcbhd := gse.Integer_Value( cursor, 663 );
      end if;
      if not gse.Is_Null( cursor, 664 )then
         a_frs1516.qcbsp := gse.Integer_Value( cursor, 664 );
      end if;
      if not gse.Is_Null( cursor, 665 )then
         a_frs1516.qgahd := gse.Integer_Value( cursor, 665 );
      end if;
      if not gse.Is_Null( cursor, 666 )then
         a_frs1516.qgasp := gse.Integer_Value( cursor, 666 );
      end if;
      if not gse.Is_Null( cursor, 667 )then
         a_frs1516.qmahd := gse.Integer_Value( cursor, 667 );
      end if;
      if not gse.Is_Null( cursor, 668 )then
         a_frs1516.qmasp := gse.Integer_Value( cursor, 668 );
      end if;
      if not gse.Is_Null( cursor, 669 )then
         a_frs1516.lareghd := gse.Integer_Value( cursor, 669 );
      end if;
      if not gse.Is_Null( cursor, 670 )then
         a_frs1516.laregsp := gse.Integer_Value( cursor, 670 );
      end if;
      if not gse.Is_Null( cursor, 671 )then
         a_frs1516.likewkhd := gse.Integer_Value( cursor, 671 );
      end if;
      if not gse.Is_Null( cursor, 672 )then
         a_frs1516.likewksp := gse.Integer_Value( cursor, 672 );
      end if;
      if not gse.Is_Null( cursor, 673 )then
         a_frs1516.limitlhd := gse.Integer_Value( cursor, 673 );
      end if;
      if not gse.Is_Null( cursor, 674 )then
         a_frs1516.limitlsp := gse.Integer_Value( cursor, 674 );
      end if;
      if not gse.Is_Null( cursor, 675 )then
         a_frs1516.lktimehd := gse.Integer_Value( cursor, 675 );
      end if;
      if not gse.Is_Null( cursor, 676 )then
         a_frs1516.lktimesp := gse.Integer_Value( cursor, 676 );
      end if;
      if not gse.Is_Null( cursor, 677 )then
         a_frs1516.lktrnhd := gse.Integer_Value( cursor, 677 );
      end if;
      if not gse.Is_Null( cursor, 678 )then
         a_frs1516.lktrnsp := gse.Integer_Value( cursor, 678 );
      end if;
      if not gse.Is_Null( cursor, 679 )then
         a_frs1516.lkworkhd := gse.Integer_Value( cursor, 679 );
      end if;
      if not gse.Is_Null( cursor, 680 )then
         a_frs1516.lkworksp := gse.Integer_Value( cursor, 680 );
      end if;
      if not gse.Is_Null( cursor, 681 )then
         a_frs1516.loanhd := gse.Integer_Value( cursor, 681 );
      end if;
      if not gse.Is_Null( cursor, 682 )then
         a_frs1516.loansp := gse.Integer_Value( cursor, 682 );
      end if;
      if not gse.Is_Null( cursor, 683 )then
         a_frs1516.loannuhd := gse.Integer_Value( cursor, 683 );
      end if;
      if not gse.Is_Null( cursor, 684 )then
         a_frs1516.loannusp := gse.Integer_Value( cursor, 684 );
      end if;
      if not gse.Is_Null( cursor, 685 )then
         a_frs1516.lstwkmhd := gse.Integer_Value( cursor, 685 );
      end if;
      if not gse.Is_Null( cursor, 686 )then
         a_frs1516.lstwkmsp := gse.Integer_Value( cursor, 686 );
      end if;
      if not gse.Is_Null( cursor, 687 )then
         a_frs1516.lstwkyhd := gse.Integer_Value( cursor, 687 );
      end if;
      if not gse.Is_Null( cursor, 688 )then
         a_frs1516.lstwkysp := gse.Integer_Value( cursor, 688 );
      end if;
      if not gse.Is_Null( cursor, 689 )then
         a_frs1516.wkswkdhd := gse.Integer_Value( cursor, 689 );
      end if;
      if not gse.Is_Null( cursor, 690 )then
         a_frs1516.wkswkdsp := gse.Integer_Value( cursor, 690 );
      end if;
      if not gse.Is_Null( cursor, 691 )then
         a_frs1516.marithd := gse.Integer_Value( cursor, 691 );
      end if;
      if not gse.Is_Null( cursor, 692 )then
         a_frs1516.maritsp := gse.Integer_Value( cursor, 692 );
      end if;
      if not gse.Is_Null( cursor, 693 )then
         a_frs1516.mr1hd:= Amount'Value( gse.Value( cursor, 693 ));
      end if;
      if not gse.Is_Null( cursor, 694 )then
         a_frs1516.mr1sp := gse.Integer_Value( cursor, 694 );
      end if;
      if not gse.Is_Null( cursor, 695 )then
         a_frs1516.mr2hd:= Amount'Value( gse.Value( cursor, 695 ));
      end if;
      if not gse.Is_Null( cursor, 696 )then
         a_frs1516.mr2sp:= Amount'Value( gse.Value( cursor, 696 ));
      end if;
      if not gse.Is_Null( cursor, 697 )then
         a_frs1516.mntar1hd := gse.Integer_Value( cursor, 697 );
      end if;
      if not gse.Is_Null( cursor, 698 )then
         a_frs1516.mntar1sp := gse.Integer_Value( cursor, 698 );
      end if;
      if not gse.Is_Null( cursor, 699 )then
         a_frs1516.mntar2hd := gse.Integer_Value( cursor, 699 );
      end if;
      if not gse.Is_Null( cursor, 700 )then
         a_frs1516.mntar2sp := gse.Integer_Value( cursor, 700 );
      end if;
      if not gse.Is_Null( cursor, 701 )then
         a_frs1516.mntar3hd := gse.Integer_Value( cursor, 701 );
      end if;
      if not gse.Is_Null( cursor, 702 )then
         a_frs1516.mntar3sp := gse.Integer_Value( cursor, 702 );
      end if;
      if not gse.Is_Null( cursor, 703 )then
         a_frs1516.mntar4hd := gse.Integer_Value( cursor, 703 );
      end if;
      if not gse.Is_Null( cursor, 704 )then
         a_frs1516.mntar4sp := gse.Integer_Value( cursor, 704 );
      end if;
      if not gse.Is_Null( cursor, 705 )then
         a_frs1516.mntar5hd := gse.Integer_Value( cursor, 705 );
      end if;
      if not gse.Is_Null( cursor, 706 )then
         a_frs1516.mntar5sp := gse.Integer_Value( cursor, 706 );
      end if;
      if not gse.Is_Null( cursor, 707 )then
         a_frs1516.mntnc1hd := gse.Integer_Value( cursor, 707 );
      end if;
      if not gse.Is_Null( cursor, 708 )then
         a_frs1516.mntnc1sp := gse.Integer_Value( cursor, 708 );
      end if;
      if not gse.Is_Null( cursor, 709 )then
         a_frs1516.mntnc2hd := gse.Integer_Value( cursor, 709 );
      end if;
      if not gse.Is_Null( cursor, 710 )then
         a_frs1516.mntnc2sp := gse.Integer_Value( cursor, 710 );
      end if;
      if not gse.Is_Null( cursor, 711 )then
         a_frs1516.mntnc3hd := gse.Integer_Value( cursor, 711 );
      end if;
      if not gse.Is_Null( cursor, 712 )then
         a_frs1516.mntnc3sp := gse.Integer_Value( cursor, 712 );
      end if;
      if not gse.Is_Null( cursor, 713 )then
         a_frs1516.mntnc4hd := gse.Integer_Value( cursor, 713 );
      end if;
      if not gse.Is_Null( cursor, 714 )then
         a_frs1516.mntnc4sp := gse.Integer_Value( cursor, 714 );
      end if;
      if not gse.Is_Null( cursor, 715 )then
         a_frs1516.mntnc5hd := gse.Integer_Value( cursor, 715 );
      end if;
      if not gse.Is_Null( cursor, 716 )then
         a_frs1516.mntnc5sp := gse.Integer_Value( cursor, 716 );
      end if;
      if not gse.Is_Null( cursor, 717 )then
         a_frs1516.mntpayhd := gse.Integer_Value( cursor, 717 );
      end if;
      if not gse.Is_Null( cursor, 718 )then
         a_frs1516.mntpaysp := gse.Integer_Value( cursor, 718 );
      end if;
      if not gse.Is_Null( cursor, 719 )then
         a_frs1516.pmr1hd := gse.Integer_Value( cursor, 719 );
      end if;
      if not gse.Is_Null( cursor, 720 )then
         a_frs1516.pmr1sp := gse.Integer_Value( cursor, 720 );
      end if;
      if not gse.Is_Null( cursor, 721 )then
         a_frs1516.pmr2hd := gse.Integer_Value( cursor, 721 );
      end if;
      if not gse.Is_Null( cursor, 722 )then
         a_frs1516.pmr2sp := gse.Integer_Value( cursor, 722 );
      end if;
      if not gse.Is_Null( cursor, 723 )then
         a_frs1516.mntpr1hd := gse.Integer_Value( cursor, 723 );
      end if;
      if not gse.Is_Null( cursor, 724 )then
         a_frs1516.mntpr1sp := gse.Integer_Value( cursor, 724 );
      end if;
      if not gse.Is_Null( cursor, 725 )then
         a_frs1516.mntpr2hd := gse.Integer_Value( cursor, 725 );
      end if;
      if not gse.Is_Null( cursor, 726 )then
         a_frs1516.mntpr2sp := gse.Integer_Value( cursor, 726 );
      end if;
      if not gse.Is_Null( cursor, 727 )then
         a_frs1516.mntpr3hd := gse.Integer_Value( cursor, 727 );
      end if;
      if not gse.Is_Null( cursor, 728 )then
         a_frs1516.mntpr3sp := gse.Integer_Value( cursor, 728 );
      end if;
      if not gse.Is_Null( cursor, 729 )then
         a_frs1516.mr12mhd := gse.Integer_Value( cursor, 729 );
      end if;
      if not gse.Is_Null( cursor, 730 )then
         a_frs1516.mr12msp := gse.Integer_Value( cursor, 730 );
      end if;
      if not gse.Is_Null( cursor, 731 )then
         a_frs1516.mntt1hd := gse.Integer_Value( cursor, 731 );
      end if;
      if not gse.Is_Null( cursor, 732 )then
         a_frs1516.mntt1sp := gse.Integer_Value( cursor, 732 );
      end if;
      if not gse.Is_Null( cursor, 733 )then
         a_frs1516.mntt2hd := gse.Integer_Value( cursor, 733 );
      end if;
      if not gse.Is_Null( cursor, 734 )then
         a_frs1516.mntt2sp := gse.Integer_Value( cursor, 734 );
      end if;
      if not gse.Is_Null( cursor, 735 )then
         a_frs1516.mntt3hd := gse.Integer_Value( cursor, 735 );
      end if;
      if not gse.Is_Null( cursor, 736 )then
         a_frs1516.mntt3sp := gse.Integer_Value( cursor, 736 );
      end if;
      if not gse.Is_Null( cursor, 737 )then
         a_frs1516.mntus1hd := gse.Integer_Value( cursor, 737 );
      end if;
      if not gse.Is_Null( cursor, 738 )then
         a_frs1516.mntus1sp := gse.Integer_Value( cursor, 738 );
      end if;
      if not gse.Is_Null( cursor, 739 )then
         a_frs1516.mntus2hd := gse.Integer_Value( cursor, 739 );
      end if;
      if not gse.Is_Null( cursor, 740 )then
         a_frs1516.mntus2sp := gse.Integer_Value( cursor, 740 );
      end if;
      if not gse.Is_Null( cursor, 741 )then
         a_frs1516.umr1hd:= Amount'Value( gse.Value( cursor, 741 ));
      end if;
      if not gse.Is_Null( cursor, 742 )then
         a_frs1516.umr1sp := gse.Integer_Value( cursor, 742 );
      end if;
      if not gse.Is_Null( cursor, 743 )then
         a_frs1516.umr2hd:= Amount'Value( gse.Value( cursor, 743 ));
      end if;
      if not gse.Is_Null( cursor, 744 )then
         a_frs1516.umr2sp := gse.Integer_Value( cursor, 744 );
      end if;
      if not gse.Is_Null( cursor, 745 )then
         a_frs1516.pumr1hd := gse.Integer_Value( cursor, 745 );
      end if;
      if not gse.Is_Null( cursor, 746 )then
         a_frs1516.pumr1sp := gse.Integer_Value( cursor, 746 );
      end if;
      if not gse.Is_Null( cursor, 747 )then
         a_frs1516.pumr2hd := gse.Integer_Value( cursor, 747 );
      end if;
      if not gse.Is_Null( cursor, 748 )then
         a_frs1516.pumr2sp := gse.Integer_Value( cursor, 748 );
      end if;
      if not gse.Is_Null( cursor, 749 )then
         a_frs1516.mntw1hd := gse.Integer_Value( cursor, 749 );
      end if;
      if not gse.Is_Null( cursor, 750 )then
         a_frs1516.mntw1sp := gse.Integer_Value( cursor, 750 );
      end if;
      if not gse.Is_Null( cursor, 751 )then
         a_frs1516.mntw2hd := gse.Integer_Value( cursor, 751 );
      end if;
      if not gse.Is_Null( cursor, 752 )then
         a_frs1516.mntw2sp := gse.Integer_Value( cursor, 752 );
      end if;
      if not gse.Is_Null( cursor, 753 )then
         a_frs1516.mntw3hd := gse.Integer_Value( cursor, 753 );
      end if;
      if not gse.Is_Null( cursor, 754 )then
         a_frs1516.mntw3sp := gse.Integer_Value( cursor, 754 );
      end if;
      if not gse.Is_Null( cursor, 755 )then
         a_frs1516.mntw4hd := gse.Integer_Value( cursor, 755 );
      end if;
      if not gse.Is_Null( cursor, 756 )then
         a_frs1516.mntw4sp := gse.Integer_Value( cursor, 756 );
      end if;
      if not gse.Is_Null( cursor, 757 )then
         a_frs1516.mntw5hd := gse.Integer_Value( cursor, 757 );
      end if;
      if not gse.Is_Null( cursor, 758 )then
         a_frs1516.mntw5sp := gse.Integer_Value( cursor, 758 );
      end if;
      if not gse.Is_Null( cursor, 759 )then
         a_frs1516.mshd := gse.Integer_Value( cursor, 759 );
      end if;
      if not gse.Is_Null( cursor, 760 )then
         a_frs1516.mssp := gse.Integer_Value( cursor, 760 );
      end if;
      if not gse.Is_Null( cursor, 761 )then
         a_frs1516.nanid1hd := gse.Integer_Value( cursor, 761 );
      end if;
      if not gse.Is_Null( cursor, 762 )then
         a_frs1516.nanid1sp := gse.Integer_Value( cursor, 762 );
      end if;
      if not gse.Is_Null( cursor, 763 )then
         a_frs1516.nanid2hd := gse.Integer_Value( cursor, 763 );
      end if;
      if not gse.Is_Null( cursor, 764 )then
         a_frs1516.nanid2sp := gse.Integer_Value( cursor, 764 );
      end if;
      if not gse.Is_Null( cursor, 765 )then
         a_frs1516.nanid3hd := gse.Integer_Value( cursor, 765 );
      end if;
      if not gse.Is_Null( cursor, 766 )then
         a_frs1516.nanid3sp := gse.Integer_Value( cursor, 766 );
      end if;
      if not gse.Is_Null( cursor, 767 )then
         a_frs1516.nanid4hd := gse.Integer_Value( cursor, 767 );
      end if;
      if not gse.Is_Null( cursor, 768 )then
         a_frs1516.nanid4sp := gse.Integer_Value( cursor, 768 );
      end if;
      if not gse.Is_Null( cursor, 769 )then
         a_frs1516.nanid5hd := gse.Integer_Value( cursor, 769 );
      end if;
      if not gse.Is_Null( cursor, 770 )then
         a_frs1516.nanid5sp := gse.Integer_Value( cursor, 770 );
      end if;
      if not gse.Is_Null( cursor, 771 )then
         a_frs1516.nanid6hd := gse.Integer_Value( cursor, 771 );
      end if;
      if not gse.Is_Null( cursor, 772 )then
         a_frs1516.nanid6sp := gse.Integer_Value( cursor, 772 );
      end if;
      if not gse.Is_Null( cursor, 773 )then
         a_frs1516.nitrnhd := gse.Integer_Value( cursor, 773 );
      end if;
      if not gse.Is_Null( cursor, 774 )then
         a_frs1516.nitrnsp := gse.Integer_Value( cursor, 774 );
      end if;
      if not gse.Is_Null( cursor, 775 )then
         a_frs1516.niamthd:= Amount'Value( gse.Value( cursor, 775 ));
      end if;
      if not gse.Is_Null( cursor, 776 )then
         a_frs1516.niamtsp:= Amount'Value( gse.Value( cursor, 776 ));
      end if;
      if not gse.Is_Null( cursor, 777 )then
         a_frs1516.niethghd := gse.Integer_Value( cursor, 777 );
      end if;
      if not gse.Is_Null( cursor, 778 )then
         a_frs1516.niethgsp := gse.Integer_Value( cursor, 778 );
      end if;
      if not gse.Is_Null( cursor, 779 )then
         a_frs1516.nixhbbhd := gse.Integer_Value( cursor, 779 );
      end if;
      if not gse.Is_Null( cursor, 780 )then
         a_frs1516.nixhbbsp := gse.Integer_Value( cursor, 780 );
      end if;
      if not gse.Is_Null( cursor, 781 )then
         a_frs1516.ninid1hd := gse.Integer_Value( cursor, 781 );
      end if;
      if not gse.Is_Null( cursor, 782 )then
         a_frs1516.ninid1sp := gse.Integer_Value( cursor, 782 );
      end if;
      if not gse.Is_Null( cursor, 783 )then
         a_frs1516.ninid2hd := gse.Integer_Value( cursor, 783 );
      end if;
      if not gse.Is_Null( cursor, 784 )then
         a_frs1516.ninid2sp := gse.Integer_Value( cursor, 784 );
      end if;
      if not gse.Is_Null( cursor, 785 )then
         a_frs1516.ninid3hd := gse.Integer_Value( cursor, 785 );
      end if;
      if not gse.Is_Null( cursor, 786 )then
         a_frs1516.ninid3sp := gse.Integer_Value( cursor, 786 );
      end if;
      if not gse.Is_Null( cursor, 787 )then
         a_frs1516.ninid4hd := gse.Integer_Value( cursor, 787 );
      end if;
      if not gse.Is_Null( cursor, 788 )then
         a_frs1516.ninid4sp := gse.Integer_Value( cursor, 788 );
      end if;
      if not gse.Is_Null( cursor, 789 )then
         a_frs1516.ninid5hd := gse.Integer_Value( cursor, 789 );
      end if;
      if not gse.Is_Null( cursor, 790 )then
         a_frs1516.ninid5sp := gse.Integer_Value( cursor, 790 );
      end if;
      if not gse.Is_Null( cursor, 791 )then
         a_frs1516.ninid6hd := gse.Integer_Value( cursor, 791 );
      end if;
      if not gse.Is_Null( cursor, 792 )then
         a_frs1516.ninid6sp := gse.Integer_Value( cursor, 792 );
      end if;
      if not gse.Is_Null( cursor, 793 )then
         a_frs1516.ninid7hd := gse.Integer_Value( cursor, 793 );
      end if;
      if not gse.Is_Null( cursor, 794 )then
         a_frs1516.ninid7sp := gse.Integer_Value( cursor, 794 );
      end if;
      if not gse.Is_Null( cursor, 795 )then
         a_frs1516.nincs2hd := gse.Integer_Value( cursor, 795 );
      end if;
      if not gse.Is_Null( cursor, 796 )then
         a_frs1516.nincs2sp := gse.Integer_Value( cursor, 796 );
      end if;
      if not gse.Is_Null( cursor, 797 )then
         a_frs1516.nininchd := gse.Integer_Value( cursor, 797 );
      end if;
      if not gse.Is_Null( cursor, 798 )then
         a_frs1516.ninincsp := gse.Integer_Value( cursor, 798 );
      end if;
      if not gse.Is_Null( cursor, 799 )then
         a_frs1516.ninearhd := gse.Integer_Value( cursor, 799 );
      end if;
      if not gse.Is_Null( cursor, 800 )then
         a_frs1516.ninearsp := gse.Integer_Value( cursor, 800 );
      end if;
      if not gse.Is_Null( cursor, 801 )then
         a_frs1516.nininvhd := gse.Integer_Value( cursor, 801 );
      end if;
      if not gse.Is_Null( cursor, 802 )then
         a_frs1516.nininvsp := gse.Integer_Value( cursor, 802 );
      end if;
      if not gse.Is_Null( cursor, 803 )then
         a_frs1516.ninpenhd := gse.Integer_Value( cursor, 803 );
      end if;
      if not gse.Is_Null( cursor, 804 )then
         a_frs1516.ninpensp := gse.Integer_Value( cursor, 804 );
      end if;
      if not gse.Is_Null( cursor, 805 )then
         a_frs1516.ninrinhd := gse.Integer_Value( cursor, 805 );
      end if;
      if not gse.Is_Null( cursor, 806 )then
         a_frs1516.ninrinsp := gse.Integer_Value( cursor, 806 );
      end if;
      if not gse.Is_Null( cursor, 807 )then
         a_frs1516.ninseihd := gse.Integer_Value( cursor, 807 );
      end if;
      if not gse.Is_Null( cursor, 808 )then
         a_frs1516.ninseisp := gse.Integer_Value( cursor, 808 );
      end if;
      if not gse.Is_Null( cursor, 809 )then
         a_frs1516.pniamthd := gse.Integer_Value( cursor, 809 );
      end if;
      if not gse.Is_Null( cursor, 810 )then
         a_frs1516.pniamtsp := gse.Integer_Value( cursor, 810 );
      end if;
      if not gse.Is_Null( cursor, 811 )then
         a_frs1516.nireghd := gse.Integer_Value( cursor, 811 );
      end if;
      if not gse.Is_Null( cursor, 812 )then
         a_frs1516.niregsp := gse.Integer_Value( cursor, 812 );
      end if;
      if not gse.Is_Null( cursor, 813 )then
         a_frs1516.nirelghd := gse.Integer_Value( cursor, 813 );
      end if;
      if not gse.Is_Null( cursor, 814 )then
         a_frs1516.nirelgsp := gse.Integer_Value( cursor, 814 );
      end if;
      if not gse.Is_Null( cursor, 815 )then
         a_frs1516.nolk1hd := gse.Integer_Value( cursor, 815 );
      end if;
      if not gse.Is_Null( cursor, 816 )then
         a_frs1516.nolk1sp := gse.Integer_Value( cursor, 816 );
      end if;
      if not gse.Is_Null( cursor, 817 )then
         a_frs1516.nolk2hd := gse.Integer_Value( cursor, 817 );
      end if;
      if not gse.Is_Null( cursor, 818 )then
         a_frs1516.nolk2sp := gse.Integer_Value( cursor, 818 );
      end if;
      if not gse.Is_Null( cursor, 819 )then
         a_frs1516.nolk3hd := gse.Integer_Value( cursor, 819 );
      end if;
      if not gse.Is_Null( cursor, 820 )then
         a_frs1516.nolk3sp := gse.Integer_Value( cursor, 820 );
      end if;
      if not gse.Is_Null( cursor, 821 )then
         a_frs1516.nowanthd := gse.Integer_Value( cursor, 821 );
      end if;
      if not gse.Is_Null( cursor, 822 )then
         a_frs1516.nowantsp := gse.Integer_Value( cursor, 822 );
      end if;
      if not gse.Is_Null( cursor, 823 )then
         a_frs1516.nssechd:= Amount'Value( gse.Value( cursor, 823 ));
      end if;
      if not gse.Is_Null( cursor, 824 )then
         a_frs1516.nssecsp:= Amount'Value( gse.Value( cursor, 824 ));
      end if;
      if not gse.Is_Null( cursor, 825 )then
         a_frs1516.numjobhd := gse.Integer_Value( cursor, 825 );
      end if;
      if not gse.Is_Null( cursor, 826 )then
         a_frs1516.numjobsp := gse.Integer_Value( cursor, 826 );
      end if;
      if not gse.Is_Null( cursor, 827 )then
         a_frs1516.numj2hd := gse.Integer_Value( cursor, 827 );
      end if;
      if not gse.Is_Null( cursor, 828 )then
         a_frs1516.numj2sp := gse.Integer_Value( cursor, 828 );
      end if;
      if not gse.Is_Null( cursor, 829 )then
         a_frs1516.ocnumhd := gse.Integer_Value( cursor, 829 );
      end if;
      if not gse.Is_Null( cursor, 830 )then
         a_frs1516.ocnumsp := gse.Integer_Value( cursor, 830 );
      end if;
      if not gse.Is_Null( cursor, 831 )then
         a_frs1516.oddjobhd := gse.Integer_Value( cursor, 831 );
      end if;
      if not gse.Is_Null( cursor, 832 )then
         a_frs1516.oddjobsp := gse.Integer_Value( cursor, 832 );
      end if;
      if not gse.Is_Null( cursor, 833 )then
         a_frs1516.oldstdhd := gse.Integer_Value( cursor, 833 );
      end if;
      if not gse.Is_Null( cursor, 834 )then
         a_frs1516.oldstdsp := gse.Integer_Value( cursor, 834 );
      end if;
      if not gse.Is_Null( cursor, 835 )then
         a_frs1516.oabparhd := gse.Integer_Value( cursor, 835 );
      end if;
      if not gse.Is_Null( cursor, 836 )then
         a_frs1516.oabparsp := gse.Integer_Value( cursor, 836 );
      end if;
      if not gse.Is_Null( cursor, 837 )then
         a_frs1516.otamthd:= Amount'Value( gse.Value( cursor, 837 ));
      end if;
      if not gse.Is_Null( cursor, 838 )then
         a_frs1516.otamtsp:= Amount'Value( gse.Value( cursor, 838 ));
      end if;
      if not gse.Is_Null( cursor, 839 )then
         a_frs1516.otpamthd:= Amount'Value( gse.Value( cursor, 839 ));
      end if;
      if not gse.Is_Null( cursor, 840 )then
         a_frs1516.otpamtsp := gse.Integer_Value( cursor, 840 );
      end if;
      if not gse.Is_Null( cursor, 841 )then
         a_frs1516.otappdhd := gse.Integer_Value( cursor, 841 );
      end if;
      if not gse.Is_Null( cursor, 842 )then
         a_frs1516.otappdsp := gse.Integer_Value( cursor, 842 );
      end if;
      if not gse.Is_Null( cursor, 843 )then
         a_frs1516.qehbtbhd := gse.Integer_Value( cursor, 843 );
      end if;
      if not gse.Is_Null( cursor, 844 )then
         a_frs1516.qehbtbsp := gse.Integer_Value( cursor, 844 );
      end if;
      if not gse.Is_Null( cursor, 845 )then
         a_frs1516.qwidplhd := gse.Integer_Value( cursor, 845 );
      end if;
      if not gse.Is_Null( cursor, 846 )then
         a_frs1516.qwidplsp := gse.Integer_Value( cursor, 846 );
      end if;
      if not gse.Is_Null( cursor, 847 )then
         a_frs1516.qinwkchd := gse.Integer_Value( cursor, 847 );
      end if;
      if not gse.Is_Null( cursor, 848 )then
         a_frs1516.qinwkcsp := gse.Integer_Value( cursor, 848 );
      end if;
      if not gse.Is_Null( cursor, 849 )then
         a_frs1516.qrtwkchd := gse.Integer_Value( cursor, 849 );
      end if;
      if not gse.Is_Null( cursor, 850 )then
         a_frs1516.qrtwkcsp := gse.Integer_Value( cursor, 850 );
      end if;
      if not gse.Is_Null( cursor, 851 )then
         a_frs1516.qothbehd := gse.Integer_Value( cursor, 851 );
      end if;
      if not gse.Is_Null( cursor, 852 )then
         a_frs1516.qothbesp := gse.Integer_Value( cursor, 852 );
      end if;
      if not gse.Is_Null( cursor, 853 )then
         a_frs1516.othtaxhd := gse.Integer_Value( cursor, 853 );
      end if;
      if not gse.Is_Null( cursor, 854 )then
         a_frs1516.othtaxsp := gse.Integer_Value( cursor, 854 );
      end if;
      if not gse.Is_Null( cursor, 855 )then
         a_frs1516.otinvahd := gse.Integer_Value( cursor, 855 );
      end if;
      if not gse.Is_Null( cursor, 856 )then
         a_frs1516.otinvasp := gse.Integer_Value( cursor, 856 );
      end if;
      if not gse.Is_Null( cursor, 857 )then
         a_frs1516.pareamhd:= Amount'Value( gse.Value( cursor, 857 ));
      end if;
      if not gse.Is_Null( cursor, 858 )then
         a_frs1516.pareamsp:= Amount'Value( gse.Value( cursor, 858 ));
      end if;
      if not gse.Is_Null( cursor, 859 )then
         a_frs1516.qpchd := gse.Integer_Value( cursor, 859 );
      end if;
      if not gse.Is_Null( cursor, 860 )then
         a_frs1516.qpcsp := gse.Integer_Value( cursor, 860 );
      end if;
      if not gse.Is_Null( cursor, 861 )then
         a_frs1516.qrphd := gse.Integer_Value( cursor, 861 );
      end if;
      if not gse.Is_Null( cursor, 862 )then
         a_frs1516.qrpsp := gse.Integer_Value( cursor, 862 );
      end if;
      if not gse.Is_Null( cursor, 863 )then
         a_frs1516.qbbhd := gse.Integer_Value( cursor, 863 );
      end if;
      if not gse.Is_Null( cursor, 864 )then
         a_frs1516.qbbsp := gse.Integer_Value( cursor, 864 );
      end if;
      if not gse.Is_Null( cursor, 865 )then
         a_frs1516.qafcshd := gse.Integer_Value( cursor, 865 );
      end if;
      if not gse.Is_Null( cursor, 866 )then
         a_frs1516.qafcssp := gse.Integer_Value( cursor, 866 );
      end if;
      if not gse.Is_Null( cursor, 867 )then
         a_frs1516.qwwphd := gse.Integer_Value( cursor, 867 );
      end if;
      if not gse.Is_Null( cursor, 868 )then
         a_frs1516.qwwpsp := gse.Integer_Value( cursor, 868 );
      end if;
      if not gse.Is_Null( cursor, 869 )then
         a_frs1516.penflghd := gse.Integer_Value( cursor, 869 );
      end if;
      if not gse.Is_Null( cursor, 870 )then
         a_frs1516.penflgsp := gse.Integer_Value( cursor, 870 );
      end if;
      if not gse.Is_Null( cursor, 871 )then
         a_frs1516.penwl1hd := gse.Integer_Value( cursor, 871 );
      end if;
      if not gse.Is_Null( cursor, 872 )then
         a_frs1516.penwl1sp := gse.Integer_Value( cursor, 872 );
      end if;
      if not gse.Is_Null( cursor, 873 )then
         a_frs1516.penwl2hd := gse.Integer_Value( cursor, 873 );
      end if;
      if not gse.Is_Null( cursor, 874 )then
         a_frs1516.penwl2sp := gse.Integer_Value( cursor, 874 );
      end if;
      if not gse.Is_Null( cursor, 875 )then
         a_frs1516.penwl3hd := gse.Integer_Value( cursor, 875 );
      end if;
      if not gse.Is_Null( cursor, 876 )then
         a_frs1516.penwl3sp := gse.Integer_Value( cursor, 876 );
      end if;
      if not gse.Is_Null( cursor, 877 )then
         a_frs1516.penwl4hd := gse.Integer_Value( cursor, 877 );
      end if;
      if not gse.Is_Null( cursor, 878 )then
         a_frs1516.penwl4sp := gse.Integer_Value( cursor, 878 );
      end if;
      if not gse.Is_Null( cursor, 879 )then
         a_frs1516.penwl5hd := gse.Integer_Value( cursor, 879 );
      end if;
      if not gse.Is_Null( cursor, 880 )then
         a_frs1516.penwl5sp := gse.Integer_Value( cursor, 880 );
      end if;
      if not gse.Is_Null( cursor, 881 )then
         a_frs1516.penwl6hd := gse.Integer_Value( cursor, 881 );
      end if;
      if not gse.Is_Null( cursor, 882 )then
         a_frs1516.penwl6sp := gse.Integer_Value( cursor, 882 );
      end if;
      if not gse.Is_Null( cursor, 883 )then
         a_frs1516.pepscthd := gse.Integer_Value( cursor, 883 );
      end if;
      if not gse.Is_Null( cursor, 884 )then
         a_frs1516.pepsctsp := gse.Integer_Value( cursor, 884 );
      end if;
      if not gse.Is_Null( cursor, 885 )then
         a_frs1516.personhd := gse.Integer_Value( cursor, 885 );
      end if;
      if not gse.Is_Null( cursor, 886 )then
         a_frs1516.personsp := gse.Integer_Value( cursor, 886 );
      end if;
      if not gse.Is_Null( cursor, 887 )then
         a_frs1516.qpipdhd := gse.Integer_Value( cursor, 887 );
      end if;
      if not gse.Is_Null( cursor, 888 )then
         a_frs1516.qpipdsp := gse.Integer_Value( cursor, 888 );
      end if;
      if not gse.Is_Null( cursor, 889 )then
         a_frs1516.qpipmhd := gse.Integer_Value( cursor, 889 );
      end if;
      if not gse.Is_Null( cursor, 890 )then
         a_frs1516.qpipmsp := gse.Integer_Value( cursor, 890 );
      end if;
      if not gse.Is_Null( cursor, 891 )then
         a_frs1516.poaccthd := gse.Integer_Value( cursor, 891 );
      end if;
      if not gse.Is_Null( cursor, 892 )then
         a_frs1516.poacctsp := gse.Integer_Value( cursor, 892 );
      end if;
      if not gse.Is_Null( cursor, 893 )then
         a_frs1516.pocardhd := gse.Integer_Value( cursor, 893 );
      end if;
      if not gse.Is_Null( cursor, 894 )then
         a_frs1516.pocardsp := gse.Integer_Value( cursor, 894 );
      end if;
      if not gse.Is_Null( cursor, 895 )then
         a_frs1516.ppnumchd := gse.Integer_Value( cursor, 895 );
      end if;
      if not gse.Is_Null( cursor, 896 )then
         a_frs1516.ppnumcsp := gse.Integer_Value( cursor, 896 );
      end if;
      if not gse.Is_Null( cursor, 897 )then
         a_frs1516.proptxhd:= Amount'Value( gse.Value( cursor, 897 ));
      end if;
      if not gse.Is_Null( cursor, 898 )then
         a_frs1516.proptxsp:= Amount'Value( gse.Value( cursor, 898 ));
      end if;
      if not gse.Is_Null( cursor, 899 )then
         a_frs1516.ptwkyrhd := gse.Integer_Value( cursor, 899 );
      end if;
      if not gse.Is_Null( cursor, 900 )then
         a_frs1516.ptwkyrsp := gse.Integer_Value( cursor, 900 );
      end if;
      if not gse.Is_Null( cursor, 901 )then
         a_frs1516.relp1hd := gse.Integer_Value( cursor, 901 );
      end if;
      if not gse.Is_Null( cursor, 902 )then
         a_frs1516.relp1sp := gse.Integer_Value( cursor, 902 );
      end if;
      if not gse.Is_Null( cursor, 903 )then
         a_frs1516.relp2hd := gse.Integer_Value( cursor, 903 );
      end if;
      if not gse.Is_Null( cursor, 904 )then
         a_frs1516.relp2sp := gse.Integer_Value( cursor, 904 );
      end if;
      if not gse.Is_Null( cursor, 905 )then
         a_frs1516.relp3hd := gse.Integer_Value( cursor, 905 );
      end if;
      if not gse.Is_Null( cursor, 906 )then
         a_frs1516.relp3sp := gse.Integer_Value( cursor, 906 );
      end if;
      if not gse.Is_Null( cursor, 907 )then
         a_frs1516.relp4hd := gse.Integer_Value( cursor, 907 );
      end if;
      if not gse.Is_Null( cursor, 908 )then
         a_frs1516.relp4sp := gse.Integer_Value( cursor, 908 );
      end if;
      if not gse.Is_Null( cursor, 909 )then
         a_frs1516.relp5hd := gse.Integer_Value( cursor, 909 );
      end if;
      if not gse.Is_Null( cursor, 910 )then
         a_frs1516.relp5sp := gse.Integer_Value( cursor, 910 );
      end if;
      if not gse.Is_Null( cursor, 911 )then
         a_frs1516.relp6hd := gse.Integer_Value( cursor, 911 );
      end if;
      if not gse.Is_Null( cursor, 912 )then
         a_frs1516.relp6sp := gse.Integer_Value( cursor, 912 );
      end if;
      if not gse.Is_Null( cursor, 913 )then
         a_frs1516.relp7hd := gse.Integer_Value( cursor, 913 );
      end if;
      if not gse.Is_Null( cursor, 914 )then
         a_frs1516.relp7sp := gse.Integer_Value( cursor, 914 );
      end if;
      if not gse.Is_Null( cursor, 915 )then
         a_frs1516.relp8hd := gse.Integer_Value( cursor, 915 );
      end if;
      if not gse.Is_Null( cursor, 916 )then
         a_frs1516.relp8sp := gse.Integer_Value( cursor, 916 );
      end if;
      if not gse.Is_Null( cursor, 917 )then
         a_frs1516.relp9hd := gse.Integer_Value( cursor, 917 );
      end if;
      if not gse.Is_Null( cursor, 918 )then
         a_frs1516.relp9sp := gse.Integer_Value( cursor, 918 );
      end if;
      if not gse.Is_Null( cursor, 919 )then
         a_frs1516.relp10hd := gse.Integer_Value( cursor, 919 );
      end if;
      if not gse.Is_Null( cursor, 920 )then
         a_frs1516.relp10sp := gse.Integer_Value( cursor, 920 );
      end if;
      if not gse.Is_Null( cursor, 921 )then
         a_frs1516.relp11hd := gse.Integer_Value( cursor, 921 );
      end if;
      if not gse.Is_Null( cursor, 922 )then
         a_frs1516.relp11sp := gse.Integer_Value( cursor, 922 );
      end if;
      if not gse.Is_Null( cursor, 923 )then
         a_frs1516.relp12hd := gse.Integer_Value( cursor, 923 );
      end if;
      if not gse.Is_Null( cursor, 924 )then
         a_frs1516.relp12sp := gse.Integer_Value( cursor, 924 );
      end if;
      if not gse.Is_Null( cursor, 925 )then
         a_frs1516.relp13hd := gse.Integer_Value( cursor, 925 );
      end if;
      if not gse.Is_Null( cursor, 926 )then
         a_frs1516.relp13sp := gse.Integer_Value( cursor, 926 );
      end if;
      if not gse.Is_Null( cursor, 927 )then
         a_frs1516.relp14hd := gse.Integer_Value( cursor, 927 );
      end if;
      if not gse.Is_Null( cursor, 928 )then
         a_frs1516.relp14sp := gse.Integer_Value( cursor, 928 );
      end if;
      if not gse.Is_Null( cursor, 929 )then
         a_frs1516.reasonhd := gse.Integer_Value( cursor, 929 );
      end if;
      if not gse.Is_Null( cursor, 930 )then
         a_frs1516.reasonsp := gse.Integer_Value( cursor, 930 );
      end if;
      if not gse.Is_Null( cursor, 931 )then
         a_frs1516.redamthd:= Amount'Value( gse.Value( cursor, 931 ));
      end if;
      if not gse.Is_Null( cursor, 932 )then
         a_frs1516.redamtsp:= Amount'Value( gse.Value( cursor, 932 ));
      end if;
      if not gse.Is_Null( cursor, 933 )then
         a_frs1516.redundhd := gse.Integer_Value( cursor, 933 );
      end if;
      if not gse.Is_Null( cursor, 934 )then
         a_frs1516.redundsp := gse.Integer_Value( cursor, 934 );
      end if;
      if not gse.Is_Null( cursor, 935 )then
         a_frs1516.rednethd := gse.Integer_Value( cursor, 935 );
      end if;
      if not gse.Is_Null( cursor, 936 )then
         a_frs1516.rednetsp := gse.Integer_Value( cursor, 936 );
      end if;
      if not gse.Is_Null( cursor, 937 )then
         a_frs1516.redtaxhd := gse.Integer_Value( cursor, 937 );
      end if;
      if not gse.Is_Null( cursor, 938 )then
         a_frs1516.redtaxsp := gse.Integer_Value( cursor, 938 );
      end if;
      if not gse.Is_Null( cursor, 939 )then
         a_frs1516.relhrphd := gse.Integer_Value( cursor, 939 );
      end if;
      if not gse.Is_Null( cursor, 940 )then
         a_frs1516.relhrpsp := gse.Integer_Value( cursor, 940 );
      end if;
      if not gse.Is_Null( cursor, 941 )then
         a_frs1516.relgewhd := gse.Integer_Value( cursor, 941 );
      end if;
      if not gse.Is_Null( cursor, 942 )then
         a_frs1516.relgewsp := gse.Integer_Value( cursor, 942 );
      end if;
      if not gse.Is_Null( cursor, 943 )then
         a_frs1516.relgschd := gse.Integer_Value( cursor, 943 );
      end if;
      if not gse.Is_Null( cursor, 944 )then
         a_frs1516.relgscsp := gse.Integer_Value( cursor, 944 );
      end if;
      if not gse.Is_Null( cursor, 945 )then
         a_frs1516.rprofhd := gse.Integer_Value( cursor, 945 );
      end if;
      if not gse.Is_Null( cursor, 946 )then
         a_frs1516.rprofsp := gse.Integer_Value( cursor, 946 );
      end if;
      if not gse.Is_Null( cursor, 947 )then
         a_frs1516.retirehd := gse.Integer_Value( cursor, 947 );
      end if;
      if not gse.Is_Null( cursor, 948 )then
         a_frs1516.retiresp := gse.Integer_Value( cursor, 948 );
      end if;
      if not gse.Is_Null( cursor, 949 )then
         a_frs1516.retir1hd := gse.Integer_Value( cursor, 949 );
      end if;
      if not gse.Is_Null( cursor, 950 )then
         a_frs1516.retir1sp := gse.Integer_Value( cursor, 950 );
      end if;
      if not gse.Is_Null( cursor, 951 )then
         a_frs1516.retreshd := gse.Integer_Value( cursor, 951 );
      end if;
      if not gse.Is_Null( cursor, 952 )then
         a_frs1516.retressp := gse.Integer_Value( cursor, 952 );
      end if;
      if not gse.Is_Null( cursor, 953 )then
         a_frs1516.renthd:= Amount'Value( gse.Value( cursor, 953 ));
      end if;
      if not gse.Is_Null( cursor, 954 )then
         a_frs1516.rentsp:= Amount'Value( gse.Value( cursor, 954 ));
      end if;
      if not gse.Is_Null( cursor, 955 )then
         a_frs1516.royalhd:= Amount'Value( gse.Value( cursor, 955 ));
      end if;
      if not gse.Is_Null( cursor, 956 )then
         a_frs1516.royalsp:= Amount'Value( gse.Value( cursor, 956 ));
      end if;
      if not gse.Is_Null( cursor, 957 )then
         a_frs1516.sleephd:= Amount'Value( gse.Value( cursor, 957 ));
      end if;
      if not gse.Is_Null( cursor, 958 )then
         a_frs1516.sleepsp:= Amount'Value( gse.Value( cursor, 958 ));
      end if;
      if not gse.Is_Null( cursor, 959 )then
         a_frs1516.forpenhd:= Amount'Value( gse.Value( cursor, 959 ));
      end if;
      if not gse.Is_Null( cursor, 960 )then
         a_frs1516.forpensp:= Amount'Value( gse.Value( cursor, 960 ));
      end if;
      if not gse.Is_Null( cursor, 961 )then
         a_frs1516.restrchd := gse.Integer_Value( cursor, 961 );
      end if;
      if not gse.Is_Null( cursor, 962 )then
         a_frs1516.restrcsp := gse.Integer_Value( cursor, 962 );
      end if;
      if not gse.Is_Null( cursor, 963 )then
         a_frs1516.sapadjhd := gse.Integer_Value( cursor, 963 );
      end if;
      if not gse.Is_Null( cursor, 964 )then
         a_frs1516.sapadjsp := gse.Integer_Value( cursor, 964 );
      end if;
      if not gse.Is_Null( cursor, 965 )then
         a_frs1516.sdem01hd := gse.Integer_Value( cursor, 965 );
      end if;
      if not gse.Is_Null( cursor, 966 )then
         a_frs1516.sdem01sp := gse.Integer_Value( cursor, 966 );
      end if;
      if not gse.Is_Null( cursor, 967 )then
         a_frs1516.sdem02hd := gse.Integer_Value( cursor, 967 );
      end if;
      if not gse.Is_Null( cursor, 968 )then
         a_frs1516.sdem02sp := gse.Integer_Value( cursor, 968 );
      end if;
      if not gse.Is_Null( cursor, 969 )then
         a_frs1516.sdem03hd := gse.Integer_Value( cursor, 969 );
      end if;
      if not gse.Is_Null( cursor, 970 )then
         a_frs1516.sdem03sp := gse.Integer_Value( cursor, 970 );
      end if;
      if not gse.Is_Null( cursor, 971 )then
         a_frs1516.sdem04hd := gse.Integer_Value( cursor, 971 );
      end if;
      if not gse.Is_Null( cursor, 972 )then
         a_frs1516.sdem04sp := gse.Integer_Value( cursor, 972 );
      end if;
      if not gse.Is_Null( cursor, 973 )then
         a_frs1516.sdem05hd := gse.Integer_Value( cursor, 973 );
      end if;
      if not gse.Is_Null( cursor, 974 )then
         a_frs1516.sdem05sp := gse.Integer_Value( cursor, 974 );
      end if;
      if not gse.Is_Null( cursor, 975 )then
         a_frs1516.sdem06hd := gse.Integer_Value( cursor, 975 );
      end if;
      if not gse.Is_Null( cursor, 976 )then
         a_frs1516.sdem06sp := gse.Integer_Value( cursor, 976 );
      end if;
      if not gse.Is_Null( cursor, 977 )then
         a_frs1516.sdem07hd := gse.Integer_Value( cursor, 977 );
      end if;
      if not gse.Is_Null( cursor, 978 )then
         a_frs1516.sdem07sp := gse.Integer_Value( cursor, 978 );
      end if;
      if not gse.Is_Null( cursor, 979 )then
         a_frs1516.sdem08hd := gse.Integer_Value( cursor, 979 );
      end if;
      if not gse.Is_Null( cursor, 980 )then
         a_frs1516.sdem08sp := gse.Integer_Value( cursor, 980 );
      end if;
      if not gse.Is_Null( cursor, 981 )then
         a_frs1516.sdem09hd := gse.Integer_Value( cursor, 981 );
      end if;
      if not gse.Is_Null( cursor, 982 )then
         a_frs1516.sdem09sp := gse.Integer_Value( cursor, 982 );
      end if;
      if not gse.Is_Null( cursor, 983 )then
         a_frs1516.sdem10hd := gse.Integer_Value( cursor, 983 );
      end if;
      if not gse.Is_Null( cursor, 984 )then
         a_frs1516.sdem10sp := gse.Integer_Value( cursor, 984 );
      end if;
      if not gse.Is_Null( cursor, 985 )then
         a_frs1516.sdem11hd := gse.Integer_Value( cursor, 985 );
      end if;
      if not gse.Is_Null( cursor, 986 )then
         a_frs1516.sdem11sp := gse.Integer_Value( cursor, 986 );
      end if;
      if not gse.Is_Null( cursor, 987 )then
         a_frs1516.sdem12hd := gse.Integer_Value( cursor, 987 );
      end if;
      if not gse.Is_Null( cursor, 988 )then
         a_frs1516.sdem12sp := gse.Integer_Value( cursor, 988 );
      end if;
      if not gse.Is_Null( cursor, 989 )then
         a_frs1516.inseinhd := gse.Integer_Value( cursor, 989 );
      end if;
      if not gse.Is_Null( cursor, 990 )then
         a_frs1516.inseinsp := gse.Integer_Value( cursor, 990 );
      end if;
      if not gse.Is_Null( cursor, 991 )then
         a_frs1516.sdemphd := gse.Integer_Value( cursor, 991 );
      end if;
      if not gse.Is_Null( cursor, 992 )then
         a_frs1516.sdempsp := gse.Integer_Value( cursor, 992 );
      end if;
      if not gse.Is_Null( cursor, 993 )then
         a_frs1516.sexhd := gse.Integer_Value( cursor, 993 );
      end if;
      if not gse.Is_Null( cursor, 994 )then
         a_frs1516.sexsp := gse.Integer_Value( cursor, 994 );
      end if;
      if not gse.Is_Null( cursor, 995 )then
         a_frs1516.sichd := gse.Integer_Value( cursor, 995 );
      end if;
      if not gse.Is_Null( cursor, 996 )then
         a_frs1516.sicsp := gse.Integer_Value( cursor, 996 );
      end if;
      if not gse.Is_Null( cursor, 997 )then
         a_frs1516.sidqnhd := gse.Integer_Value( cursor, 997 );
      end if;
      if not gse.Is_Null( cursor, 998 )then
         a_frs1516.sidqnsp := gse.Integer_Value( cursor, 998 );
      end if;
      if not gse.Is_Null( cursor, 999 )then
         a_frs1516.sloshd := gse.Integer_Value( cursor, 999 );
      end if;
      if not gse.Is_Null( cursor, 1000 )then
         a_frs1516.slossp := gse.Integer_Value( cursor, 1000 );
      end if;
      if not gse.Is_Null( cursor, 1001 )then
         a_frs1516.slramthd:= Amount'Value( gse.Value( cursor, 1001 ));
      end if;
      if not gse.Is_Null( cursor, 1002 )then
         a_frs1516.slramtsp:= Amount'Value( gse.Value( cursor, 1002 ));
      end if;
      if not gse.Is_Null( cursor, 1003 )then
         a_frs1516.slrppdhd := gse.Integer_Value( cursor, 1003 );
      end if;
      if not gse.Is_Null( cursor, 1004 )then
         a_frs1516.slrppdsp := gse.Integer_Value( cursor, 1004 );
      end if;
      if not gse.Is_Null( cursor, 1005 )then
         a_frs1516.smpajhd:= Amount'Value( gse.Value( cursor, 1005 ));
      end if;
      if not gse.Is_Null( cursor, 1006 )then
         a_frs1516.smpajsp:= Amount'Value( gse.Value( cursor, 1006 ));
      end if;
      if not gse.Is_Null( cursor, 1007 )then
         a_frs1516.sc2010hd := gse.Integer_Value( cursor, 1007 );
      end if;
      if not gse.Is_Null( cursor, 1008 )then
         a_frs1516.sc2010sp := gse.Integer_Value( cursor, 1008 );
      end if;
      if not gse.Is_Null( cursor, 1009 )then
         a_frs1516.qsfgrhd := gse.Integer_Value( cursor, 1009 );
      end if;
      if not gse.Is_Null( cursor, 1010 )then
         a_frs1516.qsfgrsp := gse.Integer_Value( cursor, 1010 );
      end if;
      if not gse.Is_Null( cursor, 1011 )then
         a_frs1516.qssmthd := gse.Integer_Value( cursor, 1011 );
      end if;
      if not gse.Is_Null( cursor, 1012 )then
         a_frs1516.qssmtsp := gse.Integer_Value( cursor, 1012 );
      end if;
      if not gse.Is_Null( cursor, 1013 )then
         a_frs1516.qlgdwphd := gse.Integer_Value( cursor, 1013 );
      end if;
      if not gse.Is_Null( cursor, 1014 )then
         a_frs1516.qlgdwpsp := gse.Integer_Value( cursor, 1014 );
      end if;
      if not gse.Is_Null( cursor, 1015 )then
         a_frs1516.qlglahd := gse.Integer_Value( cursor, 1015 );
      end if;
      if not gse.Is_Null( cursor, 1016 )then
         a_frs1516.qlglasp := gse.Integer_Value( cursor, 1016 );
      end if;
      if not gse.Is_Null( cursor, 1017 )then
         a_frs1516.blindhd := gse.Integer_Value( cursor, 1017 );
      end if;
      if not gse.Is_Null( cursor, 1018 )then
         a_frs1516.blindsp := gse.Integer_Value( cursor, 1018 );
      end if;
      if not gse.Is_Null( cursor, 1019 )then
         a_frs1516.parsihd := gse.Integer_Value( cursor, 1019 );
      end if;
      if not gse.Is_Null( cursor, 1020 )then
         a_frs1516.parsisp := gse.Integer_Value( cursor, 1020 );
      end if;
      if not gse.Is_Null( cursor, 1021 )then
         a_frs1516.deafhd := gse.Integer_Value( cursor, 1021 );
      end if;
      if not gse.Is_Null( cursor, 1022 )then
         a_frs1516.deafsp := gse.Integer_Value( cursor, 1022 );
      end if;
      if not gse.Is_Null( cursor, 1023 )then
         a_frs1516.spouthd := gse.Integer_Value( cursor, 1023 );
      end if;
      if not gse.Is_Null( cursor, 1024 )then
         a_frs1516.spoutsp := gse.Integer_Value( cursor, 1024 );
      end if;
      if not gse.Is_Null( cursor, 1025 )then
         a_frs1516.sppadjhd:= Amount'Value( gse.Value( cursor, 1025 ));
      end if;
      if not gse.Is_Null( cursor, 1026 )then
         a_frs1516.sppadjsp:= Amount'Value( gse.Value( cursor, 1026 ));
      end if;
      if not gse.Is_Null( cursor, 1027 )then
         a_frs1516.spyrothd := gse.Integer_Value( cursor, 1027 );
      end if;
      if not gse.Is_Null( cursor, 1028 )then
         a_frs1516.spyrotsp := gse.Integer_Value( cursor, 1028 );
      end if;
      if not gse.Is_Null( cursor, 1029 )then
         a_frs1516.srentahd:= Amount'Value( gse.Value( cursor, 1029 ));
      end if;
      if not gse.Is_Null( cursor, 1030 )then
         a_frs1516.srentasp:= Amount'Value( gse.Value( cursor, 1030 ));
      end if;
      if not gse.Is_Null( cursor, 1031 )then
         a_frs1516.psrenthd := gse.Integer_Value( cursor, 1031 );
      end if;
      if not gse.Is_Null( cursor, 1032 )then
         a_frs1516.psrentsp := gse.Integer_Value( cursor, 1032 );
      end if;
      if not gse.Is_Null( cursor, 1033 )then
         a_frs1516.sfispchd := gse.Integer_Value( cursor, 1033 );
      end if;
      if not gse.Is_Null( cursor, 1034 )then
         a_frs1516.sfispcsp := gse.Integer_Value( cursor, 1034 );
      end if;
      if not gse.Is_Null( cursor, 1035 )then
         a_frs1516.sfjesahd := gse.Integer_Value( cursor, 1035 );
      end if;
      if not gse.Is_Null( cursor, 1036 )then
         a_frs1516.sfjesasp := gse.Integer_Value( cursor, 1036 );
      end if;
      if not gse.Is_Null( cursor, 1037 )then
         a_frs1516.sruchd := gse.Integer_Value( cursor, 1037 );
      end if;
      if not gse.Is_Null( cursor, 1038 )then
         a_frs1516.srucsp := gse.Integer_Value( cursor, 1038 );
      end if;
      if not gse.Is_Null( cursor, 1039 )then
         a_frs1516.sspajhd:= Amount'Value( gse.Value( cursor, 1039 ));
      end if;
      if not gse.Is_Null( cursor, 1040 )then
         a_frs1516.sspajsp:= Amount'Value( gse.Value( cursor, 1040 ));
      end if;
      if not gse.Is_Null( cursor, 1041 )then
         a_frs1516.gtsavahd := gse.Integer_Value( cursor, 1041 );
      end if;
      if not gse.Is_Null( cursor, 1042 )then
         a_frs1516.gtsavasp := gse.Integer_Value( cursor, 1042 );
      end if;
      if not gse.Is_Null( cursor, 1043 )then
         a_frs1516.stshcthd := gse.Integer_Value( cursor, 1043 );
      end if;
      if not gse.Is_Null( cursor, 1044 )then
         a_frs1516.stshctsp := gse.Integer_Value( cursor, 1044 );
      end if;
      if not gse.Is_Null( cursor, 1045 )then
         a_frs1516.tdaywkhd := gse.Integer_Value( cursor, 1045 );
      end if;
      if not gse.Is_Null( cursor, 1046 )then
         a_frs1516.tdaywksp := gse.Integer_Value( cursor, 1046 );
      end if;
      if not gse.Is_Null( cursor, 1047 )then
         a_frs1516.agefedhd := gse.Integer_Value( cursor, 1047 );
      end if;
      if not gse.Is_Null( cursor, 1048 )then
         a_frs1516.agefedsp := gse.Integer_Value( cursor, 1048 );
      end if;
      if not gse.Is_Null( cursor, 1049 )then
         a_frs1516.tmpjobhd := gse.Integer_Value( cursor, 1049 );
      end if;
      if not gse.Is_Null( cursor, 1050 )then
         a_frs1516.tmpjobsp := gse.Integer_Value( cursor, 1050 );
      end if;
      if not gse.Is_Null( cursor, 1051 )then
         a_frs1516.tesscthd := gse.Integer_Value( cursor, 1051 );
      end if;
      if not gse.Is_Null( cursor, 1052 )then
         a_frs1516.tessctsp := gse.Integer_Value( cursor, 1052 );
      end if;
      if not gse.Is_Null( cursor, 1053 )then
         a_frs1516.totgrahd := gse.Integer_Value( cursor, 1053 );
      end if;
      if not gse.Is_Null( cursor, 1054 )then
         a_frs1516.totgrasp:= Amount'Value( gse.Value( cursor, 1054 ));
      end if;
      if not gse.Is_Null( cursor, 1055 )then
         a_frs1516.tothouhd:= Amount'Value( gse.Value( cursor, 1055 ));
      end if;
      if not gse.Is_Null( cursor, 1056 )then
         a_frs1516.tothousp:= Amount'Value( gse.Value( cursor, 1056 ));
      end if;
      if not gse.Is_Null( cursor, 1057 )then
         a_frs1516.totinthd:= Amount'Value( gse.Value( cursor, 1057 ));
      end if;
      if not gse.Is_Null( cursor, 1058 )then
         a_frs1516.totintsp:= Amount'Value( gse.Value( cursor, 1058 ));
      end if;
      if not gse.Is_Null( cursor, 1059 )then
         a_frs1516.totocchd:= Amount'Value( gse.Value( cursor, 1059 ));
      end if;
      if not gse.Is_Null( cursor, 1060 )then
         a_frs1516.totoccsp:= Amount'Value( gse.Value( cursor, 1060 ));
      end if;
      if not gse.Is_Null( cursor, 1061 )then
         a_frs1516.trainhd := gse.Integer_Value( cursor, 1061 );
      end if;
      if not gse.Is_Null( cursor, 1062 )then
         a_frs1516.trainsp := gse.Integer_Value( cursor, 1062 );
      end if;
      if not gse.Is_Null( cursor, 1063 )then
         a_frs1516.trnallhd := gse.Integer_Value( cursor, 1063 );
      end if;
      if not gse.Is_Null( cursor, 1064 )then
         a_frs1516.trnallsp := gse.Integer_Value( cursor, 1064 );
      end if;
      if not gse.Is_Null( cursor, 1065 )then
         a_frs1516.ttbprxhd:= Amount'Value( gse.Value( cursor, 1065 ));
      end if;
      if not gse.Is_Null( cursor, 1066 )then
         a_frs1516.ttbprxsp:= Amount'Value( gse.Value( cursor, 1066 ));
      end if;
      if not gse.Is_Null( cursor, 1067 )then
         a_frs1516.tuborrhd := gse.Integer_Value( cursor, 1067 );
      end if;
      if not gse.Is_Null( cursor, 1068 )then
         a_frs1516.tuborrsp := gse.Integer_Value( cursor, 1068 );
      end if;
      if not gse.Is_Null( cursor, 1069 )then
         a_frs1516.typeedhd := gse.Integer_Value( cursor, 1069 );
      end if;
      if not gse.Is_Null( cursor, 1070 )then
         a_frs1516.typeedsp := gse.Integer_Value( cursor, 1070 );
      end if;
      if not gse.Is_Null( cursor, 1071 )then
         a_frs1516.unpd1hd := gse.Integer_Value( cursor, 1071 );
      end if;
      if not gse.Is_Null( cursor, 1072 )then
         a_frs1516.unpd1sp := gse.Integer_Value( cursor, 1072 );
      end if;
      if not gse.Is_Null( cursor, 1073 )then
         a_frs1516.unpd2hd := gse.Integer_Value( cursor, 1073 );
      end if;
      if not gse.Is_Null( cursor, 1074 )then
         a_frs1516.unpd2sp := gse.Integer_Value( cursor, 1074 );
      end if;
      if not gse.Is_Null( cursor, 1075 )then
         a_frs1516.untrcthd := gse.Integer_Value( cursor, 1075 );
      end if;
      if not gse.Is_Null( cursor, 1076 )then
         a_frs1516.untrctsp := gse.Integer_Value( cursor, 1076 );
      end if;
      if not gse.Is_Null( cursor, 1077 )then
         a_frs1516.upersohd := gse.Integer_Value( cursor, 1077 );
      end if;
      if not gse.Is_Null( cursor, 1078 )then
         a_frs1516.upersosp := gse.Integer_Value( cursor, 1078 );
      end if;
      if not gse.Is_Null( cursor, 1079 )then
         a_frs1516.agewidhd := gse.Integer_Value( cursor, 1079 );
      end if;
      if not gse.Is_Null( cursor, 1080 )then
         a_frs1516.agewidsp := gse.Integer_Value( cursor, 1080 );
      end if;
      if not gse.Is_Null( cursor, 1081 )then
         a_frs1516.kidwidhd := gse.Integer_Value( cursor, 1081 );
      end if;
      if not gse.Is_Null( cursor, 1082 )then
         a_frs1516.kidwidsp := gse.Integer_Value( cursor, 1082 );
      end if;
      if not gse.Is_Null( cursor, 1083 )then
         a_frs1516.quchd := gse.Integer_Value( cursor, 1083 );
      end if;
      if not gse.Is_Null( cursor, 1084 )then
         a_frs1516.qucsp := gse.Integer_Value( cursor, 1084 );
      end if;
      if not gse.Is_Null( cursor, 1085 )then
         a_frs1516.qhbhd := gse.Integer_Value( cursor, 1085 );
      end if;
      if not gse.Is_Null( cursor, 1086 )then
         a_frs1516.qhbsp := gse.Integer_Value( cursor, 1086 );
      end if;
      if not gse.Is_Null( cursor, 1087 )then
         a_frs1516.qwtchd := gse.Integer_Value( cursor, 1087 );
      end if;
      if not gse.Is_Null( cursor, 1088 )then
         a_frs1516.qwtcsp := gse.Integer_Value( cursor, 1088 );
      end if;
      if not gse.Is_Null( cursor, 1089 )then
         a_frs1516.qctchd := gse.Integer_Value( cursor, 1089 );
      end if;
      if not gse.Is_Null( cursor, 1090 )then
         a_frs1516.qctcsp := gse.Integer_Value( cursor, 1090 );
      end if;
      if not gse.Is_Null( cursor, 1091 )then
         a_frs1516.qishd := gse.Integer_Value( cursor, 1091 );
      end if;
      if not gse.Is_Null( cursor, 1092 )then
         a_frs1516.qissp := gse.Integer_Value( cursor, 1092 );
      end if;
      if not gse.Is_Null( cursor, 1093 )then
         a_frs1516.qjsahd := gse.Integer_Value( cursor, 1093 );
      end if;
      if not gse.Is_Null( cursor, 1094 )then
         a_frs1516.qjsasp := gse.Integer_Value( cursor, 1094 );
      end if;
      if not gse.Is_Null( cursor, 1095 )then
         a_frs1516.qesahd := gse.Integer_Value( cursor, 1095 );
      end if;
      if not gse.Is_Null( cursor, 1096 )then
         a_frs1516.qesasp := gse.Integer_Value( cursor, 1096 );
      end if;
      if not gse.Is_Null( cursor, 1097 )then
         a_frs1516.qcahd := gse.Integer_Value( cursor, 1097 );
      end if;
      if not gse.Is_Null( cursor, 1098 )then
         a_frs1516.qcasp := gse.Integer_Value( cursor, 1098 );
      end if;
      if not gse.Is_Null( cursor, 1099 )then
         a_frs1516.waithd := gse.Integer_Value( cursor, 1099 );
      end if;
      if not gse.Is_Null( cursor, 1100 )then
         a_frs1516.waitsp := gse.Integer_Value( cursor, 1100 );
      end if;
      if not gse.Is_Null( cursor, 1101 )then
         a_frs1516.whresphd := gse.Integer_Value( cursor, 1101 );
      end if;
      if not gse.Is_Null( cursor, 1102 )then
         a_frs1516.whrespsp := gse.Integer_Value( cursor, 1102 );
      end if;
      if not gse.Is_Null( cursor, 1103 )then
         a_frs1516.whoctbhd := gse.Integer_Value( cursor, 1103 );
      end if;
      if not gse.Is_Null( cursor, 1104 )then
         a_frs1516.whoctbsp := gse.Integer_Value( cursor, 1104 );
      end if;
      if not gse.Is_Null( cursor, 1105 )then
         a_frs1516.widocchd:= Amount'Value( gse.Value( cursor, 1105 ));
      end if;
      if not gse.Is_Null( cursor, 1106 )then
         a_frs1516.widoccsp:= Amount'Value( gse.Value( cursor, 1106 ));
      end if;
      if not gse.Is_Null( cursor, 1107 )then
         a_frs1516.wintflhd := gse.Integer_Value( cursor, 1107 );
      end if;
      if not gse.Is_Null( cursor, 1108 )then
         a_frs1516.wintflsp := gse.Integer_Value( cursor, 1108 );
      end if;
      if not gse.Is_Null( cursor, 1109 )then
         a_frs1516.workinhd := gse.Integer_Value( cursor, 1109 );
      end if;
      if not gse.Is_Null( cursor, 1110 )then
         a_frs1516.workinsp := gse.Integer_Value( cursor, 1110 );
      end if;
      if not gse.Is_Null( cursor, 1111 )then
         a_frs1516.wpahd := gse.Integer_Value( cursor, 1111 );
      end if;
      if not gse.Is_Null( cursor, 1112 )then
         a_frs1516.wpasp := gse.Integer_Value( cursor, 1112 );
      end if;
      if not gse.Is_Null( cursor, 1113 )then
         a_frs1516.wpbahd := gse.Integer_Value( cursor, 1113 );
      end if;
      if not gse.Is_Null( cursor, 1114 )then
         a_frs1516.wpbasp := gse.Integer_Value( cursor, 1114 );
      end if;
      if not gse.Is_Null( cursor, 1115 )then
         a_frs1516.wtclm1hd := gse.Integer_Value( cursor, 1115 );
      end if;
      if not gse.Is_Null( cursor, 1116 )then
         a_frs1516.wtclm1sp := gse.Integer_Value( cursor, 1116 );
      end if;
      if not gse.Is_Null( cursor, 1117 )then
         a_frs1516.wtclm2hd := gse.Integer_Value( cursor, 1117 );
      end if;
      if not gse.Is_Null( cursor, 1118 )then
         a_frs1516.wtclm2sp := gse.Integer_Value( cursor, 1118 );
      end if;
      if not gse.Is_Null( cursor, 1119 )then
         a_frs1516.yjblevhd := gse.Integer_Value( cursor, 1119 );
      end if;
      if not gse.Is_Null( cursor, 1120 )then
         a_frs1516.yjblevsp := gse.Integer_Value( cursor, 1120 );
      end if;
      if not gse.Is_Null( cursor, 1121 )then
         a_frs1516.ystwkhd := gse.Integer_Value( cursor, 1121 );
      end if;
      if not gse.Is_Null( cursor, 1122 )then
         a_frs1516.ystwksp := gse.Integer_Value( cursor, 1122 );
      end if;
      if not gse.Is_Null( cursor, 1123 )then
         a_frs1516.as011hd:= Amount'Value( gse.Value( cursor, 1123 ));
      end if;
      if not gse.Is_Null( cursor, 1124 )then
         a_frs1516.as012hd:= Amount'Value( gse.Value( cursor, 1124 ));
      end if;
      if not gse.Is_Null( cursor, 1125 )then
         a_frs1516.as013hd:= Amount'Value( gse.Value( cursor, 1125 ));
      end if;
      if not gse.Is_Null( cursor, 1126 )then
         a_frs1516.as014hd := gse.Integer_Value( cursor, 1126 );
      end if;
      if not gse.Is_Null( cursor, 1127 )then
         a_frs1516.as011sp:= Amount'Value( gse.Value( cursor, 1127 ));
      end if;
      if not gse.Is_Null( cursor, 1128 )then
         a_frs1516.as012sp:= Amount'Value( gse.Value( cursor, 1128 ));
      end if;
      if not gse.Is_Null( cursor, 1129 )then
         a_frs1516.as013sp := gse.Integer_Value( cursor, 1129 );
      end if;
      if not gse.Is_Null( cursor, 1130 )then
         a_frs1516.as014sp := gse.Integer_Value( cursor, 1130 );
      end if;
      if not gse.Is_Null( cursor, 1131 )then
         a_frs1516.as021hd := gse.Integer_Value( cursor, 1131 );
      end if;
      if not gse.Is_Null( cursor, 1132 )then
         a_frs1516.as022hd := gse.Integer_Value( cursor, 1132 );
      end if;
      if not gse.Is_Null( cursor, 1133 )then
         a_frs1516.as021sp:= Amount'Value( gse.Value( cursor, 1133 ));
      end if;
      if not gse.Is_Null( cursor, 1134 )then
         a_frs1516.as022sp := gse.Integer_Value( cursor, 1134 );
      end if;
      if not gse.Is_Null( cursor, 1135 )then
         a_frs1516.as031hd := gse.Integer_Value( cursor, 1135 );
      end if;
      if not gse.Is_Null( cursor, 1136 )then
         a_frs1516.as031sp := gse.Integer_Value( cursor, 1136 );
      end if;
      if not gse.Is_Null( cursor, 1137 )then
         a_frs1516.as051hd:= Amount'Value( gse.Value( cursor, 1137 ));
      end if;
      if not gse.Is_Null( cursor, 1138 )then
         a_frs1516.as052hd:= Amount'Value( gse.Value( cursor, 1138 ));
      end if;
      if not gse.Is_Null( cursor, 1139 )then
         a_frs1516.as053hd:= Amount'Value( gse.Value( cursor, 1139 ));
      end if;
      if not gse.Is_Null( cursor, 1140 )then
         a_frs1516.as054hd := gse.Integer_Value( cursor, 1140 );
      end if;
      if not gse.Is_Null( cursor, 1141 )then
         a_frs1516.as055hd := gse.Integer_Value( cursor, 1141 );
      end if;
      if not gse.Is_Null( cursor, 1142 )then
         a_frs1516.as056hd := gse.Integer_Value( cursor, 1142 );
      end if;
      if not gse.Is_Null( cursor, 1143 )then
         a_frs1516.as057hd := gse.Integer_Value( cursor, 1143 );
      end if;
      if not gse.Is_Null( cursor, 1144 )then
         a_frs1516.as051sp:= Amount'Value( gse.Value( cursor, 1144 ));
      end if;
      if not gse.Is_Null( cursor, 1145 )then
         a_frs1516.as052sp:= Amount'Value( gse.Value( cursor, 1145 ));
      end if;
      if not gse.Is_Null( cursor, 1146 )then
         a_frs1516.as053sp:= Amount'Value( gse.Value( cursor, 1146 ));
      end if;
      if not gse.Is_Null( cursor, 1147 )then
         a_frs1516.as054sp := gse.Integer_Value( cursor, 1147 );
      end if;
      if not gse.Is_Null( cursor, 1148 )then
         a_frs1516.as055sp := gse.Integer_Value( cursor, 1148 );
      end if;
      if not gse.Is_Null( cursor, 1149 )then
         a_frs1516.as056sp := gse.Integer_Value( cursor, 1149 );
      end if;
      if not gse.Is_Null( cursor, 1150 )then
         a_frs1516.as057sp := gse.Integer_Value( cursor, 1150 );
      end if;
      if not gse.Is_Null( cursor, 1151 )then
         a_frs1516.as061hd := gse.Integer_Value( cursor, 1151 );
      end if;
      if not gse.Is_Null( cursor, 1152 )then
         a_frs1516.as061sp := gse.Integer_Value( cursor, 1152 );
      end if;
      if not gse.Is_Null( cursor, 1153 )then
         a_frs1516.as071hd := gse.Integer_Value( cursor, 1153 );
      end if;
      if not gse.Is_Null( cursor, 1154 )then
         a_frs1516.as071sp := gse.Integer_Value( cursor, 1154 );
      end if;
      if not gse.Is_Null( cursor, 1155 )then
         a_frs1516.as081hd:= Amount'Value( gse.Value( cursor, 1155 ));
      end if;
      if not gse.Is_Null( cursor, 1156 )then
         a_frs1516.as082hd:= Amount'Value( gse.Value( cursor, 1156 ));
      end if;
      if not gse.Is_Null( cursor, 1157 )then
         a_frs1516.as083hd := gse.Integer_Value( cursor, 1157 );
      end if;
      if not gse.Is_Null( cursor, 1158 )then
         a_frs1516.as084hd := gse.Integer_Value( cursor, 1158 );
      end if;
      if not gse.Is_Null( cursor, 1159 )then
         a_frs1516.as085hd := gse.Integer_Value( cursor, 1159 );
      end if;
      if not gse.Is_Null( cursor, 1160 )then
         a_frs1516.as081sp:= Amount'Value( gse.Value( cursor, 1160 ));
      end if;
      if not gse.Is_Null( cursor, 1161 )then
         a_frs1516.as082sp:= Amount'Value( gse.Value( cursor, 1161 ));
      end if;
      if not gse.Is_Null( cursor, 1162 )then
         a_frs1516.as083sp := gse.Integer_Value( cursor, 1162 );
      end if;
      if not gse.Is_Null( cursor, 1163 )then
         a_frs1516.as084sp := gse.Integer_Value( cursor, 1163 );
      end if;
      if not gse.Is_Null( cursor, 1164 )then
         a_frs1516.as085sp := gse.Integer_Value( cursor, 1164 );
      end if;
      if not gse.Is_Null( cursor, 1165 )then
         a_frs1516.as101hd := gse.Integer_Value( cursor, 1165 );
      end if;
      if not gse.Is_Null( cursor, 1166 )then
         a_frs1516.as101sp := gse.Integer_Value( cursor, 1166 );
      end if;
      if not gse.Is_Null( cursor, 1167 )then
         a_frs1516.as111hd := gse.Integer_Value( cursor, 1167 );
      end if;
      if not gse.Is_Null( cursor, 1168 )then
         a_frs1516.as111sp := gse.Integer_Value( cursor, 1168 );
      end if;
      if not gse.Is_Null( cursor, 1169 )then
         a_frs1516.as121hd := gse.Integer_Value( cursor, 1169 );
      end if;
      if not gse.Is_Null( cursor, 1170 )then
         a_frs1516.as121sp := gse.Integer_Value( cursor, 1170 );
      end if;
      if not gse.Is_Null( cursor, 1171 )then
         a_frs1516.as131hd := gse.Integer_Value( cursor, 1171 );
      end if;
      if not gse.Is_Null( cursor, 1172 )then
         a_frs1516.as131sp := gse.Integer_Value( cursor, 1172 );
      end if;
      if not gse.Is_Null( cursor, 1173 )then
         a_frs1516.as141hd := gse.Integer_Value( cursor, 1173 );
      end if;
      if not gse.Is_Null( cursor, 1174 )then
         a_frs1516.as142hd := gse.Integer_Value( cursor, 1174 );
      end if;
      if not gse.Is_Null( cursor, 1175 )then
         a_frs1516.as143hd := gse.Integer_Value( cursor, 1175 );
      end if;
      if not gse.Is_Null( cursor, 1176 )then
         a_frs1516.as141sp := gse.Integer_Value( cursor, 1176 );
      end if;
      if not gse.Is_Null( cursor, 1177 )then
         a_frs1516.as142sp := gse.Integer_Value( cursor, 1177 );
      end if;
      if not gse.Is_Null( cursor, 1178 )then
         a_frs1516.as143sp := gse.Integer_Value( cursor, 1178 );
      end if;
      if not gse.Is_Null( cursor, 1179 )then
         a_frs1516.as151hd:= Amount'Value( gse.Value( cursor, 1179 ));
      end if;
      if not gse.Is_Null( cursor, 1180 )then
         a_frs1516.as151sp:= Amount'Value( gse.Value( cursor, 1180 ));
      end if;
      if not gse.Is_Null( cursor, 1181 )then
         a_frs1516.as161hd := gse.Integer_Value( cursor, 1181 );
      end if;
      if not gse.Is_Null( cursor, 1182 )then
         a_frs1516.as161sp := gse.Integer_Value( cursor, 1182 );
      end if;
      if not gse.Is_Null( cursor, 1183 )then
         a_frs1516.as191hd := gse.Integer_Value( cursor, 1183 );
      end if;
      if not gse.Is_Null( cursor, 1184 )then
         a_frs1516.as191sp := gse.Integer_Value( cursor, 1184 );
      end if;
      if not gse.Is_Null( cursor, 1185 )then
         a_frs1516.as211hd:= Amount'Value( gse.Value( cursor, 1185 ));
      end if;
      if not gse.Is_Null( cursor, 1186 )then
         a_frs1516.as212hd := gse.Integer_Value( cursor, 1186 );
      end if;
      if not gse.Is_Null( cursor, 1187 )then
         a_frs1516.as213hd := gse.Integer_Value( cursor, 1187 );
      end if;
      if not gse.Is_Null( cursor, 1188 )then
         a_frs1516.as214hd := gse.Integer_Value( cursor, 1188 );
      end if;
      if not gse.Is_Null( cursor, 1189 )then
         a_frs1516.as211sp:= Amount'Value( gse.Value( cursor, 1189 ));
      end if;
      if not gse.Is_Null( cursor, 1190 )then
         a_frs1516.as212sp:= Amount'Value( gse.Value( cursor, 1190 ));
      end if;
      if not gse.Is_Null( cursor, 1191 )then
         a_frs1516.as213sp := gse.Integer_Value( cursor, 1191 );
      end if;
      if not gse.Is_Null( cursor, 1192 )then
         a_frs1516.as214sp := gse.Integer_Value( cursor, 1192 );
      end if;
      if not gse.Is_Null( cursor, 1193 )then
         a_frs1516.as261hd := gse.Integer_Value( cursor, 1193 );
      end if;
      if not gse.Is_Null( cursor, 1194 )then
         a_frs1516.as261sp := gse.Integer_Value( cursor, 1194 );
      end if;
      if not gse.Is_Null( cursor, 1195 )then
         a_frs1516.as271hd:= Amount'Value( gse.Value( cursor, 1195 ));
      end if;
      if not gse.Is_Null( cursor, 1196 )then
         a_frs1516.as272hd := gse.Integer_Value( cursor, 1196 );
      end if;
      if not gse.Is_Null( cursor, 1197 )then
         a_frs1516.as271sp := gse.Integer_Value( cursor, 1197 );
      end if;
      if not gse.Is_Null( cursor, 1198 )then
         a_frs1516.as272sp := gse.Integer_Value( cursor, 1198 );
      end if;
      if not gse.Is_Null( cursor, 1199 )then
         a_frs1516.as281hd := gse.Integer_Value( cursor, 1199 );
      end if;
      if not gse.Is_Null( cursor, 1200 )then
         a_frs1516.as281sp:= Amount'Value( gse.Value( cursor, 1200 ));
      end if;
      if not gse.Is_Null( cursor, 1201 )then
         a_frs1516.as291hd := gse.Integer_Value( cursor, 1201 );
      end if;
      if not gse.Is_Null( cursor, 1202 )then
         a_frs1516.as292hd := gse.Integer_Value( cursor, 1202 );
      end if;
      if not gse.Is_Null( cursor, 1203 )then
         a_frs1516.as293hd := gse.Integer_Value( cursor, 1203 );
      end if;
      if not gse.Is_Null( cursor, 1204 )then
         a_frs1516.as291sp := gse.Integer_Value( cursor, 1204 );
      end if;
      if not gse.Is_Null( cursor, 1205 )then
         a_frs1516.as292sp := gse.Integer_Value( cursor, 1205 );
      end if;
      if not gse.Is_Null( cursor, 1206 )then
         a_frs1516.as293sp := gse.Integer_Value( cursor, 1206 );
      end if;
      if not gse.Is_Null( cursor, 1207 )then
         a_frs1516.stdlachd := gse.Integer_Value( cursor, 1207 );
      end if;
      if not gse.Is_Null( cursor, 1208 )then
         a_frs1516.stdlamhd := gse.Integer_Value( cursor, 1208 );
      end if;
      if not gse.Is_Null( cursor, 1209 )then
         a_frs1516.stcbhd := gse.Integer_Value( cursor, 1209 );
      end if;
      if not gse.Is_Null( cursor, 1210 )then
         a_frs1516.stpenchd := gse.Integer_Value( cursor, 1210 );
      end if;
      if not gse.Is_Null( cursor, 1211 )then
         a_frs1516.strphd := gse.Integer_Value( cursor, 1211 );
      end if;
      if not gse.Is_Null( cursor, 1212 )then
         a_frs1516.stwphd := gse.Integer_Value( cursor, 1212 );
      end if;
      if not gse.Is_Null( cursor, 1213 )then
         a_frs1516.stwdphd := gse.Integer_Value( cursor, 1213 );
      end if;
      if not gse.Is_Null( cursor, 1214 )then
         a_frs1516.stwwphd := gse.Integer_Value( cursor, 1214 );
      end if;
      if not gse.Is_Null( cursor, 1215 )then
         a_frs1516.stsdahd := gse.Integer_Value( cursor, 1215 );
      end if;
      if not gse.Is_Null( cursor, 1216 )then
         a_frs1516.staahd := gse.Integer_Value( cursor, 1216 );
      end if;
      if not gse.Is_Null( cursor, 1217 )then
         a_frs1516.sticahd := gse.Integer_Value( cursor, 1217 );
      end if;
      if not gse.Is_Null( cursor, 1218 )then
         a_frs1516.stjsahd := gse.Integer_Value( cursor, 1218 );
      end if;
      if not gse.Is_Null( cursor, 1219 )then
         a_frs1516.stiidbhd := gse.Integer_Value( cursor, 1219 );
      end if;
      if not gse.Is_Null( cursor, 1220 )then
         a_frs1516.stesahd := gse.Integer_Value( cursor, 1220 );
      end if;
      if not gse.Is_Null( cursor, 1221 )then
         a_frs1516.stibhd := gse.Integer_Value( cursor, 1221 );
      end if;
      if not gse.Is_Null( cursor, 1222 )then
         a_frs1516.stishd := gse.Integer_Value( cursor, 1222 );
      end if;
      if not gse.Is_Null( cursor, 1223 )then
         a_frs1516.stmahd := gse.Integer_Value( cursor, 1223 );
      end if;
      if not gse.Is_Null( cursor, 1224 )then
         a_frs1516.stshhd := gse.Integer_Value( cursor, 1224 );
      end if;
      if not gse.Is_Null( cursor, 1225 )then
         a_frs1516.stgahd := gse.Integer_Value( cursor, 1225 );
      end if;
      if not gse.Is_Null( cursor, 1226 )then
         a_frs1516.stwtchd := gse.Integer_Value( cursor, 1226 );
      end if;
      if not gse.Is_Null( cursor, 1227 )then
         a_frs1516.stctchd := gse.Integer_Value( cursor, 1227 );
      end if;
      if not gse.Is_Null( cursor, 1228 )then
         a_frs1516.stwtclhd := gse.Integer_Value( cursor, 1228 );
      end if;
      if not gse.Is_Null( cursor, 1229 )then
         a_frs1516.stctclhd := gse.Integer_Value( cursor, 1229 );
      end if;
      if not gse.Is_Null( cursor, 1230 )then
         a_frs1516.stuchd := gse.Integer_Value( cursor, 1230 );
      end if;
      if not gse.Is_Null( cursor, 1231 )then
         a_frs1516.stpipdhd := gse.Integer_Value( cursor, 1231 );
      end if;
      if not gse.Is_Null( cursor, 1232 )then
         a_frs1516.stpipmhd := gse.Integer_Value( cursor, 1232 );
      end if;
      if not gse.Is_Null( cursor, 1233 )then
         a_frs1516.stdlacsp := gse.Integer_Value( cursor, 1233 );
      end if;
      if not gse.Is_Null( cursor, 1234 )then
         a_frs1516.stdlamsp := gse.Integer_Value( cursor, 1234 );
      end if;
      if not gse.Is_Null( cursor, 1235 )then
         a_frs1516.stcbsp := gse.Integer_Value( cursor, 1235 );
      end if;
      if not gse.Is_Null( cursor, 1236 )then
         a_frs1516.stpencsp := gse.Integer_Value( cursor, 1236 );
      end if;
      if not gse.Is_Null( cursor, 1237 )then
         a_frs1516.strpsp := gse.Integer_Value( cursor, 1237 );
      end if;
      if not gse.Is_Null( cursor, 1238 )then
         a_frs1516.stwpsp := gse.Integer_Value( cursor, 1238 );
      end if;
      if not gse.Is_Null( cursor, 1239 )then
         a_frs1516.stwdpsp := gse.Integer_Value( cursor, 1239 );
      end if;
      if not gse.Is_Null( cursor, 1240 )then
         a_frs1516.stwwpsp := gse.Integer_Value( cursor, 1240 );
      end if;
      if not gse.Is_Null( cursor, 1241 )then
         a_frs1516.stsdasp := gse.Integer_Value( cursor, 1241 );
      end if;
      if not gse.Is_Null( cursor, 1242 )then
         a_frs1516.staasp := gse.Integer_Value( cursor, 1242 );
      end if;
      if not gse.Is_Null( cursor, 1243 )then
         a_frs1516.sticasp := gse.Integer_Value( cursor, 1243 );
      end if;
      if not gse.Is_Null( cursor, 1244 )then
         a_frs1516.stjsasp := gse.Integer_Value( cursor, 1244 );
      end if;
      if not gse.Is_Null( cursor, 1245 )then
         a_frs1516.stiidbsp := gse.Integer_Value( cursor, 1245 );
      end if;
      if not gse.Is_Null( cursor, 1246 )then
         a_frs1516.stesasp := gse.Integer_Value( cursor, 1246 );
      end if;
      if not gse.Is_Null( cursor, 1247 )then
         a_frs1516.stibsp := gse.Integer_Value( cursor, 1247 );
      end if;
      if not gse.Is_Null( cursor, 1248 )then
         a_frs1516.stissp := gse.Integer_Value( cursor, 1248 );
      end if;
      if not gse.Is_Null( cursor, 1249 )then
         a_frs1516.stmasp := gse.Integer_Value( cursor, 1249 );
      end if;
      if not gse.Is_Null( cursor, 1250 )then
         a_frs1516.stshsp := gse.Integer_Value( cursor, 1250 );
      end if;
      if not gse.Is_Null( cursor, 1251 )then
         a_frs1516.stgasp := gse.Integer_Value( cursor, 1251 );
      end if;
      if not gse.Is_Null( cursor, 1252 )then
         a_frs1516.stwtcsp := gse.Integer_Value( cursor, 1252 );
      end if;
      if not gse.Is_Null( cursor, 1253 )then
         a_frs1516.stctcsp := gse.Integer_Value( cursor, 1253 );
      end if;
      if not gse.Is_Null( cursor, 1254 )then
         a_frs1516.stwtclsp := gse.Integer_Value( cursor, 1254 );
      end if;
      if not gse.Is_Null( cursor, 1255 )then
         a_frs1516.stctclsp := gse.Integer_Value( cursor, 1255 );
      end if;
      if not gse.Is_Null( cursor, 1256 )then
         a_frs1516.stucsp := gse.Integer_Value( cursor, 1256 );
      end if;
      if not gse.Is_Null( cursor, 1257 )then
         a_frs1516.stpipdsp := gse.Integer_Value( cursor, 1257 );
      end if;
      if not gse.Is_Null( cursor, 1258 )then
         a_frs1516.stpipmsp := gse.Integer_Value( cursor, 1258 );
      end if;
      if not gse.Is_Null( cursor, 1259 )then
         a_frs1516.dlacahd:= Amount'Value( gse.Value( cursor, 1259 ));
      end if;
      if not gse.Is_Null( cursor, 1260 )then
         a_frs1516.dlamohd:= Amount'Value( gse.Value( cursor, 1260 ));
      end if;
      if not gse.Is_Null( cursor, 1261 )then
         a_frs1516.cbhd:= Amount'Value( gse.Value( cursor, 1261 ));
      end if;
      if not gse.Is_Null( cursor, 1262 )then
         a_frs1516.lpencrhd:= Amount'Value( gse.Value( cursor, 1262 ));
      end if;
      if not gse.Is_Null( cursor, 1263 )then
         a_frs1516.rphd:= Amount'Value( gse.Value( cursor, 1263 ));
      end if;
      if not gse.Is_Null( cursor, 1264 )then
         a_frs1516.wphd:= Amount'Value( gse.Value( cursor, 1264 ));
      end if;
      if not gse.Is_Null( cursor, 1265 )then
         a_frs1516.wdphd:= Amount'Value( gse.Value( cursor, 1265 ));
      end if;
      if not gse.Is_Null( cursor, 1266 )then
         a_frs1516.wwphd:= Amount'Value( gse.Value( cursor, 1266 ));
      end if;
      if not gse.Is_Null( cursor, 1267 )then
         a_frs1516.sdahd:= Amount'Value( gse.Value( cursor, 1267 ));
      end if;
      if not gse.Is_Null( cursor, 1268 )then
         a_frs1516.aahd:= Amount'Value( gse.Value( cursor, 1268 ));
      end if;
      if not gse.Is_Null( cursor, 1269 )then
         a_frs1516.icahd:= Amount'Value( gse.Value( cursor, 1269 ));
      end if;
      if not gse.Is_Null( cursor, 1270 )then
         a_frs1516.jsahd:= Amount'Value( gse.Value( cursor, 1270 ));
      end if;
      if not gse.Is_Null( cursor, 1271 )then
         a_frs1516.iidbhd:= Amount'Value( gse.Value( cursor, 1271 ));
      end if;
      if not gse.Is_Null( cursor, 1272 )then
         a_frs1516.esahd:= Amount'Value( gse.Value( cursor, 1272 ));
      end if;
      if not gse.Is_Null( cursor, 1273 )then
         a_frs1516.ibhd:= Amount'Value( gse.Value( cursor, 1273 ));
      end if;
      if not gse.Is_Null( cursor, 1274 )then
         a_frs1516.ishd:= Amount'Value( gse.Value( cursor, 1274 ));
      end if;
      if not gse.Is_Null( cursor, 1275 )then
         a_frs1516.mahd:= Amount'Value( gse.Value( cursor, 1275 ));
      end if;
      if not gse.Is_Null( cursor, 1276 )then
         a_frs1516.sfmghd := gse.Integer_Value( cursor, 1276 );
      end if;
      if not gse.Is_Null( cursor, 1277 )then
         a_frs1516.sffghd:= Amount'Value( gse.Value( cursor, 1277 ));
      end if;
      if not gse.Is_Null( cursor, 1278 )then
         a_frs1516.othbenhd:= Amount'Value( gse.Value( cursor, 1278 ));
      end if;
      if not gse.Is_Null( cursor, 1279 )then
         a_frs1516.tubenhd:= Amount'Value( gse.Value( cursor, 1279 ));
      end if;
      if not gse.Is_Null( cursor, 1280 )then
         a_frs1516.fsbenhd:= Amount'Value( gse.Value( cursor, 1280 ));
      end if;
      if not gse.Is_Null( cursor, 1281 )then
         a_frs1516.sicinhd:= Amount'Value( gse.Value( cursor, 1281 ));
      end if;
      if not gse.Is_Null( cursor, 1282 )then
         a_frs1516.accinhd := gse.Integer_Value( cursor, 1282 );
      end if;
      if not gse.Is_Null( cursor, 1283 )then
         a_frs1516.hosinhd:= Amount'Value( gse.Value( cursor, 1283 ));
      end if;
      if not gse.Is_Null( cursor, 1284 )then
         a_frs1516.gtshd := gse.Integer_Value( cursor, 1284 );
      end if;
      if not gse.Is_Null( cursor, 1285 )then
         a_frs1516.gahd:= Amount'Value( gse.Value( cursor, 1285 ));
      end if;
      if not gse.Is_Null( cursor, 1286 )then
         a_frs1516.iwchd := gse.Integer_Value( cursor, 1286 );
      end if;
      if not gse.Is_Null( cursor, 1287 )then
         a_frs1516.r2wchd := gse.Integer_Value( cursor, 1287 );
      end if;
      if not gse.Is_Null( cursor, 1288 )then
         a_frs1516.widplhd := gse.Integer_Value( cursor, 1288 );
      end if;
      if not gse.Is_Null( cursor, 1289 )then
         a_frs1516.uninshd:= Amount'Value( gse.Value( cursor, 1289 ));
      end if;
      if not gse.Is_Null( cursor, 1290 )then
         a_frs1516.wfamthd := gse.Integer_Value( cursor, 1290 );
      end if;
      if not gse.Is_Null( cursor, 1291 )then
         a_frs1516.dssdpihd:= Amount'Value( gse.Value( cursor, 1291 ));
      end if;
      if not gse.Is_Null( cursor, 1292 )then
         a_frs1516.dssdpjhd:= Amount'Value( gse.Value( cursor, 1292 ));
      end if;
      if not gse.Is_Null( cursor, 1293 )then
         a_frs1516.sfrpaihd:= Amount'Value( gse.Value( cursor, 1293 ));
      end if;
      if not gse.Is_Null( cursor, 1294 )then
         a_frs1516.sfrpajhd:= Amount'Value( gse.Value( cursor, 1294 ));
      end if;
      if not gse.Is_Null( cursor, 1295 )then
         a_frs1516.exhbhd:= Amount'Value( gse.Value( cursor, 1295 ));
      end if;
      if not gse.Is_Null( cursor, 1296 )then
         a_frs1516.perhinhd:= Amount'Value( gse.Value( cursor, 1296 ));
      end if;
      if not gse.Is_Null( cursor, 1297 )then
         a_frs1516.otsiinhd:= Amount'Value( gse.Value( cursor, 1297 ));
      end if;
      if not gse.Is_Null( cursor, 1298 )then
         a_frs1516.cichd:= Amount'Value( gse.Value( cursor, 1298 ));
      end if;
      if not gse.Is_Null( cursor, 1299 )then
         a_frs1516.bowtchd:= Amount'Value( gse.Value( cursor, 1299 ));
      end if;
      if not gse.Is_Null( cursor, 1300 )then
         a_frs1516.boctchd:= Amount'Value( gse.Value( cursor, 1300 ));
      end if;
      if not gse.Is_Null( cursor, 1301 )then
         a_frs1516.bowtclhd:= Amount'Value( gse.Value( cursor, 1301 ));
      end if;
      if not gse.Is_Null( cursor, 1302 )then
         a_frs1516.boctclhd:= Amount'Value( gse.Value( cursor, 1302 ));
      end if;
      if not gse.Is_Null( cursor, 1303 )then
         a_frs1516.hbhd:= Amount'Value( gse.Value( cursor, 1303 ));
      end if;
      if not gse.Is_Null( cursor, 1304 )then
         a_frs1516.uchd:= Amount'Value( gse.Value( cursor, 1304 ));
      end if;
      if not gse.Is_Null( cursor, 1305 )then
         a_frs1516.pipdhd:= Amount'Value( gse.Value( cursor, 1305 ));
      end if;
      if not gse.Is_Null( cursor, 1306 )then
         a_frs1516.pipmhd:= Amount'Value( gse.Value( cursor, 1306 ));
      end if;
      if not gse.Is_Null( cursor, 1307 )then
         a_frs1516.lndwphd:= Amount'Value( gse.Value( cursor, 1307 ));
      end if;
      if not gse.Is_Null( cursor, 1308 )then
         a_frs1516.lnlahd := gse.Integer_Value( cursor, 1308 );
      end if;
      if not gse.Is_Null( cursor, 1309 )then
         a_frs1516.dwpauchd:= Amount'Value( gse.Value( cursor, 1309 ));
      end if;
      if not gse.Is_Null( cursor, 1310 )then
         a_frs1516.sfrpuchd:= Amount'Value( gse.Value( cursor, 1310 ));
      end if;
      if not gse.Is_Null( cursor, 1311 )then
         a_frs1516.dlacasp:= Amount'Value( gse.Value( cursor, 1311 ));
      end if;
      if not gse.Is_Null( cursor, 1312 )then
         a_frs1516.dlamosp:= Amount'Value( gse.Value( cursor, 1312 ));
      end if;
      if not gse.Is_Null( cursor, 1313 )then
         a_frs1516.cbsp:= Amount'Value( gse.Value( cursor, 1313 ));
      end if;
      if not gse.Is_Null( cursor, 1314 )then
         a_frs1516.lpencrsp:= Amount'Value( gse.Value( cursor, 1314 ));
      end if;
      if not gse.Is_Null( cursor, 1315 )then
         a_frs1516.rpsp:= Amount'Value( gse.Value( cursor, 1315 ));
      end if;
      if not gse.Is_Null( cursor, 1316 )then
         a_frs1516.wpsp := gse.Integer_Value( cursor, 1316 );
      end if;
      if not gse.Is_Null( cursor, 1317 )then
         a_frs1516.wdpsp:= Amount'Value( gse.Value( cursor, 1317 ));
      end if;
      if not gse.Is_Null( cursor, 1318 )then
         a_frs1516.wwpsp:= Amount'Value( gse.Value( cursor, 1318 ));
      end if;
      if not gse.Is_Null( cursor, 1319 )then
         a_frs1516.sdasp:= Amount'Value( gse.Value( cursor, 1319 ));
      end if;
      if not gse.Is_Null( cursor, 1320 )then
         a_frs1516.aasp:= Amount'Value( gse.Value( cursor, 1320 ));
      end if;
      if not gse.Is_Null( cursor, 1321 )then
         a_frs1516.icasp:= Amount'Value( gse.Value( cursor, 1321 ));
      end if;
      if not gse.Is_Null( cursor, 1322 )then
         a_frs1516.jsasp:= Amount'Value( gse.Value( cursor, 1322 ));
      end if;
      if not gse.Is_Null( cursor, 1323 )then
         a_frs1516.iidbsp:= Amount'Value( gse.Value( cursor, 1323 ));
      end if;
      if not gse.Is_Null( cursor, 1324 )then
         a_frs1516.esasp:= Amount'Value( gse.Value( cursor, 1324 ));
      end if;
      if not gse.Is_Null( cursor, 1325 )then
         a_frs1516.ibsp:= Amount'Value( gse.Value( cursor, 1325 ));
      end if;
      if not gse.Is_Null( cursor, 1326 )then
         a_frs1516.issp:= Amount'Value( gse.Value( cursor, 1326 ));
      end if;
      if not gse.Is_Null( cursor, 1327 )then
         a_frs1516.masp:= Amount'Value( gse.Value( cursor, 1327 ));
      end if;
      if not gse.Is_Null( cursor, 1328 )then
         a_frs1516.sfmgsp := gse.Integer_Value( cursor, 1328 );
      end if;
      if not gse.Is_Null( cursor, 1329 )then
         a_frs1516.sffgsp := gse.Integer_Value( cursor, 1329 );
      end if;
      if not gse.Is_Null( cursor, 1330 )then
         a_frs1516.othbensp := gse.Integer_Value( cursor, 1330 );
      end if;
      if not gse.Is_Null( cursor, 1331 )then
         a_frs1516.tubensp := gse.Integer_Value( cursor, 1331 );
      end if;
      if not gse.Is_Null( cursor, 1332 )then
         a_frs1516.fsbensp := gse.Integer_Value( cursor, 1332 );
      end if;
      if not gse.Is_Null( cursor, 1333 )then
         a_frs1516.sicinsp:= Amount'Value( gse.Value( cursor, 1333 ));
      end if;
      if not gse.Is_Null( cursor, 1334 )then
         a_frs1516.accinsp := gse.Integer_Value( cursor, 1334 );
      end if;
      if not gse.Is_Null( cursor, 1335 )then
         a_frs1516.hosinsp:= Amount'Value( gse.Value( cursor, 1335 ));
      end if;
      if not gse.Is_Null( cursor, 1336 )then
         a_frs1516.gtssp := gse.Integer_Value( cursor, 1336 );
      end if;
      if not gse.Is_Null( cursor, 1337 )then
         a_frs1516.gasp := gse.Integer_Value( cursor, 1337 );
      end if;
      if not gse.Is_Null( cursor, 1338 )then
         a_frs1516.iwcsp := gse.Integer_Value( cursor, 1338 );
      end if;
      if not gse.Is_Null( cursor, 1339 )then
         a_frs1516.r2wcsp := gse.Integer_Value( cursor, 1339 );
      end if;
      if not gse.Is_Null( cursor, 1340 )then
         a_frs1516.widplsp := gse.Integer_Value( cursor, 1340 );
      end if;
      if not gse.Is_Null( cursor, 1341 )then
         a_frs1516.uninssp:= Amount'Value( gse.Value( cursor, 1341 ));
      end if;
      if not gse.Is_Null( cursor, 1342 )then
         a_frs1516.wfamtsp := gse.Integer_Value( cursor, 1342 );
      end if;
      if not gse.Is_Null( cursor, 1343 )then
         a_frs1516.dssdpisp:= Amount'Value( gse.Value( cursor, 1343 ));
      end if;
      if not gse.Is_Null( cursor, 1344 )then
         a_frs1516.dssdpjsp:= Amount'Value( gse.Value( cursor, 1344 ));
      end if;
      if not gse.Is_Null( cursor, 1345 )then
         a_frs1516.sfrpaisp:= Amount'Value( gse.Value( cursor, 1345 ));
      end if;
      if not gse.Is_Null( cursor, 1346 )then
         a_frs1516.sfrpajsp:= Amount'Value( gse.Value( cursor, 1346 ));
      end if;
      if not gse.Is_Null( cursor, 1347 )then
         a_frs1516.exhbsp := gse.Integer_Value( cursor, 1347 );
      end if;
      if not gse.Is_Null( cursor, 1348 )then
         a_frs1516.perhinsp:= Amount'Value( gse.Value( cursor, 1348 ));
      end if;
      if not gse.Is_Null( cursor, 1349 )then
         a_frs1516.otsiinsp:= Amount'Value( gse.Value( cursor, 1349 ));
      end if;
      if not gse.Is_Null( cursor, 1350 )then
         a_frs1516.cicsp := gse.Integer_Value( cursor, 1350 );
      end if;
      if not gse.Is_Null( cursor, 1351 )then
         a_frs1516.bowtcsp:= Amount'Value( gse.Value( cursor, 1351 ));
      end if;
      if not gse.Is_Null( cursor, 1352 )then
         a_frs1516.boctcsp:= Amount'Value( gse.Value( cursor, 1352 ));
      end if;
      if not gse.Is_Null( cursor, 1353 )then
         a_frs1516.bowtclsp := gse.Integer_Value( cursor, 1353 );
      end if;
      if not gse.Is_Null( cursor, 1354 )then
         a_frs1516.boctclsp:= Amount'Value( gse.Value( cursor, 1354 ));
      end if;
      if not gse.Is_Null( cursor, 1355 )then
         a_frs1516.hbsp:= Amount'Value( gse.Value( cursor, 1355 ));
      end if;
      if not gse.Is_Null( cursor, 1356 )then
         a_frs1516.ucsp:= Amount'Value( gse.Value( cursor, 1356 ));
      end if;
      if not gse.Is_Null( cursor, 1357 )then
         a_frs1516.pipdsp:= Amount'Value( gse.Value( cursor, 1357 ));
      end if;
      if not gse.Is_Null( cursor, 1358 )then
         a_frs1516.pipmsp:= Amount'Value( gse.Value( cursor, 1358 ));
      end if;
      if not gse.Is_Null( cursor, 1359 )then
         a_frs1516.lndwpsp := gse.Integer_Value( cursor, 1359 );
      end if;
      if not gse.Is_Null( cursor, 1360 )then
         a_frs1516.lnlasp := gse.Integer_Value( cursor, 1360 );
      end if;
      if not gse.Is_Null( cursor, 1361 )then
         a_frs1516.dwpaucsp := gse.Integer_Value( cursor, 1361 );
      end if;
      if not gse.Is_Null( cursor, 1362 )then
         a_frs1516.sfrpucsp:= Amount'Value( gse.Value( cursor, 1362 ));
      end if;
      if not gse.Is_Null( cursor, 1363 )then
         a_frs1516.ltdlachd := gse.Integer_Value( cursor, 1363 );
      end if;
      if not gse.Is_Null( cursor, 1364 )then
         a_frs1516.ltdlamhd := gse.Integer_Value( cursor, 1364 );
      end if;
      if not gse.Is_Null( cursor, 1365 )then
         a_frs1516.ltcbhd := gse.Integer_Value( cursor, 1365 );
      end if;
      if not gse.Is_Null( cursor, 1366 )then
         a_frs1516.bopenchd := gse.Integer_Value( cursor, 1366 );
      end if;
      if not gse.Is_Null( cursor, 1367 )then
         a_frs1516.ltrphd := gse.Integer_Value( cursor, 1367 );
      end if;
      if not gse.Is_Null( cursor, 1368 )then
         a_frs1516.ltwphd := gse.Integer_Value( cursor, 1368 );
      end if;
      if not gse.Is_Null( cursor, 1369 )then
         a_frs1516.ltwdphd := gse.Integer_Value( cursor, 1369 );
      end if;
      if not gse.Is_Null( cursor, 1370 )then
         a_frs1516.ltwwphd := gse.Integer_Value( cursor, 1370 );
      end if;
      if not gse.Is_Null( cursor, 1371 )then
         a_frs1516.ltsdahd := gse.Integer_Value( cursor, 1371 );
      end if;
      if not gse.Is_Null( cursor, 1372 )then
         a_frs1516.ltaahd := gse.Integer_Value( cursor, 1372 );
      end if;
      if not gse.Is_Null( cursor, 1373 )then
         a_frs1516.lticahd := gse.Integer_Value( cursor, 1373 );
      end if;
      if not gse.Is_Null( cursor, 1374 )then
         a_frs1516.ltjsahd := gse.Integer_Value( cursor, 1374 );
      end if;
      if not gse.Is_Null( cursor, 1375 )then
         a_frs1516.ltiidbhd := gse.Integer_Value( cursor, 1375 );
      end if;
      if not gse.Is_Null( cursor, 1376 )then
         a_frs1516.ltesahd := gse.Integer_Value( cursor, 1376 );
      end if;
      if not gse.Is_Null( cursor, 1377 )then
         a_frs1516.ltibhd := gse.Integer_Value( cursor, 1377 );
      end if;
      if not gse.Is_Null( cursor, 1378 )then
         a_frs1516.ltishd := gse.Integer_Value( cursor, 1378 );
      end if;
      if not gse.Is_Null( cursor, 1379 )then
         a_frs1516.ltmahd := gse.Integer_Value( cursor, 1379 );
      end if;
      if not gse.Is_Null( cursor, 1380 )then
         a_frs1516.ltshhd := gse.Integer_Value( cursor, 1380 );
      end if;
      if not gse.Is_Null( cursor, 1381 )then
         a_frs1516.ltgahd := gse.Integer_Value( cursor, 1381 );
      end if;
      if not gse.Is_Null( cursor, 1382 )then
         a_frs1516.hwtchd := gse.Integer_Value( cursor, 1382 );
      end if;
      if not gse.Is_Null( cursor, 1383 )then
         a_frs1516.hctchd := gse.Integer_Value( cursor, 1383 );
      end if;
      if not gse.Is_Null( cursor, 1384 )then
         a_frs1516.hwtclhd := gse.Integer_Value( cursor, 1384 );
      end if;
      if not gse.Is_Null( cursor, 1385 )then
         a_frs1516.hctclhd := gse.Integer_Value( cursor, 1385 );
      end if;
      if not gse.Is_Null( cursor, 1386 )then
         a_frs1516.ltuchd := gse.Integer_Value( cursor, 1386 );
      end if;
      if not gse.Is_Null( cursor, 1387 )then
         a_frs1516.ltpipdhd := gse.Integer_Value( cursor, 1387 );
      end if;
      if not gse.Is_Null( cursor, 1388 )then
         a_frs1516.ltpipmhd := gse.Integer_Value( cursor, 1388 );
      end if;
      if not gse.Is_Null( cursor, 1389 )then
         a_frs1516.ltdlacsp := gse.Integer_Value( cursor, 1389 );
      end if;
      if not gse.Is_Null( cursor, 1390 )then
         a_frs1516.ltdlamsp := gse.Integer_Value( cursor, 1390 );
      end if;
      if not gse.Is_Null( cursor, 1391 )then
         a_frs1516.ltcbsp := gse.Integer_Value( cursor, 1391 );
      end if;
      if not gse.Is_Null( cursor, 1392 )then
         a_frs1516.bopencsp := gse.Integer_Value( cursor, 1392 );
      end if;
      if not gse.Is_Null( cursor, 1393 )then
         a_frs1516.ltrpsp := gse.Integer_Value( cursor, 1393 );
      end if;
      if not gse.Is_Null( cursor, 1394 )then
         a_frs1516.ltwpsp := gse.Integer_Value( cursor, 1394 );
      end if;
      if not gse.Is_Null( cursor, 1395 )then
         a_frs1516.ltwdpsp := gse.Integer_Value( cursor, 1395 );
      end if;
      if not gse.Is_Null( cursor, 1396 )then
         a_frs1516.ltwwpsp := gse.Integer_Value( cursor, 1396 );
      end if;
      if not gse.Is_Null( cursor, 1397 )then
         a_frs1516.ltsdasp := gse.Integer_Value( cursor, 1397 );
      end if;
      if not gse.Is_Null( cursor, 1398 )then
         a_frs1516.ltaasp := gse.Integer_Value( cursor, 1398 );
      end if;
      if not gse.Is_Null( cursor, 1399 )then
         a_frs1516.lticasp := gse.Integer_Value( cursor, 1399 );
      end if;
      if not gse.Is_Null( cursor, 1400 )then
         a_frs1516.ltjsasp := gse.Integer_Value( cursor, 1400 );
      end if;
      if not gse.Is_Null( cursor, 1401 )then
         a_frs1516.ltiidbsp := gse.Integer_Value( cursor, 1401 );
      end if;
      if not gse.Is_Null( cursor, 1402 )then
         a_frs1516.ltesasp := gse.Integer_Value( cursor, 1402 );
      end if;
      if not gse.Is_Null( cursor, 1403 )then
         a_frs1516.ltibsp := gse.Integer_Value( cursor, 1403 );
      end if;
      if not gse.Is_Null( cursor, 1404 )then
         a_frs1516.ltissp := gse.Integer_Value( cursor, 1404 );
      end if;
      if not gse.Is_Null( cursor, 1405 )then
         a_frs1516.ltmasp := gse.Integer_Value( cursor, 1405 );
      end if;
      if not gse.Is_Null( cursor, 1406 )then
         a_frs1516.ltshsp := gse.Integer_Value( cursor, 1406 );
      end if;
      if not gse.Is_Null( cursor, 1407 )then
         a_frs1516.ltgasp := gse.Integer_Value( cursor, 1407 );
      end if;
      if not gse.Is_Null( cursor, 1408 )then
         a_frs1516.hwtcsp := gse.Integer_Value( cursor, 1408 );
      end if;
      if not gse.Is_Null( cursor, 1409 )then
         a_frs1516.hctcsp := gse.Integer_Value( cursor, 1409 );
      end if;
      if not gse.Is_Null( cursor, 1410 )then
         a_frs1516.hwtclsp := gse.Integer_Value( cursor, 1410 );
      end if;
      if not gse.Is_Null( cursor, 1411 )then
         a_frs1516.hctclsp := gse.Integer_Value( cursor, 1411 );
      end if;
      if not gse.Is_Null( cursor, 1412 )then
         a_frs1516.ltucsp := gse.Integer_Value( cursor, 1412 );
      end if;
      if not gse.Is_Null( cursor, 1413 )then
         a_frs1516.ltpipdsp := gse.Integer_Value( cursor, 1413 );
      end if;
      if not gse.Is_Null( cursor, 1414 )then
         a_frs1516.ltpipmsp := gse.Integer_Value( cursor, 1414 );
      end if;
      if not gse.Is_Null( cursor, 1415 )then
         a_frs1516.pdlacahd := gse.Integer_Value( cursor, 1415 );
      end if;
      if not gse.Is_Null( cursor, 1416 )then
         a_frs1516.pdlamohd := gse.Integer_Value( cursor, 1416 );
      end if;
      if not gse.Is_Null( cursor, 1417 )then
         a_frs1516.pcbhd := gse.Integer_Value( cursor, 1417 );
      end if;
      if not gse.Is_Null( cursor, 1418 )then
         a_frs1516.hpenchd := gse.Integer_Value( cursor, 1418 );
      end if;
      if not gse.Is_Null( cursor, 1419 )then
         a_frs1516.prphd := gse.Integer_Value( cursor, 1419 );
      end if;
      if not gse.Is_Null( cursor, 1420 )then
         a_frs1516.pwphd := gse.Integer_Value( cursor, 1420 );
      end if;
      if not gse.Is_Null( cursor, 1421 )then
         a_frs1516.pwdphd := gse.Integer_Value( cursor, 1421 );
      end if;
      if not gse.Is_Null( cursor, 1422 )then
         a_frs1516.pwwphd := gse.Integer_Value( cursor, 1422 );
      end if;
      if not gse.Is_Null( cursor, 1423 )then
         a_frs1516.psdahd := gse.Integer_Value( cursor, 1423 );
      end if;
      if not gse.Is_Null( cursor, 1424 )then
         a_frs1516.paahd := gse.Integer_Value( cursor, 1424 );
      end if;
      if not gse.Is_Null( cursor, 1425 )then
         a_frs1516.picahd := gse.Integer_Value( cursor, 1425 );
      end if;
      if not gse.Is_Null( cursor, 1426 )then
         a_frs1516.pjsahd := gse.Integer_Value( cursor, 1426 );
      end if;
      if not gse.Is_Null( cursor, 1427 )then
         a_frs1516.piidbhd := gse.Integer_Value( cursor, 1427 );
      end if;
      if not gse.Is_Null( cursor, 1428 )then
         a_frs1516.pesahd := gse.Integer_Value( cursor, 1428 );
      end if;
      if not gse.Is_Null( cursor, 1429 )then
         a_frs1516.pibhd := gse.Integer_Value( cursor, 1429 );
      end if;
      if not gse.Is_Null( cursor, 1430 )then
         a_frs1516.pishd := gse.Integer_Value( cursor, 1430 );
      end if;
      if not gse.Is_Null( cursor, 1431 )then
         a_frs1516.pmahd := gse.Integer_Value( cursor, 1431 );
      end if;
      if not gse.Is_Null( cursor, 1432 )then
         a_frs1516.pothbehd := gse.Integer_Value( cursor, 1432 );
      end if;
      if not gse.Is_Null( cursor, 1433 )then
         a_frs1516.ptubenhd := gse.Integer_Value( cursor, 1433 );
      end if;
      if not gse.Is_Null( cursor, 1434 )then
         a_frs1516.pfsbenhd := gse.Integer_Value( cursor, 1434 );
      end if;
      if not gse.Is_Null( cursor, 1435 )then
         a_frs1516.psicinhd := gse.Integer_Value( cursor, 1435 );
      end if;
      if not gse.Is_Null( cursor, 1436 )then
         a_frs1516.paccinhd := gse.Integer_Value( cursor, 1436 );
      end if;
      if not gse.Is_Null( cursor, 1437 )then
         a_frs1516.phosinhd := gse.Integer_Value( cursor, 1437 );
      end if;
      if not gse.Is_Null( cursor, 1438 )then
         a_frs1516.pgtshd := gse.Integer_Value( cursor, 1438 );
      end if;
      if not gse.Is_Null( cursor, 1439 )then
         a_frs1516.pgahd := gse.Integer_Value( cursor, 1439 );
      end if;
      if not gse.Is_Null( cursor, 1440 )then
         a_frs1516.iwcpdhd := gse.Integer_Value( cursor, 1440 );
      end if;
      if not gse.Is_Null( cursor, 1441 )then
         a_frs1516.r2wcpdhd := gse.Integer_Value( cursor, 1441 );
      end if;
      if not gse.Is_Null( cursor, 1442 )then
         a_frs1516.puninshd := gse.Integer_Value( cursor, 1442 );
      end if;
      if not gse.Is_Null( cursor, 1443 )then
         a_frs1516.pdsspihd := gse.Integer_Value( cursor, 1443 );
      end if;
      if not gse.Is_Null( cursor, 1444 )then
         a_frs1516.pdsspjhd := gse.Integer_Value( cursor, 1444 );
      end if;
      if not gse.Is_Null( cursor, 1445 )then
         a_frs1516.pexhbhd := gse.Integer_Value( cursor, 1445 );
      end if;
      if not gse.Is_Null( cursor, 1446 )then
         a_frs1516.ppehinhd := gse.Integer_Value( cursor, 1446 );
      end if;
      if not gse.Is_Null( cursor, 1447 )then
         a_frs1516.potsinhd := gse.Integer_Value( cursor, 1447 );
      end if;
      if not gse.Is_Null( cursor, 1448 )then
         a_frs1516.pdcichd := gse.Integer_Value( cursor, 1448 );
      end if;
      if not gse.Is_Null( cursor, 1449 )then
         a_frs1516.wwtchd := gse.Integer_Value( cursor, 1449 );
      end if;
      if not gse.Is_Null( cursor, 1450 )then
         a_frs1516.wctchd := gse.Integer_Value( cursor, 1450 );
      end if;
      if not gse.Is_Null( cursor, 1451 )then
         a_frs1516.wwtclhd := gse.Integer_Value( cursor, 1451 );
      end if;
      if not gse.Is_Null( cursor, 1452 )then
         a_frs1516.wctclhd := gse.Integer_Value( cursor, 1452 );
      end if;
      if not gse.Is_Null( cursor, 1453 )then
         a_frs1516.phbhd := gse.Integer_Value( cursor, 1453 );
      end if;
      if not gse.Is_Null( cursor, 1454 )then
         a_frs1516.puchd := gse.Integer_Value( cursor, 1454 );
      end if;
      if not gse.Is_Null( cursor, 1455 )then
         a_frs1516.ppipdhd := gse.Integer_Value( cursor, 1455 );
      end if;
      if not gse.Is_Null( cursor, 1456 )then
         a_frs1516.ppipmhd := gse.Integer_Value( cursor, 1456 );
      end if;
      if not gse.Is_Null( cursor, 1457 )then
         a_frs1516.pdwpuchd := gse.Integer_Value( cursor, 1457 );
      end if;
      if not gse.Is_Null( cursor, 1458 )then
         a_frs1516.pdlacasp := gse.Integer_Value( cursor, 1458 );
      end if;
      if not gse.Is_Null( cursor, 1459 )then
         a_frs1516.pdlamosp := gse.Integer_Value( cursor, 1459 );
      end if;
      if not gse.Is_Null( cursor, 1460 )then
         a_frs1516.pcbsp := gse.Integer_Value( cursor, 1460 );
      end if;
      if not gse.Is_Null( cursor, 1461 )then
         a_frs1516.hpencsp := gse.Integer_Value( cursor, 1461 );
      end if;
      if not gse.Is_Null( cursor, 1462 )then
         a_frs1516.prpsp := gse.Integer_Value( cursor, 1462 );
      end if;
      if not gse.Is_Null( cursor, 1463 )then
         a_frs1516.pwpsp := gse.Integer_Value( cursor, 1463 );
      end if;
      if not gse.Is_Null( cursor, 1464 )then
         a_frs1516.pwdpsp := gse.Integer_Value( cursor, 1464 );
      end if;
      if not gse.Is_Null( cursor, 1465 )then
         a_frs1516.pwwpsp := gse.Integer_Value( cursor, 1465 );
      end if;
      if not gse.Is_Null( cursor, 1466 )then
         a_frs1516.psdasp := gse.Integer_Value( cursor, 1466 );
      end if;
      if not gse.Is_Null( cursor, 1467 )then
         a_frs1516.paasp := gse.Integer_Value( cursor, 1467 );
      end if;
      if not gse.Is_Null( cursor, 1468 )then
         a_frs1516.picasp := gse.Integer_Value( cursor, 1468 );
      end if;
      if not gse.Is_Null( cursor, 1469 )then
         a_frs1516.pjsasp := gse.Integer_Value( cursor, 1469 );
      end if;
      if not gse.Is_Null( cursor, 1470 )then
         a_frs1516.piidbsp := gse.Integer_Value( cursor, 1470 );
      end if;
      if not gse.Is_Null( cursor, 1471 )then
         a_frs1516.pesasp := gse.Integer_Value( cursor, 1471 );
      end if;
      if not gse.Is_Null( cursor, 1472 )then
         a_frs1516.pibsp := gse.Integer_Value( cursor, 1472 );
      end if;
      if not gse.Is_Null( cursor, 1473 )then
         a_frs1516.pissp := gse.Integer_Value( cursor, 1473 );
      end if;
      if not gse.Is_Null( cursor, 1474 )then
         a_frs1516.pmasp := gse.Integer_Value( cursor, 1474 );
      end if;
      if not gse.Is_Null( cursor, 1475 )then
         a_frs1516.pothbesp := gse.Integer_Value( cursor, 1475 );
      end if;
      if not gse.Is_Null( cursor, 1476 )then
         a_frs1516.ptubensp := gse.Integer_Value( cursor, 1476 );
      end if;
      if not gse.Is_Null( cursor, 1477 )then
         a_frs1516.pfsbensp := gse.Integer_Value( cursor, 1477 );
      end if;
      if not gse.Is_Null( cursor, 1478 )then
         a_frs1516.psicinsp := gse.Integer_Value( cursor, 1478 );
      end if;
      if not gse.Is_Null( cursor, 1479 )then
         a_frs1516.paccinsp := gse.Integer_Value( cursor, 1479 );
      end if;
      if not gse.Is_Null( cursor, 1480 )then
         a_frs1516.phosinsp := gse.Integer_Value( cursor, 1480 );
      end if;
      if not gse.Is_Null( cursor, 1481 )then
         a_frs1516.pgtssp := gse.Integer_Value( cursor, 1481 );
      end if;
      if not gse.Is_Null( cursor, 1482 )then
         a_frs1516.pgasp := gse.Integer_Value( cursor, 1482 );
      end if;
      if not gse.Is_Null( cursor, 1483 )then
         a_frs1516.iwcpdsp := gse.Integer_Value( cursor, 1483 );
      end if;
      if not gse.Is_Null( cursor, 1484 )then
         a_frs1516.r2wcpdsp := gse.Integer_Value( cursor, 1484 );
      end if;
      if not gse.Is_Null( cursor, 1485 )then
         a_frs1516.puninssp := gse.Integer_Value( cursor, 1485 );
      end if;
      if not gse.Is_Null( cursor, 1486 )then
         a_frs1516.pdsspisp := gse.Integer_Value( cursor, 1486 );
      end if;
      if not gse.Is_Null( cursor, 1487 )then
         a_frs1516.pdsspjsp := gse.Integer_Value( cursor, 1487 );
      end if;
      if not gse.Is_Null( cursor, 1488 )then
         a_frs1516.pexhbsp := gse.Integer_Value( cursor, 1488 );
      end if;
      if not gse.Is_Null( cursor, 1489 )then
         a_frs1516.ppehinsp := gse.Integer_Value( cursor, 1489 );
      end if;
      if not gse.Is_Null( cursor, 1490 )then
         a_frs1516.potsinsp := gse.Integer_Value( cursor, 1490 );
      end if;
      if not gse.Is_Null( cursor, 1491 )then
         a_frs1516.pdcicsp := gse.Integer_Value( cursor, 1491 );
      end if;
      if not gse.Is_Null( cursor, 1492 )then
         a_frs1516.wwtcsp := gse.Integer_Value( cursor, 1492 );
      end if;
      if not gse.Is_Null( cursor, 1493 )then
         a_frs1516.wctcsp := gse.Integer_Value( cursor, 1493 );
      end if;
      if not gse.Is_Null( cursor, 1494 )then
         a_frs1516.wwtclsp := gse.Integer_Value( cursor, 1494 );
      end if;
      if not gse.Is_Null( cursor, 1495 )then
         a_frs1516.wctclsp := gse.Integer_Value( cursor, 1495 );
      end if;
      if not gse.Is_Null( cursor, 1496 )then
         a_frs1516.phbsp := gse.Integer_Value( cursor, 1496 );
      end if;
      if not gse.Is_Null( cursor, 1497 )then
         a_frs1516.pucsp := gse.Integer_Value( cursor, 1497 );
      end if;
      if not gse.Is_Null( cursor, 1498 )then
         a_frs1516.ppipdsp := gse.Integer_Value( cursor, 1498 );
      end if;
      if not gse.Is_Null( cursor, 1499 )then
         a_frs1516.ppipmsp := gse.Integer_Value( cursor, 1499 );
      end if;
      if not gse.Is_Null( cursor, 1500 )then
         a_frs1516.pdwpucsp := gse.Integer_Value( cursor, 1500 );
      end if;
      if not gse.Is_Null( cursor, 1501 )then
         a_frs1516.cbpayehd := gse.Integer_Value( cursor, 1501 );
      end if;
      if not gse.Is_Null( cursor, 1502 )then
         a_frs1516.cbpayesp := gse.Integer_Value( cursor, 1502 );
      end if;
      if not gse.Is_Null( cursor, 1503 )then
         a_frs1516.cbtaxhd := gse.Integer_Value( cursor, 1503 );
      end if;
      if not gse.Is_Null( cursor, 1504 )then
         a_frs1516.cbtaxsp := gse.Integer_Value( cursor, 1504 );
      end if;
      if not gse.Is_Null( cursor, 1505 )then
         a_frs1516.pwtchd := gse.Integer_Value( cursor, 1505 );
      end if;
      if not gse.Is_Null( cursor, 1506 )then
         a_frs1516.pctchd := gse.Integer_Value( cursor, 1506 );
      end if;
      if not gse.Is_Null( cursor, 1507 )then
         a_frs1516.pwtcsp := gse.Integer_Value( cursor, 1507 );
      end if;
      if not gse.Is_Null( cursor, 1508 )then
         a_frs1516.pctcsp := gse.Integer_Value( cursor, 1508 );
      end if;
      if not gse.Is_Null( cursor, 1509 )then
         a_frs1516.npcamthd := gse.Integer_Value( cursor, 1509 );
      end if;
      if not gse.Is_Null( cursor, 1510 )then
         a_frs1516.urphd:= Amount'Value( gse.Value( cursor, 1510 ));
      end if;
      if not gse.Is_Null( cursor, 1511 )then
         a_frs1516.uwphd := gse.Integer_Value( cursor, 1511 );
      end if;
      if not gse.Is_Null( cursor, 1512 )then
         a_frs1516.uesahd:= Amount'Value( gse.Value( cursor, 1512 ));
      end if;
      if not gse.Is_Null( cursor, 1513 )then
         a_frs1516.uishd:= Amount'Value( gse.Value( cursor, 1513 ));
      end if;
      if not gse.Is_Null( cursor, 1514 )then
         a_frs1516.uwtchd:= Amount'Value( gse.Value( cursor, 1514 ));
      end if;
      if not gse.Is_Null( cursor, 1515 )then
         a_frs1516.uctchd := gse.Integer_Value( cursor, 1515 );
      end if;
      if not gse.Is_Null( cursor, 1516 )then
         a_frs1516.npcamtsp := gse.Integer_Value( cursor, 1516 );
      end if;
      if not gse.Is_Null( cursor, 1517 )then
         a_frs1516.urpsp:= Amount'Value( gse.Value( cursor, 1517 ));
      end if;
      if not gse.Is_Null( cursor, 1518 )then
         a_frs1516.uwpsp := gse.Integer_Value( cursor, 1518 );
      end if;
      if not gse.Is_Null( cursor, 1519 )then
         a_frs1516.uesasp:= Amount'Value( gse.Value( cursor, 1519 ));
      end if;
      if not gse.Is_Null( cursor, 1520 )then
         a_frs1516.uissp := gse.Integer_Value( cursor, 1520 );
      end if;
      if not gse.Is_Null( cursor, 1521 )then
         a_frs1516.uwtcsp:= Amount'Value( gse.Value( cursor, 1521 ));
      end if;
      if not gse.Is_Null( cursor, 1522 )then
         a_frs1516.uctcsp := gse.Integer_Value( cursor, 1522 );
      end if;
      if not gse.Is_Null( cursor, 1523 )then
         a_frs1516.dmpenchd := gse.Integer_Value( cursor, 1523 );
      end if;
      if not gse.Is_Null( cursor, 1524 )then
         a_frs1516.purphd := gse.Integer_Value( cursor, 1524 );
      end if;
      if not gse.Is_Null( cursor, 1525 )then
         a_frs1516.puwphd := gse.Integer_Value( cursor, 1525 );
      end if;
      if not gse.Is_Null( cursor, 1526 )then
         a_frs1516.nupesahd := gse.Integer_Value( cursor, 1526 );
      end if;
      if not gse.Is_Null( cursor, 1527 )then
         a_frs1516.puishd := gse.Integer_Value( cursor, 1527 );
      end if;
      if not gse.Is_Null( cursor, 1528 )then
         a_frs1516.dmpencsp := gse.Integer_Value( cursor, 1528 );
      end if;
      if not gse.Is_Null( cursor, 1529 )then
         a_frs1516.purpsp := gse.Integer_Value( cursor, 1529 );
      end if;
      if not gse.Is_Null( cursor, 1530 )then
         a_frs1516.puwpsp := gse.Integer_Value( cursor, 1530 );
      end if;
      if not gse.Is_Null( cursor, 1531 )then
         a_frs1516.nupesasp := gse.Integer_Value( cursor, 1531 );
      end if;
      if not gse.Is_Null( cursor, 1532 )then
         a_frs1516.puissp := gse.Integer_Value( cursor, 1532 );
      end if;
      if not gse.Is_Null( cursor, 1533 )then
         a_frs1516.wjsahd := gse.Integer_Value( cursor, 1533 );
      end if;
      if not gse.Is_Null( cursor, 1534 )then
         a_frs1516.wesahd := gse.Integer_Value( cursor, 1534 );
      end if;
      if not gse.Is_Null( cursor, 1535 )then
         a_frs1516.wishd := gse.Integer_Value( cursor, 1535 );
      end if;
      if not gse.Is_Null( cursor, 1536 )then
         a_frs1516.wothbehd := gse.Integer_Value( cursor, 1536 );
      end if;
      if not gse.Is_Null( cursor, 1537 )then
         a_frs1516.wtubenhd := gse.Integer_Value( cursor, 1537 );
      end if;
      if not gse.Is_Null( cursor, 1538 )then
         a_frs1516.wfsbenhd := gse.Integer_Value( cursor, 1538 );
      end if;
      if not gse.Is_Null( cursor, 1539 )then
         a_frs1516.wsicinhd := gse.Integer_Value( cursor, 1539 );
      end if;
      if not gse.Is_Null( cursor, 1540 )then
         a_frs1516.waccinhd := gse.Integer_Value( cursor, 1540 );
      end if;
      if not gse.Is_Null( cursor, 1541 )then
         a_frs1516.whosinhd := gse.Integer_Value( cursor, 1541 );
      end if;
      if not gse.Is_Null( cursor, 1542 )then
         a_frs1516.wkiwchd := gse.Integer_Value( cursor, 1542 );
      end if;
      if not gse.Is_Null( cursor, 1543 )then
         a_frs1516.wkr2whd := gse.Integer_Value( cursor, 1543 );
      end if;
      if not gse.Is_Null( cursor, 1544 )then
         a_frs1516.wuninshd := gse.Integer_Value( cursor, 1544 );
      end if;
      if not gse.Is_Null( cursor, 1545 )then
         a_frs1516.wpehinhd := gse.Integer_Value( cursor, 1545 );
      end if;
      if not gse.Is_Null( cursor, 1546 )then
         a_frs1516.wotsinhd := gse.Integer_Value( cursor, 1546 );
      end if;
      if not gse.Is_Null( cursor, 1547 )then
         a_frs1516.wocichd := gse.Integer_Value( cursor, 1547 );
      end if;
      if not gse.Is_Null( cursor, 1548 )then
         a_frs1516.whbhd := gse.Integer_Value( cursor, 1548 );
      end if;
      if not gse.Is_Null( cursor, 1549 )then
         a_frs1516.wjsasp := gse.Integer_Value( cursor, 1549 );
      end if;
      if not gse.Is_Null( cursor, 1550 )then
         a_frs1516.wesasp := gse.Integer_Value( cursor, 1550 );
      end if;
      if not gse.Is_Null( cursor, 1551 )then
         a_frs1516.wissp := gse.Integer_Value( cursor, 1551 );
      end if;
      if not gse.Is_Null( cursor, 1552 )then
         a_frs1516.wothbesp := gse.Integer_Value( cursor, 1552 );
      end if;
      if not gse.Is_Null( cursor, 1553 )then
         a_frs1516.wtubensp := gse.Integer_Value( cursor, 1553 );
      end if;
      if not gse.Is_Null( cursor, 1554 )then
         a_frs1516.wfsbensp := gse.Integer_Value( cursor, 1554 );
      end if;
      if not gse.Is_Null( cursor, 1555 )then
         a_frs1516.wsicinsp := gse.Integer_Value( cursor, 1555 );
      end if;
      if not gse.Is_Null( cursor, 1556 )then
         a_frs1516.waccinsp := gse.Integer_Value( cursor, 1556 );
      end if;
      if not gse.Is_Null( cursor, 1557 )then
         a_frs1516.whosinsp := gse.Integer_Value( cursor, 1557 );
      end if;
      if not gse.Is_Null( cursor, 1558 )then
         a_frs1516.wkiwcsp := gse.Integer_Value( cursor, 1558 );
      end if;
      if not gse.Is_Null( cursor, 1559 )then
         a_frs1516.wkr2wsp := gse.Integer_Value( cursor, 1559 );
      end if;
      if not gse.Is_Null( cursor, 1560 )then
         a_frs1516.wuninssp := gse.Integer_Value( cursor, 1560 );
      end if;
      if not gse.Is_Null( cursor, 1561 )then
         a_frs1516.wpehinsp := gse.Integer_Value( cursor, 1561 );
      end if;
      if not gse.Is_Null( cursor, 1562 )then
         a_frs1516.wotsinsp := gse.Integer_Value( cursor, 1562 );
      end if;
      if not gse.Is_Null( cursor, 1563 )then
         a_frs1516.wocicsp := gse.Integer_Value( cursor, 1563 );
      end if;
      if not gse.Is_Null( cursor, 1564 )then
         a_frs1516.whbsp := gse.Integer_Value( cursor, 1564 );
      end if;
      if not gse.Is_Null( cursor, 1565 )then
         a_frs1516.yjsahd := gse.Integer_Value( cursor, 1565 );
      end if;
      if not gse.Is_Null( cursor, 1566 )then
         a_frs1516.yesahd := gse.Integer_Value( cursor, 1566 );
      end if;
      if not gse.Is_Null( cursor, 1567 )then
         a_frs1516.yishd := gse.Integer_Value( cursor, 1567 );
      end if;
      if not gse.Is_Null( cursor, 1568 )then
         a_frs1516.yhbhd := gse.Integer_Value( cursor, 1568 );
      end if;
      if not gse.Is_Null( cursor, 1569 )then
         a_frs1516.yjsasp := gse.Integer_Value( cursor, 1569 );
      end if;
      if not gse.Is_Null( cursor, 1570 )then
         a_frs1516.yesasp := gse.Integer_Value( cursor, 1570 );
      end if;
      if not gse.Is_Null( cursor, 1571 )then
         a_frs1516.yissp := gse.Integer_Value( cursor, 1571 );
      end if;
      if not gse.Is_Null( cursor, 1572 )then
         a_frs1516.yhbsp := gse.Integer_Value( cursor, 1572 );
      end if;
      if not gse.Is_Null( cursor, 1573 )then
         a_frs1516.prothbhd := gse.Integer_Value( cursor, 1573 );
      end if;
      if not gse.Is_Null( cursor, 1574 )then
         a_frs1516.prtubehd := gse.Integer_Value( cursor, 1574 );
      end if;
      if not gse.Is_Null( cursor, 1575 )then
         a_frs1516.prfsbehd := gse.Integer_Value( cursor, 1575 );
      end if;
      if not gse.Is_Null( cursor, 1576 )then
         a_frs1516.prsicihd := gse.Integer_Value( cursor, 1576 );
      end if;
      if not gse.Is_Null( cursor, 1577 )then
         a_frs1516.praccihd := gse.Integer_Value( cursor, 1577 );
      end if;
      if not gse.Is_Null( cursor, 1578 )then
         a_frs1516.prhosihd := gse.Integer_Value( cursor, 1578 );
      end if;
      if not gse.Is_Null( cursor, 1579 )then
         a_frs1516.pruninhd := gse.Integer_Value( cursor, 1579 );
      end if;
      if not gse.Is_Null( cursor, 1580 )then
         a_frs1516.prphinhd := gse.Integer_Value( cursor, 1580 );
      end if;
      if not gse.Is_Null( cursor, 1581 )then
         a_frs1516.prosinhd := gse.Integer_Value( cursor, 1581 );
      end if;
      if not gse.Is_Null( cursor, 1582 )then
         a_frs1516.prcichd := gse.Integer_Value( cursor, 1582 );
      end if;
      if not gse.Is_Null( cursor, 1583 )then
         a_frs1516.prothbsp := gse.Integer_Value( cursor, 1583 );
      end if;
      if not gse.Is_Null( cursor, 1584 )then
         a_frs1516.prtubesp := gse.Integer_Value( cursor, 1584 );
      end if;
      if not gse.Is_Null( cursor, 1585 )then
         a_frs1516.prfsbesp := gse.Integer_Value( cursor, 1585 );
      end if;
      if not gse.Is_Null( cursor, 1586 )then
         a_frs1516.prsicisp := gse.Integer_Value( cursor, 1586 );
      end if;
      if not gse.Is_Null( cursor, 1587 )then
         a_frs1516.praccisp := gse.Integer_Value( cursor, 1587 );
      end if;
      if not gse.Is_Null( cursor, 1588 )then
         a_frs1516.prhosisp := gse.Integer_Value( cursor, 1588 );
      end if;
      if not gse.Is_Null( cursor, 1589 )then
         a_frs1516.pruninsp := gse.Integer_Value( cursor, 1589 );
      end if;
      if not gse.Is_Null( cursor, 1590 )then
         a_frs1516.prphinsp := gse.Integer_Value( cursor, 1590 );
      end if;
      if not gse.Is_Null( cursor, 1591 )then
         a_frs1516.prosinsp := gse.Integer_Value( cursor, 1591 );
      end if;
      if not gse.Is_Null( cursor, 1592 )then
         a_frs1516.prcicsp := gse.Integer_Value( cursor, 1592 );
      end if;
      if not gse.Is_Null( cursor, 1593 )then
         a_frs1516.uspenchd := gse.Integer_Value( cursor, 1593 );
      end if;
      if not gse.Is_Null( cursor, 1594 )then
         a_frs1516.usrphd := gse.Integer_Value( cursor, 1594 );
      end if;
      if not gse.Is_Null( cursor, 1595 )then
         a_frs1516.uswphd := gse.Integer_Value( cursor, 1595 );
      end if;
      if not gse.Is_Null( cursor, 1596 )then
         a_frs1516.usjsahd := gse.Integer_Value( cursor, 1596 );
      end if;
      if not gse.Is_Null( cursor, 1597 )then
         a_frs1516.usishd := gse.Integer_Value( cursor, 1597 );
      end if;
      if not gse.Is_Null( cursor, 1598 )then
         a_frs1516.uspencsp := gse.Integer_Value( cursor, 1598 );
      end if;
      if not gse.Is_Null( cursor, 1599 )then
         a_frs1516.usrpsp := gse.Integer_Value( cursor, 1599 );
      end if;
      if not gse.Is_Null( cursor, 1600 )then
         a_frs1516.uswpsp := gse.Integer_Value( cursor, 1600 );
      end if;
      if not gse.Is_Null( cursor, 1601 )then
         a_frs1516.usjsasp := gse.Integer_Value( cursor, 1601 );
      end if;
      if not gse.Is_Null( cursor, 1602 )then
         a_frs1516.usissp := gse.Integer_Value( cursor, 1602 );
      end if;
      if not gse.Is_Null( cursor, 1603 )then
         a_frs1516.gicacahd := gse.Integer_Value( cursor, 1603 );
      end if;
      if not gse.Is_Null( cursor, 1604 )then
         a_frs1516.pencrdhd := gse.Integer_Value( cursor, 1604 );
      end if;
      if not gse.Is_Null( cursor, 1605 )then
         a_frs1516.gicaahd := gse.Integer_Value( cursor, 1605 );
      end if;
      if not gse.Is_Null( cursor, 1606 )then
         a_frs1516.muibwhd := gse.Integer_Value( cursor, 1606 );
      end if;
      if not gse.Is_Null( cursor, 1607 )then
         a_frs1516.wfuelhd := gse.Integer_Value( cursor, 1607 );
      end if;
      if not gse.Is_Null( cursor, 1608 )then
         a_frs1516.exhbtyhd := gse.Integer_Value( cursor, 1608 );
      end if;
      if not gse.Is_Null( cursor, 1609 )then
         a_frs1516.lnodwphd := gse.Integer_Value( cursor, 1609 );
      end if;
      if not gse.Is_Null( cursor, 1610 )then
         a_frs1516.lnolahd := gse.Integer_Value( cursor, 1610 );
      end if;
      if not gse.Is_Null( cursor, 1611 )then
         a_frs1516.gicacasp := gse.Integer_Value( cursor, 1611 );
      end if;
      if not gse.Is_Null( cursor, 1612 )then
         a_frs1516.pencrdsp := gse.Integer_Value( cursor, 1612 );
      end if;
      if not gse.Is_Null( cursor, 1613 )then
         a_frs1516.gicaasp := gse.Integer_Value( cursor, 1613 );
      end if;
      if not gse.Is_Null( cursor, 1614 )then
         a_frs1516.muibwsp := gse.Integer_Value( cursor, 1614 );
      end if;
      if not gse.Is_Null( cursor, 1615 )then
         a_frs1516.wfuelsp := gse.Integer_Value( cursor, 1615 );
      end if;
      if not gse.Is_Null( cursor, 1616 )then
         a_frs1516.exhbtysp := gse.Integer_Value( cursor, 1616 );
      end if;
      if not gse.Is_Null( cursor, 1617 )then
         a_frs1516.lnodwpsp := gse.Integer_Value( cursor, 1617 );
      end if;
      if not gse.Is_Null( cursor, 1618 )then
         a_frs1516.lnolasp := gse.Integer_Value( cursor, 1618 );
      end if;
      if not gse.Is_Null( cursor, 1619 )then
         a_frs1516.dcpayhd := gse.Integer_Value( cursor, 1619 );
      end if;
      if not gse.Is_Null( cursor, 1620 )then
         a_frs1516.dmpayhd := gse.Integer_Value( cursor, 1620 );
      end if;
      if not gse.Is_Null( cursor, 1621 )then
         a_frs1516.ecpenchd := gse.Integer_Value( cursor, 1621 );
      end if;
      if not gse.Is_Null( cursor, 1622 )then
         a_frs1516.wporbahd := gse.Integer_Value( cursor, 1622 );
      end if;
      if not gse.Is_Null( cursor, 1623 )then
         a_frs1516.aapayhd := gse.Integer_Value( cursor, 1623 );
      end if;
      if not gse.Is_Null( cursor, 1624 )then
         a_frs1516.jsatyphd := gse.Integer_Value( cursor, 1624 );
      end if;
      if not gse.Is_Null( cursor, 1625 )then
         a_frs1516.esatyphd := gse.Integer_Value( cursor, 1625 );
      end if;
      if not gse.Is_Null( cursor, 1626 )then
         a_frs1516.mupibhd := gse.Integer_Value( cursor, 1626 );
      end if;
      if not gse.Is_Null( cursor, 1627 )then
         a_frs1516.dssishd := gse.Integer_Value( cursor, 1627 );
      end if;
      if not gse.Is_Null( cursor, 1628 )then
         a_frs1516.dssjsahd := gse.Integer_Value( cursor, 1628 );
      end if;
      if not gse.Is_Null( cursor, 1629 )then
         a_frs1516.sfincihd := gse.Integer_Value( cursor, 1629 );
      end if;
      if not gse.Is_Null( cursor, 1630 )then
         a_frs1516.sfincjhd := gse.Integer_Value( cursor, 1630 );
      end if;
      if not gse.Is_Null( cursor, 1631 )then
         a_frs1516.pdlpayhd := gse.Integer_Value( cursor, 1631 );
      end if;
      if not gse.Is_Null( cursor, 1632 )then
         a_frs1516.pmpayhd := gse.Integer_Value( cursor, 1632 );
      end if;
      if not gse.Is_Null( cursor, 1633 )then
         a_frs1516.dwpuchd := gse.Integer_Value( cursor, 1633 );
      end if;
      if not gse.Is_Null( cursor, 1634 )then
         a_frs1516.sfinuchd := gse.Integer_Value( cursor, 1634 );
      end if;
      if not gse.Is_Null( cursor, 1635 )then
         a_frs1516.dcpaysp := gse.Integer_Value( cursor, 1635 );
      end if;
      if not gse.Is_Null( cursor, 1636 )then
         a_frs1516.dmpaysp := gse.Integer_Value( cursor, 1636 );
      end if;
      if not gse.Is_Null( cursor, 1637 )then
         a_frs1516.ecpencsp := gse.Integer_Value( cursor, 1637 );
      end if;
      if not gse.Is_Null( cursor, 1638 )then
         a_frs1516.wporbasp := gse.Integer_Value( cursor, 1638 );
      end if;
      if not gse.Is_Null( cursor, 1639 )then
         a_frs1516.aapaysp := gse.Integer_Value( cursor, 1639 );
      end if;
      if not gse.Is_Null( cursor, 1640 )then
         a_frs1516.jsatypsp := gse.Integer_Value( cursor, 1640 );
      end if;
      if not gse.Is_Null( cursor, 1641 )then
         a_frs1516.esatypsp := gse.Integer_Value( cursor, 1641 );
      end if;
      if not gse.Is_Null( cursor, 1642 )then
         a_frs1516.mupibsp := gse.Integer_Value( cursor, 1642 );
      end if;
      if not gse.Is_Null( cursor, 1643 )then
         a_frs1516.dssissp := gse.Integer_Value( cursor, 1643 );
      end if;
      if not gse.Is_Null( cursor, 1644 )then
         a_frs1516.dssjsasp := gse.Integer_Value( cursor, 1644 );
      end if;
      if not gse.Is_Null( cursor, 1645 )then
         a_frs1516.sfincisp := gse.Integer_Value( cursor, 1645 );
      end if;
      if not gse.Is_Null( cursor, 1646 )then
         a_frs1516.sfincjsp := gse.Integer_Value( cursor, 1646 );
      end if;
      if not gse.Is_Null( cursor, 1647 )then
         a_frs1516.pdlpaysp := gse.Integer_Value( cursor, 1647 );
      end if;
      if not gse.Is_Null( cursor, 1648 )then
         a_frs1516.pmpaysp := gse.Integer_Value( cursor, 1648 );
      end if;
      if not gse.Is_Null( cursor, 1649 )then
         a_frs1516.dwpucsp := gse.Integer_Value( cursor, 1649 );
      end if;
      if not gse.Is_Null( cursor, 1650 )then
         a_frs1516.sfinucsp := gse.Integer_Value( cursor, 1650 );
      end if;
      if not gse.Is_Null( cursor, 1651 )then
         a_frs1516.icaperhd := gse.Integer_Value( cursor, 1651 );
      end if;
      if not gse.Is_Null( cursor, 1652 )then
         a_frs1516.pmuibhd := gse.Integer_Value( cursor, 1652 );
      end if;
      if not gse.Is_Null( cursor, 1653 )then
         a_frs1516.pipmothd := gse.Integer_Value( cursor, 1653 );
      end if;
      if not gse.Is_Null( cursor, 1654 )then
         a_frs1516.icapersp := gse.Integer_Value( cursor, 1654 );
      end if;
      if not gse.Is_Null( cursor, 1655 )then
         a_frs1516.pmuibsp := gse.Integer_Value( cursor, 1655 );
      end if;
      if not gse.Is_Null( cursor, 1656 )then
         a_frs1516.pipmotsp := gse.Integer_Value( cursor, 1656 );
      end if;
      if not gse.Is_Null( cursor, 1657 )then
         a_frs1516.r1dlchd := gse.Integer_Value( cursor, 1657 );
      end if;
      if not gse.Is_Null( cursor, 1658 )then
         a_frs1516.r1dlmhd := gse.Integer_Value( cursor, 1658 );
      end if;
      if not gse.Is_Null( cursor, 1659 )then
         a_frs1516.r1aahd := gse.Integer_Value( cursor, 1659 );
      end if;
      if not gse.Is_Null( cursor, 1660 )then
         a_frs1516.r1hbhd := gse.Integer_Value( cursor, 1660 );
      end if;
      if not gse.Is_Null( cursor, 1661 )then
         a_frs1516.r1pipdhd := gse.Integer_Value( cursor, 1661 );
      end if;
      if not gse.Is_Null( cursor, 1662 )then
         a_frs1516.r1pipmhd := gse.Integer_Value( cursor, 1662 );
      end if;
      if not gse.Is_Null( cursor, 1663 )then
         a_frs1516.r1dlcsp := gse.Integer_Value( cursor, 1663 );
      end if;
      if not gse.Is_Null( cursor, 1664 )then
         a_frs1516.r1dlmsp := gse.Integer_Value( cursor, 1664 );
      end if;
      if not gse.Is_Null( cursor, 1665 )then
         a_frs1516.r1aasp := gse.Integer_Value( cursor, 1665 );
      end if;
      if not gse.Is_Null( cursor, 1666 )then
         a_frs1516.r1hbsp := gse.Integer_Value( cursor, 1666 );
      end if;
      if not gse.Is_Null( cursor, 1667 )then
         a_frs1516.r1pipdsp := gse.Integer_Value( cursor, 1667 );
      end if;
      if not gse.Is_Null( cursor, 1668 )then
         a_frs1516.r1pipmsp := gse.Integer_Value( cursor, 1668 );
      end if;
      if not gse.Is_Null( cursor, 1669 )then
         a_frs1516.r2dlchd := gse.Integer_Value( cursor, 1669 );
      end if;
      if not gse.Is_Null( cursor, 1670 )then
         a_frs1516.r2dlmhd := gse.Integer_Value( cursor, 1670 );
      end if;
      if not gse.Is_Null( cursor, 1671 )then
         a_frs1516.r2aahd := gse.Integer_Value( cursor, 1671 );
      end if;
      if not gse.Is_Null( cursor, 1672 )then
         a_frs1516.r2hbhd := gse.Integer_Value( cursor, 1672 );
      end if;
      if not gse.Is_Null( cursor, 1673 )then
         a_frs1516.r2pipdhd := gse.Integer_Value( cursor, 1673 );
      end if;
      if not gse.Is_Null( cursor, 1674 )then
         a_frs1516.r2pipmhd := gse.Integer_Value( cursor, 1674 );
      end if;
      if not gse.Is_Null( cursor, 1675 )then
         a_frs1516.r2dlcsp := gse.Integer_Value( cursor, 1675 );
      end if;
      if not gse.Is_Null( cursor, 1676 )then
         a_frs1516.r2dlmsp := gse.Integer_Value( cursor, 1676 );
      end if;
      if not gse.Is_Null( cursor, 1677 )then
         a_frs1516.r2aasp := gse.Integer_Value( cursor, 1677 );
      end if;
      if not gse.Is_Null( cursor, 1678 )then
         a_frs1516.r2hbsp := gse.Integer_Value( cursor, 1678 );
      end if;
      if not gse.Is_Null( cursor, 1679 )then
         a_frs1516.r2pipdsp := gse.Integer_Value( cursor, 1679 );
      end if;
      if not gse.Is_Null( cursor, 1680 )then
         a_frs1516.r2pipmsp := gse.Integer_Value( cursor, 1680 );
      end if;
      if not gse.Is_Null( cursor, 1681 )then
         a_frs1516.r3dlchd := gse.Integer_Value( cursor, 1681 );
      end if;
      if not gse.Is_Null( cursor, 1682 )then
         a_frs1516.r3dlmhd := gse.Integer_Value( cursor, 1682 );
      end if;
      if not gse.Is_Null( cursor, 1683 )then
         a_frs1516.r3aahd := gse.Integer_Value( cursor, 1683 );
      end if;
      if not gse.Is_Null( cursor, 1684 )then
         a_frs1516.r3hbhd := gse.Integer_Value( cursor, 1684 );
      end if;
      if not gse.Is_Null( cursor, 1685 )then
         a_frs1516.r3pipdhd := gse.Integer_Value( cursor, 1685 );
      end if;
      if not gse.Is_Null( cursor, 1686 )then
         a_frs1516.r3pipmhd := gse.Integer_Value( cursor, 1686 );
      end if;
      if not gse.Is_Null( cursor, 1687 )then
         a_frs1516.r3dlcsp := gse.Integer_Value( cursor, 1687 );
      end if;
      if not gse.Is_Null( cursor, 1688 )then
         a_frs1516.r3dlmsp := gse.Integer_Value( cursor, 1688 );
      end if;
      if not gse.Is_Null( cursor, 1689 )then
         a_frs1516.r3aasp := gse.Integer_Value( cursor, 1689 );
      end if;
      if not gse.Is_Null( cursor, 1690 )then
         a_frs1516.r3hbsp := gse.Integer_Value( cursor, 1690 );
      end if;
      if not gse.Is_Null( cursor, 1691 )then
         a_frs1516.r3pipdsp := gse.Integer_Value( cursor, 1691 );
      end if;
      if not gse.Is_Null( cursor, 1692 )then
         a_frs1516.r3pipmsp := gse.Integer_Value( cursor, 1692 );
      end if;
      if not gse.Is_Null( cursor, 1693 )then
         a_frs1516.r4dlchd := gse.Integer_Value( cursor, 1693 );
      end if;
      if not gse.Is_Null( cursor, 1694 )then
         a_frs1516.r4dlmhd := gse.Integer_Value( cursor, 1694 );
      end if;
      if not gse.Is_Null( cursor, 1695 )then
         a_frs1516.r4aahd := gse.Integer_Value( cursor, 1695 );
      end if;
      if not gse.Is_Null( cursor, 1696 )then
         a_frs1516.r4hbhd := gse.Integer_Value( cursor, 1696 );
      end if;
      if not gse.Is_Null( cursor, 1697 )then
         a_frs1516.r4pipdhd := gse.Integer_Value( cursor, 1697 );
      end if;
      if not gse.Is_Null( cursor, 1698 )then
         a_frs1516.r4pipmhd := gse.Integer_Value( cursor, 1698 );
      end if;
      if not gse.Is_Null( cursor, 1699 )then
         a_frs1516.r4dlcsp := gse.Integer_Value( cursor, 1699 );
      end if;
      if not gse.Is_Null( cursor, 1700 )then
         a_frs1516.r4dlmsp := gse.Integer_Value( cursor, 1700 );
      end if;
      if not gse.Is_Null( cursor, 1701 )then
         a_frs1516.r4aasp := gse.Integer_Value( cursor, 1701 );
      end if;
      if not gse.Is_Null( cursor, 1702 )then
         a_frs1516.r4hbsp := gse.Integer_Value( cursor, 1702 );
      end if;
      if not gse.Is_Null( cursor, 1703 )then
         a_frs1516.r4pipdsp := gse.Integer_Value( cursor, 1703 );
      end if;
      if not gse.Is_Null( cursor, 1704 )then
         a_frs1516.r4pipmsp := gse.Integer_Value( cursor, 1704 );
      end if;
      if not gse.Is_Null( cursor, 1705 )then
         a_frs1516.r5dlchd := gse.Integer_Value( cursor, 1705 );
      end if;
      if not gse.Is_Null( cursor, 1706 )then
         a_frs1516.r5dlmhd := gse.Integer_Value( cursor, 1706 );
      end if;
      if not gse.Is_Null( cursor, 1707 )then
         a_frs1516.r5aahd := gse.Integer_Value( cursor, 1707 );
      end if;
      if not gse.Is_Null( cursor, 1708 )then
         a_frs1516.r5hbhd := gse.Integer_Value( cursor, 1708 );
      end if;
      if not gse.Is_Null( cursor, 1709 )then
         a_frs1516.r5pipdhd := gse.Integer_Value( cursor, 1709 );
      end if;
      if not gse.Is_Null( cursor, 1710 )then
         a_frs1516.r5pipmhd := gse.Integer_Value( cursor, 1710 );
      end if;
      if not gse.Is_Null( cursor, 1711 )then
         a_frs1516.r5dlcsp := gse.Integer_Value( cursor, 1711 );
      end if;
      if not gse.Is_Null( cursor, 1712 )then
         a_frs1516.r5dlmsp := gse.Integer_Value( cursor, 1712 );
      end if;
      if not gse.Is_Null( cursor, 1713 )then
         a_frs1516.r5aasp := gse.Integer_Value( cursor, 1713 );
      end if;
      if not gse.Is_Null( cursor, 1714 )then
         a_frs1516.r5hbsp := gse.Integer_Value( cursor, 1714 );
      end if;
      if not gse.Is_Null( cursor, 1715 )then
         a_frs1516.r5pipdsp := gse.Integer_Value( cursor, 1715 );
      end if;
      if not gse.Is_Null( cursor, 1716 )then
         a_frs1516.r5pipmsp := gse.Integer_Value( cursor, 1716 );
      end if;
      if not gse.Is_Null( cursor, 1717 )then
         a_frs1516.stdlacc1 := gse.Integer_Value( cursor, 1717 );
      end if;
      if not gse.Is_Null( cursor, 1718 )then
         a_frs1516.stdlamc1 := gse.Integer_Value( cursor, 1718 );
      end if;
      if not gse.Is_Null( cursor, 1719 )then
         a_frs1516.stdlacc2 := gse.Integer_Value( cursor, 1719 );
      end if;
      if not gse.Is_Null( cursor, 1720 )then
         a_frs1516.stdlamc2 := gse.Integer_Value( cursor, 1720 );
      end if;
      if not gse.Is_Null( cursor, 1721 )then
         a_frs1516.stdlacc3 := gse.Integer_Value( cursor, 1721 );
      end if;
      if not gse.Is_Null( cursor, 1722 )then
         a_frs1516.stdlamc3 := gse.Integer_Value( cursor, 1722 );
      end if;
      if not gse.Is_Null( cursor, 1723 )then
         a_frs1516.stdlacc4 := gse.Integer_Value( cursor, 1723 );
      end if;
      if not gse.Is_Null( cursor, 1724 )then
         a_frs1516.stdlamc4 := gse.Integer_Value( cursor, 1724 );
      end if;
      if not gse.Is_Null( cursor, 1725 )then
         a_frs1516.stdlacc5 := gse.Integer_Value( cursor, 1725 );
      end if;
      if not gse.Is_Null( cursor, 1726 )then
         a_frs1516.stdlamc5 := gse.Integer_Value( cursor, 1726 );
      end if;
      if not gse.Is_Null( cursor, 1727 )then
         a_frs1516.stdlacc6 := gse.Integer_Value( cursor, 1727 );
      end if;
      if not gse.Is_Null( cursor, 1728 )then
         a_frs1516.stdlamc6 := gse.Integer_Value( cursor, 1728 );
      end if;
      if not gse.Is_Null( cursor, 1729 )then
         a_frs1516.stdlacc7 := gse.Integer_Value( cursor, 1729 );
      end if;
      if not gse.Is_Null( cursor, 1730 )then
         a_frs1516.stdlamc7 := gse.Integer_Value( cursor, 1730 );
      end if;
      if not gse.Is_Null( cursor, 1731 )then
         a_frs1516.stdlacc8 := gse.Integer_Value( cursor, 1731 );
      end if;
      if not gse.Is_Null( cursor, 1732 )then
         a_frs1516.stdlamc8 := gse.Integer_Value( cursor, 1732 );
      end if;
      if not gse.Is_Null( cursor, 1733 )then
         a_frs1516.stdlacc9 := gse.Integer_Value( cursor, 1733 );
      end if;
      if not gse.Is_Null( cursor, 1734 )then
         a_frs1516.stdlamc9 := gse.Integer_Value( cursor, 1734 );
      end if;
      if not gse.Is_Null( cursor, 1735 )then
         a_frs1516.dlacac1:= Amount'Value( gse.Value( cursor, 1735 ));
      end if;
      if not gse.Is_Null( cursor, 1736 )then
         a_frs1516.dlamoc1:= Amount'Value( gse.Value( cursor, 1736 ));
      end if;
      if not gse.Is_Null( cursor, 1737 )then
         a_frs1516.dlacac2:= Amount'Value( gse.Value( cursor, 1737 ));
      end if;
      if not gse.Is_Null( cursor, 1738 )then
         a_frs1516.dlamoc2:= Amount'Value( gse.Value( cursor, 1738 ));
      end if;
      if not gse.Is_Null( cursor, 1739 )then
         a_frs1516.dlacac3 := gse.Integer_Value( cursor, 1739 );
      end if;
      if not gse.Is_Null( cursor, 1740 )then
         a_frs1516.dlamoc3 := gse.Integer_Value( cursor, 1740 );
      end if;
      if not gse.Is_Null( cursor, 1741 )then
         a_frs1516.dlacac4 := gse.Integer_Value( cursor, 1741 );
      end if;
      if not gse.Is_Null( cursor, 1742 )then
         a_frs1516.dlamoc4 := gse.Integer_Value( cursor, 1742 );
      end if;
      if not gse.Is_Null( cursor, 1743 )then
         a_frs1516.dlacac5 := gse.Integer_Value( cursor, 1743 );
      end if;
      if not gse.Is_Null( cursor, 1744 )then
         a_frs1516.dlamoc5 := gse.Integer_Value( cursor, 1744 );
      end if;
      if not gse.Is_Null( cursor, 1745 )then
         a_frs1516.dlacac6 := gse.Integer_Value( cursor, 1745 );
      end if;
      if not gse.Is_Null( cursor, 1746 )then
         a_frs1516.dlamoc6 := gse.Integer_Value( cursor, 1746 );
      end if;
      if not gse.Is_Null( cursor, 1747 )then
         a_frs1516.dlacac7 := gse.Integer_Value( cursor, 1747 );
      end if;
      if not gse.Is_Null( cursor, 1748 )then
         a_frs1516.dlamoc7 := gse.Integer_Value( cursor, 1748 );
      end if;
      if not gse.Is_Null( cursor, 1749 )then
         a_frs1516.dlacac8 := gse.Integer_Value( cursor, 1749 );
      end if;
      if not gse.Is_Null( cursor, 1750 )then
         a_frs1516.dlamoc8 := gse.Integer_Value( cursor, 1750 );
      end if;
      if not gse.Is_Null( cursor, 1751 )then
         a_frs1516.dlacac9 := gse.Integer_Value( cursor, 1751 );
      end if;
      if not gse.Is_Null( cursor, 1752 )then
         a_frs1516.dlamoc9 := gse.Integer_Value( cursor, 1752 );
      end if;
      if not gse.Is_Null( cursor, 1753 )then
         a_frs1516.ltdlacc1 := gse.Integer_Value( cursor, 1753 );
      end if;
      if not gse.Is_Null( cursor, 1754 )then
         a_frs1516.ltdlamc1 := gse.Integer_Value( cursor, 1754 );
      end if;
      if not gse.Is_Null( cursor, 1755 )then
         a_frs1516.ltdlacc2 := gse.Integer_Value( cursor, 1755 );
      end if;
      if not gse.Is_Null( cursor, 1756 )then
         a_frs1516.ltdlamc2 := gse.Integer_Value( cursor, 1756 );
      end if;
      if not gse.Is_Null( cursor, 1757 )then
         a_frs1516.ltdlacc3 := gse.Integer_Value( cursor, 1757 );
      end if;
      if not gse.Is_Null( cursor, 1758 )then
         a_frs1516.ltdlamc3 := gse.Integer_Value( cursor, 1758 );
      end if;
      if not gse.Is_Null( cursor, 1759 )then
         a_frs1516.ltdlacc4 := gse.Integer_Value( cursor, 1759 );
      end if;
      if not gse.Is_Null( cursor, 1760 )then
         a_frs1516.ltdlamc4 := gse.Integer_Value( cursor, 1760 );
      end if;
      if not gse.Is_Null( cursor, 1761 )then
         a_frs1516.ltdlacc5 := gse.Integer_Value( cursor, 1761 );
      end if;
      if not gse.Is_Null( cursor, 1762 )then
         a_frs1516.ltdlamc5 := gse.Integer_Value( cursor, 1762 );
      end if;
      if not gse.Is_Null( cursor, 1763 )then
         a_frs1516.ltdlacc6 := gse.Integer_Value( cursor, 1763 );
      end if;
      if not gse.Is_Null( cursor, 1764 )then
         a_frs1516.ltdlamc6 := gse.Integer_Value( cursor, 1764 );
      end if;
      if not gse.Is_Null( cursor, 1765 )then
         a_frs1516.ltdlacc7 := gse.Integer_Value( cursor, 1765 );
      end if;
      if not gse.Is_Null( cursor, 1766 )then
         a_frs1516.ltdlamc7 := gse.Integer_Value( cursor, 1766 );
      end if;
      if not gse.Is_Null( cursor, 1767 )then
         a_frs1516.ltdlacc8 := gse.Integer_Value( cursor, 1767 );
      end if;
      if not gse.Is_Null( cursor, 1768 )then
         a_frs1516.ltdlamc8 := gse.Integer_Value( cursor, 1768 );
      end if;
      if not gse.Is_Null( cursor, 1769 )then
         a_frs1516.ltdlacc9 := gse.Integer_Value( cursor, 1769 );
      end if;
      if not gse.Is_Null( cursor, 1770 )then
         a_frs1516.ltdlamc9 := gse.Integer_Value( cursor, 1770 );
      end if;
      if not gse.Is_Null( cursor, 1771 )then
         a_frs1516.pdlacac1 := gse.Integer_Value( cursor, 1771 );
      end if;
      if not gse.Is_Null( cursor, 1772 )then
         a_frs1516.pdlamoc1 := gse.Integer_Value( cursor, 1772 );
      end if;
      if not gse.Is_Null( cursor, 1773 )then
         a_frs1516.pdlacac2 := gse.Integer_Value( cursor, 1773 );
      end if;
      if not gse.Is_Null( cursor, 1774 )then
         a_frs1516.pdlamoc2 := gse.Integer_Value( cursor, 1774 );
      end if;
      if not gse.Is_Null( cursor, 1775 )then
         a_frs1516.pdlacac3 := gse.Integer_Value( cursor, 1775 );
      end if;
      if not gse.Is_Null( cursor, 1776 )then
         a_frs1516.pdlamoc3 := gse.Integer_Value( cursor, 1776 );
      end if;
      if not gse.Is_Null( cursor, 1777 )then
         a_frs1516.pdlacac4 := gse.Integer_Value( cursor, 1777 );
      end if;
      if not gse.Is_Null( cursor, 1778 )then
         a_frs1516.pdlamoc4 := gse.Integer_Value( cursor, 1778 );
      end if;
      if not gse.Is_Null( cursor, 1779 )then
         a_frs1516.pdlacac5 := gse.Integer_Value( cursor, 1779 );
      end if;
      if not gse.Is_Null( cursor, 1780 )then
         a_frs1516.pdlamoc5 := gse.Integer_Value( cursor, 1780 );
      end if;
      if not gse.Is_Null( cursor, 1781 )then
         a_frs1516.pdlacac6 := gse.Integer_Value( cursor, 1781 );
      end if;
      if not gse.Is_Null( cursor, 1782 )then
         a_frs1516.pdlamoc6 := gse.Integer_Value( cursor, 1782 );
      end if;
      if not gse.Is_Null( cursor, 1783 )then
         a_frs1516.pdlacac7 := gse.Integer_Value( cursor, 1783 );
      end if;
      if not gse.Is_Null( cursor, 1784 )then
         a_frs1516.pdlamoc7 := gse.Integer_Value( cursor, 1784 );
      end if;
      if not gse.Is_Null( cursor, 1785 )then
         a_frs1516.pdlacac8 := gse.Integer_Value( cursor, 1785 );
      end if;
      if not gse.Is_Null( cursor, 1786 )then
         a_frs1516.pdlamoc8 := gse.Integer_Value( cursor, 1786 );
      end if;
      if not gse.Is_Null( cursor, 1787 )then
         a_frs1516.pdlacac9 := gse.Integer_Value( cursor, 1787 );
      end if;
      if not gse.Is_Null( cursor, 1788 )then
         a_frs1516.pdlamoc9 := gse.Integer_Value( cursor, 1788 );
      end if;
      if not gse.Is_Null( cursor, 1789 )then
         a_frs1516.dcpayc1 := gse.Integer_Value( cursor, 1789 );
      end if;
      if not gse.Is_Null( cursor, 1790 )then
         a_frs1516.dmpayc1 := gse.Integer_Value( cursor, 1790 );
      end if;
      if not gse.Is_Null( cursor, 1791 )then
         a_frs1516.dcpayc2 := gse.Integer_Value( cursor, 1791 );
      end if;
      if not gse.Is_Null( cursor, 1792 )then
         a_frs1516.dmpayc2 := gse.Integer_Value( cursor, 1792 );
      end if;
      if not gse.Is_Null( cursor, 1793 )then
         a_frs1516.dcpayc3 := gse.Integer_Value( cursor, 1793 );
      end if;
      if not gse.Is_Null( cursor, 1794 )then
         a_frs1516.dmpayc3 := gse.Integer_Value( cursor, 1794 );
      end if;
      if not gse.Is_Null( cursor, 1795 )then
         a_frs1516.dcpayc4 := gse.Integer_Value( cursor, 1795 );
      end if;
      if not gse.Is_Null( cursor, 1796 )then
         a_frs1516.dmpayc4 := gse.Integer_Value( cursor, 1796 );
      end if;
      if not gse.Is_Null( cursor, 1797 )then
         a_frs1516.dcpayc5 := gse.Integer_Value( cursor, 1797 );
      end if;
      if not gse.Is_Null( cursor, 1798 )then
         a_frs1516.dmpayc5 := gse.Integer_Value( cursor, 1798 );
      end if;
      if not gse.Is_Null( cursor, 1799 )then
         a_frs1516.dcpayc6 := gse.Integer_Value( cursor, 1799 );
      end if;
      if not gse.Is_Null( cursor, 1800 )then
         a_frs1516.dmpayc6 := gse.Integer_Value( cursor, 1800 );
      end if;
      if not gse.Is_Null( cursor, 1801 )then
         a_frs1516.dcpayc7 := gse.Integer_Value( cursor, 1801 );
      end if;
      if not gse.Is_Null( cursor, 1802 )then
         a_frs1516.dmpayc7 := gse.Integer_Value( cursor, 1802 );
      end if;
      if not gse.Is_Null( cursor, 1803 )then
         a_frs1516.dcpayc8 := gse.Integer_Value( cursor, 1803 );
      end if;
      if not gse.Is_Null( cursor, 1804 )then
         a_frs1516.dmpayc8 := gse.Integer_Value( cursor, 1804 );
      end if;
      if not gse.Is_Null( cursor, 1805 )then
         a_frs1516.dcpayc9 := gse.Integer_Value( cursor, 1805 );
      end if;
      if not gse.Is_Null( cursor, 1806 )then
         a_frs1516.dmpayc9 := gse.Integer_Value( cursor, 1806 );
      end if;
      if not gse.Is_Null( cursor, 1807 )then
         a_frs1516.r1dlcc1 := gse.Integer_Value( cursor, 1807 );
      end if;
      if not gse.Is_Null( cursor, 1808 )then
         a_frs1516.r1dlmc1 := gse.Integer_Value( cursor, 1808 );
      end if;
      if not gse.Is_Null( cursor, 1809 )then
         a_frs1516.r1dlcc2 := gse.Integer_Value( cursor, 1809 );
      end if;
      if not gse.Is_Null( cursor, 1810 )then
         a_frs1516.r1dlmc2 := gse.Integer_Value( cursor, 1810 );
      end if;
      if not gse.Is_Null( cursor, 1811 )then
         a_frs1516.r1dlcc3 := gse.Integer_Value( cursor, 1811 );
      end if;
      if not gse.Is_Null( cursor, 1812 )then
         a_frs1516.r1dlmc3 := gse.Integer_Value( cursor, 1812 );
      end if;
      if not gse.Is_Null( cursor, 1813 )then
         a_frs1516.r1dlcc4 := gse.Integer_Value( cursor, 1813 );
      end if;
      if not gse.Is_Null( cursor, 1814 )then
         a_frs1516.r1dlmc4 := gse.Integer_Value( cursor, 1814 );
      end if;
      if not gse.Is_Null( cursor, 1815 )then
         a_frs1516.r1dlcc5 := gse.Integer_Value( cursor, 1815 );
      end if;
      if not gse.Is_Null( cursor, 1816 )then
         a_frs1516.r1dlmc5 := gse.Integer_Value( cursor, 1816 );
      end if;
      if not gse.Is_Null( cursor, 1817 )then
         a_frs1516.r1dlcc6 := gse.Integer_Value( cursor, 1817 );
      end if;
      if not gse.Is_Null( cursor, 1818 )then
         a_frs1516.r1dlmc6 := gse.Integer_Value( cursor, 1818 );
      end if;
      if not gse.Is_Null( cursor, 1819 )then
         a_frs1516.r1dlcc7 := gse.Integer_Value( cursor, 1819 );
      end if;
      if not gse.Is_Null( cursor, 1820 )then
         a_frs1516.r1dlmc7 := gse.Integer_Value( cursor, 1820 );
      end if;
      if not gse.Is_Null( cursor, 1821 )then
         a_frs1516.r1dlcc8 := gse.Integer_Value( cursor, 1821 );
      end if;
      if not gse.Is_Null( cursor, 1822 )then
         a_frs1516.r1dlmc8 := gse.Integer_Value( cursor, 1822 );
      end if;
      if not gse.Is_Null( cursor, 1823 )then
         a_frs1516.r1dlcc9 := gse.Integer_Value( cursor, 1823 );
      end if;
      if not gse.Is_Null( cursor, 1824 )then
         a_frs1516.r1dlmc9 := gse.Integer_Value( cursor, 1824 );
      end if;
      if not gse.Is_Null( cursor, 1825 )then
         a_frs1516.r2dlcc1 := gse.Integer_Value( cursor, 1825 );
      end if;
      if not gse.Is_Null( cursor, 1826 )then
         a_frs1516.r2dlmc1 := gse.Integer_Value( cursor, 1826 );
      end if;
      if not gse.Is_Null( cursor, 1827 )then
         a_frs1516.r2dlcc2 := gse.Integer_Value( cursor, 1827 );
      end if;
      if not gse.Is_Null( cursor, 1828 )then
         a_frs1516.r2dlmc2 := gse.Integer_Value( cursor, 1828 );
      end if;
      if not gse.Is_Null( cursor, 1829 )then
         a_frs1516.r2dlcc3 := gse.Integer_Value( cursor, 1829 );
      end if;
      if not gse.Is_Null( cursor, 1830 )then
         a_frs1516.r2dlmc3 := gse.Integer_Value( cursor, 1830 );
      end if;
      if not gse.Is_Null( cursor, 1831 )then
         a_frs1516.r2dlcc4 := gse.Integer_Value( cursor, 1831 );
      end if;
      if not gse.Is_Null( cursor, 1832 )then
         a_frs1516.r2dlmc4 := gse.Integer_Value( cursor, 1832 );
      end if;
      if not gse.Is_Null( cursor, 1833 )then
         a_frs1516.r2dlcc5 := gse.Integer_Value( cursor, 1833 );
      end if;
      if not gse.Is_Null( cursor, 1834 )then
         a_frs1516.r2dlmc5 := gse.Integer_Value( cursor, 1834 );
      end if;
      if not gse.Is_Null( cursor, 1835 )then
         a_frs1516.r2dlcc6 := gse.Integer_Value( cursor, 1835 );
      end if;
      if not gse.Is_Null( cursor, 1836 )then
         a_frs1516.r2dlmc6 := gse.Integer_Value( cursor, 1836 );
      end if;
      if not gse.Is_Null( cursor, 1837 )then
         a_frs1516.r2dlcc7 := gse.Integer_Value( cursor, 1837 );
      end if;
      if not gse.Is_Null( cursor, 1838 )then
         a_frs1516.r2dlmc7 := gse.Integer_Value( cursor, 1838 );
      end if;
      if not gse.Is_Null( cursor, 1839 )then
         a_frs1516.r2dlcc8 := gse.Integer_Value( cursor, 1839 );
      end if;
      if not gse.Is_Null( cursor, 1840 )then
         a_frs1516.r2dlmc8 := gse.Integer_Value( cursor, 1840 );
      end if;
      if not gse.Is_Null( cursor, 1841 )then
         a_frs1516.r2dlcc9 := gse.Integer_Value( cursor, 1841 );
      end if;
      if not gse.Is_Null( cursor, 1842 )then
         a_frs1516.r2dlmc9 := gse.Integer_Value( cursor, 1842 );
      end if;
      if not gse.Is_Null( cursor, 1843 )then
         a_frs1516.r3dlcc1 := gse.Integer_Value( cursor, 1843 );
      end if;
      if not gse.Is_Null( cursor, 1844 )then
         a_frs1516.r3dlmc1 := gse.Integer_Value( cursor, 1844 );
      end if;
      if not gse.Is_Null( cursor, 1845 )then
         a_frs1516.r3dlcc2 := gse.Integer_Value( cursor, 1845 );
      end if;
      if not gse.Is_Null( cursor, 1846 )then
         a_frs1516.r3dlmc2 := gse.Integer_Value( cursor, 1846 );
      end if;
      if not gse.Is_Null( cursor, 1847 )then
         a_frs1516.r3dlcc3 := gse.Integer_Value( cursor, 1847 );
      end if;
      if not gse.Is_Null( cursor, 1848 )then
         a_frs1516.r3dlmc3 := gse.Integer_Value( cursor, 1848 );
      end if;
      if not gse.Is_Null( cursor, 1849 )then
         a_frs1516.r3dlcc4 := gse.Integer_Value( cursor, 1849 );
      end if;
      if not gse.Is_Null( cursor, 1850 )then
         a_frs1516.r3dlmc4 := gse.Integer_Value( cursor, 1850 );
      end if;
      if not gse.Is_Null( cursor, 1851 )then
         a_frs1516.r3dlcc5 := gse.Integer_Value( cursor, 1851 );
      end if;
      if not gse.Is_Null( cursor, 1852 )then
         a_frs1516.r3dlmc5 := gse.Integer_Value( cursor, 1852 );
      end if;
      if not gse.Is_Null( cursor, 1853 )then
         a_frs1516.r3dlcc6 := gse.Integer_Value( cursor, 1853 );
      end if;
      if not gse.Is_Null( cursor, 1854 )then
         a_frs1516.r3dlmc6 := gse.Integer_Value( cursor, 1854 );
      end if;
      if not gse.Is_Null( cursor, 1855 )then
         a_frs1516.r3dlcc7 := gse.Integer_Value( cursor, 1855 );
      end if;
      if not gse.Is_Null( cursor, 1856 )then
         a_frs1516.r3dlmc7 := gse.Integer_Value( cursor, 1856 );
      end if;
      if not gse.Is_Null( cursor, 1857 )then
         a_frs1516.r3dlcc8 := gse.Integer_Value( cursor, 1857 );
      end if;
      if not gse.Is_Null( cursor, 1858 )then
         a_frs1516.r3dlmc8 := gse.Integer_Value( cursor, 1858 );
      end if;
      if not gse.Is_Null( cursor, 1859 )then
         a_frs1516.r3dlcc9 := gse.Integer_Value( cursor, 1859 );
      end if;
      if not gse.Is_Null( cursor, 1860 )then
         a_frs1516.r3dlmc9 := gse.Integer_Value( cursor, 1860 );
      end if;
      if not gse.Is_Null( cursor, 1861 )then
         a_frs1516.r4dlcc1 := gse.Integer_Value( cursor, 1861 );
      end if;
      if not gse.Is_Null( cursor, 1862 )then
         a_frs1516.r4dlmc1 := gse.Integer_Value( cursor, 1862 );
      end if;
      if not gse.Is_Null( cursor, 1863 )then
         a_frs1516.r4dlcc2 := gse.Integer_Value( cursor, 1863 );
      end if;
      if not gse.Is_Null( cursor, 1864 )then
         a_frs1516.r4dlmc2 := gse.Integer_Value( cursor, 1864 );
      end if;
      if not gse.Is_Null( cursor, 1865 )then
         a_frs1516.r4dlcc3 := gse.Integer_Value( cursor, 1865 );
      end if;
      if not gse.Is_Null( cursor, 1866 )then
         a_frs1516.r4dlmc3 := gse.Integer_Value( cursor, 1866 );
      end if;
      if not gse.Is_Null( cursor, 1867 )then
         a_frs1516.r4dlcc4 := gse.Integer_Value( cursor, 1867 );
      end if;
      if not gse.Is_Null( cursor, 1868 )then
         a_frs1516.r4dlmc4 := gse.Integer_Value( cursor, 1868 );
      end if;
      if not gse.Is_Null( cursor, 1869 )then
         a_frs1516.r4dlcc5 := gse.Integer_Value( cursor, 1869 );
      end if;
      if not gse.Is_Null( cursor, 1870 )then
         a_frs1516.r4dlmc5 := gse.Integer_Value( cursor, 1870 );
      end if;
      if not gse.Is_Null( cursor, 1871 )then
         a_frs1516.r4dlcc6 := gse.Integer_Value( cursor, 1871 );
      end if;
      if not gse.Is_Null( cursor, 1872 )then
         a_frs1516.r4dlmc6 := gse.Integer_Value( cursor, 1872 );
      end if;
      if not gse.Is_Null( cursor, 1873 )then
         a_frs1516.r4dlcc7 := gse.Integer_Value( cursor, 1873 );
      end if;
      if not gse.Is_Null( cursor, 1874 )then
         a_frs1516.r4dlmc7 := gse.Integer_Value( cursor, 1874 );
      end if;
      if not gse.Is_Null( cursor, 1875 )then
         a_frs1516.r4dlcc8 := gse.Integer_Value( cursor, 1875 );
      end if;
      if not gse.Is_Null( cursor, 1876 )then
         a_frs1516.r4dlmc8 := gse.Integer_Value( cursor, 1876 );
      end if;
      if not gse.Is_Null( cursor, 1877 )then
         a_frs1516.r4dlcc9 := gse.Integer_Value( cursor, 1877 );
      end if;
      if not gse.Is_Null( cursor, 1878 )then
         a_frs1516.r4dlmc9 := gse.Integer_Value( cursor, 1878 );
      end if;
      if not gse.Is_Null( cursor, 1879 )then
         a_frs1516.r5dlcc1 := gse.Integer_Value( cursor, 1879 );
      end if;
      if not gse.Is_Null( cursor, 1880 )then
         a_frs1516.r5dlmc1 := gse.Integer_Value( cursor, 1880 );
      end if;
      if not gse.Is_Null( cursor, 1881 )then
         a_frs1516.r5dlcc2 := gse.Integer_Value( cursor, 1881 );
      end if;
      if not gse.Is_Null( cursor, 1882 )then
         a_frs1516.r5dlmc2 := gse.Integer_Value( cursor, 1882 );
      end if;
      if not gse.Is_Null( cursor, 1883 )then
         a_frs1516.r5dlcc3 := gse.Integer_Value( cursor, 1883 );
      end if;
      if not gse.Is_Null( cursor, 1884 )then
         a_frs1516.r5dlmc3 := gse.Integer_Value( cursor, 1884 );
      end if;
      if not gse.Is_Null( cursor, 1885 )then
         a_frs1516.r5dlcc4 := gse.Integer_Value( cursor, 1885 );
      end if;
      if not gse.Is_Null( cursor, 1886 )then
         a_frs1516.r5dlmc4 := gse.Integer_Value( cursor, 1886 );
      end if;
      if not gse.Is_Null( cursor, 1887 )then
         a_frs1516.r5dlcc5 := gse.Integer_Value( cursor, 1887 );
      end if;
      if not gse.Is_Null( cursor, 1888 )then
         a_frs1516.r5dlmc5 := gse.Integer_Value( cursor, 1888 );
      end if;
      if not gse.Is_Null( cursor, 1889 )then
         a_frs1516.r5dlcc6 := gse.Integer_Value( cursor, 1889 );
      end if;
      if not gse.Is_Null( cursor, 1890 )then
         a_frs1516.r5dlmc6 := gse.Integer_Value( cursor, 1890 );
      end if;
      if not gse.Is_Null( cursor, 1891 )then
         a_frs1516.r5dlcc7 := gse.Integer_Value( cursor, 1891 );
      end if;
      if not gse.Is_Null( cursor, 1892 )then
         a_frs1516.r5dlmc7 := gse.Integer_Value( cursor, 1892 );
      end if;
      if not gse.Is_Null( cursor, 1893 )then
         a_frs1516.r5dlcc8 := gse.Integer_Value( cursor, 1893 );
      end if;
      if not gse.Is_Null( cursor, 1894 )then
         a_frs1516.r5dlmc8 := gse.Integer_Value( cursor, 1894 );
      end if;
      if not gse.Is_Null( cursor, 1895 )then
         a_frs1516.r5dlcc9 := gse.Integer_Value( cursor, 1895 );
      end if;
      if not gse.Is_Null( cursor, 1896 )then
         a_frs1516.r5dlmc9 := gse.Integer_Value( cursor, 1896 );
      end if;
      if not gse.Is_Null( cursor, 1897 )then
         a_frs1516.adbtbl := gse.Integer_Value( cursor, 1897 );
      end if;
      if not gse.Is_Null( cursor, 1898 )then
         a_frs1516.adddec := gse.Integer_Value( cursor, 1898 );
      end if;
      if not gse.Is_Null( cursor, 1899 )then
         a_frs1516.addhol := gse.Integer_Value( cursor, 1899 );
      end if;
      if not gse.Is_Null( cursor, 1900 )then
         a_frs1516.addholr := gse.Integer_Value( cursor, 1900 );
      end if;
      if not gse.Is_Null( cursor, 1901 )then
         a_frs1516.addins := gse.Integer_Value( cursor, 1901 );
      end if;
      if not gse.Is_Null( cursor, 1902 )then
         a_frs1516.addmon := gse.Integer_Value( cursor, 1902 );
      end if;
      if not gse.Is_Null( cursor, 1903 )then
         a_frs1516.adepfur := gse.Integer_Value( cursor, 1903 );
      end if;
      if not gse.Is_Null( cursor, 1904 )then
         a_frs1516.adles := gse.Integer_Value( cursor, 1904 );
      end if;
      if not gse.Is_Null( cursor, 1905 )then
         a_frs1516.adlesoa := gse.Integer_Value( cursor, 1905 );
      end if;
      if not gse.Is_Null( cursor, 1906 )then
         a_frs1516.af1 := gse.Integer_Value( cursor, 1906 );
      end if;
      if not gse.Is_Null( cursor, 1907 )then
         a_frs1516.afdep2 := gse.Integer_Value( cursor, 1907 );
      end if;
      if not gse.Is_Null( cursor, 1908 )then
         a_frs1516.cdelply := gse.Integer_Value( cursor, 1908 );
      end if;
      if not gse.Is_Null( cursor, 1909 )then
         a_frs1516.cdepact := gse.Integer_Value( cursor, 1909 );
      end if;
      if not gse.Is_Null( cursor, 1910 )then
         a_frs1516.cdepbed := gse.Integer_Value( cursor, 1910 );
      end if;
      if not gse.Is_Null( cursor, 1911 )then
         a_frs1516.cdepcel := gse.Integer_Value( cursor, 1911 );
      end if;
      if not gse.Is_Null( cursor, 1912 )then
         a_frs1516.cdepeqp := gse.Integer_Value( cursor, 1912 );
      end if;
      if not gse.Is_Null( cursor, 1913 )then
         a_frs1516.cdephol := gse.Integer_Value( cursor, 1913 );
      end if;
      if not gse.Is_Null( cursor, 1914 )then
         a_frs1516.cdeples := gse.Integer_Value( cursor, 1914 );
      end if;
      if not gse.Is_Null( cursor, 1915 )then
         a_frs1516.cdeptea := gse.Integer_Value( cursor, 1915 );
      end if;
      if not gse.Is_Null( cursor, 1916 )then
         a_frs1516.cdeptrp := gse.Integer_Value( cursor, 1916 );
      end if;
      if not gse.Is_Null( cursor, 1917 )then
         a_frs1516.cdepveg := gse.Integer_Value( cursor, 1917 );
      end if;
      if not gse.Is_Null( cursor, 1918 )then
         a_frs1516.cdpcoat := gse.Integer_Value( cursor, 1918 );
      end if;
      if not gse.Is_Null( cursor, 1919 )then
         a_frs1516.clothes := gse.Integer_Value( cursor, 1919 );
      end if;
      if not gse.Is_Null( cursor, 1920 )then
         a_frs1516.cplay := gse.Integer_Value( cursor, 1920 );
      end if;
      if not gse.Is_Null( cursor, 1921 )then
         a_frs1516.debt10 := gse.Integer_Value( cursor, 1921 );
      end if;
      if not gse.Is_Null( cursor, 1922 )then
         a_frs1516.debt11 := gse.Integer_Value( cursor, 1922 );
      end if;
      if not gse.Is_Null( cursor, 1923 )then
         a_frs1516.debt12 := gse.Integer_Value( cursor, 1923 );
      end if;
      if not gse.Is_Null( cursor, 1924 )then
         a_frs1516.debt13 := gse.Integer_Value( cursor, 1924 );
      end if;
      if not gse.Is_Null( cursor, 1925 )then
         a_frs1516.debtar01 := gse.Integer_Value( cursor, 1925 );
      end if;
      if not gse.Is_Null( cursor, 1926 )then
         a_frs1516.debtar02 := gse.Integer_Value( cursor, 1926 );
      end if;
      if not gse.Is_Null( cursor, 1927 )then
         a_frs1516.debtar03 := gse.Integer_Value( cursor, 1927 );
      end if;
      if not gse.Is_Null( cursor, 1928 )then
         a_frs1516.debtar04 := gse.Integer_Value( cursor, 1928 );
      end if;
      if not gse.Is_Null( cursor, 1929 )then
         a_frs1516.debtar05 := gse.Integer_Value( cursor, 1929 );
      end if;
      if not gse.Is_Null( cursor, 1930 )then
         a_frs1516.debtar06 := gse.Integer_Value( cursor, 1930 );
      end if;
      if not gse.Is_Null( cursor, 1931 )then
         a_frs1516.debtar07 := gse.Integer_Value( cursor, 1931 );
      end if;
      if not gse.Is_Null( cursor, 1932 )then
         a_frs1516.debtar08 := gse.Integer_Value( cursor, 1932 );
      end if;
      if not gse.Is_Null( cursor, 1933 )then
         a_frs1516.debtar09 := gse.Integer_Value( cursor, 1933 );
      end if;
      if not gse.Is_Null( cursor, 1934 )then
         a_frs1516.debtar10 := gse.Integer_Value( cursor, 1934 );
      end if;
      if not gse.Is_Null( cursor, 1935 )then
         a_frs1516.debtar11 := gse.Integer_Value( cursor, 1935 );
      end if;
      if not gse.Is_Null( cursor, 1936 )then
         a_frs1516.debtar12 := gse.Integer_Value( cursor, 1936 );
      end if;
      if not gse.Is_Null( cursor, 1937 )then
         a_frs1516.debtar13 := gse.Integer_Value( cursor, 1937 );
      end if;
      if not gse.Is_Null( cursor, 1938 )then
         a_frs1516.debtfre1 := gse.Integer_Value( cursor, 1938 );
      end if;
      if not gse.Is_Null( cursor, 1939 )then
         a_frs1516.debtfre2 := gse.Integer_Value( cursor, 1939 );
      end if;
      if not gse.Is_Null( cursor, 1940 )then
         a_frs1516.debtfre3 := gse.Integer_Value( cursor, 1940 );
      end if;
      if not gse.Is_Null( cursor, 1941 )then
         a_frs1516.hbolng := gse.Integer_Value( cursor, 1941 );
      end if;
      if not gse.Is_Null( cursor, 1942 )then
         a_frs1516.houshe1 := gse.Integer_Value( cursor, 1942 );
      end if;
      if not gse.Is_Null( cursor, 1943 )then
         a_frs1516.kidinc := gse.Integer_Value( cursor, 1943 );
      end if;
      if not gse.Is_Null( cursor, 1944 )then
         a_frs1516.meal := gse.Integer_Value( cursor, 1944 );
      end if;
      if not gse.Is_Null( cursor, 1945 )then
         a_frs1516.nhhchild := gse.Integer_Value( cursor, 1945 );
      end if;
      if not gse.Is_Null( cursor, 1946 )then
         a_frs1516.oafur := gse.Integer_Value( cursor, 1946 );
      end if;
      if not gse.Is_Null( cursor, 1947 )then
         a_frs1516.oapre := gse.Integer_Value( cursor, 1947 );
      end if;
      if not gse.Is_Null( cursor, 1948 )then
         a_frs1516.outpay := gse.Integer_Value( cursor, 1948 );
      end if;
      if not gse.Is_Null( cursor, 1949 )then
         a_frs1516.outpyamt:= Amount'Value( gse.Value( cursor, 1949 ));
      end if;
      if not gse.Is_Null( cursor, 1950 )then
         a_frs1516.regpamt:= Amount'Value( gse.Value( cursor, 1950 ));
      end if;
      if not gse.Is_Null( cursor, 1951 )then
         a_frs1516.regularp := gse.Integer_Value( cursor, 1951 );
      end if;
      if not gse.Is_Null( cursor, 1952 )then
         a_frs1516.shoeoa := gse.Integer_Value( cursor, 1952 );
      end if;
      if not gse.Is_Null( cursor, 1953 )then
         a_frs1516.totsav := gse.Integer_Value( cursor, 1953 );
      end if;
      if not gse.Is_Null( cursor, 1954 )then
         a_frs1516.adultb := gse.Integer_Value( cursor, 1954 );
      end if;
      if not gse.Is_Null( cursor, 1955 )then
         a_frs1516.boarder:= Amount'Value( gse.Value( cursor, 1955 ));
      end if;
      if not gse.Is_Null( cursor, 1956 )then
         a_frs1516.bpeninc := gse.Integer_Value( cursor, 1956 );
      end if;
      if not gse.Is_Null( cursor, 1957 )then
         a_frs1516.bseinc := gse.Integer_Value( cursor, 1957 );
      end if;
      if not gse.Is_Null( cursor, 1958 )then
         a_frs1516.budisben := gse.Integer_Value( cursor, 1958 );
      end if;
      if not gse.Is_Null( cursor, 1959 )then
         a_frs1516.buearns := gse.Integer_Value( cursor, 1959 );
      end if;
      if not gse.Is_Null( cursor, 1960 )then
         a_frs1516.buethgr3 := gse.Integer_Value( cursor, 1960 );
      end if;
      if not gse.Is_Null( cursor, 1961 )then
         a_frs1516.buinc := gse.Integer_Value( cursor, 1961 );
      end if;
      if not gse.Is_Null( cursor, 1962 )then
         a_frs1516.buinv := gse.Integer_Value( cursor, 1962 );
      end if;
      if not gse.Is_Null( cursor, 1963 )then
         a_frs1516.buirben := gse.Integer_Value( cursor, 1963 );
      end if;
      if not gse.Is_Null( cursor, 1964 )then
         a_frs1516.bukids := gse.Integer_Value( cursor, 1964 );
      end if;
      if not gse.Is_Null( cursor, 1965 )then
         a_frs1516.bunirben := gse.Integer_Value( cursor, 1965 );
      end if;
      if not gse.Is_Null( cursor, 1966 )then
         a_frs1516.buothben := gse.Integer_Value( cursor, 1966 );
      end if;
      if not gse.Is_Null( cursor, 1967 )then
         a_frs1516.burent := gse.Integer_Value( cursor, 1967 );
      end if;
      if not gse.Is_Null( cursor, 1968 )then
         a_frs1516.burinc := gse.Integer_Value( cursor, 1968 );
      end if;
      if not gse.Is_Null( cursor, 1969 )then
         a_frs1516.burpinc := gse.Integer_Value( cursor, 1969 );
      end if;
      if not gse.Is_Null( cursor, 1970 )then
         a_frs1516.butvlic:= Amount'Value( gse.Value( cursor, 1970 ));
      end if;
      if not gse.Is_Null( cursor, 1971 )then
         a_frs1516.butxcred := gse.Integer_Value( cursor, 1971 );
      end if;
      if not gse.Is_Null( cursor, 1972 )then
         a_frs1516.depchldb := gse.Integer_Value( cursor, 1972 );
      end if;
      if not gse.Is_Null( cursor, 1973 )then
         a_frs1516.diswbua1 := gse.Integer_Value( cursor, 1973 );
      end if;
      if not gse.Is_Null( cursor, 1974 )then
         a_frs1516.diswbuc1 := gse.Integer_Value( cursor, 1974 );
      end if;
      if not gse.Is_Null( cursor, 1975 )then
         a_frs1516.ecstatbu := gse.Integer_Value( cursor, 1975 );
      end if;
      if not gse.Is_Null( cursor, 1976 )then
         a_frs1516.famtypb2 := gse.Integer_Value( cursor, 1976 );
      end if;
      if not gse.Is_Null( cursor, 1977 )then
         a_frs1516.famtypbs := gse.Integer_Value( cursor, 1977 );
      end if;
      if not gse.Is_Null( cursor, 1978 )then
         a_frs1516.famtypbu := gse.Integer_Value( cursor, 1978 );
      end if;
      if not gse.Is_Null( cursor, 1979 )then
         a_frs1516.fsfvbu:= Amount'Value( gse.Value( cursor, 1979 ));
      end if;
      if not gse.Is_Null( cursor, 1980 )then
         a_frs1516.fsmbu:= Amount'Value( gse.Value( cursor, 1980 ));
      end if;
      if not gse.Is_Null( cursor, 1981 )then
         a_frs1516.fsmlkbu:= Amount'Value( gse.Value( cursor, 1981 ));
      end if;
      if not gse.Is_Null( cursor, 1982 )then
         a_frs1516.gross4 := gse.Integer_Value( cursor, 1982 );
      end if;
      if not gse.Is_Null( cursor, 1983 )then
         a_frs1516.hbindbu := gse.Integer_Value( cursor, 1983 );
      end if;
      if not gse.Is_Null( cursor, 1984 )then
         a_frs1516.hbindbu2 := gse.Integer_Value( cursor, 1984 );
      end if;
      if not gse.Is_Null( cursor, 1985 )then
         a_frs1516.heartbu:= Amount'Value( gse.Value( cursor, 1985 ));
      end if;
      if not gse.Is_Null( cursor, 1986 )then
         a_frs1516.kid04 := gse.Integer_Value( cursor, 1986 );
      end if;
      if not gse.Is_Null( cursor, 1987 )then
         a_frs1516.kid1115 := gse.Integer_Value( cursor, 1987 );
      end if;
      if not gse.Is_Null( cursor, 1988 )then
         a_frs1516.kid1619 := gse.Integer_Value( cursor, 1988 );
      end if;
      if not gse.Is_Null( cursor, 1989 )then
         a_frs1516.kid510 := gse.Integer_Value( cursor, 1989 );
      end if;
      if not gse.Is_Null( cursor, 1990 )then
         a_frs1516.lodger:= Amount'Value( gse.Value( cursor, 1990 ));
      end if;
      if not gse.Is_Null( cursor, 1991 )then
         a_frs1516.subltamt:= Amount'Value( gse.Value( cursor, 1991 ));
      end if;
      if not gse.Is_Null( cursor, 1992 )then
         a_frs1516.totcapb3:= Amount'Value( gse.Value( cursor, 1992 ));
      end if;
      if not gse.Is_Null( cursor, 1993 )then
         a_frs1516.totsavbu := gse.Integer_Value( cursor, 1993 );
      end if;
      if not gse.Is_Null( cursor, 1994 )then
         a_frs1516.tuburent := gse.Integer_Value( cursor, 1994 );
      end if;
      if not gse.Is_Null( cursor, 1995 )then
         a_frs1516.youngch := gse.Integer_Value( cursor, 1995 );
      end if;
      if not gse.Is_Null( cursor, 1996 )then
         a_frs1516.clthsoa := gse.Integer_Value( cursor, 1996 );
      end if;
      if not gse.Is_Null( cursor, 1997 )then
         a_frs1516.debt1 := gse.Integer_Value( cursor, 1997 );
      end if;
      if not gse.Is_Null( cursor, 1998 )then
         a_frs1516.debt2 := gse.Integer_Value( cursor, 1998 );
      end if;
      if not gse.Is_Null( cursor, 1999 )then
         a_frs1516.debt3 := gse.Integer_Value( cursor, 1999 );
      end if;
      if not gse.Is_Null( cursor, 2000 )then
         a_frs1516.debt4 := gse.Integer_Value( cursor, 2000 );
      end if;
      if not gse.Is_Null( cursor, 2001 )then
         a_frs1516.debt5 := gse.Integer_Value( cursor, 2001 );
      end if;
      if not gse.Is_Null( cursor, 2002 )then
         a_frs1516.debt6 := gse.Integer_Value( cursor, 2002 );
      end if;
      if not gse.Is_Null( cursor, 2003 )then
         a_frs1516.debt7 := gse.Integer_Value( cursor, 2003 );
      end if;
      if not gse.Is_Null( cursor, 2004 )then
         a_frs1516.debt8 := gse.Integer_Value( cursor, 2004 );
      end if;
      if not gse.Is_Null( cursor, 2005 )then
         a_frs1516.debt9 := gse.Integer_Value( cursor, 2005 );
      end if;
      if not gse.Is_Null( cursor, 2006 )then
         a_frs1516.discbua := gse.Integer_Value( cursor, 2006 );
      end if;
      if not gse.Is_Null( cursor, 2007 )then
         a_frs1516.discbuc := gse.Integer_Value( cursor, 2007 );
      end if;
      if not gse.Is_Null( cursor, 2008 )then
         a_frs1516.hbtham:= Amount'Value( gse.Value( cursor, 2008 ));
      end if;
      if not gse.Is_Null( cursor, 2009 )then
         a_frs1516.hbthbu := gse.Integer_Value( cursor, 2009 );
      end if;
      if not gse.Is_Null( cursor, 2010 )then
         a_frs1516.hbthmn := gse.Integer_Value( cursor, 2010 );
      end if;
      if not gse.Is_Null( cursor, 2011 )then
         a_frs1516.hbthpd := gse.Integer_Value( cursor, 2011 );
      end if;
      if not gse.Is_Null( cursor, 2012 )then
         a_frs1516.hbthwk := gse.Integer_Value( cursor, 2012 );
      end if;
      if not gse.Is_Null( cursor, 2013 )then
         a_frs1516.hbthyr := gse.Integer_Value( cursor, 2013 );
      end if;
      if not gse.Is_Null( cursor, 2014 )then
         a_frs1516.hbwait := gse.Integer_Value( cursor, 2014 );
      end if;
      if not gse.Is_Null( cursor, 2015 )then
         a_frs1516.intrnt := gse.Integer_Value( cursor, 2015 );
      end if;
      if not gse.Is_Null( cursor, 2016 )then
         a_frs1516.oadep := gse.Integer_Value( cursor, 2016 );
      end if;
      if not gse.Is_Null( cursor, 2017 )then
         a_frs1516.oanet := gse.Integer_Value( cursor, 2017 );
      end if;
      if not gse.Is_Null( cursor, 2018 )then
         a_frs1516.dynhthd := gse.Integer_Value( cursor, 2018 );
      end if;
      if not gse.Is_Null( cursor, 2019 )then
         a_frs1516.dynhtsp := gse.Integer_Value( cursor, 2019 );
      end if;
      if not gse.Is_Null( cursor, 2020 )then
         a_frs1516.freqhd := gse.Integer_Value( cursor, 2020 );
      end if;
      if not gse.Is_Null( cursor, 2021 )then
         a_frs1516.freqsp := gse.Integer_Value( cursor, 2021 );
      end if;
      if not gse.Is_Null( cursor, 2022 )then
         a_frs1516.hur01hd := gse.Integer_Value( cursor, 2022 );
      end if;
      if not gse.Is_Null( cursor, 2023 )then
         a_frs1516.hur01sp := gse.Integer_Value( cursor, 2023 );
      end if;
      if not gse.Is_Null( cursor, 2024 )then
         a_frs1516.hur02hd := gse.Integer_Value( cursor, 2024 );
      end if;
      if not gse.Is_Null( cursor, 2025 )then
         a_frs1516.hur02sp := gse.Integer_Value( cursor, 2025 );
      end if;
      if not gse.Is_Null( cursor, 2026 )then
         a_frs1516.hur03hd := gse.Integer_Value( cursor, 2026 );
      end if;
      if not gse.Is_Null( cursor, 2027 )then
         a_frs1516.hur03sp := gse.Integer_Value( cursor, 2027 );
      end if;
      if not gse.Is_Null( cursor, 2028 )then
         a_frs1516.hur04hd := gse.Integer_Value( cursor, 2028 );
      end if;
      if not gse.Is_Null( cursor, 2029 )then
         a_frs1516.hur04sp := gse.Integer_Value( cursor, 2029 );
      end if;
      if not gse.Is_Null( cursor, 2030 )then
         a_frs1516.hur05hd := gse.Integer_Value( cursor, 2030 );
      end if;
      if not gse.Is_Null( cursor, 2031 )then
         a_frs1516.hur05sp := gse.Integer_Value( cursor, 2031 );
      end if;
      if not gse.Is_Null( cursor, 2032 )then
         a_frs1516.hur06hd := gse.Integer_Value( cursor, 2032 );
      end if;
      if not gse.Is_Null( cursor, 2033 )then
         a_frs1516.hur06sp := gse.Integer_Value( cursor, 2033 );
      end if;
      if not gse.Is_Null( cursor, 2034 )then
         a_frs1516.hur07hd := gse.Integer_Value( cursor, 2034 );
      end if;
      if not gse.Is_Null( cursor, 2035 )then
         a_frs1516.hur07sp := gse.Integer_Value( cursor, 2035 );
      end if;
      if not gse.Is_Null( cursor, 2036 )then
         a_frs1516.hur08hd := gse.Integer_Value( cursor, 2036 );
      end if;
      if not gse.Is_Null( cursor, 2037 )then
         a_frs1516.hur08sp := gse.Integer_Value( cursor, 2037 );
      end if;
      if not gse.Is_Null( cursor, 2038 )then
         a_frs1516.hur09hd := gse.Integer_Value( cursor, 2038 );
      end if;
      if not gse.Is_Null( cursor, 2039 )then
         a_frs1516.hur09sp := gse.Integer_Value( cursor, 2039 );
      end if;
      if not gse.Is_Null( cursor, 2040 )then
         a_frs1516.hur10hd := gse.Integer_Value( cursor, 2040 );
      end if;
      if not gse.Is_Null( cursor, 2041 )then
         a_frs1516.hur10sp := gse.Integer_Value( cursor, 2041 );
      end if;
      if not gse.Is_Null( cursor, 2042 )then
         a_frs1516.hur11hd := gse.Integer_Value( cursor, 2042 );
      end if;
      if not gse.Is_Null( cursor, 2043 )then
         a_frs1516.hur11sp := gse.Integer_Value( cursor, 2043 );
      end if;
      if not gse.Is_Null( cursor, 2044 )then
         a_frs1516.hur12hd := gse.Integer_Value( cursor, 2044 );
      end if;
      if not gse.Is_Null( cursor, 2045 )then
         a_frs1516.hur12sp := gse.Integer_Value( cursor, 2045 );
      end if;
      if not gse.Is_Null( cursor, 2046 )then
         a_frs1516.hur13hd := gse.Integer_Value( cursor, 2046 );
      end if;
      if not gse.Is_Null( cursor, 2047 )then
         a_frs1516.hur13sp := gse.Integer_Value( cursor, 2047 );
      end if;
      if not gse.Is_Null( cursor, 2048 )then
         a_frs1516.hur14hd := gse.Integer_Value( cursor, 2048 );
      end if;
      if not gse.Is_Null( cursor, 2049 )then
         a_frs1516.hur14sp := gse.Integer_Value( cursor, 2049 );
      end if;
      if not gse.Is_Null( cursor, 2050 )then
         a_frs1516.hur15hd := gse.Integer_Value( cursor, 2050 );
      end if;
      if not gse.Is_Null( cursor, 2051 )then
         a_frs1516.hur15sp := gse.Integer_Value( cursor, 2051 );
      end if;
      if not gse.Is_Null( cursor, 2052 )then
         a_frs1516.hur16hd := gse.Integer_Value( cursor, 2052 );
      end if;
      if not gse.Is_Null( cursor, 2053 )then
         a_frs1516.hur16sp := gse.Integer_Value( cursor, 2053 );
      end if;
      if not gse.Is_Null( cursor, 2054 )then
         a_frs1516.hur17hd := gse.Integer_Value( cursor, 2054 );
      end if;
      if not gse.Is_Null( cursor, 2055 )then
         a_frs1516.hur17sp := gse.Integer_Value( cursor, 2055 );
      end if;
      if not gse.Is_Null( cursor, 2056 )then
         a_frs1516.hur18hd := gse.Integer_Value( cursor, 2056 );
      end if;
      if not gse.Is_Null( cursor, 2057 )then
         a_frs1516.hur18sp := gse.Integer_Value( cursor, 2057 );
      end if;
      if not gse.Is_Null( cursor, 2058 )then
         a_frs1516.hur19hd := gse.Integer_Value( cursor, 2058 );
      end if;
      if not gse.Is_Null( cursor, 2059 )then
         a_frs1516.hur19sp := gse.Integer_Value( cursor, 2059 );
      end if;
      if not gse.Is_Null( cursor, 2060 )then
         a_frs1516.hur20hd := gse.Integer_Value( cursor, 2060 );
      end if;
      if not gse.Is_Null( cursor, 2061 )then
         a_frs1516.hur20sp := gse.Integer_Value( cursor, 2061 );
      end if;
      if not gse.Is_Null( cursor, 2062 )then
         a_frs1516.whl01hd := gse.Integer_Value( cursor, 2062 );
      end if;
      if not gse.Is_Null( cursor, 2063 )then
         a_frs1516.whl01sp := gse.Integer_Value( cursor, 2063 );
      end if;
      if not gse.Is_Null( cursor, 2064 )then
         a_frs1516.whl02hd := gse.Integer_Value( cursor, 2064 );
      end if;
      if not gse.Is_Null( cursor, 2065 )then
         a_frs1516.whl02sp := gse.Integer_Value( cursor, 2065 );
      end if;
      if not gse.Is_Null( cursor, 2066 )then
         a_frs1516.whl03hd := gse.Integer_Value( cursor, 2066 );
      end if;
      if not gse.Is_Null( cursor, 2067 )then
         a_frs1516.whl03sp := gse.Integer_Value( cursor, 2067 );
      end if;
      if not gse.Is_Null( cursor, 2068 )then
         a_frs1516.whl04hd := gse.Integer_Value( cursor, 2068 );
      end if;
      if not gse.Is_Null( cursor, 2069 )then
         a_frs1516.whl04sp := gse.Integer_Value( cursor, 2069 );
      end if;
      if not gse.Is_Null( cursor, 2070 )then
         a_frs1516.whl05hd := gse.Integer_Value( cursor, 2070 );
      end if;
      if not gse.Is_Null( cursor, 2071 )then
         a_frs1516.whl05sp := gse.Integer_Value( cursor, 2071 );
      end if;
      if not gse.Is_Null( cursor, 2072 )then
         a_frs1516.whl06hd := gse.Integer_Value( cursor, 2072 );
      end if;
      if not gse.Is_Null( cursor, 2073 )then
         a_frs1516.whl06sp := gse.Integer_Value( cursor, 2073 );
      end if;
      if not gse.Is_Null( cursor, 2074 )then
         a_frs1516.whl07hd := gse.Integer_Value( cursor, 2074 );
      end if;
      if not gse.Is_Null( cursor, 2075 )then
         a_frs1516.whl07sp := gse.Integer_Value( cursor, 2075 );
      end if;
      if not gse.Is_Null( cursor, 2076 )then
         a_frs1516.whl08hd := gse.Integer_Value( cursor, 2076 );
      end if;
      if not gse.Is_Null( cursor, 2077 )then
         a_frs1516.whl08sp := gse.Integer_Value( cursor, 2077 );
      end if;
      if not gse.Is_Null( cursor, 2078 )then
         a_frs1516.whl09hd := gse.Integer_Value( cursor, 2078 );
      end if;
      if not gse.Is_Null( cursor, 2079 )then
         a_frs1516.whl09sp := gse.Integer_Value( cursor, 2079 );
      end if;
      if not gse.Is_Null( cursor, 2080 )then
         a_frs1516.whl10hd := gse.Integer_Value( cursor, 2080 );
      end if;
      if not gse.Is_Null( cursor, 2081 )then
         a_frs1516.whl10sp := gse.Integer_Value( cursor, 2081 );
      end if;
      if not gse.Is_Null( cursor, 2082 )then
         a_frs1516.whl11hd := gse.Integer_Value( cursor, 2082 );
      end if;
      if not gse.Is_Null( cursor, 2083 )then
         a_frs1516.whl11sp := gse.Integer_Value( cursor, 2083 );
      end if;
      if not gse.Is_Null( cursor, 2084 )then
         a_frs1516.whl12hd := gse.Integer_Value( cursor, 2084 );
      end if;
      if not gse.Is_Null( cursor, 2085 )then
         a_frs1516.whl12sp := gse.Integer_Value( cursor, 2085 );
      end if;
      if not gse.Is_Null( cursor, 2086 )then
         a_frs1516.whl13hd := gse.Integer_Value( cursor, 2086 );
      end if;
      if not gse.Is_Null( cursor, 2087 )then
         a_frs1516.whl13sp := gse.Integer_Value( cursor, 2087 );
      end if;
      if not gse.Is_Null( cursor, 2088 )then
         a_frs1516.whl14hd := gse.Integer_Value( cursor, 2088 );
      end if;
      if not gse.Is_Null( cursor, 2089 )then
         a_frs1516.whl14sp := gse.Integer_Value( cursor, 2089 );
      end if;
      if not gse.Is_Null( cursor, 2090 )then
         a_frs1516.whl15hd := gse.Integer_Value( cursor, 2090 );
      end if;
      if not gse.Is_Null( cursor, 2091 )then
         a_frs1516.whl15sp := gse.Integer_Value( cursor, 2091 );
      end if;
      if not gse.Is_Null( cursor, 2092 )then
         a_frs1516.whl16hd := gse.Integer_Value( cursor, 2092 );
      end if;
      if not gse.Is_Null( cursor, 2093 )then
         a_frs1516.whl16sp := gse.Integer_Value( cursor, 2093 );
      end if;
      if not gse.Is_Null( cursor, 2094 )then
         a_frs1516.whl17hd := gse.Integer_Value( cursor, 2094 );
      end if;
      if not gse.Is_Null( cursor, 2095 )then
         a_frs1516.whl17sp := gse.Integer_Value( cursor, 2095 );
      end if;
      if not gse.Is_Null( cursor, 2096 )then
         a_frs1516.whl18hd := gse.Integer_Value( cursor, 2096 );
      end if;
      if not gse.Is_Null( cursor, 2097 )then
         a_frs1516.whl18sp := gse.Integer_Value( cursor, 2097 );
      end if;
      if not gse.Is_Null( cursor, 2098 )then
         a_frs1516.whl19hd := gse.Integer_Value( cursor, 2098 );
      end if;
      if not gse.Is_Null( cursor, 2099 )then
         a_frs1516.whl19sp := gse.Integer_Value( cursor, 2099 );
      end if;
      if not gse.Is_Null( cursor, 2100 )then
         a_frs1516.whl20hd := gse.Integer_Value( cursor, 2100 );
      end if;
      if not gse.Is_Null( cursor, 2101 )then
         a_frs1516.whl20sp := gse.Integer_Value( cursor, 2101 );
      end if;
      if not gse.Is_Null( cursor, 2102 )then
         a_frs1516.dynhtc1 := gse.Integer_Value( cursor, 2102 );
      end if;
      if not gse.Is_Null( cursor, 2103 )then
         a_frs1516.dynhtc2 := gse.Integer_Value( cursor, 2103 );
      end if;
      if not gse.Is_Null( cursor, 2104 )then
         a_frs1516.dynhtc3 := gse.Integer_Value( cursor, 2104 );
      end if;
      if not gse.Is_Null( cursor, 2105 )then
         a_frs1516.dynhtc4 := gse.Integer_Value( cursor, 2105 );
      end if;
      if not gse.Is_Null( cursor, 2106 )then
         a_frs1516.dynhtc5 := gse.Integer_Value( cursor, 2106 );
      end if;
      if not gse.Is_Null( cursor, 2107 )then
         a_frs1516.dynhtc6 := gse.Integer_Value( cursor, 2107 );
      end if;
      if not gse.Is_Null( cursor, 2108 )then
         a_frs1516.dynhtc7 := gse.Integer_Value( cursor, 2108 );
      end if;
      if not gse.Is_Null( cursor, 2109 )then
         a_frs1516.dynhtc8 := gse.Integer_Value( cursor, 2109 );
      end if;
      if not gse.Is_Null( cursor, 2110 )then
         a_frs1516.dynhtc9 := gse.Integer_Value( cursor, 2110 );
      end if;
      if not gse.Is_Null( cursor, 2111 )then
         a_frs1516.freqc1 := gse.Integer_Value( cursor, 2111 );
      end if;
      if not gse.Is_Null( cursor, 2112 )then
         a_frs1516.freqc2 := gse.Integer_Value( cursor, 2112 );
      end if;
      if not gse.Is_Null( cursor, 2113 )then
         a_frs1516.freqc3 := gse.Integer_Value( cursor, 2113 );
      end if;
      if not gse.Is_Null( cursor, 2114 )then
         a_frs1516.freqc4 := gse.Integer_Value( cursor, 2114 );
      end if;
      if not gse.Is_Null( cursor, 2115 )then
         a_frs1516.freqc5 := gse.Integer_Value( cursor, 2115 );
      end if;
      if not gse.Is_Null( cursor, 2116 )then
         a_frs1516.freqc6 := gse.Integer_Value( cursor, 2116 );
      end if;
      if not gse.Is_Null( cursor, 2117 )then
         a_frs1516.freqc7 := gse.Integer_Value( cursor, 2117 );
      end if;
      if not gse.Is_Null( cursor, 2118 )then
         a_frs1516.freqc8 := gse.Integer_Value( cursor, 2118 );
      end if;
      if not gse.Is_Null( cursor, 2119 )then
         a_frs1516.freqc9 := gse.Integer_Value( cursor, 2119 );
      end if;
      if not gse.Is_Null( cursor, 2120 )then
         a_frs1516.hur01c1 := gse.Integer_Value( cursor, 2120 );
      end if;
      if not gse.Is_Null( cursor, 2121 )then
         a_frs1516.hur01c2 := gse.Integer_Value( cursor, 2121 );
      end if;
      if not gse.Is_Null( cursor, 2122 )then
         a_frs1516.hur01c3 := gse.Integer_Value( cursor, 2122 );
      end if;
      if not gse.Is_Null( cursor, 2123 )then
         a_frs1516.hur01c4 := gse.Integer_Value( cursor, 2123 );
      end if;
      if not gse.Is_Null( cursor, 2124 )then
         a_frs1516.hur01c5 := gse.Integer_Value( cursor, 2124 );
      end if;
      if not gse.Is_Null( cursor, 2125 )then
         a_frs1516.hur01c6 := gse.Integer_Value( cursor, 2125 );
      end if;
      if not gse.Is_Null( cursor, 2126 )then
         a_frs1516.hur01c7 := gse.Integer_Value( cursor, 2126 );
      end if;
      if not gse.Is_Null( cursor, 2127 )then
         a_frs1516.hur01c8 := gse.Integer_Value( cursor, 2127 );
      end if;
      if not gse.Is_Null( cursor, 2128 )then
         a_frs1516.hur01c9 := gse.Integer_Value( cursor, 2128 );
      end if;
      if not gse.Is_Null( cursor, 2129 )then
         a_frs1516.hur02c1 := gse.Integer_Value( cursor, 2129 );
      end if;
      if not gse.Is_Null( cursor, 2130 )then
         a_frs1516.hur02c2 := gse.Integer_Value( cursor, 2130 );
      end if;
      if not gse.Is_Null( cursor, 2131 )then
         a_frs1516.hur02c3 := gse.Integer_Value( cursor, 2131 );
      end if;
      if not gse.Is_Null( cursor, 2132 )then
         a_frs1516.hur02c4 := gse.Integer_Value( cursor, 2132 );
      end if;
      if not gse.Is_Null( cursor, 2133 )then
         a_frs1516.hur02c5 := gse.Integer_Value( cursor, 2133 );
      end if;
      if not gse.Is_Null( cursor, 2134 )then
         a_frs1516.hur02c6 := gse.Integer_Value( cursor, 2134 );
      end if;
      if not gse.Is_Null( cursor, 2135 )then
         a_frs1516.hur02c7 := gse.Integer_Value( cursor, 2135 );
      end if;
      if not gse.Is_Null( cursor, 2136 )then
         a_frs1516.hur02c8 := gse.Integer_Value( cursor, 2136 );
      end if;
      if not gse.Is_Null( cursor, 2137 )then
         a_frs1516.hur02c9 := gse.Integer_Value( cursor, 2137 );
      end if;
      if not gse.Is_Null( cursor, 2138 )then
         a_frs1516.hur03c1 := gse.Integer_Value( cursor, 2138 );
      end if;
      if not gse.Is_Null( cursor, 2139 )then
         a_frs1516.hur03c2 := gse.Integer_Value( cursor, 2139 );
      end if;
      if not gse.Is_Null( cursor, 2140 )then
         a_frs1516.hur03c3 := gse.Integer_Value( cursor, 2140 );
      end if;
      if not gse.Is_Null( cursor, 2141 )then
         a_frs1516.hur03c4 := gse.Integer_Value( cursor, 2141 );
      end if;
      if not gse.Is_Null( cursor, 2142 )then
         a_frs1516.hur03c5 := gse.Integer_Value( cursor, 2142 );
      end if;
      if not gse.Is_Null( cursor, 2143 )then
         a_frs1516.hur03c6 := gse.Integer_Value( cursor, 2143 );
      end if;
      if not gse.Is_Null( cursor, 2144 )then
         a_frs1516.hur03c7 := gse.Integer_Value( cursor, 2144 );
      end if;
      if not gse.Is_Null( cursor, 2145 )then
         a_frs1516.hur03c8 := gse.Integer_Value( cursor, 2145 );
      end if;
      if not gse.Is_Null( cursor, 2146 )then
         a_frs1516.hur03c9 := gse.Integer_Value( cursor, 2146 );
      end if;
      if not gse.Is_Null( cursor, 2147 )then
         a_frs1516.hur04c1 := gse.Integer_Value( cursor, 2147 );
      end if;
      if not gse.Is_Null( cursor, 2148 )then
         a_frs1516.hur04c2 := gse.Integer_Value( cursor, 2148 );
      end if;
      if not gse.Is_Null( cursor, 2149 )then
         a_frs1516.hur04c3 := gse.Integer_Value( cursor, 2149 );
      end if;
      if not gse.Is_Null( cursor, 2150 )then
         a_frs1516.hur04c4 := gse.Integer_Value( cursor, 2150 );
      end if;
      if not gse.Is_Null( cursor, 2151 )then
         a_frs1516.hur04c5 := gse.Integer_Value( cursor, 2151 );
      end if;
      if not gse.Is_Null( cursor, 2152 )then
         a_frs1516.hur04c6 := gse.Integer_Value( cursor, 2152 );
      end if;
      if not gse.Is_Null( cursor, 2153 )then
         a_frs1516.hur04c7 := gse.Integer_Value( cursor, 2153 );
      end if;
      if not gse.Is_Null( cursor, 2154 )then
         a_frs1516.hur04c8 := gse.Integer_Value( cursor, 2154 );
      end if;
      if not gse.Is_Null( cursor, 2155 )then
         a_frs1516.hur04c9 := gse.Integer_Value( cursor, 2155 );
      end if;
      if not gse.Is_Null( cursor, 2156 )then
         a_frs1516.hur05c1 := gse.Integer_Value( cursor, 2156 );
      end if;
      if not gse.Is_Null( cursor, 2157 )then
         a_frs1516.hur05c2 := gse.Integer_Value( cursor, 2157 );
      end if;
      if not gse.Is_Null( cursor, 2158 )then
         a_frs1516.hur05c3 := gse.Integer_Value( cursor, 2158 );
      end if;
      if not gse.Is_Null( cursor, 2159 )then
         a_frs1516.hur05c4 := gse.Integer_Value( cursor, 2159 );
      end if;
      if not gse.Is_Null( cursor, 2160 )then
         a_frs1516.hur05c5 := gse.Integer_Value( cursor, 2160 );
      end if;
      if not gse.Is_Null( cursor, 2161 )then
         a_frs1516.hur05c6 := gse.Integer_Value( cursor, 2161 );
      end if;
      if not gse.Is_Null( cursor, 2162 )then
         a_frs1516.hur05c7 := gse.Integer_Value( cursor, 2162 );
      end if;
      if not gse.Is_Null( cursor, 2163 )then
         a_frs1516.hur05c8 := gse.Integer_Value( cursor, 2163 );
      end if;
      if not gse.Is_Null( cursor, 2164 )then
         a_frs1516.hur05c9 := gse.Integer_Value( cursor, 2164 );
      end if;
      if not gse.Is_Null( cursor, 2165 )then
         a_frs1516.hur06c1 := gse.Integer_Value( cursor, 2165 );
      end if;
      if not gse.Is_Null( cursor, 2166 )then
         a_frs1516.hur06c2 := gse.Integer_Value( cursor, 2166 );
      end if;
      if not gse.Is_Null( cursor, 2167 )then
         a_frs1516.hur06c3 := gse.Integer_Value( cursor, 2167 );
      end if;
      if not gse.Is_Null( cursor, 2168 )then
         a_frs1516.hur06c4 := gse.Integer_Value( cursor, 2168 );
      end if;
      if not gse.Is_Null( cursor, 2169 )then
         a_frs1516.hur06c5 := gse.Integer_Value( cursor, 2169 );
      end if;
      if not gse.Is_Null( cursor, 2170 )then
         a_frs1516.hur06c6 := gse.Integer_Value( cursor, 2170 );
      end if;
      if not gse.Is_Null( cursor, 2171 )then
         a_frs1516.hur06c7 := gse.Integer_Value( cursor, 2171 );
      end if;
      if not gse.Is_Null( cursor, 2172 )then
         a_frs1516.hur06c8 := gse.Integer_Value( cursor, 2172 );
      end if;
      if not gse.Is_Null( cursor, 2173 )then
         a_frs1516.hur06c9 := gse.Integer_Value( cursor, 2173 );
      end if;
      if not gse.Is_Null( cursor, 2174 )then
         a_frs1516.hur07c1 := gse.Integer_Value( cursor, 2174 );
      end if;
      if not gse.Is_Null( cursor, 2175 )then
         a_frs1516.hur07c2 := gse.Integer_Value( cursor, 2175 );
      end if;
      if not gse.Is_Null( cursor, 2176 )then
         a_frs1516.hur07c3 := gse.Integer_Value( cursor, 2176 );
      end if;
      if not gse.Is_Null( cursor, 2177 )then
         a_frs1516.hur07c4 := gse.Integer_Value( cursor, 2177 );
      end if;
      if not gse.Is_Null( cursor, 2178 )then
         a_frs1516.hur07c5 := gse.Integer_Value( cursor, 2178 );
      end if;
      if not gse.Is_Null( cursor, 2179 )then
         a_frs1516.hur07c6 := gse.Integer_Value( cursor, 2179 );
      end if;
      if not gse.Is_Null( cursor, 2180 )then
         a_frs1516.hur07c7 := gse.Integer_Value( cursor, 2180 );
      end if;
      if not gse.Is_Null( cursor, 2181 )then
         a_frs1516.hur07c8 := gse.Integer_Value( cursor, 2181 );
      end if;
      if not gse.Is_Null( cursor, 2182 )then
         a_frs1516.hur07c9 := gse.Integer_Value( cursor, 2182 );
      end if;
      if not gse.Is_Null( cursor, 2183 )then
         a_frs1516.hur08c1 := gse.Integer_Value( cursor, 2183 );
      end if;
      if not gse.Is_Null( cursor, 2184 )then
         a_frs1516.hur08c2 := gse.Integer_Value( cursor, 2184 );
      end if;
      if not gse.Is_Null( cursor, 2185 )then
         a_frs1516.hur08c3 := gse.Integer_Value( cursor, 2185 );
      end if;
      if not gse.Is_Null( cursor, 2186 )then
         a_frs1516.hur08c4 := gse.Integer_Value( cursor, 2186 );
      end if;
      if not gse.Is_Null( cursor, 2187 )then
         a_frs1516.hur08c5 := gse.Integer_Value( cursor, 2187 );
      end if;
      if not gse.Is_Null( cursor, 2188 )then
         a_frs1516.hur08c6 := gse.Integer_Value( cursor, 2188 );
      end if;
      if not gse.Is_Null( cursor, 2189 )then
         a_frs1516.hur08c7 := gse.Integer_Value( cursor, 2189 );
      end if;
      if not gse.Is_Null( cursor, 2190 )then
         a_frs1516.hur08c8 := gse.Integer_Value( cursor, 2190 );
      end if;
      if not gse.Is_Null( cursor, 2191 )then
         a_frs1516.hur08c9 := gse.Integer_Value( cursor, 2191 );
      end if;
      if not gse.Is_Null( cursor, 2192 )then
         a_frs1516.hur09c1 := gse.Integer_Value( cursor, 2192 );
      end if;
      if not gse.Is_Null( cursor, 2193 )then
         a_frs1516.hur09c2 := gse.Integer_Value( cursor, 2193 );
      end if;
      if not gse.Is_Null( cursor, 2194 )then
         a_frs1516.hur09c3 := gse.Integer_Value( cursor, 2194 );
      end if;
      if not gse.Is_Null( cursor, 2195 )then
         a_frs1516.hur09c4 := gse.Integer_Value( cursor, 2195 );
      end if;
      if not gse.Is_Null( cursor, 2196 )then
         a_frs1516.hur09c5 := gse.Integer_Value( cursor, 2196 );
      end if;
      if not gse.Is_Null( cursor, 2197 )then
         a_frs1516.hur09c6 := gse.Integer_Value( cursor, 2197 );
      end if;
      if not gse.Is_Null( cursor, 2198 )then
         a_frs1516.hur09c7 := gse.Integer_Value( cursor, 2198 );
      end if;
      if not gse.Is_Null( cursor, 2199 )then
         a_frs1516.hur09c8 := gse.Integer_Value( cursor, 2199 );
      end if;
      if not gse.Is_Null( cursor, 2200 )then
         a_frs1516.hur09c9 := gse.Integer_Value( cursor, 2200 );
      end if;
      if not gse.Is_Null( cursor, 2201 )then
         a_frs1516.hur10c1 := gse.Integer_Value( cursor, 2201 );
      end if;
      if not gse.Is_Null( cursor, 2202 )then
         a_frs1516.hur10c2 := gse.Integer_Value( cursor, 2202 );
      end if;
      if not gse.Is_Null( cursor, 2203 )then
         a_frs1516.hur10c3 := gse.Integer_Value( cursor, 2203 );
      end if;
      if not gse.Is_Null( cursor, 2204 )then
         a_frs1516.hur10c4 := gse.Integer_Value( cursor, 2204 );
      end if;
      if not gse.Is_Null( cursor, 2205 )then
         a_frs1516.hur10c5 := gse.Integer_Value( cursor, 2205 );
      end if;
      if not gse.Is_Null( cursor, 2206 )then
         a_frs1516.hur10c6 := gse.Integer_Value( cursor, 2206 );
      end if;
      if not gse.Is_Null( cursor, 2207 )then
         a_frs1516.hur10c7 := gse.Integer_Value( cursor, 2207 );
      end if;
      if not gse.Is_Null( cursor, 2208 )then
         a_frs1516.hur10c8 := gse.Integer_Value( cursor, 2208 );
      end if;
      if not gse.Is_Null( cursor, 2209 )then
         a_frs1516.hur10c9 := gse.Integer_Value( cursor, 2209 );
      end if;
      if not gse.Is_Null( cursor, 2210 )then
         a_frs1516.hur11c1 := gse.Integer_Value( cursor, 2210 );
      end if;
      if not gse.Is_Null( cursor, 2211 )then
         a_frs1516.hur11c2 := gse.Integer_Value( cursor, 2211 );
      end if;
      if not gse.Is_Null( cursor, 2212 )then
         a_frs1516.hur11c3 := gse.Integer_Value( cursor, 2212 );
      end if;
      if not gse.Is_Null( cursor, 2213 )then
         a_frs1516.hur11c4 := gse.Integer_Value( cursor, 2213 );
      end if;
      if not gse.Is_Null( cursor, 2214 )then
         a_frs1516.hur11c5 := gse.Integer_Value( cursor, 2214 );
      end if;
      if not gse.Is_Null( cursor, 2215 )then
         a_frs1516.hur11c6 := gse.Integer_Value( cursor, 2215 );
      end if;
      if not gse.Is_Null( cursor, 2216 )then
         a_frs1516.hur11c7 := gse.Integer_Value( cursor, 2216 );
      end if;
      if not gse.Is_Null( cursor, 2217 )then
         a_frs1516.hur11c8 := gse.Integer_Value( cursor, 2217 );
      end if;
      if not gse.Is_Null( cursor, 2218 )then
         a_frs1516.hur11c9 := gse.Integer_Value( cursor, 2218 );
      end if;
      if not gse.Is_Null( cursor, 2219 )then
         a_frs1516.hur12c1 := gse.Integer_Value( cursor, 2219 );
      end if;
      if not gse.Is_Null( cursor, 2220 )then
         a_frs1516.hur12c2 := gse.Integer_Value( cursor, 2220 );
      end if;
      if not gse.Is_Null( cursor, 2221 )then
         a_frs1516.hur12c3 := gse.Integer_Value( cursor, 2221 );
      end if;
      if not gse.Is_Null( cursor, 2222 )then
         a_frs1516.hur12c4 := gse.Integer_Value( cursor, 2222 );
      end if;
      if not gse.Is_Null( cursor, 2223 )then
         a_frs1516.hur12c5 := gse.Integer_Value( cursor, 2223 );
      end if;
      if not gse.Is_Null( cursor, 2224 )then
         a_frs1516.hur12c6 := gse.Integer_Value( cursor, 2224 );
      end if;
      if not gse.Is_Null( cursor, 2225 )then
         a_frs1516.hur12c7 := gse.Integer_Value( cursor, 2225 );
      end if;
      if not gse.Is_Null( cursor, 2226 )then
         a_frs1516.hur12c8 := gse.Integer_Value( cursor, 2226 );
      end if;
      if not gse.Is_Null( cursor, 2227 )then
         a_frs1516.hur12c9 := gse.Integer_Value( cursor, 2227 );
      end if;
      if not gse.Is_Null( cursor, 2228 )then
         a_frs1516.hur13c1 := gse.Integer_Value( cursor, 2228 );
      end if;
      if not gse.Is_Null( cursor, 2229 )then
         a_frs1516.hur13c2 := gse.Integer_Value( cursor, 2229 );
      end if;
      if not gse.Is_Null( cursor, 2230 )then
         a_frs1516.hur13c3 := gse.Integer_Value( cursor, 2230 );
      end if;
      if not gse.Is_Null( cursor, 2231 )then
         a_frs1516.hur13c4 := gse.Integer_Value( cursor, 2231 );
      end if;
      if not gse.Is_Null( cursor, 2232 )then
         a_frs1516.hur13c5 := gse.Integer_Value( cursor, 2232 );
      end if;
      if not gse.Is_Null( cursor, 2233 )then
         a_frs1516.hur13c6 := gse.Integer_Value( cursor, 2233 );
      end if;
      if not gse.Is_Null( cursor, 2234 )then
         a_frs1516.hur13c7 := gse.Integer_Value( cursor, 2234 );
      end if;
      if not gse.Is_Null( cursor, 2235 )then
         a_frs1516.hur13c8 := gse.Integer_Value( cursor, 2235 );
      end if;
      if not gse.Is_Null( cursor, 2236 )then
         a_frs1516.hur13c9 := gse.Integer_Value( cursor, 2236 );
      end if;
      if not gse.Is_Null( cursor, 2237 )then
         a_frs1516.hur14c1 := gse.Integer_Value( cursor, 2237 );
      end if;
      if not gse.Is_Null( cursor, 2238 )then
         a_frs1516.hur14c2 := gse.Integer_Value( cursor, 2238 );
      end if;
      if not gse.Is_Null( cursor, 2239 )then
         a_frs1516.hur14c3 := gse.Integer_Value( cursor, 2239 );
      end if;
      if not gse.Is_Null( cursor, 2240 )then
         a_frs1516.hur14c4 := gse.Integer_Value( cursor, 2240 );
      end if;
      if not gse.Is_Null( cursor, 2241 )then
         a_frs1516.hur14c5 := gse.Integer_Value( cursor, 2241 );
      end if;
      if not gse.Is_Null( cursor, 2242 )then
         a_frs1516.hur14c6 := gse.Integer_Value( cursor, 2242 );
      end if;
      if not gse.Is_Null( cursor, 2243 )then
         a_frs1516.hur14c7 := gse.Integer_Value( cursor, 2243 );
      end if;
      if not gse.Is_Null( cursor, 2244 )then
         a_frs1516.hur14c8 := gse.Integer_Value( cursor, 2244 );
      end if;
      if not gse.Is_Null( cursor, 2245 )then
         a_frs1516.hur14c9 := gse.Integer_Value( cursor, 2245 );
      end if;
      if not gse.Is_Null( cursor, 2246 )then
         a_frs1516.hur15c1 := gse.Integer_Value( cursor, 2246 );
      end if;
      if not gse.Is_Null( cursor, 2247 )then
         a_frs1516.hur15c2 := gse.Integer_Value( cursor, 2247 );
      end if;
      if not gse.Is_Null( cursor, 2248 )then
         a_frs1516.hur15c3 := gse.Integer_Value( cursor, 2248 );
      end if;
      if not gse.Is_Null( cursor, 2249 )then
         a_frs1516.hur15c4 := gse.Integer_Value( cursor, 2249 );
      end if;
      if not gse.Is_Null( cursor, 2250 )then
         a_frs1516.hur15c5 := gse.Integer_Value( cursor, 2250 );
      end if;
      if not gse.Is_Null( cursor, 2251 )then
         a_frs1516.hur15c6 := gse.Integer_Value( cursor, 2251 );
      end if;
      if not gse.Is_Null( cursor, 2252 )then
         a_frs1516.hur15c7 := gse.Integer_Value( cursor, 2252 );
      end if;
      if not gse.Is_Null( cursor, 2253 )then
         a_frs1516.hur15c8 := gse.Integer_Value( cursor, 2253 );
      end if;
      if not gse.Is_Null( cursor, 2254 )then
         a_frs1516.hur15c9 := gse.Integer_Value( cursor, 2254 );
      end if;
      if not gse.Is_Null( cursor, 2255 )then
         a_frs1516.hur16c1 := gse.Integer_Value( cursor, 2255 );
      end if;
      if not gse.Is_Null( cursor, 2256 )then
         a_frs1516.hur16c2 := gse.Integer_Value( cursor, 2256 );
      end if;
      if not gse.Is_Null( cursor, 2257 )then
         a_frs1516.hur16c3 := gse.Integer_Value( cursor, 2257 );
      end if;
      if not gse.Is_Null( cursor, 2258 )then
         a_frs1516.hur16c4 := gse.Integer_Value( cursor, 2258 );
      end if;
      if not gse.Is_Null( cursor, 2259 )then
         a_frs1516.hur16c5 := gse.Integer_Value( cursor, 2259 );
      end if;
      if not gse.Is_Null( cursor, 2260 )then
         a_frs1516.hur16c6 := gse.Integer_Value( cursor, 2260 );
      end if;
      if not gse.Is_Null( cursor, 2261 )then
         a_frs1516.hur16c7 := gse.Integer_Value( cursor, 2261 );
      end if;
      if not gse.Is_Null( cursor, 2262 )then
         a_frs1516.hur16c8 := gse.Integer_Value( cursor, 2262 );
      end if;
      if not gse.Is_Null( cursor, 2263 )then
         a_frs1516.hur16c9 := gse.Integer_Value( cursor, 2263 );
      end if;
      if not gse.Is_Null( cursor, 2264 )then
         a_frs1516.hur17c1 := gse.Integer_Value( cursor, 2264 );
      end if;
      if not gse.Is_Null( cursor, 2265 )then
         a_frs1516.hur17c2 := gse.Integer_Value( cursor, 2265 );
      end if;
      if not gse.Is_Null( cursor, 2266 )then
         a_frs1516.hur17c3 := gse.Integer_Value( cursor, 2266 );
      end if;
      if not gse.Is_Null( cursor, 2267 )then
         a_frs1516.hur17c4 := gse.Integer_Value( cursor, 2267 );
      end if;
      if not gse.Is_Null( cursor, 2268 )then
         a_frs1516.hur17c5 := gse.Integer_Value( cursor, 2268 );
      end if;
      if not gse.Is_Null( cursor, 2269 )then
         a_frs1516.hur17c6 := gse.Integer_Value( cursor, 2269 );
      end if;
      if not gse.Is_Null( cursor, 2270 )then
         a_frs1516.hur17c7 := gse.Integer_Value( cursor, 2270 );
      end if;
      if not gse.Is_Null( cursor, 2271 )then
         a_frs1516.hur17c8 := gse.Integer_Value( cursor, 2271 );
      end if;
      if not gse.Is_Null( cursor, 2272 )then
         a_frs1516.hur17c9 := gse.Integer_Value( cursor, 2272 );
      end if;
      if not gse.Is_Null( cursor, 2273 )then
         a_frs1516.hur18c1 := gse.Integer_Value( cursor, 2273 );
      end if;
      if not gse.Is_Null( cursor, 2274 )then
         a_frs1516.hur18c2 := gse.Integer_Value( cursor, 2274 );
      end if;
      if not gse.Is_Null( cursor, 2275 )then
         a_frs1516.hur18c3 := gse.Integer_Value( cursor, 2275 );
      end if;
      if not gse.Is_Null( cursor, 2276 )then
         a_frs1516.hur18c4 := gse.Integer_Value( cursor, 2276 );
      end if;
      if not gse.Is_Null( cursor, 2277 )then
         a_frs1516.hur18c5 := gse.Integer_Value( cursor, 2277 );
      end if;
      if not gse.Is_Null( cursor, 2278 )then
         a_frs1516.hur18c6 := gse.Integer_Value( cursor, 2278 );
      end if;
      if not gse.Is_Null( cursor, 2279 )then
         a_frs1516.hur18c7 := gse.Integer_Value( cursor, 2279 );
      end if;
      if not gse.Is_Null( cursor, 2280 )then
         a_frs1516.hur18c8 := gse.Integer_Value( cursor, 2280 );
      end if;
      if not gse.Is_Null( cursor, 2281 )then
         a_frs1516.hur18c9 := gse.Integer_Value( cursor, 2281 );
      end if;
      if not gse.Is_Null( cursor, 2282 )then
         a_frs1516.hur19c1 := gse.Integer_Value( cursor, 2282 );
      end if;
      if not gse.Is_Null( cursor, 2283 )then
         a_frs1516.hur19c2 := gse.Integer_Value( cursor, 2283 );
      end if;
      if not gse.Is_Null( cursor, 2284 )then
         a_frs1516.hur19c3 := gse.Integer_Value( cursor, 2284 );
      end if;
      if not gse.Is_Null( cursor, 2285 )then
         a_frs1516.hur19c4 := gse.Integer_Value( cursor, 2285 );
      end if;
      if not gse.Is_Null( cursor, 2286 )then
         a_frs1516.hur19c5 := gse.Integer_Value( cursor, 2286 );
      end if;
      if not gse.Is_Null( cursor, 2287 )then
         a_frs1516.hur19c6 := gse.Integer_Value( cursor, 2287 );
      end if;
      if not gse.Is_Null( cursor, 2288 )then
         a_frs1516.hur19c7 := gse.Integer_Value( cursor, 2288 );
      end if;
      if not gse.Is_Null( cursor, 2289 )then
         a_frs1516.hur19c8 := gse.Integer_Value( cursor, 2289 );
      end if;
      if not gse.Is_Null( cursor, 2290 )then
         a_frs1516.hur19c9 := gse.Integer_Value( cursor, 2290 );
      end if;
      if not gse.Is_Null( cursor, 2291 )then
         a_frs1516.hur20c1 := gse.Integer_Value( cursor, 2291 );
      end if;
      if not gse.Is_Null( cursor, 2292 )then
         a_frs1516.hur20c2 := gse.Integer_Value( cursor, 2292 );
      end if;
      if not gse.Is_Null( cursor, 2293 )then
         a_frs1516.hur20c3 := gse.Integer_Value( cursor, 2293 );
      end if;
      if not gse.Is_Null( cursor, 2294 )then
         a_frs1516.hur20c4 := gse.Integer_Value( cursor, 2294 );
      end if;
      if not gse.Is_Null( cursor, 2295 )then
         a_frs1516.hur20c5 := gse.Integer_Value( cursor, 2295 );
      end if;
      if not gse.Is_Null( cursor, 2296 )then
         a_frs1516.hur20c6 := gse.Integer_Value( cursor, 2296 );
      end if;
      if not gse.Is_Null( cursor, 2297 )then
         a_frs1516.hur20c7 := gse.Integer_Value( cursor, 2297 );
      end if;
      if not gse.Is_Null( cursor, 2298 )then
         a_frs1516.hur20c8 := gse.Integer_Value( cursor, 2298 );
      end if;
      if not gse.Is_Null( cursor, 2299 )then
         a_frs1516.hur20c9 := gse.Integer_Value( cursor, 2299 );
      end if;
      if not gse.Is_Null( cursor, 2300 )then
         a_frs1516.whl01c1 := gse.Integer_Value( cursor, 2300 );
      end if;
      if not gse.Is_Null( cursor, 2301 )then
         a_frs1516.whl01c2 := gse.Integer_Value( cursor, 2301 );
      end if;
      if not gse.Is_Null( cursor, 2302 )then
         a_frs1516.whl01c3 := gse.Integer_Value( cursor, 2302 );
      end if;
      if not gse.Is_Null( cursor, 2303 )then
         a_frs1516.whl01c4 := gse.Integer_Value( cursor, 2303 );
      end if;
      if not gse.Is_Null( cursor, 2304 )then
         a_frs1516.whl01c5 := gse.Integer_Value( cursor, 2304 );
      end if;
      if not gse.Is_Null( cursor, 2305 )then
         a_frs1516.whl01c6 := gse.Integer_Value( cursor, 2305 );
      end if;
      if not gse.Is_Null( cursor, 2306 )then
         a_frs1516.whl01c7 := gse.Integer_Value( cursor, 2306 );
      end if;
      if not gse.Is_Null( cursor, 2307 )then
         a_frs1516.whl01c8 := gse.Integer_Value( cursor, 2307 );
      end if;
      if not gse.Is_Null( cursor, 2308 )then
         a_frs1516.whl01c9 := gse.Integer_Value( cursor, 2308 );
      end if;
      if not gse.Is_Null( cursor, 2309 )then
         a_frs1516.whl02c1 := gse.Integer_Value( cursor, 2309 );
      end if;
      if not gse.Is_Null( cursor, 2310 )then
         a_frs1516.whl02c2 := gse.Integer_Value( cursor, 2310 );
      end if;
      if not gse.Is_Null( cursor, 2311 )then
         a_frs1516.whl02c3 := gse.Integer_Value( cursor, 2311 );
      end if;
      if not gse.Is_Null( cursor, 2312 )then
         a_frs1516.whl02c4 := gse.Integer_Value( cursor, 2312 );
      end if;
      if not gse.Is_Null( cursor, 2313 )then
         a_frs1516.whl02c5 := gse.Integer_Value( cursor, 2313 );
      end if;
      if not gse.Is_Null( cursor, 2314 )then
         a_frs1516.whl02c6 := gse.Integer_Value( cursor, 2314 );
      end if;
      if not gse.Is_Null( cursor, 2315 )then
         a_frs1516.whl02c7 := gse.Integer_Value( cursor, 2315 );
      end if;
      if not gse.Is_Null( cursor, 2316 )then
         a_frs1516.whl02c8 := gse.Integer_Value( cursor, 2316 );
      end if;
      if not gse.Is_Null( cursor, 2317 )then
         a_frs1516.whl02c9 := gse.Integer_Value( cursor, 2317 );
      end if;
      if not gse.Is_Null( cursor, 2318 )then
         a_frs1516.whl03c1 := gse.Integer_Value( cursor, 2318 );
      end if;
      if not gse.Is_Null( cursor, 2319 )then
         a_frs1516.whl03c2 := gse.Integer_Value( cursor, 2319 );
      end if;
      if not gse.Is_Null( cursor, 2320 )then
         a_frs1516.whl03c3 := gse.Integer_Value( cursor, 2320 );
      end if;
      if not gse.Is_Null( cursor, 2321 )then
         a_frs1516.whl03c4 := gse.Integer_Value( cursor, 2321 );
      end if;
      if not gse.Is_Null( cursor, 2322 )then
         a_frs1516.whl03c5 := gse.Integer_Value( cursor, 2322 );
      end if;
      if not gse.Is_Null( cursor, 2323 )then
         a_frs1516.whl03c6 := gse.Integer_Value( cursor, 2323 );
      end if;
      if not gse.Is_Null( cursor, 2324 )then
         a_frs1516.whl03c7 := gse.Integer_Value( cursor, 2324 );
      end if;
      if not gse.Is_Null( cursor, 2325 )then
         a_frs1516.whl03c8 := gse.Integer_Value( cursor, 2325 );
      end if;
      if not gse.Is_Null( cursor, 2326 )then
         a_frs1516.whl03c9 := gse.Integer_Value( cursor, 2326 );
      end if;
      if not gse.Is_Null( cursor, 2327 )then
         a_frs1516.whl04c1 := gse.Integer_Value( cursor, 2327 );
      end if;
      if not gse.Is_Null( cursor, 2328 )then
         a_frs1516.whl04c2 := gse.Integer_Value( cursor, 2328 );
      end if;
      if not gse.Is_Null( cursor, 2329 )then
         a_frs1516.whl04c3 := gse.Integer_Value( cursor, 2329 );
      end if;
      if not gse.Is_Null( cursor, 2330 )then
         a_frs1516.whl04c4 := gse.Integer_Value( cursor, 2330 );
      end if;
      if not gse.Is_Null( cursor, 2331 )then
         a_frs1516.whl04c5 := gse.Integer_Value( cursor, 2331 );
      end if;
      if not gse.Is_Null( cursor, 2332 )then
         a_frs1516.whl04c6 := gse.Integer_Value( cursor, 2332 );
      end if;
      if not gse.Is_Null( cursor, 2333 )then
         a_frs1516.whl04c7 := gse.Integer_Value( cursor, 2333 );
      end if;
      if not gse.Is_Null( cursor, 2334 )then
         a_frs1516.whl04c8 := gse.Integer_Value( cursor, 2334 );
      end if;
      if not gse.Is_Null( cursor, 2335 )then
         a_frs1516.whl04c9 := gse.Integer_Value( cursor, 2335 );
      end if;
      if not gse.Is_Null( cursor, 2336 )then
         a_frs1516.whl05c1 := gse.Integer_Value( cursor, 2336 );
      end if;
      if not gse.Is_Null( cursor, 2337 )then
         a_frs1516.whl05c2 := gse.Integer_Value( cursor, 2337 );
      end if;
      if not gse.Is_Null( cursor, 2338 )then
         a_frs1516.whl05c3 := gse.Integer_Value( cursor, 2338 );
      end if;
      if not gse.Is_Null( cursor, 2339 )then
         a_frs1516.whl05c4 := gse.Integer_Value( cursor, 2339 );
      end if;
      if not gse.Is_Null( cursor, 2340 )then
         a_frs1516.whl05c5 := gse.Integer_Value( cursor, 2340 );
      end if;
      if not gse.Is_Null( cursor, 2341 )then
         a_frs1516.whl05c6 := gse.Integer_Value( cursor, 2341 );
      end if;
      if not gse.Is_Null( cursor, 2342 )then
         a_frs1516.whl05c7 := gse.Integer_Value( cursor, 2342 );
      end if;
      if not gse.Is_Null( cursor, 2343 )then
         a_frs1516.whl05c8 := gse.Integer_Value( cursor, 2343 );
      end if;
      if not gse.Is_Null( cursor, 2344 )then
         a_frs1516.whl05c9 := gse.Integer_Value( cursor, 2344 );
      end if;
      if not gse.Is_Null( cursor, 2345 )then
         a_frs1516.whl06c1 := gse.Integer_Value( cursor, 2345 );
      end if;
      if not gse.Is_Null( cursor, 2346 )then
         a_frs1516.whl06c2 := gse.Integer_Value( cursor, 2346 );
      end if;
      if not gse.Is_Null( cursor, 2347 )then
         a_frs1516.whl06c3 := gse.Integer_Value( cursor, 2347 );
      end if;
      if not gse.Is_Null( cursor, 2348 )then
         a_frs1516.whl06c4 := gse.Integer_Value( cursor, 2348 );
      end if;
      if not gse.Is_Null( cursor, 2349 )then
         a_frs1516.whl06c5 := gse.Integer_Value( cursor, 2349 );
      end if;
      if not gse.Is_Null( cursor, 2350 )then
         a_frs1516.whl06c6 := gse.Integer_Value( cursor, 2350 );
      end if;
      if not gse.Is_Null( cursor, 2351 )then
         a_frs1516.whl06c7 := gse.Integer_Value( cursor, 2351 );
      end if;
      if not gse.Is_Null( cursor, 2352 )then
         a_frs1516.whl06c8 := gse.Integer_Value( cursor, 2352 );
      end if;
      if not gse.Is_Null( cursor, 2353 )then
         a_frs1516.whl06c9 := gse.Integer_Value( cursor, 2353 );
      end if;
      if not gse.Is_Null( cursor, 2354 )then
         a_frs1516.whl07c1 := gse.Integer_Value( cursor, 2354 );
      end if;
      if not gse.Is_Null( cursor, 2355 )then
         a_frs1516.whl07c2 := gse.Integer_Value( cursor, 2355 );
      end if;
      if not gse.Is_Null( cursor, 2356 )then
         a_frs1516.whl07c3 := gse.Integer_Value( cursor, 2356 );
      end if;
      if not gse.Is_Null( cursor, 2357 )then
         a_frs1516.whl07c4 := gse.Integer_Value( cursor, 2357 );
      end if;
      if not gse.Is_Null( cursor, 2358 )then
         a_frs1516.whl07c5 := gse.Integer_Value( cursor, 2358 );
      end if;
      if not gse.Is_Null( cursor, 2359 )then
         a_frs1516.whl07c6 := gse.Integer_Value( cursor, 2359 );
      end if;
      if not gse.Is_Null( cursor, 2360 )then
         a_frs1516.whl07c7 := gse.Integer_Value( cursor, 2360 );
      end if;
      if not gse.Is_Null( cursor, 2361 )then
         a_frs1516.whl07c8 := gse.Integer_Value( cursor, 2361 );
      end if;
      if not gse.Is_Null( cursor, 2362 )then
         a_frs1516.whl07c9 := gse.Integer_Value( cursor, 2362 );
      end if;
      if not gse.Is_Null( cursor, 2363 )then
         a_frs1516.whl08c1 := gse.Integer_Value( cursor, 2363 );
      end if;
      if not gse.Is_Null( cursor, 2364 )then
         a_frs1516.whl08c2 := gse.Integer_Value( cursor, 2364 );
      end if;
      if not gse.Is_Null( cursor, 2365 )then
         a_frs1516.whl08c3 := gse.Integer_Value( cursor, 2365 );
      end if;
      if not gse.Is_Null( cursor, 2366 )then
         a_frs1516.whl08c4 := gse.Integer_Value( cursor, 2366 );
      end if;
      if not gse.Is_Null( cursor, 2367 )then
         a_frs1516.whl08c5 := gse.Integer_Value( cursor, 2367 );
      end if;
      if not gse.Is_Null( cursor, 2368 )then
         a_frs1516.whl08c6 := gse.Integer_Value( cursor, 2368 );
      end if;
      if not gse.Is_Null( cursor, 2369 )then
         a_frs1516.whl08c7 := gse.Integer_Value( cursor, 2369 );
      end if;
      if not gse.Is_Null( cursor, 2370 )then
         a_frs1516.whl08c8 := gse.Integer_Value( cursor, 2370 );
      end if;
      if not gse.Is_Null( cursor, 2371 )then
         a_frs1516.whl08c9 := gse.Integer_Value( cursor, 2371 );
      end if;
      if not gse.Is_Null( cursor, 2372 )then
         a_frs1516.whl09c1 := gse.Integer_Value( cursor, 2372 );
      end if;
      if not gse.Is_Null( cursor, 2373 )then
         a_frs1516.whl09c2 := gse.Integer_Value( cursor, 2373 );
      end if;
      if not gse.Is_Null( cursor, 2374 )then
         a_frs1516.whl09c3 := gse.Integer_Value( cursor, 2374 );
      end if;
      if not gse.Is_Null( cursor, 2375 )then
         a_frs1516.whl09c4 := gse.Integer_Value( cursor, 2375 );
      end if;
      if not gse.Is_Null( cursor, 2376 )then
         a_frs1516.whl09c5 := gse.Integer_Value( cursor, 2376 );
      end if;
      if not gse.Is_Null( cursor, 2377 )then
         a_frs1516.whl09c6 := gse.Integer_Value( cursor, 2377 );
      end if;
      if not gse.Is_Null( cursor, 2378 )then
         a_frs1516.whl09c7 := gse.Integer_Value( cursor, 2378 );
      end if;
      if not gse.Is_Null( cursor, 2379 )then
         a_frs1516.whl09c8 := gse.Integer_Value( cursor, 2379 );
      end if;
      if not gse.Is_Null( cursor, 2380 )then
         a_frs1516.whl09c9 := gse.Integer_Value( cursor, 2380 );
      end if;
      if not gse.Is_Null( cursor, 2381 )then
         a_frs1516.whl10c1 := gse.Integer_Value( cursor, 2381 );
      end if;
      if not gse.Is_Null( cursor, 2382 )then
         a_frs1516.whl10c2 := gse.Integer_Value( cursor, 2382 );
      end if;
      if not gse.Is_Null( cursor, 2383 )then
         a_frs1516.whl10c3 := gse.Integer_Value( cursor, 2383 );
      end if;
      if not gse.Is_Null( cursor, 2384 )then
         a_frs1516.whl10c4 := gse.Integer_Value( cursor, 2384 );
      end if;
      if not gse.Is_Null( cursor, 2385 )then
         a_frs1516.whl10c5 := gse.Integer_Value( cursor, 2385 );
      end if;
      if not gse.Is_Null( cursor, 2386 )then
         a_frs1516.whl10c6 := gse.Integer_Value( cursor, 2386 );
      end if;
      if not gse.Is_Null( cursor, 2387 )then
         a_frs1516.whl10c7 := gse.Integer_Value( cursor, 2387 );
      end if;
      if not gse.Is_Null( cursor, 2388 )then
         a_frs1516.whl10c8 := gse.Integer_Value( cursor, 2388 );
      end if;
      if not gse.Is_Null( cursor, 2389 )then
         a_frs1516.whl10c9 := gse.Integer_Value( cursor, 2389 );
      end if;
      if not gse.Is_Null( cursor, 2390 )then
         a_frs1516.whl11c1 := gse.Integer_Value( cursor, 2390 );
      end if;
      if not gse.Is_Null( cursor, 2391 )then
         a_frs1516.whl11c2 := gse.Integer_Value( cursor, 2391 );
      end if;
      if not gse.Is_Null( cursor, 2392 )then
         a_frs1516.whl11c3 := gse.Integer_Value( cursor, 2392 );
      end if;
      if not gse.Is_Null( cursor, 2393 )then
         a_frs1516.whl11c4 := gse.Integer_Value( cursor, 2393 );
      end if;
      if not gse.Is_Null( cursor, 2394 )then
         a_frs1516.whl11c5 := gse.Integer_Value( cursor, 2394 );
      end if;
      if not gse.Is_Null( cursor, 2395 )then
         a_frs1516.whl11c6 := gse.Integer_Value( cursor, 2395 );
      end if;
      if not gse.Is_Null( cursor, 2396 )then
         a_frs1516.whl11c7 := gse.Integer_Value( cursor, 2396 );
      end if;
      if not gse.Is_Null( cursor, 2397 )then
         a_frs1516.whl11c8 := gse.Integer_Value( cursor, 2397 );
      end if;
      if not gse.Is_Null( cursor, 2398 )then
         a_frs1516.whl11c9 := gse.Integer_Value( cursor, 2398 );
      end if;
      if not gse.Is_Null( cursor, 2399 )then
         a_frs1516.whl12c1 := gse.Integer_Value( cursor, 2399 );
      end if;
      if not gse.Is_Null( cursor, 2400 )then
         a_frs1516.whl12c2 := gse.Integer_Value( cursor, 2400 );
      end if;
      if not gse.Is_Null( cursor, 2401 )then
         a_frs1516.whl12c3 := gse.Integer_Value( cursor, 2401 );
      end if;
      if not gse.Is_Null( cursor, 2402 )then
         a_frs1516.whl12c4 := gse.Integer_Value( cursor, 2402 );
      end if;
      if not gse.Is_Null( cursor, 2403 )then
         a_frs1516.whl12c5 := gse.Integer_Value( cursor, 2403 );
      end if;
      if not gse.Is_Null( cursor, 2404 )then
         a_frs1516.whl12c6 := gse.Integer_Value( cursor, 2404 );
      end if;
      if not gse.Is_Null( cursor, 2405 )then
         a_frs1516.whl12c7 := gse.Integer_Value( cursor, 2405 );
      end if;
      if not gse.Is_Null( cursor, 2406 )then
         a_frs1516.whl12c8 := gse.Integer_Value( cursor, 2406 );
      end if;
      if not gse.Is_Null( cursor, 2407 )then
         a_frs1516.whl12c9 := gse.Integer_Value( cursor, 2407 );
      end if;
      if not gse.Is_Null( cursor, 2408 )then
         a_frs1516.whl13c1 := gse.Integer_Value( cursor, 2408 );
      end if;
      if not gse.Is_Null( cursor, 2409 )then
         a_frs1516.whl13c2 := gse.Integer_Value( cursor, 2409 );
      end if;
      if not gse.Is_Null( cursor, 2410 )then
         a_frs1516.whl13c3 := gse.Integer_Value( cursor, 2410 );
      end if;
      if not gse.Is_Null( cursor, 2411 )then
         a_frs1516.whl13c4 := gse.Integer_Value( cursor, 2411 );
      end if;
      if not gse.Is_Null( cursor, 2412 )then
         a_frs1516.whl13c5 := gse.Integer_Value( cursor, 2412 );
      end if;
      if not gse.Is_Null( cursor, 2413 )then
         a_frs1516.whl13c6 := gse.Integer_Value( cursor, 2413 );
      end if;
      if not gse.Is_Null( cursor, 2414 )then
         a_frs1516.whl13c7 := gse.Integer_Value( cursor, 2414 );
      end if;
      if not gse.Is_Null( cursor, 2415 )then
         a_frs1516.whl13c8 := gse.Integer_Value( cursor, 2415 );
      end if;
      if not gse.Is_Null( cursor, 2416 )then
         a_frs1516.whl13c9 := gse.Integer_Value( cursor, 2416 );
      end if;
      if not gse.Is_Null( cursor, 2417 )then
         a_frs1516.whl14c1 := gse.Integer_Value( cursor, 2417 );
      end if;
      if not gse.Is_Null( cursor, 2418 )then
         a_frs1516.whl14c2 := gse.Integer_Value( cursor, 2418 );
      end if;
      if not gse.Is_Null( cursor, 2419 )then
         a_frs1516.whl14c3 := gse.Integer_Value( cursor, 2419 );
      end if;
      if not gse.Is_Null( cursor, 2420 )then
         a_frs1516.whl14c4 := gse.Integer_Value( cursor, 2420 );
      end if;
      if not gse.Is_Null( cursor, 2421 )then
         a_frs1516.whl14c5 := gse.Integer_Value( cursor, 2421 );
      end if;
      if not gse.Is_Null( cursor, 2422 )then
         a_frs1516.whl14c6 := gse.Integer_Value( cursor, 2422 );
      end if;
      if not gse.Is_Null( cursor, 2423 )then
         a_frs1516.whl14c7 := gse.Integer_Value( cursor, 2423 );
      end if;
      if not gse.Is_Null( cursor, 2424 )then
         a_frs1516.whl14c8 := gse.Integer_Value( cursor, 2424 );
      end if;
      if not gse.Is_Null( cursor, 2425 )then
         a_frs1516.whl14c9 := gse.Integer_Value( cursor, 2425 );
      end if;
      if not gse.Is_Null( cursor, 2426 )then
         a_frs1516.whl15c1 := gse.Integer_Value( cursor, 2426 );
      end if;
      if not gse.Is_Null( cursor, 2427 )then
         a_frs1516.whl15c2 := gse.Integer_Value( cursor, 2427 );
      end if;
      if not gse.Is_Null( cursor, 2428 )then
         a_frs1516.whl15c3 := gse.Integer_Value( cursor, 2428 );
      end if;
      if not gse.Is_Null( cursor, 2429 )then
         a_frs1516.whl15c4 := gse.Integer_Value( cursor, 2429 );
      end if;
      if not gse.Is_Null( cursor, 2430 )then
         a_frs1516.whl15c5 := gse.Integer_Value( cursor, 2430 );
      end if;
      if not gse.Is_Null( cursor, 2431 )then
         a_frs1516.whl15c6 := gse.Integer_Value( cursor, 2431 );
      end if;
      if not gse.Is_Null( cursor, 2432 )then
         a_frs1516.whl15c7 := gse.Integer_Value( cursor, 2432 );
      end if;
      if not gse.Is_Null( cursor, 2433 )then
         a_frs1516.whl15c8 := gse.Integer_Value( cursor, 2433 );
      end if;
      if not gse.Is_Null( cursor, 2434 )then
         a_frs1516.whl15c9 := gse.Integer_Value( cursor, 2434 );
      end if;
      if not gse.Is_Null( cursor, 2435 )then
         a_frs1516.whl16c1 := gse.Integer_Value( cursor, 2435 );
      end if;
      if not gse.Is_Null( cursor, 2436 )then
         a_frs1516.whl16c2 := gse.Integer_Value( cursor, 2436 );
      end if;
      if not gse.Is_Null( cursor, 2437 )then
         a_frs1516.whl16c3 := gse.Integer_Value( cursor, 2437 );
      end if;
      if not gse.Is_Null( cursor, 2438 )then
         a_frs1516.whl16c4 := gse.Integer_Value( cursor, 2438 );
      end if;
      if not gse.Is_Null( cursor, 2439 )then
         a_frs1516.whl16c5 := gse.Integer_Value( cursor, 2439 );
      end if;
      if not gse.Is_Null( cursor, 2440 )then
         a_frs1516.whl16c6 := gse.Integer_Value( cursor, 2440 );
      end if;
      if not gse.Is_Null( cursor, 2441 )then
         a_frs1516.whl16c7 := gse.Integer_Value( cursor, 2441 );
      end if;
      if not gse.Is_Null( cursor, 2442 )then
         a_frs1516.whl16c8 := gse.Integer_Value( cursor, 2442 );
      end if;
      if not gse.Is_Null( cursor, 2443 )then
         a_frs1516.whl16c9 := gse.Integer_Value( cursor, 2443 );
      end if;
      if not gse.Is_Null( cursor, 2444 )then
         a_frs1516.whl17c1 := gse.Integer_Value( cursor, 2444 );
      end if;
      if not gse.Is_Null( cursor, 2445 )then
         a_frs1516.whl17c2 := gse.Integer_Value( cursor, 2445 );
      end if;
      if not gse.Is_Null( cursor, 2446 )then
         a_frs1516.whl17c3 := gse.Integer_Value( cursor, 2446 );
      end if;
      if not gse.Is_Null( cursor, 2447 )then
         a_frs1516.whl17c4 := gse.Integer_Value( cursor, 2447 );
      end if;
      if not gse.Is_Null( cursor, 2448 )then
         a_frs1516.whl17c5 := gse.Integer_Value( cursor, 2448 );
      end if;
      if not gse.Is_Null( cursor, 2449 )then
         a_frs1516.whl17c6 := gse.Integer_Value( cursor, 2449 );
      end if;
      if not gse.Is_Null( cursor, 2450 )then
         a_frs1516.whl17c7 := gse.Integer_Value( cursor, 2450 );
      end if;
      if not gse.Is_Null( cursor, 2451 )then
         a_frs1516.whl17c8 := gse.Integer_Value( cursor, 2451 );
      end if;
      if not gse.Is_Null( cursor, 2452 )then
         a_frs1516.whl17c9 := gse.Integer_Value( cursor, 2452 );
      end if;
      if not gse.Is_Null( cursor, 2453 )then
         a_frs1516.whl18c1 := gse.Integer_Value( cursor, 2453 );
      end if;
      if not gse.Is_Null( cursor, 2454 )then
         a_frs1516.whl18c2 := gse.Integer_Value( cursor, 2454 );
      end if;
      if not gse.Is_Null( cursor, 2455 )then
         a_frs1516.whl18c3 := gse.Integer_Value( cursor, 2455 );
      end if;
      if not gse.Is_Null( cursor, 2456 )then
         a_frs1516.whl18c4 := gse.Integer_Value( cursor, 2456 );
      end if;
      if not gse.Is_Null( cursor, 2457 )then
         a_frs1516.whl18c5 := gse.Integer_Value( cursor, 2457 );
      end if;
      if not gse.Is_Null( cursor, 2458 )then
         a_frs1516.whl18c6 := gse.Integer_Value( cursor, 2458 );
      end if;
      if not gse.Is_Null( cursor, 2459 )then
         a_frs1516.whl18c7 := gse.Integer_Value( cursor, 2459 );
      end if;
      if not gse.Is_Null( cursor, 2460 )then
         a_frs1516.whl18c8 := gse.Integer_Value( cursor, 2460 );
      end if;
      if not gse.Is_Null( cursor, 2461 )then
         a_frs1516.whl18c9 := gse.Integer_Value( cursor, 2461 );
      end if;
      if not gse.Is_Null( cursor, 2462 )then
         a_frs1516.whl19c1 := gse.Integer_Value( cursor, 2462 );
      end if;
      if not gse.Is_Null( cursor, 2463 )then
         a_frs1516.whl19c2 := gse.Integer_Value( cursor, 2463 );
      end if;
      if not gse.Is_Null( cursor, 2464 )then
         a_frs1516.whl19c3 := gse.Integer_Value( cursor, 2464 );
      end if;
      if not gse.Is_Null( cursor, 2465 )then
         a_frs1516.whl19c4 := gse.Integer_Value( cursor, 2465 );
      end if;
      if not gse.Is_Null( cursor, 2466 )then
         a_frs1516.whl19c5 := gse.Integer_Value( cursor, 2466 );
      end if;
      if not gse.Is_Null( cursor, 2467 )then
         a_frs1516.whl19c6 := gse.Integer_Value( cursor, 2467 );
      end if;
      if not gse.Is_Null( cursor, 2468 )then
         a_frs1516.whl19c7 := gse.Integer_Value( cursor, 2468 );
      end if;
      if not gse.Is_Null( cursor, 2469 )then
         a_frs1516.whl19c8 := gse.Integer_Value( cursor, 2469 );
      end if;
      if not gse.Is_Null( cursor, 2470 )then
         a_frs1516.whl19c9 := gse.Integer_Value( cursor, 2470 );
      end if;
      if not gse.Is_Null( cursor, 2471 )then
         a_frs1516.whl20c1 := gse.Integer_Value( cursor, 2471 );
      end if;
      if not gse.Is_Null( cursor, 2472 )then
         a_frs1516.whl20c2 := gse.Integer_Value( cursor, 2472 );
      end if;
      if not gse.Is_Null( cursor, 2473 )then
         a_frs1516.whl20c3 := gse.Integer_Value( cursor, 2473 );
      end if;
      if not gse.Is_Null( cursor, 2474 )then
         a_frs1516.whl20c4 := gse.Integer_Value( cursor, 2474 );
      end if;
      if not gse.Is_Null( cursor, 2475 )then
         a_frs1516.whl20c5 := gse.Integer_Value( cursor, 2475 );
      end if;
      if not gse.Is_Null( cursor, 2476 )then
         a_frs1516.whl20c6 := gse.Integer_Value( cursor, 2476 );
      end if;
      if not gse.Is_Null( cursor, 2477 )then
         a_frs1516.whl20c7 := gse.Integer_Value( cursor, 2477 );
      end if;
      if not gse.Is_Null( cursor, 2478 )then
         a_frs1516.whl20c8 := gse.Integer_Value( cursor, 2478 );
      end if;
      if not gse.Is_Null( cursor, 2479 )then
         a_frs1516.whl20c9 := gse.Integer_Value( cursor, 2479 );
      end if;
      if not gse.Is_Null( cursor, 2480 )then
         a_frs1516.agec1 := gse.Integer_Value( cursor, 2480 );
      end if;
      if not gse.Is_Null( cursor, 2481 )then
         a_frs1516.agec2 := gse.Integer_Value( cursor, 2481 );
      end if;
      if not gse.Is_Null( cursor, 2482 )then
         a_frs1516.agec3 := gse.Integer_Value( cursor, 2482 );
      end if;
      if not gse.Is_Null( cursor, 2483 )then
         a_frs1516.agec4 := gse.Integer_Value( cursor, 2483 );
      end if;
      if not gse.Is_Null( cursor, 2484 )then
         a_frs1516.agec5 := gse.Integer_Value( cursor, 2484 );
      end if;
      if not gse.Is_Null( cursor, 2485 )then
         a_frs1516.agec6 := gse.Integer_Value( cursor, 2485 );
      end if;
      if not gse.Is_Null( cursor, 2486 )then
         a_frs1516.agec7 := gse.Integer_Value( cursor, 2486 );
      end if;
      if not gse.Is_Null( cursor, 2487 )then
         a_frs1516.agec8 := gse.Integer_Value( cursor, 2487 );
      end if;
      if not gse.Is_Null( cursor, 2488 )then
         a_frs1516.cameyrc1 := gse.Integer_Value( cursor, 2488 );
      end if;
      if not gse.Is_Null( cursor, 2489 )then
         a_frs1516.cameyrc2 := gse.Integer_Value( cursor, 2489 );
      end if;
      if not gse.Is_Null( cursor, 2490 )then
         a_frs1516.cameyrc3 := gse.Integer_Value( cursor, 2490 );
      end if;
      if not gse.Is_Null( cursor, 2491 )then
         a_frs1516.cameyrc4 := gse.Integer_Value( cursor, 2491 );
      end if;
      if not gse.Is_Null( cursor, 2492 )then
         a_frs1516.cameyrc5 := gse.Integer_Value( cursor, 2492 );
      end if;
      if not gse.Is_Null( cursor, 2493 )then
         a_frs1516.cameyrc6 := gse.Integer_Value( cursor, 2493 );
      end if;
      if not gse.Is_Null( cursor, 2494 )then
         a_frs1516.cameyrc7 := gse.Integer_Value( cursor, 2494 );
      end if;
      if not gse.Is_Null( cursor, 2495 )then
         a_frs1516.cameyrc8 := gse.Integer_Value( cursor, 2495 );
      end if;
      if not gse.Is_Null( cursor, 2496 )then
         a_frs1516.chcrec1 := gse.Integer_Value( cursor, 2496 );
      end if;
      if not gse.Is_Null( cursor, 2497 )then
         a_frs1516.chcrec2 := gse.Integer_Value( cursor, 2497 );
      end if;
      if not gse.Is_Null( cursor, 2498 )then
         a_frs1516.chcrec3 := gse.Integer_Value( cursor, 2498 );
      end if;
      if not gse.Is_Null( cursor, 2499 )then
         a_frs1516.chcrec4 := gse.Integer_Value( cursor, 2499 );
      end if;
      if not gse.Is_Null( cursor, 2500 )then
         a_frs1516.chcrec5 := gse.Integer_Value( cursor, 2500 );
      end if;
      if not gse.Is_Null( cursor, 2501 )then
         a_frs1516.chcrec6 := gse.Integer_Value( cursor, 2501 );
      end if;
      if not gse.Is_Null( cursor, 2502 )then
         a_frs1516.chcrec7 := gse.Integer_Value( cursor, 2502 );
      end if;
      if not gse.Is_Null( cursor, 2503 )then
         a_frs1516.chcrec8 := gse.Integer_Value( cursor, 2503 );
      end if;
      if not gse.Is_Null( cursor, 2504 )then
         a_frs1516.creabc1 := gse.Integer_Value( cursor, 2504 );
      end if;
      if not gse.Is_Null( cursor, 2505 )then
         a_frs1516.creabc2 := gse.Integer_Value( cursor, 2505 );
      end if;
      if not gse.Is_Null( cursor, 2506 )then
         a_frs1516.creabc3 := gse.Integer_Value( cursor, 2506 );
      end if;
      if not gse.Is_Null( cursor, 2507 )then
         a_frs1516.creabc4 := gse.Integer_Value( cursor, 2507 );
      end if;
      if not gse.Is_Null( cursor, 2508 )then
         a_frs1516.creabc5 := gse.Integer_Value( cursor, 2508 );
      end if;
      if not gse.Is_Null( cursor, 2509 )then
         a_frs1516.creabc6 := gse.Integer_Value( cursor, 2509 );
      end if;
      if not gse.Is_Null( cursor, 2510 )then
         a_frs1516.creabc7 := gse.Integer_Value( cursor, 2510 );
      end if;
      if not gse.Is_Null( cursor, 2511 )then
         a_frs1516.creabc8 := gse.Integer_Value( cursor, 2511 );
      end if;
      if not gse.Is_Null( cursor, 2512 )then
         a_frs1516.creahc1 := gse.Integer_Value( cursor, 2512 );
      end if;
      if not gse.Is_Null( cursor, 2513 )then
         a_frs1516.creahc2 := gse.Integer_Value( cursor, 2513 );
      end if;
      if not gse.Is_Null( cursor, 2514 )then
         a_frs1516.creahc3 := gse.Integer_Value( cursor, 2514 );
      end if;
      if not gse.Is_Null( cursor, 2515 )then
         a_frs1516.creahc4 := gse.Integer_Value( cursor, 2515 );
      end if;
      if not gse.Is_Null( cursor, 2516 )then
         a_frs1516.creahc5 := gse.Integer_Value( cursor, 2516 );
      end if;
      if not gse.Is_Null( cursor, 2517 )then
         a_frs1516.creahc6 := gse.Integer_Value( cursor, 2517 );
      end if;
      if not gse.Is_Null( cursor, 2518 )then
         a_frs1516.creahc7 := gse.Integer_Value( cursor, 2518 );
      end if;
      if not gse.Is_Null( cursor, 2519 )then
         a_frs1516.creahc8 := gse.Integer_Value( cursor, 2519 );
      end if;
      if not gse.Is_Null( cursor, 2520 )then
         a_frs1516.crecbc1 := gse.Integer_Value( cursor, 2520 );
      end if;
      if not gse.Is_Null( cursor, 2521 )then
         a_frs1516.crecbc2 := gse.Integer_Value( cursor, 2521 );
      end if;
      if not gse.Is_Null( cursor, 2522 )then
         a_frs1516.crecbc3 := gse.Integer_Value( cursor, 2522 );
      end if;
      if not gse.Is_Null( cursor, 2523 )then
         a_frs1516.crecbc4 := gse.Integer_Value( cursor, 2523 );
      end if;
      if not gse.Is_Null( cursor, 2524 )then
         a_frs1516.crecbc5 := gse.Integer_Value( cursor, 2524 );
      end if;
      if not gse.Is_Null( cursor, 2525 )then
         a_frs1516.crecbc6 := gse.Integer_Value( cursor, 2525 );
      end if;
      if not gse.Is_Null( cursor, 2526 )then
         a_frs1516.crecbc7 := gse.Integer_Value( cursor, 2526 );
      end if;
      if not gse.Is_Null( cursor, 2527 )then
         a_frs1516.crecbc8 := gse.Integer_Value( cursor, 2527 );
      end if;
      if not gse.Is_Null( cursor, 2528 )then
         a_frs1516.crechc1 := gse.Integer_Value( cursor, 2528 );
      end if;
      if not gse.Is_Null( cursor, 2529 )then
         a_frs1516.crechc2 := gse.Integer_Value( cursor, 2529 );
      end if;
      if not gse.Is_Null( cursor, 2530 )then
         a_frs1516.crechc3 := gse.Integer_Value( cursor, 2530 );
      end if;
      if not gse.Is_Null( cursor, 2531 )then
         a_frs1516.crechc4 := gse.Integer_Value( cursor, 2531 );
      end if;
      if not gse.Is_Null( cursor, 2532 )then
         a_frs1516.crechc5 := gse.Integer_Value( cursor, 2532 );
      end if;
      if not gse.Is_Null( cursor, 2533 )then
         a_frs1516.crechc6 := gse.Integer_Value( cursor, 2533 );
      end if;
      if not gse.Is_Null( cursor, 2534 )then
         a_frs1516.crechc7 := gse.Integer_Value( cursor, 2534 );
      end if;
      if not gse.Is_Null( cursor, 2535 )then
         a_frs1516.crechc8 := gse.Integer_Value( cursor, 2535 );
      end if;
      if not gse.Is_Null( cursor, 2536 )then
         a_frs1516.creclc1 := gse.Integer_Value( cursor, 2536 );
      end if;
      if not gse.Is_Null( cursor, 2537 )then
         a_frs1516.creclc2 := gse.Integer_Value( cursor, 2537 );
      end if;
      if not gse.Is_Null( cursor, 2538 )then
         a_frs1516.creclc3 := gse.Integer_Value( cursor, 2538 );
      end if;
      if not gse.Is_Null( cursor, 2539 )then
         a_frs1516.creclc4 := gse.Integer_Value( cursor, 2539 );
      end if;
      if not gse.Is_Null( cursor, 2540 )then
         a_frs1516.creclc5 := gse.Integer_Value( cursor, 2540 );
      end if;
      if not gse.Is_Null( cursor, 2541 )then
         a_frs1516.creclc6 := gse.Integer_Value( cursor, 2541 );
      end if;
      if not gse.Is_Null( cursor, 2542 )then
         a_frs1516.creclc7 := gse.Integer_Value( cursor, 2542 );
      end if;
      if not gse.Is_Null( cursor, 2543 )then
         a_frs1516.creclc8 := gse.Integer_Value( cursor, 2543 );
      end if;
      if not gse.Is_Null( cursor, 2544 )then
         a_frs1516.crefrc1 := gse.Integer_Value( cursor, 2544 );
      end if;
      if not gse.Is_Null( cursor, 2545 )then
         a_frs1516.crefrc2 := gse.Integer_Value( cursor, 2545 );
      end if;
      if not gse.Is_Null( cursor, 2546 )then
         a_frs1516.crefrc3 := gse.Integer_Value( cursor, 2546 );
      end if;
      if not gse.Is_Null( cursor, 2547 )then
         a_frs1516.crefrc4 := gse.Integer_Value( cursor, 2547 );
      end if;
      if not gse.Is_Null( cursor, 2548 )then
         a_frs1516.crefrc5 := gse.Integer_Value( cursor, 2548 );
      end if;
      if not gse.Is_Null( cursor, 2549 )then
         a_frs1516.crefrc6 := gse.Integer_Value( cursor, 2549 );
      end if;
      if not gse.Is_Null( cursor, 2550 )then
         a_frs1516.crefrc7 := gse.Integer_Value( cursor, 2550 );
      end if;
      if not gse.Is_Null( cursor, 2551 )then
         a_frs1516.crefrc8 := gse.Integer_Value( cursor, 2551 );
      end if;
      if not gse.Is_Null( cursor, 2552 )then
         a_frs1516.creotc1 := gse.Integer_Value( cursor, 2552 );
      end if;
      if not gse.Is_Null( cursor, 2553 )then
         a_frs1516.creotc2 := gse.Integer_Value( cursor, 2553 );
      end if;
      if not gse.Is_Null( cursor, 2554 )then
         a_frs1516.creotc3 := gse.Integer_Value( cursor, 2554 );
      end if;
      if not gse.Is_Null( cursor, 2555 )then
         a_frs1516.creotc4 := gse.Integer_Value( cursor, 2555 );
      end if;
      if not gse.Is_Null( cursor, 2556 )then
         a_frs1516.creotc5 := gse.Integer_Value( cursor, 2556 );
      end if;
      if not gse.Is_Null( cursor, 2557 )then
         a_frs1516.creotc6 := gse.Integer_Value( cursor, 2557 );
      end if;
      if not gse.Is_Null( cursor, 2558 )then
         a_frs1516.creotc7 := gse.Integer_Value( cursor, 2558 );
      end if;
      if not gse.Is_Null( cursor, 2559 )then
         a_frs1516.creotc8 := gse.Integer_Value( cursor, 2559 );
      end if;
      if not gse.Is_Null( cursor, 2560 )then
         a_frs1516.carerc1 := gse.Integer_Value( cursor, 2560 );
      end if;
      if not gse.Is_Null( cursor, 2561 )then
         a_frs1516.carerc2 := gse.Integer_Value( cursor, 2561 );
      end if;
      if not gse.Is_Null( cursor, 2562 )then
         a_frs1516.carerc3 := gse.Integer_Value( cursor, 2562 );
      end if;
      if not gse.Is_Null( cursor, 2563 )then
         a_frs1516.carerc4 := gse.Integer_Value( cursor, 2563 );
      end if;
      if not gse.Is_Null( cursor, 2564 )then
         a_frs1516.carerc5 := gse.Integer_Value( cursor, 2564 );
      end if;
      if not gse.Is_Null( cursor, 2565 )then
         a_frs1516.carerc6 := gse.Integer_Value( cursor, 2565 );
      end if;
      if not gse.Is_Null( cursor, 2566 )then
         a_frs1516.carerc7 := gse.Integer_Value( cursor, 2566 );
      end if;
      if not gse.Is_Null( cursor, 2567 )then
         a_frs1516.carerc8 := gse.Integer_Value( cursor, 2567 );
      end if;
      if not gse.Is_Null( cursor, 2568 )then
         a_frs1516.cdatrec1 := gse.Integer_Value( cursor, 2568 );
      end if;
      if not gse.Is_Null( cursor, 2569 )then
         a_frs1516.cdatrec2 := gse.Integer_Value( cursor, 2569 );
      end if;
      if not gse.Is_Null( cursor, 2570 )then
         a_frs1516.cdatrec3 := gse.Integer_Value( cursor, 2570 );
      end if;
      if not gse.Is_Null( cursor, 2571 )then
         a_frs1516.cdatrec4 := gse.Integer_Value( cursor, 2571 );
      end if;
      if not gse.Is_Null( cursor, 2572 )then
         a_frs1516.cdatrec5 := gse.Integer_Value( cursor, 2572 );
      end if;
      if not gse.Is_Null( cursor, 2573 )then
         a_frs1516.cdatrec6 := gse.Integer_Value( cursor, 2573 );
      end if;
      if not gse.Is_Null( cursor, 2574 )then
         a_frs1516.cdatrec7 := gse.Integer_Value( cursor, 2574 );
      end if;
      if not gse.Is_Null( cursor, 2575 )then
         a_frs1516.cdatrec8 := gse.Integer_Value( cursor, 2575 );
      end if;
      if not gse.Is_Null( cursor, 2576 )then
         a_frs1516.cdtrepc1 := gse.Integer_Value( cursor, 2576 );
      end if;
      if not gse.Is_Null( cursor, 2577 )then
         a_frs1516.cdtrepc2 := gse.Integer_Value( cursor, 2577 );
      end if;
      if not gse.Is_Null( cursor, 2578 )then
         a_frs1516.cdtrepc3 := gse.Integer_Value( cursor, 2578 );
      end if;
      if not gse.Is_Null( cursor, 2579 )then
         a_frs1516.cdtrepc4 := gse.Integer_Value( cursor, 2579 );
      end if;
      if not gse.Is_Null( cursor, 2580 )then
         a_frs1516.cdtrepc5 := gse.Integer_Value( cursor, 2580 );
      end if;
      if not gse.Is_Null( cursor, 2581 )then
         a_frs1516.cdtrepc6 := gse.Integer_Value( cursor, 2581 );
      end if;
      if not gse.Is_Null( cursor, 2582 )then
         a_frs1516.cdtrepc7 := gse.Integer_Value( cursor, 2582 );
      end if;
      if not gse.Is_Null( cursor, 2583 )then
         a_frs1516.cdtrepc8 := gse.Integer_Value( cursor, 2583 );
      end if;
      if not gse.Is_Null( cursor, 2584 )then
         a_frs1516.cdis1c1 := gse.Integer_Value( cursor, 2584 );
      end if;
      if not gse.Is_Null( cursor, 2585 )then
         a_frs1516.cdis1c2 := gse.Integer_Value( cursor, 2585 );
      end if;
      if not gse.Is_Null( cursor, 2586 )then
         a_frs1516.cdis1c3 := gse.Integer_Value( cursor, 2586 );
      end if;
      if not gse.Is_Null( cursor, 2587 )then
         a_frs1516.cdis1c4 := gse.Integer_Value( cursor, 2587 );
      end if;
      if not gse.Is_Null( cursor, 2588 )then
         a_frs1516.cdis1c5 := gse.Integer_Value( cursor, 2588 );
      end if;
      if not gse.Is_Null( cursor, 2589 )then
         a_frs1516.cdis1c6 := gse.Integer_Value( cursor, 2589 );
      end if;
      if not gse.Is_Null( cursor, 2590 )then
         a_frs1516.cdis1c7 := gse.Integer_Value( cursor, 2590 );
      end if;
      if not gse.Is_Null( cursor, 2591 )then
         a_frs1516.cdis1c8 := gse.Integer_Value( cursor, 2591 );
      end if;
      if not gse.Is_Null( cursor, 2592 )then
         a_frs1516.cdis2c1 := gse.Integer_Value( cursor, 2592 );
      end if;
      if not gse.Is_Null( cursor, 2593 )then
         a_frs1516.cdis2c2 := gse.Integer_Value( cursor, 2593 );
      end if;
      if not gse.Is_Null( cursor, 2594 )then
         a_frs1516.cdis2c3 := gse.Integer_Value( cursor, 2594 );
      end if;
      if not gse.Is_Null( cursor, 2595 )then
         a_frs1516.cdis2c4 := gse.Integer_Value( cursor, 2595 );
      end if;
      if not gse.Is_Null( cursor, 2596 )then
         a_frs1516.cdis2c5 := gse.Integer_Value( cursor, 2596 );
      end if;
      if not gse.Is_Null( cursor, 2597 )then
         a_frs1516.cdis2c6 := gse.Integer_Value( cursor, 2597 );
      end if;
      if not gse.Is_Null( cursor, 2598 )then
         a_frs1516.cdis2c7 := gse.Integer_Value( cursor, 2598 );
      end if;
      if not gse.Is_Null( cursor, 2599 )then
         a_frs1516.cdis2c8 := gse.Integer_Value( cursor, 2599 );
      end if;
      if not gse.Is_Null( cursor, 2600 )then
         a_frs1516.cdis3c1 := gse.Integer_Value( cursor, 2600 );
      end if;
      if not gse.Is_Null( cursor, 2601 )then
         a_frs1516.cdis3c2 := gse.Integer_Value( cursor, 2601 );
      end if;
      if not gse.Is_Null( cursor, 2602 )then
         a_frs1516.cdis3c3 := gse.Integer_Value( cursor, 2602 );
      end if;
      if not gse.Is_Null( cursor, 2603 )then
         a_frs1516.cdis3c4 := gse.Integer_Value( cursor, 2603 );
      end if;
      if not gse.Is_Null( cursor, 2604 )then
         a_frs1516.cdis3c5 := gse.Integer_Value( cursor, 2604 );
      end if;
      if not gse.Is_Null( cursor, 2605 )then
         a_frs1516.cdis3c6 := gse.Integer_Value( cursor, 2605 );
      end if;
      if not gse.Is_Null( cursor, 2606 )then
         a_frs1516.cdis3c7 := gse.Integer_Value( cursor, 2606 );
      end if;
      if not gse.Is_Null( cursor, 2607 )then
         a_frs1516.cdis3c8 := gse.Integer_Value( cursor, 2607 );
      end if;
      if not gse.Is_Null( cursor, 2608 )then
         a_frs1516.cdis4c1 := gse.Integer_Value( cursor, 2608 );
      end if;
      if not gse.Is_Null( cursor, 2609 )then
         a_frs1516.cdis4c2 := gse.Integer_Value( cursor, 2609 );
      end if;
      if not gse.Is_Null( cursor, 2610 )then
         a_frs1516.cdis4c3 := gse.Integer_Value( cursor, 2610 );
      end if;
      if not gse.Is_Null( cursor, 2611 )then
         a_frs1516.cdis4c4 := gse.Integer_Value( cursor, 2611 );
      end if;
      if not gse.Is_Null( cursor, 2612 )then
         a_frs1516.cdis4c5 := gse.Integer_Value( cursor, 2612 );
      end if;
      if not gse.Is_Null( cursor, 2613 )then
         a_frs1516.cdis4c6 := gse.Integer_Value( cursor, 2613 );
      end if;
      if not gse.Is_Null( cursor, 2614 )then
         a_frs1516.cdis4c7 := gse.Integer_Value( cursor, 2614 );
      end if;
      if not gse.Is_Null( cursor, 2615 )then
         a_frs1516.cdis4c8 := gse.Integer_Value( cursor, 2615 );
      end if;
      if not gse.Is_Null( cursor, 2616 )then
         a_frs1516.cdis5c1 := gse.Integer_Value( cursor, 2616 );
      end if;
      if not gse.Is_Null( cursor, 2617 )then
         a_frs1516.cdis5c2 := gse.Integer_Value( cursor, 2617 );
      end if;
      if not gse.Is_Null( cursor, 2618 )then
         a_frs1516.cdis5c3 := gse.Integer_Value( cursor, 2618 );
      end if;
      if not gse.Is_Null( cursor, 2619 )then
         a_frs1516.cdis5c4 := gse.Integer_Value( cursor, 2619 );
      end if;
      if not gse.Is_Null( cursor, 2620 )then
         a_frs1516.cdis5c5 := gse.Integer_Value( cursor, 2620 );
      end if;
      if not gse.Is_Null( cursor, 2621 )then
         a_frs1516.cdis5c6 := gse.Integer_Value( cursor, 2621 );
      end if;
      if not gse.Is_Null( cursor, 2622 )then
         a_frs1516.cdis5c7 := gse.Integer_Value( cursor, 2622 );
      end if;
      if not gse.Is_Null( cursor, 2623 )then
         a_frs1516.cdis5c8 := gse.Integer_Value( cursor, 2623 );
      end if;
      if not gse.Is_Null( cursor, 2624 )then
         a_frs1516.cdis6c1 := gse.Integer_Value( cursor, 2624 );
      end if;
      if not gse.Is_Null( cursor, 2625 )then
         a_frs1516.cdis6c2 := gse.Integer_Value( cursor, 2625 );
      end if;
      if not gse.Is_Null( cursor, 2626 )then
         a_frs1516.cdis6c3 := gse.Integer_Value( cursor, 2626 );
      end if;
      if not gse.Is_Null( cursor, 2627 )then
         a_frs1516.cdis6c4 := gse.Integer_Value( cursor, 2627 );
      end if;
      if not gse.Is_Null( cursor, 2628 )then
         a_frs1516.cdis6c5 := gse.Integer_Value( cursor, 2628 );
      end if;
      if not gse.Is_Null( cursor, 2629 )then
         a_frs1516.cdis6c6 := gse.Integer_Value( cursor, 2629 );
      end if;
      if not gse.Is_Null( cursor, 2630 )then
         a_frs1516.cdis6c7 := gse.Integer_Value( cursor, 2630 );
      end if;
      if not gse.Is_Null( cursor, 2631 )then
         a_frs1516.cdis6c8 := gse.Integer_Value( cursor, 2631 );
      end if;
      if not gse.Is_Null( cursor, 2632 )then
         a_frs1516.cdis7c1 := gse.Integer_Value( cursor, 2632 );
      end if;
      if not gse.Is_Null( cursor, 2633 )then
         a_frs1516.cdis7c2 := gse.Integer_Value( cursor, 2633 );
      end if;
      if not gse.Is_Null( cursor, 2634 )then
         a_frs1516.cdis7c3 := gse.Integer_Value( cursor, 2634 );
      end if;
      if not gse.Is_Null( cursor, 2635 )then
         a_frs1516.cdis7c4 := gse.Integer_Value( cursor, 2635 );
      end if;
      if not gse.Is_Null( cursor, 2636 )then
         a_frs1516.cdis7c5 := gse.Integer_Value( cursor, 2636 );
      end if;
      if not gse.Is_Null( cursor, 2637 )then
         a_frs1516.cdis7c6 := gse.Integer_Value( cursor, 2637 );
      end if;
      if not gse.Is_Null( cursor, 2638 )then
         a_frs1516.cdis7c7 := gse.Integer_Value( cursor, 2638 );
      end if;
      if not gse.Is_Null( cursor, 2639 )then
         a_frs1516.cdis7c8 := gse.Integer_Value( cursor, 2639 );
      end if;
      if not gse.Is_Null( cursor, 2640 )then
         a_frs1516.cdis8c1 := gse.Integer_Value( cursor, 2640 );
      end if;
      if not gse.Is_Null( cursor, 2641 )then
         a_frs1516.cdis8c2 := gse.Integer_Value( cursor, 2641 );
      end if;
      if not gse.Is_Null( cursor, 2642 )then
         a_frs1516.cdis8c3 := gse.Integer_Value( cursor, 2642 );
      end if;
      if not gse.Is_Null( cursor, 2643 )then
         a_frs1516.cdis8c4 := gse.Integer_Value( cursor, 2643 );
      end if;
      if not gse.Is_Null( cursor, 2644 )then
         a_frs1516.cdis8c5 := gse.Integer_Value( cursor, 2644 );
      end if;
      if not gse.Is_Null( cursor, 2645 )then
         a_frs1516.cdis8c6 := gse.Integer_Value( cursor, 2645 );
      end if;
      if not gse.Is_Null( cursor, 2646 )then
         a_frs1516.cdis8c7 := gse.Integer_Value( cursor, 2646 );
      end if;
      if not gse.Is_Null( cursor, 2647 )then
         a_frs1516.cdis8c8 := gse.Integer_Value( cursor, 2647 );
      end if;
      if not gse.Is_Null( cursor, 2648 )then
         a_frs1516.cdis9c1 := gse.Integer_Value( cursor, 2648 );
      end if;
      if not gse.Is_Null( cursor, 2649 )then
         a_frs1516.cdis9c2 := gse.Integer_Value( cursor, 2649 );
      end if;
      if not gse.Is_Null( cursor, 2650 )then
         a_frs1516.cdis9c3 := gse.Integer_Value( cursor, 2650 );
      end if;
      if not gse.Is_Null( cursor, 2651 )then
         a_frs1516.cdis9c4 := gse.Integer_Value( cursor, 2651 );
      end if;
      if not gse.Is_Null( cursor, 2652 )then
         a_frs1516.cdis9c5 := gse.Integer_Value( cursor, 2652 );
      end if;
      if not gse.Is_Null( cursor, 2653 )then
         a_frs1516.cdis9c6 := gse.Integer_Value( cursor, 2653 );
      end if;
      if not gse.Is_Null( cursor, 2654 )then
         a_frs1516.cdis9c7 := gse.Integer_Value( cursor, 2654 );
      end if;
      if not gse.Is_Null( cursor, 2655 )then
         a_frs1516.cdis9c8 := gse.Integer_Value( cursor, 2655 );
      end if;
      if not gse.Is_Null( cursor, 2656 )then
         a_frs1516.cdis10c1 := gse.Integer_Value( cursor, 2656 );
      end if;
      if not gse.Is_Null( cursor, 2657 )then
         a_frs1516.cdis10c2 := gse.Integer_Value( cursor, 2657 );
      end if;
      if not gse.Is_Null( cursor, 2658 )then
         a_frs1516.cdis10c3 := gse.Integer_Value( cursor, 2658 );
      end if;
      if not gse.Is_Null( cursor, 2659 )then
         a_frs1516.cdis10c4 := gse.Integer_Value( cursor, 2659 );
      end if;
      if not gse.Is_Null( cursor, 2660 )then
         a_frs1516.cdis10c5 := gse.Integer_Value( cursor, 2660 );
      end if;
      if not gse.Is_Null( cursor, 2661 )then
         a_frs1516.cdis10c6 := gse.Integer_Value( cursor, 2661 );
      end if;
      if not gse.Is_Null( cursor, 2662 )then
         a_frs1516.cdis10c7 := gse.Integer_Value( cursor, 2662 );
      end if;
      if not gse.Is_Null( cursor, 2663 )then
         a_frs1516.cdis10c8 := gse.Integer_Value( cursor, 2663 );
      end if;
      if not gse.Is_Null( cursor, 2664 )then
         a_frs1516.cdifc1 := gse.Integer_Value( cursor, 2664 );
      end if;
      if not gse.Is_Null( cursor, 2665 )then
         a_frs1516.cdifc2 := gse.Integer_Value( cursor, 2665 );
      end if;
      if not gse.Is_Null( cursor, 2666 )then
         a_frs1516.cdifc3 := gse.Integer_Value( cursor, 2666 );
      end if;
      if not gse.Is_Null( cursor, 2667 )then
         a_frs1516.cdifc4 := gse.Integer_Value( cursor, 2667 );
      end if;
      if not gse.Is_Null( cursor, 2668 )then
         a_frs1516.cdifc5 := gse.Integer_Value( cursor, 2668 );
      end if;
      if not gse.Is_Null( cursor, 2669 )then
         a_frs1516.cdifc6 := gse.Integer_Value( cursor, 2669 );
      end if;
      if not gse.Is_Null( cursor, 2670 )then
         a_frs1516.cdifc7 := gse.Integer_Value( cursor, 2670 );
      end if;
      if not gse.Is_Null( cursor, 2671 )then
         a_frs1516.cdifc8 := gse.Integer_Value( cursor, 2671 );
      end if;
      if not gse.Is_Null( cursor, 2672 )then
         a_frs1516.ernamc1:= Amount'Value( gse.Value( cursor, 2672 ));
      end if;
      if not gse.Is_Null( cursor, 2673 )then
         a_frs1516.ernamc2:= Amount'Value( gse.Value( cursor, 2673 ));
      end if;
      if not gse.Is_Null( cursor, 2674 )then
         a_frs1516.ernamc3:= Amount'Value( gse.Value( cursor, 2674 ));
      end if;
      if not gse.Is_Null( cursor, 2675 )then
         a_frs1516.ernamc4 := gse.Integer_Value( cursor, 2675 );
      end if;
      if not gse.Is_Null( cursor, 2676 )then
         a_frs1516.ernamc5 := gse.Integer_Value( cursor, 2676 );
      end if;
      if not gse.Is_Null( cursor, 2677 )then
         a_frs1516.ernamc6 := gse.Integer_Value( cursor, 2677 );
      end if;
      if not gse.Is_Null( cursor, 2678 )then
         a_frs1516.ernamc7 := gse.Integer_Value( cursor, 2678 );
      end if;
      if not gse.Is_Null( cursor, 2679 )then
         a_frs1516.ernamc8 := gse.Integer_Value( cursor, 2679 );
      end if;
      if not gse.Is_Null( cursor, 2680 )then
         a_frs1516.trustc1:= Amount'Value( gse.Value( cursor, 2680 ));
      end if;
      if not gse.Is_Null( cursor, 2681 )then
         a_frs1516.trustc2:= Amount'Value( gse.Value( cursor, 2681 ));
      end if;
      if not gse.Is_Null( cursor, 2682 )then
         a_frs1516.trustc3:= Amount'Value( gse.Value( cursor, 2682 ));
      end if;
      if not gse.Is_Null( cursor, 2683 )then
         a_frs1516.trustc4 := gse.Integer_Value( cursor, 2683 );
      end if;
      if not gse.Is_Null( cursor, 2684 )then
         a_frs1516.trustc5 := gse.Integer_Value( cursor, 2684 );
      end if;
      if not gse.Is_Null( cursor, 2685 )then
         a_frs1516.trustc6 := gse.Integer_Value( cursor, 2685 );
      end if;
      if not gse.Is_Null( cursor, 2686 )then
         a_frs1516.trustc7 := gse.Integer_Value( cursor, 2686 );
      end if;
      if not gse.Is_Null( cursor, 2687 )then
         a_frs1516.trustc8 := gse.Integer_Value( cursor, 2687 );
      end if;
      if not gse.Is_Null( cursor, 2688 )then
         a_frs1516.chbfdc1 := gse.Integer_Value( cursor, 2688 );
      end if;
      if not gse.Is_Null( cursor, 2689 )then
         a_frs1516.chbfdc2 := gse.Integer_Value( cursor, 2689 );
      end if;
      if not gse.Is_Null( cursor, 2690 )then
         a_frs1516.chbfdc3 := gse.Integer_Value( cursor, 2690 );
      end if;
      if not gse.Is_Null( cursor, 2691 )then
         a_frs1516.chbfdc4 := gse.Integer_Value( cursor, 2691 );
      end if;
      if not gse.Is_Null( cursor, 2692 )then
         a_frs1516.chbfdc5 := gse.Integer_Value( cursor, 2692 );
      end if;
      if not gse.Is_Null( cursor, 2693 )then
         a_frs1516.chbfdc6 := gse.Integer_Value( cursor, 2693 );
      end if;
      if not gse.Is_Null( cursor, 2694 )then
         a_frs1516.chbfdc7 := gse.Integer_Value( cursor, 2694 );
      end if;
      if not gse.Is_Null( cursor, 2695 )then
         a_frs1516.chbfdc8 := gse.Integer_Value( cursor, 2695 );
      end if;
      if not gse.Is_Null( cursor, 2696 )then
         a_frs1516.cbfamtc1:= Amount'Value( gse.Value( cursor, 2696 ));
      end if;
      if not gse.Is_Null( cursor, 2697 )then
         a_frs1516.cbfamtc2:= Amount'Value( gse.Value( cursor, 2697 ));
      end if;
      if not gse.Is_Null( cursor, 2698 )then
         a_frs1516.cbfamtc3 := gse.Integer_Value( cursor, 2698 );
      end if;
      if not gse.Is_Null( cursor, 2699 )then
         a_frs1516.cbfamtc4 := gse.Integer_Value( cursor, 2699 );
      end if;
      if not gse.Is_Null( cursor, 2700 )then
         a_frs1516.cbfamtc5 := gse.Integer_Value( cursor, 2700 );
      end if;
      if not gse.Is_Null( cursor, 2701 )then
         a_frs1516.cbfamtc6 := gse.Integer_Value( cursor, 2701 );
      end if;
      if not gse.Is_Null( cursor, 2702 )then
         a_frs1516.cbfamtc7 := gse.Integer_Value( cursor, 2702 );
      end if;
      if not gse.Is_Null( cursor, 2703 )then
         a_frs1516.cbfamtc8 := gse.Integer_Value( cursor, 2703 );
      end if;
      if not gse.Is_Null( cursor, 2704 )then
         a_frs1516.pbfamtc1 := gse.Integer_Value( cursor, 2704 );
      end if;
      if not gse.Is_Null( cursor, 2705 )then
         a_frs1516.pbfamtc2 := gse.Integer_Value( cursor, 2705 );
      end if;
      if not gse.Is_Null( cursor, 2706 )then
         a_frs1516.pbfamtc3 := gse.Integer_Value( cursor, 2706 );
      end if;
      if not gse.Is_Null( cursor, 2707 )then
         a_frs1516.pbfamtc4 := gse.Integer_Value( cursor, 2707 );
      end if;
      if not gse.Is_Null( cursor, 2708 )then
         a_frs1516.pbfamtc5 := gse.Integer_Value( cursor, 2708 );
      end if;
      if not gse.Is_Null( cursor, 2709 )then
         a_frs1516.pbfamtc6 := gse.Integer_Value( cursor, 2709 );
      end if;
      if not gse.Is_Null( cursor, 2710 )then
         a_frs1516.pbfamtc7 := gse.Integer_Value( cursor, 2710 );
      end if;
      if not gse.Is_Null( cursor, 2711 )then
         a_frs1516.pbfamtc8 := gse.Integer_Value( cursor, 2711 );
      end if;
      if not gse.Is_Null( cursor, 2712 )then
         a_frs1516.cbfvalc1 := gse.Integer_Value( cursor, 2712 );
      end if;
      if not gse.Is_Null( cursor, 2713 )then
         a_frs1516.cbfvalc2 := gse.Integer_Value( cursor, 2713 );
      end if;
      if not gse.Is_Null( cursor, 2714 )then
         a_frs1516.cbfvalc3 := gse.Integer_Value( cursor, 2714 );
      end if;
      if not gse.Is_Null( cursor, 2715 )then
         a_frs1516.cbfvalc4 := gse.Integer_Value( cursor, 2715 );
      end if;
      if not gse.Is_Null( cursor, 2716 )then
         a_frs1516.cbfvalc5 := gse.Integer_Value( cursor, 2716 );
      end if;
      if not gse.Is_Null( cursor, 2717 )then
         a_frs1516.cbfvalc6 := gse.Integer_Value( cursor, 2717 );
      end if;
      if not gse.Is_Null( cursor, 2718 )then
         a_frs1516.cbfvalc7 := gse.Integer_Value( cursor, 2718 );
      end if;
      if not gse.Is_Null( cursor, 2719 )then
         a_frs1516.cbfvalc8 := gse.Integer_Value( cursor, 2719 );
      end if;
      if not gse.Is_Null( cursor, 2720 )then
         a_frs1516.chcondc1 := gse.Integer_Value( cursor, 2720 );
      end if;
      if not gse.Is_Null( cursor, 2721 )then
         a_frs1516.chcondc2 := gse.Integer_Value( cursor, 2721 );
      end if;
      if not gse.Is_Null( cursor, 2722 )then
         a_frs1516.chcondc3 := gse.Integer_Value( cursor, 2722 );
      end if;
      if not gse.Is_Null( cursor, 2723 )then
         a_frs1516.chcondc4 := gse.Integer_Value( cursor, 2723 );
      end if;
      if not gse.Is_Null( cursor, 2724 )then
         a_frs1516.chcondc5 := gse.Integer_Value( cursor, 2724 );
      end if;
      if not gse.Is_Null( cursor, 2725 )then
         a_frs1516.chcondc6 := gse.Integer_Value( cursor, 2725 );
      end if;
      if not gse.Is_Null( cursor, 2726 )then
         a_frs1516.chcondc7 := gse.Integer_Value( cursor, 2726 );
      end if;
      if not gse.Is_Null( cursor, 2727 )then
         a_frs1516.chcondc8 := gse.Integer_Value( cursor, 2727 );
      end if;
      if not gse.Is_Null( cursor, 2728 )then
         a_frs1516.cdla1c1 := gse.Integer_Value( cursor, 2728 );
      end if;
      if not gse.Is_Null( cursor, 2729 )then
         a_frs1516.cdla1c2 := gse.Integer_Value( cursor, 2729 );
      end if;
      if not gse.Is_Null( cursor, 2730 )then
         a_frs1516.cdla1c3 := gse.Integer_Value( cursor, 2730 );
      end if;
      if not gse.Is_Null( cursor, 2731 )then
         a_frs1516.cdla1c4 := gse.Integer_Value( cursor, 2731 );
      end if;
      if not gse.Is_Null( cursor, 2732 )then
         a_frs1516.cdla1c5 := gse.Integer_Value( cursor, 2732 );
      end if;
      if not gse.Is_Null( cursor, 2733 )then
         a_frs1516.cdla1c6 := gse.Integer_Value( cursor, 2733 );
      end if;
      if not gse.Is_Null( cursor, 2734 )then
         a_frs1516.cdla1c7 := gse.Integer_Value( cursor, 2734 );
      end if;
      if not gse.Is_Null( cursor, 2735 )then
         a_frs1516.cdla1c8 := gse.Integer_Value( cursor, 2735 );
      end if;
      if not gse.Is_Null( cursor, 2736 )then
         a_frs1516.cdla2c1 := gse.Integer_Value( cursor, 2736 );
      end if;
      if not gse.Is_Null( cursor, 2737 )then
         a_frs1516.cdla2c2 := gse.Integer_Value( cursor, 2737 );
      end if;
      if not gse.Is_Null( cursor, 2738 )then
         a_frs1516.cdla2c3 := gse.Integer_Value( cursor, 2738 );
      end if;
      if not gse.Is_Null( cursor, 2739 )then
         a_frs1516.cdla2c4 := gse.Integer_Value( cursor, 2739 );
      end if;
      if not gse.Is_Null( cursor, 2740 )then
         a_frs1516.cdla2c5 := gse.Integer_Value( cursor, 2740 );
      end if;
      if not gse.Is_Null( cursor, 2741 )then
         a_frs1516.cdla2c6 := gse.Integer_Value( cursor, 2741 );
      end if;
      if not gse.Is_Null( cursor, 2742 )then
         a_frs1516.cdla2c7 := gse.Integer_Value( cursor, 2742 );
      end if;
      if not gse.Is_Null( cursor, 2743 )then
         a_frs1516.cdla2c8 := gse.Integer_Value( cursor, 2743 );
      end if;
      if not gse.Is_Null( cursor, 2744 )then
         a_frs1516.chelfc1 := gse.Integer_Value( cursor, 2744 );
      end if;
      if not gse.Is_Null( cursor, 2745 )then
         a_frs1516.chelfc2 := gse.Integer_Value( cursor, 2745 );
      end if;
      if not gse.Is_Null( cursor, 2746 )then
         a_frs1516.chelfc3 := gse.Integer_Value( cursor, 2746 );
      end if;
      if not gse.Is_Null( cursor, 2747 )then
         a_frs1516.chelfc4 := gse.Integer_Value( cursor, 2747 );
      end if;
      if not gse.Is_Null( cursor, 2748 )then
         a_frs1516.chelfc5 := gse.Integer_Value( cursor, 2748 );
      end if;
      if not gse.Is_Null( cursor, 2749 )then
         a_frs1516.chelfc6 := gse.Integer_Value( cursor, 2749 );
      end if;
      if not gse.Is_Null( cursor, 2750 )then
         a_frs1516.chelfc7 := gse.Integer_Value( cursor, 2750 );
      end if;
      if not gse.Is_Null( cursor, 2751 )then
         a_frs1516.chelfc8 := gse.Integer_Value( cursor, 2751 );
      end if;
      if not gse.Is_Null( cursor, 2752 )then
         a_frs1516.chernc1:= Amount'Value( gse.Value( cursor, 2752 ));
      end if;
      if not gse.Is_Null( cursor, 2753 )then
         a_frs1516.chernc2:= Amount'Value( gse.Value( cursor, 2753 ));
      end if;
      if not gse.Is_Null( cursor, 2754 )then
         a_frs1516.chernc3:= Amount'Value( gse.Value( cursor, 2754 ));
      end if;
      if not gse.Is_Null( cursor, 2755 )then
         a_frs1516.chernc4 := gse.Integer_Value( cursor, 2755 );
      end if;
      if not gse.Is_Null( cursor, 2756 )then
         a_frs1516.chernc5 := gse.Integer_Value( cursor, 2756 );
      end if;
      if not gse.Is_Null( cursor, 2757 )then
         a_frs1516.chernc6 := gse.Integer_Value( cursor, 2757 );
      end if;
      if not gse.Is_Null( cursor, 2758 )then
         a_frs1516.chernc7 := gse.Integer_Value( cursor, 2758 );
      end if;
      if not gse.Is_Null( cursor, 2759 )then
         a_frs1516.chernc8 := gse.Integer_Value( cursor, 2759 );
      end if;
      if not gse.Is_Null( cursor, 2760 )then
         a_frs1516.crns1c1 := gse.Integer_Value( cursor, 2760 );
      end if;
      if not gse.Is_Null( cursor, 2761 )then
         a_frs1516.crns1c2 := gse.Integer_Value( cursor, 2761 );
      end if;
      if not gse.Is_Null( cursor, 2762 )then
         a_frs1516.crns1c3 := gse.Integer_Value( cursor, 2762 );
      end if;
      if not gse.Is_Null( cursor, 2763 )then
         a_frs1516.crns1c4 := gse.Integer_Value( cursor, 2763 );
      end if;
      if not gse.Is_Null( cursor, 2764 )then
         a_frs1516.crns1c5 := gse.Integer_Value( cursor, 2764 );
      end if;
      if not gse.Is_Null( cursor, 2765 )then
         a_frs1516.crns1c6 := gse.Integer_Value( cursor, 2765 );
      end if;
      if not gse.Is_Null( cursor, 2766 )then
         a_frs1516.crns1c7 := gse.Integer_Value( cursor, 2766 );
      end if;
      if not gse.Is_Null( cursor, 2767 )then
         a_frs1516.crns1c8 := gse.Integer_Value( cursor, 2767 );
      end if;
      if not gse.Is_Null( cursor, 2768 )then
         a_frs1516.crns2c1 := gse.Integer_Value( cursor, 2768 );
      end if;
      if not gse.Is_Null( cursor, 2769 )then
         a_frs1516.crns2c2 := gse.Integer_Value( cursor, 2769 );
      end if;
      if not gse.Is_Null( cursor, 2770 )then
         a_frs1516.crns2c3 := gse.Integer_Value( cursor, 2770 );
      end if;
      if not gse.Is_Null( cursor, 2771 )then
         a_frs1516.crns2c4 := gse.Integer_Value( cursor, 2771 );
      end if;
      if not gse.Is_Null( cursor, 2772 )then
         a_frs1516.crns2c5 := gse.Integer_Value( cursor, 2772 );
      end if;
      if not gse.Is_Null( cursor, 2773 )then
         a_frs1516.crns2c6 := gse.Integer_Value( cursor, 2773 );
      end if;
      if not gse.Is_Null( cursor, 2774 )then
         a_frs1516.crns2c7 := gse.Integer_Value( cursor, 2774 );
      end if;
      if not gse.Is_Null( cursor, 2775 )then
         a_frs1516.crns2c8 := gse.Integer_Value( cursor, 2775 );
      end if;
      if not gse.Is_Null( cursor, 2776 )then
         a_frs1516.crns3c1 := gse.Integer_Value( cursor, 2776 );
      end if;
      if not gse.Is_Null( cursor, 2777 )then
         a_frs1516.crns3c2 := gse.Integer_Value( cursor, 2777 );
      end if;
      if not gse.Is_Null( cursor, 2778 )then
         a_frs1516.crns3c3 := gse.Integer_Value( cursor, 2778 );
      end if;
      if not gse.Is_Null( cursor, 2779 )then
         a_frs1516.crns3c4 := gse.Integer_Value( cursor, 2779 );
      end if;
      if not gse.Is_Null( cursor, 2780 )then
         a_frs1516.crns3c5 := gse.Integer_Value( cursor, 2780 );
      end if;
      if not gse.Is_Null( cursor, 2781 )then
         a_frs1516.crns3c6 := gse.Integer_Value( cursor, 2781 );
      end if;
      if not gse.Is_Null( cursor, 2782 )then
         a_frs1516.crns3c7 := gse.Integer_Value( cursor, 2782 );
      end if;
      if not gse.Is_Null( cursor, 2783 )then
         a_frs1516.crns3c8 := gse.Integer_Value( cursor, 2783 );
      end if;
      if not gse.Is_Null( cursor, 2784 )then
         a_frs1516.chemac1 := gse.Integer_Value( cursor, 2784 );
      end if;
      if not gse.Is_Null( cursor, 2785 )then
         a_frs1516.chemac2 := gse.Integer_Value( cursor, 2785 );
      end if;
      if not gse.Is_Null( cursor, 2786 )then
         a_frs1516.chemac3 := gse.Integer_Value( cursor, 2786 );
      end if;
      if not gse.Is_Null( cursor, 2787 )then
         a_frs1516.chemac4 := gse.Integer_Value( cursor, 2787 );
      end if;
      if not gse.Is_Null( cursor, 2788 )then
         a_frs1516.chemac5 := gse.Integer_Value( cursor, 2788 );
      end if;
      if not gse.Is_Null( cursor, 2789 )then
         a_frs1516.chemac6 := gse.Integer_Value( cursor, 2789 );
      end if;
      if not gse.Is_Null( cursor, 2790 )then
         a_frs1516.chemac7 := gse.Integer_Value( cursor, 2790 );
      end if;
      if not gse.Is_Null( cursor, 2791 )then
         a_frs1516.chemac8 := gse.Integer_Value( cursor, 2791 );
      end if;
      if not gse.Is_Null( cursor, 2792 )then
         a_frs1516.emamtc1:= Amount'Value( gse.Value( cursor, 2792 ));
      end if;
      if not gse.Is_Null( cursor, 2793 )then
         a_frs1516.emamtc2:= Amount'Value( gse.Value( cursor, 2793 ));
      end if;
      if not gse.Is_Null( cursor, 2794 )then
         a_frs1516.emamtc3 := gse.Integer_Value( cursor, 2794 );
      end if;
      if not gse.Is_Null( cursor, 2795 )then
         a_frs1516.emamtc4 := gse.Integer_Value( cursor, 2795 );
      end if;
      if not gse.Is_Null( cursor, 2796 )then
         a_frs1516.emamtc5 := gse.Integer_Value( cursor, 2796 );
      end if;
      if not gse.Is_Null( cursor, 2797 )then
         a_frs1516.emamtc6 := gse.Integer_Value( cursor, 2797 );
      end if;
      if not gse.Is_Null( cursor, 2798 )then
         a_frs1516.emamtc7 := gse.Integer_Value( cursor, 2798 );
      end if;
      if not gse.Is_Null( cursor, 2799 )then
         a_frs1516.emamtc8 := gse.Integer_Value( cursor, 2799 );
      end if;
      if not gse.Is_Null( cursor, 2800 )then
         a_frs1516.emapdc1 := gse.Integer_Value( cursor, 2800 );
      end if;
      if not gse.Is_Null( cursor, 2801 )then
         a_frs1516.emapdc2 := gse.Integer_Value( cursor, 2801 );
      end if;
      if not gse.Is_Null( cursor, 2802 )then
         a_frs1516.emapdc3 := gse.Integer_Value( cursor, 2802 );
      end if;
      if not gse.Is_Null( cursor, 2803 )then
         a_frs1516.emapdc4 := gse.Integer_Value( cursor, 2803 );
      end if;
      if not gse.Is_Null( cursor, 2804 )then
         a_frs1516.emapdc5 := gse.Integer_Value( cursor, 2804 );
      end if;
      if not gse.Is_Null( cursor, 2805 )then
         a_frs1516.emapdc6 := gse.Integer_Value( cursor, 2805 );
      end if;
      if not gse.Is_Null( cursor, 2806 )then
         a_frs1516.emapdc7 := gse.Integer_Value( cursor, 2806 );
      end if;
      if not gse.Is_Null( cursor, 2807 )then
         a_frs1516.emapdc8 := gse.Integer_Value( cursor, 2807 );
      end if;
      if not gse.Is_Null( cursor, 2808 )then
         a_frs1516.chidvc1:= Amount'Value( gse.Value( cursor, 2808 ));
      end if;
      if not gse.Is_Null( cursor, 2809 )then
         a_frs1516.chidvc2:= Amount'Value( gse.Value( cursor, 2809 ));
      end if;
      if not gse.Is_Null( cursor, 2810 )then
         a_frs1516.chidvc3:= Amount'Value( gse.Value( cursor, 2810 ));
      end if;
      if not gse.Is_Null( cursor, 2811 )then
         a_frs1516.chidvc4 := gse.Integer_Value( cursor, 2811 );
      end if;
      if not gse.Is_Null( cursor, 2812 )then
         a_frs1516.chidvc5 := gse.Integer_Value( cursor, 2812 );
      end if;
      if not gse.Is_Null( cursor, 2813 )then
         a_frs1516.chidvc6 := gse.Integer_Value( cursor, 2813 );
      end if;
      if not gse.Is_Null( cursor, 2814 )then
         a_frs1516.chidvc7 := gse.Integer_Value( cursor, 2814 );
      end if;
      if not gse.Is_Null( cursor, 2815 )then
         a_frs1516.chidvc8 := gse.Integer_Value( cursor, 2815 );
      end if;
      if not gse.Is_Null( cursor, 2816 )then
         a_frs1516.climitc1 := gse.Integer_Value( cursor, 2816 );
      end if;
      if not gse.Is_Null( cursor, 2817 )then
         a_frs1516.climitc2 := gse.Integer_Value( cursor, 2817 );
      end if;
      if not gse.Is_Null( cursor, 2818 )then
         a_frs1516.climitc3 := gse.Integer_Value( cursor, 2818 );
      end if;
      if not gse.Is_Null( cursor, 2819 )then
         a_frs1516.climitc4 := gse.Integer_Value( cursor, 2819 );
      end if;
      if not gse.Is_Null( cursor, 2820 )then
         a_frs1516.climitc5 := gse.Integer_Value( cursor, 2820 );
      end if;
      if not gse.Is_Null( cursor, 2821 )then
         a_frs1516.climitc6 := gse.Integer_Value( cursor, 2821 );
      end if;
      if not gse.Is_Null( cursor, 2822 )then
         a_frs1516.climitc7 := gse.Integer_Value( cursor, 2822 );
      end if;
      if not gse.Is_Null( cursor, 2823 )then
         a_frs1516.climitc8 := gse.Integer_Value( cursor, 2823 );
      end if;
      if not gse.Is_Null( cursor, 2824 )then
         a_frs1516.pearnc1 := gse.Integer_Value( cursor, 2824 );
      end if;
      if not gse.Is_Null( cursor, 2825 )then
         a_frs1516.pearnc2 := gse.Integer_Value( cursor, 2825 );
      end if;
      if not gse.Is_Null( cursor, 2826 )then
         a_frs1516.pearnc3 := gse.Integer_Value( cursor, 2826 );
      end if;
      if not gse.Is_Null( cursor, 2827 )then
         a_frs1516.pearnc4 := gse.Integer_Value( cursor, 2827 );
      end if;
      if not gse.Is_Null( cursor, 2828 )then
         a_frs1516.pearnc5 := gse.Integer_Value( cursor, 2828 );
      end if;
      if not gse.Is_Null( cursor, 2829 )then
         a_frs1516.pearnc6 := gse.Integer_Value( cursor, 2829 );
      end if;
      if not gse.Is_Null( cursor, 2830 )then
         a_frs1516.pearnc7 := gse.Integer_Value( cursor, 2830 );
      end if;
      if not gse.Is_Null( cursor, 2831 )then
         a_frs1516.pearnc8 := gse.Integer_Value( cursor, 2831 );
      end if;
      if not gse.Is_Null( cursor, 2832 )then
         a_frs1516.ptrusc1 := gse.Integer_Value( cursor, 2832 );
      end if;
      if not gse.Is_Null( cursor, 2833 )then
         a_frs1516.ptrusc2 := gse.Integer_Value( cursor, 2833 );
      end if;
      if not gse.Is_Null( cursor, 2834 )then
         a_frs1516.ptrusc3 := gse.Integer_Value( cursor, 2834 );
      end if;
      if not gse.Is_Null( cursor, 2835 )then
         a_frs1516.ptrusc4 := gse.Integer_Value( cursor, 2835 );
      end if;
      if not gse.Is_Null( cursor, 2836 )then
         a_frs1516.ptrusc5 := gse.Integer_Value( cursor, 2836 );
      end if;
      if not gse.Is_Null( cursor, 2837 )then
         a_frs1516.ptrusc6 := gse.Integer_Value( cursor, 2837 );
      end if;
      if not gse.Is_Null( cursor, 2838 )then
         a_frs1516.ptrusc7 := gse.Integer_Value( cursor, 2838 );
      end if;
      if not gse.Is_Null( cursor, 2839 )then
         a_frs1516.ptrusc8 := gse.Integer_Value( cursor, 2839 );
      end if;
      if not gse.Is_Null( cursor, 2840 )then
         a_frs1516.chrinc1:= Amount'Value( gse.Value( cursor, 2840 ));
      end if;
      if not gse.Is_Null( cursor, 2841 )then
         a_frs1516.chrinc2:= Amount'Value( gse.Value( cursor, 2841 ));
      end if;
      if not gse.Is_Null( cursor, 2842 )then
         a_frs1516.chrinc3:= Amount'Value( gse.Value( cursor, 2842 ));
      end if;
      if not gse.Is_Null( cursor, 2843 )then
         a_frs1516.chrinc4 := gse.Integer_Value( cursor, 2843 );
      end if;
      if not gse.Is_Null( cursor, 2844 )then
         a_frs1516.chrinc5 := gse.Integer_Value( cursor, 2844 );
      end if;
      if not gse.Is_Null( cursor, 2845 )then
         a_frs1516.chrinc6 := gse.Integer_Value( cursor, 2845 );
      end if;
      if not gse.Is_Null( cursor, 2846 )then
         a_frs1516.chrinc7 := gse.Integer_Value( cursor, 2846 );
      end if;
      if not gse.Is_Null( cursor, 2847 )then
         a_frs1516.chrinc8 := gse.Integer_Value( cursor, 2847 );
      end if;
      if not gse.Is_Null( cursor, 2848 )then
         a_frs1516.csavec1 := gse.Integer_Value( cursor, 2848 );
      end if;
      if not gse.Is_Null( cursor, 2849 )then
         a_frs1516.csavec2 := gse.Integer_Value( cursor, 2849 );
      end if;
      if not gse.Is_Null( cursor, 2850 )then
         a_frs1516.csavec3 := gse.Integer_Value( cursor, 2850 );
      end if;
      if not gse.Is_Null( cursor, 2851 )then
         a_frs1516.csavec4 := gse.Integer_Value( cursor, 2851 );
      end if;
      if not gse.Is_Null( cursor, 2852 )then
         a_frs1516.csavec5 := gse.Integer_Value( cursor, 2852 );
      end if;
      if not gse.Is_Null( cursor, 2853 )then
         a_frs1516.csavec6 := gse.Integer_Value( cursor, 2853 );
      end if;
      if not gse.Is_Null( cursor, 2854 )then
         a_frs1516.csavec7 := gse.Integer_Value( cursor, 2854 );
      end if;
      if not gse.Is_Null( cursor, 2855 )then
         a_frs1516.csavec8 := gse.Integer_Value( cursor, 2855 );
      end if;
      if not gse.Is_Null( cursor, 2856 )then
         a_frs1516.tramtc1:= Amount'Value( gse.Value( cursor, 2856 ));
      end if;
      if not gse.Is_Null( cursor, 2857 )then
         a_frs1516.tramtc2:= Amount'Value( gse.Value( cursor, 2857 ));
      end if;
      if not gse.Is_Null( cursor, 2858 )then
         a_frs1516.tramtc3 := gse.Integer_Value( cursor, 2858 );
      end if;
      if not gse.Is_Null( cursor, 2859 )then
         a_frs1516.tramtc4 := gse.Integer_Value( cursor, 2859 );
      end if;
      if not gse.Is_Null( cursor, 2860 )then
         a_frs1516.tramtc5 := gse.Integer_Value( cursor, 2860 );
      end if;
      if not gse.Is_Null( cursor, 2861 )then
         a_frs1516.tramtc6 := gse.Integer_Value( cursor, 2861 );
      end if;
      if not gse.Is_Null( cursor, 2862 )then
         a_frs1516.tramtc7 := gse.Integer_Value( cursor, 2862 );
      end if;
      if not gse.Is_Null( cursor, 2863 )then
         a_frs1516.tramtc8 := gse.Integer_Value( cursor, 2863 );
      end if;
      if not gse.Is_Null( cursor, 2864 )then
         a_frs1516.trnpdc1 := gse.Integer_Value( cursor, 2864 );
      end if;
      if not gse.Is_Null( cursor, 2865 )then
         a_frs1516.trnpdc2 := gse.Integer_Value( cursor, 2865 );
      end if;
      if not gse.Is_Null( cursor, 2866 )then
         a_frs1516.trnpdc3 := gse.Integer_Value( cursor, 2866 );
      end if;
      if not gse.Is_Null( cursor, 2867 )then
         a_frs1516.trnpdc4 := gse.Integer_Value( cursor, 2867 );
      end if;
      if not gse.Is_Null( cursor, 2868 )then
         a_frs1516.trnpdc5 := gse.Integer_Value( cursor, 2868 );
      end if;
      if not gse.Is_Null( cursor, 2869 )then
         a_frs1516.trnpdc6 := gse.Integer_Value( cursor, 2869 );
      end if;
      if not gse.Is_Null( cursor, 2870 )then
         a_frs1516.trnpdc7 := gse.Integer_Value( cursor, 2870 );
      end if;
      if not gse.Is_Null( cursor, 2871 )then
         a_frs1516.trnpdc8 := gse.Integer_Value( cursor, 2871 );
      end if;
      if not gse.Is_Null( cursor, 2872 )then
         a_frs1516.cohabc1 := gse.Integer_Value( cursor, 2872 );
      end if;
      if not gse.Is_Null( cursor, 2873 )then
         a_frs1516.cohabc2 := gse.Integer_Value( cursor, 2873 );
      end if;
      if not gse.Is_Null( cursor, 2874 )then
         a_frs1516.cohabc3 := gse.Integer_Value( cursor, 2874 );
      end if;
      if not gse.Is_Null( cursor, 2875 )then
         a_frs1516.cohabc4 := gse.Integer_Value( cursor, 2875 );
      end if;
      if not gse.Is_Null( cursor, 2876 )then
         a_frs1516.cohabc5 := gse.Integer_Value( cursor, 2876 );
      end if;
      if not gse.Is_Null( cursor, 2877 )then
         a_frs1516.cohabc6 := gse.Integer_Value( cursor, 2877 );
      end if;
      if not gse.Is_Null( cursor, 2878 )then
         a_frs1516.cohabc7 := gse.Integer_Value( cursor, 2878 );
      end if;
      if not gse.Is_Null( cursor, 2879 )then
         a_frs1516.cohabc8 := gse.Integer_Value( cursor, 2879 );
      end if;
      if not gse.Is_Null( cursor, 2880 )then
         a_frs1516.curqulc1 := gse.Integer_Value( cursor, 2880 );
      end if;
      if not gse.Is_Null( cursor, 2881 )then
         a_frs1516.curqulc2 := gse.Integer_Value( cursor, 2881 );
      end if;
      if not gse.Is_Null( cursor, 2882 )then
         a_frs1516.curqulc3 := gse.Integer_Value( cursor, 2882 );
      end if;
      if not gse.Is_Null( cursor, 2883 )then
         a_frs1516.curqulc4 := gse.Integer_Value( cursor, 2883 );
      end if;
      if not gse.Is_Null( cursor, 2884 )then
         a_frs1516.curqulc5 := gse.Integer_Value( cursor, 2884 );
      end if;
      if not gse.Is_Null( cursor, 2885 )then
         a_frs1516.curqulc6 := gse.Integer_Value( cursor, 2885 );
      end if;
      if not gse.Is_Null( cursor, 2886 )then
         a_frs1516.curqulc7 := gse.Integer_Value( cursor, 2886 );
      end if;
      if not gse.Is_Null( cursor, 2887 )then
         a_frs1516.curqulc8 := gse.Integer_Value( cursor, 2887 );
      end if;
      if not gse.Is_Null( cursor, 2888 )then
         a_frs1516.disacc1 := gse.Integer_Value( cursor, 2888 );
      end if;
      if not gse.Is_Null( cursor, 2889 )then
         a_frs1516.disacc2 := gse.Integer_Value( cursor, 2889 );
      end if;
      if not gse.Is_Null( cursor, 2890 )then
         a_frs1516.disacc3 := gse.Integer_Value( cursor, 2890 );
      end if;
      if not gse.Is_Null( cursor, 2891 )then
         a_frs1516.disacc4 := gse.Integer_Value( cursor, 2891 );
      end if;
      if not gse.Is_Null( cursor, 2892 )then
         a_frs1516.disacc5 := gse.Integer_Value( cursor, 2892 );
      end if;
      if not gse.Is_Null( cursor, 2893 )then
         a_frs1516.disacc6 := gse.Integer_Value( cursor, 2893 );
      end if;
      if not gse.Is_Null( cursor, 2894 )then
         a_frs1516.disacc7 := gse.Integer_Value( cursor, 2894 );
      end if;
      if not gse.Is_Null( cursor, 2895 )then
         a_frs1516.disacc8 := gse.Integer_Value( cursor, 2895 );
      end if;
      if not gse.Is_Null( cursor, 2896 )then
         a_frs1516.discoc1 := gse.Integer_Value( cursor, 2896 );
      end if;
      if not gse.Is_Null( cursor, 2897 )then
         a_frs1516.discoc2 := gse.Integer_Value( cursor, 2897 );
      end if;
      if not gse.Is_Null( cursor, 2898 )then
         a_frs1516.discoc3 := gse.Integer_Value( cursor, 2898 );
      end if;
      if not gse.Is_Null( cursor, 2899 )then
         a_frs1516.discoc4 := gse.Integer_Value( cursor, 2899 );
      end if;
      if not gse.Is_Null( cursor, 2900 )then
         a_frs1516.discoc5 := gse.Integer_Value( cursor, 2900 );
      end if;
      if not gse.Is_Null( cursor, 2901 )then
         a_frs1516.discoc6 := gse.Integer_Value( cursor, 2901 );
      end if;
      if not gse.Is_Null( cursor, 2902 )then
         a_frs1516.discoc7 := gse.Integer_Value( cursor, 2902 );
      end if;
      if not gse.Is_Null( cursor, 2903 )then
         a_frs1516.discoc8 := gse.Integer_Value( cursor, 2903 );
      end if;
      if not gse.Is_Null( cursor, 2904 )then
         a_frs1516.dobc1 := gse.Integer_Value( cursor, 2904 );
      end if;
      if not gse.Is_Null( cursor, 2905 )then
         a_frs1516.dobc2 := gse.Integer_Value( cursor, 2905 );
      end if;
      if not gse.Is_Null( cursor, 2906 )then
         a_frs1516.dobc3 := gse.Integer_Value( cursor, 2906 );
      end if;
      if not gse.Is_Null( cursor, 2907 )then
         a_frs1516.dobc4 := gse.Integer_Value( cursor, 2907 );
      end if;
      if not gse.Is_Null( cursor, 2908 )then
         a_frs1516.dobc5 := gse.Integer_Value( cursor, 2908 );
      end if;
      if not gse.Is_Null( cursor, 2909 )then
         a_frs1516.dobc6 := gse.Integer_Value( cursor, 2909 );
      end if;
      if not gse.Is_Null( cursor, 2910 )then
         a_frs1516.dobc7 := gse.Integer_Value( cursor, 2910 );
      end if;
      if not gse.Is_Null( cursor, 2911 )then
         a_frs1516.dobc8 := gse.Integer_Value( cursor, 2911 );
      end if;
      if not gse.Is_Null( cursor, 2912 )then
         a_frs1516.dvmarc1 := gse.Integer_Value( cursor, 2912 );
      end if;
      if not gse.Is_Null( cursor, 2913 )then
         a_frs1516.dvmarc2 := gse.Integer_Value( cursor, 2913 );
      end if;
      if not gse.Is_Null( cursor, 2914 )then
         a_frs1516.dvmarc3 := gse.Integer_Value( cursor, 2914 );
      end if;
      if not gse.Is_Null( cursor, 2915 )then
         a_frs1516.dvmarc4 := gse.Integer_Value( cursor, 2915 );
      end if;
      if not gse.Is_Null( cursor, 2916 )then
         a_frs1516.dvmarc5 := gse.Integer_Value( cursor, 2916 );
      end if;
      if not gse.Is_Null( cursor, 2917 )then
         a_frs1516.dvmarc6 := gse.Integer_Value( cursor, 2917 );
      end if;
      if not gse.Is_Null( cursor, 2918 )then
         a_frs1516.dvmarc7 := gse.Integer_Value( cursor, 2918 );
      end if;
      if not gse.Is_Null( cursor, 2919 )then
         a_frs1516.dvmarc8 := gse.Integer_Value( cursor, 2919 );
      end if;
      if not gse.Is_Null( cursor, 2920 )then
         a_frs1516.fsvvlc1:= Amount'Value( gse.Value( cursor, 2920 ));
      end if;
      if not gse.Is_Null( cursor, 2921 )then
         a_frs1516.fsvvlc2:= Amount'Value( gse.Value( cursor, 2921 ));
      end if;
      if not gse.Is_Null( cursor, 2922 )then
         a_frs1516.fsvvlc3:= Amount'Value( gse.Value( cursor, 2922 ));
      end if;
      if not gse.Is_Null( cursor, 2923 )then
         a_frs1516.fsvvlc4:= Amount'Value( gse.Value( cursor, 2923 ));
      end if;
      if not gse.Is_Null( cursor, 2924 )then
         a_frs1516.fsvvlc5:= Amount'Value( gse.Value( cursor, 2924 ));
      end if;
      if not gse.Is_Null( cursor, 2925 )then
         a_frs1516.fsvvlc6:= Amount'Value( gse.Value( cursor, 2925 ));
      end if;
      if not gse.Is_Null( cursor, 2926 )then
         a_frs1516.fsvvlc7 := gse.Integer_Value( cursor, 2926 );
      end if;
      if not gse.Is_Null( cursor, 2927 )then
         a_frs1516.fsvvlc8 := gse.Integer_Value( cursor, 2927 );
      end if;
      if not gse.Is_Null( cursor, 2928 )then
         a_frs1516.fsmkvc1:= Amount'Value( gse.Value( cursor, 2928 ));
      end if;
      if not gse.Is_Null( cursor, 2929 )then
         a_frs1516.fsmkvc2:= Amount'Value( gse.Value( cursor, 2929 ));
      end if;
      if not gse.Is_Null( cursor, 2930 )then
         a_frs1516.fsmkvc3:= Amount'Value( gse.Value( cursor, 2930 ));
      end if;
      if not gse.Is_Null( cursor, 2931 )then
         a_frs1516.fsmkvc4:= Amount'Value( gse.Value( cursor, 2931 ));
      end if;
      if not gse.Is_Null( cursor, 2932 )then
         a_frs1516.fsmkvc5:= Amount'Value( gse.Value( cursor, 2932 ));
      end if;
      if not gse.Is_Null( cursor, 2933 )then
         a_frs1516.fsmkvc6 := gse.Integer_Value( cursor, 2933 );
      end if;
      if not gse.Is_Null( cursor, 2934 )then
         a_frs1516.fsmkvc7 := gse.Integer_Value( cursor, 2934 );
      end if;
      if not gse.Is_Null( cursor, 2935 )then
         a_frs1516.fsmkvc8 := gse.Integer_Value( cursor, 2935 );
      end if;
      if not gse.Is_Null( cursor, 2936 )then
         a_frs1516.fsmlvc1:= Amount'Value( gse.Value( cursor, 2936 ));
      end if;
      if not gse.Is_Null( cursor, 2937 )then
         a_frs1516.fsmlvc2:= Amount'Value( gse.Value( cursor, 2937 ));
      end if;
      if not gse.Is_Null( cursor, 2938 )then
         a_frs1516.fsmlvc3:= Amount'Value( gse.Value( cursor, 2938 ));
      end if;
      if not gse.Is_Null( cursor, 2939 )then
         a_frs1516.fsmlvc4:= Amount'Value( gse.Value( cursor, 2939 ));
      end if;
      if not gse.Is_Null( cursor, 2940 )then
         a_frs1516.fsmlvc5:= Amount'Value( gse.Value( cursor, 2940 ));
      end if;
      if not gse.Is_Null( cursor, 2941 )then
         a_frs1516.fsmlvc6:= Amount'Value( gse.Value( cursor, 2941 ));
      end if;
      if not gse.Is_Null( cursor, 2942 )then
         a_frs1516.fsmlvc7 := gse.Integer_Value( cursor, 2942 );
      end if;
      if not gse.Is_Null( cursor, 2943 )then
         a_frs1516.fsmlvc8 := gse.Integer_Value( cursor, 2943 );
      end if;
      if not gse.Is_Null( cursor, 2944 )then
         a_frs1516.ftedc1 := gse.Integer_Value( cursor, 2944 );
      end if;
      if not gse.Is_Null( cursor, 2945 )then
         a_frs1516.ftedc2 := gse.Integer_Value( cursor, 2945 );
      end if;
      if not gse.Is_Null( cursor, 2946 )then
         a_frs1516.ftedc3 := gse.Integer_Value( cursor, 2946 );
      end if;
      if not gse.Is_Null( cursor, 2947 )then
         a_frs1516.ftedc4 := gse.Integer_Value( cursor, 2947 );
      end if;
      if not gse.Is_Null( cursor, 2948 )then
         a_frs1516.ftedc5 := gse.Integer_Value( cursor, 2948 );
      end if;
      if not gse.Is_Null( cursor, 2949 )then
         a_frs1516.ftedc6 := gse.Integer_Value( cursor, 2949 );
      end if;
      if not gse.Is_Null( cursor, 2950 )then
         a_frs1516.ftedc7 := gse.Integer_Value( cursor, 2950 );
      end if;
      if not gse.Is_Null( cursor, 2951 )then
         a_frs1516.ftedc8 := gse.Integer_Value( cursor, 2951 );
      end if;
      if not gse.Is_Null( cursor, 2952 )then
         a_frs1516.g1valc1 := gse.Integer_Value( cursor, 2952 );
      end if;
      if not gse.Is_Null( cursor, 2953 )then
         a_frs1516.g1valc2 := gse.Integer_Value( cursor, 2953 );
      end if;
      if not gse.Is_Null( cursor, 2954 )then
         a_frs1516.g1valc3 := gse.Integer_Value( cursor, 2954 );
      end if;
      if not gse.Is_Null( cursor, 2955 )then
         a_frs1516.g1valc4 := gse.Integer_Value( cursor, 2955 );
      end if;
      if not gse.Is_Null( cursor, 2956 )then
         a_frs1516.g1valc5 := gse.Integer_Value( cursor, 2956 );
      end if;
      if not gse.Is_Null( cursor, 2957 )then
         a_frs1516.g1valc6 := gse.Integer_Value( cursor, 2957 );
      end if;
      if not gse.Is_Null( cursor, 2958 )then
         a_frs1516.g1valc7 := gse.Integer_Value( cursor, 2958 );
      end if;
      if not gse.Is_Null( cursor, 2959 )then
         a_frs1516.g1valc8 := gse.Integer_Value( cursor, 2959 );
      end if;
      if not gse.Is_Null( cursor, 2960 )then
         a_frs1516.g2valc1 := gse.Integer_Value( cursor, 2960 );
      end if;
      if not gse.Is_Null( cursor, 2961 )then
         a_frs1516.g2valc2 := gse.Integer_Value( cursor, 2961 );
      end if;
      if not gse.Is_Null( cursor, 2962 )then
         a_frs1516.g2valc3 := gse.Integer_Value( cursor, 2962 );
      end if;
      if not gse.Is_Null( cursor, 2963 )then
         a_frs1516.g2valc4 := gse.Integer_Value( cursor, 2963 );
      end if;
      if not gse.Is_Null( cursor, 2964 )then
         a_frs1516.g2valc5 := gse.Integer_Value( cursor, 2964 );
      end if;
      if not gse.Is_Null( cursor, 2965 )then
         a_frs1516.g2valc6 := gse.Integer_Value( cursor, 2965 );
      end if;
      if not gse.Is_Null( cursor, 2966 )then
         a_frs1516.g2valc7 := gse.Integer_Value( cursor, 2966 );
      end if;
      if not gse.Is_Null( cursor, 2967 )then
         a_frs1516.g2valc8 := gse.Integer_Value( cursor, 2967 );
      end if;
      if not gse.Is_Null( cursor, 2968 )then
         a_frs1516.g1dirc1 := gse.Integer_Value( cursor, 2968 );
      end if;
      if not gse.Is_Null( cursor, 2969 )then
         a_frs1516.g1dirc2 := gse.Integer_Value( cursor, 2969 );
      end if;
      if not gse.Is_Null( cursor, 2970 )then
         a_frs1516.g1dirc3 := gse.Integer_Value( cursor, 2970 );
      end if;
      if not gse.Is_Null( cursor, 2971 )then
         a_frs1516.g1dirc4 := gse.Integer_Value( cursor, 2971 );
      end if;
      if not gse.Is_Null( cursor, 2972 )then
         a_frs1516.g1dirc5 := gse.Integer_Value( cursor, 2972 );
      end if;
      if not gse.Is_Null( cursor, 2973 )then
         a_frs1516.g1dirc6 := gse.Integer_Value( cursor, 2973 );
      end if;
      if not gse.Is_Null( cursor, 2974 )then
         a_frs1516.g1dirc7 := gse.Integer_Value( cursor, 2974 );
      end if;
      if not gse.Is_Null( cursor, 2975 )then
         a_frs1516.g1dirc8 := gse.Integer_Value( cursor, 2975 );
      end if;
      if not gse.Is_Null( cursor, 2976 )then
         a_frs1516.g2dirc1 := gse.Integer_Value( cursor, 2976 );
      end if;
      if not gse.Is_Null( cursor, 2977 )then
         a_frs1516.g2dirc2 := gse.Integer_Value( cursor, 2977 );
      end if;
      if not gse.Is_Null( cursor, 2978 )then
         a_frs1516.g2dirc3 := gse.Integer_Value( cursor, 2978 );
      end if;
      if not gse.Is_Null( cursor, 2979 )then
         a_frs1516.g2dirc4 := gse.Integer_Value( cursor, 2979 );
      end if;
      if not gse.Is_Null( cursor, 2980 )then
         a_frs1516.g2dirc5 := gse.Integer_Value( cursor, 2980 );
      end if;
      if not gse.Is_Null( cursor, 2981 )then
         a_frs1516.g2dirc6 := gse.Integer_Value( cursor, 2981 );
      end if;
      if not gse.Is_Null( cursor, 2982 )then
         a_frs1516.g2dirc7 := gse.Integer_Value( cursor, 2982 );
      end if;
      if not gse.Is_Null( cursor, 2983 )then
         a_frs1516.g2dirc8 := gse.Integer_Value( cursor, 2983 );
      end if;
      if not gse.Is_Null( cursor, 2984 )then
         a_frs1516.gtnumc1 := gse.Integer_Value( cursor, 2984 );
      end if;
      if not gse.Is_Null( cursor, 2985 )then
         a_frs1516.gtnumc2 := gse.Integer_Value( cursor, 2985 );
      end if;
      if not gse.Is_Null( cursor, 2986 )then
         a_frs1516.gtnumc3 := gse.Integer_Value( cursor, 2986 );
      end if;
      if not gse.Is_Null( cursor, 2987 )then
         a_frs1516.gtnumc4 := gse.Integer_Value( cursor, 2987 );
      end if;
      if not gse.Is_Null( cursor, 2988 )then
         a_frs1516.gtnumc5 := gse.Integer_Value( cursor, 2988 );
      end if;
      if not gse.Is_Null( cursor, 2989 )then
         a_frs1516.gtnumc6 := gse.Integer_Value( cursor, 2989 );
      end if;
      if not gse.Is_Null( cursor, 2990 )then
         a_frs1516.gtnumc7 := gse.Integer_Value( cursor, 2990 );
      end if;
      if not gse.Is_Null( cursor, 2991 )then
         a_frs1516.gtnumc8 := gse.Integer_Value( cursor, 2991 );
      end if;
      if not gse.Is_Null( cursor, 2992 )then
         a_frs1516.gt1scc1 := gse.Integer_Value( cursor, 2992 );
      end if;
      if not gse.Is_Null( cursor, 2993 )then
         a_frs1516.gt1scc2 := gse.Integer_Value( cursor, 2993 );
      end if;
      if not gse.Is_Null( cursor, 2994 )then
         a_frs1516.gt1scc3 := gse.Integer_Value( cursor, 2994 );
      end if;
      if not gse.Is_Null( cursor, 2995 )then
         a_frs1516.gt1scc4 := gse.Integer_Value( cursor, 2995 );
      end if;
      if not gse.Is_Null( cursor, 2996 )then
         a_frs1516.gt1scc5 := gse.Integer_Value( cursor, 2996 );
      end if;
      if not gse.Is_Null( cursor, 2997 )then
         a_frs1516.gt1scc6 := gse.Integer_Value( cursor, 2997 );
      end if;
      if not gse.Is_Null( cursor, 2998 )then
         a_frs1516.gt1scc7 := gse.Integer_Value( cursor, 2998 );
      end if;
      if not gse.Is_Null( cursor, 2999 )then
         a_frs1516.gt1scc8 := gse.Integer_Value( cursor, 2999 );
      end if;
      if not gse.Is_Null( cursor, 3000 )then
         a_frs1516.gt2scc1 := gse.Integer_Value( cursor, 3000 );
      end if;
      if not gse.Is_Null( cursor, 3001 )then
         a_frs1516.gt2scc2 := gse.Integer_Value( cursor, 3001 );
      end if;
      if not gse.Is_Null( cursor, 3002 )then
         a_frs1516.gt2scc3 := gse.Integer_Value( cursor, 3002 );
      end if;
      if not gse.Is_Null( cursor, 3003 )then
         a_frs1516.gt2scc4 := gse.Integer_Value( cursor, 3003 );
      end if;
      if not gse.Is_Null( cursor, 3004 )then
         a_frs1516.gt2scc5 := gse.Integer_Value( cursor, 3004 );
      end if;
      if not gse.Is_Null( cursor, 3005 )then
         a_frs1516.gt2scc6 := gse.Integer_Value( cursor, 3005 );
      end if;
      if not gse.Is_Null( cursor, 3006 )then
         a_frs1516.gt2scc7 := gse.Integer_Value( cursor, 3006 );
      end if;
      if not gse.Is_Null( cursor, 3007 )then
         a_frs1516.gt2scc8 := gse.Integer_Value( cursor, 3007 );
      end if;
      if not gse.Is_Null( cursor, 3008 )then
         a_frs1516.gt10sc1:= Amount'Value( gse.Value( cursor, 3008 ));
      end if;
      if not gse.Is_Null( cursor, 3009 )then
         a_frs1516.gt10sc2 := gse.Integer_Value( cursor, 3009 );
      end if;
      if not gse.Is_Null( cursor, 3010 )then
         a_frs1516.gt10sc3 := gse.Integer_Value( cursor, 3010 );
      end if;
      if not gse.Is_Null( cursor, 3011 )then
         a_frs1516.gt10sc4 := gse.Integer_Value( cursor, 3011 );
      end if;
      if not gse.Is_Null( cursor, 3012 )then
         a_frs1516.gt10sc5 := gse.Integer_Value( cursor, 3012 );
      end if;
      if not gse.Is_Null( cursor, 3013 )then
         a_frs1516.gt10sc6 := gse.Integer_Value( cursor, 3013 );
      end if;
      if not gse.Is_Null( cursor, 3014 )then
         a_frs1516.gt10sc7 := gse.Integer_Value( cursor, 3014 );
      end if;
      if not gse.Is_Null( cursor, 3015 )then
         a_frs1516.gt10sc8 := gse.Integer_Value( cursor, 3015 );
      end if;
      if not gse.Is_Null( cursor, 3016 )then
         a_frs1516.gt20sc1 := gse.Integer_Value( cursor, 3016 );
      end if;
      if not gse.Is_Null( cursor, 3017 )then
         a_frs1516.gt20sc2 := gse.Integer_Value( cursor, 3017 );
      end if;
      if not gse.Is_Null( cursor, 3018 )then
         a_frs1516.gt20sc3 := gse.Integer_Value( cursor, 3018 );
      end if;
      if not gse.Is_Null( cursor, 3019 )then
         a_frs1516.gt20sc4 := gse.Integer_Value( cursor, 3019 );
      end if;
      if not gse.Is_Null( cursor, 3020 )then
         a_frs1516.gt20sc5 := gse.Integer_Value( cursor, 3020 );
      end if;
      if not gse.Is_Null( cursor, 3021 )then
         a_frs1516.gt20sc6 := gse.Integer_Value( cursor, 3021 );
      end if;
      if not gse.Is_Null( cursor, 3022 )then
         a_frs1516.gt20sc7 := gse.Integer_Value( cursor, 3022 );
      end if;
      if not gse.Is_Null( cursor, 3023 )then
         a_frs1516.gt20sc8 := gse.Integer_Value( cursor, 3023 );
      end if;
      if not gse.Is_Null( cursor, 3024 )then
         a_frs1516.hartvc1 := gse.Integer_Value( cursor, 3024 );
      end if;
      if not gse.Is_Null( cursor, 3025 )then
         a_frs1516.hartvc2 := gse.Integer_Value( cursor, 3025 );
      end if;
      if not gse.Is_Null( cursor, 3026 )then
         a_frs1516.hartvc3 := gse.Integer_Value( cursor, 3026 );
      end if;
      if not gse.Is_Null( cursor, 3027 )then
         a_frs1516.hartvc4 := gse.Integer_Value( cursor, 3027 );
      end if;
      if not gse.Is_Null( cursor, 3028 )then
         a_frs1516.hartvc5 := gse.Integer_Value( cursor, 3028 );
      end if;
      if not gse.Is_Null( cursor, 3029 )then
         a_frs1516.hartvc6 := gse.Integer_Value( cursor, 3029 );
      end if;
      if not gse.Is_Null( cursor, 3030 )then
         a_frs1516.hartvc7 := gse.Integer_Value( cursor, 3030 );
      end if;
      if not gse.Is_Null( cursor, 3031 )then
         a_frs1516.hartvc8 := gse.Integer_Value( cursor, 3031 );
      end if;
      if not gse.Is_Null( cursor, 3032 )then
         a_frs1516.heatchc1 := gse.Integer_Value( cursor, 3032 );
      end if;
      if not gse.Is_Null( cursor, 3033 )then
         a_frs1516.heatchc2 := gse.Integer_Value( cursor, 3033 );
      end if;
      if not gse.Is_Null( cursor, 3034 )then
         a_frs1516.heatchc3 := gse.Integer_Value( cursor, 3034 );
      end if;
      if not gse.Is_Null( cursor, 3035 )then
         a_frs1516.heatchc4 := gse.Integer_Value( cursor, 3035 );
      end if;
      if not gse.Is_Null( cursor, 3036 )then
         a_frs1516.heatchc5 := gse.Integer_Value( cursor, 3036 );
      end if;
      if not gse.Is_Null( cursor, 3037 )then
         a_frs1516.heatchc6 := gse.Integer_Value( cursor, 3037 );
      end if;
      if not gse.Is_Null( cursor, 3038 )then
         a_frs1516.heatchc7 := gse.Integer_Value( cursor, 3038 );
      end if;
      if not gse.Is_Null( cursor, 3039 )then
         a_frs1516.heatchc8 := gse.Integer_Value( cursor, 3039 );
      end if;
      if not gse.Is_Null( cursor, 3040 )then
         a_frs1516.hhldrc1 := gse.Integer_Value( cursor, 3040 );
      end if;
      if not gse.Is_Null( cursor, 3041 )then
         a_frs1516.hhldrc2 := gse.Integer_Value( cursor, 3041 );
      end if;
      if not gse.Is_Null( cursor, 3042 )then
         a_frs1516.hhldrc3 := gse.Integer_Value( cursor, 3042 );
      end if;
      if not gse.Is_Null( cursor, 3043 )then
         a_frs1516.hhldrc4 := gse.Integer_Value( cursor, 3043 );
      end if;
      if not gse.Is_Null( cursor, 3044 )then
         a_frs1516.hhldrc5 := gse.Integer_Value( cursor, 3044 );
      end if;
      if not gse.Is_Null( cursor, 3045 )then
         a_frs1516.hhldrc6 := gse.Integer_Value( cursor, 3045 );
      end if;
      if not gse.Is_Null( cursor, 3046 )then
         a_frs1516.hhldrc7 := gse.Integer_Value( cursor, 3046 );
      end if;
      if not gse.Is_Null( cursor, 3047 )then
         a_frs1516.hhldrc8 := gse.Integer_Value( cursor, 3047 );
      end if;
      if not gse.Is_Null( cursor, 3048 )then
         a_frs1516.hurabc1 := gse.Integer_Value( cursor, 3048 );
      end if;
      if not gse.Is_Null( cursor, 3049 )then
         a_frs1516.hurabc2 := gse.Integer_Value( cursor, 3049 );
      end if;
      if not gse.Is_Null( cursor, 3050 )then
         a_frs1516.hurabc3 := gse.Integer_Value( cursor, 3050 );
      end if;
      if not gse.Is_Null( cursor, 3051 )then
         a_frs1516.hurabc4 := gse.Integer_Value( cursor, 3051 );
      end if;
      if not gse.Is_Null( cursor, 3052 )then
         a_frs1516.hurabc5 := gse.Integer_Value( cursor, 3052 );
      end if;
      if not gse.Is_Null( cursor, 3053 )then
         a_frs1516.hurabc6 := gse.Integer_Value( cursor, 3053 );
      end if;
      if not gse.Is_Null( cursor, 3054 )then
         a_frs1516.hurabc7 := gse.Integer_Value( cursor, 3054 );
      end if;
      if not gse.Is_Null( cursor, 3055 )then
         a_frs1516.hurabc8 := gse.Integer_Value( cursor, 3055 );
      end if;
      if not gse.Is_Null( cursor, 3056 )then
         a_frs1516.hurahc1 := gse.Integer_Value( cursor, 3056 );
      end if;
      if not gse.Is_Null( cursor, 3057 )then
         a_frs1516.hurahc2 := gse.Integer_Value( cursor, 3057 );
      end if;
      if not gse.Is_Null( cursor, 3058 )then
         a_frs1516.hurahc3 := gse.Integer_Value( cursor, 3058 );
      end if;
      if not gse.Is_Null( cursor, 3059 )then
         a_frs1516.hurahc4 := gse.Integer_Value( cursor, 3059 );
      end if;
      if not gse.Is_Null( cursor, 3060 )then
         a_frs1516.hurahc5 := gse.Integer_Value( cursor, 3060 );
      end if;
      if not gse.Is_Null( cursor, 3061 )then
         a_frs1516.hurahc6 := gse.Integer_Value( cursor, 3061 );
      end if;
      if not gse.Is_Null( cursor, 3062 )then
         a_frs1516.hurahc7 := gse.Integer_Value( cursor, 3062 );
      end if;
      if not gse.Is_Null( cursor, 3063 )then
         a_frs1516.hurahc8 := gse.Integer_Value( cursor, 3063 );
      end if;
      if not gse.Is_Null( cursor, 3064 )then
         a_frs1516.hurcbc1 := gse.Integer_Value( cursor, 3064 );
      end if;
      if not gse.Is_Null( cursor, 3065 )then
         a_frs1516.hurcbc2 := gse.Integer_Value( cursor, 3065 );
      end if;
      if not gse.Is_Null( cursor, 3066 )then
         a_frs1516.hurcbc3 := gse.Integer_Value( cursor, 3066 );
      end if;
      if not gse.Is_Null( cursor, 3067 )then
         a_frs1516.hurcbc4 := gse.Integer_Value( cursor, 3067 );
      end if;
      if not gse.Is_Null( cursor, 3068 )then
         a_frs1516.hurcbc5 := gse.Integer_Value( cursor, 3068 );
      end if;
      if not gse.Is_Null( cursor, 3069 )then
         a_frs1516.hurcbc6 := gse.Integer_Value( cursor, 3069 );
      end if;
      if not gse.Is_Null( cursor, 3070 )then
         a_frs1516.hurcbc7 := gse.Integer_Value( cursor, 3070 );
      end if;
      if not gse.Is_Null( cursor, 3071 )then
         a_frs1516.hurcbc8 := gse.Integer_Value( cursor, 3071 );
      end if;
      if not gse.Is_Null( cursor, 3072 )then
         a_frs1516.hurchc1 := gse.Integer_Value( cursor, 3072 );
      end if;
      if not gse.Is_Null( cursor, 3073 )then
         a_frs1516.hurchc2 := gse.Integer_Value( cursor, 3073 );
      end if;
      if not gse.Is_Null( cursor, 3074 )then
         a_frs1516.hurchc3 := gse.Integer_Value( cursor, 3074 );
      end if;
      if not gse.Is_Null( cursor, 3075 )then
         a_frs1516.hurchc4 := gse.Integer_Value( cursor, 3075 );
      end if;
      if not gse.Is_Null( cursor, 3076 )then
         a_frs1516.hurchc5 := gse.Integer_Value( cursor, 3076 );
      end if;
      if not gse.Is_Null( cursor, 3077 )then
         a_frs1516.hurchc6 := gse.Integer_Value( cursor, 3077 );
      end if;
      if not gse.Is_Null( cursor, 3078 )then
         a_frs1516.hurchc7 := gse.Integer_Value( cursor, 3078 );
      end if;
      if not gse.Is_Null( cursor, 3079 )then
         a_frs1516.hurchc8 := gse.Integer_Value( cursor, 3079 );
      end if;
      if not gse.Is_Null( cursor, 3080 )then
         a_frs1516.hurclc1 := gse.Integer_Value( cursor, 3080 );
      end if;
      if not gse.Is_Null( cursor, 3081 )then
         a_frs1516.hurclc2 := gse.Integer_Value( cursor, 3081 );
      end if;
      if not gse.Is_Null( cursor, 3082 )then
         a_frs1516.hurclc3 := gse.Integer_Value( cursor, 3082 );
      end if;
      if not gse.Is_Null( cursor, 3083 )then
         a_frs1516.hurclc4 := gse.Integer_Value( cursor, 3083 );
      end if;
      if not gse.Is_Null( cursor, 3084 )then
         a_frs1516.hurclc5 := gse.Integer_Value( cursor, 3084 );
      end if;
      if not gse.Is_Null( cursor, 3085 )then
         a_frs1516.hurclc6 := gse.Integer_Value( cursor, 3085 );
      end if;
      if not gse.Is_Null( cursor, 3086 )then
         a_frs1516.hurclc7 := gse.Integer_Value( cursor, 3086 );
      end if;
      if not gse.Is_Null( cursor, 3087 )then
         a_frs1516.hurclc8 := gse.Integer_Value( cursor, 3087 );
      end if;
      if not gse.Is_Null( cursor, 3088 )then
         a_frs1516.hurfrc1 := gse.Integer_Value( cursor, 3088 );
      end if;
      if not gse.Is_Null( cursor, 3089 )then
         a_frs1516.hurfrc2 := gse.Integer_Value( cursor, 3089 );
      end if;
      if not gse.Is_Null( cursor, 3090 )then
         a_frs1516.hurfrc3 := gse.Integer_Value( cursor, 3090 );
      end if;
      if not gse.Is_Null( cursor, 3091 )then
         a_frs1516.hurfrc4 := gse.Integer_Value( cursor, 3091 );
      end if;
      if not gse.Is_Null( cursor, 3092 )then
         a_frs1516.hurfrc5 := gse.Integer_Value( cursor, 3092 );
      end if;
      if not gse.Is_Null( cursor, 3093 )then
         a_frs1516.hurfrc6 := gse.Integer_Value( cursor, 3093 );
      end if;
      if not gse.Is_Null( cursor, 3094 )then
         a_frs1516.hurfrc7 := gse.Integer_Value( cursor, 3094 );
      end if;
      if not gse.Is_Null( cursor, 3095 )then
         a_frs1516.hurfrc8 := gse.Integer_Value( cursor, 3095 );
      end if;
      if not gse.Is_Null( cursor, 3096 )then
         a_frs1516.hurotc1 := gse.Integer_Value( cursor, 3096 );
      end if;
      if not gse.Is_Null( cursor, 3097 )then
         a_frs1516.hurotc2 := gse.Integer_Value( cursor, 3097 );
      end if;
      if not gse.Is_Null( cursor, 3098 )then
         a_frs1516.hurotc3 := gse.Integer_Value( cursor, 3098 );
      end if;
      if not gse.Is_Null( cursor, 3099 )then
         a_frs1516.hurotc4 := gse.Integer_Value( cursor, 3099 );
      end if;
      if not gse.Is_Null( cursor, 3100 )then
         a_frs1516.hurotc5 := gse.Integer_Value( cursor, 3100 );
      end if;
      if not gse.Is_Null( cursor, 3101 )then
         a_frs1516.hurotc6 := gse.Integer_Value( cursor, 3101 );
      end if;
      if not gse.Is_Null( cursor, 3102 )then
         a_frs1516.hurotc7 := gse.Integer_Value( cursor, 3102 );
      end if;
      if not gse.Is_Null( cursor, 3103 )then
         a_frs1516.hurotc8 := gse.Integer_Value( cursor, 3103 );
      end if;
      if not gse.Is_Null( cursor, 3104 )then
         a_frs1516.hurrec1 := gse.Integer_Value( cursor, 3104 );
      end if;
      if not gse.Is_Null( cursor, 3105 )then
         a_frs1516.hurrec2 := gse.Integer_Value( cursor, 3105 );
      end if;
      if not gse.Is_Null( cursor, 3106 )then
         a_frs1516.hurrec3 := gse.Integer_Value( cursor, 3106 );
      end if;
      if not gse.Is_Null( cursor, 3107 )then
         a_frs1516.hurrec4 := gse.Integer_Value( cursor, 3107 );
      end if;
      if not gse.Is_Null( cursor, 3108 )then
         a_frs1516.hurrec5 := gse.Integer_Value( cursor, 3108 );
      end if;
      if not gse.Is_Null( cursor, 3109 )then
         a_frs1516.hurrec6 := gse.Integer_Value( cursor, 3109 );
      end if;
      if not gse.Is_Null( cursor, 3110 )then
         a_frs1516.hurrec7 := gse.Integer_Value( cursor, 3110 );
      end if;
      if not gse.Is_Null( cursor, 3111 )then
         a_frs1516.hurrec8 := gse.Integer_Value( cursor, 3111 );
      end if;
      if not gse.Is_Null( cursor, 3112 )then
         a_frs1516.hpersc1 := gse.Integer_Value( cursor, 3112 );
      end if;
      if not gse.Is_Null( cursor, 3113 )then
         a_frs1516.hpersc2 := gse.Integer_Value( cursor, 3113 );
      end if;
      if not gse.Is_Null( cursor, 3114 )then
         a_frs1516.hpersc3 := gse.Integer_Value( cursor, 3114 );
      end if;
      if not gse.Is_Null( cursor, 3115 )then
         a_frs1516.hpersc4 := gse.Integer_Value( cursor, 3115 );
      end if;
      if not gse.Is_Null( cursor, 3116 )then
         a_frs1516.hpersc5 := gse.Integer_Value( cursor, 3116 );
      end if;
      if not gse.Is_Null( cursor, 3117 )then
         a_frs1516.hpersc6 := gse.Integer_Value( cursor, 3117 );
      end if;
      if not gse.Is_Null( cursor, 3118 )then
         a_frs1516.hpersc7 := gse.Integer_Value( cursor, 3118 );
      end if;
      if not gse.Is_Null( cursor, 3119 )then
         a_frs1516.hpersc8 := gse.Integer_Value( cursor, 3119 );
      end if;
      if not gse.Is_Null( cursor, 3120 )then
         a_frs1516.hrsedc1 := gse.Integer_Value( cursor, 3120 );
      end if;
      if not gse.Is_Null( cursor, 3121 )then
         a_frs1516.hrsedc2 := gse.Integer_Value( cursor, 3121 );
      end if;
      if not gse.Is_Null( cursor, 3122 )then
         a_frs1516.hrsedc3 := gse.Integer_Value( cursor, 3122 );
      end if;
      if not gse.Is_Null( cursor, 3123 )then
         a_frs1516.hrsedc4 := gse.Integer_Value( cursor, 3123 );
      end if;
      if not gse.Is_Null( cursor, 3124 )then
         a_frs1516.hrsedc5 := gse.Integer_Value( cursor, 3124 );
      end if;
      if not gse.Is_Null( cursor, 3125 )then
         a_frs1516.hrsedc6 := gse.Integer_Value( cursor, 3125 );
      end if;
      if not gse.Is_Null( cursor, 3126 )then
         a_frs1516.hrsedc7 := gse.Integer_Value( cursor, 3126 );
      end if;
      if not gse.Is_Null( cursor, 3127 )then
         a_frs1516.hrsedc8 := gse.Integer_Value( cursor, 3127 );
      end if;
      if not gse.Is_Null( cursor, 3128 )then
         a_frs1516.hsvprc1 := gse.Integer_Value( cursor, 3128 );
      end if;
      if not gse.Is_Null( cursor, 3129 )then
         a_frs1516.hsvprc2 := gse.Integer_Value( cursor, 3129 );
      end if;
      if not gse.Is_Null( cursor, 3130 )then
         a_frs1516.hsvprc3 := gse.Integer_Value( cursor, 3130 );
      end if;
      if not gse.Is_Null( cursor, 3131 )then
         a_frs1516.hsvprc4 := gse.Integer_Value( cursor, 3131 );
      end if;
      if not gse.Is_Null( cursor, 3132 )then
         a_frs1516.hsvprc5 := gse.Integer_Value( cursor, 3132 );
      end if;
      if not gse.Is_Null( cursor, 3133 )then
         a_frs1516.hsvprc6 := gse.Integer_Value( cursor, 3133 );
      end if;
      if not gse.Is_Null( cursor, 3134 )then
         a_frs1516.hsvprc7 := gse.Integer_Value( cursor, 3134 );
      end if;
      if not gse.Is_Null( cursor, 3135 )then
         a_frs1516.hsvprc8 := gse.Integer_Value( cursor, 3135 );
      end if;
      if not gse.Is_Null( cursor, 3136 )then
         a_frs1516.laregc1 := gse.Integer_Value( cursor, 3136 );
      end if;
      if not gse.Is_Null( cursor, 3137 )then
         a_frs1516.laregc2 := gse.Integer_Value( cursor, 3137 );
      end if;
      if not gse.Is_Null( cursor, 3138 )then
         a_frs1516.laregc3 := gse.Integer_Value( cursor, 3138 );
      end if;
      if not gse.Is_Null( cursor, 3139 )then
         a_frs1516.laregc4 := gse.Integer_Value( cursor, 3139 );
      end if;
      if not gse.Is_Null( cursor, 3140 )then
         a_frs1516.laregc5 := gse.Integer_Value( cursor, 3140 );
      end if;
      if not gse.Is_Null( cursor, 3141 )then
         a_frs1516.laregc6 := gse.Integer_Value( cursor, 3141 );
      end if;
      if not gse.Is_Null( cursor, 3142 )then
         a_frs1516.laregc7 := gse.Integer_Value( cursor, 3142 );
      end if;
      if not gse.Is_Null( cursor, 3143 )then
         a_frs1516.laregc8 := gse.Integer_Value( cursor, 3143 );
      end if;
      if not gse.Is_Null( cursor, 3144 )then
         a_frs1516.msc1 := gse.Integer_Value( cursor, 3144 );
      end if;
      if not gse.Is_Null( cursor, 3145 )then
         a_frs1516.msc2 := gse.Integer_Value( cursor, 3145 );
      end if;
      if not gse.Is_Null( cursor, 3146 )then
         a_frs1516.msc3 := gse.Integer_Value( cursor, 3146 );
      end if;
      if not gse.Is_Null( cursor, 3147 )then
         a_frs1516.msc4 := gse.Integer_Value( cursor, 3147 );
      end if;
      if not gse.Is_Null( cursor, 3148 )then
         a_frs1516.msc5 := gse.Integer_Value( cursor, 3148 );
      end if;
      if not gse.Is_Null( cursor, 3149 )then
         a_frs1516.msc6 := gse.Integer_Value( cursor, 3149 );
      end if;
      if not gse.Is_Null( cursor, 3150 )then
         a_frs1516.msc7 := gse.Integer_Value( cursor, 3150 );
      end if;
      if not gse.Is_Null( cursor, 3151 )then
         a_frs1516.msc8 := gse.Integer_Value( cursor, 3151 );
      end if;
      if not gse.Is_Null( cursor, 3152 )then
         a_frs1516.prsonc1 := gse.Integer_Value( cursor, 3152 );
      end if;
      if not gse.Is_Null( cursor, 3153 )then
         a_frs1516.prsonc2 := gse.Integer_Value( cursor, 3153 );
      end if;
      if not gse.Is_Null( cursor, 3154 )then
         a_frs1516.prsonc3 := gse.Integer_Value( cursor, 3154 );
      end if;
      if not gse.Is_Null( cursor, 3155 )then
         a_frs1516.prsonc4 := gse.Integer_Value( cursor, 3155 );
      end if;
      if not gse.Is_Null( cursor, 3156 )then
         a_frs1516.prsonc5 := gse.Integer_Value( cursor, 3156 );
      end if;
      if not gse.Is_Null( cursor, 3157 )then
         a_frs1516.prsonc6 := gse.Integer_Value( cursor, 3157 );
      end if;
      if not gse.Is_Null( cursor, 3158 )then
         a_frs1516.prsonc7 := gse.Integer_Value( cursor, 3158 );
      end if;
      if not gse.Is_Null( cursor, 3159 )then
         a_frs1516.prsonc8 := gse.Integer_Value( cursor, 3159 );
      end if;
      if not gse.Is_Null( cursor, 3160 )then
         a_frs1516.rlp1c1 := gse.Integer_Value( cursor, 3160 );
      end if;
      if not gse.Is_Null( cursor, 3161 )then
         a_frs1516.rlp1c2 := gse.Integer_Value( cursor, 3161 );
      end if;
      if not gse.Is_Null( cursor, 3162 )then
         a_frs1516.rlp1c3 := gse.Integer_Value( cursor, 3162 );
      end if;
      if not gse.Is_Null( cursor, 3163 )then
         a_frs1516.rlp1c4 := gse.Integer_Value( cursor, 3163 );
      end if;
      if not gse.Is_Null( cursor, 3164 )then
         a_frs1516.rlp1c5 := gse.Integer_Value( cursor, 3164 );
      end if;
      if not gse.Is_Null( cursor, 3165 )then
         a_frs1516.rlp1c6 := gse.Integer_Value( cursor, 3165 );
      end if;
      if not gse.Is_Null( cursor, 3166 )then
         a_frs1516.rlp1c7 := gse.Integer_Value( cursor, 3166 );
      end if;
      if not gse.Is_Null( cursor, 3167 )then
         a_frs1516.rlp1c8 := gse.Integer_Value( cursor, 3167 );
      end if;
      if not gse.Is_Null( cursor, 3168 )then
         a_frs1516.rlp2c1 := gse.Integer_Value( cursor, 3168 );
      end if;
      if not gse.Is_Null( cursor, 3169 )then
         a_frs1516.rlp2c2 := gse.Integer_Value( cursor, 3169 );
      end if;
      if not gse.Is_Null( cursor, 3170 )then
         a_frs1516.rlp2c3 := gse.Integer_Value( cursor, 3170 );
      end if;
      if not gse.Is_Null( cursor, 3171 )then
         a_frs1516.rlp2c4 := gse.Integer_Value( cursor, 3171 );
      end if;
      if not gse.Is_Null( cursor, 3172 )then
         a_frs1516.rlp2c5 := gse.Integer_Value( cursor, 3172 );
      end if;
      if not gse.Is_Null( cursor, 3173 )then
         a_frs1516.rlp2c6 := gse.Integer_Value( cursor, 3173 );
      end if;
      if not gse.Is_Null( cursor, 3174 )then
         a_frs1516.rlp2c7 := gse.Integer_Value( cursor, 3174 );
      end if;
      if not gse.Is_Null( cursor, 3175 )then
         a_frs1516.rlp2c8 := gse.Integer_Value( cursor, 3175 );
      end if;
      if not gse.Is_Null( cursor, 3176 )then
         a_frs1516.rlp3c1 := gse.Integer_Value( cursor, 3176 );
      end if;
      if not gse.Is_Null( cursor, 3177 )then
         a_frs1516.rlp3c2 := gse.Integer_Value( cursor, 3177 );
      end if;
      if not gse.Is_Null( cursor, 3178 )then
         a_frs1516.rlp3c3 := gse.Integer_Value( cursor, 3178 );
      end if;
      if not gse.Is_Null( cursor, 3179 )then
         a_frs1516.rlp3c4 := gse.Integer_Value( cursor, 3179 );
      end if;
      if not gse.Is_Null( cursor, 3180 )then
         a_frs1516.rlp3c5 := gse.Integer_Value( cursor, 3180 );
      end if;
      if not gse.Is_Null( cursor, 3181 )then
         a_frs1516.rlp3c6 := gse.Integer_Value( cursor, 3181 );
      end if;
      if not gse.Is_Null( cursor, 3182 )then
         a_frs1516.rlp3c7 := gse.Integer_Value( cursor, 3182 );
      end if;
      if not gse.Is_Null( cursor, 3183 )then
         a_frs1516.rlp3c8 := gse.Integer_Value( cursor, 3183 );
      end if;
      if not gse.Is_Null( cursor, 3184 )then
         a_frs1516.rlp4c1 := gse.Integer_Value( cursor, 3184 );
      end if;
      if not gse.Is_Null( cursor, 3185 )then
         a_frs1516.rlp4c2 := gse.Integer_Value( cursor, 3185 );
      end if;
      if not gse.Is_Null( cursor, 3186 )then
         a_frs1516.rlp4c3 := gse.Integer_Value( cursor, 3186 );
      end if;
      if not gse.Is_Null( cursor, 3187 )then
         a_frs1516.rlp4c4 := gse.Integer_Value( cursor, 3187 );
      end if;
      if not gse.Is_Null( cursor, 3188 )then
         a_frs1516.rlp4c5 := gse.Integer_Value( cursor, 3188 );
      end if;
      if not gse.Is_Null( cursor, 3189 )then
         a_frs1516.rlp4c6 := gse.Integer_Value( cursor, 3189 );
      end if;
      if not gse.Is_Null( cursor, 3190 )then
         a_frs1516.rlp4c7 := gse.Integer_Value( cursor, 3190 );
      end if;
      if not gse.Is_Null( cursor, 3191 )then
         a_frs1516.rlp4c8 := gse.Integer_Value( cursor, 3191 );
      end if;
      if not gse.Is_Null( cursor, 3192 )then
         a_frs1516.rlp5c1 := gse.Integer_Value( cursor, 3192 );
      end if;
      if not gse.Is_Null( cursor, 3193 )then
         a_frs1516.rlp5c2 := gse.Integer_Value( cursor, 3193 );
      end if;
      if not gse.Is_Null( cursor, 3194 )then
         a_frs1516.rlp5c3 := gse.Integer_Value( cursor, 3194 );
      end if;
      if not gse.Is_Null( cursor, 3195 )then
         a_frs1516.rlp5c4 := gse.Integer_Value( cursor, 3195 );
      end if;
      if not gse.Is_Null( cursor, 3196 )then
         a_frs1516.rlp5c5 := gse.Integer_Value( cursor, 3196 );
      end if;
      if not gse.Is_Null( cursor, 3197 )then
         a_frs1516.rlp5c6 := gse.Integer_Value( cursor, 3197 );
      end if;
      if not gse.Is_Null( cursor, 3198 )then
         a_frs1516.rlp5c7 := gse.Integer_Value( cursor, 3198 );
      end if;
      if not gse.Is_Null( cursor, 3199 )then
         a_frs1516.rlp5c8 := gse.Integer_Value( cursor, 3199 );
      end if;
      if not gse.Is_Null( cursor, 3200 )then
         a_frs1516.rlp6c1 := gse.Integer_Value( cursor, 3200 );
      end if;
      if not gse.Is_Null( cursor, 3201 )then
         a_frs1516.rlp6c2 := gse.Integer_Value( cursor, 3201 );
      end if;
      if not gse.Is_Null( cursor, 3202 )then
         a_frs1516.rlp6c3 := gse.Integer_Value( cursor, 3202 );
      end if;
      if not gse.Is_Null( cursor, 3203 )then
         a_frs1516.rlp6c4 := gse.Integer_Value( cursor, 3203 );
      end if;
      if not gse.Is_Null( cursor, 3204 )then
         a_frs1516.rlp6c5 := gse.Integer_Value( cursor, 3204 );
      end if;
      if not gse.Is_Null( cursor, 3205 )then
         a_frs1516.rlp6c6 := gse.Integer_Value( cursor, 3205 );
      end if;
      if not gse.Is_Null( cursor, 3206 )then
         a_frs1516.rlp6c7 := gse.Integer_Value( cursor, 3206 );
      end if;
      if not gse.Is_Null( cursor, 3207 )then
         a_frs1516.rlp6c8 := gse.Integer_Value( cursor, 3207 );
      end if;
      if not gse.Is_Null( cursor, 3208 )then
         a_frs1516.rlp7c1 := gse.Integer_Value( cursor, 3208 );
      end if;
      if not gse.Is_Null( cursor, 3209 )then
         a_frs1516.rlp7c2 := gse.Integer_Value( cursor, 3209 );
      end if;
      if not gse.Is_Null( cursor, 3210 )then
         a_frs1516.rlp7c3 := gse.Integer_Value( cursor, 3210 );
      end if;
      if not gse.Is_Null( cursor, 3211 )then
         a_frs1516.rlp7c4 := gse.Integer_Value( cursor, 3211 );
      end if;
      if not gse.Is_Null( cursor, 3212 )then
         a_frs1516.rlp7c5 := gse.Integer_Value( cursor, 3212 );
      end if;
      if not gse.Is_Null( cursor, 3213 )then
         a_frs1516.rlp7c6 := gse.Integer_Value( cursor, 3213 );
      end if;
      if not gse.Is_Null( cursor, 3214 )then
         a_frs1516.rlp7c7 := gse.Integer_Value( cursor, 3214 );
      end if;
      if not gse.Is_Null( cursor, 3215 )then
         a_frs1516.rlp7c8 := gse.Integer_Value( cursor, 3215 );
      end if;
      if not gse.Is_Null( cursor, 3216 )then
         a_frs1516.rlp8c1 := gse.Integer_Value( cursor, 3216 );
      end if;
      if not gse.Is_Null( cursor, 3217 )then
         a_frs1516.rlp8c2 := gse.Integer_Value( cursor, 3217 );
      end if;
      if not gse.Is_Null( cursor, 3218 )then
         a_frs1516.rlp8c3 := gse.Integer_Value( cursor, 3218 );
      end if;
      if not gse.Is_Null( cursor, 3219 )then
         a_frs1516.rlp8c4 := gse.Integer_Value( cursor, 3219 );
      end if;
      if not gse.Is_Null( cursor, 3220 )then
         a_frs1516.rlp8c5 := gse.Integer_Value( cursor, 3220 );
      end if;
      if not gse.Is_Null( cursor, 3221 )then
         a_frs1516.rlp8c6 := gse.Integer_Value( cursor, 3221 );
      end if;
      if not gse.Is_Null( cursor, 3222 )then
         a_frs1516.rlp8c7 := gse.Integer_Value( cursor, 3222 );
      end if;
      if not gse.Is_Null( cursor, 3223 )then
         a_frs1516.rlp8c8 := gse.Integer_Value( cursor, 3223 );
      end if;
      if not gse.Is_Null( cursor, 3224 )then
         a_frs1516.rlp9c1 := gse.Integer_Value( cursor, 3224 );
      end if;
      if not gse.Is_Null( cursor, 3225 )then
         a_frs1516.rlp9c2 := gse.Integer_Value( cursor, 3225 );
      end if;
      if not gse.Is_Null( cursor, 3226 )then
         a_frs1516.rlp9c3 := gse.Integer_Value( cursor, 3226 );
      end if;
      if not gse.Is_Null( cursor, 3227 )then
         a_frs1516.rlp9c4 := gse.Integer_Value( cursor, 3227 );
      end if;
      if not gse.Is_Null( cursor, 3228 )then
         a_frs1516.rlp9c5 := gse.Integer_Value( cursor, 3228 );
      end if;
      if not gse.Is_Null( cursor, 3229 )then
         a_frs1516.rlp9c6 := gse.Integer_Value( cursor, 3229 );
      end if;
      if not gse.Is_Null( cursor, 3230 )then
         a_frs1516.rlp9c7 := gse.Integer_Value( cursor, 3230 );
      end if;
      if not gse.Is_Null( cursor, 3231 )then
         a_frs1516.rlp9c8 := gse.Integer_Value( cursor, 3231 );
      end if;
      if not gse.Is_Null( cursor, 3232 )then
         a_frs1516.rlp10c1 := gse.Integer_Value( cursor, 3232 );
      end if;
      if not gse.Is_Null( cursor, 3233 )then
         a_frs1516.rlp10c2 := gse.Integer_Value( cursor, 3233 );
      end if;
      if not gse.Is_Null( cursor, 3234 )then
         a_frs1516.rlp10c3 := gse.Integer_Value( cursor, 3234 );
      end if;
      if not gse.Is_Null( cursor, 3235 )then
         a_frs1516.rlp10c4 := gse.Integer_Value( cursor, 3235 );
      end if;
      if not gse.Is_Null( cursor, 3236 )then
         a_frs1516.rlp10c5 := gse.Integer_Value( cursor, 3236 );
      end if;
      if not gse.Is_Null( cursor, 3237 )then
         a_frs1516.rlp10c6 := gse.Integer_Value( cursor, 3237 );
      end if;
      if not gse.Is_Null( cursor, 3238 )then
         a_frs1516.rlp10c7 := gse.Integer_Value( cursor, 3238 );
      end if;
      if not gse.Is_Null( cursor, 3239 )then
         a_frs1516.rlp10c8 := gse.Integer_Value( cursor, 3239 );
      end if;
      if not gse.Is_Null( cursor, 3240 )then
         a_frs1516.rlp11c1 := gse.Integer_Value( cursor, 3240 );
      end if;
      if not gse.Is_Null( cursor, 3241 )then
         a_frs1516.rlp11c2 := gse.Integer_Value( cursor, 3241 );
      end if;
      if not gse.Is_Null( cursor, 3242 )then
         a_frs1516.rlp11c3 := gse.Integer_Value( cursor, 3242 );
      end if;
      if not gse.Is_Null( cursor, 3243 )then
         a_frs1516.rlp11c4 := gse.Integer_Value( cursor, 3243 );
      end if;
      if not gse.Is_Null( cursor, 3244 )then
         a_frs1516.rlp11c5 := gse.Integer_Value( cursor, 3244 );
      end if;
      if not gse.Is_Null( cursor, 3245 )then
         a_frs1516.rlp11c6 := gse.Integer_Value( cursor, 3245 );
      end if;
      if not gse.Is_Null( cursor, 3246 )then
         a_frs1516.rlp11c7 := gse.Integer_Value( cursor, 3246 );
      end if;
      if not gse.Is_Null( cursor, 3247 )then
         a_frs1516.rlp11c8 := gse.Integer_Value( cursor, 3247 );
      end if;
      if not gse.Is_Null( cursor, 3248 )then
         a_frs1516.rlp12c1 := gse.Integer_Value( cursor, 3248 );
      end if;
      if not gse.Is_Null( cursor, 3249 )then
         a_frs1516.rlp12c2 := gse.Integer_Value( cursor, 3249 );
      end if;
      if not gse.Is_Null( cursor, 3250 )then
         a_frs1516.rlp12c3 := gse.Integer_Value( cursor, 3250 );
      end if;
      if not gse.Is_Null( cursor, 3251 )then
         a_frs1516.rlp12c4 := gse.Integer_Value( cursor, 3251 );
      end if;
      if not gse.Is_Null( cursor, 3252 )then
         a_frs1516.rlp12c5 := gse.Integer_Value( cursor, 3252 );
      end if;
      if not gse.Is_Null( cursor, 3253 )then
         a_frs1516.rlp12c6 := gse.Integer_Value( cursor, 3253 );
      end if;
      if not gse.Is_Null( cursor, 3254 )then
         a_frs1516.rlp12c7 := gse.Integer_Value( cursor, 3254 );
      end if;
      if not gse.Is_Null( cursor, 3255 )then
         a_frs1516.rlp12c8 := gse.Integer_Value( cursor, 3255 );
      end if;
      if not gse.Is_Null( cursor, 3256 )then
         a_frs1516.rlp13c1 := gse.Integer_Value( cursor, 3256 );
      end if;
      if not gse.Is_Null( cursor, 3257 )then
         a_frs1516.rlp13c2 := gse.Integer_Value( cursor, 3257 );
      end if;
      if not gse.Is_Null( cursor, 3258 )then
         a_frs1516.rlp13c3 := gse.Integer_Value( cursor, 3258 );
      end if;
      if not gse.Is_Null( cursor, 3259 )then
         a_frs1516.rlp13c4 := gse.Integer_Value( cursor, 3259 );
      end if;
      if not gse.Is_Null( cursor, 3260 )then
         a_frs1516.rlp13c5 := gse.Integer_Value( cursor, 3260 );
      end if;
      if not gse.Is_Null( cursor, 3261 )then
         a_frs1516.rlp13c6 := gse.Integer_Value( cursor, 3261 );
      end if;
      if not gse.Is_Null( cursor, 3262 )then
         a_frs1516.rlp13c7 := gse.Integer_Value( cursor, 3262 );
      end if;
      if not gse.Is_Null( cursor, 3263 )then
         a_frs1516.rlp13c8 := gse.Integer_Value( cursor, 3263 );
      end if;
      if not gse.Is_Null( cursor, 3264 )then
         a_frs1516.rlp14c1 := gse.Integer_Value( cursor, 3264 );
      end if;
      if not gse.Is_Null( cursor, 3265 )then
         a_frs1516.rlp14c2 := gse.Integer_Value( cursor, 3265 );
      end if;
      if not gse.Is_Null( cursor, 3266 )then
         a_frs1516.rlp14c3 := gse.Integer_Value( cursor, 3266 );
      end if;
      if not gse.Is_Null( cursor, 3267 )then
         a_frs1516.rlp14c4 := gse.Integer_Value( cursor, 3267 );
      end if;
      if not gse.Is_Null( cursor, 3268 )then
         a_frs1516.rlp14c5 := gse.Integer_Value( cursor, 3268 );
      end if;
      if not gse.Is_Null( cursor, 3269 )then
         a_frs1516.rlp14c6 := gse.Integer_Value( cursor, 3269 );
      end if;
      if not gse.Is_Null( cursor, 3270 )then
         a_frs1516.rlp14c7 := gse.Integer_Value( cursor, 3270 );
      end if;
      if not gse.Is_Null( cursor, 3271 )then
         a_frs1516.rlp14c8 := gse.Integer_Value( cursor, 3271 );
      end if;
      if not gse.Is_Null( cursor, 3272 )then
         a_frs1516.rhrpcc1 := gse.Integer_Value( cursor, 3272 );
      end if;
      if not gse.Is_Null( cursor, 3273 )then
         a_frs1516.rhrpcc2 := gse.Integer_Value( cursor, 3273 );
      end if;
      if not gse.Is_Null( cursor, 3274 )then
         a_frs1516.rhrpcc3 := gse.Integer_Value( cursor, 3274 );
      end if;
      if not gse.Is_Null( cursor, 3275 )then
         a_frs1516.rhrpcc4 := gse.Integer_Value( cursor, 3275 );
      end if;
      if not gse.Is_Null( cursor, 3276 )then
         a_frs1516.rhrpcc5 := gse.Integer_Value( cursor, 3276 );
      end if;
      if not gse.Is_Null( cursor, 3277 )then
         a_frs1516.rhrpcc6 := gse.Integer_Value( cursor, 3277 );
      end if;
      if not gse.Is_Null( cursor, 3278 )then
         a_frs1516.rhrpcc7 := gse.Integer_Value( cursor, 3278 );
      end if;
      if not gse.Is_Null( cursor, 3279 )then
         a_frs1516.rhrpcc8 := gse.Integer_Value( cursor, 3279 );
      end if;
      if not gse.Is_Null( cursor, 3280 )then
         a_frs1516.sbkitc1 := gse.Integer_Value( cursor, 3280 );
      end if;
      if not gse.Is_Null( cursor, 3281 )then
         a_frs1516.sbkitc2 := gse.Integer_Value( cursor, 3281 );
      end if;
      if not gse.Is_Null( cursor, 3282 )then
         a_frs1516.sbkitc3 := gse.Integer_Value( cursor, 3282 );
      end if;
      if not gse.Is_Null( cursor, 3283 )then
         a_frs1516.sbkitc4 := gse.Integer_Value( cursor, 3283 );
      end if;
      if not gse.Is_Null( cursor, 3284 )then
         a_frs1516.sbkitc5 := gse.Integer_Value( cursor, 3284 );
      end if;
      if not gse.Is_Null( cursor, 3285 )then
         a_frs1516.sbkitc6 := gse.Integer_Value( cursor, 3285 );
      end if;
      if not gse.Is_Null( cursor, 3286 )then
         a_frs1516.sbkitc7 := gse.Integer_Value( cursor, 3286 );
      end if;
      if not gse.Is_Null( cursor, 3287 )then
         a_frs1516.sbkitc8 := gse.Integer_Value( cursor, 3287 );
      end if;
      if not gse.Is_Null( cursor, 3288 )then
         a_frs1516.sexc1 := gse.Integer_Value( cursor, 3288 );
      end if;
      if not gse.Is_Null( cursor, 3289 )then
         a_frs1516.sexc2 := gse.Integer_Value( cursor, 3289 );
      end if;
      if not gse.Is_Null( cursor, 3290 )then
         a_frs1516.sexc3 := gse.Integer_Value( cursor, 3290 );
      end if;
      if not gse.Is_Null( cursor, 3291 )then
         a_frs1516.sexc4 := gse.Integer_Value( cursor, 3291 );
      end if;
      if not gse.Is_Null( cursor, 3292 )then
         a_frs1516.sexc5 := gse.Integer_Value( cursor, 3292 );
      end if;
      if not gse.Is_Null( cursor, 3293 )then
         a_frs1516.sexc6 := gse.Integer_Value( cursor, 3293 );
      end if;
      if not gse.Is_Null( cursor, 3294 )then
         a_frs1516.sexc7 := gse.Integer_Value( cursor, 3294 );
      end if;
      if not gse.Is_Null( cursor, 3295 )then
         a_frs1516.sexc8 := gse.Integer_Value( cursor, 3295 );
      end if;
      if not gse.Is_Null( cursor, 3296 )then
         a_frs1516.sfvitc1 := gse.Integer_Value( cursor, 3296 );
      end if;
      if not gse.Is_Null( cursor, 3297 )then
         a_frs1516.sfvitc2 := gse.Integer_Value( cursor, 3297 );
      end if;
      if not gse.Is_Null( cursor, 3298 )then
         a_frs1516.sfvitc3 := gse.Integer_Value( cursor, 3298 );
      end if;
      if not gse.Is_Null( cursor, 3299 )then
         a_frs1516.sfvitc4 := gse.Integer_Value( cursor, 3299 );
      end if;
      if not gse.Is_Null( cursor, 3300 )then
         a_frs1516.sfvitc5 := gse.Integer_Value( cursor, 3300 );
      end if;
      if not gse.Is_Null( cursor, 3301 )then
         a_frs1516.sfvitc6 := gse.Integer_Value( cursor, 3301 );
      end if;
      if not gse.Is_Null( cursor, 3302 )then
         a_frs1516.sfvitc7 := gse.Integer_Value( cursor, 3302 );
      end if;
      if not gse.Is_Null( cursor, 3303 )then
         a_frs1516.sfvitc8 := gse.Integer_Value( cursor, 3303 );
      end if;
      if not gse.Is_Null( cursor, 3304 )then
         a_frs1516.fmctsc1 := gse.Integer_Value( cursor, 3304 );
      end if;
      if not gse.Is_Null( cursor, 3305 )then
         a_frs1516.fmctsc2 := gse.Integer_Value( cursor, 3305 );
      end if;
      if not gse.Is_Null( cursor, 3306 )then
         a_frs1516.fmctsc3 := gse.Integer_Value( cursor, 3306 );
      end if;
      if not gse.Is_Null( cursor, 3307 )then
         a_frs1516.fmctsc4 := gse.Integer_Value( cursor, 3307 );
      end if;
      if not gse.Is_Null( cursor, 3308 )then
         a_frs1516.fmctsc5 := gse.Integer_Value( cursor, 3308 );
      end if;
      if not gse.Is_Null( cursor, 3309 )then
         a_frs1516.fmctsc6 := gse.Integer_Value( cursor, 3309 );
      end if;
      if not gse.Is_Null( cursor, 3310 )then
         a_frs1516.fmctsc7 := gse.Integer_Value( cursor, 3310 );
      end if;
      if not gse.Is_Null( cursor, 3311 )then
         a_frs1516.fmctsc8 := gse.Integer_Value( cursor, 3311 );
      end if;
      if not gse.Is_Null( cursor, 3312 )then
         a_frs1516.fmealc1 := gse.Integer_Value( cursor, 3312 );
      end if;
      if not gse.Is_Null( cursor, 3313 )then
         a_frs1516.fmealc2 := gse.Integer_Value( cursor, 3313 );
      end if;
      if not gse.Is_Null( cursor, 3314 )then
         a_frs1516.fmealc3 := gse.Integer_Value( cursor, 3314 );
      end if;
      if not gse.Is_Null( cursor, 3315 )then
         a_frs1516.fmealc4 := gse.Integer_Value( cursor, 3315 );
      end if;
      if not gse.Is_Null( cursor, 3316 )then
         a_frs1516.fmealc5 := gse.Integer_Value( cursor, 3316 );
      end if;
      if not gse.Is_Null( cursor, 3317 )then
         a_frs1516.fmealc6 := gse.Integer_Value( cursor, 3317 );
      end if;
      if not gse.Is_Null( cursor, 3318 )then
         a_frs1516.fmealc7 := gse.Integer_Value( cursor, 3318 );
      end if;
      if not gse.Is_Null( cursor, 3319 )then
         a_frs1516.fmealc8 := gse.Integer_Value( cursor, 3319 );
      end if;
      if not gse.Is_Null( cursor, 3320 )then
         a_frs1516.cblndc1 := gse.Integer_Value( cursor, 3320 );
      end if;
      if not gse.Is_Null( cursor, 3321 )then
         a_frs1516.cblndc2 := gse.Integer_Value( cursor, 3321 );
      end if;
      if not gse.Is_Null( cursor, 3322 )then
         a_frs1516.cblndc3 := gse.Integer_Value( cursor, 3322 );
      end if;
      if not gse.Is_Null( cursor, 3323 )then
         a_frs1516.cblndc4 := gse.Integer_Value( cursor, 3323 );
      end if;
      if not gse.Is_Null( cursor, 3324 )then
         a_frs1516.cblndc5 := gse.Integer_Value( cursor, 3324 );
      end if;
      if not gse.Is_Null( cursor, 3325 )then
         a_frs1516.cblndc6 := gse.Integer_Value( cursor, 3325 );
      end if;
      if not gse.Is_Null( cursor, 3326 )then
         a_frs1516.cblndc7 := gse.Integer_Value( cursor, 3326 );
      end if;
      if not gse.Is_Null( cursor, 3327 )then
         a_frs1516.cblndc8 := gse.Integer_Value( cursor, 3327 );
      end if;
      if not gse.Is_Null( cursor, 3328 )then
         a_frs1516.cparsc1 := gse.Integer_Value( cursor, 3328 );
      end if;
      if not gse.Is_Null( cursor, 3329 )then
         a_frs1516.cparsc2 := gse.Integer_Value( cursor, 3329 );
      end if;
      if not gse.Is_Null( cursor, 3330 )then
         a_frs1516.cparsc3 := gse.Integer_Value( cursor, 3330 );
      end if;
      if not gse.Is_Null( cursor, 3331 )then
         a_frs1516.cparsc4 := gse.Integer_Value( cursor, 3331 );
      end if;
      if not gse.Is_Null( cursor, 3332 )then
         a_frs1516.cparsc5 := gse.Integer_Value( cursor, 3332 );
      end if;
      if not gse.Is_Null( cursor, 3333 )then
         a_frs1516.cparsc6 := gse.Integer_Value( cursor, 3333 );
      end if;
      if not gse.Is_Null( cursor, 3334 )then
         a_frs1516.cparsc7 := gse.Integer_Value( cursor, 3334 );
      end if;
      if not gse.Is_Null( cursor, 3335 )then
         a_frs1516.cparsc8 := gse.Integer_Value( cursor, 3335 );
      end if;
      if not gse.Is_Null( cursor, 3336 )then
         a_frs1516.cdeafc1 := gse.Integer_Value( cursor, 3336 );
      end if;
      if not gse.Is_Null( cursor, 3337 )then
         a_frs1516.cdeafc2 := gse.Integer_Value( cursor, 3337 );
      end if;
      if not gse.Is_Null( cursor, 3338 )then
         a_frs1516.cdeafc3 := gse.Integer_Value( cursor, 3338 );
      end if;
      if not gse.Is_Null( cursor, 3339 )then
         a_frs1516.cdeafc4 := gse.Integer_Value( cursor, 3339 );
      end if;
      if not gse.Is_Null( cursor, 3340 )then
         a_frs1516.cdeafc5 := gse.Integer_Value( cursor, 3340 );
      end if;
      if not gse.Is_Null( cursor, 3341 )then
         a_frs1516.cdeafc6 := gse.Integer_Value( cursor, 3341 );
      end if;
      if not gse.Is_Null( cursor, 3342 )then
         a_frs1516.cdeafc7 := gse.Integer_Value( cursor, 3342 );
      end if;
      if not gse.Is_Null( cursor, 3343 )then
         a_frs1516.cdeafc8 := gse.Integer_Value( cursor, 3343 );
      end if;
      if not gse.Is_Null( cursor, 3344 )then
         a_frs1516.totgtc1 := gse.Integer_Value( cursor, 3344 );
      end if;
      if not gse.Is_Null( cursor, 3345 )then
         a_frs1516.totgtc2 := gse.Integer_Value( cursor, 3345 );
      end if;
      if not gse.Is_Null( cursor, 3346 )then
         a_frs1516.totgtc3 := gse.Integer_Value( cursor, 3346 );
      end if;
      if not gse.Is_Null( cursor, 3347 )then
         a_frs1516.totgtc4 := gse.Integer_Value( cursor, 3347 );
      end if;
      if not gse.Is_Null( cursor, 3348 )then
         a_frs1516.totgtc5 := gse.Integer_Value( cursor, 3348 );
      end if;
      if not gse.Is_Null( cursor, 3349 )then
         a_frs1516.totgtc6 := gse.Integer_Value( cursor, 3349 );
      end if;
      if not gse.Is_Null( cursor, 3350 )then
         a_frs1516.totgtc7 := gse.Integer_Value( cursor, 3350 );
      end if;
      if not gse.Is_Null( cursor, 3351 )then
         a_frs1516.totgtc8 := gse.Integer_Value( cursor, 3351 );
      end if;
      if not gse.Is_Null( cursor, 3352 )then
         a_frs1516.totsvc1 := gse.Integer_Value( cursor, 3352 );
      end if;
      if not gse.Is_Null( cursor, 3353 )then
         a_frs1516.totsvc2 := gse.Integer_Value( cursor, 3353 );
      end if;
      if not gse.Is_Null( cursor, 3354 )then
         a_frs1516.totsvc3 := gse.Integer_Value( cursor, 3354 );
      end if;
      if not gse.Is_Null( cursor, 3355 )then
         a_frs1516.totsvc4 := gse.Integer_Value( cursor, 3355 );
      end if;
      if not gse.Is_Null( cursor, 3356 )then
         a_frs1516.totsvc5 := gse.Integer_Value( cursor, 3356 );
      end if;
      if not gse.Is_Null( cursor, 3357 )then
         a_frs1516.totsvc6 := gse.Integer_Value( cursor, 3357 );
      end if;
      if not gse.Is_Null( cursor, 3358 )then
         a_frs1516.totsvc7 := gse.Integer_Value( cursor, 3358 );
      end if;
      if not gse.Is_Null( cursor, 3359 )then
         a_frs1516.totsvc8 := gse.Integer_Value( cursor, 3359 );
      end if;
      if not gse.Is_Null( cursor, 3360 )then
         a_frs1516.tacamc1:= Amount'Value( gse.Value( cursor, 3360 ));
      end if;
      if not gse.Is_Null( cursor, 3361 )then
         a_frs1516.tacamc2:= Amount'Value( gse.Value( cursor, 3361 ));
      end if;
      if not gse.Is_Null( cursor, 3362 )then
         a_frs1516.tacamc3:= Amount'Value( gse.Value( cursor, 3362 ));
      end if;
      if not gse.Is_Null( cursor, 3363 )then
         a_frs1516.tacamc4:= Amount'Value( gse.Value( cursor, 3363 ));
      end if;
      if not gse.Is_Null( cursor, 3364 )then
         a_frs1516.tacamc5:= Amount'Value( gse.Value( cursor, 3364 ));
      end if;
      if not gse.Is_Null( cursor, 3365 )then
         a_frs1516.tacamc6:= Amount'Value( gse.Value( cursor, 3365 ));
      end if;
      if not gse.Is_Null( cursor, 3366 )then
         a_frs1516.tacamc7 := gse.Integer_Value( cursor, 3366 );
      end if;
      if not gse.Is_Null( cursor, 3367 )then
         a_frs1516.tacamc8 := gse.Integer_Value( cursor, 3367 );
      end if;
      if not gse.Is_Null( cursor, 3368 )then
         a_frs1516.tpeedc1 := gse.Integer_Value( cursor, 3368 );
      end if;
      if not gse.Is_Null( cursor, 3369 )then
         a_frs1516.tpeedc2 := gse.Integer_Value( cursor, 3369 );
      end if;
      if not gse.Is_Null( cursor, 3370 )then
         a_frs1516.tpeedc3 := gse.Integer_Value( cursor, 3370 );
      end if;
      if not gse.Is_Null( cursor, 3371 )then
         a_frs1516.tpeedc4 := gse.Integer_Value( cursor, 3371 );
      end if;
      if not gse.Is_Null( cursor, 3372 )then
         a_frs1516.tpeedc5 := gse.Integer_Value( cursor, 3372 );
      end if;
      if not gse.Is_Null( cursor, 3373 )then
         a_frs1516.tpeedc6 := gse.Integer_Value( cursor, 3373 );
      end if;
      if not gse.Is_Null( cursor, 3374 )then
         a_frs1516.tpeedc7 := gse.Integer_Value( cursor, 3374 );
      end if;
      if not gse.Is_Null( cursor, 3375 )then
         a_frs1516.tpeedc8 := gse.Integer_Value( cursor, 3375 );
      end if;
      if not gse.Is_Null( cursor, 3376 )then
         a_frs1516.uprsoc1 := gse.Integer_Value( cursor, 3376 );
      end if;
      if not gse.Is_Null( cursor, 3377 )then
         a_frs1516.uprsoc2 := gse.Integer_Value( cursor, 3377 );
      end if;
      if not gse.Is_Null( cursor, 3378 )then
         a_frs1516.uprsoc3 := gse.Integer_Value( cursor, 3378 );
      end if;
      if not gse.Is_Null( cursor, 3379 )then
         a_frs1516.uprsoc4 := gse.Integer_Value( cursor, 3379 );
      end if;
      if not gse.Is_Null( cursor, 3380 )then
         a_frs1516.uprsoc5 := gse.Integer_Value( cursor, 3380 );
      end if;
      if not gse.Is_Null( cursor, 3381 )then
         a_frs1516.uprsoc6 := gse.Integer_Value( cursor, 3381 );
      end if;
      if not gse.Is_Null( cursor, 3382 )then
         a_frs1516.uprsoc7 := gse.Integer_Value( cursor, 3382 );
      end if;
      if not gse.Is_Null( cursor, 3383 )then
         a_frs1516.uprsoc8 := gse.Integer_Value( cursor, 3383 );
      end if;
      if not gse.Is_Null( cursor, 3384 )then
         a_frs1516.govpy1hd := gse.Integer_Value( cursor, 3384 );
      end if;
      if not gse.Is_Null( cursor, 3385 )then
         a_frs1516.govpy2hd := gse.Integer_Value( cursor, 3385 );
      end if;
      if not gse.Is_Null( cursor, 3386 )then
         a_frs1516.govpy3hd := gse.Integer_Value( cursor, 3386 );
      end if;
      if not gse.Is_Null( cursor, 3387 )then
         a_frs1516.govpy4hd := gse.Integer_Value( cursor, 3387 );
      end if;
      if not gse.Is_Null( cursor, 3388 )then
         a_frs1516.govpy5hd := gse.Integer_Value( cursor, 3388 );
      end if;
      if not gse.Is_Null( cursor, 3389 )then
         a_frs1516.govpy6hd := gse.Integer_Value( cursor, 3389 );
      end if;
      if not gse.Is_Null( cursor, 3390 )then
         a_frs1516.govpy7hd := gse.Integer_Value( cursor, 3390 );
      end if;
      if not gse.Is_Null( cursor, 3391 )then
         a_frs1516.govpy8hd := gse.Integer_Value( cursor, 3391 );
      end if;
      if not gse.Is_Null( cursor, 3392 )then
         a_frs1516.govpy9hd := gse.Integer_Value( cursor, 3392 );
      end if;
      if not gse.Is_Null( cursor, 3393 )then
         a_frs1516.gvpy10hd := gse.Integer_Value( cursor, 3393 );
      end if;
      if not gse.Is_Null( cursor, 3394 )then
         a_frs1516.gvpy11hd := gse.Integer_Value( cursor, 3394 );
      end if;
      if not gse.Is_Null( cursor, 3395 )then
         a_frs1516.govpy1sp := gse.Integer_Value( cursor, 3395 );
      end if;
      if not gse.Is_Null( cursor, 3396 )then
         a_frs1516.govpy2sp := gse.Integer_Value( cursor, 3396 );
      end if;
      if not gse.Is_Null( cursor, 3397 )then
         a_frs1516.govpy3sp := gse.Integer_Value( cursor, 3397 );
      end if;
      if not gse.Is_Null( cursor, 3398 )then
         a_frs1516.govpy4sp := gse.Integer_Value( cursor, 3398 );
      end if;
      if not gse.Is_Null( cursor, 3399 )then
         a_frs1516.govpy5sp := gse.Integer_Value( cursor, 3399 );
      end if;
      if not gse.Is_Null( cursor, 3400 )then
         a_frs1516.govpy6sp := gse.Integer_Value( cursor, 3400 );
      end if;
      if not gse.Is_Null( cursor, 3401 )then
         a_frs1516.govpy7sp := gse.Integer_Value( cursor, 3401 );
      end if;
      if not gse.Is_Null( cursor, 3402 )then
         a_frs1516.govpy8sp := gse.Integer_Value( cursor, 3402 );
      end if;
      if not gse.Is_Null( cursor, 3403 )then
         a_frs1516.govpy9sp := gse.Integer_Value( cursor, 3403 );
      end if;
      if not gse.Is_Null( cursor, 3404 )then
         a_frs1516.gvpy10sp := gse.Integer_Value( cursor, 3404 );
      end if;
      if not gse.Is_Null( cursor, 3405 )then
         a_frs1516.gvpy11sp := gse.Integer_Value( cursor, 3405 );
      end if;
      if not gse.Is_Null( cursor, 3406 )then
         a_frs1516.nhhamt1:= Amount'Value( gse.Value( cursor, 3406 ));
      end if;
      if not gse.Is_Null( cursor, 3407 )then
         a_frs1516.nhhamt2:= Amount'Value( gse.Value( cursor, 3407 ));
      end if;
      if not gse.Is_Null( cursor, 3408 )then
         a_frs1516.nhhamt3:= Amount'Value( gse.Value( cursor, 3408 ));
      end if;
      if not gse.Is_Null( cursor, 3409 )then
         a_frs1516.nhhamt4:= Amount'Value( gse.Value( cursor, 3409 ));
      end if;
      if not gse.Is_Null( cursor, 3410 )then
         a_frs1516.nhhfee1 := gse.Integer_Value( cursor, 3410 );
      end if;
      if not gse.Is_Null( cursor, 3411 )then
         a_frs1516.nhhfee2 := gse.Integer_Value( cursor, 3411 );
      end if;
      if not gse.Is_Null( cursor, 3412 )then
         a_frs1516.nhhfee3 := gse.Integer_Value( cursor, 3412 );
      end if;
      if not gse.Is_Null( cursor, 3413 )then
         a_frs1516.nhhfee4 := gse.Integer_Value( cursor, 3413 );
      end if;
      if not gse.Is_Null( cursor, 3414 )then
         a_frs1516.pnhhamt1 := gse.Integer_Value( cursor, 3414 );
      end if;
      if not gse.Is_Null( cursor, 3415 )then
         a_frs1516.pnhhamt2 := gse.Integer_Value( cursor, 3415 );
      end if;
      if not gse.Is_Null( cursor, 3416 )then
         a_frs1516.pnhhamt3 := gse.Integer_Value( cursor, 3416 );
      end if;
      if not gse.Is_Null( cursor, 3417 )then
         a_frs1516.pnhhamt4 := gse.Integer_Value( cursor, 3417 );
      end if;
      if not gse.Is_Null( cursor, 3418 )then
         a_frs1516.bona11hd:= Amount'Value( gse.Value( cursor, 3418 ));
      end if;
      if not gse.Is_Null( cursor, 3419 )then
         a_frs1516.bona12hd := gse.Integer_Value( cursor, 3419 );
      end if;
      if not gse.Is_Null( cursor, 3420 )then
         a_frs1516.bona13hd := gse.Integer_Value( cursor, 3420 );
      end if;
      if not gse.Is_Null( cursor, 3421 )then
         a_frs1516.bona11sp:= Amount'Value( gse.Value( cursor, 3421 ));
      end if;
      if not gse.Is_Null( cursor, 3422 )then
         a_frs1516.bona12sp := gse.Integer_Value( cursor, 3422 );
      end if;
      if not gse.Is_Null( cursor, 3423 )then
         a_frs1516.bona13sp := gse.Integer_Value( cursor, 3423 );
      end if;
      if not gse.Is_Null( cursor, 3424 )then
         a_frs1516.bona21hd:= Amount'Value( gse.Value( cursor, 3424 ));
      end if;
      if not gse.Is_Null( cursor, 3425 )then
         a_frs1516.bona22hd := gse.Integer_Value( cursor, 3425 );
      end if;
      if not gse.Is_Null( cursor, 3426 )then
         a_frs1516.bona23hd := gse.Integer_Value( cursor, 3426 );
      end if;
      if not gse.Is_Null( cursor, 3427 )then
         a_frs1516.bona21sp := gse.Integer_Value( cursor, 3427 );
      end if;
      if not gse.Is_Null( cursor, 3428 )then
         a_frs1516.bona22sp := gse.Integer_Value( cursor, 3428 );
      end if;
      if not gse.Is_Null( cursor, 3429 )then
         a_frs1516.bona23sp := gse.Integer_Value( cursor, 3429 );
      end if;
      if not gse.Is_Null( cursor, 3430 )then
         a_frs1516.bona31hd:= Amount'Value( gse.Value( cursor, 3430 ));
      end if;
      if not gse.Is_Null( cursor, 3431 )then
         a_frs1516.bona32hd := gse.Integer_Value( cursor, 3431 );
      end if;
      if not gse.Is_Null( cursor, 3432 )then
         a_frs1516.bona33hd := gse.Integer_Value( cursor, 3432 );
      end if;
      if not gse.Is_Null( cursor, 3433 )then
         a_frs1516.bona31sp := gse.Integer_Value( cursor, 3433 );
      end if;
      if not gse.Is_Null( cursor, 3434 )then
         a_frs1516.bona32sp := gse.Integer_Value( cursor, 3434 );
      end if;
      if not gse.Is_Null( cursor, 3435 )then
         a_frs1516.bona33sp := gse.Integer_Value( cursor, 3435 );
      end if;
      if not gse.Is_Null( cursor, 3436 )then
         a_frs1516.bona41hd:= Amount'Value( gse.Value( cursor, 3436 ));
      end if;
      if not gse.Is_Null( cursor, 3437 )then
         a_frs1516.bona42hd := gse.Integer_Value( cursor, 3437 );
      end if;
      if not gse.Is_Null( cursor, 3438 )then
         a_frs1516.bona43hd := gse.Integer_Value( cursor, 3438 );
      end if;
      if not gse.Is_Null( cursor, 3439 )then
         a_frs1516.bona41sp := gse.Integer_Value( cursor, 3439 );
      end if;
      if not gse.Is_Null( cursor, 3440 )then
         a_frs1516.bona42sp := gse.Integer_Value( cursor, 3440 );
      end if;
      if not gse.Is_Null( cursor, 3441 )then
         a_frs1516.bona43sp := gse.Integer_Value( cursor, 3441 );
      end if;
      if not gse.Is_Null( cursor, 3442 )then
         a_frs1516.bona51hd:= Amount'Value( gse.Value( cursor, 3442 ));
      end if;
      if not gse.Is_Null( cursor, 3443 )then
         a_frs1516.bona52hd := gse.Integer_Value( cursor, 3443 );
      end if;
      if not gse.Is_Null( cursor, 3444 )then
         a_frs1516.bona53hd := gse.Integer_Value( cursor, 3444 );
      end if;
      if not gse.Is_Null( cursor, 3445 )then
         a_frs1516.bona51sp := gse.Integer_Value( cursor, 3445 );
      end if;
      if not gse.Is_Null( cursor, 3446 )then
         a_frs1516.bona52sp := gse.Integer_Value( cursor, 3446 );
      end if;
      if not gse.Is_Null( cursor, 3447 )then
         a_frs1516.bona53sp := gse.Integer_Value( cursor, 3447 );
      end if;
      if not gse.Is_Null( cursor, 3448 )then
         a_frs1516.bona61hd:= Amount'Value( gse.Value( cursor, 3448 ));
      end if;
      if not gse.Is_Null( cursor, 3449 )then
         a_frs1516.bona62hd := gse.Integer_Value( cursor, 3449 );
      end if;
      if not gse.Is_Null( cursor, 3450 )then
         a_frs1516.bona63hd := gse.Integer_Value( cursor, 3450 );
      end if;
      if not gse.Is_Null( cursor, 3451 )then
         a_frs1516.bona61sp := gse.Integer_Value( cursor, 3451 );
      end if;
      if not gse.Is_Null( cursor, 3452 )then
         a_frs1516.bona62sp := gse.Integer_Value( cursor, 3452 );
      end if;
      if not gse.Is_Null( cursor, 3453 )then
         a_frs1516.bona63sp := gse.Integer_Value( cursor, 3453 );
      end if;
      if not gse.Is_Null( cursor, 3454 )then
         a_frs1516.bont11hd := gse.Integer_Value( cursor, 3454 );
      end if;
      if not gse.Is_Null( cursor, 3455 )then
         a_frs1516.bont12hd := gse.Integer_Value( cursor, 3455 );
      end if;
      if not gse.Is_Null( cursor, 3456 )then
         a_frs1516.bont13hd := gse.Integer_Value( cursor, 3456 );
      end if;
      if not gse.Is_Null( cursor, 3457 )then
         a_frs1516.bont11sp := gse.Integer_Value( cursor, 3457 );
      end if;
      if not gse.Is_Null( cursor, 3458 )then
         a_frs1516.bont12sp := gse.Integer_Value( cursor, 3458 );
      end if;
      if not gse.Is_Null( cursor, 3459 )then
         a_frs1516.bont13sp := gse.Integer_Value( cursor, 3459 );
      end if;
      if not gse.Is_Null( cursor, 3460 )then
         a_frs1516.bont21hd := gse.Integer_Value( cursor, 3460 );
      end if;
      if not gse.Is_Null( cursor, 3461 )then
         a_frs1516.bont22hd := gse.Integer_Value( cursor, 3461 );
      end if;
      if not gse.Is_Null( cursor, 3462 )then
         a_frs1516.bont23hd := gse.Integer_Value( cursor, 3462 );
      end if;
      if not gse.Is_Null( cursor, 3463 )then
         a_frs1516.bont21sp := gse.Integer_Value( cursor, 3463 );
      end if;
      if not gse.Is_Null( cursor, 3464 )then
         a_frs1516.bont22sp := gse.Integer_Value( cursor, 3464 );
      end if;
      if not gse.Is_Null( cursor, 3465 )then
         a_frs1516.bont23sp := gse.Integer_Value( cursor, 3465 );
      end if;
      if not gse.Is_Null( cursor, 3466 )then
         a_frs1516.bont31hd := gse.Integer_Value( cursor, 3466 );
      end if;
      if not gse.Is_Null( cursor, 3467 )then
         a_frs1516.bont32hd := gse.Integer_Value( cursor, 3467 );
      end if;
      if not gse.Is_Null( cursor, 3468 )then
         a_frs1516.bont33hd := gse.Integer_Value( cursor, 3468 );
      end if;
      if not gse.Is_Null( cursor, 3469 )then
         a_frs1516.bont31sp := gse.Integer_Value( cursor, 3469 );
      end if;
      if not gse.Is_Null( cursor, 3470 )then
         a_frs1516.bont32sp := gse.Integer_Value( cursor, 3470 );
      end if;
      if not gse.Is_Null( cursor, 3471 )then
         a_frs1516.bont33sp := gse.Integer_Value( cursor, 3471 );
      end if;
      if not gse.Is_Null( cursor, 3472 )then
         a_frs1516.bont41hd := gse.Integer_Value( cursor, 3472 );
      end if;
      if not gse.Is_Null( cursor, 3473 )then
         a_frs1516.bont42hd := gse.Integer_Value( cursor, 3473 );
      end if;
      if not gse.Is_Null( cursor, 3474 )then
         a_frs1516.bont43hd := gse.Integer_Value( cursor, 3474 );
      end if;
      if not gse.Is_Null( cursor, 3475 )then
         a_frs1516.bont41sp := gse.Integer_Value( cursor, 3475 );
      end if;
      if not gse.Is_Null( cursor, 3476 )then
         a_frs1516.bont42sp := gse.Integer_Value( cursor, 3476 );
      end if;
      if not gse.Is_Null( cursor, 3477 )then
         a_frs1516.bont43sp := gse.Integer_Value( cursor, 3477 );
      end if;
      if not gse.Is_Null( cursor, 3478 )then
         a_frs1516.bont51hd := gse.Integer_Value( cursor, 3478 );
      end if;
      if not gse.Is_Null( cursor, 3479 )then
         a_frs1516.bont52hd := gse.Integer_Value( cursor, 3479 );
      end if;
      if not gse.Is_Null( cursor, 3480 )then
         a_frs1516.bont53hd := gse.Integer_Value( cursor, 3480 );
      end if;
      if not gse.Is_Null( cursor, 3481 )then
         a_frs1516.bont51sp := gse.Integer_Value( cursor, 3481 );
      end if;
      if not gse.Is_Null( cursor, 3482 )then
         a_frs1516.bont52sp := gse.Integer_Value( cursor, 3482 );
      end if;
      if not gse.Is_Null( cursor, 3483 )then
         a_frs1516.bont53sp := gse.Integer_Value( cursor, 3483 );
      end if;
      if not gse.Is_Null( cursor, 3484 )then
         a_frs1516.bont61hd := gse.Integer_Value( cursor, 3484 );
      end if;
      if not gse.Is_Null( cursor, 3485 )then
         a_frs1516.bont62hd := gse.Integer_Value( cursor, 3485 );
      end if;
      if not gse.Is_Null( cursor, 3486 )then
         a_frs1516.bont63hd := gse.Integer_Value( cursor, 3486 );
      end if;
      if not gse.Is_Null( cursor, 3487 )then
         a_frs1516.bont61sp := gse.Integer_Value( cursor, 3487 );
      end if;
      if not gse.Is_Null( cursor, 3488 )then
         a_frs1516.bont62sp := gse.Integer_Value( cursor, 3488 );
      end if;
      if not gse.Is_Null( cursor, 3489 )then
         a_frs1516.bont63sp := gse.Integer_Value( cursor, 3489 );
      end if;
      if not gse.Is_Null( cursor, 3490 )then
         a_frs1516.btax11hd:= Amount'Value( gse.Value( cursor, 3490 ));
      end if;
      if not gse.Is_Null( cursor, 3491 )then
         a_frs1516.btax12hd:= Amount'Value( gse.Value( cursor, 3491 ));
      end if;
      if not gse.Is_Null( cursor, 3492 )then
         a_frs1516.btax13hd := gse.Integer_Value( cursor, 3492 );
      end if;
      if not gse.Is_Null( cursor, 3493 )then
         a_frs1516.btax11sp:= Amount'Value( gse.Value( cursor, 3493 ));
      end if;
      if not gse.Is_Null( cursor, 3494 )then
         a_frs1516.btax12sp := gse.Integer_Value( cursor, 3494 );
      end if;
      if not gse.Is_Null( cursor, 3495 )then
         a_frs1516.btax13sp := gse.Integer_Value( cursor, 3495 );
      end if;
      if not gse.Is_Null( cursor, 3496 )then
         a_frs1516.btax21hd:= Amount'Value( gse.Value( cursor, 3496 ));
      end if;
      if not gse.Is_Null( cursor, 3497 )then
         a_frs1516.btax22hd := gse.Integer_Value( cursor, 3497 );
      end if;
      if not gse.Is_Null( cursor, 3498 )then
         a_frs1516.btax23hd := gse.Integer_Value( cursor, 3498 );
      end if;
      if not gse.Is_Null( cursor, 3499 )then
         a_frs1516.btax21sp:= Amount'Value( gse.Value( cursor, 3499 ));
      end if;
      if not gse.Is_Null( cursor, 3500 )then
         a_frs1516.btax22sp := gse.Integer_Value( cursor, 3500 );
      end if;
      if not gse.Is_Null( cursor, 3501 )then
         a_frs1516.btax23sp := gse.Integer_Value( cursor, 3501 );
      end if;
      if not gse.Is_Null( cursor, 3502 )then
         a_frs1516.btax31hd:= Amount'Value( gse.Value( cursor, 3502 ));
      end if;
      if not gse.Is_Null( cursor, 3503 )then
         a_frs1516.btax32hd := gse.Integer_Value( cursor, 3503 );
      end if;
      if not gse.Is_Null( cursor, 3504 )then
         a_frs1516.btax33hd := gse.Integer_Value( cursor, 3504 );
      end if;
      if not gse.Is_Null( cursor, 3505 )then
         a_frs1516.btax31sp:= Amount'Value( gse.Value( cursor, 3505 ));
      end if;
      if not gse.Is_Null( cursor, 3506 )then
         a_frs1516.btax32sp := gse.Integer_Value( cursor, 3506 );
      end if;
      if not gse.Is_Null( cursor, 3507 )then
         a_frs1516.btax33sp := gse.Integer_Value( cursor, 3507 );
      end if;
      if not gse.Is_Null( cursor, 3508 )then
         a_frs1516.btax41hd:= Amount'Value( gse.Value( cursor, 3508 ));
      end if;
      if not gse.Is_Null( cursor, 3509 )then
         a_frs1516.btax42hd := gse.Integer_Value( cursor, 3509 );
      end if;
      if not gse.Is_Null( cursor, 3510 )then
         a_frs1516.btax43hd := gse.Integer_Value( cursor, 3510 );
      end if;
      if not gse.Is_Null( cursor, 3511 )then
         a_frs1516.btax41sp:= Amount'Value( gse.Value( cursor, 3511 ));
      end if;
      if not gse.Is_Null( cursor, 3512 )then
         a_frs1516.btax42sp := gse.Integer_Value( cursor, 3512 );
      end if;
      if not gse.Is_Null( cursor, 3513 )then
         a_frs1516.btax43sp := gse.Integer_Value( cursor, 3513 );
      end if;
      if not gse.Is_Null( cursor, 3514 )then
         a_frs1516.btax51hd:= Amount'Value( gse.Value( cursor, 3514 ));
      end if;
      if not gse.Is_Null( cursor, 3515 )then
         a_frs1516.btax52hd := gse.Integer_Value( cursor, 3515 );
      end if;
      if not gse.Is_Null( cursor, 3516 )then
         a_frs1516.btax53hd := gse.Integer_Value( cursor, 3516 );
      end if;
      if not gse.Is_Null( cursor, 3517 )then
         a_frs1516.btax51sp:= Amount'Value( gse.Value( cursor, 3517 ));
      end if;
      if not gse.Is_Null( cursor, 3518 )then
         a_frs1516.btax52sp := gse.Integer_Value( cursor, 3518 );
      end if;
      if not gse.Is_Null( cursor, 3519 )then
         a_frs1516.btax53sp := gse.Integer_Value( cursor, 3519 );
      end if;
      if not gse.Is_Null( cursor, 3520 )then
         a_frs1516.btax61hd:= Amount'Value( gse.Value( cursor, 3520 ));
      end if;
      if not gse.Is_Null( cursor, 3521 )then
         a_frs1516.btax62hd := gse.Integer_Value( cursor, 3521 );
      end if;
      if not gse.Is_Null( cursor, 3522 )then
         a_frs1516.btax63hd := gse.Integer_Value( cursor, 3522 );
      end if;
      if not gse.Is_Null( cursor, 3523 )then
         a_frs1516.btax61sp := gse.Integer_Value( cursor, 3523 );
      end if;
      if not gse.Is_Null( cursor, 3524 )then
         a_frs1516.btax62sp := gse.Integer_Value( cursor, 3524 );
      end if;
      if not gse.Is_Null( cursor, 3525 )then
         a_frs1516.btax63sp := gse.Integer_Value( cursor, 3525 );
      end if;
      if not gse.Is_Null( cursor, 3526 )then
         a_frs1516.busac1hd := gse.Integer_Value( cursor, 3526 );
      end if;
      if not gse.Is_Null( cursor, 3527 )then
         a_frs1516.busac2hd := gse.Integer_Value( cursor, 3527 );
      end if;
      if not gse.Is_Null( cursor, 3528 )then
         a_frs1516.busac3hd := gse.Integer_Value( cursor, 3528 );
      end if;
      if not gse.Is_Null( cursor, 3529 )then
         a_frs1516.busac1sp := gse.Integer_Value( cursor, 3529 );
      end if;
      if not gse.Is_Null( cursor, 3530 )then
         a_frs1516.busac2sp := gse.Integer_Value( cursor, 3530 );
      end if;
      if not gse.Is_Null( cursor, 3531 )then
         a_frs1516.busac3sp := gse.Integer_Value( cursor, 3531 );
      end if;
      if not gse.Is_Null( cursor, 3532 )then
         a_frs1516.caram1hd:= Amount'Value( gse.Value( cursor, 3532 ));
      end if;
      if not gse.Is_Null( cursor, 3533 )then
         a_frs1516.caram2hd := gse.Integer_Value( cursor, 3533 );
      end if;
      if not gse.Is_Null( cursor, 3534 )then
         a_frs1516.caram3hd := gse.Integer_Value( cursor, 3534 );
      end if;
      if not gse.Is_Null( cursor, 3535 )then
         a_frs1516.caram1sp:= Amount'Value( gse.Value( cursor, 3535 ));
      end if;
      if not gse.Is_Null( cursor, 3536 )then
         a_frs1516.caram2sp := gse.Integer_Value( cursor, 3536 );
      end if;
      if not gse.Is_Null( cursor, 3537 )then
         a_frs1516.caram3sp := gse.Integer_Value( cursor, 3537 );
      end if;
      if not gse.Is_Null( cursor, 3538 )then
         a_frs1516.carcn1hd := gse.Integer_Value( cursor, 3538 );
      end if;
      if not gse.Is_Null( cursor, 3539 )then
         a_frs1516.carcn2hd := gse.Integer_Value( cursor, 3539 );
      end if;
      if not gse.Is_Null( cursor, 3540 )then
         a_frs1516.carcn3hd := gse.Integer_Value( cursor, 3540 );
      end if;
      if not gse.Is_Null( cursor, 3541 )then
         a_frs1516.carcn1sp := gse.Integer_Value( cursor, 3541 );
      end if;
      if not gse.Is_Null( cursor, 3542 )then
         a_frs1516.carcn2sp := gse.Integer_Value( cursor, 3542 );
      end if;
      if not gse.Is_Null( cursor, 3543 )then
         a_frs1516.carcn3sp := gse.Integer_Value( cursor, 3543 );
      end if;
      if not gse.Is_Null( cursor, 3544 )then
         a_frs1516.carvl1hd := gse.Integer_Value( cursor, 3544 );
      end if;
      if not gse.Is_Null( cursor, 3545 )then
         a_frs1516.carvl2hd := gse.Integer_Value( cursor, 3545 );
      end if;
      if not gse.Is_Null( cursor, 3546 )then
         a_frs1516.carvl3hd := gse.Integer_Value( cursor, 3546 );
      end if;
      if not gse.Is_Null( cursor, 3547 )then
         a_frs1516.carvl1sp := gse.Integer_Value( cursor, 3547 );
      end if;
      if not gse.Is_Null( cursor, 3548 )then
         a_frs1516.carvl2sp := gse.Integer_Value( cursor, 3548 );
      end if;
      if not gse.Is_Null( cursor, 3549 )then
         a_frs1516.carvl3sp := gse.Integer_Value( cursor, 3549 );
      end if;
      if not gse.Is_Null( cursor, 3550 )then
         a_frs1516.chktx1hd := gse.Integer_Value( cursor, 3550 );
      end if;
      if not gse.Is_Null( cursor, 3551 )then
         a_frs1516.chktx2hd := gse.Integer_Value( cursor, 3551 );
      end if;
      if not gse.Is_Null( cursor, 3552 )then
         a_frs1516.chktx3hd := gse.Integer_Value( cursor, 3552 );
      end if;
      if not gse.Is_Null( cursor, 3553 )then
         a_frs1516.chktx1sp := gse.Integer_Value( cursor, 3553 );
      end if;
      if not gse.Is_Null( cursor, 3554 )then
         a_frs1516.chktx2sp := gse.Integer_Value( cursor, 3554 );
      end if;
      if not gse.Is_Null( cursor, 3555 )then
         a_frs1516.chktx3sp := gse.Integer_Value( cursor, 3555 );
      end if;
      if not gse.Is_Null( cursor, 3556 )then
         a_frs1516.chcom1hd := gse.Integer_Value( cursor, 3556 );
      end if;
      if not gse.Is_Null( cursor, 3557 )then
         a_frs1516.chcom2hd := gse.Integer_Value( cursor, 3557 );
      end if;
      if not gse.Is_Null( cursor, 3558 )then
         a_frs1516.chcom3hd := gse.Integer_Value( cursor, 3558 );
      end if;
      if not gse.Is_Null( cursor, 3559 )then
         a_frs1516.chcom1sp := gse.Integer_Value( cursor, 3559 );
      end if;
      if not gse.Is_Null( cursor, 3560 )then
         a_frs1516.chcom2sp := gse.Integer_Value( cursor, 3560 );
      end if;
      if not gse.Is_Null( cursor, 3561 )then
         a_frs1516.chcom3sp := gse.Integer_Value( cursor, 3561 );
      end if;
      if not gse.Is_Null( cursor, 3562 )then
         a_frs1516.chvam1hd:= Amount'Value( gse.Value( cursor, 3562 ));
      end if;
      if not gse.Is_Null( cursor, 3563 )then
         a_frs1516.chvam2hd := gse.Integer_Value( cursor, 3563 );
      end if;
      if not gse.Is_Null( cursor, 3564 )then
         a_frs1516.chvam3hd := gse.Integer_Value( cursor, 3564 );
      end if;
      if not gse.Is_Null( cursor, 3565 )then
         a_frs1516.chvam1sp:= Amount'Value( gse.Value( cursor, 3565 ));
      end if;
      if not gse.Is_Null( cursor, 3566 )then
         a_frs1516.chvam2sp:= Amount'Value( gse.Value( cursor, 3566 ));
      end if;
      if not gse.Is_Null( cursor, 3567 )then
         a_frs1516.chvam3sp := gse.Integer_Value( cursor, 3567 );
      end if;
      if not gse.Is_Null( cursor, 3568 )then
         a_frs1516.chvpd1hd := gse.Integer_Value( cursor, 3568 );
      end if;
      if not gse.Is_Null( cursor, 3569 )then
         a_frs1516.chvpd2hd := gse.Integer_Value( cursor, 3569 );
      end if;
      if not gse.Is_Null( cursor, 3570 )then
         a_frs1516.chvpd3hd := gse.Integer_Value( cursor, 3570 );
      end if;
      if not gse.Is_Null( cursor, 3571 )then
         a_frs1516.chvpd1sp := gse.Integer_Value( cursor, 3571 );
      end if;
      if not gse.Is_Null( cursor, 3572 )then
         a_frs1516.chvpd2sp := gse.Integer_Value( cursor, 3572 );
      end if;
      if not gse.Is_Null( cursor, 3573 )then
         a_frs1516.chvpd3sp := gse.Integer_Value( cursor, 3573 );
      end if;
      if not gse.Is_Null( cursor, 3574 )then
         a_frs1516.chsac1hd := gse.Integer_Value( cursor, 3574 );
      end if;
      if not gse.Is_Null( cursor, 3575 )then
         a_frs1516.chsac2hd := gse.Integer_Value( cursor, 3575 );
      end if;
      if not gse.Is_Null( cursor, 3576 )then
         a_frs1516.chsac3hd := gse.Integer_Value( cursor, 3576 );
      end if;
      if not gse.Is_Null( cursor, 3577 )then
         a_frs1516.chsac1sp := gse.Integer_Value( cursor, 3577 );
      end if;
      if not gse.Is_Null( cursor, 3578 )then
         a_frs1516.chsac2sp := gse.Integer_Value( cursor, 3578 );
      end if;
      if not gse.Is_Null( cursor, 3579 )then
         a_frs1516.chsac3sp := gse.Integer_Value( cursor, 3579 );
      end if;
      if not gse.Is_Null( cursor, 3580 )then
         a_frs1516.chuam1hd := gse.Integer_Value( cursor, 3580 );
      end if;
      if not gse.Is_Null( cursor, 3581 )then
         a_frs1516.chuam2hd := gse.Integer_Value( cursor, 3581 );
      end if;
      if not gse.Is_Null( cursor, 3582 )then
         a_frs1516.chuam3hd := gse.Integer_Value( cursor, 3582 );
      end if;
      if not gse.Is_Null( cursor, 3583 )then
         a_frs1516.chuam1sp := gse.Integer_Value( cursor, 3583 );
      end if;
      if not gse.Is_Null( cursor, 3584 )then
         a_frs1516.chuam2sp := gse.Integer_Value( cursor, 3584 );
      end if;
      if not gse.Is_Null( cursor, 3585 )then
         a_frs1516.chuam3sp := gse.Integer_Value( cursor, 3585 );
      end if;
      if not gse.Is_Null( cursor, 3586 )then
         a_frs1516.chupd1hd := gse.Integer_Value( cursor, 3586 );
      end if;
      if not gse.Is_Null( cursor, 3587 )then
         a_frs1516.chupd2hd := gse.Integer_Value( cursor, 3587 );
      end if;
      if not gse.Is_Null( cursor, 3588 )then
         a_frs1516.chupd3hd := gse.Integer_Value( cursor, 3588 );
      end if;
      if not gse.Is_Null( cursor, 3589 )then
         a_frs1516.chupd1sp := gse.Integer_Value( cursor, 3589 );
      end if;
      if not gse.Is_Null( cursor, 3590 )then
         a_frs1516.chupd2sp := gse.Integer_Value( cursor, 3590 );
      end if;
      if not gse.Is_Null( cursor, 3591 )then
         a_frs1516.chupd3sp := gse.Integer_Value( cursor, 3591 );
      end if;
      if not gse.Is_Null( cursor, 3592 )then
         a_frs1516.chusu1hd := gse.Integer_Value( cursor, 3592 );
      end if;
      if not gse.Is_Null( cursor, 3593 )then
         a_frs1516.chusu2hd := gse.Integer_Value( cursor, 3593 );
      end if;
      if not gse.Is_Null( cursor, 3594 )then
         a_frs1516.chusu3hd := gse.Integer_Value( cursor, 3594 );
      end if;
      if not gse.Is_Null( cursor, 3595 )then
         a_frs1516.chusu1sp := gse.Integer_Value( cursor, 3595 );
      end if;
      if not gse.Is_Null( cursor, 3596 )then
         a_frs1516.chusu2sp := gse.Integer_Value( cursor, 3596 );
      end if;
      if not gse.Is_Null( cursor, 3597 )then
         a_frs1516.chusu3sp := gse.Integer_Value( cursor, 3597 );
      end if;
      if not gse.Is_Null( cursor, 3598 )then
         a_frs1516.doth1hd:= Amount'Value( gse.Value( cursor, 3598 ));
      end if;
      if not gse.Is_Null( cursor, 3599 )then
         a_frs1516.doth2hd:= Amount'Value( gse.Value( cursor, 3599 ));
      end if;
      if not gse.Is_Null( cursor, 3600 )then
         a_frs1516.doth3hd := gse.Integer_Value( cursor, 3600 );
      end if;
      if not gse.Is_Null( cursor, 3601 )then
         a_frs1516.doth1sp:= Amount'Value( gse.Value( cursor, 3601 ));
      end if;
      if not gse.Is_Null( cursor, 3602 )then
         a_frs1516.doth2sp := gse.Integer_Value( cursor, 3602 );
      end if;
      if not gse.Is_Null( cursor, 3603 )then
         a_frs1516.doth3sp := gse.Integer_Value( cursor, 3603 );
      end if;
      if not gse.Is_Null( cursor, 3604 )then
         a_frs1516.dpen1hd:= Amount'Value( gse.Value( cursor, 3604 ));
      end if;
      if not gse.Is_Null( cursor, 3605 )then
         a_frs1516.dpen2hd:= Amount'Value( gse.Value( cursor, 3605 ));
      end if;
      if not gse.Is_Null( cursor, 3606 )then
         a_frs1516.dpen3hd := gse.Integer_Value( cursor, 3606 );
      end if;
      if not gse.Is_Null( cursor, 3607 )then
         a_frs1516.dpen1sp:= Amount'Value( gse.Value( cursor, 3607 ));
      end if;
      if not gse.Is_Null( cursor, 3608 )then
         a_frs1516.dpen2sp:= Amount'Value( gse.Value( cursor, 3608 ));
      end if;
      if not gse.Is_Null( cursor, 3609 )then
         a_frs1516.dpen3sp := gse.Integer_Value( cursor, 3609 );
      end if;
      if not gse.Is_Null( cursor, 3610 )then
         a_frs1516.davc1hd:= Amount'Value( gse.Value( cursor, 3610 ));
      end if;
      if not gse.Is_Null( cursor, 3611 )then
         a_frs1516.davc2hd := gse.Integer_Value( cursor, 3611 );
      end if;
      if not gse.Is_Null( cursor, 3612 )then
         a_frs1516.davc3hd := gse.Integer_Value( cursor, 3612 );
      end if;
      if not gse.Is_Null( cursor, 3613 )then
         a_frs1516.davc1sp:= Amount'Value( gse.Value( cursor, 3613 ));
      end if;
      if not gse.Is_Null( cursor, 3614 )then
         a_frs1516.davc2sp := gse.Integer_Value( cursor, 3614 );
      end if;
      if not gse.Is_Null( cursor, 3615 )then
         a_frs1516.davc3sp := gse.Integer_Value( cursor, 3615 );
      end if;
      if not gse.Is_Null( cursor, 3616 )then
         a_frs1516.dtuf1hd:= Amount'Value( gse.Value( cursor, 3616 ));
      end if;
      if not gse.Is_Null( cursor, 3617 )then
         a_frs1516.dtuf2hd:= Amount'Value( gse.Value( cursor, 3617 ));
      end if;
      if not gse.Is_Null( cursor, 3618 )then
         a_frs1516.dtuf3hd := gse.Integer_Value( cursor, 3618 );
      end if;
      if not gse.Is_Null( cursor, 3619 )then
         a_frs1516.dtuf1sp:= Amount'Value( gse.Value( cursor, 3619 ));
      end if;
      if not gse.Is_Null( cursor, 3620 )then
         a_frs1516.dtuf2sp:= Amount'Value( gse.Value( cursor, 3620 ));
      end if;
      if not gse.Is_Null( cursor, 3621 )then
         a_frs1516.dtuf3sp := gse.Integer_Value( cursor, 3621 );
      end if;
      if not gse.Is_Null( cursor, 3622 )then
         a_frs1516.dfrso1hd:= Amount'Value( gse.Value( cursor, 3622 ));
      end if;
      if not gse.Is_Null( cursor, 3623 )then
         a_frs1516.dfrso2hd := gse.Integer_Value( cursor, 3623 );
      end if;
      if not gse.Is_Null( cursor, 3624 )then
         a_frs1516.dfrso3hd := gse.Integer_Value( cursor, 3624 );
      end if;
      if not gse.Is_Null( cursor, 3625 )then
         a_frs1516.dfrso1sp:= Amount'Value( gse.Value( cursor, 3625 ));
      end if;
      if not gse.Is_Null( cursor, 3626 )then
         a_frs1516.dfrso2sp := gse.Integer_Value( cursor, 3626 );
      end if;
      if not gse.Is_Null( cursor, 3627 )then
         a_frs1516.dfrso3sp := gse.Integer_Value( cursor, 3627 );
      end if;
      if not gse.Is_Null( cursor, 3628 )then
         a_frs1516.dspor1hd:= Amount'Value( gse.Value( cursor, 3628 ));
      end if;
      if not gse.Is_Null( cursor, 3629 )then
         a_frs1516.dspor2hd := gse.Integer_Value( cursor, 3629 );
      end if;
      if not gse.Is_Null( cursor, 3630 )then
         a_frs1516.dspor3hd := gse.Integer_Value( cursor, 3630 );
      end if;
      if not gse.Is_Null( cursor, 3631 )then
         a_frs1516.dspor1sp:= Amount'Value( gse.Value( cursor, 3631 ));
      end if;
      if not gse.Is_Null( cursor, 3632 )then
         a_frs1516.dspor2sp := gse.Integer_Value( cursor, 3632 );
      end if;
      if not gse.Is_Null( cursor, 3633 )then
         a_frs1516.dspor3sp := gse.Integer_Value( cursor, 3633 );
      end if;
      if not gse.Is_Null( cursor, 3634 )then
         a_frs1516.drepl1hd:= Amount'Value( gse.Value( cursor, 3634 ));
      end if;
      if not gse.Is_Null( cursor, 3635 )then
         a_frs1516.drepl2hd := gse.Integer_Value( cursor, 3635 );
      end if;
      if not gse.Is_Null( cursor, 3636 )then
         a_frs1516.drepl3hd := gse.Integer_Value( cursor, 3636 );
      end if;
      if not gse.Is_Null( cursor, 3637 )then
         a_frs1516.drepl1sp:= Amount'Value( gse.Value( cursor, 3637 ));
      end if;
      if not gse.Is_Null( cursor, 3638 )then
         a_frs1516.drepl2sp := gse.Integer_Value( cursor, 3638 );
      end if;
      if not gse.Is_Null( cursor, 3639 )then
         a_frs1516.drepl3sp := gse.Integer_Value( cursor, 3639 );
      end if;
      if not gse.Is_Null( cursor, 3640 )then
         a_frs1516.dmed1hd:= Amount'Value( gse.Value( cursor, 3640 ));
      end if;
      if not gse.Is_Null( cursor, 3641 )then
         a_frs1516.dmed2hd := gse.Integer_Value( cursor, 3641 );
      end if;
      if not gse.Is_Null( cursor, 3642 )then
         a_frs1516.dmed3hd := gse.Integer_Value( cursor, 3642 );
      end if;
      if not gse.Is_Null( cursor, 3643 )then
         a_frs1516.dmed1sp:= Amount'Value( gse.Value( cursor, 3643 ));
      end if;
      if not gse.Is_Null( cursor, 3644 )then
         a_frs1516.dmed2sp := gse.Integer_Value( cursor, 3644 );
      end if;
      if not gse.Is_Null( cursor, 3645 )then
         a_frs1516.dmed3sp := gse.Integer_Value( cursor, 3645 );
      end if;
      if not gse.Is_Null( cursor, 3646 )then
         a_frs1516.dchar1hd:= Amount'Value( gse.Value( cursor, 3646 ));
      end if;
      if not gse.Is_Null( cursor, 3647 )then
         a_frs1516.dchar2hd:= Amount'Value( gse.Value( cursor, 3647 ));
      end if;
      if not gse.Is_Null( cursor, 3648 )then
         a_frs1516.dchar3hd := gse.Integer_Value( cursor, 3648 );
      end if;
      if not gse.Is_Null( cursor, 3649 )then
         a_frs1516.dchar1sp:= Amount'Value( gse.Value( cursor, 3649 ));
      end if;
      if not gse.Is_Null( cursor, 3650 )then
         a_frs1516.dchar2sp := gse.Integer_Value( cursor, 3650 );
      end if;
      if not gse.Is_Null( cursor, 3651 )then
         a_frs1516.dchar3sp := gse.Integer_Value( cursor, 3651 );
      end if;
      if not gse.Is_Null( cursor, 3652 )then
         a_frs1516.dslrp1hd:= Amount'Value( gse.Value( cursor, 3652 ));
      end if;
      if not gse.Is_Null( cursor, 3653 )then
         a_frs1516.dslrp2hd := gse.Integer_Value( cursor, 3653 );
      end if;
      if not gse.Is_Null( cursor, 3654 )then
         a_frs1516.dslrp3hd := gse.Integer_Value( cursor, 3654 );
      end if;
      if not gse.Is_Null( cursor, 3655 )then
         a_frs1516.dslrp1sp:= Amount'Value( gse.Value( cursor, 3655 ));
      end if;
      if not gse.Is_Null( cursor, 3656 )then
         a_frs1516.dslrp2sp := gse.Integer_Value( cursor, 3656 );
      end if;
      if not gse.Is_Null( cursor, 3657 )then
         a_frs1516.dslrp3sp := gse.Integer_Value( cursor, 3657 );
      end if;
      if not gse.Is_Null( cursor, 3658 )then
         a_frs1516.dirni1hd := gse.Integer_Value( cursor, 3658 );
      end if;
      if not gse.Is_Null( cursor, 3659 )then
         a_frs1516.dirni2hd := gse.Integer_Value( cursor, 3659 );
      end if;
      if not gse.Is_Null( cursor, 3660 )then
         a_frs1516.dirni3hd := gse.Integer_Value( cursor, 3660 );
      end if;
      if not gse.Is_Null( cursor, 3661 )then
         a_frs1516.dirni1sp := gse.Integer_Value( cursor, 3661 );
      end if;
      if not gse.Is_Null( cursor, 3662 )then
         a_frs1516.dirni2sp := gse.Integer_Value( cursor, 3662 );
      end if;
      if not gse.Is_Null( cursor, 3663 )then
         a_frs1516.dirni3sp := gse.Integer_Value( cursor, 3663 );
      end if;
      if not gse.Is_Null( cursor, 3664 )then
         a_frs1516.totov1hd := gse.Integer_Value( cursor, 3664 );
      end if;
      if not gse.Is_Null( cursor, 3665 )then
         a_frs1516.totov2hd := gse.Integer_Value( cursor, 3665 );
      end if;
      if not gse.Is_Null( cursor, 3666 )then
         a_frs1516.totov3hd := gse.Integer_Value( cursor, 3666 );
      end if;
      if not gse.Is_Null( cursor, 3667 )then
         a_frs1516.totov1sp := gse.Integer_Value( cursor, 3667 );
      end if;
      if not gse.Is_Null( cursor, 3668 )then
         a_frs1516.totov2sp := gse.Integer_Value( cursor, 3668 );
      end if;
      if not gse.Is_Null( cursor, 3669 )then
         a_frs1516.totov3sp := gse.Integer_Value( cursor, 3669 );
      end if;
      if not gse.Is_Null( cursor, 3670 )then
         a_frs1516.dvuhr1hd:= Amount'Value( gse.Value( cursor, 3670 ));
      end if;
      if not gse.Is_Null( cursor, 3671 )then
         a_frs1516.dvuhr2hd:= Amount'Value( gse.Value( cursor, 3671 ));
      end if;
      if not gse.Is_Null( cursor, 3672 )then
         a_frs1516.dvuhr3hd:= Amount'Value( gse.Value( cursor, 3672 ));
      end if;
      if not gse.Is_Null( cursor, 3673 )then
         a_frs1516.dvuhr1sp:= Amount'Value( gse.Value( cursor, 3673 ));
      end if;
      if not gse.Is_Null( cursor, 3674 )then
         a_frs1516.dvuhr2sp:= Amount'Value( gse.Value( cursor, 3674 ));
      end if;
      if not gse.Is_Null( cursor, 3675 )then
         a_frs1516.dvuhr3sp := gse.Integer_Value( cursor, 3675 );
      end if;
      if not gse.Is_Null( cursor, 3676 )then
         a_frs1516.empan1hd := gse.Integer_Value( cursor, 3676 );
      end if;
      if not gse.Is_Null( cursor, 3677 )then
         a_frs1516.empan2hd := gse.Integer_Value( cursor, 3677 );
      end if;
      if not gse.Is_Null( cursor, 3678 )then
         a_frs1516.empan3hd := gse.Integer_Value( cursor, 3678 );
      end if;
      if not gse.Is_Null( cursor, 3679 )then
         a_frs1516.empan1sp := gse.Integer_Value( cursor, 3679 );
      end if;
      if not gse.Is_Null( cursor, 3680 )then
         a_frs1516.empan2sp := gse.Integer_Value( cursor, 3680 );
      end if;
      if not gse.Is_Null( cursor, 3681 )then
         a_frs1516.empan3sp := gse.Integer_Value( cursor, 3681 );
      end if;
      if not gse.Is_Null( cursor, 3682 )then
         a_frs1516.empen1hd := gse.Integer_Value( cursor, 3682 );
      end if;
      if not gse.Is_Null( cursor, 3683 )then
         a_frs1516.empen2hd := gse.Integer_Value( cursor, 3683 );
      end if;
      if not gse.Is_Null( cursor, 3684 )then
         a_frs1516.empen3hd := gse.Integer_Value( cursor, 3684 );
      end if;
      if not gse.Is_Null( cursor, 3685 )then
         a_frs1516.empen1sp := gse.Integer_Value( cursor, 3685 );
      end if;
      if not gse.Is_Null( cursor, 3686 )then
         a_frs1516.empen2sp := gse.Integer_Value( cursor, 3686 );
      end if;
      if not gse.Is_Null( cursor, 3687 )then
         a_frs1516.empen3sp := gse.Integer_Value( cursor, 3687 );
      end if;
      if not gse.Is_Null( cursor, 3688 )then
         a_frs1516.etype1hd := gse.Integer_Value( cursor, 3688 );
      end if;
      if not gse.Is_Null( cursor, 3689 )then
         a_frs1516.etype2hd := gse.Integer_Value( cursor, 3689 );
      end if;
      if not gse.Is_Null( cursor, 3690 )then
         a_frs1516.etype3hd := gse.Integer_Value( cursor, 3690 );
      end if;
      if not gse.Is_Null( cursor, 3691 )then
         a_frs1516.etype1sp := gse.Integer_Value( cursor, 3691 );
      end if;
      if not gse.Is_Null( cursor, 3692 )then
         a_frs1516.etype2sp := gse.Integer_Value( cursor, 3692 );
      end if;
      if not gse.Is_Null( cursor, 3693 )then
         a_frs1516.etype3sp := gse.Integer_Value( cursor, 3693 );
      end if;
      if not gse.Is_Null( cursor, 3694 )then
         a_frs1516.evrot1hd := gse.Integer_Value( cursor, 3694 );
      end if;
      if not gse.Is_Null( cursor, 3695 )then
         a_frs1516.evrot2hd := gse.Integer_Value( cursor, 3695 );
      end if;
      if not gse.Is_Null( cursor, 3696 )then
         a_frs1516.evrot3hd := gse.Integer_Value( cursor, 3696 );
      end if;
      if not gse.Is_Null( cursor, 3697 )then
         a_frs1516.evrot1sp := gse.Integer_Value( cursor, 3697 );
      end if;
      if not gse.Is_Null( cursor, 3698 )then
         a_frs1516.evrot2sp := gse.Integer_Value( cursor, 3698 );
      end if;
      if not gse.Is_Null( cursor, 3699 )then
         a_frs1516.evrot3sp := gse.Integer_Value( cursor, 3699 );
      end if;
      if not gse.Is_Null( cursor, 3700 )then
         a_frs1516.exb011hd := gse.Integer_Value( cursor, 3700 );
      end if;
      if not gse.Is_Null( cursor, 3701 )then
         a_frs1516.exb012hd := gse.Integer_Value( cursor, 3701 );
      end if;
      if not gse.Is_Null( cursor, 3702 )then
         a_frs1516.exb013hd := gse.Integer_Value( cursor, 3702 );
      end if;
      if not gse.Is_Null( cursor, 3703 )then
         a_frs1516.exb011sp := gse.Integer_Value( cursor, 3703 );
      end if;
      if not gse.Is_Null( cursor, 3704 )then
         a_frs1516.exb012sp := gse.Integer_Value( cursor, 3704 );
      end if;
      if not gse.Is_Null( cursor, 3705 )then
         a_frs1516.exb013sp := gse.Integer_Value( cursor, 3705 );
      end if;
      if not gse.Is_Null( cursor, 3706 )then
         a_frs1516.exb021hd := gse.Integer_Value( cursor, 3706 );
      end if;
      if not gse.Is_Null( cursor, 3707 )then
         a_frs1516.exb022hd := gse.Integer_Value( cursor, 3707 );
      end if;
      if not gse.Is_Null( cursor, 3708 )then
         a_frs1516.exb023hd := gse.Integer_Value( cursor, 3708 );
      end if;
      if not gse.Is_Null( cursor, 3709 )then
         a_frs1516.exb021sp := gse.Integer_Value( cursor, 3709 );
      end if;
      if not gse.Is_Null( cursor, 3710 )then
         a_frs1516.exb022sp := gse.Integer_Value( cursor, 3710 );
      end if;
      if not gse.Is_Null( cursor, 3711 )then
         a_frs1516.exb023sp := gse.Integer_Value( cursor, 3711 );
      end if;
      if not gse.Is_Null( cursor, 3712 )then
         a_frs1516.exb031hd := gse.Integer_Value( cursor, 3712 );
      end if;
      if not gse.Is_Null( cursor, 3713 )then
         a_frs1516.exb032hd := gse.Integer_Value( cursor, 3713 );
      end if;
      if not gse.Is_Null( cursor, 3714 )then
         a_frs1516.exb033hd := gse.Integer_Value( cursor, 3714 );
      end if;
      if not gse.Is_Null( cursor, 3715 )then
         a_frs1516.exb031sp := gse.Integer_Value( cursor, 3715 );
      end if;
      if not gse.Is_Null( cursor, 3716 )then
         a_frs1516.exb032sp := gse.Integer_Value( cursor, 3716 );
      end if;
      if not gse.Is_Null( cursor, 3717 )then
         a_frs1516.exb033sp := gse.Integer_Value( cursor, 3717 );
      end if;
      if not gse.Is_Null( cursor, 3718 )then
         a_frs1516.exb041hd := gse.Integer_Value( cursor, 3718 );
      end if;
      if not gse.Is_Null( cursor, 3719 )then
         a_frs1516.exb042hd := gse.Integer_Value( cursor, 3719 );
      end if;
      if not gse.Is_Null( cursor, 3720 )then
         a_frs1516.exb043hd := gse.Integer_Value( cursor, 3720 );
      end if;
      if not gse.Is_Null( cursor, 3721 )then
         a_frs1516.exb041sp := gse.Integer_Value( cursor, 3721 );
      end if;
      if not gse.Is_Null( cursor, 3722 )then
         a_frs1516.exb042sp := gse.Integer_Value( cursor, 3722 );
      end if;
      if not gse.Is_Null( cursor, 3723 )then
         a_frs1516.exb043sp := gse.Integer_Value( cursor, 3723 );
      end if;
      if not gse.Is_Null( cursor, 3724 )then
         a_frs1516.exb051hd := gse.Integer_Value( cursor, 3724 );
      end if;
      if not gse.Is_Null( cursor, 3725 )then
         a_frs1516.exb052hd := gse.Integer_Value( cursor, 3725 );
      end if;
      if not gse.Is_Null( cursor, 3726 )then
         a_frs1516.exb053hd := gse.Integer_Value( cursor, 3726 );
      end if;
      if not gse.Is_Null( cursor, 3727 )then
         a_frs1516.exb051sp := gse.Integer_Value( cursor, 3727 );
      end if;
      if not gse.Is_Null( cursor, 3728 )then
         a_frs1516.exb052sp := gse.Integer_Value( cursor, 3728 );
      end if;
      if not gse.Is_Null( cursor, 3729 )then
         a_frs1516.exb053sp := gse.Integer_Value( cursor, 3729 );
      end if;
      if not gse.Is_Null( cursor, 3730 )then
         a_frs1516.exb061hd := gse.Integer_Value( cursor, 3730 );
      end if;
      if not gse.Is_Null( cursor, 3731 )then
         a_frs1516.exb062hd := gse.Integer_Value( cursor, 3731 );
      end if;
      if not gse.Is_Null( cursor, 3732 )then
         a_frs1516.exb063hd := gse.Integer_Value( cursor, 3732 );
      end if;
      if not gse.Is_Null( cursor, 3733 )then
         a_frs1516.exb061sp := gse.Integer_Value( cursor, 3733 );
      end if;
      if not gse.Is_Null( cursor, 3734 )then
         a_frs1516.exb062sp := gse.Integer_Value( cursor, 3734 );
      end if;
      if not gse.Is_Null( cursor, 3735 )then
         a_frs1516.exb063sp := gse.Integer_Value( cursor, 3735 );
      end if;
      if not gse.Is_Null( cursor, 3736 )then
         a_frs1516.exb071hd := gse.Integer_Value( cursor, 3736 );
      end if;
      if not gse.Is_Null( cursor, 3737 )then
         a_frs1516.exb072hd := gse.Integer_Value( cursor, 3737 );
      end if;
      if not gse.Is_Null( cursor, 3738 )then
         a_frs1516.exb073hd := gse.Integer_Value( cursor, 3738 );
      end if;
      if not gse.Is_Null( cursor, 3739 )then
         a_frs1516.exb071sp := gse.Integer_Value( cursor, 3739 );
      end if;
      if not gse.Is_Null( cursor, 3740 )then
         a_frs1516.exb072sp := gse.Integer_Value( cursor, 3740 );
      end if;
      if not gse.Is_Null( cursor, 3741 )then
         a_frs1516.exb073sp := gse.Integer_Value( cursor, 3741 );
      end if;
      if not gse.Is_Null( cursor, 3742 )then
         a_frs1516.exb081hd := gse.Integer_Value( cursor, 3742 );
      end if;
      if not gse.Is_Null( cursor, 3743 )then
         a_frs1516.exb082hd := gse.Integer_Value( cursor, 3743 );
      end if;
      if not gse.Is_Null( cursor, 3744 )then
         a_frs1516.exb083hd := gse.Integer_Value( cursor, 3744 );
      end if;
      if not gse.Is_Null( cursor, 3745 )then
         a_frs1516.exb081sp := gse.Integer_Value( cursor, 3745 );
      end if;
      if not gse.Is_Null( cursor, 3746 )then
         a_frs1516.exb082sp := gse.Integer_Value( cursor, 3746 );
      end if;
      if not gse.Is_Null( cursor, 3747 )then
         a_frs1516.exb083sp := gse.Integer_Value( cursor, 3747 );
      end if;
      if not gse.Is_Null( cursor, 3748 )then
         a_frs1516.exb091hd := gse.Integer_Value( cursor, 3748 );
      end if;
      if not gse.Is_Null( cursor, 3749 )then
         a_frs1516.exb092hd := gse.Integer_Value( cursor, 3749 );
      end if;
      if not gse.Is_Null( cursor, 3750 )then
         a_frs1516.exb093hd := gse.Integer_Value( cursor, 3750 );
      end if;
      if not gse.Is_Null( cursor, 3751 )then
         a_frs1516.exb091sp := gse.Integer_Value( cursor, 3751 );
      end if;
      if not gse.Is_Null( cursor, 3752 )then
         a_frs1516.exb092sp := gse.Integer_Value( cursor, 3752 );
      end if;
      if not gse.Is_Null( cursor, 3753 )then
         a_frs1516.exb093sp := gse.Integer_Value( cursor, 3753 );
      end if;
      if not gse.Is_Null( cursor, 3754 )then
         a_frs1516.exb101hd := gse.Integer_Value( cursor, 3754 );
      end if;
      if not gse.Is_Null( cursor, 3755 )then
         a_frs1516.exb102hd := gse.Integer_Value( cursor, 3755 );
      end if;
      if not gse.Is_Null( cursor, 3756 )then
         a_frs1516.exb103hd := gse.Integer_Value( cursor, 3756 );
      end if;
      if not gse.Is_Null( cursor, 3757 )then
         a_frs1516.exb101sp := gse.Integer_Value( cursor, 3757 );
      end if;
      if not gse.Is_Null( cursor, 3758 )then
         a_frs1516.exb102sp := gse.Integer_Value( cursor, 3758 );
      end if;
      if not gse.Is_Null( cursor, 3759 )then
         a_frs1516.exb103sp := gse.Integer_Value( cursor, 3759 );
      end if;
      if not gse.Is_Null( cursor, 3760 )then
         a_frs1516.exb111hd := gse.Integer_Value( cursor, 3760 );
      end if;
      if not gse.Is_Null( cursor, 3761 )then
         a_frs1516.exb112hd := gse.Integer_Value( cursor, 3761 );
      end if;
      if not gse.Is_Null( cursor, 3762 )then
         a_frs1516.exb113hd := gse.Integer_Value( cursor, 3762 );
      end if;
      if not gse.Is_Null( cursor, 3763 )then
         a_frs1516.exb111sp := gse.Integer_Value( cursor, 3763 );
      end if;
      if not gse.Is_Null( cursor, 3764 )then
         a_frs1516.exb112sp := gse.Integer_Value( cursor, 3764 );
      end if;
      if not gse.Is_Null( cursor, 3765 )then
         a_frs1516.exb113sp := gse.Integer_Value( cursor, 3765 );
      end if;
      if not gse.Is_Null( cursor, 3766 )then
         a_frs1516.exb121hd := gse.Integer_Value( cursor, 3766 );
      end if;
      if not gse.Is_Null( cursor, 3767 )then
         a_frs1516.exb122hd := gse.Integer_Value( cursor, 3767 );
      end if;
      if not gse.Is_Null( cursor, 3768 )then
         a_frs1516.exb123hd := gse.Integer_Value( cursor, 3768 );
      end if;
      if not gse.Is_Null( cursor, 3769 )then
         a_frs1516.exb121sp := gse.Integer_Value( cursor, 3769 );
      end if;
      if not gse.Is_Null( cursor, 3770 )then
         a_frs1516.exb122sp := gse.Integer_Value( cursor, 3770 );
      end if;
      if not gse.Is_Null( cursor, 3771 )then
         a_frs1516.exb123sp := gse.Integer_Value( cursor, 3771 );
      end if;
      if not gse.Is_Null( cursor, 3772 )then
         a_frs1516.ftpt1hd := gse.Integer_Value( cursor, 3772 );
      end if;
      if not gse.Is_Null( cursor, 3773 )then
         a_frs1516.ftpt2hd := gse.Integer_Value( cursor, 3773 );
      end if;
      if not gse.Is_Null( cursor, 3774 )then
         a_frs1516.ftpt3hd := gse.Integer_Value( cursor, 3774 );
      end if;
      if not gse.Is_Null( cursor, 3775 )then
         a_frs1516.ftpt1sp := gse.Integer_Value( cursor, 3775 );
      end if;
      if not gse.Is_Null( cursor, 3776 )then
         a_frs1516.ftpt2sp := gse.Integer_Value( cursor, 3776 );
      end if;
      if not gse.Is_Null( cursor, 3777 )then
         a_frs1516.ftpt3sp := gse.Integer_Value( cursor, 3777 );
      end if;
      if not gse.Is_Null( cursor, 3778 )then
         a_frs1516.fulam1hd:= Amount'Value( gse.Value( cursor, 3778 ));
      end if;
      if not gse.Is_Null( cursor, 3779 )then
         a_frs1516.fulam2hd := gse.Integer_Value( cursor, 3779 );
      end if;
      if not gse.Is_Null( cursor, 3780 )then
         a_frs1516.fulam3hd := gse.Integer_Value( cursor, 3780 );
      end if;
      if not gse.Is_Null( cursor, 3781 )then
         a_frs1516.fulam1sp:= Amount'Value( gse.Value( cursor, 3781 ));
      end if;
      if not gse.Is_Null( cursor, 3782 )then
         a_frs1516.fulam2sp := gse.Integer_Value( cursor, 3782 );
      end if;
      if not gse.Is_Null( cursor, 3783 )then
         a_frs1516.fulam3sp := gse.Integer_Value( cursor, 3783 );
      end if;
      if not gse.Is_Null( cursor, 3784 )then
         a_frs1516.fulbn1hd := gse.Integer_Value( cursor, 3784 );
      end if;
      if not gse.Is_Null( cursor, 3785 )then
         a_frs1516.fulbn2hd := gse.Integer_Value( cursor, 3785 );
      end if;
      if not gse.Is_Null( cursor, 3786 )then
         a_frs1516.fulbn3hd := gse.Integer_Value( cursor, 3786 );
      end if;
      if not gse.Is_Null( cursor, 3787 )then
         a_frs1516.fulbn1sp := gse.Integer_Value( cursor, 3787 );
      end if;
      if not gse.Is_Null( cursor, 3788 )then
         a_frs1516.fulbn2sp := gse.Integer_Value( cursor, 3788 );
      end if;
      if not gse.Is_Null( cursor, 3789 )then
         a_frs1516.fulbn3sp := gse.Integer_Value( cursor, 3789 );
      end if;
      if not gse.Is_Null( cursor, 3790 )then
         a_frs1516.fulpd1hd := gse.Integer_Value( cursor, 3790 );
      end if;
      if not gse.Is_Null( cursor, 3791 )then
         a_frs1516.fulpd2hd := gse.Integer_Value( cursor, 3791 );
      end if;
      if not gse.Is_Null( cursor, 3792 )then
         a_frs1516.fulpd3hd := gse.Integer_Value( cursor, 3792 );
      end if;
      if not gse.Is_Null( cursor, 3793 )then
         a_frs1516.fulpd1sp := gse.Integer_Value( cursor, 3793 );
      end if;
      if not gse.Is_Null( cursor, 3794 )then
         a_frs1516.fulpd2sp := gse.Integer_Value( cursor, 3794 );
      end if;
      if not gse.Is_Null( cursor, 3795 )then
         a_frs1516.fulpd3sp := gse.Integer_Value( cursor, 3795 );
      end if;
      if not gse.Is_Null( cursor, 3796 )then
         a_frs1516.fulty1hd := gse.Integer_Value( cursor, 3796 );
      end if;
      if not gse.Is_Null( cursor, 3797 )then
         a_frs1516.fulty2hd := gse.Integer_Value( cursor, 3797 );
      end if;
      if not gse.Is_Null( cursor, 3798 )then
         a_frs1516.fulty3hd := gse.Integer_Value( cursor, 3798 );
      end if;
      if not gse.Is_Null( cursor, 3799 )then
         a_frs1516.fulty1sp := gse.Integer_Value( cursor, 3799 );
      end if;
      if not gse.Is_Null( cursor, 3800 )then
         a_frs1516.fulty2sp := gse.Integer_Value( cursor, 3800 );
      end if;
      if not gse.Is_Null( cursor, 3801 )then
         a_frs1516.fulty3sp := gse.Integer_Value( cursor, 3801 );
      end if;
      if not gse.Is_Null( cursor, 3802 )then
         a_frs1516.fluam1hd := gse.Integer_Value( cursor, 3802 );
      end if;
      if not gse.Is_Null( cursor, 3803 )then
         a_frs1516.fluam2hd := gse.Integer_Value( cursor, 3803 );
      end if;
      if not gse.Is_Null( cursor, 3804 )then
         a_frs1516.fluam3hd := gse.Integer_Value( cursor, 3804 );
      end if;
      if not gse.Is_Null( cursor, 3805 )then
         a_frs1516.fluam1sp := gse.Integer_Value( cursor, 3805 );
      end if;
      if not gse.Is_Null( cursor, 3806 )then
         a_frs1516.fluam2sp := gse.Integer_Value( cursor, 3806 );
      end if;
      if not gse.Is_Null( cursor, 3807 )then
         a_frs1516.fluam3sp := gse.Integer_Value( cursor, 3807 );
      end if;
      if not gse.Is_Null( cursor, 3808 )then
         a_frs1516.flupd1hd := gse.Integer_Value( cursor, 3808 );
      end if;
      if not gse.Is_Null( cursor, 3809 )then
         a_frs1516.flupd2hd := gse.Integer_Value( cursor, 3809 );
      end if;
      if not gse.Is_Null( cursor, 3810 )then
         a_frs1516.flupd3hd := gse.Integer_Value( cursor, 3810 );
      end if;
      if not gse.Is_Null( cursor, 3811 )then
         a_frs1516.flupd1sp := gse.Integer_Value( cursor, 3811 );
      end if;
      if not gse.Is_Null( cursor, 3812 )then
         a_frs1516.flupd2sp := gse.Integer_Value( cursor, 3812 );
      end if;
      if not gse.Is_Null( cursor, 3813 )then
         a_frs1516.flupd3sp := gse.Integer_Value( cursor, 3813 );
      end if;
      if not gse.Is_Null( cursor, 3814 )then
         a_frs1516.flusu1hd := gse.Integer_Value( cursor, 3814 );
      end if;
      if not gse.Is_Null( cursor, 3815 )then
         a_frs1516.flusu2hd := gse.Integer_Value( cursor, 3815 );
      end if;
      if not gse.Is_Null( cursor, 3816 )then
         a_frs1516.flusu3hd := gse.Integer_Value( cursor, 3816 );
      end if;
      if not gse.Is_Null( cursor, 3817 )then
         a_frs1516.flusu1sp := gse.Integer_Value( cursor, 3817 );
      end if;
      if not gse.Is_Null( cursor, 3818 )then
         a_frs1516.flusu2sp := gse.Integer_Value( cursor, 3818 );
      end if;
      if not gse.Is_Null( cursor, 3819 )then
         a_frs1516.flusu3sp := gse.Integer_Value( cursor, 3819 );
      end if;
      if not gse.Is_Null( cursor, 3820 )then
         a_frs1516.grwag1hd:= Amount'Value( gse.Value( cursor, 3820 ));
      end if;
      if not gse.Is_Null( cursor, 3821 )then
         a_frs1516.grwag2hd:= Amount'Value( gse.Value( cursor, 3821 ));
      end if;
      if not gse.Is_Null( cursor, 3822 )then
         a_frs1516.grwag3hd:= Amount'Value( gse.Value( cursor, 3822 ));
      end if;
      if not gse.Is_Null( cursor, 3823 )then
         a_frs1516.grwag1sp:= Amount'Value( gse.Value( cursor, 3823 ));
      end if;
      if not gse.Is_Null( cursor, 3824 )then
         a_frs1516.grwag2sp:= Amount'Value( gse.Value( cursor, 3824 ));
      end if;
      if not gse.Is_Null( cursor, 3825 )then
         a_frs1516.grwag3sp:= Amount'Value( gse.Value( cursor, 3825 ));
      end if;
      if not gse.Is_Null( cursor, 3826 )then
         a_frs1516.grwap1hd := gse.Integer_Value( cursor, 3826 );
      end if;
      if not gse.Is_Null( cursor, 3827 )then
         a_frs1516.grwap2hd := gse.Integer_Value( cursor, 3827 );
      end if;
      if not gse.Is_Null( cursor, 3828 )then
         a_frs1516.grwap3hd := gse.Integer_Value( cursor, 3828 );
      end if;
      if not gse.Is_Null( cursor, 3829 )then
         a_frs1516.grwap1sp := gse.Integer_Value( cursor, 3829 );
      end if;
      if not gse.Is_Null( cursor, 3830 )then
         a_frs1516.grwap2sp := gse.Integer_Value( cursor, 3830 );
      end if;
      if not gse.Is_Null( cursor, 3831 )then
         a_frs1516.grwap3sp := gse.Integer_Value( cursor, 3831 );
      end if;
      if not gse.Is_Null( cursor, 3832 )then
         a_frs1516.hha11hd:= Amount'Value( gse.Value( cursor, 3832 ));
      end if;
      if not gse.Is_Null( cursor, 3833 )then
         a_frs1516.hha12hd := gse.Integer_Value( cursor, 3833 );
      end if;
      if not gse.Is_Null( cursor, 3834 )then
         a_frs1516.hha13hd:= Amount'Value( gse.Value( cursor, 3834 ));
      end if;
      if not gse.Is_Null( cursor, 3835 )then
         a_frs1516.hha11sp:= Amount'Value( gse.Value( cursor, 3835 ));
      end if;
      if not gse.Is_Null( cursor, 3836 )then
         a_frs1516.hha12sp := gse.Integer_Value( cursor, 3836 );
      end if;
      if not gse.Is_Null( cursor, 3837 )then
         a_frs1516.hha13sp := gse.Integer_Value( cursor, 3837 );
      end if;
      if not gse.Is_Null( cursor, 3838 )then
         a_frs1516.hha21hd:= Amount'Value( gse.Value( cursor, 3838 ));
      end if;
      if not gse.Is_Null( cursor, 3839 )then
         a_frs1516.hha22hd := gse.Integer_Value( cursor, 3839 );
      end if;
      if not gse.Is_Null( cursor, 3840 )then
         a_frs1516.hha23hd:= Amount'Value( gse.Value( cursor, 3840 ));
      end if;
      if not gse.Is_Null( cursor, 3841 )then
         a_frs1516.hha21sp:= Amount'Value( gse.Value( cursor, 3841 ));
      end if;
      if not gse.Is_Null( cursor, 3842 )then
         a_frs1516.hha22sp := gse.Integer_Value( cursor, 3842 );
      end if;
      if not gse.Is_Null( cursor, 3843 )then
         a_frs1516.hha23sp := gse.Integer_Value( cursor, 3843 );
      end if;
      if not gse.Is_Null( cursor, 3844 )then
         a_frs1516.hha31hd := gse.Integer_Value( cursor, 3844 );
      end if;
      if not gse.Is_Null( cursor, 3845 )then
         a_frs1516.hha32hd := gse.Integer_Value( cursor, 3845 );
      end if;
      if not gse.Is_Null( cursor, 3846 )then
         a_frs1516.hha33hd := gse.Integer_Value( cursor, 3846 );
      end if;
      if not gse.Is_Null( cursor, 3847 )then
         a_frs1516.hha31sp := gse.Integer_Value( cursor, 3847 );
      end if;
      if not gse.Is_Null( cursor, 3848 )then
         a_frs1516.hha32sp := gse.Integer_Value( cursor, 3848 );
      end if;
      if not gse.Is_Null( cursor, 3849 )then
         a_frs1516.hha33sp := gse.Integer_Value( cursor, 3849 );
      end if;
      if not gse.Is_Null( cursor, 3850 )then
         a_frs1516.hour1hd := gse.Integer_Value( cursor, 3850 );
      end if;
      if not gse.Is_Null( cursor, 3851 )then
         a_frs1516.hour2hd := gse.Integer_Value( cursor, 3851 );
      end if;
      if not gse.Is_Null( cursor, 3852 )then
         a_frs1516.hour3hd := gse.Integer_Value( cursor, 3852 );
      end if;
      if not gse.Is_Null( cursor, 3853 )then
         a_frs1516.hour1sp := gse.Integer_Value( cursor, 3853 );
      end if;
      if not gse.Is_Null( cursor, 3854 )then
         a_frs1516.hour2sp := gse.Integer_Value( cursor, 3854 );
      end if;
      if not gse.Is_Null( cursor, 3855 )then
         a_frs1516.hour3sp := gse.Integer_Value( cursor, 3855 );
      end if;
      if not gse.Is_Null( cursor, 3856 )then
         a_frs1516.hrrte1hd:= Amount'Value( gse.Value( cursor, 3856 ));
      end if;
      if not gse.Is_Null( cursor, 3857 )then
         a_frs1516.hrrte2hd:= Amount'Value( gse.Value( cursor, 3857 ));
      end if;
      if not gse.Is_Null( cursor, 3858 )then
         a_frs1516.hrrte3hd:= Amount'Value( gse.Value( cursor, 3858 ));
      end if;
      if not gse.Is_Null( cursor, 3859 )then
         a_frs1516.hrrte1sp:= Amount'Value( gse.Value( cursor, 3859 ));
      end if;
      if not gse.Is_Null( cursor, 3860 )then
         a_frs1516.hrrte2sp:= Amount'Value( gse.Value( cursor, 3860 ));
      end if;
      if not gse.Is_Null( cursor, 3861 )then
         a_frs1516.hrrte3sp:= Amount'Value( gse.Value( cursor, 3861 ));
      end if;
      if not gse.Is_Null( cursor, 3862 )then
         a_frs1516.ipay11hd := gse.Integer_Value( cursor, 3862 );
      end if;
      if not gse.Is_Null( cursor, 3863 )then
         a_frs1516.ipay12hd := gse.Integer_Value( cursor, 3863 );
      end if;
      if not gse.Is_Null( cursor, 3864 )then
         a_frs1516.ipay13hd := gse.Integer_Value( cursor, 3864 );
      end if;
      if not gse.Is_Null( cursor, 3865 )then
         a_frs1516.ipay11sp := gse.Integer_Value( cursor, 3865 );
      end if;
      if not gse.Is_Null( cursor, 3866 )then
         a_frs1516.ipay12sp := gse.Integer_Value( cursor, 3866 );
      end if;
      if not gse.Is_Null( cursor, 3867 )then
         a_frs1516.ipay13sp := gse.Integer_Value( cursor, 3867 );
      end if;
      if not gse.Is_Null( cursor, 3868 )then
         a_frs1516.ipay21hd := gse.Integer_Value( cursor, 3868 );
      end if;
      if not gse.Is_Null( cursor, 3869 )then
         a_frs1516.ipay22hd := gse.Integer_Value( cursor, 3869 );
      end if;
      if not gse.Is_Null( cursor, 3870 )then
         a_frs1516.ipay23hd := gse.Integer_Value( cursor, 3870 );
      end if;
      if not gse.Is_Null( cursor, 3871 )then
         a_frs1516.ipay21sp := gse.Integer_Value( cursor, 3871 );
      end if;
      if not gse.Is_Null( cursor, 3872 )then
         a_frs1516.ipay22sp := gse.Integer_Value( cursor, 3872 );
      end if;
      if not gse.Is_Null( cursor, 3873 )then
         a_frs1516.ipay23sp := gse.Integer_Value( cursor, 3873 );
      end if;
      if not gse.Is_Null( cursor, 3874 )then
         a_frs1516.ipay31hd := gse.Integer_Value( cursor, 3874 );
      end if;
      if not gse.Is_Null( cursor, 3875 )then
         a_frs1516.ipay32hd := gse.Integer_Value( cursor, 3875 );
      end if;
      if not gse.Is_Null( cursor, 3876 )then
         a_frs1516.ipay33hd := gse.Integer_Value( cursor, 3876 );
      end if;
      if not gse.Is_Null( cursor, 3877 )then
         a_frs1516.ipay31sp := gse.Integer_Value( cursor, 3877 );
      end if;
      if not gse.Is_Null( cursor, 3878 )then
         a_frs1516.ipay32sp := gse.Integer_Value( cursor, 3878 );
      end if;
      if not gse.Is_Null( cursor, 3879 )then
         a_frs1516.ipay33sp := gse.Integer_Value( cursor, 3879 );
      end if;
      if not gse.Is_Null( cursor, 3880 )then
         a_frs1516.ipay41hd := gse.Integer_Value( cursor, 3880 );
      end if;
      if not gse.Is_Null( cursor, 3881 )then
         a_frs1516.ipay42hd := gse.Integer_Value( cursor, 3881 );
      end if;
      if not gse.Is_Null( cursor, 3882 )then
         a_frs1516.ipay43hd := gse.Integer_Value( cursor, 3882 );
      end if;
      if not gse.Is_Null( cursor, 3883 )then
         a_frs1516.ipay41sp := gse.Integer_Value( cursor, 3883 );
      end if;
      if not gse.Is_Null( cursor, 3884 )then
         a_frs1516.ipay42sp := gse.Integer_Value( cursor, 3884 );
      end if;
      if not gse.Is_Null( cursor, 3885 )then
         a_frs1516.ipay43sp := gse.Integer_Value( cursor, 3885 );
      end if;
      if not gse.Is_Null( cursor, 3886 )then
         a_frs1516.ipay51hd := gse.Integer_Value( cursor, 3886 );
      end if;
      if not gse.Is_Null( cursor, 3887 )then
         a_frs1516.ipay52hd := gse.Integer_Value( cursor, 3887 );
      end if;
      if not gse.Is_Null( cursor, 3888 )then
         a_frs1516.ipay53hd := gse.Integer_Value( cursor, 3888 );
      end if;
      if not gse.Is_Null( cursor, 3889 )then
         a_frs1516.ipay51sp := gse.Integer_Value( cursor, 3889 );
      end if;
      if not gse.Is_Null( cursor, 3890 )then
         a_frs1516.ipay52sp := gse.Integer_Value( cursor, 3890 );
      end if;
      if not gse.Is_Null( cursor, 3891 )then
         a_frs1516.ipay53sp := gse.Integer_Value( cursor, 3891 );
      end if;
      if not gse.Is_Null( cursor, 3892 )then
         a_frs1516.ipay61hd := gse.Integer_Value( cursor, 3892 );
      end if;
      if not gse.Is_Null( cursor, 3893 )then
         a_frs1516.ipay62hd := gse.Integer_Value( cursor, 3893 );
      end if;
      if not gse.Is_Null( cursor, 3894 )then
         a_frs1516.ipay63hd := gse.Integer_Value( cursor, 3894 );
      end if;
      if not gse.Is_Null( cursor, 3895 )then
         a_frs1516.ipay61sp := gse.Integer_Value( cursor, 3895 );
      end if;
      if not gse.Is_Null( cursor, 3896 )then
         a_frs1516.ipay62sp := gse.Integer_Value( cursor, 3896 );
      end if;
      if not gse.Is_Null( cursor, 3897 )then
         a_frs1516.ipay63sp := gse.Integer_Value( cursor, 3897 );
      end if;
      if not gse.Is_Null( cursor, 3898 )then
         a_frs1516.ipay71hd := gse.Integer_Value( cursor, 3898 );
      end if;
      if not gse.Is_Null( cursor, 3899 )then
         a_frs1516.ipay72hd := gse.Integer_Value( cursor, 3899 );
      end if;
      if not gse.Is_Null( cursor, 3900 )then
         a_frs1516.ipay73hd := gse.Integer_Value( cursor, 3900 );
      end if;
      if not gse.Is_Null( cursor, 3901 )then
         a_frs1516.ipay71sp := gse.Integer_Value( cursor, 3901 );
      end if;
      if not gse.Is_Null( cursor, 3902 )then
         a_frs1516.ipay72sp := gse.Integer_Value( cursor, 3902 );
      end if;
      if not gse.Is_Null( cursor, 3903 )then
         a_frs1516.ipay73sp := gse.Integer_Value( cursor, 3903 );
      end if;
      if not gse.Is_Null( cursor, 3904 )then
         a_frs1516.jbchg1hd := gse.Integer_Value( cursor, 3904 );
      end if;
      if not gse.Is_Null( cursor, 3905 )then
         a_frs1516.jbchg2hd := gse.Integer_Value( cursor, 3905 );
      end if;
      if not gse.Is_Null( cursor, 3906 )then
         a_frs1516.jbchg3hd := gse.Integer_Value( cursor, 3906 );
      end if;
      if not gse.Is_Null( cursor, 3907 )then
         a_frs1516.jbchg1sp := gse.Integer_Value( cursor, 3907 );
      end if;
      if not gse.Is_Null( cursor, 3908 )then
         a_frs1516.jbchg2sp := gse.Integer_Value( cursor, 3908 );
      end if;
      if not gse.Is_Null( cursor, 3909 )then
         a_frs1516.jbchg3sp := gse.Integer_Value( cursor, 3909 );
      end if;
      if not gse.Is_Null( cursor, 3910 )then
         a_frs1516.jobus1hd := gse.Integer_Value( cursor, 3910 );
      end if;
      if not gse.Is_Null( cursor, 3911 )then
         a_frs1516.jobus2hd := gse.Integer_Value( cursor, 3911 );
      end if;
      if not gse.Is_Null( cursor, 3912 )then
         a_frs1516.jobus3hd := gse.Integer_Value( cursor, 3912 );
      end if;
      if not gse.Is_Null( cursor, 3913 )then
         a_frs1516.jobus1sp := gse.Integer_Value( cursor, 3913 );
      end if;
      if not gse.Is_Null( cursor, 3914 )then
         a_frs1516.jobus2sp := gse.Integer_Value( cursor, 3914 );
      end if;
      if not gse.Is_Null( cursor, 3915 )then
         a_frs1516.jobus3sp := gse.Integer_Value( cursor, 3915 );
      end if;
      if not gse.Is_Null( cursor, 3916 )then
         a_frs1516.jbhrs1hd:= Amount'Value( gse.Value( cursor, 3916 ));
      end if;
      if not gse.Is_Null( cursor, 3917 )then
         a_frs1516.jbhrs2hd:= Amount'Value( gse.Value( cursor, 3917 ));
      end if;
      if not gse.Is_Null( cursor, 3918 )then
         a_frs1516.jbhrs3hd:= Amount'Value( gse.Value( cursor, 3918 ));
      end if;
      if not gse.Is_Null( cursor, 3919 )then
         a_frs1516.jbhrs1sp:= Amount'Value( gse.Value( cursor, 3919 ));
      end if;
      if not gse.Is_Null( cursor, 3920 )then
         a_frs1516.jbhrs2sp:= Amount'Value( gse.Value( cursor, 3920 ));
      end if;
      if not gse.Is_Null( cursor, 3921 )then
         a_frs1516.jbhrs3sp := gse.Integer_Value( cursor, 3921 );
      end if;
      if not gse.Is_Null( cursor, 3922 )then
         a_frs1516.lt301hd := gse.Integer_Value( cursor, 3922 );
      end if;
      if not gse.Is_Null( cursor, 3923 )then
         a_frs1516.lt302hd := gse.Integer_Value( cursor, 3923 );
      end if;
      if not gse.Is_Null( cursor, 3924 )then
         a_frs1516.lt303hd := gse.Integer_Value( cursor, 3924 );
      end if;
      if not gse.Is_Null( cursor, 3925 )then
         a_frs1516.lt301sp := gse.Integer_Value( cursor, 3925 );
      end if;
      if not gse.Is_Null( cursor, 3926 )then
         a_frs1516.lt302sp := gse.Integer_Value( cursor, 3926 );
      end if;
      if not gse.Is_Null( cursor, 3927 )then
         a_frs1516.lt303sp := gse.Integer_Value( cursor, 3927 );
      end if;
      if not gse.Is_Null( cursor, 3928 )then
         a_frs1516.madem1hd := gse.Integer_Value( cursor, 3928 );
      end if;
      if not gse.Is_Null( cursor, 3929 )then
         a_frs1516.madem2hd := gse.Integer_Value( cursor, 3929 );
      end if;
      if not gse.Is_Null( cursor, 3930 )then
         a_frs1516.madem3hd := gse.Integer_Value( cursor, 3930 );
      end if;
      if not gse.Is_Null( cursor, 3931 )then
         a_frs1516.madem1sp := gse.Integer_Value( cursor, 3931 );
      end if;
      if not gse.Is_Null( cursor, 3932 )then
         a_frs1516.madem2sp := gse.Integer_Value( cursor, 3932 );
      end if;
      if not gse.Is_Null( cursor, 3933 )then
         a_frs1516.madem3sp := gse.Integer_Value( cursor, 3933 );
      end if;
      if not gse.Is_Null( cursor, 3934 )then
         a_frs1516.mile1hd:= Amount'Value( gse.Value( cursor, 3934 ));
      end if;
      if not gse.Is_Null( cursor, 3935 )then
         a_frs1516.mile2hd:= Amount'Value( gse.Value( cursor, 3935 ));
      end if;
      if not gse.Is_Null( cursor, 3936 )then
         a_frs1516.mile3hd := gse.Integer_Value( cursor, 3936 );
      end if;
      if not gse.Is_Null( cursor, 3937 )then
         a_frs1516.mile1sp:= Amount'Value( gse.Value( cursor, 3937 ));
      end if;
      if not gse.Is_Null( cursor, 3938 )then
         a_frs1516.mile2sp:= Amount'Value( gse.Value( cursor, 3938 ));
      end if;
      if not gse.Is_Null( cursor, 3939 )then
         a_frs1516.mile3sp := gse.Integer_Value( cursor, 3939 );
      end if;
      if not gse.Is_Null( cursor, 3940 )then
         a_frs1516.moref1hd:= Amount'Value( gse.Value( cursor, 3940 ));
      end if;
      if not gse.Is_Null( cursor, 3941 )then
         a_frs1516.moref2hd := gse.Integer_Value( cursor, 3941 );
      end if;
      if not gse.Is_Null( cursor, 3942 )then
         a_frs1516.moref3hd := gse.Integer_Value( cursor, 3942 );
      end if;
      if not gse.Is_Null( cursor, 3943 )then
         a_frs1516.moref1sp:= Amount'Value( gse.Value( cursor, 3943 ));
      end if;
      if not gse.Is_Null( cursor, 3944 )then
         a_frs1516.moref2sp:= Amount'Value( gse.Value( cursor, 3944 ));
      end if;
      if not gse.Is_Null( cursor, 3945 )then
         a_frs1516.moref3sp := gse.Integer_Value( cursor, 3945 );
      end if;
      if not gse.Is_Null( cursor, 3946 )then
         a_frs1516.nic1hd:= Amount'Value( gse.Value( cursor, 3946 ));
      end if;
      if not gse.Is_Null( cursor, 3947 )then
         a_frs1516.nic2hd:= Amount'Value( gse.Value( cursor, 3947 ));
      end if;
      if not gse.Is_Null( cursor, 3948 )then
         a_frs1516.nic3hd:= Amount'Value( gse.Value( cursor, 3948 ));
      end if;
      if not gse.Is_Null( cursor, 3949 )then
         a_frs1516.nic1sp:= Amount'Value( gse.Value( cursor, 3949 ));
      end if;
      if not gse.Is_Null( cursor, 3950 )then
         a_frs1516.nic2sp:= Amount'Value( gse.Value( cursor, 3950 ));
      end if;
      if not gse.Is_Null( cursor, 3951 )then
         a_frs1516.nic3sp := gse.Integer_Value( cursor, 3951 );
      end if;
      if not gse.Is_Null( cursor, 3952 )then
         a_frs1516.nidam1hd:= Amount'Value( gse.Value( cursor, 3952 ));
      end if;
      if not gse.Is_Null( cursor, 3953 )then
         a_frs1516.nidam2hd := gse.Integer_Value( cursor, 3953 );
      end if;
      if not gse.Is_Null( cursor, 3954 )then
         a_frs1516.nidam3hd := gse.Integer_Value( cursor, 3954 );
      end if;
      if not gse.Is_Null( cursor, 3955 )then
         a_frs1516.nidam1sp:= Amount'Value( gse.Value( cursor, 3955 ));
      end if;
      if not gse.Is_Null( cursor, 3956 )then
         a_frs1516.nidam2sp:= Amount'Value( gse.Value( cursor, 3956 ));
      end if;
      if not gse.Is_Null( cursor, 3957 )then
         a_frs1516.nidam3sp := gse.Integer_Value( cursor, 3957 );
      end if;
      if not gse.Is_Null( cursor, 3958 )then
         a_frs1516.nipd1hd := gse.Integer_Value( cursor, 3958 );
      end if;
      if not gse.Is_Null( cursor, 3959 )then
         a_frs1516.nipd2hd := gse.Integer_Value( cursor, 3959 );
      end if;
      if not gse.Is_Null( cursor, 3960 )then
         a_frs1516.nipd3hd := gse.Integer_Value( cursor, 3960 );
      end if;
      if not gse.Is_Null( cursor, 3961 )then
         a_frs1516.nipd1sp := gse.Integer_Value( cursor, 3961 );
      end if;
      if not gse.Is_Null( cursor, 3962 )then
         a_frs1516.nipd2sp := gse.Integer_Value( cursor, 3962 );
      end if;
      if not gse.Is_Null( cursor, 3963 )then
         a_frs1516.nipd3sp := gse.Integer_Value( cursor, 3963 );
      end if;
      if not gse.Is_Null( cursor, 3964 )then
         a_frs1516.noemp1hd := gse.Integer_Value( cursor, 3964 );
      end if;
      if not gse.Is_Null( cursor, 3965 )then
         a_frs1516.noemp2hd := gse.Integer_Value( cursor, 3965 );
      end if;
      if not gse.Is_Null( cursor, 3966 )then
         a_frs1516.noemp3hd := gse.Integer_Value( cursor, 3966 );
      end if;
      if not gse.Is_Null( cursor, 3967 )then
         a_frs1516.noemp1sp := gse.Integer_Value( cursor, 3967 );
      end if;
      if not gse.Is_Null( cursor, 3968 )then
         a_frs1516.noemp2sp := gse.Integer_Value( cursor, 3968 );
      end if;
      if not gse.Is_Null( cursor, 3969 )then
         a_frs1516.noemp3sp := gse.Integer_Value( cursor, 3969 );
      end if;
      if not gse.Is_Null( cursor, 3970 )then
         a_frs1516.oremp1hd := gse.Integer_Value( cursor, 3970 );
      end if;
      if not gse.Is_Null( cursor, 3971 )then
         a_frs1516.oremp2hd := gse.Integer_Value( cursor, 3971 );
      end if;
      if not gse.Is_Null( cursor, 3972 )then
         a_frs1516.oremp3hd := gse.Integer_Value( cursor, 3972 );
      end if;
      if not gse.Is_Null( cursor, 3973 )then
         a_frs1516.oremp1sp := gse.Integer_Value( cursor, 3973 );
      end if;
      if not gse.Is_Null( cursor, 3974 )then
         a_frs1516.oremp2sp := gse.Integer_Value( cursor, 3974 );
      end if;
      if not gse.Is_Null( cursor, 3975 )then
         a_frs1516.oremp3sp := gse.Integer_Value( cursor, 3975 );
      end if;
      if not gse.Is_Null( cursor, 3976 )then
         a_frs1516.othd11hd := gse.Integer_Value( cursor, 3976 );
      end if;
      if not gse.Is_Null( cursor, 3977 )then
         a_frs1516.othd12hd := gse.Integer_Value( cursor, 3977 );
      end if;
      if not gse.Is_Null( cursor, 3978 )then
         a_frs1516.othd13hd := gse.Integer_Value( cursor, 3978 );
      end if;
      if not gse.Is_Null( cursor, 3979 )then
         a_frs1516.othd11sp := gse.Integer_Value( cursor, 3979 );
      end if;
      if not gse.Is_Null( cursor, 3980 )then
         a_frs1516.othd12sp := gse.Integer_Value( cursor, 3980 );
      end if;
      if not gse.Is_Null( cursor, 3981 )then
         a_frs1516.othd13sp := gse.Integer_Value( cursor, 3981 );
      end if;
      if not gse.Is_Null( cursor, 3982 )then
         a_frs1516.othd21hd := gse.Integer_Value( cursor, 3982 );
      end if;
      if not gse.Is_Null( cursor, 3983 )then
         a_frs1516.othd22hd := gse.Integer_Value( cursor, 3983 );
      end if;
      if not gse.Is_Null( cursor, 3984 )then
         a_frs1516.othd23hd := gse.Integer_Value( cursor, 3984 );
      end if;
      if not gse.Is_Null( cursor, 3985 )then
         a_frs1516.othd21sp := gse.Integer_Value( cursor, 3985 );
      end if;
      if not gse.Is_Null( cursor, 3986 )then
         a_frs1516.othd22sp := gse.Integer_Value( cursor, 3986 );
      end if;
      if not gse.Is_Null( cursor, 3987 )then
         a_frs1516.othd23sp := gse.Integer_Value( cursor, 3987 );
      end if;
      if not gse.Is_Null( cursor, 3988 )then
         a_frs1516.othd31hd := gse.Integer_Value( cursor, 3988 );
      end if;
      if not gse.Is_Null( cursor, 3989 )then
         a_frs1516.othd32hd := gse.Integer_Value( cursor, 3989 );
      end if;
      if not gse.Is_Null( cursor, 3990 )then
         a_frs1516.othd33hd := gse.Integer_Value( cursor, 3990 );
      end if;
      if not gse.Is_Null( cursor, 3991 )then
         a_frs1516.othd31sp := gse.Integer_Value( cursor, 3991 );
      end if;
      if not gse.Is_Null( cursor, 3992 )then
         a_frs1516.othd32sp := gse.Integer_Value( cursor, 3992 );
      end if;
      if not gse.Is_Null( cursor, 3993 )then
         a_frs1516.othd33sp := gse.Integer_Value( cursor, 3993 );
      end if;
      if not gse.Is_Null( cursor, 3994 )then
         a_frs1516.othd41hd := gse.Integer_Value( cursor, 3994 );
      end if;
      if not gse.Is_Null( cursor, 3995 )then
         a_frs1516.othd42hd := gse.Integer_Value( cursor, 3995 );
      end if;
      if not gse.Is_Null( cursor, 3996 )then
         a_frs1516.othd43hd := gse.Integer_Value( cursor, 3996 );
      end if;
      if not gse.Is_Null( cursor, 3997 )then
         a_frs1516.othd41sp := gse.Integer_Value( cursor, 3997 );
      end if;
      if not gse.Is_Null( cursor, 3998 )then
         a_frs1516.othd42sp := gse.Integer_Value( cursor, 3998 );
      end if;
      if not gse.Is_Null( cursor, 3999 )then
         a_frs1516.othd43sp := gse.Integer_Value( cursor, 3999 );
      end if;
      if not gse.Is_Null( cursor, 4000 )then
         a_frs1516.othd51hd := gse.Integer_Value( cursor, 4000 );
      end if;
      if not gse.Is_Null( cursor, 4001 )then
         a_frs1516.othd52hd := gse.Integer_Value( cursor, 4001 );
      end if;
      if not gse.Is_Null( cursor, 4002 )then
         a_frs1516.othd53hd := gse.Integer_Value( cursor, 4002 );
      end if;
      if not gse.Is_Null( cursor, 4003 )then
         a_frs1516.othd51sp := gse.Integer_Value( cursor, 4003 );
      end if;
      if not gse.Is_Null( cursor, 4004 )then
         a_frs1516.othd52sp := gse.Integer_Value( cursor, 4004 );
      end if;
      if not gse.Is_Null( cursor, 4005 )then
         a_frs1516.othd53sp := gse.Integer_Value( cursor, 4005 );
      end if;
      if not gse.Is_Null( cursor, 4006 )then
         a_frs1516.othd61hd := gse.Integer_Value( cursor, 4006 );
      end if;
      if not gse.Is_Null( cursor, 4007 )then
         a_frs1516.othd62hd := gse.Integer_Value( cursor, 4007 );
      end if;
      if not gse.Is_Null( cursor, 4008 )then
         a_frs1516.othd63hd := gse.Integer_Value( cursor, 4008 );
      end if;
      if not gse.Is_Null( cursor, 4009 )then
         a_frs1516.othd61sp := gse.Integer_Value( cursor, 4009 );
      end if;
      if not gse.Is_Null( cursor, 4010 )then
         a_frs1516.othd62sp := gse.Integer_Value( cursor, 4010 );
      end if;
      if not gse.Is_Null( cursor, 4011 )then
         a_frs1516.othd63sp := gse.Integer_Value( cursor, 4011 );
      end if;
      if not gse.Is_Null( cursor, 4012 )then
         a_frs1516.othd71hd := gse.Integer_Value( cursor, 4012 );
      end if;
      if not gse.Is_Null( cursor, 4013 )then
         a_frs1516.othd72hd := gse.Integer_Value( cursor, 4013 );
      end if;
      if not gse.Is_Null( cursor, 4014 )then
         a_frs1516.othd73hd := gse.Integer_Value( cursor, 4014 );
      end if;
      if not gse.Is_Null( cursor, 4015 )then
         a_frs1516.othd71sp := gse.Integer_Value( cursor, 4015 );
      end if;
      if not gse.Is_Null( cursor, 4016 )then
         a_frs1516.othd72sp := gse.Integer_Value( cursor, 4016 );
      end if;
      if not gse.Is_Null( cursor, 4017 )then
         a_frs1516.othd73sp := gse.Integer_Value( cursor, 4017 );
      end if;
      if not gse.Is_Null( cursor, 4018 )then
         a_frs1516.othd81hd := gse.Integer_Value( cursor, 4018 );
      end if;
      if not gse.Is_Null( cursor, 4019 )then
         a_frs1516.othd82hd := gse.Integer_Value( cursor, 4019 );
      end if;
      if not gse.Is_Null( cursor, 4020 )then
         a_frs1516.othd83hd := gse.Integer_Value( cursor, 4020 );
      end if;
      if not gse.Is_Null( cursor, 4021 )then
         a_frs1516.othd81sp := gse.Integer_Value( cursor, 4021 );
      end if;
      if not gse.Is_Null( cursor, 4022 )then
         a_frs1516.othd82sp := gse.Integer_Value( cursor, 4022 );
      end if;
      if not gse.Is_Null( cursor, 4023 )then
         a_frs1516.othd83sp := gse.Integer_Value( cursor, 4023 );
      end if;
      if not gse.Is_Null( cursor, 4024 )then
         a_frs1516.othd91hd := gse.Integer_Value( cursor, 4024 );
      end if;
      if not gse.Is_Null( cursor, 4025 )then
         a_frs1516.othd92hd := gse.Integer_Value( cursor, 4025 );
      end if;
      if not gse.Is_Null( cursor, 4026 )then
         a_frs1516.othd93hd := gse.Integer_Value( cursor, 4026 );
      end if;
      if not gse.Is_Null( cursor, 4027 )then
         a_frs1516.othd91sp := gse.Integer_Value( cursor, 4027 );
      end if;
      if not gse.Is_Null( cursor, 4028 )then
         a_frs1516.othd92sp := gse.Integer_Value( cursor, 4028 );
      end if;
      if not gse.Is_Null( cursor, 4029 )then
         a_frs1516.othd93sp := gse.Integer_Value( cursor, 4029 );
      end if;
      if not gse.Is_Null( cursor, 4030 )then
         a_frs1516.otd101hd := gse.Integer_Value( cursor, 4030 );
      end if;
      if not gse.Is_Null( cursor, 4031 )then
         a_frs1516.otd102hd := gse.Integer_Value( cursor, 4031 );
      end if;
      if not gse.Is_Null( cursor, 4032 )then
         a_frs1516.otd103hd := gse.Integer_Value( cursor, 4032 );
      end if;
      if not gse.Is_Null( cursor, 4033 )then
         a_frs1516.otd101sp := gse.Integer_Value( cursor, 4033 );
      end if;
      if not gse.Is_Null( cursor, 4034 )then
         a_frs1516.otd102sp := gse.Integer_Value( cursor, 4034 );
      end if;
      if not gse.Is_Null( cursor, 4035 )then
         a_frs1516.otd103sp := gse.Integer_Value( cursor, 4035 );
      end if;
      if not gse.Is_Null( cursor, 4036 )then
         a_frs1516.ownam1hd:= Amount'Value( gse.Value( cursor, 4036 ));
      end if;
      if not gse.Is_Null( cursor, 4037 )then
         a_frs1516.ownam2hd:= Amount'Value( gse.Value( cursor, 4037 ));
      end if;
      if not gse.Is_Null( cursor, 4038 )then
         a_frs1516.ownam3hd := gse.Integer_Value( cursor, 4038 );
      end if;
      if not gse.Is_Null( cursor, 4039 )then
         a_frs1516.ownam1sp:= Amount'Value( gse.Value( cursor, 4039 ));
      end if;
      if not gse.Is_Null( cursor, 4040 )then
         a_frs1516.ownam2sp:= Amount'Value( gse.Value( cursor, 4040 ));
      end if;
      if not gse.Is_Null( cursor, 4041 )then
         a_frs1516.ownam3sp:= Amount'Value( gse.Value( cursor, 4041 ));
      end if;
      if not gse.Is_Null( cursor, 4042 )then
         a_frs1516.ownoa1hd:= Amount'Value( gse.Value( cursor, 4042 ));
      end if;
      if not gse.Is_Null( cursor, 4043 )then
         a_frs1516.ownoa2hd:= Amount'Value( gse.Value( cursor, 4043 ));
      end if;
      if not gse.Is_Null( cursor, 4044 )then
         a_frs1516.ownoa3hd := gse.Integer_Value( cursor, 4044 );
      end if;
      if not gse.Is_Null( cursor, 4045 )then
         a_frs1516.ownoa1sp:= Amount'Value( gse.Value( cursor, 4045 ));
      end if;
      if not gse.Is_Null( cursor, 4046 )then
         a_frs1516.ownoa2sp := gse.Integer_Value( cursor, 4046 );
      end if;
      if not gse.Is_Null( cursor, 4047 )then
         a_frs1516.ownoa3sp := gse.Integer_Value( cursor, 4047 );
      end if;
      if not gse.Is_Null( cursor, 4048 )then
         a_frs1516.ownot1hd := gse.Integer_Value( cursor, 4048 );
      end if;
      if not gse.Is_Null( cursor, 4049 )then
         a_frs1516.ownot2hd := gse.Integer_Value( cursor, 4049 );
      end if;
      if not gse.Is_Null( cursor, 4050 )then
         a_frs1516.ownot3hd := gse.Integer_Value( cursor, 4050 );
      end if;
      if not gse.Is_Null( cursor, 4051 )then
         a_frs1516.ownot1sp := gse.Integer_Value( cursor, 4051 );
      end if;
      if not gse.Is_Null( cursor, 4052 )then
         a_frs1516.ownot2sp := gse.Integer_Value( cursor, 4052 );
      end if;
      if not gse.Is_Null( cursor, 4053 )then
         a_frs1516.ownot3sp := gse.Integer_Value( cursor, 4053 );
      end if;
      if not gse.Is_Null( cursor, 4054 )then
         a_frs1516.ownsm1hd := gse.Integer_Value( cursor, 4054 );
      end if;
      if not gse.Is_Null( cursor, 4055 )then
         a_frs1516.ownsm2hd := gse.Integer_Value( cursor, 4055 );
      end if;
      if not gse.Is_Null( cursor, 4056 )then
         a_frs1516.ownsm3hd := gse.Integer_Value( cursor, 4056 );
      end if;
      if not gse.Is_Null( cursor, 4057 )then
         a_frs1516.ownsm1sp := gse.Integer_Value( cursor, 4057 );
      end if;
      if not gse.Is_Null( cursor, 4058 )then
         a_frs1516.ownsm2sp := gse.Integer_Value( cursor, 4058 );
      end if;
      if not gse.Is_Null( cursor, 4059 )then
         a_frs1516.ownsm3sp := gse.Integer_Value( cursor, 4059 );
      end if;
      if not gse.Is_Null( cursor, 4060 )then
         a_frs1516.pappd1hd := gse.Integer_Value( cursor, 4060 );
      end if;
      if not gse.Is_Null( cursor, 4061 )then
         a_frs1516.pappd2hd := gse.Integer_Value( cursor, 4061 );
      end if;
      if not gse.Is_Null( cursor, 4062 )then
         a_frs1516.pappd3hd := gse.Integer_Value( cursor, 4062 );
      end if;
      if not gse.Is_Null( cursor, 4063 )then
         a_frs1516.pappd1sp := gse.Integer_Value( cursor, 4063 );
      end if;
      if not gse.Is_Null( cursor, 4064 )then
         a_frs1516.pappd2sp := gse.Integer_Value( cursor, 4064 );
      end if;
      if not gse.Is_Null( cursor, 4065 )then
         a_frs1516.pappd3sp := gse.Integer_Value( cursor, 4065 );
      end if;
      if not gse.Is_Null( cursor, 4066 )then
         a_frs1516.payam1hd:= Amount'Value( gse.Value( cursor, 4066 ));
      end if;
      if not gse.Is_Null( cursor, 4067 )then
         a_frs1516.payam2hd:= Amount'Value( gse.Value( cursor, 4067 ));
      end if;
      if not gse.Is_Null( cursor, 4068 )then
         a_frs1516.payam3hd:= Amount'Value( gse.Value( cursor, 4068 ));
      end if;
      if not gse.Is_Null( cursor, 4069 )then
         a_frs1516.payam1sp:= Amount'Value( gse.Value( cursor, 4069 ));
      end if;
      if not gse.Is_Null( cursor, 4070 )then
         a_frs1516.payam2sp:= Amount'Value( gse.Value( cursor, 4070 ));
      end if;
      if not gse.Is_Null( cursor, 4071 )then
         a_frs1516.payam3sp:= Amount'Value( gse.Value( cursor, 4071 ));
      end if;
      if not gse.Is_Null( cursor, 4072 )then
         a_frs1516.pdate1hd := gse.Integer_Value( cursor, 4072 );
      end if;
      if not gse.Is_Null( cursor, 4073 )then
         a_frs1516.pdate2hd := gse.Integer_Value( cursor, 4073 );
      end if;
      if not gse.Is_Null( cursor, 4074 )then
         a_frs1516.pdate3hd := gse.Integer_Value( cursor, 4074 );
      end if;
      if not gse.Is_Null( cursor, 4075 )then
         a_frs1516.pdate1sp := gse.Integer_Value( cursor, 4075 );
      end if;
      if not gse.Is_Null( cursor, 4076 )then
         a_frs1516.pdate2sp := gse.Integer_Value( cursor, 4076 );
      end if;
      if not gse.Is_Null( cursor, 4077 )then
         a_frs1516.pdate3sp := gse.Integer_Value( cursor, 4077 );
      end if;
      if not gse.Is_Null( cursor, 4078 )then
         a_frs1516.paye1hd:= Amount'Value( gse.Value( cursor, 4078 ));
      end if;
      if not gse.Is_Null( cursor, 4079 )then
         a_frs1516.paye2hd:= Amount'Value( gse.Value( cursor, 4079 ));
      end if;
      if not gse.Is_Null( cursor, 4080 )then
         a_frs1516.paye3hd:= Amount'Value( gse.Value( cursor, 4080 ));
      end if;
      if not gse.Is_Null( cursor, 4081 )then
         a_frs1516.paye1sp:= Amount'Value( gse.Value( cursor, 4081 ));
      end if;
      if not gse.Is_Null( cursor, 4082 )then
         a_frs1516.paye2sp:= Amount'Value( gse.Value( cursor, 4082 ));
      end if;
      if not gse.Is_Null( cursor, 4083 )then
         a_frs1516.paye3sp:= Amount'Value( gse.Value( cursor, 4083 ));
      end if;
      if not gse.Is_Null( cursor, 4084 )then
         a_frs1516.paype1hd := gse.Integer_Value( cursor, 4084 );
      end if;
      if not gse.Is_Null( cursor, 4085 )then
         a_frs1516.paype2hd := gse.Integer_Value( cursor, 4085 );
      end if;
      if not gse.Is_Null( cursor, 4086 )then
         a_frs1516.paype3hd := gse.Integer_Value( cursor, 4086 );
      end if;
      if not gse.Is_Null( cursor, 4087 )then
         a_frs1516.paype1sp := gse.Integer_Value( cursor, 4087 );
      end if;
      if not gse.Is_Null( cursor, 4088 )then
         a_frs1516.paype2sp := gse.Integer_Value( cursor, 4088 );
      end if;
      if not gse.Is_Null( cursor, 4089 )then
         a_frs1516.paype3sp := gse.Integer_Value( cursor, 4089 );
      end if;
      if not gse.Is_Null( cursor, 4090 )then
         a_frs1516.paysl1hd := gse.Integer_Value( cursor, 4090 );
      end if;
      if not gse.Is_Null( cursor, 4091 )then
         a_frs1516.paysl2hd := gse.Integer_Value( cursor, 4091 );
      end if;
      if not gse.Is_Null( cursor, 4092 )then
         a_frs1516.paysl3hd := gse.Integer_Value( cursor, 4092 );
      end if;
      if not gse.Is_Null( cursor, 4093 )then
         a_frs1516.paysl1sp := gse.Integer_Value( cursor, 4093 );
      end if;
      if not gse.Is_Null( cursor, 4094 )then
         a_frs1516.paysl2sp := gse.Integer_Value( cursor, 4094 );
      end if;
      if not gse.Is_Null( cursor, 4095 )then
         a_frs1516.paysl3sp := gse.Integer_Value( cursor, 4095 );
      end if;
      if not gse.Is_Null( cursor, 4096 )then
         a_frs1516.payus1hd := gse.Integer_Value( cursor, 4096 );
      end if;
      if not gse.Is_Null( cursor, 4097 )then
         a_frs1516.payus2hd := gse.Integer_Value( cursor, 4097 );
      end if;
      if not gse.Is_Null( cursor, 4098 )then
         a_frs1516.payus3hd := gse.Integer_Value( cursor, 4098 );
      end if;
      if not gse.Is_Null( cursor, 4099 )then
         a_frs1516.payus1sp := gse.Integer_Value( cursor, 4099 );
      end if;
      if not gse.Is_Null( cursor, 4100 )then
         a_frs1516.payus2sp := gse.Integer_Value( cursor, 4100 );
      end if;
      if not gse.Is_Null( cursor, 4101 )then
         a_frs1516.payus3sp := gse.Integer_Value( cursor, 4101 );
      end if;
      if not gse.Is_Null( cursor, 4102 )then
         a_frs1516.pothr1hd:= Amount'Value( gse.Value( cursor, 4102 ));
      end if;
      if not gse.Is_Null( cursor, 4103 )then
         a_frs1516.pothr2hd := gse.Integer_Value( cursor, 4103 );
      end if;
      if not gse.Is_Null( cursor, 4104 )then
         a_frs1516.pothr3hd := gse.Integer_Value( cursor, 4104 );
      end if;
      if not gse.Is_Null( cursor, 4105 )then
         a_frs1516.pothr1sp:= Amount'Value( gse.Value( cursor, 4105 ));
      end if;
      if not gse.Is_Null( cursor, 4106 )then
         a_frs1516.pothr2sp := gse.Integer_Value( cursor, 4106 );
      end if;
      if not gse.Is_Null( cursor, 4107 )then
         a_frs1516.pothr3sp := gse.Integer_Value( cursor, 4107 );
      end if;
      if not gse.Is_Null( cursor, 4108 )then
         a_frs1516.ppppd1hd := gse.Integer_Value( cursor, 4108 );
      end if;
      if not gse.Is_Null( cursor, 4109 )then
         a_frs1516.ppppd2hd := gse.Integer_Value( cursor, 4109 );
      end if;
      if not gse.Is_Null( cursor, 4110 )then
         a_frs1516.ppppd3hd := gse.Integer_Value( cursor, 4110 );
      end if;
      if not gse.Is_Null( cursor, 4111 )then
         a_frs1516.ppppd1sp := gse.Integer_Value( cursor, 4111 );
      end if;
      if not gse.Is_Null( cursor, 4112 )then
         a_frs1516.ppppd2sp := gse.Integer_Value( cursor, 4112 );
      end if;
      if not gse.Is_Null( cursor, 4113 )then
         a_frs1516.ppppd3sp := gse.Integer_Value( cursor, 4113 );
      end if;
      if not gse.Is_Null( cursor, 4114 )then
         a_frs1516.prbef1hd:= Amount'Value( gse.Value( cursor, 4114 ));
      end if;
      if not gse.Is_Null( cursor, 4115 )then
         a_frs1516.prbef2hd:= Amount'Value( gse.Value( cursor, 4115 ));
      end if;
      if not gse.Is_Null( cursor, 4116 )then
         a_frs1516.prbef3hd:= Amount'Value( gse.Value( cursor, 4116 ));
      end if;
      if not gse.Is_Null( cursor, 4117 )then
         a_frs1516.prbef1sp:= Amount'Value( gse.Value( cursor, 4117 ));
      end if;
      if not gse.Is_Null( cursor, 4118 )then
         a_frs1516.prbef2sp:= Amount'Value( gse.Value( cursor, 4118 ));
      end if;
      if not gse.Is_Null( cursor, 4119 )then
         a_frs1516.prbef3sp:= Amount'Value( gse.Value( cursor, 4119 ));
      end if;
      if not gse.Is_Null( cursor, 4120 )then
         a_frs1516.prdoc1hd := gse.Integer_Value( cursor, 4120 );
      end if;
      if not gse.Is_Null( cursor, 4121 )then
         a_frs1516.prdoc2hd := gse.Integer_Value( cursor, 4121 );
      end if;
      if not gse.Is_Null( cursor, 4122 )then
         a_frs1516.prdoc3hd := gse.Integer_Value( cursor, 4122 );
      end if;
      if not gse.Is_Null( cursor, 4123 )then
         a_frs1516.prdoc1sp := gse.Integer_Value( cursor, 4123 );
      end if;
      if not gse.Is_Null( cursor, 4124 )then
         a_frs1516.prdoc2sp := gse.Integer_Value( cursor, 4124 );
      end if;
      if not gse.Is_Null( cursor, 4125 )then
         a_frs1516.prdoc3sp := gse.Integer_Value( cursor, 4125 );
      end if;
      if not gse.Is_Null( cursor, 4126 )then
         a_frs1516.sepro1hd:= Amount'Value( gse.Value( cursor, 4126 ));
      end if;
      if not gse.Is_Null( cursor, 4127 )then
         a_frs1516.sepro2hd:= Amount'Value( gse.Value( cursor, 4127 ));
      end if;
      if not gse.Is_Null( cursor, 4128 )then
         a_frs1516.sepro3hd:= Amount'Value( gse.Value( cursor, 4128 ));
      end if;
      if not gse.Is_Null( cursor, 4129 )then
         a_frs1516.sepro1sp:= Amount'Value( gse.Value( cursor, 4129 ));
      end if;
      if not gse.Is_Null( cursor, 4130 )then
         a_frs1516.sepro2sp:= Amount'Value( gse.Value( cursor, 4130 ));
      end if;
      if not gse.Is_Null( cursor, 4131 )then
         a_frs1516.sepro3sp:= Amount'Value( gse.Value( cursor, 4131 ));
      end if;
      if not gse.Is_Null( cursor, 4132 )then
         a_frs1516.prolo1hd := gse.Integer_Value( cursor, 4132 );
      end if;
      if not gse.Is_Null( cursor, 4133 )then
         a_frs1516.prolo2hd := gse.Integer_Value( cursor, 4133 );
      end if;
      if not gse.Is_Null( cursor, 4134 )then
         a_frs1516.prolo3hd := gse.Integer_Value( cursor, 4134 );
      end if;
      if not gse.Is_Null( cursor, 4135 )then
         a_frs1516.prolo1sp := gse.Integer_Value( cursor, 4135 );
      end if;
      if not gse.Is_Null( cursor, 4136 )then
         a_frs1516.prolo2sp := gse.Integer_Value( cursor, 4136 );
      end if;
      if not gse.Is_Null( cursor, 4137 )then
         a_frs1516.prolo3sp := gse.Integer_Value( cursor, 4137 );
      end if;
      if not gse.Is_Null( cursor, 4138 )then
         a_frs1516.profn1hd := gse.Integer_Value( cursor, 4138 );
      end if;
      if not gse.Is_Null( cursor, 4139 )then
         a_frs1516.profn2hd := gse.Integer_Value( cursor, 4139 );
      end if;
      if not gse.Is_Null( cursor, 4140 )then
         a_frs1516.profn3hd := gse.Integer_Value( cursor, 4140 );
      end if;
      if not gse.Is_Null( cursor, 4141 )then
         a_frs1516.profn1sp := gse.Integer_Value( cursor, 4141 );
      end if;
      if not gse.Is_Null( cursor, 4142 )then
         a_frs1516.profn2sp := gse.Integer_Value( cursor, 4142 );
      end if;
      if not gse.Is_Null( cursor, 4143 )then
         a_frs1516.profn3sp := gse.Integer_Value( cursor, 4143 );
      end if;
      if not gse.Is_Null( cursor, 4144 )then
         a_frs1516.protx1hd := gse.Integer_Value( cursor, 4144 );
      end if;
      if not gse.Is_Null( cursor, 4145 )then
         a_frs1516.protx2hd := gse.Integer_Value( cursor, 4145 );
      end if;
      if not gse.Is_Null( cursor, 4146 )then
         a_frs1516.protx3hd := gse.Integer_Value( cursor, 4146 );
      end if;
      if not gse.Is_Null( cursor, 4147 )then
         a_frs1516.protx1sp := gse.Integer_Value( cursor, 4147 );
      end if;
      if not gse.Is_Null( cursor, 4148 )then
         a_frs1516.protx2sp := gse.Integer_Value( cursor, 4148 );
      end if;
      if not gse.Is_Null( cursor, 4149 )then
         a_frs1516.protx3sp := gse.Integer_Value( cursor, 4149 );
      end if;
      if not gse.Is_Null( cursor, 4150 )then
         a_frs1516.rspvr1hd := gse.Integer_Value( cursor, 4150 );
      end if;
      if not gse.Is_Null( cursor, 4151 )then
         a_frs1516.rspvr2hd := gse.Integer_Value( cursor, 4151 );
      end if;
      if not gse.Is_Null( cursor, 4152 )then
         a_frs1516.rspvr3hd := gse.Integer_Value( cursor, 4152 );
      end if;
      if not gse.Is_Null( cursor, 4153 )then
         a_frs1516.rspvr1sp := gse.Integer_Value( cursor, 4153 );
      end if;
      if not gse.Is_Null( cursor, 4154 )then
         a_frs1516.rspvr2sp := gse.Integer_Value( cursor, 4154 );
      end if;
      if not gse.Is_Null( cursor, 4155 )then
         a_frs1516.rspvr3sp := gse.Integer_Value( cursor, 4155 );
      end if;
      if not gse.Is_Null( cursor, 4156 )then
         a_frs1516.apamt1hd := gse.Integer_Value( cursor, 4156 );
      end if;
      if not gse.Is_Null( cursor, 4157 )then
         a_frs1516.apamt2hd := gse.Integer_Value( cursor, 4157 );
      end if;
      if not gse.Is_Null( cursor, 4158 )then
         a_frs1516.apamt3hd := gse.Integer_Value( cursor, 4158 );
      end if;
      if not gse.Is_Null( cursor, 4159 )then
         a_frs1516.apamt1sp := gse.Integer_Value( cursor, 4159 );
      end if;
      if not gse.Is_Null( cursor, 4160 )then
         a_frs1516.apamt2sp := gse.Integer_Value( cursor, 4160 );
      end if;
      if not gse.Is_Null( cursor, 4161 )then
         a_frs1516.apamt3sp := gse.Integer_Value( cursor, 4161 );
      end if;
      if not gse.Is_Null( cursor, 4162 )then
         a_frs1516.sebeg1hd := gse.Integer_Value( cursor, 4162 );
      end if;
      if not gse.Is_Null( cursor, 4163 )then
         a_frs1516.sebeg2hd := gse.Integer_Value( cursor, 4163 );
      end if;
      if not gse.Is_Null( cursor, 4164 )then
         a_frs1516.sebeg3hd := gse.Integer_Value( cursor, 4164 );
      end if;
      if not gse.Is_Null( cursor, 4165 )then
         a_frs1516.sebeg1sp := gse.Integer_Value( cursor, 4165 );
      end if;
      if not gse.Is_Null( cursor, 4166 )then
         a_frs1516.sebeg2sp := gse.Integer_Value( cursor, 4166 );
      end if;
      if not gse.Is_Null( cursor, 4167 )then
         a_frs1516.sebeg3sp := gse.Integer_Value( cursor, 4167 );
      end if;
      if not gse.Is_Null( cursor, 4168 )then
         a_frs1516.seend1hd := gse.Integer_Value( cursor, 4168 );
      end if;
      if not gse.Is_Null( cursor, 4169 )then
         a_frs1516.seend2hd := gse.Integer_Value( cursor, 4169 );
      end if;
      if not gse.Is_Null( cursor, 4170 )then
         a_frs1516.seend3hd := gse.Integer_Value( cursor, 4170 );
      end if;
      if not gse.Is_Null( cursor, 4171 )then
         a_frs1516.seend1sp := gse.Integer_Value( cursor, 4171 );
      end if;
      if not gse.Is_Null( cursor, 4172 )then
         a_frs1516.seend2sp := gse.Integer_Value( cursor, 4172 );
      end if;
      if not gse.Is_Null( cursor, 4173 )then
         a_frs1516.seend3sp := gse.Integer_Value( cursor, 4173 );
      end if;
      if not gse.Is_Null( cursor, 4174 )then
         a_frs1516.sectr1hd := gse.Integer_Value( cursor, 4174 );
      end if;
      if not gse.Is_Null( cursor, 4175 )then
         a_frs1516.sectr2hd := gse.Integer_Value( cursor, 4175 );
      end if;
      if not gse.Is_Null( cursor, 4176 )then
         a_frs1516.sectr3hd := gse.Integer_Value( cursor, 4176 );
      end if;
      if not gse.Is_Null( cursor, 4177 )then
         a_frs1516.sectr1sp := gse.Integer_Value( cursor, 4177 );
      end if;
      if not gse.Is_Null( cursor, 4178 )then
         a_frs1516.sectr2sp := gse.Integer_Value( cursor, 4178 );
      end if;
      if not gse.Is_Null( cursor, 4179 )then
         a_frs1516.sectr3sp := gse.Integer_Value( cursor, 4179 );
      end if;
      if not gse.Is_Null( cursor, 4180 )then
         a_frs1516.sectt1hd := gse.Integer_Value( cursor, 4180 );
      end if;
      if not gse.Is_Null( cursor, 4181 )then
         a_frs1516.sectt2hd := gse.Integer_Value( cursor, 4181 );
      end if;
      if not gse.Is_Null( cursor, 4182 )then
         a_frs1516.sectt3hd := gse.Integer_Value( cursor, 4182 );
      end if;
      if not gse.Is_Null( cursor, 4183 )then
         a_frs1516.sectt1sp := gse.Integer_Value( cursor, 4183 );
      end if;
      if not gse.Is_Null( cursor, 4184 )then
         a_frs1516.sectt2sp := gse.Integer_Value( cursor, 4184 );
      end if;
      if not gse.Is_Null( cursor, 4185 )then
         a_frs1516.sectt3sp := gse.Integer_Value( cursor, 4185 );
      end if;
      if not gse.Is_Null( cursor, 4186 )then
         a_frs1516.sefin1hd := gse.Integer_Value( cursor, 4186 );
      end if;
      if not gse.Is_Null( cursor, 4187 )then
         a_frs1516.sefin2hd := gse.Integer_Value( cursor, 4187 );
      end if;
      if not gse.Is_Null( cursor, 4188 )then
         a_frs1516.sefin3hd := gse.Integer_Value( cursor, 4188 );
      end if;
      if not gse.Is_Null( cursor, 4189 )then
         a_frs1516.sefin1sp := gse.Integer_Value( cursor, 4189 );
      end if;
      if not gse.Is_Null( cursor, 4190 )then
         a_frs1516.sefin2sp := gse.Integer_Value( cursor, 4190 );
      end if;
      if not gse.Is_Null( cursor, 4191 )then
         a_frs1516.sefin3sp := gse.Integer_Value( cursor, 4191 );
      end if;
      if not gse.Is_Null( cursor, 4192 )then
         a_frs1516.secam1hd:= Amount'Value( gse.Value( cursor, 4192 ));
      end if;
      if not gse.Is_Null( cursor, 4193 )then
         a_frs1516.secam2hd:= Amount'Value( gse.Value( cursor, 4193 ));
      end if;
      if not gse.Is_Null( cursor, 4194 )then
         a_frs1516.secam3hd:= Amount'Value( gse.Value( cursor, 4194 ));
      end if;
      if not gse.Is_Null( cursor, 4195 )then
         a_frs1516.secam1sp:= Amount'Value( gse.Value( cursor, 4195 ));
      end if;
      if not gse.Is_Null( cursor, 4196 )then
         a_frs1516.secam2sp:= Amount'Value( gse.Value( cursor, 4196 ));
      end if;
      if not gse.Is_Null( cursor, 4197 )then
         a_frs1516.secam3sp:= Amount'Value( gse.Value( cursor, 4197 ));
      end if;
      if not gse.Is_Null( cursor, 4198 )then
         a_frs1516.seciw1hd := gse.Integer_Value( cursor, 4198 );
      end if;
      if not gse.Is_Null( cursor, 4199 )then
         a_frs1516.seciw2hd := gse.Integer_Value( cursor, 4199 );
      end if;
      if not gse.Is_Null( cursor, 4200 )then
         a_frs1516.seciw3hd := gse.Integer_Value( cursor, 4200 );
      end if;
      if not gse.Is_Null( cursor, 4201 )then
         a_frs1516.seciw1sp := gse.Integer_Value( cursor, 4201 );
      end if;
      if not gse.Is_Null( cursor, 4202 )then
         a_frs1516.seciw2sp := gse.Integer_Value( cursor, 4202 );
      end if;
      if not gse.Is_Null( cursor, 4203 )then
         a_frs1516.seciw3sp := gse.Integer_Value( cursor, 4203 );
      end if;
      if not gse.Is_Null( cursor, 4204 )then
         a_frs1516.sewks1hd := gse.Integer_Value( cursor, 4204 );
      end if;
      if not gse.Is_Null( cursor, 4205 )then
         a_frs1516.sewks2hd := gse.Integer_Value( cursor, 4205 );
      end if;
      if not gse.Is_Null( cursor, 4206 )then
         a_frs1516.sewks3hd := gse.Integer_Value( cursor, 4206 );
      end if;
      if not gse.Is_Null( cursor, 4207 )then
         a_frs1516.sewks1sp := gse.Integer_Value( cursor, 4207 );
      end if;
      if not gse.Is_Null( cursor, 4208 )then
         a_frs1516.sewks2sp := gse.Integer_Value( cursor, 4208 );
      end if;
      if not gse.Is_Null( cursor, 4209 )then
         a_frs1516.sewks3sp := gse.Integer_Value( cursor, 4209 );
      end if;
      if not gse.Is_Null( cursor, 4210 )then
         a_frs1516.senam1hd:= Amount'Value( gse.Value( cursor, 4210 ));
      end if;
      if not gse.Is_Null( cursor, 4211 )then
         a_frs1516.senam2hd:= Amount'Value( gse.Value( cursor, 4211 ));
      end if;
      if not gse.Is_Null( cursor, 4212 )then
         a_frs1516.senam3hd := gse.Integer_Value( cursor, 4212 );
      end if;
      if not gse.Is_Null( cursor, 4213 )then
         a_frs1516.senam1sp:= Amount'Value( gse.Value( cursor, 4213 ));
      end if;
      if not gse.Is_Null( cursor, 4214 )then
         a_frs1516.senam2sp:= Amount'Value( gse.Value( cursor, 4214 ));
      end if;
      if not gse.Is_Null( cursor, 4215 )then
         a_frs1516.senam3sp := gse.Integer_Value( cursor, 4215 );
      end if;
      if not gse.Is_Null( cursor, 4216 )then
         a_frs1516.seiin1hd := gse.Integer_Value( cursor, 4216 );
      end if;
      if not gse.Is_Null( cursor, 4217 )then
         a_frs1516.seiin2hd := gse.Integer_Value( cursor, 4217 );
      end if;
      if not gse.Is_Null( cursor, 4218 )then
         a_frs1516.seiin3hd := gse.Integer_Value( cursor, 4218 );
      end if;
      if not gse.Is_Null( cursor, 4219 )then
         a_frs1516.seiin1sp := gse.Integer_Value( cursor, 4219 );
      end if;
      if not gse.Is_Null( cursor, 4220 )then
         a_frs1516.seiin2sp := gse.Integer_Value( cursor, 4220 );
      end if;
      if not gse.Is_Null( cursor, 4221 )then
         a_frs1516.seiin3sp := gse.Integer_Value( cursor, 4221 );
      end if;
      if not gse.Is_Null( cursor, 4222 )then
         a_frs1516.senil1hd:= Amount'Value( gse.Value( cursor, 4222 ));
      end if;
      if not gse.Is_Null( cursor, 4223 )then
         a_frs1516.senil2hd:= Amount'Value( gse.Value( cursor, 4223 ));
      end if;
      if not gse.Is_Null( cursor, 4224 )then
         a_frs1516.senil3hd := gse.Integer_Value( cursor, 4224 );
      end if;
      if not gse.Is_Null( cursor, 4225 )then
         a_frs1516.senil1sp:= Amount'Value( gse.Value( cursor, 4225 ));
      end if;
      if not gse.Is_Null( cursor, 4226 )then
         a_frs1516.senil2sp:= Amount'Value( gse.Value( cursor, 4226 ));
      end if;
      if not gse.Is_Null( cursor, 4227 )then
         a_frs1516.senil3sp := gse.Integer_Value( cursor, 4227 );
      end if;
      if not gse.Is_Null( cursor, 4228 )then
         a_frs1516.senir1hd:= Amount'Value( gse.Value( cursor, 4228 ));
      end if;
      if not gse.Is_Null( cursor, 4229 )then
         a_frs1516.senir2hd:= Amount'Value( gse.Value( cursor, 4229 ));
      end if;
      if not gse.Is_Null( cursor, 4230 )then
         a_frs1516.senir3hd:= Amount'Value( gse.Value( cursor, 4230 ));
      end if;
      if not gse.Is_Null( cursor, 4231 )then
         a_frs1516.senir1sp:= Amount'Value( gse.Value( cursor, 4231 ));
      end if;
      if not gse.Is_Null( cursor, 4232 )then
         a_frs1516.senir2sp:= Amount'Value( gse.Value( cursor, 4232 ));
      end if;
      if not gse.Is_Null( cursor, 4233 )then
         a_frs1516.senir3sp:= Amount'Value( gse.Value( cursor, 4233 ));
      end if;
      if not gse.Is_Null( cursor, 4234 )then
         a_frs1516.psenr1hd := gse.Integer_Value( cursor, 4234 );
      end if;
      if not gse.Is_Null( cursor, 4235 )then
         a_frs1516.psenr2hd := gse.Integer_Value( cursor, 4235 );
      end if;
      if not gse.Is_Null( cursor, 4236 )then
         a_frs1516.psenr3hd := gse.Integer_Value( cursor, 4236 );
      end if;
      if not gse.Is_Null( cursor, 4237 )then
         a_frs1516.psenr1sp := gse.Integer_Value( cursor, 4237 );
      end if;
      if not gse.Is_Null( cursor, 4238 )then
         a_frs1516.psenr2sp := gse.Integer_Value( cursor, 4238 );
      end if;
      if not gse.Is_Null( cursor, 4239 )then
         a_frs1516.psenr3sp := gse.Integer_Value( cursor, 4239 );
      end if;
      if not gse.Is_Null( cursor, 4240 )then
         a_frs1516.setax1hd:= Amount'Value( gse.Value( cursor, 4240 ));
      end if;
      if not gse.Is_Null( cursor, 4241 )then
         a_frs1516.setax2hd:= Amount'Value( gse.Value( cursor, 4241 ));
      end if;
      if not gse.Is_Null( cursor, 4242 )then
         a_frs1516.setax3hd:= Amount'Value( gse.Value( cursor, 4242 ));
      end if;
      if not gse.Is_Null( cursor, 4243 )then
         a_frs1516.setax1sp:= Amount'Value( gse.Value( cursor, 4243 ));
      end if;
      if not gse.Is_Null( cursor, 4244 )then
         a_frs1516.setax2sp:= Amount'Value( gse.Value( cursor, 4244 ));
      end if;
      if not gse.Is_Null( cursor, 4245 )then
         a_frs1516.setax3sp:= Amount'Value( gse.Value( cursor, 4245 ));
      end if;
      if not gse.Is_Null( cursor, 4246 )then
         a_frs1516.smpam1hd:= Amount'Value( gse.Value( cursor, 4246 ));
      end if;
      if not gse.Is_Null( cursor, 4247 )then
         a_frs1516.smpam2hd := gse.Integer_Value( cursor, 4247 );
      end if;
      if not gse.Is_Null( cursor, 4248 )then
         a_frs1516.smpam3hd := gse.Integer_Value( cursor, 4248 );
      end if;
      if not gse.Is_Null( cursor, 4249 )then
         a_frs1516.smpam1sp:= Amount'Value( gse.Value( cursor, 4249 ));
      end if;
      if not gse.Is_Null( cursor, 4250 )then
         a_frs1516.smpam2sp:= Amount'Value( gse.Value( cursor, 4250 ));
      end if;
      if not gse.Is_Null( cursor, 4251 )then
         a_frs1516.smpam3sp := gse.Integer_Value( cursor, 4251 );
      end if;
      if not gse.Is_Null( cursor, 4252 )then
         a_frs1516.smprt1hd := gse.Integer_Value( cursor, 4252 );
      end if;
      if not gse.Is_Null( cursor, 4253 )then
         a_frs1516.smprt2hd := gse.Integer_Value( cursor, 4253 );
      end if;
      if not gse.Is_Null( cursor, 4254 )then
         a_frs1516.smprt3hd := gse.Integer_Value( cursor, 4254 );
      end if;
      if not gse.Is_Null( cursor, 4255 )then
         a_frs1516.smprt1sp := gse.Integer_Value( cursor, 4255 );
      end if;
      if not gse.Is_Null( cursor, 4256 )then
         a_frs1516.smprt2sp := gse.Integer_Value( cursor, 4256 );
      end if;
      if not gse.Is_Null( cursor, 4257 )then
         a_frs1516.smprt3sp := gse.Integer_Value( cursor, 4257 );
      end if;
      if not gse.Is_Null( cursor, 4258 )then
         a_frs1516.sole1hd := gse.Integer_Value( cursor, 4258 );
      end if;
      if not gse.Is_Null( cursor, 4259 )then
         a_frs1516.sole2hd := gse.Integer_Value( cursor, 4259 );
      end if;
      if not gse.Is_Null( cursor, 4260 )then
         a_frs1516.sole3hd := gse.Integer_Value( cursor, 4260 );
      end if;
      if not gse.Is_Null( cursor, 4261 )then
         a_frs1516.sole1sp := gse.Integer_Value( cursor, 4261 );
      end if;
      if not gse.Is_Null( cursor, 4262 )then
         a_frs1516.sole2sp := gse.Integer_Value( cursor, 4262 );
      end if;
      if not gse.Is_Null( cursor, 4263 )then
         a_frs1516.sole3sp := gse.Integer_Value( cursor, 4263 );
      end if;
      if not gse.Is_Null( cursor, 4264 )then
         a_frs1516.spamt1hd:= Amount'Value( gse.Value( cursor, 4264 ));
      end if;
      if not gse.Is_Null( cursor, 4265 )then
         a_frs1516.spamt2hd := gse.Integer_Value( cursor, 4265 );
      end if;
      if not gse.Is_Null( cursor, 4266 )then
         a_frs1516.spamt3hd := gse.Integer_Value( cursor, 4266 );
      end if;
      if not gse.Is_Null( cursor, 4267 )then
         a_frs1516.spamt1sp:= Amount'Value( gse.Value( cursor, 4267 ));
      end if;
      if not gse.Is_Null( cursor, 4268 )then
         a_frs1516.spamt2sp := gse.Integer_Value( cursor, 4268 );
      end if;
      if not gse.Is_Null( cursor, 4269 )then
         a_frs1516.spamt3sp := gse.Integer_Value( cursor, 4269 );
      end if;
      if not gse.Is_Null( cursor, 4270 )then
         a_frs1516.sppd1hd := gse.Integer_Value( cursor, 4270 );
      end if;
      if not gse.Is_Null( cursor, 4271 )then
         a_frs1516.sppd2hd := gse.Integer_Value( cursor, 4271 );
      end if;
      if not gse.Is_Null( cursor, 4272 )then
         a_frs1516.sppd3hd := gse.Integer_Value( cursor, 4272 );
      end if;
      if not gse.Is_Null( cursor, 4273 )then
         a_frs1516.sppd1sp := gse.Integer_Value( cursor, 4273 );
      end if;
      if not gse.Is_Null( cursor, 4274 )then
         a_frs1516.sppd2sp := gse.Integer_Value( cursor, 4274 );
      end if;
      if not gse.Is_Null( cursor, 4275 )then
         a_frs1516.sppd3sp := gse.Integer_Value( cursor, 4275 );
      end if;
      if not gse.Is_Null( cursor, 4276 )then
         a_frs1516.spsac1hd := gse.Integer_Value( cursor, 4276 );
      end if;
      if not gse.Is_Null( cursor, 4277 )then
         a_frs1516.spsac2hd := gse.Integer_Value( cursor, 4277 );
      end if;
      if not gse.Is_Null( cursor, 4278 )then
         a_frs1516.spsac3hd := gse.Integer_Value( cursor, 4278 );
      end if;
      if not gse.Is_Null( cursor, 4279 )then
         a_frs1516.spsac1sp := gse.Integer_Value( cursor, 4279 );
      end if;
      if not gse.Is_Null( cursor, 4280 )then
         a_frs1516.spsac2sp := gse.Integer_Value( cursor, 4280 );
      end if;
      if not gse.Is_Null( cursor, 4281 )then
         a_frs1516.spsac3sp := gse.Integer_Value( cursor, 4281 );
      end if;
      if not gse.Is_Null( cursor, 4282 )then
         a_frs1516.spuam1hd:= Amount'Value( gse.Value( cursor, 4282 ));
      end if;
      if not gse.Is_Null( cursor, 4283 )then
         a_frs1516.spuam2hd := gse.Integer_Value( cursor, 4283 );
      end if;
      if not gse.Is_Null( cursor, 4284 )then
         a_frs1516.spuam3hd := gse.Integer_Value( cursor, 4284 );
      end if;
      if not gse.Is_Null( cursor, 4285 )then
         a_frs1516.spuam1sp := gse.Integer_Value( cursor, 4285 );
      end if;
      if not gse.Is_Null( cursor, 4286 )then
         a_frs1516.spuam2sp := gse.Integer_Value( cursor, 4286 );
      end if;
      if not gse.Is_Null( cursor, 4287 )then
         a_frs1516.spuam3sp := gse.Integer_Value( cursor, 4287 );
      end if;
      if not gse.Is_Null( cursor, 4288 )then
         a_frs1516.spupd1hd := gse.Integer_Value( cursor, 4288 );
      end if;
      if not gse.Is_Null( cursor, 4289 )then
         a_frs1516.spupd2hd := gse.Integer_Value( cursor, 4289 );
      end if;
      if not gse.Is_Null( cursor, 4290 )then
         a_frs1516.spupd3hd := gse.Integer_Value( cursor, 4290 );
      end if;
      if not gse.Is_Null( cursor, 4291 )then
         a_frs1516.spupd1sp := gse.Integer_Value( cursor, 4291 );
      end if;
      if not gse.Is_Null( cursor, 4292 )then
         a_frs1516.spupd2sp := gse.Integer_Value( cursor, 4292 );
      end if;
      if not gse.Is_Null( cursor, 4293 )then
         a_frs1516.spupd3sp := gse.Integer_Value( cursor, 4293 );
      end if;
      if not gse.Is_Null( cursor, 4294 )then
         a_frs1516.spusu1hd := gse.Integer_Value( cursor, 4294 );
      end if;
      if not gse.Is_Null( cursor, 4295 )then
         a_frs1516.spusu2hd := gse.Integer_Value( cursor, 4295 );
      end if;
      if not gse.Is_Null( cursor, 4296 )then
         a_frs1516.spusu3hd := gse.Integer_Value( cursor, 4296 );
      end if;
      if not gse.Is_Null( cursor, 4297 )then
         a_frs1516.spusu1sp := gse.Integer_Value( cursor, 4297 );
      end if;
      if not gse.Is_Null( cursor, 4298 )then
         a_frs1516.spusu2sp := gse.Integer_Value( cursor, 4298 );
      end if;
      if not gse.Is_Null( cursor, 4299 )then
         a_frs1516.spusu3sp := gse.Integer_Value( cursor, 4299 );
      end if;
      if not gse.Is_Null( cursor, 4300 )then
         a_frs1516.ppamt1hd:= Amount'Value( gse.Value( cursor, 4300 ));
      end if;
      if not gse.Is_Null( cursor, 4301 )then
         a_frs1516.ppamt2hd := gse.Integer_Value( cursor, 4301 );
      end if;
      if not gse.Is_Null( cursor, 4302 )then
         a_frs1516.ppamt3hd := gse.Integer_Value( cursor, 4302 );
      end if;
      if not gse.Is_Null( cursor, 4303 )then
         a_frs1516.ppamt1sp:= Amount'Value( gse.Value( cursor, 4303 ));
      end if;
      if not gse.Is_Null( cursor, 4304 )then
         a_frs1516.ppamt2sp := gse.Integer_Value( cursor, 4304 );
      end if;
      if not gse.Is_Null( cursor, 4305 )then
         a_frs1516.ppamt3sp := gse.Integer_Value( cursor, 4305 );
      end if;
      if not gse.Is_Null( cursor, 4306 )then
         a_frs1516.sspam1hd:= Amount'Value( gse.Value( cursor, 4306 ));
      end if;
      if not gse.Is_Null( cursor, 4307 )then
         a_frs1516.sspam2hd:= Amount'Value( gse.Value( cursor, 4307 ));
      end if;
      if not gse.Is_Null( cursor, 4308 )then
         a_frs1516.sspam3hd := gse.Integer_Value( cursor, 4308 );
      end if;
      if not gse.Is_Null( cursor, 4309 )then
         a_frs1516.sspam1sp:= Amount'Value( gse.Value( cursor, 4309 ));
      end if;
      if not gse.Is_Null( cursor, 4310 )then
         a_frs1516.sspam2sp := gse.Integer_Value( cursor, 4310 );
      end if;
      if not gse.Is_Null( cursor, 4311 )then
         a_frs1516.sspam3sp := gse.Integer_Value( cursor, 4311 );
      end if;
      if not gse.Is_Null( cursor, 4312 )then
         a_frs1516.spsmp1hd := gse.Integer_Value( cursor, 4312 );
      end if;
      if not gse.Is_Null( cursor, 4313 )then
         a_frs1516.spsmp2hd := gse.Integer_Value( cursor, 4313 );
      end if;
      if not gse.Is_Null( cursor, 4314 )then
         a_frs1516.spsmp3hd := gse.Integer_Value( cursor, 4314 );
      end if;
      if not gse.Is_Null( cursor, 4315 )then
         a_frs1516.spsmp1sp := gse.Integer_Value( cursor, 4315 );
      end if;
      if not gse.Is_Null( cursor, 4316 )then
         a_frs1516.spsmp2sp := gse.Integer_Value( cursor, 4316 );
      end if;
      if not gse.Is_Null( cursor, 4317 )then
         a_frs1516.spsmp3sp := gse.Integer_Value( cursor, 4317 );
      end if;
      if not gse.Is_Null( cursor, 4318 )then
         a_frs1516.taxam1hd:= Amount'Value( gse.Value( cursor, 4318 ));
      end if;
      if not gse.Is_Null( cursor, 4319 )then
         a_frs1516.taxam2hd:= Amount'Value( gse.Value( cursor, 4319 ));
      end if;
      if not gse.Is_Null( cursor, 4320 )then
         a_frs1516.taxam3hd := gse.Integer_Value( cursor, 4320 );
      end if;
      if not gse.Is_Null( cursor, 4321 )then
         a_frs1516.taxam1sp:= Amount'Value( gse.Value( cursor, 4321 ));
      end if;
      if not gse.Is_Null( cursor, 4322 )then
         a_frs1516.taxam2sp := gse.Integer_Value( cursor, 4322 );
      end if;
      if not gse.Is_Null( cursor, 4323 )then
         a_frs1516.taxam3sp := gse.Integer_Value( cursor, 4323 );
      end if;
      if not gse.Is_Null( cursor, 4324 )then
         a_frs1516.taxda1hd:= Amount'Value( gse.Value( cursor, 4324 ));
      end if;
      if not gse.Is_Null( cursor, 4325 )then
         a_frs1516.taxda2hd:= Amount'Value( gse.Value( cursor, 4325 ));
      end if;
      if not gse.Is_Null( cursor, 4326 )then
         a_frs1516.taxda3hd:= Amount'Value( gse.Value( cursor, 4326 ));
      end if;
      if not gse.Is_Null( cursor, 4327 )then
         a_frs1516.taxda1sp:= Amount'Value( gse.Value( cursor, 4327 ));
      end if;
      if not gse.Is_Null( cursor, 4328 )then
         a_frs1516.taxda2sp:= Amount'Value( gse.Value( cursor, 4328 ));
      end if;
      if not gse.Is_Null( cursor, 4329 )then
         a_frs1516.taxda3sp := gse.Integer_Value( cursor, 4329 );
      end if;
      if not gse.Is_Null( cursor, 4330 )then
         a_frs1516.taxpd1hd := gse.Integer_Value( cursor, 4330 );
      end if;
      if not gse.Is_Null( cursor, 4331 )then
         a_frs1516.taxpd2hd := gse.Integer_Value( cursor, 4331 );
      end if;
      if not gse.Is_Null( cursor, 4332 )then
         a_frs1516.taxpd3hd := gse.Integer_Value( cursor, 4332 );
      end if;
      if not gse.Is_Null( cursor, 4333 )then
         a_frs1516.taxpd1sp := gse.Integer_Value( cursor, 4333 );
      end if;
      if not gse.Is_Null( cursor, 4334 )then
         a_frs1516.taxpd2sp := gse.Integer_Value( cursor, 4334 );
      end if;
      if not gse.Is_Null( cursor, 4335 )then
         a_frs1516.taxpd3sp := gse.Integer_Value( cursor, 4335 );
      end if;
      if not gse.Is_Null( cursor, 4336 )then
         a_frs1516.to1hr1hd:= Amount'Value( gse.Value( cursor, 4336 ));
      end if;
      if not gse.Is_Null( cursor, 4337 )then
         a_frs1516.to1hr2hd:= Amount'Value( gse.Value( cursor, 4337 ));
      end if;
      if not gse.Is_Null( cursor, 4338 )then
         a_frs1516.to1hr3hd:= Amount'Value( gse.Value( cursor, 4338 ));
      end if;
      if not gse.Is_Null( cursor, 4339 )then
         a_frs1516.to1hr1sp:= Amount'Value( gse.Value( cursor, 4339 ));
      end if;
      if not gse.Is_Null( cursor, 4340 )then
         a_frs1516.to1hr2sp:= Amount'Value( gse.Value( cursor, 4340 ));
      end if;
      if not gse.Is_Null( cursor, 4341 )then
         a_frs1516.to1hr3sp := gse.Integer_Value( cursor, 4341 );
      end if;
      if not gse.Is_Null( cursor, 4342 )then
         a_frs1516.boinu1hd:= Amount'Value( gse.Value( cursor, 4342 ));
      end if;
      if not gse.Is_Null( cursor, 4343 )then
         a_frs1516.boinu2hd := gse.Integer_Value( cursor, 4343 );
      end if;
      if not gse.Is_Null( cursor, 4344 )then
         a_frs1516.boinu3hd := gse.Integer_Value( cursor, 4344 );
      end if;
      if not gse.Is_Null( cursor, 4345 )then
         a_frs1516.boinu1sp:= Amount'Value( gse.Value( cursor, 4345 ));
      end if;
      if not gse.Is_Null( cursor, 4346 )then
         a_frs1516.boinu2sp := gse.Integer_Value( cursor, 4346 );
      end if;
      if not gse.Is_Null( cursor, 4347 )then
         a_frs1516.boinu3sp := gse.Integer_Value( cursor, 4347 );
      end if;
      if not gse.Is_Null( cursor, 4348 )then
         a_frs1516.uincb1hd := gse.Integer_Value( cursor, 4348 );
      end if;
      if not gse.Is_Null( cursor, 4349 )then
         a_frs1516.uincb2hd := gse.Integer_Value( cursor, 4349 );
      end if;
      if not gse.Is_Null( cursor, 4350 )then
         a_frs1516.uincb3hd := gse.Integer_Value( cursor, 4350 );
      end if;
      if not gse.Is_Null( cursor, 4351 )then
         a_frs1516.uincb1sp := gse.Integer_Value( cursor, 4351 );
      end if;
      if not gse.Is_Null( cursor, 4352 )then
         a_frs1516.uincb2sp := gse.Integer_Value( cursor, 4352 );
      end if;
      if not gse.Is_Null( cursor, 4353 )then
         a_frs1516.uincb3sp := gse.Integer_Value( cursor, 4353 );
      end if;
      if not gse.Is_Null( cursor, 4354 )then
         a_frs1516.uded11hd:= Amount'Value( gse.Value( cursor, 4354 ));
      end if;
      if not gse.Is_Null( cursor, 4355 )then
         a_frs1516.uded12hd := gse.Integer_Value( cursor, 4355 );
      end if;
      if not gse.Is_Null( cursor, 4356 )then
         a_frs1516.uded13hd := gse.Integer_Value( cursor, 4356 );
      end if;
      if not gse.Is_Null( cursor, 4357 )then
         a_frs1516.uded11sp:= Amount'Value( gse.Value( cursor, 4357 ));
      end if;
      if not gse.Is_Null( cursor, 4358 )then
         a_frs1516.uded12sp := gse.Integer_Value( cursor, 4358 );
      end if;
      if not gse.Is_Null( cursor, 4359 )then
         a_frs1516.uded13sp := gse.Integer_Value( cursor, 4359 );
      end if;
      if not gse.Is_Null( cursor, 4360 )then
         a_frs1516.uded21hd := gse.Integer_Value( cursor, 4360 );
      end if;
      if not gse.Is_Null( cursor, 4361 )then
         a_frs1516.uded22hd := gse.Integer_Value( cursor, 4361 );
      end if;
      if not gse.Is_Null( cursor, 4362 )then
         a_frs1516.uded23hd := gse.Integer_Value( cursor, 4362 );
      end if;
      if not gse.Is_Null( cursor, 4363 )then
         a_frs1516.uded21sp := gse.Integer_Value( cursor, 4363 );
      end if;
      if not gse.Is_Null( cursor, 4364 )then
         a_frs1516.uded22sp := gse.Integer_Value( cursor, 4364 );
      end if;
      if not gse.Is_Null( cursor, 4365 )then
         a_frs1516.uded23sp := gse.Integer_Value( cursor, 4365 );
      end if;
      if not gse.Is_Null( cursor, 4366 )then
         a_frs1516.uded31hd:= Amount'Value( gse.Value( cursor, 4366 ));
      end if;
      if not gse.Is_Null( cursor, 4367 )then
         a_frs1516.uded32hd := gse.Integer_Value( cursor, 4367 );
      end if;
      if not gse.Is_Null( cursor, 4368 )then
         a_frs1516.uded33hd := gse.Integer_Value( cursor, 4368 );
      end if;
      if not gse.Is_Null( cursor, 4369 )then
         a_frs1516.uded31sp := gse.Integer_Value( cursor, 4369 );
      end if;
      if not gse.Is_Null( cursor, 4370 )then
         a_frs1516.uded32sp := gse.Integer_Value( cursor, 4370 );
      end if;
      if not gse.Is_Null( cursor, 4371 )then
         a_frs1516.uded33sp := gse.Integer_Value( cursor, 4371 );
      end if;
      if not gse.Is_Null( cursor, 4372 )then
         a_frs1516.uded41hd := gse.Integer_Value( cursor, 4372 );
      end if;
      if not gse.Is_Null( cursor, 4373 )then
         a_frs1516.uded42hd := gse.Integer_Value( cursor, 4373 );
      end if;
      if not gse.Is_Null( cursor, 4374 )then
         a_frs1516.uded43hd := gse.Integer_Value( cursor, 4374 );
      end if;
      if not gse.Is_Null( cursor, 4375 )then
         a_frs1516.uded41sp := gse.Integer_Value( cursor, 4375 );
      end if;
      if not gse.Is_Null( cursor, 4376 )then
         a_frs1516.uded42sp := gse.Integer_Value( cursor, 4376 );
      end if;
      if not gse.Is_Null( cursor, 4377 )then
         a_frs1516.uded43sp := gse.Integer_Value( cursor, 4377 );
      end if;
      if not gse.Is_Null( cursor, 4378 )then
         a_frs1516.uded51hd:= Amount'Value( gse.Value( cursor, 4378 ));
      end if;
      if not gse.Is_Null( cursor, 4379 )then
         a_frs1516.uded52hd := gse.Integer_Value( cursor, 4379 );
      end if;
      if not gse.Is_Null( cursor, 4380 )then
         a_frs1516.uded53hd := gse.Integer_Value( cursor, 4380 );
      end if;
      if not gse.Is_Null( cursor, 4381 )then
         a_frs1516.uded51sp:= Amount'Value( gse.Value( cursor, 4381 ));
      end if;
      if not gse.Is_Null( cursor, 4382 )then
         a_frs1516.uded52sp := gse.Integer_Value( cursor, 4382 );
      end if;
      if not gse.Is_Null( cursor, 4383 )then
         a_frs1516.uded53sp := gse.Integer_Value( cursor, 4383 );
      end if;
      if not gse.Is_Null( cursor, 4384 )then
         a_frs1516.uded61hd := gse.Integer_Value( cursor, 4384 );
      end if;
      if not gse.Is_Null( cursor, 4385 )then
         a_frs1516.uded62hd := gse.Integer_Value( cursor, 4385 );
      end if;
      if not gse.Is_Null( cursor, 4386 )then
         a_frs1516.uded63hd := gse.Integer_Value( cursor, 4386 );
      end if;
      if not gse.Is_Null( cursor, 4387 )then
         a_frs1516.uded61sp := gse.Integer_Value( cursor, 4387 );
      end if;
      if not gse.Is_Null( cursor, 4388 )then
         a_frs1516.uded62sp := gse.Integer_Value( cursor, 4388 );
      end if;
      if not gse.Is_Null( cursor, 4389 )then
         a_frs1516.uded63sp := gse.Integer_Value( cursor, 4389 );
      end if;
      if not gse.Is_Null( cursor, 4390 )then
         a_frs1516.uded71hd := gse.Integer_Value( cursor, 4390 );
      end if;
      if not gse.Is_Null( cursor, 4391 )then
         a_frs1516.uded72hd := gse.Integer_Value( cursor, 4391 );
      end if;
      if not gse.Is_Null( cursor, 4392 )then
         a_frs1516.uded73hd := gse.Integer_Value( cursor, 4392 );
      end if;
      if not gse.Is_Null( cursor, 4393 )then
         a_frs1516.uded71sp := gse.Integer_Value( cursor, 4393 );
      end if;
      if not gse.Is_Null( cursor, 4394 )then
         a_frs1516.uded72sp := gse.Integer_Value( cursor, 4394 );
      end if;
      if not gse.Is_Null( cursor, 4395 )then
         a_frs1516.uded73sp := gse.Integer_Value( cursor, 4395 );
      end if;
      if not gse.Is_Null( cursor, 4396 )then
         a_frs1516.uded81hd := gse.Integer_Value( cursor, 4396 );
      end if;
      if not gse.Is_Null( cursor, 4397 )then
         a_frs1516.uded82hd := gse.Integer_Value( cursor, 4397 );
      end if;
      if not gse.Is_Null( cursor, 4398 )then
         a_frs1516.uded83hd := gse.Integer_Value( cursor, 4398 );
      end if;
      if not gse.Is_Null( cursor, 4399 )then
         a_frs1516.uded81sp := gse.Integer_Value( cursor, 4399 );
      end if;
      if not gse.Is_Null( cursor, 4400 )then
         a_frs1516.uded82sp := gse.Integer_Value( cursor, 4400 );
      end if;
      if not gse.Is_Null( cursor, 4401 )then
         a_frs1516.uded83sp := gse.Integer_Value( cursor, 4401 );
      end if;
      if not gse.Is_Null( cursor, 4402 )then
         a_frs1516.uded91hd:= Amount'Value( gse.Value( cursor, 4402 ));
      end if;
      if not gse.Is_Null( cursor, 4403 )then
         a_frs1516.uded92hd := gse.Integer_Value( cursor, 4403 );
      end if;
      if not gse.Is_Null( cursor, 4404 )then
         a_frs1516.uded93hd := gse.Integer_Value( cursor, 4404 );
      end if;
      if not gse.Is_Null( cursor, 4405 )then
         a_frs1516.uded91sp := gse.Integer_Value( cursor, 4405 );
      end if;
      if not gse.Is_Null( cursor, 4406 )then
         a_frs1516.uded92sp := gse.Integer_Value( cursor, 4406 );
      end if;
      if not gse.Is_Null( cursor, 4407 )then
         a_frs1516.uded93sp := gse.Integer_Value( cursor, 4407 );
      end if;
      if not gse.Is_Null( cursor, 4408 )then
         a_frs1516.ugros1hd:= Amount'Value( gse.Value( cursor, 4408 ));
      end if;
      if not gse.Is_Null( cursor, 4409 )then
         a_frs1516.ugros2hd:= Amount'Value( gse.Value( cursor, 4409 ));
      end if;
      if not gse.Is_Null( cursor, 4410 )then
         a_frs1516.ugros3hd := gse.Integer_Value( cursor, 4410 );
      end if;
      if not gse.Is_Null( cursor, 4411 )then
         a_frs1516.ugros1sp:= Amount'Value( gse.Value( cursor, 4411 ));
      end if;
      if not gse.Is_Null( cursor, 4412 )then
         a_frs1516.ugros2sp:= Amount'Value( gse.Value( cursor, 4412 ));
      end if;
      if not gse.Is_Null( cursor, 4413 )then
         a_frs1516.ugros3sp := gse.Integer_Value( cursor, 4413 );
      end if;
      if not gse.Is_Null( cursor, 4414 )then
         a_frs1516.ugrsp1hd:= To_Unbounded_String( gse.Value( cursor, 4414 ));
      end if;
      if not gse.Is_Null( cursor, 4415 )then
         a_frs1516.ugrsp2hd:= Amount'Value( gse.Value( cursor, 4415 ));
      end if;
      if not gse.Is_Null( cursor, 4416 )then
         a_frs1516.ugrsp3hd:= Amount'Value( gse.Value( cursor, 4416 ));
      end if;
      if not gse.Is_Null( cursor, 4417 )then
         a_frs1516.ugrsp1sp:= Amount'Value( gse.Value( cursor, 4417 ));
      end if;
      if not gse.Is_Null( cursor, 4418 )then
         a_frs1516.ugrsp2sp:= Amount'Value( gse.Value( cursor, 4418 ));
      end if;
      if not gse.Is_Null( cursor, 4419 )then
         a_frs1516.ugrsp3sp:= Amount'Value( gse.Value( cursor, 4419 ));
      end if;
      if not gse.Is_Null( cursor, 4420 )then
         a_frs1516.uinc11hd := gse.Integer_Value( cursor, 4420 );
      end if;
      if not gse.Is_Null( cursor, 4421 )then
         a_frs1516.uinc12hd := gse.Integer_Value( cursor, 4421 );
      end if;
      if not gse.Is_Null( cursor, 4422 )then
         a_frs1516.uinc13hd := gse.Integer_Value( cursor, 4422 );
      end if;
      if not gse.Is_Null( cursor, 4423 )then
         a_frs1516.uinc11sp := gse.Integer_Value( cursor, 4423 );
      end if;
      if not gse.Is_Null( cursor, 4424 )then
         a_frs1516.uinc12sp := gse.Integer_Value( cursor, 4424 );
      end if;
      if not gse.Is_Null( cursor, 4425 )then
         a_frs1516.uinc13sp := gse.Integer_Value( cursor, 4425 );
      end if;
      if not gse.Is_Null( cursor, 4426 )then
         a_frs1516.uinc21hd := gse.Integer_Value( cursor, 4426 );
      end if;
      if not gse.Is_Null( cursor, 4427 )then
         a_frs1516.uinc22hd := gse.Integer_Value( cursor, 4427 );
      end if;
      if not gse.Is_Null( cursor, 4428 )then
         a_frs1516.uinc23hd := gse.Integer_Value( cursor, 4428 );
      end if;
      if not gse.Is_Null( cursor, 4429 )then
         a_frs1516.uinc21sp := gse.Integer_Value( cursor, 4429 );
      end if;
      if not gse.Is_Null( cursor, 4430 )then
         a_frs1516.uinc22sp := gse.Integer_Value( cursor, 4430 );
      end if;
      if not gse.Is_Null( cursor, 4431 )then
         a_frs1516.uinc23sp := gse.Integer_Value( cursor, 4431 );
      end if;
      if not gse.Is_Null( cursor, 4432 )then
         a_frs1516.uinc31hd := gse.Integer_Value( cursor, 4432 );
      end if;
      if not gse.Is_Null( cursor, 4433 )then
         a_frs1516.uinc32hd := gse.Integer_Value( cursor, 4433 );
      end if;
      if not gse.Is_Null( cursor, 4434 )then
         a_frs1516.uinc33hd := gse.Integer_Value( cursor, 4434 );
      end if;
      if not gse.Is_Null( cursor, 4435 )then
         a_frs1516.uinc31sp := gse.Integer_Value( cursor, 4435 );
      end if;
      if not gse.Is_Null( cursor, 4436 )then
         a_frs1516.uinc32sp := gse.Integer_Value( cursor, 4436 );
      end if;
      if not gse.Is_Null( cursor, 4437 )then
         a_frs1516.uinc33sp := gse.Integer_Value( cursor, 4437 );
      end if;
      if not gse.Is_Null( cursor, 4438 )then
         a_frs1516.uinc41hd := gse.Integer_Value( cursor, 4438 );
      end if;
      if not gse.Is_Null( cursor, 4439 )then
         a_frs1516.uinc42hd := gse.Integer_Value( cursor, 4439 );
      end if;
      if not gse.Is_Null( cursor, 4440 )then
         a_frs1516.uinc43hd := gse.Integer_Value( cursor, 4440 );
      end if;
      if not gse.Is_Null( cursor, 4441 )then
         a_frs1516.uinc41sp := gse.Integer_Value( cursor, 4441 );
      end if;
      if not gse.Is_Null( cursor, 4442 )then
         a_frs1516.uinc42sp := gse.Integer_Value( cursor, 4442 );
      end if;
      if not gse.Is_Null( cursor, 4443 )then
         a_frs1516.uinc43sp := gse.Integer_Value( cursor, 4443 );
      end if;
      if not gse.Is_Null( cursor, 4444 )then
         a_frs1516.uinc51hd := gse.Integer_Value( cursor, 4444 );
      end if;
      if not gse.Is_Null( cursor, 4445 )then
         a_frs1516.uinc52hd := gse.Integer_Value( cursor, 4445 );
      end if;
      if not gse.Is_Null( cursor, 4446 )then
         a_frs1516.uinc53hd := gse.Integer_Value( cursor, 4446 );
      end if;
      if not gse.Is_Null( cursor, 4447 )then
         a_frs1516.uinc51sp := gse.Integer_Value( cursor, 4447 );
      end if;
      if not gse.Is_Null( cursor, 4448 )then
         a_frs1516.uinc52sp := gse.Integer_Value( cursor, 4448 );
      end if;
      if not gse.Is_Null( cursor, 4449 )then
         a_frs1516.uinc53sp := gse.Integer_Value( cursor, 4449 );
      end if;
      if not gse.Is_Null( cursor, 4450 )then
         a_frs1516.uinc61hd := gse.Integer_Value( cursor, 4450 );
      end if;
      if not gse.Is_Null( cursor, 4451 )then
         a_frs1516.uinc62hd := gse.Integer_Value( cursor, 4451 );
      end if;
      if not gse.Is_Null( cursor, 4452 )then
         a_frs1516.uinc63hd := gse.Integer_Value( cursor, 4452 );
      end if;
      if not gse.Is_Null( cursor, 4453 )then
         a_frs1516.uinc61sp := gse.Integer_Value( cursor, 4453 );
      end if;
      if not gse.Is_Null( cursor, 4454 )then
         a_frs1516.uinc62sp := gse.Integer_Value( cursor, 4454 );
      end if;
      if not gse.Is_Null( cursor, 4455 )then
         a_frs1516.uinc63sp := gse.Integer_Value( cursor, 4455 );
      end if;
      if not gse.Is_Null( cursor, 4456 )then
         a_frs1516.uinc71hd := gse.Integer_Value( cursor, 4456 );
      end if;
      if not gse.Is_Null( cursor, 4457 )then
         a_frs1516.uinc72hd := gse.Integer_Value( cursor, 4457 );
      end if;
      if not gse.Is_Null( cursor, 4458 )then
         a_frs1516.uinc73hd := gse.Integer_Value( cursor, 4458 );
      end if;
      if not gse.Is_Null( cursor, 4459 )then
         a_frs1516.uinc71sp := gse.Integer_Value( cursor, 4459 );
      end if;
      if not gse.Is_Null( cursor, 4460 )then
         a_frs1516.uinc72sp := gse.Integer_Value( cursor, 4460 );
      end if;
      if not gse.Is_Null( cursor, 4461 )then
         a_frs1516.uinc73sp := gse.Integer_Value( cursor, 4461 );
      end if;
      if not gse.Is_Null( cursor, 4462 )then
         a_frs1516.umile1hd:= Amount'Value( gse.Value( cursor, 4462 ));
      end if;
      if not gse.Is_Null( cursor, 4463 )then
         a_frs1516.umile2hd := gse.Integer_Value( cursor, 4463 );
      end if;
      if not gse.Is_Null( cursor, 4464 )then
         a_frs1516.umile3hd := gse.Integer_Value( cursor, 4464 );
      end if;
      if not gse.Is_Null( cursor, 4465 )then
         a_frs1516.umile1sp:= Amount'Value( gse.Value( cursor, 4465 ));
      end if;
      if not gse.Is_Null( cursor, 4466 )then
         a_frs1516.umile2sp := gse.Integer_Value( cursor, 4466 );
      end if;
      if not gse.Is_Null( cursor, 4467 )then
         a_frs1516.umile3sp := gse.Integer_Value( cursor, 4467 );
      end if;
      if not gse.Is_Null( cursor, 4468 )then
         a_frs1516.umot1hd:= Amount'Value( gse.Value( cursor, 4468 ));
      end if;
      if not gse.Is_Null( cursor, 4469 )then
         a_frs1516.umot2hd := gse.Integer_Value( cursor, 4469 );
      end if;
      if not gse.Is_Null( cursor, 4470 )then
         a_frs1516.umot3hd := gse.Integer_Value( cursor, 4470 );
      end if;
      if not gse.Is_Null( cursor, 4471 )then
         a_frs1516.umot1sp:= Amount'Value( gse.Value( cursor, 4471 ));
      end if;
      if not gse.Is_Null( cursor, 4472 )then
         a_frs1516.umot2sp := gse.Integer_Value( cursor, 4472 );
      end if;
      if not gse.Is_Null( cursor, 4473 )then
         a_frs1516.umot3sp := gse.Integer_Value( cursor, 4473 );
      end if;
      if not gse.Is_Null( cursor, 4474 )then
         a_frs1516.unett1hd:= Amount'Value( gse.Value( cursor, 4474 ));
      end if;
      if not gse.Is_Null( cursor, 4475 )then
         a_frs1516.unett2hd:= Amount'Value( gse.Value( cursor, 4475 ));
      end if;
      if not gse.Is_Null( cursor, 4476 )then
         a_frs1516.unett3hd := gse.Integer_Value( cursor, 4476 );
      end if;
      if not gse.Is_Null( cursor, 4477 )then
         a_frs1516.unett1sp:= Amount'Value( gse.Value( cursor, 4477 ));
      end if;
      if not gse.Is_Null( cursor, 4478 )then
         a_frs1516.unett2sp:= Amount'Value( gse.Value( cursor, 4478 ));
      end if;
      if not gse.Is_Null( cursor, 4479 )then
         a_frs1516.unett3sp := gse.Integer_Value( cursor, 4479 );
      end if;
      if not gse.Is_Null( cursor, 4480 )then
         a_frs1516.uoth11hd := gse.Integer_Value( cursor, 4480 );
      end if;
      if not gse.Is_Null( cursor, 4481 )then
         a_frs1516.uoth12hd := gse.Integer_Value( cursor, 4481 );
      end if;
      if not gse.Is_Null( cursor, 4482 )then
         a_frs1516.uoth13hd := gse.Integer_Value( cursor, 4482 );
      end if;
      if not gse.Is_Null( cursor, 4483 )then
         a_frs1516.uoth11sp := gse.Integer_Value( cursor, 4483 );
      end if;
      if not gse.Is_Null( cursor, 4484 )then
         a_frs1516.uoth12sp := gse.Integer_Value( cursor, 4484 );
      end if;
      if not gse.Is_Null( cursor, 4485 )then
         a_frs1516.uoth13sp := gse.Integer_Value( cursor, 4485 );
      end if;
      if not gse.Is_Null( cursor, 4486 )then
         a_frs1516.uoth21hd := gse.Integer_Value( cursor, 4486 );
      end if;
      if not gse.Is_Null( cursor, 4487 )then
         a_frs1516.uoth22hd := gse.Integer_Value( cursor, 4487 );
      end if;
      if not gse.Is_Null( cursor, 4488 )then
         a_frs1516.uoth23hd := gse.Integer_Value( cursor, 4488 );
      end if;
      if not gse.Is_Null( cursor, 4489 )then
         a_frs1516.uoth21sp := gse.Integer_Value( cursor, 4489 );
      end if;
      if not gse.Is_Null( cursor, 4490 )then
         a_frs1516.uoth22sp := gse.Integer_Value( cursor, 4490 );
      end if;
      if not gse.Is_Null( cursor, 4491 )then
         a_frs1516.uoth23sp := gse.Integer_Value( cursor, 4491 );
      end if;
      if not gse.Is_Null( cursor, 4492 )then
         a_frs1516.uoth31hd := gse.Integer_Value( cursor, 4492 );
      end if;
      if not gse.Is_Null( cursor, 4493 )then
         a_frs1516.uoth32hd := gse.Integer_Value( cursor, 4493 );
      end if;
      if not gse.Is_Null( cursor, 4494 )then
         a_frs1516.uoth33hd := gse.Integer_Value( cursor, 4494 );
      end if;
      if not gse.Is_Null( cursor, 4495 )then
         a_frs1516.uoth31sp := gse.Integer_Value( cursor, 4495 );
      end if;
      if not gse.Is_Null( cursor, 4496 )then
         a_frs1516.uoth32sp := gse.Integer_Value( cursor, 4496 );
      end if;
      if not gse.Is_Null( cursor, 4497 )then
         a_frs1516.uoth33sp := gse.Integer_Value( cursor, 4497 );
      end if;
      if not gse.Is_Null( cursor, 4498 )then
         a_frs1516.uoth41hd := gse.Integer_Value( cursor, 4498 );
      end if;
      if not gse.Is_Null( cursor, 4499 )then
         a_frs1516.uoth42hd := gse.Integer_Value( cursor, 4499 );
      end if;
      if not gse.Is_Null( cursor, 4500 )then
         a_frs1516.uoth43hd := gse.Integer_Value( cursor, 4500 );
      end if;
      if not gse.Is_Null( cursor, 4501 )then
         a_frs1516.uoth41sp := gse.Integer_Value( cursor, 4501 );
      end if;
      if not gse.Is_Null( cursor, 4502 )then
         a_frs1516.uoth42sp := gse.Integer_Value( cursor, 4502 );
      end if;
      if not gse.Is_Null( cursor, 4503 )then
         a_frs1516.uoth43sp := gse.Integer_Value( cursor, 4503 );
      end if;
      if not gse.Is_Null( cursor, 4504 )then
         a_frs1516.uoth51hd := gse.Integer_Value( cursor, 4504 );
      end if;
      if not gse.Is_Null( cursor, 4505 )then
         a_frs1516.uoth52hd := gse.Integer_Value( cursor, 4505 );
      end if;
      if not gse.Is_Null( cursor, 4506 )then
         a_frs1516.uoth53hd := gse.Integer_Value( cursor, 4506 );
      end if;
      if not gse.Is_Null( cursor, 4507 )then
         a_frs1516.uoth51sp := gse.Integer_Value( cursor, 4507 );
      end if;
      if not gse.Is_Null( cursor, 4508 )then
         a_frs1516.uoth52sp := gse.Integer_Value( cursor, 4508 );
      end if;
      if not gse.Is_Null( cursor, 4509 )then
         a_frs1516.uoth53sp := gse.Integer_Value( cursor, 4509 );
      end if;
      if not gse.Is_Null( cursor, 4510 )then
         a_frs1516.uoth61hd := gse.Integer_Value( cursor, 4510 );
      end if;
      if not gse.Is_Null( cursor, 4511 )then
         a_frs1516.uoth62hd := gse.Integer_Value( cursor, 4511 );
      end if;
      if not gse.Is_Null( cursor, 4512 )then
         a_frs1516.uoth63hd := gse.Integer_Value( cursor, 4512 );
      end if;
      if not gse.Is_Null( cursor, 4513 )then
         a_frs1516.uoth61sp := gse.Integer_Value( cursor, 4513 );
      end if;
      if not gse.Is_Null( cursor, 4514 )then
         a_frs1516.uoth62sp := gse.Integer_Value( cursor, 4514 );
      end if;
      if not gse.Is_Null( cursor, 4515 )then
         a_frs1516.uoth63sp := gse.Integer_Value( cursor, 4515 );
      end if;
      if not gse.Is_Null( cursor, 4516 )then
         a_frs1516.uoth71hd := gse.Integer_Value( cursor, 4516 );
      end if;
      if not gse.Is_Null( cursor, 4517 )then
         a_frs1516.uoth72hd := gse.Integer_Value( cursor, 4517 );
      end if;
      if not gse.Is_Null( cursor, 4518 )then
         a_frs1516.uoth73hd := gse.Integer_Value( cursor, 4518 );
      end if;
      if not gse.Is_Null( cursor, 4519 )then
         a_frs1516.uoth71sp := gse.Integer_Value( cursor, 4519 );
      end if;
      if not gse.Is_Null( cursor, 4520 )then
         a_frs1516.uoth72sp := gse.Integer_Value( cursor, 4520 );
      end if;
      if not gse.Is_Null( cursor, 4521 )then
         a_frs1516.uoth73sp := gse.Integer_Value( cursor, 4521 );
      end if;
      if not gse.Is_Null( cursor, 4522 )then
         a_frs1516.uoth81hd := gse.Integer_Value( cursor, 4522 );
      end if;
      if not gse.Is_Null( cursor, 4523 )then
         a_frs1516.uoth82hd := gse.Integer_Value( cursor, 4523 );
      end if;
      if not gse.Is_Null( cursor, 4524 )then
         a_frs1516.uoth83hd := gse.Integer_Value( cursor, 4524 );
      end if;
      if not gse.Is_Null( cursor, 4525 )then
         a_frs1516.uoth81sp := gse.Integer_Value( cursor, 4525 );
      end if;
      if not gse.Is_Null( cursor, 4526 )then
         a_frs1516.uoth82sp := gse.Integer_Value( cursor, 4526 );
      end if;
      if not gse.Is_Null( cursor, 4527 )then
         a_frs1516.uoth83sp := gse.Integer_Value( cursor, 4527 );
      end if;
      if not gse.Is_Null( cursor, 4528 )then
         a_frs1516.uoth91hd := gse.Integer_Value( cursor, 4528 );
      end if;
      if not gse.Is_Null( cursor, 4529 )then
         a_frs1516.uoth92hd := gse.Integer_Value( cursor, 4529 );
      end if;
      if not gse.Is_Null( cursor, 4530 )then
         a_frs1516.uoth93hd := gse.Integer_Value( cursor, 4530 );
      end if;
      if not gse.Is_Null( cursor, 4531 )then
         a_frs1516.uoth91sp := gse.Integer_Value( cursor, 4531 );
      end if;
      if not gse.Is_Null( cursor, 4532 )then
         a_frs1516.uoth92sp := gse.Integer_Value( cursor, 4532 );
      end if;
      if not gse.Is_Null( cursor, 4533 )then
         a_frs1516.uoth93sp := gse.Integer_Value( cursor, 4533 );
      end if;
      if not gse.Is_Null( cursor, 4534 )then
         a_frs1516.uot101hd := gse.Integer_Value( cursor, 4534 );
      end if;
      if not gse.Is_Null( cursor, 4535 )then
         a_frs1516.uot102hd := gse.Integer_Value( cursor, 4535 );
      end if;
      if not gse.Is_Null( cursor, 4536 )then
         a_frs1516.uot103hd := gse.Integer_Value( cursor, 4536 );
      end if;
      if not gse.Is_Null( cursor, 4537 )then
         a_frs1516.uot101sp := gse.Integer_Value( cursor, 4537 );
      end if;
      if not gse.Is_Null( cursor, 4538 )then
         a_frs1516.uot102sp := gse.Integer_Value( cursor, 4538 );
      end if;
      if not gse.Is_Null( cursor, 4539 )then
         a_frs1516.uot103sp := gse.Integer_Value( cursor, 4539 );
      end if;
      if not gse.Is_Null( cursor, 4540 )then
         a_frs1516.uotht1hd:= Amount'Value( gse.Value( cursor, 4540 ));
      end if;
      if not gse.Is_Null( cursor, 4541 )then
         a_frs1516.uotht2hd := gse.Integer_Value( cursor, 4541 );
      end if;
      if not gse.Is_Null( cursor, 4542 )then
         a_frs1516.uotht3hd := gse.Integer_Value( cursor, 4542 );
      end if;
      if not gse.Is_Null( cursor, 4543 )then
         a_frs1516.uotht1sp := gse.Integer_Value( cursor, 4543 );
      end if;
      if not gse.Is_Null( cursor, 4544 )then
         a_frs1516.uotht2sp := gse.Integer_Value( cursor, 4544 );
      end if;
      if not gse.Is_Null( cursor, 4545 )then
         a_frs1516.uotht3sp := gse.Integer_Value( cursor, 4545 );
      end if;
      if not gse.Is_Null( cursor, 4546 )then
         a_frs1516.uothr1hd:= Amount'Value( gse.Value( cursor, 4546 ));
      end if;
      if not gse.Is_Null( cursor, 4547 )then
         a_frs1516.uothr2hd:= Amount'Value( gse.Value( cursor, 4547 ));
      end if;
      if not gse.Is_Null( cursor, 4548 )then
         a_frs1516.uothr3hd := gse.Integer_Value( cursor, 4548 );
      end if;
      if not gse.Is_Null( cursor, 4549 )then
         a_frs1516.uothr1sp:= Amount'Value( gse.Value( cursor, 4549 ));
      end if;
      if not gse.Is_Null( cursor, 4550 )then
         a_frs1516.uothr2sp:= Amount'Value( gse.Value( cursor, 4550 ));
      end if;
      if not gse.Is_Null( cursor, 4551 )then
         a_frs1516.uothr3sp := gse.Integer_Value( cursor, 4551 );
      end if;
      if not gse.Is_Null( cursor, 4552 )then
         a_frs1516.upay1hd := gse.Integer_Value( cursor, 4552 );
      end if;
      if not gse.Is_Null( cursor, 4553 )then
         a_frs1516.upay2hd := gse.Integer_Value( cursor, 4553 );
      end if;
      if not gse.Is_Null( cursor, 4554 )then
         a_frs1516.upay3hd := gse.Integer_Value( cursor, 4554 );
      end if;
      if not gse.Is_Null( cursor, 4555 )then
         a_frs1516.upay1sp := gse.Integer_Value( cursor, 4555 );
      end if;
      if not gse.Is_Null( cursor, 4556 )then
         a_frs1516.upay2sp := gse.Integer_Value( cursor, 4556 );
      end if;
      if not gse.Is_Null( cursor, 4557 )then
         a_frs1516.upay3sp := gse.Integer_Value( cursor, 4557 );
      end if;
      if not gse.Is_Null( cursor, 4558 )then
         a_frs1516.usapa1hd := gse.Integer_Value( cursor, 4558 );
      end if;
      if not gse.Is_Null( cursor, 4559 )then
         a_frs1516.usapa2hd := gse.Integer_Value( cursor, 4559 );
      end if;
      if not gse.Is_Null( cursor, 4560 )then
         a_frs1516.usapa3hd := gse.Integer_Value( cursor, 4560 );
      end if;
      if not gse.Is_Null( cursor, 4561 )then
         a_frs1516.usapa1sp := gse.Integer_Value( cursor, 4561 );
      end if;
      if not gse.Is_Null( cursor, 4562 )then
         a_frs1516.usapa2sp := gse.Integer_Value( cursor, 4562 );
      end if;
      if not gse.Is_Null( cursor, 4563 )then
         a_frs1516.usapa3sp := gse.Integer_Value( cursor, 4563 );
      end if;
      if not gse.Is_Null( cursor, 4564 )then
         a_frs1516.uspam1hd:= Amount'Value( gse.Value( cursor, 4564 ));
      end if;
      if not gse.Is_Null( cursor, 4565 )then
         a_frs1516.uspam2hd := gse.Integer_Value( cursor, 4565 );
      end if;
      if not gse.Is_Null( cursor, 4566 )then
         a_frs1516.uspam3hd := gse.Integer_Value( cursor, 4566 );
      end if;
      if not gse.Is_Null( cursor, 4567 )then
         a_frs1516.uspam1sp:= Amount'Value( gse.Value( cursor, 4567 ));
      end if;
      if not gse.Is_Null( cursor, 4568 )then
         a_frs1516.uspam2sp := gse.Integer_Value( cursor, 4568 );
      end if;
      if not gse.Is_Null( cursor, 4569 )then
         a_frs1516.uspam3sp := gse.Integer_Value( cursor, 4569 );
      end if;
      if not gse.Is_Null( cursor, 4570 )then
         a_frs1516.uspra1hd := gse.Integer_Value( cursor, 4570 );
      end if;
      if not gse.Is_Null( cursor, 4571 )then
         a_frs1516.uspra2hd := gse.Integer_Value( cursor, 4571 );
      end if;
      if not gse.Is_Null( cursor, 4572 )then
         a_frs1516.uspra3hd := gse.Integer_Value( cursor, 4572 );
      end if;
      if not gse.Is_Null( cursor, 4573 )then
         a_frs1516.uspra1sp := gse.Integer_Value( cursor, 4573 );
      end if;
      if not gse.Is_Null( cursor, 4574 )then
         a_frs1516.uspra2sp := gse.Integer_Value( cursor, 4574 );
      end if;
      if not gse.Is_Null( cursor, 4575 )then
         a_frs1516.uspra3sp := gse.Integer_Value( cursor, 4575 );
      end if;
      if not gse.Is_Null( cursor, 4576 )then
         a_frs1516.uppam1hd := gse.Integer_Value( cursor, 4576 );
      end if;
      if not gse.Is_Null( cursor, 4577 )then
         a_frs1516.uppam2hd := gse.Integer_Value( cursor, 4577 );
      end if;
      if not gse.Is_Null( cursor, 4578 )then
         a_frs1516.uppam3hd := gse.Integer_Value( cursor, 4578 );
      end if;
      if not gse.Is_Null( cursor, 4579 )then
         a_frs1516.uppam1sp := gse.Integer_Value( cursor, 4579 );
      end if;
      if not gse.Is_Null( cursor, 4580 )then
         a_frs1516.uppam2sp := gse.Integer_Value( cursor, 4580 );
      end if;
      if not gse.Is_Null( cursor, 4581 )then
         a_frs1516.uppam3sp := gse.Integer_Value( cursor, 4581 );
      end if;
      if not gse.Is_Null( cursor, 4582 )then
         a_frs1516.usspa1hd:= Amount'Value( gse.Value( cursor, 4582 ));
      end if;
      if not gse.Is_Null( cursor, 4583 )then
         a_frs1516.usspa2hd := gse.Integer_Value( cursor, 4583 );
      end if;
      if not gse.Is_Null( cursor, 4584 )then
         a_frs1516.usspa3hd := gse.Integer_Value( cursor, 4584 );
      end if;
      if not gse.Is_Null( cursor, 4585 )then
         a_frs1516.usspa1sp := gse.Integer_Value( cursor, 4585 );
      end if;
      if not gse.Is_Null( cursor, 4586 )then
         a_frs1516.usspa2sp := gse.Integer_Value( cursor, 4586 );
      end if;
      if not gse.Is_Null( cursor, 4587 )then
         a_frs1516.usspa3sp := gse.Integer_Value( cursor, 4587 );
      end if;
      if not gse.Is_Null( cursor, 4588 )then
         a_frs1516.to2hr1hd:= Amount'Value( gse.Value( cursor, 4588 ));
      end if;
      if not gse.Is_Null( cursor, 4589 )then
         a_frs1516.to2hr2hd:= Amount'Value( gse.Value( cursor, 4589 ));
      end if;
      if not gse.Is_Null( cursor, 4590 )then
         a_frs1516.to2hr3hd := gse.Integer_Value( cursor, 4590 );
      end if;
      if not gse.Is_Null( cursor, 4591 )then
         a_frs1516.to2hr1sp:= Amount'Value( gse.Value( cursor, 4591 ));
      end if;
      if not gse.Is_Null( cursor, 4592 )then
         a_frs1516.to2hr2sp:= Amount'Value( gse.Value( cursor, 4592 ));
      end if;
      if not gse.Is_Null( cursor, 4593 )then
         a_frs1516.to2hr3sp := gse.Integer_Value( cursor, 4593 );
      end if;
      if not gse.Is_Null( cursor, 4594 )then
         a_frs1516.utaxa1hd:= Amount'Value( gse.Value( cursor, 4594 ));
      end if;
      if not gse.Is_Null( cursor, 4595 )then
         a_frs1516.utaxa2hd := gse.Integer_Value( cursor, 4595 );
      end if;
      if not gse.Is_Null( cursor, 4596 )then
         a_frs1516.utaxa3hd := gse.Integer_Value( cursor, 4596 );
      end if;
      if not gse.Is_Null( cursor, 4597 )then
         a_frs1516.utaxa1sp:= Amount'Value( gse.Value( cursor, 4597 ));
      end if;
      if not gse.Is_Null( cursor, 4598 )then
         a_frs1516.utaxa2sp := gse.Integer_Value( cursor, 4598 );
      end if;
      if not gse.Is_Null( cursor, 4599 )then
         a_frs1516.utaxa3sp := gse.Integer_Value( cursor, 4599 );
      end if;
      if not gse.Is_Null( cursor, 4600 )then
         a_frs1516.vcamt1hd:= Amount'Value( gse.Value( cursor, 4600 ));
      end if;
      if not gse.Is_Null( cursor, 4601 )then
         a_frs1516.vcamt2hd := gse.Integer_Value( cursor, 4601 );
      end if;
      if not gse.Is_Null( cursor, 4602 )then
         a_frs1516.vcamt3hd := gse.Integer_Value( cursor, 4602 );
      end if;
      if not gse.Is_Null( cursor, 4603 )then
         a_frs1516.vcamt1sp:= Amount'Value( gse.Value( cursor, 4603 ));
      end if;
      if not gse.Is_Null( cursor, 4604 )then
         a_frs1516.vcamt2sp := gse.Integer_Value( cursor, 4604 );
      end if;
      if not gse.Is_Null( cursor, 4605 )then
         a_frs1516.vcamt3sp := gse.Integer_Value( cursor, 4605 );
      end if;
      if not gse.Is_Null( cursor, 4606 )then
         a_frs1516.vcpd1hd := gse.Integer_Value( cursor, 4606 );
      end if;
      if not gse.Is_Null( cursor, 4607 )then
         a_frs1516.vcpd2hd := gse.Integer_Value( cursor, 4607 );
      end if;
      if not gse.Is_Null( cursor, 4608 )then
         a_frs1516.vcpd3hd := gse.Integer_Value( cursor, 4608 );
      end if;
      if not gse.Is_Null( cursor, 4609 )then
         a_frs1516.vcpd1sp := gse.Integer_Value( cursor, 4609 );
      end if;
      if not gse.Is_Null( cursor, 4610 )then
         a_frs1516.vcpd2sp := gse.Integer_Value( cursor, 4610 );
      end if;
      if not gse.Is_Null( cursor, 4611 )then
         a_frs1516.vcpd3sp := gse.Integer_Value( cursor, 4611 );
      end if;
      if not gse.Is_Null( cursor, 4612 )then
         a_frs1516.vcsac1hd := gse.Integer_Value( cursor, 4612 );
      end if;
      if not gse.Is_Null( cursor, 4613 )then
         a_frs1516.vcsac2hd := gse.Integer_Value( cursor, 4613 );
      end if;
      if not gse.Is_Null( cursor, 4614 )then
         a_frs1516.vcsac3hd := gse.Integer_Value( cursor, 4614 );
      end if;
      if not gse.Is_Null( cursor, 4615 )then
         a_frs1516.vcsac1sp := gse.Integer_Value( cursor, 4615 );
      end if;
      if not gse.Is_Null( cursor, 4616 )then
         a_frs1516.vcsac2sp := gse.Integer_Value( cursor, 4616 );
      end if;
      if not gse.Is_Null( cursor, 4617 )then
         a_frs1516.vcsac3sp := gse.Integer_Value( cursor, 4617 );
      end if;
      if not gse.Is_Null( cursor, 4618 )then
         a_frs1516.vcuam1hd := gse.Integer_Value( cursor, 4618 );
      end if;
      if not gse.Is_Null( cursor, 4619 )then
         a_frs1516.vcuam2hd := gse.Integer_Value( cursor, 4619 );
      end if;
      if not gse.Is_Null( cursor, 4620 )then
         a_frs1516.vcuam3hd := gse.Integer_Value( cursor, 4620 );
      end if;
      if not gse.Is_Null( cursor, 4621 )then
         a_frs1516.vcuam1sp := gse.Integer_Value( cursor, 4621 );
      end if;
      if not gse.Is_Null( cursor, 4622 )then
         a_frs1516.vcuam2sp := gse.Integer_Value( cursor, 4622 );
      end if;
      if not gse.Is_Null( cursor, 4623 )then
         a_frs1516.vcuam3sp := gse.Integer_Value( cursor, 4623 );
      end if;
      if not gse.Is_Null( cursor, 4624 )then
         a_frs1516.vcupd1hd := gse.Integer_Value( cursor, 4624 );
      end if;
      if not gse.Is_Null( cursor, 4625 )then
         a_frs1516.vcupd2hd := gse.Integer_Value( cursor, 4625 );
      end if;
      if not gse.Is_Null( cursor, 4626 )then
         a_frs1516.vcupd3hd := gse.Integer_Value( cursor, 4626 );
      end if;
      if not gse.Is_Null( cursor, 4627 )then
         a_frs1516.vcupd1sp := gse.Integer_Value( cursor, 4627 );
      end if;
      if not gse.Is_Null( cursor, 4628 )then
         a_frs1516.vcupd2sp := gse.Integer_Value( cursor, 4628 );
      end if;
      if not gse.Is_Null( cursor, 4629 )then
         a_frs1516.vcupd3sp := gse.Integer_Value( cursor, 4629 );
      end if;
      if not gse.Is_Null( cursor, 4630 )then
         a_frs1516.vcusu1hd := gse.Integer_Value( cursor, 4630 );
      end if;
      if not gse.Is_Null( cursor, 4631 )then
         a_frs1516.vcusu2hd := gse.Integer_Value( cursor, 4631 );
      end if;
      if not gse.Is_Null( cursor, 4632 )then
         a_frs1516.vcusu3hd := gse.Integer_Value( cursor, 4632 );
      end if;
      if not gse.Is_Null( cursor, 4633 )then
         a_frs1516.vcusu1sp := gse.Integer_Value( cursor, 4633 );
      end if;
      if not gse.Is_Null( cursor, 4634 )then
         a_frs1516.vcusu2sp := gse.Integer_Value( cursor, 4634 );
      end if;
      if not gse.Is_Null( cursor, 4635 )then
         a_frs1516.vcusu3sp := gse.Integer_Value( cursor, 4635 );
      end if;
      if not gse.Is_Null( cursor, 4636 )then
         a_frs1516.nou011hd := gse.Integer_Value( cursor, 4636 );
      end if;
      if not gse.Is_Null( cursor, 4637 )then
         a_frs1516.nou012hd := gse.Integer_Value( cursor, 4637 );
      end if;
      if not gse.Is_Null( cursor, 4638 )then
         a_frs1516.nou013hd := gse.Integer_Value( cursor, 4638 );
      end if;
      if not gse.Is_Null( cursor, 4639 )then
         a_frs1516.nou011sp := gse.Integer_Value( cursor, 4639 );
      end if;
      if not gse.Is_Null( cursor, 4640 )then
         a_frs1516.nou012sp := gse.Integer_Value( cursor, 4640 );
      end if;
      if not gse.Is_Null( cursor, 4641 )then
         a_frs1516.nou013sp := gse.Integer_Value( cursor, 4641 );
      end if;
      if not gse.Is_Null( cursor, 4642 )then
         a_frs1516.nou021hd := gse.Integer_Value( cursor, 4642 );
      end if;
      if not gse.Is_Null( cursor, 4643 )then
         a_frs1516.nou022hd := gse.Integer_Value( cursor, 4643 );
      end if;
      if not gse.Is_Null( cursor, 4644 )then
         a_frs1516.nou023hd := gse.Integer_Value( cursor, 4644 );
      end if;
      if not gse.Is_Null( cursor, 4645 )then
         a_frs1516.nou021sp := gse.Integer_Value( cursor, 4645 );
      end if;
      if not gse.Is_Null( cursor, 4646 )then
         a_frs1516.nou022sp := gse.Integer_Value( cursor, 4646 );
      end if;
      if not gse.Is_Null( cursor, 4647 )then
         a_frs1516.nou023sp := gse.Integer_Value( cursor, 4647 );
      end if;
      if not gse.Is_Null( cursor, 4648 )then
         a_frs1516.nou031hd := gse.Integer_Value( cursor, 4648 );
      end if;
      if not gse.Is_Null( cursor, 4649 )then
         a_frs1516.nou032hd := gse.Integer_Value( cursor, 4649 );
      end if;
      if not gse.Is_Null( cursor, 4650 )then
         a_frs1516.nou033hd := gse.Integer_Value( cursor, 4650 );
      end if;
      if not gse.Is_Null( cursor, 4651 )then
         a_frs1516.nou031sp := gse.Integer_Value( cursor, 4651 );
      end if;
      if not gse.Is_Null( cursor, 4652 )then
         a_frs1516.nou032sp := gse.Integer_Value( cursor, 4652 );
      end if;
      if not gse.Is_Null( cursor, 4653 )then
         a_frs1516.nou033sp := gse.Integer_Value( cursor, 4653 );
      end if;
      if not gse.Is_Null( cursor, 4654 )then
         a_frs1516.nou041hd := gse.Integer_Value( cursor, 4654 );
      end if;
      if not gse.Is_Null( cursor, 4655 )then
         a_frs1516.nou042hd := gse.Integer_Value( cursor, 4655 );
      end if;
      if not gse.Is_Null( cursor, 4656 )then
         a_frs1516.nou043hd := gse.Integer_Value( cursor, 4656 );
      end if;
      if not gse.Is_Null( cursor, 4657 )then
         a_frs1516.nou041sp := gse.Integer_Value( cursor, 4657 );
      end if;
      if not gse.Is_Null( cursor, 4658 )then
         a_frs1516.nou042sp := gse.Integer_Value( cursor, 4658 );
      end if;
      if not gse.Is_Null( cursor, 4659 )then
         a_frs1516.nou043sp := gse.Integer_Value( cursor, 4659 );
      end if;
      if not gse.Is_Null( cursor, 4660 )then
         a_frs1516.nou051hd := gse.Integer_Value( cursor, 4660 );
      end if;
      if not gse.Is_Null( cursor, 4661 )then
         a_frs1516.nou052hd := gse.Integer_Value( cursor, 4661 );
      end if;
      if not gse.Is_Null( cursor, 4662 )then
         a_frs1516.nou053hd := gse.Integer_Value( cursor, 4662 );
      end if;
      if not gse.Is_Null( cursor, 4663 )then
         a_frs1516.nou051sp := gse.Integer_Value( cursor, 4663 );
      end if;
      if not gse.Is_Null( cursor, 4664 )then
         a_frs1516.nou052sp := gse.Integer_Value( cursor, 4664 );
      end if;
      if not gse.Is_Null( cursor, 4665 )then
         a_frs1516.nou053sp := gse.Integer_Value( cursor, 4665 );
      end if;
      if not gse.Is_Null( cursor, 4666 )then
         a_frs1516.nou061hd := gse.Integer_Value( cursor, 4666 );
      end if;
      if not gse.Is_Null( cursor, 4667 )then
         a_frs1516.nou062hd := gse.Integer_Value( cursor, 4667 );
      end if;
      if not gse.Is_Null( cursor, 4668 )then
         a_frs1516.nou063hd := gse.Integer_Value( cursor, 4668 );
      end if;
      if not gse.Is_Null( cursor, 4669 )then
         a_frs1516.nou061sp := gse.Integer_Value( cursor, 4669 );
      end if;
      if not gse.Is_Null( cursor, 4670 )then
         a_frs1516.nou062sp := gse.Integer_Value( cursor, 4670 );
      end if;
      if not gse.Is_Null( cursor, 4671 )then
         a_frs1516.nou063sp := gse.Integer_Value( cursor, 4671 );
      end if;
      if not gse.Is_Null( cursor, 4672 )then
         a_frs1516.nou071hd := gse.Integer_Value( cursor, 4672 );
      end if;
      if not gse.Is_Null( cursor, 4673 )then
         a_frs1516.nou072hd := gse.Integer_Value( cursor, 4673 );
      end if;
      if not gse.Is_Null( cursor, 4674 )then
         a_frs1516.nou073hd := gse.Integer_Value( cursor, 4674 );
      end if;
      if not gse.Is_Null( cursor, 4675 )then
         a_frs1516.nou071sp := gse.Integer_Value( cursor, 4675 );
      end if;
      if not gse.Is_Null( cursor, 4676 )then
         a_frs1516.nou072sp := gse.Integer_Value( cursor, 4676 );
      end if;
      if not gse.Is_Null( cursor, 4677 )then
         a_frs1516.nou073sp := gse.Integer_Value( cursor, 4677 );
      end if;
      if not gse.Is_Null( cursor, 4678 )then
         a_frs1516.nou081hd := gse.Integer_Value( cursor, 4678 );
      end if;
      if not gse.Is_Null( cursor, 4679 )then
         a_frs1516.nou082hd := gse.Integer_Value( cursor, 4679 );
      end if;
      if not gse.Is_Null( cursor, 4680 )then
         a_frs1516.nou083hd := gse.Integer_Value( cursor, 4680 );
      end if;
      if not gse.Is_Null( cursor, 4681 )then
         a_frs1516.nou081sp := gse.Integer_Value( cursor, 4681 );
      end if;
      if not gse.Is_Null( cursor, 4682 )then
         a_frs1516.nou082sp := gse.Integer_Value( cursor, 4682 );
      end if;
      if not gse.Is_Null( cursor, 4683 )then
         a_frs1516.nou083sp := gse.Integer_Value( cursor, 4683 );
      end if;
      if not gse.Is_Null( cursor, 4684 )then
         a_frs1516.nou091hd := gse.Integer_Value( cursor, 4684 );
      end if;
      if not gse.Is_Null( cursor, 4685 )then
         a_frs1516.nou092hd := gse.Integer_Value( cursor, 4685 );
      end if;
      if not gse.Is_Null( cursor, 4686 )then
         a_frs1516.nou093hd := gse.Integer_Value( cursor, 4686 );
      end if;
      if not gse.Is_Null( cursor, 4687 )then
         a_frs1516.nou091sp := gse.Integer_Value( cursor, 4687 );
      end if;
      if not gse.Is_Null( cursor, 4688 )then
         a_frs1516.nou092sp := gse.Integer_Value( cursor, 4688 );
      end if;
      if not gse.Is_Null( cursor, 4689 )then
         a_frs1516.nou093sp := gse.Integer_Value( cursor, 4689 );
      end if;
      if not gse.Is_Null( cursor, 4690 )then
         a_frs1516.nou101hd := gse.Integer_Value( cursor, 4690 );
      end if;
      if not gse.Is_Null( cursor, 4691 )then
         a_frs1516.nou102hd := gse.Integer_Value( cursor, 4691 );
      end if;
      if not gse.Is_Null( cursor, 4692 )then
         a_frs1516.nou103hd := gse.Integer_Value( cursor, 4692 );
      end if;
      if not gse.Is_Null( cursor, 4693 )then
         a_frs1516.nou101sp := gse.Integer_Value( cursor, 4693 );
      end if;
      if not gse.Is_Null( cursor, 4694 )then
         a_frs1516.nou102sp := gse.Integer_Value( cursor, 4694 );
      end if;
      if not gse.Is_Null( cursor, 4695 )then
         a_frs1516.nou103sp := gse.Integer_Value( cursor, 4695 );
      end if;
      if not gse.Is_Null( cursor, 4696 )then
         a_frs1516.nou111hd := gse.Integer_Value( cursor, 4696 );
      end if;
      if not gse.Is_Null( cursor, 4697 )then
         a_frs1516.nou112hd := gse.Integer_Value( cursor, 4697 );
      end if;
      if not gse.Is_Null( cursor, 4698 )then
         a_frs1516.nou113hd := gse.Integer_Value( cursor, 4698 );
      end if;
      if not gse.Is_Null( cursor, 4699 )then
         a_frs1516.nou111sp := gse.Integer_Value( cursor, 4699 );
      end if;
      if not gse.Is_Null( cursor, 4700 )then
         a_frs1516.nou112sp := gse.Integer_Value( cursor, 4700 );
      end if;
      if not gse.Is_Null( cursor, 4701 )then
         a_frs1516.nou113sp := gse.Integer_Value( cursor, 4701 );
      end if;
      if not gse.Is_Null( cursor, 4702 )then
         a_frs1516.nou121hd := gse.Integer_Value( cursor, 4702 );
      end if;
      if not gse.Is_Null( cursor, 4703 )then
         a_frs1516.nou122hd := gse.Integer_Value( cursor, 4703 );
      end if;
      if not gse.Is_Null( cursor, 4704 )then
         a_frs1516.nou123hd := gse.Integer_Value( cursor, 4704 );
      end if;
      if not gse.Is_Null( cursor, 4705 )then
         a_frs1516.nou121sp := gse.Integer_Value( cursor, 4705 );
      end if;
      if not gse.Is_Null( cursor, 4706 )then
         a_frs1516.nou122sp := gse.Integer_Value( cursor, 4706 );
      end if;
      if not gse.Is_Null( cursor, 4707 )then
         a_frs1516.nou123sp := gse.Integer_Value( cursor, 4707 );
      end if;
      if not gse.Is_Null( cursor, 4708 )then
         a_frs1516.nou131hd := gse.Integer_Value( cursor, 4708 );
      end if;
      if not gse.Is_Null( cursor, 4709 )then
         a_frs1516.nou132hd := gse.Integer_Value( cursor, 4709 );
      end if;
      if not gse.Is_Null( cursor, 4710 )then
         a_frs1516.nou133hd := gse.Integer_Value( cursor, 4710 );
      end if;
      if not gse.Is_Null( cursor, 4711 )then
         a_frs1516.nou131sp := gse.Integer_Value( cursor, 4711 );
      end if;
      if not gse.Is_Null( cursor, 4712 )then
         a_frs1516.nou132sp := gse.Integer_Value( cursor, 4712 );
      end if;
      if not gse.Is_Null( cursor, 4713 )then
         a_frs1516.nou133sp := gse.Integer_Value( cursor, 4713 );
      end if;
      if not gse.Is_Null( cursor, 4714 )then
         a_frs1516.nou141hd := gse.Integer_Value( cursor, 4714 );
      end if;
      if not gse.Is_Null( cursor, 4715 )then
         a_frs1516.nou142hd := gse.Integer_Value( cursor, 4715 );
      end if;
      if not gse.Is_Null( cursor, 4716 )then
         a_frs1516.nou143hd := gse.Integer_Value( cursor, 4716 );
      end if;
      if not gse.Is_Null( cursor, 4717 )then
         a_frs1516.nou141sp := gse.Integer_Value( cursor, 4717 );
      end if;
      if not gse.Is_Null( cursor, 4718 )then
         a_frs1516.nou142sp := gse.Integer_Value( cursor, 4718 );
      end if;
      if not gse.Is_Null( cursor, 4719 )then
         a_frs1516.nou143sp := gse.Integer_Value( cursor, 4719 );
      end if;
      if not gse.Is_Null( cursor, 4720 )then
         a_frs1516.worka1hd := gse.Integer_Value( cursor, 4720 );
      end if;
      if not gse.Is_Null( cursor, 4721 )then
         a_frs1516.worka2hd := gse.Integer_Value( cursor, 4721 );
      end if;
      if not gse.Is_Null( cursor, 4722 )then
         a_frs1516.worka3hd := gse.Integer_Value( cursor, 4722 );
      end if;
      if not gse.Is_Null( cursor, 4723 )then
         a_frs1516.worka1sp := gse.Integer_Value( cursor, 4723 );
      end if;
      if not gse.Is_Null( cursor, 4724 )then
         a_frs1516.worka2sp := gse.Integer_Value( cursor, 4724 );
      end if;
      if not gse.Is_Null( cursor, 4725 )then
         a_frs1516.worka3sp := gse.Integer_Value( cursor, 4725 );
      end if;
      if not gse.Is_Null( cursor, 4726 )then
         a_frs1516.workm1hd := gse.Integer_Value( cursor, 4726 );
      end if;
      if not gse.Is_Null( cursor, 4727 )then
         a_frs1516.workm2hd := gse.Integer_Value( cursor, 4727 );
      end if;
      if not gse.Is_Null( cursor, 4728 )then
         a_frs1516.workm3hd := gse.Integer_Value( cursor, 4728 );
      end if;
      if not gse.Is_Null( cursor, 4729 )then
         a_frs1516.workm1sp := gse.Integer_Value( cursor, 4729 );
      end if;
      if not gse.Is_Null( cursor, 4730 )then
         a_frs1516.workm2sp := gse.Integer_Value( cursor, 4730 );
      end if;
      if not gse.Is_Null( cursor, 4731 )then
         a_frs1516.workm3sp := gse.Integer_Value( cursor, 4731 );
      end if;
      if not gse.Is_Null( cursor, 4732 )then
         a_frs1516.worky1hd := gse.Integer_Value( cursor, 4732 );
      end if;
      if not gse.Is_Null( cursor, 4733 )then
         a_frs1516.worky2hd := gse.Integer_Value( cursor, 4733 );
      end if;
      if not gse.Is_Null( cursor, 4734 )then
         a_frs1516.worky3hd := gse.Integer_Value( cursor, 4734 );
      end if;
      if not gse.Is_Null( cursor, 4735 )then
         a_frs1516.worky1sp := gse.Integer_Value( cursor, 4735 );
      end if;
      if not gse.Is_Null( cursor, 4736 )then
         a_frs1516.worky2sp := gse.Integer_Value( cursor, 4736 );
      end if;
      if not gse.Is_Null( cursor, 4737 )then
         a_frs1516.worky3sp := gse.Integer_Value( cursor, 4737 );
      end if;
      if not gse.Is_Null( cursor, 4738 )then
         a_frs1516.yjchg1hd := gse.Integer_Value( cursor, 4738 );
      end if;
      if not gse.Is_Null( cursor, 4739 )then
         a_frs1516.yjchg2hd := gse.Integer_Value( cursor, 4739 );
      end if;
      if not gse.Is_Null( cursor, 4740 )then
         a_frs1516.yjchg3hd := gse.Integer_Value( cursor, 4740 );
      end if;
      if not gse.Is_Null( cursor, 4741 )then
         a_frs1516.yjchg1sp := gse.Integer_Value( cursor, 4741 );
      end if;
      if not gse.Is_Null( cursor, 4742 )then
         a_frs1516.yjchg2sp := gse.Integer_Value( cursor, 4742 );
      end if;
      if not gse.Is_Null( cursor, 4743 )then
         a_frs1516.yjchg3sp := gse.Integer_Value( cursor, 4743 );
      end if;
      if not gse.Is_Null( cursor, 4744 )then
         a_frs1516.mp1hd:= Amount'Value( gse.Value( cursor, 4744 ));
      end if;
      if not gse.Is_Null( cursor, 4745 )then
         a_frs1516.mp2hd:= Amount'Value( gse.Value( cursor, 4745 ));
      end if;
      if not gse.Is_Null( cursor, 4746 )then
         a_frs1516.mp3hd:= Amount'Value( gse.Value( cursor, 4746 ));
      end if;
      if not gse.Is_Null( cursor, 4747 )then
         a_frs1516.mp1sp:= Amount'Value( gse.Value( cursor, 4747 ));
      end if;
      if not gse.Is_Null( cursor, 4748 )then
         a_frs1516.mp2sp:= Amount'Value( gse.Value( cursor, 4748 ));
      end if;
      if not gse.Is_Null( cursor, 4749 )then
         a_frs1516.mp3sp := gse.Integer_Value( cursor, 4749 );
      end if;
      if not gse.Is_Null( cursor, 4750 )then
         a_frs1516.mrar11hd := gse.Integer_Value( cursor, 4750 );
      end if;
      if not gse.Is_Null( cursor, 4751 )then
         a_frs1516.mrar12hd := gse.Integer_Value( cursor, 4751 );
      end if;
      if not gse.Is_Null( cursor, 4752 )then
         a_frs1516.mrar13hd := gse.Integer_Value( cursor, 4752 );
      end if;
      if not gse.Is_Null( cursor, 4753 )then
         a_frs1516.mrar11sp := gse.Integer_Value( cursor, 4753 );
      end if;
      if not gse.Is_Null( cursor, 4754 )then
         a_frs1516.mrar12sp := gse.Integer_Value( cursor, 4754 );
      end if;
      if not gse.Is_Null( cursor, 4755 )then
         a_frs1516.mrar13sp := gse.Integer_Value( cursor, 4755 );
      end if;
      if not gse.Is_Null( cursor, 4756 )then
         a_frs1516.mrar21hd := gse.Integer_Value( cursor, 4756 );
      end if;
      if not gse.Is_Null( cursor, 4757 )then
         a_frs1516.mrar22hd := gse.Integer_Value( cursor, 4757 );
      end if;
      if not gse.Is_Null( cursor, 4758 )then
         a_frs1516.mrar23hd := gse.Integer_Value( cursor, 4758 );
      end if;
      if not gse.Is_Null( cursor, 4759 )then
         a_frs1516.mrar21sp := gse.Integer_Value( cursor, 4759 );
      end if;
      if not gse.Is_Null( cursor, 4760 )then
         a_frs1516.mrar22sp := gse.Integer_Value( cursor, 4760 );
      end if;
      if not gse.Is_Null( cursor, 4761 )then
         a_frs1516.mrar23sp := gse.Integer_Value( cursor, 4761 );
      end if;
      if not gse.Is_Null( cursor, 4762 )then
         a_frs1516.mrar31hd := gse.Integer_Value( cursor, 4762 );
      end if;
      if not gse.Is_Null( cursor, 4763 )then
         a_frs1516.mrar32hd := gse.Integer_Value( cursor, 4763 );
      end if;
      if not gse.Is_Null( cursor, 4764 )then
         a_frs1516.mrar33hd := gse.Integer_Value( cursor, 4764 );
      end if;
      if not gse.Is_Null( cursor, 4765 )then
         a_frs1516.mrar31sp := gse.Integer_Value( cursor, 4765 );
      end if;
      if not gse.Is_Null( cursor, 4766 )then
         a_frs1516.mrar32sp := gse.Integer_Value( cursor, 4766 );
      end if;
      if not gse.Is_Null( cursor, 4767 )then
         a_frs1516.mrar33sp := gse.Integer_Value( cursor, 4767 );
      end if;
      if not gse.Is_Null( cursor, 4768 )then
         a_frs1516.mrar41hd := gse.Integer_Value( cursor, 4768 );
      end if;
      if not gse.Is_Null( cursor, 4769 )then
         a_frs1516.mrar42hd := gse.Integer_Value( cursor, 4769 );
      end if;
      if not gse.Is_Null( cursor, 4770 )then
         a_frs1516.mrar43hd := gse.Integer_Value( cursor, 4770 );
      end if;
      if not gse.Is_Null( cursor, 4771 )then
         a_frs1516.mrar41sp := gse.Integer_Value( cursor, 4771 );
      end if;
      if not gse.Is_Null( cursor, 4772 )then
         a_frs1516.mrar42sp := gse.Integer_Value( cursor, 4772 );
      end if;
      if not gse.Is_Null( cursor, 4773 )then
         a_frs1516.mrar43sp := gse.Integer_Value( cursor, 4773 );
      end if;
      if not gse.Is_Null( cursor, 4774 )then
         a_frs1516.mrar51hd := gse.Integer_Value( cursor, 4774 );
      end if;
      if not gse.Is_Null( cursor, 4775 )then
         a_frs1516.mrar52hd := gse.Integer_Value( cursor, 4775 );
      end if;
      if not gse.Is_Null( cursor, 4776 )then
         a_frs1516.mrar53hd := gse.Integer_Value( cursor, 4776 );
      end if;
      if not gse.Is_Null( cursor, 4777 )then
         a_frs1516.mrar51sp := gse.Integer_Value( cursor, 4777 );
      end if;
      if not gse.Is_Null( cursor, 4778 )then
         a_frs1516.mrar52sp := gse.Integer_Value( cursor, 4778 );
      end if;
      if not gse.Is_Null( cursor, 4779 )then
         a_frs1516.mrar53sp := gse.Integer_Value( cursor, 4779 );
      end if;
      if not gse.Is_Null( cursor, 4780 )then
         a_frs1516.mpnch1hd := gse.Integer_Value( cursor, 4780 );
      end if;
      if not gse.Is_Null( cursor, 4781 )then
         a_frs1516.mpnch2hd := gse.Integer_Value( cursor, 4781 );
      end if;
      if not gse.Is_Null( cursor, 4782 )then
         a_frs1516.mpnch3hd := gse.Integer_Value( cursor, 4782 );
      end if;
      if not gse.Is_Null( cursor, 4783 )then
         a_frs1516.mpnch1sp := gse.Integer_Value( cursor, 4783 );
      end if;
      if not gse.Is_Null( cursor, 4784 )then
         a_frs1516.mpnch2sp := gse.Integer_Value( cursor, 4784 );
      end if;
      if not gse.Is_Null( cursor, 4785 )then
         a_frs1516.mpnch3sp := gse.Integer_Value( cursor, 4785 );
      end if;
      if not gse.Is_Null( cursor, 4786 )then
         a_frs1516.pmp1hd := gse.Integer_Value( cursor, 4786 );
      end if;
      if not gse.Is_Null( cursor, 4787 )then
         a_frs1516.pmp2hd := gse.Integer_Value( cursor, 4787 );
      end if;
      if not gse.Is_Null( cursor, 4788 )then
         a_frs1516.pmp3hd := gse.Integer_Value( cursor, 4788 );
      end if;
      if not gse.Is_Null( cursor, 4789 )then
         a_frs1516.pmp1sp := gse.Integer_Value( cursor, 4789 );
      end if;
      if not gse.Is_Null( cursor, 4790 )then
         a_frs1516.pmp2sp := gse.Integer_Value( cursor, 4790 );
      end if;
      if not gse.Is_Null( cursor, 4791 )then
         a_frs1516.pmp3sp := gse.Integer_Value( cursor, 4791 );
      end if;
      if not gse.Is_Null( cursor, 4792 )then
         a_frs1516.ump1hd:= Amount'Value( gse.Value( cursor, 4792 ));
      end if;
      if not gse.Is_Null( cursor, 4793 )then
         a_frs1516.ump2hd:= Amount'Value( gse.Value( cursor, 4793 ));
      end if;
      if not gse.Is_Null( cursor, 4794 )then
         a_frs1516.ump3hd := gse.Integer_Value( cursor, 4794 );
      end if;
      if not gse.Is_Null( cursor, 4795 )then
         a_frs1516.ump1sp:= Amount'Value( gse.Value( cursor, 4795 ));
      end if;
      if not gse.Is_Null( cursor, 4796 )then
         a_frs1516.ump2sp := gse.Integer_Value( cursor, 4796 );
      end if;
      if not gse.Is_Null( cursor, 4797 )then
         a_frs1516.ump3sp := gse.Integer_Value( cursor, 4797 );
      end if;
      if not gse.Is_Null( cursor, 4798 )then
         a_frs1516.pump1hd := gse.Integer_Value( cursor, 4798 );
      end if;
      if not gse.Is_Null( cursor, 4799 )then
         a_frs1516.pump2hd := gse.Integer_Value( cursor, 4799 );
      end if;
      if not gse.Is_Null( cursor, 4800 )then
         a_frs1516.pump3hd := gse.Integer_Value( cursor, 4800 );
      end if;
      if not gse.Is_Null( cursor, 4801 )then
         a_frs1516.pump1sp := gse.Integer_Value( cursor, 4801 );
      end if;
      if not gse.Is_Null( cursor, 4802 )then
         a_frs1516.pump2sp := gse.Integer_Value( cursor, 4802 );
      end if;
      if not gse.Is_Null( cursor, 4803 )then
         a_frs1516.pump3sp := gse.Integer_Value( cursor, 4803 );
      end if;
      if not gse.Is_Null( cursor, 4804 )then
         a_frs1516.isump1hd := gse.Integer_Value( cursor, 4804 );
      end if;
      if not gse.Is_Null( cursor, 4805 )then
         a_frs1516.isump2hd := gse.Integer_Value( cursor, 4805 );
      end if;
      if not gse.Is_Null( cursor, 4806 )then
         a_frs1516.isump3hd := gse.Integer_Value( cursor, 4806 );
      end if;
      if not gse.Is_Null( cursor, 4807 )then
         a_frs1516.isump1sp := gse.Integer_Value( cursor, 4807 );
      end if;
      if not gse.Is_Null( cursor, 4808 )then
         a_frs1516.isump2sp := gse.Integer_Value( cursor, 4808 );
      end if;
      if not gse.Is_Null( cursor, 4809 )then
         a_frs1516.isump3sp := gse.Integer_Value( cursor, 4809 );
      end if;
      if not gse.Is_Null( cursor, 4810 )then
         a_frs1516.jobst1hd := gse.Integer_Value( cursor, 4810 );
      end if;
      if not gse.Is_Null( cursor, 4811 )then
         a_frs1516.jobst2hd := gse.Integer_Value( cursor, 4811 );
      end if;
      if not gse.Is_Null( cursor, 4812 )then
         a_frs1516.jobst1sp := gse.Integer_Value( cursor, 4812 );
      end if;
      if not gse.Is_Null( cursor, 4813 )then
         a_frs1516.jobst2sp := gse.Integer_Value( cursor, 4813 );
      end if;
      if not gse.Is_Null( cursor, 4814 )then
         a_frs1516.oddtp1hd := gse.Integer_Value( cursor, 4814 );
      end if;
      if not gse.Is_Null( cursor, 4815 )then
         a_frs1516.oddtp2hd := gse.Integer_Value( cursor, 4815 );
      end if;
      if not gse.Is_Null( cursor, 4816 )then
         a_frs1516.oddtp1sp := gse.Integer_Value( cursor, 4816 );
      end if;
      if not gse.Is_Null( cursor, 4817 )then
         a_frs1516.oddtp2sp := gse.Integer_Value( cursor, 4817 );
      end if;
      if not gse.Is_Null( cursor, 4818 )then
         a_frs1516.oddjb1hd:= Amount'Value( gse.Value( cursor, 4818 ));
      end if;
      if not gse.Is_Null( cursor, 4819 )then
         a_frs1516.oddjb2hd:= Amount'Value( gse.Value( cursor, 4819 ));
      end if;
      if not gse.Is_Null( cursor, 4820 )then
         a_frs1516.oddjb1sp:= Amount'Value( gse.Value( cursor, 4820 ));
      end if;
      if not gse.Is_Null( cursor, 4821 )then
         a_frs1516.oddjb2sp := gse.Integer_Value( cursor, 4821 );
      end if;
      if not gse.Is_Null( cursor, 4822 )then
         a_frs1516.oddjn1hd := gse.Integer_Value( cursor, 4822 );
      end if;
      if not gse.Is_Null( cursor, 4823 )then
         a_frs1516.oddjn2hd := gse.Integer_Value( cursor, 4823 );
      end if;
      if not gse.Is_Null( cursor, 4824 )then
         a_frs1516.oddjn1sp := gse.Integer_Value( cursor, 4824 );
      end if;
      if not gse.Is_Null( cursor, 4825 )then
         a_frs1516.oddjn2sp := gse.Integer_Value( cursor, 4825 );
      end if;
      if not gse.Is_Null( cursor, 4826 )then
         a_frs1516.poth1hd := gse.Integer_Value( cursor, 4826 );
      end if;
      if not gse.Is_Null( cursor, 4827 )then
         a_frs1516.poth2hd := gse.Integer_Value( cursor, 4827 );
      end if;
      if not gse.Is_Null( cursor, 4828 )then
         a_frs1516.poth3hd := gse.Integer_Value( cursor, 4828 );
      end if;
      if not gse.Is_Null( cursor, 4829 )then
         a_frs1516.poth4hd := gse.Integer_Value( cursor, 4829 );
      end if;
      if not gse.Is_Null( cursor, 4830 )then
         a_frs1516.poth5hd := gse.Integer_Value( cursor, 4830 );
      end if;
      if not gse.Is_Null( cursor, 4831 )then
         a_frs1516.poth6hd := gse.Integer_Value( cursor, 4831 );
      end if;
      if not gse.Is_Null( cursor, 4832 )then
         a_frs1516.poth7hd := gse.Integer_Value( cursor, 4832 );
      end if;
      if not gse.Is_Null( cursor, 4833 )then
         a_frs1516.poth8hd := gse.Integer_Value( cursor, 4833 );
      end if;
      if not gse.Is_Null( cursor, 4834 )then
         a_frs1516.poth9hd := gse.Integer_Value( cursor, 4834 );
      end if;
      if not gse.Is_Null( cursor, 4835 )then
         a_frs1516.poth10hd := gse.Integer_Value( cursor, 4835 );
      end if;
      if not gse.Is_Null( cursor, 4836 )then
         a_frs1516.poth11hd := gse.Integer_Value( cursor, 4836 );
      end if;
      if not gse.Is_Null( cursor, 4837 )then
         a_frs1516.poth12hd := gse.Integer_Value( cursor, 4837 );
      end if;
      if not gse.Is_Null( cursor, 4838 )then
         a_frs1516.poth13hd := gse.Integer_Value( cursor, 4838 );
      end if;
      if not gse.Is_Null( cursor, 4839 )then
         a_frs1516.poth14hd := gse.Integer_Value( cursor, 4839 );
      end if;
      if not gse.Is_Null( cursor, 4840 )then
         a_frs1516.poth15hd := gse.Integer_Value( cursor, 4840 );
      end if;
      if not gse.Is_Null( cursor, 4841 )then
         a_frs1516.poth16hd := gse.Integer_Value( cursor, 4841 );
      end if;
      if not gse.Is_Null( cursor, 4842 )then
         a_frs1516.poth17hd := gse.Integer_Value( cursor, 4842 );
      end if;
      if not gse.Is_Null( cursor, 4843 )then
         a_frs1516.poth18hd := gse.Integer_Value( cursor, 4843 );
      end if;
      if not gse.Is_Null( cursor, 4844 )then
         a_frs1516.poth19hd := gse.Integer_Value( cursor, 4844 );
      end if;
      if not gse.Is_Null( cursor, 4845 )then
         a_frs1516.poth1sp := gse.Integer_Value( cursor, 4845 );
      end if;
      if not gse.Is_Null( cursor, 4846 )then
         a_frs1516.poth2sp := gse.Integer_Value( cursor, 4846 );
      end if;
      if not gse.Is_Null( cursor, 4847 )then
         a_frs1516.poth3sp := gse.Integer_Value( cursor, 4847 );
      end if;
      if not gse.Is_Null( cursor, 4848 )then
         a_frs1516.poth4sp := gse.Integer_Value( cursor, 4848 );
      end if;
      if not gse.Is_Null( cursor, 4849 )then
         a_frs1516.poth5sp := gse.Integer_Value( cursor, 4849 );
      end if;
      if not gse.Is_Null( cursor, 4850 )then
         a_frs1516.poth6sp := gse.Integer_Value( cursor, 4850 );
      end if;
      if not gse.Is_Null( cursor, 4851 )then
         a_frs1516.poth7sp := gse.Integer_Value( cursor, 4851 );
      end if;
      if not gse.Is_Null( cursor, 4852 )then
         a_frs1516.poth8sp := gse.Integer_Value( cursor, 4852 );
      end if;
      if not gse.Is_Null( cursor, 4853 )then
         a_frs1516.poth9sp := gse.Integer_Value( cursor, 4853 );
      end if;
      if not gse.Is_Null( cursor, 4854 )then
         a_frs1516.poth10sp := gse.Integer_Value( cursor, 4854 );
      end if;
      if not gse.Is_Null( cursor, 4855 )then
         a_frs1516.poth11sp := gse.Integer_Value( cursor, 4855 );
      end if;
      if not gse.Is_Null( cursor, 4856 )then
         a_frs1516.poth12sp := gse.Integer_Value( cursor, 4856 );
      end if;
      if not gse.Is_Null( cursor, 4857 )then
         a_frs1516.poth13sp := gse.Integer_Value( cursor, 4857 );
      end if;
      if not gse.Is_Null( cursor, 4858 )then
         a_frs1516.poth14sp := gse.Integer_Value( cursor, 4858 );
      end if;
      if not gse.Is_Null( cursor, 4859 )then
         a_frs1516.poth15sp := gse.Integer_Value( cursor, 4859 );
      end if;
      if not gse.Is_Null( cursor, 4860 )then
         a_frs1516.poth16sp := gse.Integer_Value( cursor, 4860 );
      end if;
      if not gse.Is_Null( cursor, 4861 )then
         a_frs1516.poth17sp := gse.Integer_Value( cursor, 4861 );
      end if;
      if not gse.Is_Null( cursor, 4862 )then
         a_frs1516.poth18sp := gse.Integer_Value( cursor, 4862 );
      end if;
      if not gse.Is_Null( cursor, 4863 )then
         a_frs1516.poth19sp := gse.Integer_Value( cursor, 4863 );
      end if;
      if not gse.Is_Null( cursor, 4864 )then
         a_frs1516.ocpen1hd:= Amount'Value( gse.Value( cursor, 4864 ));
      end if;
      if not gse.Is_Null( cursor, 4865 )then
         a_frs1516.ocpen2hd:= Amount'Value( gse.Value( cursor, 4865 ));
      end if;
      if not gse.Is_Null( cursor, 4866 )then
         a_frs1516.ocpen3hd:= Amount'Value( gse.Value( cursor, 4866 ));
      end if;
      if not gse.Is_Null( cursor, 4867 )then
         a_frs1516.ocpen4hd:= Amount'Value( gse.Value( cursor, 4867 ));
      end if;
      if not gse.Is_Null( cursor, 4868 )then
         a_frs1516.wpen1hd:= Amount'Value( gse.Value( cursor, 4868 ));
      end if;
      if not gse.Is_Null( cursor, 4869 )then
         a_frs1516.wpen2hd:= Amount'Value( gse.Value( cursor, 4869 ));
      end if;
      if not gse.Is_Null( cursor, 4870 )then
         a_frs1516.wpen3hd:= Amount'Value( gse.Value( cursor, 4870 ));
      end if;
      if not gse.Is_Null( cursor, 4871 )then
         a_frs1516.ppen1hd:= Amount'Value( gse.Value( cursor, 4871 ));
      end if;
      if not gse.Is_Null( cursor, 4872 )then
         a_frs1516.ppen2hd:= Amount'Value( gse.Value( cursor, 4872 ));
      end if;
      if not gse.Is_Null( cursor, 4873 )then
         a_frs1516.ppen3hd:= Amount'Value( gse.Value( cursor, 4873 ));
      end if;
      if not gse.Is_Null( cursor, 4874 )then
         a_frs1516.tupen1hd:= Amount'Value( gse.Value( cursor, 4874 ));
      end if;
      if not gse.Is_Null( cursor, 4875 )then
         a_frs1516.tupen2hd := gse.Integer_Value( cursor, 4875 );
      end if;
      if not gse.Is_Null( cursor, 4876 )then
         a_frs1516.anpen1hd:= Amount'Value( gse.Value( cursor, 4876 ));
      end if;
      if not gse.Is_Null( cursor, 4877 )then
         a_frs1516.anpen2hd:= Amount'Value( gse.Value( cursor, 4877 ));
      end if;
      if not gse.Is_Null( cursor, 4878 )then
         a_frs1516.anpen3hd := gse.Integer_Value( cursor, 4878 );
      end if;
      if not gse.Is_Null( cursor, 4879 )then
         a_frs1516.trust1hd:= Amount'Value( gse.Value( cursor, 4879 ));
      end if;
      if not gse.Is_Null( cursor, 4880 )then
         a_frs1516.trust2hd := gse.Integer_Value( cursor, 4880 );
      end if;
      if not gse.Is_Null( cursor, 4881 )then
         a_frs1516.expen1hd:= Amount'Value( gse.Value( cursor, 4881 ));
      end if;
      if not gse.Is_Null( cursor, 4882 )then
         a_frs1516.expen2hd := gse.Integer_Value( cursor, 4882 );
      end if;
      if not gse.Is_Null( cursor, 4883 )then
         a_frs1516.ocpen1sp:= Amount'Value( gse.Value( cursor, 4883 ));
      end if;
      if not gse.Is_Null( cursor, 4884 )then
         a_frs1516.ocpen2sp:= Amount'Value( gse.Value( cursor, 4884 ));
      end if;
      if not gse.Is_Null( cursor, 4885 )then
         a_frs1516.ocpen3sp:= Amount'Value( gse.Value( cursor, 4885 ));
      end if;
      if not gse.Is_Null( cursor, 4886 )then
         a_frs1516.ocpen4sp:= Amount'Value( gse.Value( cursor, 4886 ));
      end if;
      if not gse.Is_Null( cursor, 4887 )then
         a_frs1516.wpen1sp:= Amount'Value( gse.Value( cursor, 4887 ));
      end if;
      if not gse.Is_Null( cursor, 4888 )then
         a_frs1516.wpen2sp := gse.Integer_Value( cursor, 4888 );
      end if;
      if not gse.Is_Null( cursor, 4889 )then
         a_frs1516.wpen3sp := gse.Integer_Value( cursor, 4889 );
      end if;
      if not gse.Is_Null( cursor, 4890 )then
         a_frs1516.ppen1sp:= Amount'Value( gse.Value( cursor, 4890 ));
      end if;
      if not gse.Is_Null( cursor, 4891 )then
         a_frs1516.ppen2sp:= Amount'Value( gse.Value( cursor, 4891 ));
      end if;
      if not gse.Is_Null( cursor, 4892 )then
         a_frs1516.ppen3sp:= Amount'Value( gse.Value( cursor, 4892 ));
      end if;
      if not gse.Is_Null( cursor, 4893 )then
         a_frs1516.tupen1sp:= Amount'Value( gse.Value( cursor, 4893 ));
      end if;
      if not gse.Is_Null( cursor, 4894 )then
         a_frs1516.tupen2sp := gse.Integer_Value( cursor, 4894 );
      end if;
      if not gse.Is_Null( cursor, 4895 )then
         a_frs1516.anpen1sp:= Amount'Value( gse.Value( cursor, 4895 ));
      end if;
      if not gse.Is_Null( cursor, 4896 )then
         a_frs1516.anpen2sp:= Amount'Value( gse.Value( cursor, 4896 ));
      end if;
      if not gse.Is_Null( cursor, 4897 )then
         a_frs1516.anpen3sp := gse.Integer_Value( cursor, 4897 );
      end if;
      if not gse.Is_Null( cursor, 4898 )then
         a_frs1516.trust1sp:= Amount'Value( gse.Value( cursor, 4898 ));
      end if;
      if not gse.Is_Null( cursor, 4899 )then
         a_frs1516.trust2sp := gse.Integer_Value( cursor, 4899 );
      end if;
      if not gse.Is_Null( cursor, 4900 )then
         a_frs1516.expen1sp:= Amount'Value( gse.Value( cursor, 4900 ));
      end if;
      if not gse.Is_Null( cursor, 4901 )then
         a_frs1516.expen2sp := gse.Integer_Value( cursor, 4901 );
      end if;
      if not gse.Is_Null( cursor, 4902 )then
         a_frs1516.pcpen1hd := gse.Integer_Value( cursor, 4902 );
      end if;
      if not gse.Is_Null( cursor, 4903 )then
         a_frs1516.pcpen2hd := gse.Integer_Value( cursor, 4903 );
      end if;
      if not gse.Is_Null( cursor, 4904 )then
         a_frs1516.pcpen3hd := gse.Integer_Value( cursor, 4904 );
      end if;
      if not gse.Is_Null( cursor, 4905 )then
         a_frs1516.pcpen4hd := gse.Integer_Value( cursor, 4905 );
      end if;
      if not gse.Is_Null( cursor, 4906 )then
         a_frs1516.pwpen1hd := gse.Integer_Value( cursor, 4906 );
      end if;
      if not gse.Is_Null( cursor, 4907 )then
         a_frs1516.pwpen2hd := gse.Integer_Value( cursor, 4907 );
      end if;
      if not gse.Is_Null( cursor, 4908 )then
         a_frs1516.pwpen3hd := gse.Integer_Value( cursor, 4908 );
      end if;
      if not gse.Is_Null( cursor, 4909 )then
         a_frs1516.pppen1hd := gse.Integer_Value( cursor, 4909 );
      end if;
      if not gse.Is_Null( cursor, 4910 )then
         a_frs1516.pppen2hd := gse.Integer_Value( cursor, 4910 );
      end if;
      if not gse.Is_Null( cursor, 4911 )then
         a_frs1516.pppen3hd := gse.Integer_Value( cursor, 4911 );
      end if;
      if not gse.Is_Null( cursor, 4912 )then
         a_frs1516.ptupn1hd := gse.Integer_Value( cursor, 4912 );
      end if;
      if not gse.Is_Null( cursor, 4913 )then
         a_frs1516.ptupn2hd := gse.Integer_Value( cursor, 4913 );
      end if;
      if not gse.Is_Null( cursor, 4914 )then
         a_frs1516.panpn1hd := gse.Integer_Value( cursor, 4914 );
      end if;
      if not gse.Is_Null( cursor, 4915 )then
         a_frs1516.panpn2hd := gse.Integer_Value( cursor, 4915 );
      end if;
      if not gse.Is_Null( cursor, 4916 )then
         a_frs1516.panpn3hd := gse.Integer_Value( cursor, 4916 );
      end if;
      if not gse.Is_Null( cursor, 4917 )then
         a_frs1516.ptrst1hd := gse.Integer_Value( cursor, 4917 );
      end if;
      if not gse.Is_Null( cursor, 4918 )then
         a_frs1516.ptrst2hd := gse.Integer_Value( cursor, 4918 );
      end if;
      if not gse.Is_Null( cursor, 4919 )then
         a_frs1516.pxpen1hd := gse.Integer_Value( cursor, 4919 );
      end if;
      if not gse.Is_Null( cursor, 4920 )then
         a_frs1516.pxpen2hd := gse.Integer_Value( cursor, 4920 );
      end if;
      if not gse.Is_Null( cursor, 4921 )then
         a_frs1516.pcpen1sp := gse.Integer_Value( cursor, 4921 );
      end if;
      if not gse.Is_Null( cursor, 4922 )then
         a_frs1516.pcpen2sp := gse.Integer_Value( cursor, 4922 );
      end if;
      if not gse.Is_Null( cursor, 4923 )then
         a_frs1516.pcpen3sp := gse.Integer_Value( cursor, 4923 );
      end if;
      if not gse.Is_Null( cursor, 4924 )then
         a_frs1516.pcpen4sp := gse.Integer_Value( cursor, 4924 );
      end if;
      if not gse.Is_Null( cursor, 4925 )then
         a_frs1516.pwpen1sp := gse.Integer_Value( cursor, 4925 );
      end if;
      if not gse.Is_Null( cursor, 4926 )then
         a_frs1516.pwpen2sp := gse.Integer_Value( cursor, 4926 );
      end if;
      if not gse.Is_Null( cursor, 4927 )then
         a_frs1516.pwpen3sp := gse.Integer_Value( cursor, 4927 );
      end if;
      if not gse.Is_Null( cursor, 4928 )then
         a_frs1516.pppen1sp := gse.Integer_Value( cursor, 4928 );
      end if;
      if not gse.Is_Null( cursor, 4929 )then
         a_frs1516.pppen2sp := gse.Integer_Value( cursor, 4929 );
      end if;
      if not gse.Is_Null( cursor, 4930 )then
         a_frs1516.pppen3sp := gse.Integer_Value( cursor, 4930 );
      end if;
      if not gse.Is_Null( cursor, 4931 )then
         a_frs1516.ptupn1sp := gse.Integer_Value( cursor, 4931 );
      end if;
      if not gse.Is_Null( cursor, 4932 )then
         a_frs1516.ptupn2sp := gse.Integer_Value( cursor, 4932 );
      end if;
      if not gse.Is_Null( cursor, 4933 )then
         a_frs1516.panpn1sp := gse.Integer_Value( cursor, 4933 );
      end if;
      if not gse.Is_Null( cursor, 4934 )then
         a_frs1516.panpn2sp := gse.Integer_Value( cursor, 4934 );
      end if;
      if not gse.Is_Null( cursor, 4935 )then
         a_frs1516.panpn3sp := gse.Integer_Value( cursor, 4935 );
      end if;
      if not gse.Is_Null( cursor, 4936 )then
         a_frs1516.ptrst1sp := gse.Integer_Value( cursor, 4936 );
      end if;
      if not gse.Is_Null( cursor, 4937 )then
         a_frs1516.ptrst2sp := gse.Integer_Value( cursor, 4937 );
      end if;
      if not gse.Is_Null( cursor, 4938 )then
         a_frs1516.pxpen1sp := gse.Integer_Value( cursor, 4938 );
      end if;
      if not gse.Is_Null( cursor, 4939 )then
         a_frs1516.pxpen2sp := gse.Integer_Value( cursor, 4939 );
      end if;
      if not gse.Is_Null( cursor, 4940 )then
         a_frs1516.ocptd1hd := gse.Integer_Value( cursor, 4940 );
      end if;
      if not gse.Is_Null( cursor, 4941 )then
         a_frs1516.ocptd2hd := gse.Integer_Value( cursor, 4941 );
      end if;
      if not gse.Is_Null( cursor, 4942 )then
         a_frs1516.ocptd3hd := gse.Integer_Value( cursor, 4942 );
      end if;
      if not gse.Is_Null( cursor, 4943 )then
         a_frs1516.ocptd4hd := gse.Integer_Value( cursor, 4943 );
      end if;
      if not gse.Is_Null( cursor, 4944 )then
         a_frs1516.wpptd1hd := gse.Integer_Value( cursor, 4944 );
      end if;
      if not gse.Is_Null( cursor, 4945 )then
         a_frs1516.wpptd2hd := gse.Integer_Value( cursor, 4945 );
      end if;
      if not gse.Is_Null( cursor, 4946 )then
         a_frs1516.wpptd3hd := gse.Integer_Value( cursor, 4946 );
      end if;
      if not gse.Is_Null( cursor, 4947 )then
         a_frs1516.ppetd1hd := gse.Integer_Value( cursor, 4947 );
      end if;
      if not gse.Is_Null( cursor, 4948 )then
         a_frs1516.ppetd2hd := gse.Integer_Value( cursor, 4948 );
      end if;
      if not gse.Is_Null( cursor, 4949 )then
         a_frs1516.ppetd3hd := gse.Integer_Value( cursor, 4949 );
      end if;
      if not gse.Is_Null( cursor, 4950 )then
         a_frs1516.tuptd1hd := gse.Integer_Value( cursor, 4950 );
      end if;
      if not gse.Is_Null( cursor, 4951 )then
         a_frs1516.tuptd2hd := gse.Integer_Value( cursor, 4951 );
      end if;
      if not gse.Is_Null( cursor, 4952 )then
         a_frs1516.aptd1hd := gse.Integer_Value( cursor, 4952 );
      end if;
      if not gse.Is_Null( cursor, 4953 )then
         a_frs1516.aptd2hd := gse.Integer_Value( cursor, 4953 );
      end if;
      if not gse.Is_Null( cursor, 4954 )then
         a_frs1516.aptd3hd := gse.Integer_Value( cursor, 4954 );
      end if;
      if not gse.Is_Null( cursor, 4955 )then
         a_frs1516.trutd1hd := gse.Integer_Value( cursor, 4955 );
      end if;
      if not gse.Is_Null( cursor, 4956 )then
         a_frs1516.trutd2hd := gse.Integer_Value( cursor, 4956 );
      end if;
      if not gse.Is_Null( cursor, 4957 )then
         a_frs1516.exptd1hd := gse.Integer_Value( cursor, 4957 );
      end if;
      if not gse.Is_Null( cursor, 4958 )then
         a_frs1516.exptd2hd := gse.Integer_Value( cursor, 4958 );
      end if;
      if not gse.Is_Null( cursor, 4959 )then
         a_frs1516.ocptd1sp := gse.Integer_Value( cursor, 4959 );
      end if;
      if not gse.Is_Null( cursor, 4960 )then
         a_frs1516.ocptd2sp := gse.Integer_Value( cursor, 4960 );
      end if;
      if not gse.Is_Null( cursor, 4961 )then
         a_frs1516.ocptd3sp := gse.Integer_Value( cursor, 4961 );
      end if;
      if not gse.Is_Null( cursor, 4962 )then
         a_frs1516.ocptd4sp := gse.Integer_Value( cursor, 4962 );
      end if;
      if not gse.Is_Null( cursor, 4963 )then
         a_frs1516.wpptd1sp := gse.Integer_Value( cursor, 4963 );
      end if;
      if not gse.Is_Null( cursor, 4964 )then
         a_frs1516.wpptd2sp := gse.Integer_Value( cursor, 4964 );
      end if;
      if not gse.Is_Null( cursor, 4965 )then
         a_frs1516.wpptd3sp := gse.Integer_Value( cursor, 4965 );
      end if;
      if not gse.Is_Null( cursor, 4966 )then
         a_frs1516.ppetd1sp := gse.Integer_Value( cursor, 4966 );
      end if;
      if not gse.Is_Null( cursor, 4967 )then
         a_frs1516.ppetd2sp := gse.Integer_Value( cursor, 4967 );
      end if;
      if not gse.Is_Null( cursor, 4968 )then
         a_frs1516.ppetd3sp := gse.Integer_Value( cursor, 4968 );
      end if;
      if not gse.Is_Null( cursor, 4969 )then
         a_frs1516.tuptd1sp := gse.Integer_Value( cursor, 4969 );
      end if;
      if not gse.Is_Null( cursor, 4970 )then
         a_frs1516.tuptd2sp := gse.Integer_Value( cursor, 4970 );
      end if;
      if not gse.Is_Null( cursor, 4971 )then
         a_frs1516.aptd1sp := gse.Integer_Value( cursor, 4971 );
      end if;
      if not gse.Is_Null( cursor, 4972 )then
         a_frs1516.aptd2sp := gse.Integer_Value( cursor, 4972 );
      end if;
      if not gse.Is_Null( cursor, 4973 )then
         a_frs1516.aptd3sp := gse.Integer_Value( cursor, 4973 );
      end if;
      if not gse.Is_Null( cursor, 4974 )then
         a_frs1516.trutd1sp := gse.Integer_Value( cursor, 4974 );
      end if;
      if not gse.Is_Null( cursor, 4975 )then
         a_frs1516.trutd2sp := gse.Integer_Value( cursor, 4975 );
      end if;
      if not gse.Is_Null( cursor, 4976 )then
         a_frs1516.exptd1sp := gse.Integer_Value( cursor, 4976 );
      end if;
      if not gse.Is_Null( cursor, 4977 )then
         a_frs1516.exptd2sp := gse.Integer_Value( cursor, 4977 );
      end if;
      if not gse.Is_Null( cursor, 4978 )then
         a_frs1516.ocpid1hd := gse.Integer_Value( cursor, 4978 );
      end if;
      if not gse.Is_Null( cursor, 4979 )then
         a_frs1516.ocpid2hd := gse.Integer_Value( cursor, 4979 );
      end if;
      if not gse.Is_Null( cursor, 4980 )then
         a_frs1516.ocpid3hd := gse.Integer_Value( cursor, 4980 );
      end if;
      if not gse.Is_Null( cursor, 4981 )then
         a_frs1516.ocpid4hd := gse.Integer_Value( cursor, 4981 );
      end if;
      if not gse.Is_Null( cursor, 4982 )then
         a_frs1516.wwpid1hd := gse.Integer_Value( cursor, 4982 );
      end if;
      if not gse.Is_Null( cursor, 4983 )then
         a_frs1516.wwpid2hd := gse.Integer_Value( cursor, 4983 );
      end if;
      if not gse.Is_Null( cursor, 4984 )then
         a_frs1516.wwpid3hd := gse.Integer_Value( cursor, 4984 );
      end if;
      if not gse.Is_Null( cursor, 4985 )then
         a_frs1516.ppeid1hd := gse.Integer_Value( cursor, 4985 );
      end if;
      if not gse.Is_Null( cursor, 4986 )then
         a_frs1516.ppeid2hd := gse.Integer_Value( cursor, 4986 );
      end if;
      if not gse.Is_Null( cursor, 4987 )then
         a_frs1516.ppeid3hd := gse.Integer_Value( cursor, 4987 );
      end if;
      if not gse.Is_Null( cursor, 4988 )then
         a_frs1516.tupid1hd := gse.Integer_Value( cursor, 4988 );
      end if;
      if not gse.Is_Null( cursor, 4989 )then
         a_frs1516.tupid2hd := gse.Integer_Value( cursor, 4989 );
      end if;
      if not gse.Is_Null( cursor, 4990 )then
         a_frs1516.apid1hd := gse.Integer_Value( cursor, 4990 );
      end if;
      if not gse.Is_Null( cursor, 4991 )then
         a_frs1516.apid2hd := gse.Integer_Value( cursor, 4991 );
      end if;
      if not gse.Is_Null( cursor, 4992 )then
         a_frs1516.apid3hd := gse.Integer_Value( cursor, 4992 );
      end if;
      if not gse.Is_Null( cursor, 4993 )then
         a_frs1516.truid1hd := gse.Integer_Value( cursor, 4993 );
      end if;
      if not gse.Is_Null( cursor, 4994 )then
         a_frs1516.truid2hd := gse.Integer_Value( cursor, 4994 );
      end if;
      if not gse.Is_Null( cursor, 4995 )then
         a_frs1516.expid1hd := gse.Integer_Value( cursor, 4995 );
      end if;
      if not gse.Is_Null( cursor, 4996 )then
         a_frs1516.expid2hd := gse.Integer_Value( cursor, 4996 );
      end if;
      if not gse.Is_Null( cursor, 4997 )then
         a_frs1516.ocpid1sp := gse.Integer_Value( cursor, 4997 );
      end if;
      if not gse.Is_Null( cursor, 4998 )then
         a_frs1516.ocpid2sp := gse.Integer_Value( cursor, 4998 );
      end if;
      if not gse.Is_Null( cursor, 4999 )then
         a_frs1516.ocpid3sp := gse.Integer_Value( cursor, 4999 );
      end if;
      if not gse.Is_Null( cursor, 5000 )then
         a_frs1516.ocpid4sp := gse.Integer_Value( cursor, 5000 );
      end if;
      if not gse.Is_Null( cursor, 5001 )then
         a_frs1516.wwpid1sp := gse.Integer_Value( cursor, 5001 );
      end if;
      if not gse.Is_Null( cursor, 5002 )then
         a_frs1516.wwpid2sp := gse.Integer_Value( cursor, 5002 );
      end if;
      if not gse.Is_Null( cursor, 5003 )then
         a_frs1516.wwpid3sp := gse.Integer_Value( cursor, 5003 );
      end if;
      if not gse.Is_Null( cursor, 5004 )then
         a_frs1516.ppeid1sp := gse.Integer_Value( cursor, 5004 );
      end if;
      if not gse.Is_Null( cursor, 5005 )then
         a_frs1516.ppeid2sp := gse.Integer_Value( cursor, 5005 );
      end if;
      if not gse.Is_Null( cursor, 5006 )then
         a_frs1516.ppeid3sp := gse.Integer_Value( cursor, 5006 );
      end if;
      if not gse.Is_Null( cursor, 5007 )then
         a_frs1516.tupid1sp := gse.Integer_Value( cursor, 5007 );
      end if;
      if not gse.Is_Null( cursor, 5008 )then
         a_frs1516.tupid2sp := gse.Integer_Value( cursor, 5008 );
      end if;
      if not gse.Is_Null( cursor, 5009 )then
         a_frs1516.apid1sp := gse.Integer_Value( cursor, 5009 );
      end if;
      if not gse.Is_Null( cursor, 5010 )then
         a_frs1516.apid2sp := gse.Integer_Value( cursor, 5010 );
      end if;
      if not gse.Is_Null( cursor, 5011 )then
         a_frs1516.apid3sp := gse.Integer_Value( cursor, 5011 );
      end if;
      if not gse.Is_Null( cursor, 5012 )then
         a_frs1516.truid1sp := gse.Integer_Value( cursor, 5012 );
      end if;
      if not gse.Is_Null( cursor, 5013 )then
         a_frs1516.truid2sp := gse.Integer_Value( cursor, 5013 );
      end if;
      if not gse.Is_Null( cursor, 5014 )then
         a_frs1516.expid1sp := gse.Integer_Value( cursor, 5014 );
      end if;
      if not gse.Is_Null( cursor, 5015 )then
         a_frs1516.expid2sp := gse.Integer_Value( cursor, 5015 );
      end if;
      if not gse.Is_Null( cursor, 5016 )then
         a_frs1516.ocptx1hd := gse.Integer_Value( cursor, 5016 );
      end if;
      if not gse.Is_Null( cursor, 5017 )then
         a_frs1516.ocptx2hd := gse.Integer_Value( cursor, 5017 );
      end if;
      if not gse.Is_Null( cursor, 5018 )then
         a_frs1516.ocptx3hd := gse.Integer_Value( cursor, 5018 );
      end if;
      if not gse.Is_Null( cursor, 5019 )then
         a_frs1516.ocptx4hd := gse.Integer_Value( cursor, 5019 );
      end if;
      if not gse.Is_Null( cursor, 5020 )then
         a_frs1516.wptx1hd := gse.Integer_Value( cursor, 5020 );
      end if;
      if not gse.Is_Null( cursor, 5021 )then
         a_frs1516.wpptx2hd := gse.Integer_Value( cursor, 5021 );
      end if;
      if not gse.Is_Null( cursor, 5022 )then
         a_frs1516.wpptx3hd := gse.Integer_Value( cursor, 5022 );
      end if;
      if not gse.Is_Null( cursor, 5023 )then
         a_frs1516.ppetx1hd := gse.Integer_Value( cursor, 5023 );
      end if;
      if not gse.Is_Null( cursor, 5024 )then
         a_frs1516.ppetx2hd := gse.Integer_Value( cursor, 5024 );
      end if;
      if not gse.Is_Null( cursor, 5025 )then
         a_frs1516.ppetx3hd := gse.Integer_Value( cursor, 5025 );
      end if;
      if not gse.Is_Null( cursor, 5026 )then
         a_frs1516.tuptx1hd := gse.Integer_Value( cursor, 5026 );
      end if;
      if not gse.Is_Null( cursor, 5027 )then
         a_frs1516.tuptx2hd := gse.Integer_Value( cursor, 5027 );
      end if;
      if not gse.Is_Null( cursor, 5028 )then
         a_frs1516.aptx1hd := gse.Integer_Value( cursor, 5028 );
      end if;
      if not gse.Is_Null( cursor, 5029 )then
         a_frs1516.aptx2hd := gse.Integer_Value( cursor, 5029 );
      end if;
      if not gse.Is_Null( cursor, 5030 )then
         a_frs1516.aptx3hd := gse.Integer_Value( cursor, 5030 );
      end if;
      if not gse.Is_Null( cursor, 5031 )then
         a_frs1516.ttrtx1hd := gse.Integer_Value( cursor, 5031 );
      end if;
      if not gse.Is_Null( cursor, 5032 )then
         a_frs1516.ttrtx2hd := gse.Integer_Value( cursor, 5032 );
      end if;
      if not gse.Is_Null( cursor, 5033 )then
         a_frs1516.exptx1hd := gse.Integer_Value( cursor, 5033 );
      end if;
      if not gse.Is_Null( cursor, 5034 )then
         a_frs1516.exptx2hd := gse.Integer_Value( cursor, 5034 );
      end if;
      if not gse.Is_Null( cursor, 5035 )then
         a_frs1516.ocptx1sp := gse.Integer_Value( cursor, 5035 );
      end if;
      if not gse.Is_Null( cursor, 5036 )then
         a_frs1516.ocptx2sp := gse.Integer_Value( cursor, 5036 );
      end if;
      if not gse.Is_Null( cursor, 5037 )then
         a_frs1516.ocptx3sp := gse.Integer_Value( cursor, 5037 );
      end if;
      if not gse.Is_Null( cursor, 5038 )then
         a_frs1516.ocptx4sp := gse.Integer_Value( cursor, 5038 );
      end if;
      if not gse.Is_Null( cursor, 5039 )then
         a_frs1516.wptx1sp := gse.Integer_Value( cursor, 5039 );
      end if;
      if not gse.Is_Null( cursor, 5040 )then
         a_frs1516.wpptx2sp := gse.Integer_Value( cursor, 5040 );
      end if;
      if not gse.Is_Null( cursor, 5041 )then
         a_frs1516.wpptx3sp := gse.Integer_Value( cursor, 5041 );
      end if;
      if not gse.Is_Null( cursor, 5042 )then
         a_frs1516.ppetx1sp := gse.Integer_Value( cursor, 5042 );
      end if;
      if not gse.Is_Null( cursor, 5043 )then
         a_frs1516.ppetx2sp := gse.Integer_Value( cursor, 5043 );
      end if;
      if not gse.Is_Null( cursor, 5044 )then
         a_frs1516.ppetx3sp := gse.Integer_Value( cursor, 5044 );
      end if;
      if not gse.Is_Null( cursor, 5045 )then
         a_frs1516.tuptx1sp := gse.Integer_Value( cursor, 5045 );
      end if;
      if not gse.Is_Null( cursor, 5046 )then
         a_frs1516.tuptx2sp := gse.Integer_Value( cursor, 5046 );
      end if;
      if not gse.Is_Null( cursor, 5047 )then
         a_frs1516.aptx1sp := gse.Integer_Value( cursor, 5047 );
      end if;
      if not gse.Is_Null( cursor, 5048 )then
         a_frs1516.aptx2sp := gse.Integer_Value( cursor, 5048 );
      end if;
      if not gse.Is_Null( cursor, 5049 )then
         a_frs1516.aptx3sp := gse.Integer_Value( cursor, 5049 );
      end if;
      if not gse.Is_Null( cursor, 5050 )then
         a_frs1516.ttrtx1sp := gse.Integer_Value( cursor, 5050 );
      end if;
      if not gse.Is_Null( cursor, 5051 )then
         a_frs1516.ttrtx2sp := gse.Integer_Value( cursor, 5051 );
      end if;
      if not gse.Is_Null( cursor, 5052 )then
         a_frs1516.exptx1sp := gse.Integer_Value( cursor, 5052 );
      end if;
      if not gse.Is_Null( cursor, 5053 )then
         a_frs1516.exptx2sp := gse.Integer_Value( cursor, 5053 );
      end if;
      if not gse.Is_Null( cursor, 5054 )then
         a_frs1516.ocpoa1hd:= Amount'Value( gse.Value( cursor, 5054 ));
      end if;
      if not gse.Is_Null( cursor, 5055 )then
         a_frs1516.ocpoa2hd:= Amount'Value( gse.Value( cursor, 5055 ));
      end if;
      if not gse.Is_Null( cursor, 5056 )then
         a_frs1516.ocpoa3hd := gse.Integer_Value( cursor, 5056 );
      end if;
      if not gse.Is_Null( cursor, 5057 )then
         a_frs1516.ocpoa4hd := gse.Integer_Value( cursor, 5057 );
      end if;
      if not gse.Is_Null( cursor, 5058 )then
         a_frs1516.wpoa1hd:= Amount'Value( gse.Value( cursor, 5058 ));
      end if;
      if not gse.Is_Null( cursor, 5059 )then
         a_frs1516.wwpoa2hd := gse.Integer_Value( cursor, 5059 );
      end if;
      if not gse.Is_Null( cursor, 5060 )then
         a_frs1516.wwpoa3hd := gse.Integer_Value( cursor, 5060 );
      end if;
      if not gse.Is_Null( cursor, 5061 )then
         a_frs1516.ppeoa1hd := gse.Integer_Value( cursor, 5061 );
      end if;
      if not gse.Is_Null( cursor, 5062 )then
         a_frs1516.ppeoa2hd := gse.Integer_Value( cursor, 5062 );
      end if;
      if not gse.Is_Null( cursor, 5063 )then
         a_frs1516.ppeoa3hd := gse.Integer_Value( cursor, 5063 );
      end if;
      if not gse.Is_Null( cursor, 5064 )then
         a_frs1516.tupoa1hd := gse.Integer_Value( cursor, 5064 );
      end if;
      if not gse.Is_Null( cursor, 5065 )then
         a_frs1516.tupoa2hd := gse.Integer_Value( cursor, 5065 );
      end if;
      if not gse.Is_Null( cursor, 5066 )then
         a_frs1516.apoa1hd := gse.Integer_Value( cursor, 5066 );
      end if;
      if not gse.Is_Null( cursor, 5067 )then
         a_frs1516.apoa2hd := gse.Integer_Value( cursor, 5067 );
      end if;
      if not gse.Is_Null( cursor, 5068 )then
         a_frs1516.apoa3hd := gse.Integer_Value( cursor, 5068 );
      end if;
      if not gse.Is_Null( cursor, 5069 )then
         a_frs1516.truoa1hd := gse.Integer_Value( cursor, 5069 );
      end if;
      if not gse.Is_Null( cursor, 5070 )then
         a_frs1516.truoa2hd := gse.Integer_Value( cursor, 5070 );
      end if;
      if not gse.Is_Null( cursor, 5071 )then
         a_frs1516.expoa1hd := gse.Integer_Value( cursor, 5071 );
      end if;
      if not gse.Is_Null( cursor, 5072 )then
         a_frs1516.expoa2hd := gse.Integer_Value( cursor, 5072 );
      end if;
      if not gse.Is_Null( cursor, 5073 )then
         a_frs1516.ocpoa1sp:= Amount'Value( gse.Value( cursor, 5073 ));
      end if;
      if not gse.Is_Null( cursor, 5074 )then
         a_frs1516.ocpoa2sp := gse.Integer_Value( cursor, 5074 );
      end if;
      if not gse.Is_Null( cursor, 5075 )then
         a_frs1516.ocpoa3sp := gse.Integer_Value( cursor, 5075 );
      end if;
      if not gse.Is_Null( cursor, 5076 )then
         a_frs1516.ocpoa4sp := gse.Integer_Value( cursor, 5076 );
      end if;
      if not gse.Is_Null( cursor, 5077 )then
         a_frs1516.wpoa1sp:= Amount'Value( gse.Value( cursor, 5077 ));
      end if;
      if not gse.Is_Null( cursor, 5078 )then
         a_frs1516.wwpoa2sp := gse.Integer_Value( cursor, 5078 );
      end if;
      if not gse.Is_Null( cursor, 5079 )then
         a_frs1516.wwpoa3sp := gse.Integer_Value( cursor, 5079 );
      end if;
      if not gse.Is_Null( cursor, 5080 )then
         a_frs1516.ppeoa1sp := gse.Integer_Value( cursor, 5080 );
      end if;
      if not gse.Is_Null( cursor, 5081 )then
         a_frs1516.ppeoa2sp := gse.Integer_Value( cursor, 5081 );
      end if;
      if not gse.Is_Null( cursor, 5082 )then
         a_frs1516.ppeoa3sp := gse.Integer_Value( cursor, 5082 );
      end if;
      if not gse.Is_Null( cursor, 5083 )then
         a_frs1516.tupoa1sp := gse.Integer_Value( cursor, 5083 );
      end if;
      if not gse.Is_Null( cursor, 5084 )then
         a_frs1516.tupoa2sp := gse.Integer_Value( cursor, 5084 );
      end if;
      if not gse.Is_Null( cursor, 5085 )then
         a_frs1516.apoa1sp := gse.Integer_Value( cursor, 5085 );
      end if;
      if not gse.Is_Null( cursor, 5086 )then
         a_frs1516.apoa2sp := gse.Integer_Value( cursor, 5086 );
      end if;
      if not gse.Is_Null( cursor, 5087 )then
         a_frs1516.apoa3sp := gse.Integer_Value( cursor, 5087 );
      end if;
      if not gse.Is_Null( cursor, 5088 )then
         a_frs1516.truoa1sp := gse.Integer_Value( cursor, 5088 );
      end if;
      if not gse.Is_Null( cursor, 5089 )then
         a_frs1516.truoa2sp := gse.Integer_Value( cursor, 5089 );
      end if;
      if not gse.Is_Null( cursor, 5090 )then
         a_frs1516.expoa1sp := gse.Integer_Value( cursor, 5090 );
      end if;
      if not gse.Is_Null( cursor, 5091 )then
         a_frs1516.expoa2sp := gse.Integer_Value( cursor, 5091 );
      end if;
      if not gse.Is_Null( cursor, 5092 )then
         a_frs1516.ocpoi1hd := gse.Integer_Value( cursor, 5092 );
      end if;
      if not gse.Is_Null( cursor, 5093 )then
         a_frs1516.ocpoi2hd := gse.Integer_Value( cursor, 5093 );
      end if;
      if not gse.Is_Null( cursor, 5094 )then
         a_frs1516.ocpoi3hd := gse.Integer_Value( cursor, 5094 );
      end if;
      if not gse.Is_Null( cursor, 5095 )then
         a_frs1516.ocpoi4hd := gse.Integer_Value( cursor, 5095 );
      end if;
      if not gse.Is_Null( cursor, 5096 )then
         a_frs1516.wpoi1hd := gse.Integer_Value( cursor, 5096 );
      end if;
      if not gse.Is_Null( cursor, 5097 )then
         a_frs1516.wwpoi2hd := gse.Integer_Value( cursor, 5097 );
      end if;
      if not gse.Is_Null( cursor, 5098 )then
         a_frs1516.wwpoi3hd := gse.Integer_Value( cursor, 5098 );
      end if;
      if not gse.Is_Null( cursor, 5099 )then
         a_frs1516.ppeoi1hd := gse.Integer_Value( cursor, 5099 );
      end if;
      if not gse.Is_Null( cursor, 5100 )then
         a_frs1516.ppeoi2hd := gse.Integer_Value( cursor, 5100 );
      end if;
      if not gse.Is_Null( cursor, 5101 )then
         a_frs1516.ppeoi3hd := gse.Integer_Value( cursor, 5101 );
      end if;
      if not gse.Is_Null( cursor, 5102 )then
         a_frs1516.tupoi1hd := gse.Integer_Value( cursor, 5102 );
      end if;
      if not gse.Is_Null( cursor, 5103 )then
         a_frs1516.tupoi2hd := gse.Integer_Value( cursor, 5103 );
      end if;
      if not gse.Is_Null( cursor, 5104 )then
         a_frs1516.apoi1hd := gse.Integer_Value( cursor, 5104 );
      end if;
      if not gse.Is_Null( cursor, 5105 )then
         a_frs1516.apoi2hd := gse.Integer_Value( cursor, 5105 );
      end if;
      if not gse.Is_Null( cursor, 5106 )then
         a_frs1516.apoi3hd := gse.Integer_Value( cursor, 5106 );
      end if;
      if not gse.Is_Null( cursor, 5107 )then
         a_frs1516.truoi1hd := gse.Integer_Value( cursor, 5107 );
      end if;
      if not gse.Is_Null( cursor, 5108 )then
         a_frs1516.truoi2hd := gse.Integer_Value( cursor, 5108 );
      end if;
      if not gse.Is_Null( cursor, 5109 )then
         a_frs1516.expoi1hd := gse.Integer_Value( cursor, 5109 );
      end if;
      if not gse.Is_Null( cursor, 5110 )then
         a_frs1516.expoi2hd := gse.Integer_Value( cursor, 5110 );
      end if;
      if not gse.Is_Null( cursor, 5111 )then
         a_frs1516.ocpoi1sp := gse.Integer_Value( cursor, 5111 );
      end if;
      if not gse.Is_Null( cursor, 5112 )then
         a_frs1516.ocpoi2sp := gse.Integer_Value( cursor, 5112 );
      end if;
      if not gse.Is_Null( cursor, 5113 )then
         a_frs1516.ocpoi3sp := gse.Integer_Value( cursor, 5113 );
      end if;
      if not gse.Is_Null( cursor, 5114 )then
         a_frs1516.ocpoi4sp := gse.Integer_Value( cursor, 5114 );
      end if;
      if not gse.Is_Null( cursor, 5115 )then
         a_frs1516.wpoi1sp := gse.Integer_Value( cursor, 5115 );
      end if;
      if not gse.Is_Null( cursor, 5116 )then
         a_frs1516.wwpoi2sp := gse.Integer_Value( cursor, 5116 );
      end if;
      if not gse.Is_Null( cursor, 5117 )then
         a_frs1516.wwpoi3sp := gse.Integer_Value( cursor, 5117 );
      end if;
      if not gse.Is_Null( cursor, 5118 )then
         a_frs1516.ppeoi1sp := gse.Integer_Value( cursor, 5118 );
      end if;
      if not gse.Is_Null( cursor, 5119 )then
         a_frs1516.ppeoi2sp := gse.Integer_Value( cursor, 5119 );
      end if;
      if not gse.Is_Null( cursor, 5120 )then
         a_frs1516.ppeoi3sp := gse.Integer_Value( cursor, 5120 );
      end if;
      if not gse.Is_Null( cursor, 5121 )then
         a_frs1516.tupoi1sp := gse.Integer_Value( cursor, 5121 );
      end if;
      if not gse.Is_Null( cursor, 5122 )then
         a_frs1516.tupoi2sp := gse.Integer_Value( cursor, 5122 );
      end if;
      if not gse.Is_Null( cursor, 5123 )then
         a_frs1516.apoi1sp := gse.Integer_Value( cursor, 5123 );
      end if;
      if not gse.Is_Null( cursor, 5124 )then
         a_frs1516.apoi2sp := gse.Integer_Value( cursor, 5124 );
      end if;
      if not gse.Is_Null( cursor, 5125 )then
         a_frs1516.apoi3sp := gse.Integer_Value( cursor, 5125 );
      end if;
      if not gse.Is_Null( cursor, 5126 )then
         a_frs1516.truoi1sp := gse.Integer_Value( cursor, 5126 );
      end if;
      if not gse.Is_Null( cursor, 5127 )then
         a_frs1516.truoi2sp := gse.Integer_Value( cursor, 5127 );
      end if;
      if not gse.Is_Null( cursor, 5128 )then
         a_frs1516.expoi1sp := gse.Integer_Value( cursor, 5128 );
      end if;
      if not gse.Is_Null( cursor, 5129 )then
         a_frs1516.expoi2sp := gse.Integer_Value( cursor, 5129 );
      end if;
      if not gse.Is_Null( cursor, 5130 )then
         a_frs1516.ocpta1hd:= Amount'Value( gse.Value( cursor, 5130 ));
      end if;
      if not gse.Is_Null( cursor, 5131 )then
         a_frs1516.ocpta2hd:= Amount'Value( gse.Value( cursor, 5131 ));
      end if;
      if not gse.Is_Null( cursor, 5132 )then
         a_frs1516.ocpta3hd:= Amount'Value( gse.Value( cursor, 5132 ));
      end if;
      if not gse.Is_Null( cursor, 5133 )then
         a_frs1516.ocpta4hd:= Amount'Value( gse.Value( cursor, 5133 ));
      end if;
      if not gse.Is_Null( cursor, 5134 )then
         a_frs1516.wpta1hd:= Amount'Value( gse.Value( cursor, 5134 ));
      end if;
      if not gse.Is_Null( cursor, 5135 )then
         a_frs1516.wppta2hd:= Amount'Value( gse.Value( cursor, 5135 ));
      end if;
      if not gse.Is_Null( cursor, 5136 )then
         a_frs1516.wppta3hd:= Amount'Value( gse.Value( cursor, 5136 ));
      end if;
      if not gse.Is_Null( cursor, 5137 )then
         a_frs1516.ppeta1hd:= Amount'Value( gse.Value( cursor, 5137 ));
      end if;
      if not gse.Is_Null( cursor, 5138 )then
         a_frs1516.ppeta2hd:= Amount'Value( gse.Value( cursor, 5138 ));
      end if;
      if not gse.Is_Null( cursor, 5139 )then
         a_frs1516.ppeta3hd:= Amount'Value( gse.Value( cursor, 5139 ));
      end if;
      if not gse.Is_Null( cursor, 5140 )then
         a_frs1516.tupta1hd := gse.Integer_Value( cursor, 5140 );
      end if;
      if not gse.Is_Null( cursor, 5141 )then
         a_frs1516.tupta2hd := gse.Integer_Value( cursor, 5141 );
      end if;
      if not gse.Is_Null( cursor, 5142 )then
         a_frs1516.apta1hd:= Amount'Value( gse.Value( cursor, 5142 ));
      end if;
      if not gse.Is_Null( cursor, 5143 )then
         a_frs1516.apta2hd:= Amount'Value( gse.Value( cursor, 5143 ));
      end if;
      if not gse.Is_Null( cursor, 5144 )then
         a_frs1516.apta3hd := gse.Integer_Value( cursor, 5144 );
      end if;
      if not gse.Is_Null( cursor, 5145 )then
         a_frs1516.truta1hd:= Amount'Value( gse.Value( cursor, 5145 ));
      end if;
      if not gse.Is_Null( cursor, 5146 )then
         a_frs1516.truta2hd := gse.Integer_Value( cursor, 5146 );
      end if;
      if not gse.Is_Null( cursor, 5147 )then
         a_frs1516.expta1hd:= Amount'Value( gse.Value( cursor, 5147 ));
      end if;
      if not gse.Is_Null( cursor, 5148 )then
         a_frs1516.expta2hd := gse.Integer_Value( cursor, 5148 );
      end if;
      if not gse.Is_Null( cursor, 5149 )then
         a_frs1516.ocpta1sp:= Amount'Value( gse.Value( cursor, 5149 ));
      end if;
      if not gse.Is_Null( cursor, 5150 )then
         a_frs1516.ocpta2sp:= Amount'Value( gse.Value( cursor, 5150 ));
      end if;
      if not gse.Is_Null( cursor, 5151 )then
         a_frs1516.ocpta3sp:= Amount'Value( gse.Value( cursor, 5151 ));
      end if;
      if not gse.Is_Null( cursor, 5152 )then
         a_frs1516.ocpta4sp := gse.Integer_Value( cursor, 5152 );
      end if;
      if not gse.Is_Null( cursor, 5153 )then
         a_frs1516.wpta1sp:= Amount'Value( gse.Value( cursor, 5153 ));
      end if;
      if not gse.Is_Null( cursor, 5154 )then
         a_frs1516.wppta2sp := gse.Integer_Value( cursor, 5154 );
      end if;
      if not gse.Is_Null( cursor, 5155 )then
         a_frs1516.wppta3sp := gse.Integer_Value( cursor, 5155 );
      end if;
      if not gse.Is_Null( cursor, 5156 )then
         a_frs1516.ppeta1sp:= Amount'Value( gse.Value( cursor, 5156 ));
      end if;
      if not gse.Is_Null( cursor, 5157 )then
         a_frs1516.ppeta2sp:= Amount'Value( gse.Value( cursor, 5157 ));
      end if;
      if not gse.Is_Null( cursor, 5158 )then
         a_frs1516.ppeta3sp:= Amount'Value( gse.Value( cursor, 5158 ));
      end if;
      if not gse.Is_Null( cursor, 5159 )then
         a_frs1516.tupta1sp := gse.Integer_Value( cursor, 5159 );
      end if;
      if not gse.Is_Null( cursor, 5160 )then
         a_frs1516.tupta2sp := gse.Integer_Value( cursor, 5160 );
      end if;
      if not gse.Is_Null( cursor, 5161 )then
         a_frs1516.apta1sp:= Amount'Value( gse.Value( cursor, 5161 ));
      end if;
      if not gse.Is_Null( cursor, 5162 )then
         a_frs1516.apta2sp:= Amount'Value( gse.Value( cursor, 5162 ));
      end if;
      if not gse.Is_Null( cursor, 5163 )then
         a_frs1516.apta3sp := gse.Integer_Value( cursor, 5163 );
      end if;
      if not gse.Is_Null( cursor, 5164 )then
         a_frs1516.truta1sp:= Amount'Value( gse.Value( cursor, 5164 ));
      end if;
      if not gse.Is_Null( cursor, 5165 )then
         a_frs1516.truta2sp := gse.Integer_Value( cursor, 5165 );
      end if;
      if not gse.Is_Null( cursor, 5166 )then
         a_frs1516.expta1sp:= Amount'Value( gse.Value( cursor, 5166 ));
      end if;
      if not gse.Is_Null( cursor, 5167 )then
         a_frs1516.expta2sp := gse.Integer_Value( cursor, 5167 );
      end if;
      if not gse.Is_Null( cursor, 5168 )then
         a_frs1516.ocpti1hd := gse.Integer_Value( cursor, 5168 );
      end if;
      if not gse.Is_Null( cursor, 5169 )then
         a_frs1516.ocpti2hd := gse.Integer_Value( cursor, 5169 );
      end if;
      if not gse.Is_Null( cursor, 5170 )then
         a_frs1516.ocpti3hd := gse.Integer_Value( cursor, 5170 );
      end if;
      if not gse.Is_Null( cursor, 5171 )then
         a_frs1516.ocpti4hd := gse.Integer_Value( cursor, 5171 );
      end if;
      if not gse.Is_Null( cursor, 5172 )then
         a_frs1516.wpti1hd := gse.Integer_Value( cursor, 5172 );
      end if;
      if not gse.Is_Null( cursor, 5173 )then
         a_frs1516.wppti2hd := gse.Integer_Value( cursor, 5173 );
      end if;
      if not gse.Is_Null( cursor, 5174 )then
         a_frs1516.wppti3hd := gse.Integer_Value( cursor, 5174 );
      end if;
      if not gse.Is_Null( cursor, 5175 )then
         a_frs1516.ppeti1hd := gse.Integer_Value( cursor, 5175 );
      end if;
      if not gse.Is_Null( cursor, 5176 )then
         a_frs1516.ppeti2hd := gse.Integer_Value( cursor, 5176 );
      end if;
      if not gse.Is_Null( cursor, 5177 )then
         a_frs1516.ppeti3hd := gse.Integer_Value( cursor, 5177 );
      end if;
      if not gse.Is_Null( cursor, 5178 )then
         a_frs1516.tupti1hd := gse.Integer_Value( cursor, 5178 );
      end if;
      if not gse.Is_Null( cursor, 5179 )then
         a_frs1516.tupti2hd := gse.Integer_Value( cursor, 5179 );
      end if;
      if not gse.Is_Null( cursor, 5180 )then
         a_frs1516.apti1hd := gse.Integer_Value( cursor, 5180 );
      end if;
      if not gse.Is_Null( cursor, 5181 )then
         a_frs1516.apti2hd := gse.Integer_Value( cursor, 5181 );
      end if;
      if not gse.Is_Null( cursor, 5182 )then
         a_frs1516.apti3hd := gse.Integer_Value( cursor, 5182 );
      end if;
      if not gse.Is_Null( cursor, 5183 )then
         a_frs1516.truti1hd := gse.Integer_Value( cursor, 5183 );
      end if;
      if not gse.Is_Null( cursor, 5184 )then
         a_frs1516.truti2hd := gse.Integer_Value( cursor, 5184 );
      end if;
      if not gse.Is_Null( cursor, 5185 )then
         a_frs1516.expti1hd := gse.Integer_Value( cursor, 5185 );
      end if;
      if not gse.Is_Null( cursor, 5186 )then
         a_frs1516.expti2hd := gse.Integer_Value( cursor, 5186 );
      end if;
      if not gse.Is_Null( cursor, 5187 )then
         a_frs1516.ocpti1sp := gse.Integer_Value( cursor, 5187 );
      end if;
      if not gse.Is_Null( cursor, 5188 )then
         a_frs1516.ocpti2sp := gse.Integer_Value( cursor, 5188 );
      end if;
      if not gse.Is_Null( cursor, 5189 )then
         a_frs1516.ocpti3sp := gse.Integer_Value( cursor, 5189 );
      end if;
      if not gse.Is_Null( cursor, 5190 )then
         a_frs1516.ocpti4sp := gse.Integer_Value( cursor, 5190 );
      end if;
      if not gse.Is_Null( cursor, 5191 )then
         a_frs1516.wpti1sp := gse.Integer_Value( cursor, 5191 );
      end if;
      if not gse.Is_Null( cursor, 5192 )then
         a_frs1516.wppti2sp := gse.Integer_Value( cursor, 5192 );
      end if;
      if not gse.Is_Null( cursor, 5193 )then
         a_frs1516.wppti3sp := gse.Integer_Value( cursor, 5193 );
      end if;
      if not gse.Is_Null( cursor, 5194 )then
         a_frs1516.ppeti1sp := gse.Integer_Value( cursor, 5194 );
      end if;
      if not gse.Is_Null( cursor, 5195 )then
         a_frs1516.ppeti2sp := gse.Integer_Value( cursor, 5195 );
      end if;
      if not gse.Is_Null( cursor, 5196 )then
         a_frs1516.ppeti3sp := gse.Integer_Value( cursor, 5196 );
      end if;
      if not gse.Is_Null( cursor, 5197 )then
         a_frs1516.tupti1sp := gse.Integer_Value( cursor, 5197 );
      end if;
      if not gse.Is_Null( cursor, 5198 )then
         a_frs1516.tupti2sp := gse.Integer_Value( cursor, 5198 );
      end if;
      if not gse.Is_Null( cursor, 5199 )then
         a_frs1516.apti1sp := gse.Integer_Value( cursor, 5199 );
      end if;
      if not gse.Is_Null( cursor, 5200 )then
         a_frs1516.apti2sp := gse.Integer_Value( cursor, 5200 );
      end if;
      if not gse.Is_Null( cursor, 5201 )then
         a_frs1516.apti3sp := gse.Integer_Value( cursor, 5201 );
      end if;
      if not gse.Is_Null( cursor, 5202 )then
         a_frs1516.truti1sp := gse.Integer_Value( cursor, 5202 );
      end if;
      if not gse.Is_Null( cursor, 5203 )then
         a_frs1516.truti2sp := gse.Integer_Value( cursor, 5203 );
      end if;
      if not gse.Is_Null( cursor, 5204 )then
         a_frs1516.expti1sp := gse.Integer_Value( cursor, 5204 );
      end if;
      if not gse.Is_Null( cursor, 5205 )then
         a_frs1516.expti2sp := gse.Integer_Value( cursor, 5205 );
      end if;
      if not gse.Is_Null( cursor, 5206 )then
         a_frs1516.menpin11 := gse.Integer_Value( cursor, 5206 );
      end if;
      if not gse.Is_Null( cursor, 5207 )then
         a_frs1516.menpin12 := gse.Integer_Value( cursor, 5207 );
      end if;
      if not gse.Is_Null( cursor, 5208 )then
         a_frs1516.menpin13 := gse.Integer_Value( cursor, 5208 );
      end if;
      if not gse.Is_Null( cursor, 5209 )then
         a_frs1516.menpin21 := gse.Integer_Value( cursor, 5209 );
      end if;
      if not gse.Is_Null( cursor, 5210 )then
         a_frs1516.menpin22 := gse.Integer_Value( cursor, 5210 );
      end if;
      if not gse.Is_Null( cursor, 5211 )then
         a_frs1516.menpin23 := gse.Integer_Value( cursor, 5211 );
      end if;
      if not gse.Is_Null( cursor, 5212 )then
         a_frs1516.menpin31 := gse.Integer_Value( cursor, 5212 );
      end if;
      if not gse.Is_Null( cursor, 5213 )then
         a_frs1516.menpin32 := gse.Integer_Value( cursor, 5213 );
      end if;
      if not gse.Is_Null( cursor, 5214 )then
         a_frs1516.menpin33 := gse.Integer_Value( cursor, 5214 );
      end if;
      if not gse.Is_Null( cursor, 5215 )then
         a_frs1516.menpol11:= Amount'Value( gse.Value( cursor, 5215 ));
      end if;
      if not gse.Is_Null( cursor, 5216 )then
         a_frs1516.menpol12:= Amount'Value( gse.Value( cursor, 5216 ));
      end if;
      if not gse.Is_Null( cursor, 5217 )then
         a_frs1516.menpol13 := gse.Integer_Value( cursor, 5217 );
      end if;
      if not gse.Is_Null( cursor, 5218 )then
         a_frs1516.menpol21:= Amount'Value( gse.Value( cursor, 5218 ));
      end if;
      if not gse.Is_Null( cursor, 5219 )then
         a_frs1516.menpol22 := gse.Integer_Value( cursor, 5219 );
      end if;
      if not gse.Is_Null( cursor, 5220 )then
         a_frs1516.menpol23 := gse.Integer_Value( cursor, 5220 );
      end if;
      if not gse.Is_Null( cursor, 5221 )then
         a_frs1516.menpol31 := gse.Integer_Value( cursor, 5221 );
      end if;
      if not gse.Is_Null( cursor, 5222 )then
         a_frs1516.menpol32 := gse.Integer_Value( cursor, 5222 );
      end if;
      if not gse.Is_Null( cursor, 5223 )then
         a_frs1516.menpol33 := gse.Integer_Value( cursor, 5223 );
      end if;
      if not gse.Is_Null( cursor, 5224 )then
         a_frs1516.pmenpo11 := gse.Integer_Value( cursor, 5224 );
      end if;
      if not gse.Is_Null( cursor, 5225 )then
         a_frs1516.pmenpo12 := gse.Integer_Value( cursor, 5225 );
      end if;
      if not gse.Is_Null( cursor, 5226 )then
         a_frs1516.pmenpo13 := gse.Integer_Value( cursor, 5226 );
      end if;
      if not gse.Is_Null( cursor, 5227 )then
         a_frs1516.pmenpo21 := gse.Integer_Value( cursor, 5227 );
      end if;
      if not gse.Is_Null( cursor, 5228 )then
         a_frs1516.pmenpo22 := gse.Integer_Value( cursor, 5228 );
      end if;
      if not gse.Is_Null( cursor, 5229 )then
         a_frs1516.pmenpo23 := gse.Integer_Value( cursor, 5229 );
      end if;
      if not gse.Is_Null( cursor, 5230 )then
         a_frs1516.pmenpo31 := gse.Integer_Value( cursor, 5230 );
      end if;
      if not gse.Is_Null( cursor, 5231 )then
         a_frs1516.pmenpo32 := gse.Integer_Value( cursor, 5231 );
      end if;
      if not gse.Is_Null( cursor, 5232 )then
         a_frs1516.pmenpo33 := gse.Integer_Value( cursor, 5232 );
      end if;
      if not gse.Is_Null( cursor, 5233 )then
         a_frs1516.bedroom := gse.Integer_Value( cursor, 5233 );
      end if;
      if not gse.Is_Null( cursor, 5234 )then
         a_frs1516.benunits := gse.Integer_Value( cursor, 5234 );
      end if;
      if not gse.Is_Null( cursor, 5235 )then
         a_frs1516.billrate := gse.Integer_Value( cursor, 5235 );
      end if;
      if not gse.Is_Null( cursor, 5236 )then
         a_frs1516.brma := gse.Integer_Value( cursor, 5236 );
      end if;
      if not gse.Is_Null( cursor, 5237 )then
         a_frs1516.burden := gse.Integer_Value( cursor, 5237 );
      end if;
      if not gse.Is_Null( cursor, 5238 )then
         a_frs1516.busroom := gse.Integer_Value( cursor, 5238 );
      end if;
      if not gse.Is_Null( cursor, 5239 )then
         a_frs1516.capval := gse.Integer_Value( cursor, 5239 );
      end if;
      if not gse.Is_Null( cursor, 5240 )then
         a_frs1516.charge1 := gse.Integer_Value( cursor, 5240 );
      end if;
      if not gse.Is_Null( cursor, 5241 )then
         a_frs1516.charge2 := gse.Integer_Value( cursor, 5241 );
      end if;
      if not gse.Is_Null( cursor, 5242 )then
         a_frs1516.charge3 := gse.Integer_Value( cursor, 5242 );
      end if;
      if not gse.Is_Null( cursor, 5243 )then
         a_frs1516.charge4 := gse.Integer_Value( cursor, 5243 );
      end if;
      if not gse.Is_Null( cursor, 5244 )then
         a_frs1516.charge5 := gse.Integer_Value( cursor, 5244 );
      end if;
      if not gse.Is_Null( cursor, 5245 )then
         a_frs1516.charge6 := gse.Integer_Value( cursor, 5245 );
      end if;
      if not gse.Is_Null( cursor, 5246 )then
         a_frs1516.charge7 := gse.Integer_Value( cursor, 5246 );
      end if;
      if not gse.Is_Null( cursor, 5247 )then
         a_frs1516.charge8 := gse.Integer_Value( cursor, 5247 );
      end if;
      if not gse.Is_Null( cursor, 5248 )then
         a_frs1516.charge9 := gse.Integer_Value( cursor, 5248 );
      end if;
      if not gse.Is_Null( cursor, 5249 )then
         a_frs1516.chins := gse.Integer_Value( cursor, 5249 );
      end if;
      if not gse.Is_Null( cursor, 5250 )then
         a_frs1516.chrgpd1 := gse.Integer_Value( cursor, 5250 );
      end if;
      if not gse.Is_Null( cursor, 5251 )then
         a_frs1516.chrgpd2 := gse.Integer_Value( cursor, 5251 );
      end if;
      if not gse.Is_Null( cursor, 5252 )then
         a_frs1516.chrgpd3 := gse.Integer_Value( cursor, 5252 );
      end if;
      if not gse.Is_Null( cursor, 5253 )then
         a_frs1516.chrgpd4 := gse.Integer_Value( cursor, 5253 );
      end if;
      if not gse.Is_Null( cursor, 5254 )then
         a_frs1516.chrgpd5 := gse.Integer_Value( cursor, 5254 );
      end if;
      if not gse.Is_Null( cursor, 5255 )then
         a_frs1516.chrgpd6 := gse.Integer_Value( cursor, 5255 );
      end if;
      if not gse.Is_Null( cursor, 5256 )then
         a_frs1516.chrgpd7 := gse.Integer_Value( cursor, 5256 );
      end if;
      if not gse.Is_Null( cursor, 5257 )then
         a_frs1516.chrgpd8 := gse.Integer_Value( cursor, 5257 );
      end if;
      if not gse.Is_Null( cursor, 5258 )then
         a_frs1516.chrgpd9 := gse.Integer_Value( cursor, 5258 );
      end if;
      if not gse.Is_Null( cursor, 5259 )then
         a_frs1516.covoths := gse.Integer_Value( cursor, 5259 );
      end if;
      if not gse.Is_Null( cursor, 5260 )then
         a_frs1516.csewamt:= Amount'Value( gse.Value( cursor, 5260 ));
      end if;
      if not gse.Is_Null( cursor, 5261 )then
         a_frs1516.csewamt1:= Amount'Value( gse.Value( cursor, 5261 ));
      end if;
      if not gse.Is_Null( cursor, 5262 )then
         a_frs1516.ct25d50d := gse.Integer_Value( cursor, 5262 );
      end if;
      if not gse.Is_Null( cursor, 5263 )then
         a_frs1516.ctamt := gse.Integer_Value( cursor, 5263 );
      end if;
      if not gse.Is_Null( cursor, 5264 )then
         a_frs1516.ctannual := gse.Integer_Value( cursor, 5264 );
      end if;
      if not gse.Is_Null( cursor, 5265 )then
         a_frs1516.ctband := gse.Integer_Value( cursor, 5265 );
      end if;
      if not gse.Is_Null( cursor, 5266 )then
         a_frs1516.ctbwait := gse.Integer_Value( cursor, 5266 );
      end if;
      if not gse.Is_Null( cursor, 5267 )then
         a_frs1516.ctcondoc := gse.Integer_Value( cursor, 5267 );
      end if;
      if not gse.Is_Null( cursor, 5268 )then
         a_frs1516.ctdisc := gse.Integer_Value( cursor, 5268 );
      end if;
      if not gse.Is_Null( cursor, 5269 )then
         a_frs1516.ctinstal := gse.Integer_Value( cursor, 5269 );
      end if;
      if not gse.Is_Null( cursor, 5270 )then
         a_frs1516.ctlvband := gse.Integer_Value( cursor, 5270 );
      end if;
      if not gse.Is_Null( cursor, 5271 )then
         a_frs1516.ctlvchk := gse.Integer_Value( cursor, 5271 );
      end if;
      if not gse.Is_Null( cursor, 5272 )then
         a_frs1516.ctreb := gse.Integer_Value( cursor, 5272 );
      end if;
      if not gse.Is_Null( cursor, 5273 )then
         a_frs1516.ctrebamt := gse.Integer_Value( cursor, 5273 );
      end if;
      if not gse.Is_Null( cursor, 5274 )then
         a_frs1516.ctrebpd := gse.Integer_Value( cursor, 5274 );
      end if;
      if not gse.Is_Null( cursor, 5275 )then
         a_frs1516.cttime := gse.Integer_Value( cursor, 5275 );
      end if;
      if not gse.Is_Null( cursor, 5276 )then
         a_frs1516.cwatamt := gse.Integer_Value( cursor, 5276 );
      end if;
      if not gse.Is_Null( cursor, 5277 )then
         a_frs1516.cwatamt1 := gse.Integer_Value( cursor, 5277 );
      end if;
      if not gse.Is_Null( cursor, 5278 )then
         a_frs1516.entry1 := gse.Integer_Value( cursor, 5278 );
      end if;
      if not gse.Is_Null( cursor, 5279 )then
         a_frs1516.entry2 := gse.Integer_Value( cursor, 5279 );
      end if;
      if not gse.Is_Null( cursor, 5280 )then
         a_frs1516.entry3 := gse.Integer_Value( cursor, 5280 );
      end if;
      if not gse.Is_Null( cursor, 5281 )then
         a_frs1516.entry4 := gse.Integer_Value( cursor, 5281 );
      end if;
      if not gse.Is_Null( cursor, 5282 )then
         a_frs1516.gvtregn := gse.Integer_Value( cursor, 5282 );
      end if;
      if not gse.Is_Null( cursor, 5283 )then
         a_frs1516.gvtregno := gse.Integer_Value( cursor, 5283 );
      end if;
      if not gse.Is_Null( cursor, 5284 )then
         a_frs1516.hhldr01 := gse.Integer_Value( cursor, 5284 );
      end if;
      if not gse.Is_Null( cursor, 5285 )then
         a_frs1516.hhldr02 := gse.Integer_Value( cursor, 5285 );
      end if;
      if not gse.Is_Null( cursor, 5286 )then
         a_frs1516.hhldr03 := gse.Integer_Value( cursor, 5286 );
      end if;
      if not gse.Is_Null( cursor, 5287 )then
         a_frs1516.hhldr04 := gse.Integer_Value( cursor, 5287 );
      end if;
      if not gse.Is_Null( cursor, 5288 )then
         a_frs1516.hhldr05 := gse.Integer_Value( cursor, 5288 );
      end if;
      if not gse.Is_Null( cursor, 5289 )then
         a_frs1516.hhldr06 := gse.Integer_Value( cursor, 5289 );
      end if;
      if not gse.Is_Null( cursor, 5290 )then
         a_frs1516.hhldr07 := gse.Integer_Value( cursor, 5290 );
      end if;
      if not gse.Is_Null( cursor, 5291 )then
         a_frs1516.hhldr08 := gse.Integer_Value( cursor, 5291 );
      end if;
      if not gse.Is_Null( cursor, 5292 )then
         a_frs1516.hhldr09 := gse.Integer_Value( cursor, 5292 );
      end if;
      if not gse.Is_Null( cursor, 5293 )then
         a_frs1516.hhldr10 := gse.Integer_Value( cursor, 5293 );
      end if;
      if not gse.Is_Null( cursor, 5294 )then
         a_frs1516.hhldr11 := gse.Integer_Value( cursor, 5294 );
      end if;
      if not gse.Is_Null( cursor, 5295 )then
         a_frs1516.hhldr12 := gse.Integer_Value( cursor, 5295 );
      end if;
      if not gse.Is_Null( cursor, 5296 )then
         a_frs1516.hhldr13 := gse.Integer_Value( cursor, 5296 );
      end if;
      if not gse.Is_Null( cursor, 5297 )then
         a_frs1516.hhldr14 := gse.Integer_Value( cursor, 5297 );
      end if;
      if not gse.Is_Null( cursor, 5298 )then
         a_frs1516.hhldr97 := gse.Integer_Value( cursor, 5298 );
      end if;
      if not gse.Is_Null( cursor, 5299 )then
         a_frs1516.hhstat := gse.Integer_Value( cursor, 5299 );
      end if;
      if not gse.Is_Null( cursor, 5300 )then
         a_frs1516.hlthst := gse.Integer_Value( cursor, 5300 );
      end if;
      if not gse.Is_Null( cursor, 5301 )then
         a_frs1516.intdate := gse.Time_Value( cursor, 5301 );
      end if;
      if not gse.Is_Null( cursor, 5302 )then
         a_frs1516.mainacc := gse.Integer_Value( cursor, 5302 );
      end if;
      if not gse.Is_Null( cursor, 5303 )then
         a_frs1516.mnthcode := gse.Integer_Value( cursor, 5303 );
      end if;
      if not gse.Is_Null( cursor, 5304 )then
         a_frs1516.monlive := gse.Integer_Value( cursor, 5304 );
      end if;
      if not gse.Is_Null( cursor, 5305 )then
         a_frs1516.multi := gse.Integer_Value( cursor, 5305 );
      end if;
      if not gse.Is_Null( cursor, 5306 )then
         a_frs1516.nicoun := gse.Integer_Value( cursor, 5306 );
      end if;
      if not gse.Is_Null( cursor, 5307 )then
         a_frs1516.nidpnd := gse.Integer_Value( cursor, 5307 );
      end if;
      if not gse.Is_Null( cursor, 5308 )then
         a_frs1516.nmrmshar := gse.Integer_Value( cursor, 5308 );
      end if;
      if not gse.Is_Null( cursor, 5309 )then
         a_frs1516.nopay := gse.Integer_Value( cursor, 5309 );
      end if;
      if not gse.Is_Null( cursor, 5310 )then
         a_frs1516.norate := gse.Integer_Value( cursor, 5310 );
      end if;
      if not gse.Is_Null( cursor, 5311 )then
         a_frs1516.onbsroom := gse.Integer_Value( cursor, 5311 );
      end if;
      if not gse.Is_Null( cursor, 5312 )then
         a_frs1516.orgid := gse.Integer_Value( cursor, 5312 );
      end if;
      if not gse.Is_Null( cursor, 5313 )then
         a_frs1516.payrate := gse.Integer_Value( cursor, 5313 );
      end if;
      if not gse.Is_Null( cursor, 5314 )then
         a_frs1516.ptbsroom := gse.Integer_Value( cursor, 5314 );
      end if;
      if not gse.Is_Null( cursor, 5315 )then
         a_frs1516.rooms := gse.Integer_Value( cursor, 5315 );
      end if;
      if not gse.Is_Null( cursor, 5316 )then
         a_frs1516.roomshr := gse.Integer_Value( cursor, 5316 );
      end if;
      if not gse.Is_Null( cursor, 5317 )then
         a_frs1516.rt2rebam:= Amount'Value( gse.Value( cursor, 5317 ));
      end if;
      if not gse.Is_Null( cursor, 5318 )then
         a_frs1516.rtannual:= Amount'Value( gse.Value( cursor, 5318 ));
      end if;
      if not gse.Is_Null( cursor, 5319 )then
         a_frs1516.rtcondoc := gse.Integer_Value( cursor, 5319 );
      end if;
      if not gse.Is_Null( cursor, 5320 )then
         a_frs1516.rtdpa := gse.Integer_Value( cursor, 5320 );
      end if;
      if not gse.Is_Null( cursor, 5321 )then
         a_frs1516.rtdpaamt:= Amount'Value( gse.Value( cursor, 5321 ));
      end if;
      if not gse.Is_Null( cursor, 5322 )then
         a_frs1516.rtene := gse.Integer_Value( cursor, 5322 );
      end if;
      if not gse.Is_Null( cursor, 5323 )then
         a_frs1516.rteneamt := gse.Integer_Value( cursor, 5323 );
      end if;
      if not gse.Is_Null( cursor, 5324 )then
         a_frs1516.rtgen := gse.Integer_Value( cursor, 5324 );
      end if;
      if not gse.Is_Null( cursor, 5325 )then
         a_frs1516.rtinstal := gse.Integer_Value( cursor, 5325 );
      end if;
      if not gse.Is_Null( cursor, 5326 )then
         a_frs1516.rtlpa := gse.Integer_Value( cursor, 5326 );
      end if;
      if not gse.Is_Null( cursor, 5327 )then
         a_frs1516.rtlpaamt:= Amount'Value( gse.Value( cursor, 5327 ));
      end if;
      if not gse.Is_Null( cursor, 5328 )then
         a_frs1516.rtothamt:= Amount'Value( gse.Value( cursor, 5328 ));
      end if;
      if not gse.Is_Null( cursor, 5329 )then
         a_frs1516.rtother := gse.Integer_Value( cursor, 5329 );
      end if;
      if not gse.Is_Null( cursor, 5330 )then
         a_frs1516.rtreb := gse.Integer_Value( cursor, 5330 );
      end if;
      if not gse.Is_Null( cursor, 5331 )then
         a_frs1516.rtrebamt:= Amount'Value( gse.Value( cursor, 5331 ));
      end if;
      if not gse.Is_Null( cursor, 5332 )then
         a_frs1516.rtrtramt:= Amount'Value( gse.Value( cursor, 5332 ));
      end if;
      if not gse.Is_Null( cursor, 5333 )then
         a_frs1516.rttimepd := gse.Integer_Value( cursor, 5333 );
      end if;
      if not gse.Is_Null( cursor, 5334 )then
         a_frs1516.schbrk := gse.Integer_Value( cursor, 5334 );
      end if;
      if not gse.Is_Null( cursor, 5335 )then
         a_frs1516.schfrt := gse.Integer_Value( cursor, 5335 );
      end if;
      if not gse.Is_Null( cursor, 5336 )then
         a_frs1516.schmeal := gse.Integer_Value( cursor, 5336 );
      end if;
      if not gse.Is_Null( cursor, 5337 )then
         a_frs1516.schmilk := gse.Integer_Value( cursor, 5337 );
      end if;
      if not gse.Is_Null( cursor, 5338 )then
         a_frs1516.seramt1:= Amount'Value( gse.Value( cursor, 5338 ));
      end if;
      if not gse.Is_Null( cursor, 5339 )then
         a_frs1516.seramt2:= Amount'Value( gse.Value( cursor, 5339 ));
      end if;
      if not gse.Is_Null( cursor, 5340 )then
         a_frs1516.seramt3:= Amount'Value( gse.Value( cursor, 5340 ));
      end if;
      if not gse.Is_Null( cursor, 5341 )then
         a_frs1516.seramt4:= Amount'Value( gse.Value( cursor, 5341 ));
      end if;
      if not gse.Is_Null( cursor, 5342 )then
         a_frs1516.seramt5:= Amount'Value( gse.Value( cursor, 5342 ));
      end if;
      if not gse.Is_Null( cursor, 5343 )then
         a_frs1516.sercomb := gse.Integer_Value( cursor, 5343 );
      end if;
      if not gse.Is_Null( cursor, 5344 )then
         a_frs1516.serpay1 := gse.Integer_Value( cursor, 5344 );
      end if;
      if not gse.Is_Null( cursor, 5345 )then
         a_frs1516.serpay2 := gse.Integer_Value( cursor, 5345 );
      end if;
      if not gse.Is_Null( cursor, 5346 )then
         a_frs1516.serpay3 := gse.Integer_Value( cursor, 5346 );
      end if;
      if not gse.Is_Null( cursor, 5347 )then
         a_frs1516.serpay4 := gse.Integer_Value( cursor, 5347 );
      end if;
      if not gse.Is_Null( cursor, 5348 )then
         a_frs1516.serpay5 := gse.Integer_Value( cursor, 5348 );
      end if;
      if not gse.Is_Null( cursor, 5349 )then
         a_frs1516.sewamt:= Amount'Value( gse.Value( cursor, 5349 ));
      end if;
      if not gse.Is_Null( cursor, 5350 )then
         a_frs1516.sewanul:= Amount'Value( gse.Value( cursor, 5350 ));
      end if;
      if not gse.Is_Null( cursor, 5351 )then
         a_frs1516.sewerpay := gse.Integer_Value( cursor, 5351 );
      end if;
      if not gse.Is_Null( cursor, 5352 )then
         a_frs1516.sewsep := gse.Integer_Value( cursor, 5352 );
      end if;
      if not gse.Is_Null( cursor, 5353 )then
         a_frs1516.sewtime := gse.Integer_Value( cursor, 5353 );
      end if;
      if not gse.Is_Null( cursor, 5354 )then
         a_frs1516.shelter := gse.Integer_Value( cursor, 5354 );
      end if;
      if not gse.Is_Null( cursor, 5355 )then
         a_frs1516.sobuy := gse.Integer_Value( cursor, 5355 );
      end if;
      if not gse.Is_Null( cursor, 5356 )then
         a_frs1516.stramt1:= Amount'Value( gse.Value( cursor, 5356 ));
      end if;
      if not gse.Is_Null( cursor, 5357 )then
         a_frs1516.stramt2:= Amount'Value( gse.Value( cursor, 5357 ));
      end if;
      if not gse.Is_Null( cursor, 5358 )then
         a_frs1516.strcov := gse.Integer_Value( cursor, 5358 );
      end if;
      if not gse.Is_Null( cursor, 5359 )then
         a_frs1516.strmort := gse.Integer_Value( cursor, 5359 );
      end if;
      if not gse.Is_Null( cursor, 5360 )then
         a_frs1516.stroths := gse.Integer_Value( cursor, 5360 );
      end if;
      if not gse.Is_Null( cursor, 5361 )then
         a_frs1516.strpd1 := gse.Integer_Value( cursor, 5361 );
      end if;
      if not gse.Is_Null( cursor, 5362 )then
         a_frs1516.strpd2 := gse.Integer_Value( cursor, 5362 );
      end if;
      if not gse.Is_Null( cursor, 5363 )then
         a_frs1516.suballow := gse.Integer_Value( cursor, 5363 );
      end if;
      if not gse.Is_Null( cursor, 5364 )then
         a_frs1516.sublet := gse.Integer_Value( cursor, 5364 );
      end if;
      if not gse.Is_Null( cursor, 5365 )then
         a_frs1516.sublety := gse.Integer_Value( cursor, 5365 );
      end if;
      if not gse.Is_Null( cursor, 5366 )then
         a_frs1516.subrent:= Amount'Value( gse.Value( cursor, 5366 ));
      end if;
      if not gse.Is_Null( cursor, 5367 )then
         a_frs1516.tenure := gse.Integer_Value( cursor, 5367 );
      end if;
      if not gse.Is_Null( cursor, 5368 )then
         a_frs1516.tvlic := gse.Integer_Value( cursor, 5368 );
      end if;
      if not gse.Is_Null( cursor, 5369 )then
         a_frs1516.typeacc := gse.Integer_Value( cursor, 5369 );
      end if;
      if not gse.Is_Null( cursor, 5370 )then
         a_frs1516.urb := gse.Integer_Value( cursor, 5370 );
      end if;
      if not gse.Is_Null( cursor, 5371 )then
         a_frs1516.urbrur := gse.Integer_Value( cursor, 5371 );
      end if;
      if not gse.Is_Null( cursor, 5372 )then
         a_frs1516.urindew := gse.Integer_Value( cursor, 5372 );
      end if;
      if not gse.Is_Null( cursor, 5373 )then
         a_frs1516.urinds := gse.Integer_Value( cursor, 5373 );
      end if;
      if not gse.Is_Null( cursor, 5374 )then
         a_frs1516.watamt:= Amount'Value( gse.Value( cursor, 5374 ));
      end if;
      if not gse.Is_Null( cursor, 5375 )then
         a_frs1516.watanul:= Amount'Value( gse.Value( cursor, 5375 ));
      end if;
      if not gse.Is_Null( cursor, 5376 )then
         a_frs1516.watermet := gse.Integer_Value( cursor, 5376 );
      end if;
      if not gse.Is_Null( cursor, 5377 )then
         a_frs1516.waterpay := gse.Integer_Value( cursor, 5377 );
      end if;
      if not gse.Is_Null( cursor, 5378 )then
         a_frs1516.watrb := gse.Integer_Value( cursor, 5378 );
      end if;
      if not gse.Is_Null( cursor, 5379 )then
         a_frs1516.wattime := gse.Integer_Value( cursor, 5379 );
      end if;
      if not gse.Is_Null( cursor, 5380 )then
         a_frs1516.whoctbot := gse.Integer_Value( cursor, 5380 );
      end if;
      if not gse.Is_Null( cursor, 5381 )then
         a_frs1516.whorsp01 := gse.Integer_Value( cursor, 5381 );
      end if;
      if not gse.Is_Null( cursor, 5382 )then
         a_frs1516.whorsp02 := gse.Integer_Value( cursor, 5382 );
      end if;
      if not gse.Is_Null( cursor, 5383 )then
         a_frs1516.whorsp03 := gse.Integer_Value( cursor, 5383 );
      end if;
      if not gse.Is_Null( cursor, 5384 )then
         a_frs1516.whorsp04 := gse.Integer_Value( cursor, 5384 );
      end if;
      if not gse.Is_Null( cursor, 5385 )then
         a_frs1516.whorsp05 := gse.Integer_Value( cursor, 5385 );
      end if;
      if not gse.Is_Null( cursor, 5386 )then
         a_frs1516.whorsp06 := gse.Integer_Value( cursor, 5386 );
      end if;
      if not gse.Is_Null( cursor, 5387 )then
         a_frs1516.whorsp07 := gse.Integer_Value( cursor, 5387 );
      end if;
      if not gse.Is_Null( cursor, 5388 )then
         a_frs1516.whorsp08 := gse.Integer_Value( cursor, 5388 );
      end if;
      if not gse.Is_Null( cursor, 5389 )then
         a_frs1516.whorsp09 := gse.Integer_Value( cursor, 5389 );
      end if;
      if not gse.Is_Null( cursor, 5390 )then
         a_frs1516.whorsp10 := gse.Integer_Value( cursor, 5390 );
      end if;
      if not gse.Is_Null( cursor, 5391 )then
         a_frs1516.whorsp11 := gse.Integer_Value( cursor, 5391 );
      end if;
      if not gse.Is_Null( cursor, 5392 )then
         a_frs1516.whorsp12 := gse.Integer_Value( cursor, 5392 );
      end if;
      if not gse.Is_Null( cursor, 5393 )then
         a_frs1516.whorsp13 := gse.Integer_Value( cursor, 5393 );
      end if;
      if not gse.Is_Null( cursor, 5394 )then
         a_frs1516.whorsp14 := gse.Integer_Value( cursor, 5394 );
      end if;
      if not gse.Is_Null( cursor, 5395 )then
         a_frs1516.whynoct := gse.Integer_Value( cursor, 5395 );
      end if;
      if not gse.Is_Null( cursor, 5396 )then
         a_frs1516.wsewamt:= Amount'Value( gse.Value( cursor, 5396 ));
      end if;
      if not gse.Is_Null( cursor, 5397 )then
         a_frs1516.wsewanul:= Amount'Value( gse.Value( cursor, 5397 ));
      end if;
      if not gse.Is_Null( cursor, 5398 )then
         a_frs1516.wsewtime := gse.Integer_Value( cursor, 5398 );
      end if;
      if not gse.Is_Null( cursor, 5399 )then
         a_frs1516.yearlive := gse.Integer_Value( cursor, 5399 );
      end if;
      if not gse.Is_Null( cursor, 5400 )then
         a_frs1516.yearwhc := gse.Integer_Value( cursor, 5400 );
      end if;
      if not gse.Is_Null( cursor, 5401 )then
         a_frs1516.adulth := gse.Integer_Value( cursor, 5401 );
      end if;
      if not gse.Is_Null( cursor, 5402 )then
         a_frs1516.cwatamtd := gse.Integer_Value( cursor, 5402 );
      end if;
      if not gse.Is_Null( cursor, 5403 )then
         a_frs1516.depchldh := gse.Integer_Value( cursor, 5403 );
      end if;
      if not gse.Is_Null( cursor, 5404 )then
         a_frs1516.dischha1 := gse.Integer_Value( cursor, 5404 );
      end if;
      if not gse.Is_Null( cursor, 5405 )then
         a_frs1516.dischhc1 := gse.Integer_Value( cursor, 5405 );
      end if;
      if not gse.Is_Null( cursor, 5406 )then
         a_frs1516.diswhha1 := gse.Integer_Value( cursor, 5406 );
      end if;
      if not gse.Is_Null( cursor, 5407 )then
         a_frs1516.diswhhc1 := gse.Integer_Value( cursor, 5407 );
      end if;
      if not gse.Is_Null( cursor, 5408 )then
         a_frs1516.endowpay:= Amount'Value( gse.Value( cursor, 5408 ));
      end if;
      if not gse.Is_Null( cursor, 5409 )then
         a_frs1516.gbhscost := gse.Integer_Value( cursor, 5409 );
      end if;
      if not gse.Is_Null( cursor, 5410 )then
         a_frs1516.grossct := gse.Integer_Value( cursor, 5410 );
      end if;
      if not gse.Is_Null( cursor, 5411 )then
         a_frs1516.hbeninc := gse.Integer_Value( cursor, 5411 );
      end if;
      if not gse.Is_Null( cursor, 5412 )then
         a_frs1516.hbindhh := gse.Integer_Value( cursor, 5412 );
      end if;
      if not gse.Is_Null( cursor, 5413 )then
         a_frs1516.hbindhh2 := gse.Integer_Value( cursor, 5413 );
      end if;
      if not gse.Is_Null( cursor, 5414 )then
         a_frs1516.hearns := gse.Integer_Value( cursor, 5414 );
      end if;
      if not gse.Is_Null( cursor, 5415 )then
         a_frs1516.hhdisben := gse.Integer_Value( cursor, 5415 );
      end if;
      if not gse.Is_Null( cursor, 5416 )then
         a_frs1516.hhinc := gse.Integer_Value( cursor, 5416 );
      end if;
      if not gse.Is_Null( cursor, 5417 )then
         a_frs1516.hhinv := gse.Integer_Value( cursor, 5417 );
      end if;
      if not gse.Is_Null( cursor, 5418 )then
         a_frs1516.hhirben := gse.Integer_Value( cursor, 5418 );
      end if;
      if not gse.Is_Null( cursor, 5419 )then
         a_frs1516.hhnirben := gse.Integer_Value( cursor, 5419 );
      end if;
      if not gse.Is_Null( cursor, 5420 )then
         a_frs1516.hhothben := gse.Integer_Value( cursor, 5420 );
      end if;
      if not gse.Is_Null( cursor, 5421 )then
         a_frs1516.hhrent := gse.Integer_Value( cursor, 5421 );
      end if;
      if not gse.Is_Null( cursor, 5422 )then
         a_frs1516.hhrinc := gse.Integer_Value( cursor, 5422 );
      end if;
      if not gse.Is_Null( cursor, 5423 )then
         a_frs1516.hhrpinc := gse.Integer_Value( cursor, 5423 );
      end if;
      if not gse.Is_Null( cursor, 5424 )then
         a_frs1516.hhtvlic:= Amount'Value( gse.Value( cursor, 5424 ));
      end if;
      if not gse.Is_Null( cursor, 5425 )then
         a_frs1516.hhtxcred := gse.Integer_Value( cursor, 5425 );
      end if;
      if not gse.Is_Null( cursor, 5426 )then
         a_frs1516.hothinc := gse.Integer_Value( cursor, 5426 );
      end if;
      if not gse.Is_Null( cursor, 5427 )then
         a_frs1516.hpeninc := gse.Integer_Value( cursor, 5427 );
      end if;
      if not gse.Is_Null( cursor, 5428 )then
         a_frs1516.hseinc := gse.Integer_Value( cursor, 5428 );
      end if;
      if not gse.Is_Null( cursor, 5429 )then
         a_frs1516.london := gse.Integer_Value( cursor, 5429 );
      end if;
      if not gse.Is_Null( cursor, 5430 )then
         a_frs1516.mortint:= Amount'Value( gse.Value( cursor, 5430 ));
      end if;
      if not gse.Is_Null( cursor, 5431 )then
         a_frs1516.nihscost := gse.Integer_Value( cursor, 5431 );
      end if;
      if not gse.Is_Null( cursor, 5432 )then
         a_frs1516.penage := gse.Integer_Value( cursor, 5432 );
      end if;
      if not gse.Is_Null( cursor, 5433 )then
         a_frs1516.penhrp := gse.Integer_Value( cursor, 5433 );
      end if;
      if not gse.Is_Null( cursor, 5434 )then
         a_frs1516.ptentyp2 := gse.Integer_Value( cursor, 5434 );
      end if;
      if not gse.Is_Null( cursor, 5435 )then
         a_frs1516.servpay:= Amount'Value( gse.Value( cursor, 5435 ));
      end if;
      if not gse.Is_Null( cursor, 5436 )then
         a_frs1516.struins:= Amount'Value( gse.Value( cursor, 5436 ));
      end if;
      if not gse.Is_Null( cursor, 5437 )then
         a_frs1516.tentyp2 := gse.Integer_Value( cursor, 5437 );
      end if;
      if not gse.Is_Null( cursor, 5438 )then
         a_frs1516.tuhhrent := gse.Integer_Value( cursor, 5438 );
      end if;
      if not gse.Is_Null( cursor, 5439 )then
         a_frs1516.tuwatsew:= Amount'Value( gse.Value( cursor, 5439 ));
      end if;
      if not gse.Is_Null( cursor, 5440 )then
         a_frs1516.watsewrt:= Amount'Value( gse.Value( cursor, 5440 ));
      end if;
      if not gse.Is_Null( cursor, 5441 )then
         a_frs1516.hcgrent:= Amount'Value( gse.Value( cursor, 5441 ));
      end if;
      if not gse.Is_Null( cursor, 5442 )then
         a_frs1516.hcfeudut := gse.Integer_Value( cursor, 5442 );
      end if;
      if not gse.Is_Null( cursor, 5443 )then
         a_frs1516.hcchrent:= Amount'Value( gse.Value( cursor, 5443 ));
      end if;
      if not gse.Is_Null( cursor, 5444 )then
         a_frs1516.hcservch:= Amount'Value( gse.Value( cursor, 5444 ));
      end if;
      if not gse.Is_Null( cursor, 5445 )then
         a_frs1516.hcmaint:= Amount'Value( gse.Value( cursor, 5445 ));
      end if;
      if not gse.Is_Null( cursor, 5446 )then
         a_frs1516.hcsirent:= Amount'Value( gse.Value( cursor, 5446 ));
      end if;
      if not gse.Is_Null( cursor, 5447 )then
         a_frs1516.hcfactor:= Amount'Value( gse.Value( cursor, 5447 ));
      end if;
      if not gse.Is_Null( cursor, 5448 )then
         a_frs1516.hcother:= Amount'Value( gse.Value( cursor, 5448 ));
      end if;
      if not gse.Is_Null( cursor, 5449 )then
         a_frs1516.hcpcomb:= Amount'Value( gse.Value( cursor, 5449 ));
      end if;
      if not gse.Is_Null( cursor, 5450 )then
         a_frs1516.gvhelp := gse.Integer_Value( cursor, 5450 );
      end if;
      if not gse.Is_Null( cursor, 5451 )then
         a_frs1516.lacode := gse.Integer_Value( cursor, 5451 );
      end if;
      if not gse.Is_Null( cursor, 5452 )then
         a_frs1516.lauacode := gse.Integer_Value( cursor, 5452 );
      end if;
      if not gse.Is_Null( cursor, 5453 )then
         a_frs1516.llcare := gse.Integer_Value( cursor, 5453 );
      end if;
      if not gse.Is_Null( cursor, 5454 )then
         a_frs1516.needcare := gse.Integer_Value( cursor, 5454 );
      end if;
      if not gse.Is_Null( cursor, 5455 )then
         a_frs1516.colourtv := gse.Integer_Value( cursor, 5455 );
      end if;
      if not gse.Is_Null( cursor, 5456 )then
         a_frs1516.bwtv := gse.Integer_Value( cursor, 5456 );
      end if;
      if not gse.Is_Null( cursor, 5457 )then
         a_frs1516.serpd1 := gse.Integer_Value( cursor, 5457 );
      end if;
      if not gse.Is_Null( cursor, 5458 )then
         a_frs1516.serpd2 := gse.Integer_Value( cursor, 5458 );
      end if;
      if not gse.Is_Null( cursor, 5459 )then
         a_frs1516.serpd3 := gse.Integer_Value( cursor, 5459 );
      end if;
      if not gse.Is_Null( cursor, 5460 )then
         a_frs1516.serpd4 := gse.Integer_Value( cursor, 5460 );
      end if;
      if not gse.Is_Null( cursor, 5461 )then
         a_frs1516.serpd5 := gse.Integer_Value( cursor, 5461 );
      end if;
      if not gse.Is_Null( cursor, 5462 )then
         a_frs1516.outsam11:= Amount'Value( gse.Value( cursor, 5462 ));
      end if;
      if not gse.Is_Null( cursor, 5463 )then
         a_frs1516.outsam12:= Amount'Value( gse.Value( cursor, 5463 ));
      end if;
      if not gse.Is_Null( cursor, 5464 )then
         a_frs1516.outsam21:= Amount'Value( gse.Value( cursor, 5464 ));
      end if;
      if not gse.Is_Null( cursor, 5465 )then
         a_frs1516.outsam22 := gse.Integer_Value( cursor, 5465 );
      end if;
      if not gse.Is_Null( cursor, 5466 )then
         a_frs1516.outsam31 := gse.Integer_Value( cursor, 5466 );
      end if;
      if not gse.Is_Null( cursor, 5467 )then
         a_frs1516.outsam32 := gse.Integer_Value( cursor, 5467 );
      end if;
      if not gse.Is_Null( cursor, 5468 )then
         a_frs1516.outsin11 := gse.Integer_Value( cursor, 5468 );
      end if;
      if not gse.Is_Null( cursor, 5469 )then
         a_frs1516.outsin12 := gse.Integer_Value( cursor, 5469 );
      end if;
      if not gse.Is_Null( cursor, 5470 )then
         a_frs1516.outsin21 := gse.Integer_Value( cursor, 5470 );
      end if;
      if not gse.Is_Null( cursor, 5471 )then
         a_frs1516.outsin22 := gse.Integer_Value( cursor, 5471 );
      end if;
      if not gse.Is_Null( cursor, 5472 )then
         a_frs1516.outsin31 := gse.Integer_Value( cursor, 5472 );
      end if;
      if not gse.Is_Null( cursor, 5473 )then
         a_frs1516.outsin32 := gse.Integer_Value( cursor, 5473 );
      end if;
      if not gse.Is_Null( cursor, 5474 )then
         a_frs1516.outspa11 := gse.Integer_Value( cursor, 5474 );
      end if;
      if not gse.Is_Null( cursor, 5475 )then
         a_frs1516.outspa12 := gse.Integer_Value( cursor, 5475 );
      end if;
      if not gse.Is_Null( cursor, 5476 )then
         a_frs1516.outspa21 := gse.Integer_Value( cursor, 5476 );
      end if;
      if not gse.Is_Null( cursor, 5477 )then
         a_frs1516.outspa22 := gse.Integer_Value( cursor, 5477 );
      end if;
      if not gse.Is_Null( cursor, 5478 )then
         a_frs1516.outspa31 := gse.Integer_Value( cursor, 5478 );
      end if;
      if not gse.Is_Null( cursor, 5479 )then
         a_frs1516.outspa32 := gse.Integer_Value( cursor, 5479 );
      end if;
      if not gse.Is_Null( cursor, 5480 )then
         a_frs1516.outspd11 := gse.Integer_Value( cursor, 5480 );
      end if;
      if not gse.Is_Null( cursor, 5481 )then
         a_frs1516.outspd12 := gse.Integer_Value( cursor, 5481 );
      end if;
      if not gse.Is_Null( cursor, 5482 )then
         a_frs1516.outspd21 := gse.Integer_Value( cursor, 5482 );
      end if;
      if not gse.Is_Null( cursor, 5483 )then
         a_frs1516.outspd22 := gse.Integer_Value( cursor, 5483 );
      end if;
      if not gse.Is_Null( cursor, 5484 )then
         a_frs1516.outspd31 := gse.Integer_Value( cursor, 5484 );
      end if;
      if not gse.Is_Null( cursor, 5485 )then
         a_frs1516.outspd32 := gse.Integer_Value( cursor, 5485 );
      end if;
      if not gse.Is_Null( cursor, 5486 )then
         a_frs1516.borramt1:= Amount'Value( gse.Value( cursor, 5486 ));
      end if;
      if not gse.Is_Null( cursor, 5487 )then
         a_frs1516.borramt2 := gse.Integer_Value( cursor, 5487 );
      end if;
      if not gse.Is_Null( cursor, 5488 )then
         a_frs1516.borramt3 := gse.Integer_Value( cursor, 5488 );
      end if;
      if not gse.Is_Null( cursor, 5489 )then
         a_frs1516.endwp11 := gse.Integer_Value( cursor, 5489 );
      end if;
      if not gse.Is_Null( cursor, 5490 )then
         a_frs1516.endwp12 := gse.Integer_Value( cursor, 5490 );
      end if;
      if not gse.Is_Null( cursor, 5491 )then
         a_frs1516.endwp13 := gse.Integer_Value( cursor, 5491 );
      end if;
      if not gse.Is_Null( cursor, 5492 )then
         a_frs1516.endwp21 := gse.Integer_Value( cursor, 5492 );
      end if;
      if not gse.Is_Null( cursor, 5493 )then
         a_frs1516.endwp22 := gse.Integer_Value( cursor, 5493 );
      end if;
      if not gse.Is_Null( cursor, 5494 )then
         a_frs1516.endwp23 := gse.Integer_Value( cursor, 5494 );
      end if;
      if not gse.Is_Null( cursor, 5495 )then
         a_frs1516.endwp31 := gse.Integer_Value( cursor, 5495 );
      end if;
      if not gse.Is_Null( cursor, 5496 )then
         a_frs1516.endwp32 := gse.Integer_Value( cursor, 5496 );
      end if;
      if not gse.Is_Null( cursor, 5497 )then
         a_frs1516.endwp33 := gse.Integer_Value( cursor, 5497 );
      end if;
      if not gse.Is_Null( cursor, 5498 )then
         a_frs1516.endwp41 := gse.Integer_Value( cursor, 5498 );
      end if;
      if not gse.Is_Null( cursor, 5499 )then
         a_frs1516.endwp42 := gse.Integer_Value( cursor, 5499 );
      end if;
      if not gse.Is_Null( cursor, 5500 )then
         a_frs1516.endwp43 := gse.Integer_Value( cursor, 5500 );
      end if;
      if not gse.Is_Null( cursor, 5501 )then
         a_frs1516.endwp51 := gse.Integer_Value( cursor, 5501 );
      end if;
      if not gse.Is_Null( cursor, 5502 )then
         a_frs1516.endwp52 := gse.Integer_Value( cursor, 5502 );
      end if;
      if not gse.Is_Null( cursor, 5503 )then
         a_frs1516.endwp53 := gse.Integer_Value( cursor, 5503 );
      end if;
      if not gse.Is_Null( cursor, 5504 )then
         a_frs1516.incmin11 := gse.Integer_Value( cursor, 5504 );
      end if;
      if not gse.Is_Null( cursor, 5505 )then
         a_frs1516.incmin12 := gse.Integer_Value( cursor, 5505 );
      end if;
      if not gse.Is_Null( cursor, 5506 )then
         a_frs1516.incmin13 := gse.Integer_Value( cursor, 5506 );
      end if;
      if not gse.Is_Null( cursor, 5507 )then
         a_frs1516.incmin21 := gse.Integer_Value( cursor, 5507 );
      end if;
      if not gse.Is_Null( cursor, 5508 )then
         a_frs1516.incmin22 := gse.Integer_Value( cursor, 5508 );
      end if;
      if not gse.Is_Null( cursor, 5509 )then
         a_frs1516.incmin23 := gse.Integer_Value( cursor, 5509 );
      end if;
      if not gse.Is_Null( cursor, 5510 )then
         a_frs1516.incmin31 := gse.Integer_Value( cursor, 5510 );
      end if;
      if not gse.Is_Null( cursor, 5511 )then
         a_frs1516.incmin32 := gse.Integer_Value( cursor, 5511 );
      end if;
      if not gse.Is_Null( cursor, 5512 )then
         a_frs1516.incmin33 := gse.Integer_Value( cursor, 5512 );
      end if;
      if not gse.Is_Null( cursor, 5513 )then
         a_frs1516.incmp11 := gse.Integer_Value( cursor, 5513 );
      end if;
      if not gse.Is_Null( cursor, 5514 )then
         a_frs1516.incmp12 := gse.Integer_Value( cursor, 5514 );
      end if;
      if not gse.Is_Null( cursor, 5515 )then
         a_frs1516.incmp13 := gse.Integer_Value( cursor, 5515 );
      end if;
      if not gse.Is_Null( cursor, 5516 )then
         a_frs1516.incmp21 := gse.Integer_Value( cursor, 5516 );
      end if;
      if not gse.Is_Null( cursor, 5517 )then
         a_frs1516.incmp22 := gse.Integer_Value( cursor, 5517 );
      end if;
      if not gse.Is_Null( cursor, 5518 )then
         a_frs1516.incmp23 := gse.Integer_Value( cursor, 5518 );
      end if;
      if not gse.Is_Null( cursor, 5519 )then
         a_frs1516.incmp31 := gse.Integer_Value( cursor, 5519 );
      end if;
      if not gse.Is_Null( cursor, 5520 )then
         a_frs1516.incmp32 := gse.Integer_Value( cursor, 5520 );
      end if;
      if not gse.Is_Null( cursor, 5521 )then
         a_frs1516.incmp33 := gse.Integer_Value( cursor, 5521 );
      end if;
      if not gse.Is_Null( cursor, 5522 )then
         a_frs1516.incmpa11:= Amount'Value( gse.Value( cursor, 5522 ));
      end if;
      if not gse.Is_Null( cursor, 5523 )then
         a_frs1516.incmpa12:= Amount'Value( gse.Value( cursor, 5523 ));
      end if;
      if not gse.Is_Null( cursor, 5524 )then
         a_frs1516.incmpa13:= Amount'Value( gse.Value( cursor, 5524 ));
      end if;
      if not gse.Is_Null( cursor, 5525 )then
         a_frs1516.incmpa21:= Amount'Value( gse.Value( cursor, 5525 ));
      end if;
      if not gse.Is_Null( cursor, 5526 )then
         a_frs1516.incmpa22 := gse.Integer_Value( cursor, 5526 );
      end if;
      if not gse.Is_Null( cursor, 5527 )then
         a_frs1516.incmpa23 := gse.Integer_Value( cursor, 5527 );
      end if;
      if not gse.Is_Null( cursor, 5528 )then
         a_frs1516.incmpa31:= Amount'Value( gse.Value( cursor, 5528 ));
      end if;
      if not gse.Is_Null( cursor, 5529 )then
         a_frs1516.incmpa32 := gse.Integer_Value( cursor, 5529 );
      end if;
      if not gse.Is_Null( cursor, 5530 )then
         a_frs1516.incmpa33 := gse.Integer_Value( cursor, 5530 );
      end if;
      if not gse.Is_Null( cursor, 5531 )then
         a_frs1516.pincmp11 := gse.Integer_Value( cursor, 5531 );
      end if;
      if not gse.Is_Null( cursor, 5532 )then
         a_frs1516.pincmp12 := gse.Integer_Value( cursor, 5532 );
      end if;
      if not gse.Is_Null( cursor, 5533 )then
         a_frs1516.pincmp13 := gse.Integer_Value( cursor, 5533 );
      end if;
      if not gse.Is_Null( cursor, 5534 )then
         a_frs1516.pincmp21 := gse.Integer_Value( cursor, 5534 );
      end if;
      if not gse.Is_Null( cursor, 5535 )then
         a_frs1516.pincmp22 := gse.Integer_Value( cursor, 5535 );
      end if;
      if not gse.Is_Null( cursor, 5536 )then
         a_frs1516.pincmp23 := gse.Integer_Value( cursor, 5536 );
      end if;
      if not gse.Is_Null( cursor, 5537 )then
         a_frs1516.pincmp31 := gse.Integer_Value( cursor, 5537 );
      end if;
      if not gse.Is_Null( cursor, 5538 )then
         a_frs1516.pincmp32 := gse.Integer_Value( cursor, 5538 );
      end if;
      if not gse.Is_Null( cursor, 5539 )then
         a_frs1516.pincmp33 := gse.Integer_Value( cursor, 5539 );
      end if;
      if not gse.Is_Null( cursor, 5540 )then
         a_frs1516.intpri1:= Amount'Value( gse.Value( cursor, 5540 ));
      end if;
      if not gse.Is_Null( cursor, 5541 )then
         a_frs1516.intpri2:= Amount'Value( gse.Value( cursor, 5541 ));
      end if;
      if not gse.Is_Null( cursor, 5542 )then
         a_frs1516.intpri3:= Amount'Value( gse.Value( cursor, 5542 ));
      end if;
      if not gse.Is_Null( cursor, 5543 )then
         a_frs1516.pintrpi1 := gse.Integer_Value( cursor, 5543 );
      end if;
      if not gse.Is_Null( cursor, 5544 )then
         a_frs1516.pintrpi2 := gse.Integer_Value( cursor, 5544 );
      end if;
      if not gse.Is_Null( cursor, 5545 )then
         a_frs1516.pintrpi3 := gse.Integer_Value( cursor, 5545 );
      end if;
      if not gse.Is_Null( cursor, 5546 )then
         a_frs1516.loanyr1 := gse.Integer_Value( cursor, 5546 );
      end if;
      if not gse.Is_Null( cursor, 5547 )then
         a_frs1516.loanyr2 := gse.Integer_Value( cursor, 5547 );
      end if;
      if not gse.Is_Null( cursor, 5548 )then
         a_frs1516.loanyr3 := gse.Integer_Value( cursor, 5548 );
      end if;
      if not gse.Is_Null( cursor, 5549 )then
         a_frs1516.menpol1 := gse.Integer_Value( cursor, 5549 );
      end if;
      if not gse.Is_Null( cursor, 5550 )then
         a_frs1516.menpol2 := gse.Integer_Value( cursor, 5550 );
      end if;
      if not gse.Is_Null( cursor, 5551 )then
         a_frs1516.menpol3 := gse.Integer_Value( cursor, 5551 );
      end if;
      if not gse.Is_Null( cursor, 5552 )then
         a_frs1516.morall1 := gse.Integer_Value( cursor, 5552 );
      end if;
      if not gse.Is_Null( cursor, 5553 )then
         a_frs1516.morall2 := gse.Integer_Value( cursor, 5553 );
      end if;
      if not gse.Is_Null( cursor, 5554 )then
         a_frs1516.morall3 := gse.Integer_Value( cursor, 5554 );
      end if;
      if not gse.Is_Null( cursor, 5555 )then
         a_frs1516.morflc1 := gse.Integer_Value( cursor, 5555 );
      end if;
      if not gse.Is_Null( cursor, 5556 )then
         a_frs1516.morflc2 := gse.Integer_Value( cursor, 5556 );
      end if;
      if not gse.Is_Null( cursor, 5557 )then
         a_frs1516.morflc3 := gse.Integer_Value( cursor, 5557 );
      end if;
      if not gse.Is_Null( cursor, 5558 )then
         a_frs1516.morinp1:= Amount'Value( gse.Value( cursor, 5558 ));
      end if;
      if not gse.Is_Null( cursor, 5559 )then
         a_frs1516.morinp2:= Amount'Value( gse.Value( cursor, 5559 ));
      end if;
      if not gse.Is_Null( cursor, 5560 )then
         a_frs1516.morinp3:= Amount'Value( gse.Value( cursor, 5560 ));
      end if;
      if not gse.Is_Null( cursor, 5561 )then
         a_frs1516.pmorinp1 := gse.Integer_Value( cursor, 5561 );
      end if;
      if not gse.Is_Null( cursor, 5562 )then
         a_frs1516.pmorinp2 := gse.Integer_Value( cursor, 5562 );
      end if;
      if not gse.Is_Null( cursor, 5563 )then
         a_frs1516.pmorinp3 := gse.Integer_Value( cursor, 5563 );
      end if;
      if not gse.Is_Null( cursor, 5564 )then
         a_frs1516.morinus1 := gse.Integer_Value( cursor, 5564 );
      end if;
      if not gse.Is_Null( cursor, 5565 )then
         a_frs1516.morinus2 := gse.Integer_Value( cursor, 5565 );
      end if;
      if not gse.Is_Null( cursor, 5566 )then
         a_frs1516.morinus3 := gse.Integer_Value( cursor, 5566 );
      end if;
      if not gse.Is_Null( cursor, 5567 )then
         a_frs1516.mortend1 := gse.Integer_Value( cursor, 5567 );
      end if;
      if not gse.Is_Null( cursor, 5568 )then
         a_frs1516.mortend2 := gse.Integer_Value( cursor, 5568 );
      end if;
      if not gse.Is_Null( cursor, 5569 )then
         a_frs1516.mortend3 := gse.Integer_Value( cursor, 5569 );
      end if;
      if not gse.Is_Null( cursor, 5570 )then
         a_frs1516.mortlef1:= Amount'Value( gse.Value( cursor, 5570 ));
      end if;
      if not gse.Is_Null( cursor, 5571 )then
         a_frs1516.mortlef2:= Amount'Value( gse.Value( cursor, 5571 ));
      end if;
      if not gse.Is_Null( cursor, 5572 )then
         a_frs1516.mortlef3 := gse.Integer_Value( cursor, 5572 );
      end if;
      if not gse.Is_Null( cursor, 5573 )then
         a_frs1516.mortpro1 := gse.Integer_Value( cursor, 5573 );
      end if;
      if not gse.Is_Null( cursor, 5574 )then
         a_frs1516.mortpro2 := gse.Integer_Value( cursor, 5574 );
      end if;
      if not gse.Is_Null( cursor, 5575 )then
         a_frs1516.mortpro3 := gse.Integer_Value( cursor, 5575 );
      end if;
      if not gse.Is_Null( cursor, 5576 )then
         a_frs1516.morttyp1 := gse.Integer_Value( cursor, 5576 );
      end if;
      if not gse.Is_Null( cursor, 5577 )then
         a_frs1516.morttyp2 := gse.Integer_Value( cursor, 5577 );
      end if;
      if not gse.Is_Null( cursor, 5578 )then
         a_frs1516.morttyp3 := gse.Integer_Value( cursor, 5578 );
      end if;
      if not gse.Is_Null( cursor, 5579 )then
         a_frs1516.morupd1 := gse.Integer_Value( cursor, 5579 );
      end if;
      if not gse.Is_Null( cursor, 5580 )then
         a_frs1516.morupd2 := gse.Integer_Value( cursor, 5580 );
      end if;
      if not gse.Is_Null( cursor, 5581 )then
         a_frs1516.morupd3 := gse.Integer_Value( cursor, 5581 );
      end if;
      if not gse.Is_Null( cursor, 5582 )then
         a_frs1516.morus1:= Amount'Value( gse.Value( cursor, 5582 ));
      end if;
      if not gse.Is_Null( cursor, 5583 )then
         a_frs1516.morus2 := gse.Integer_Value( cursor, 5583 );
      end if;
      if not gse.Is_Null( cursor, 5584 )then
         a_frs1516.morus3 := gse.Integer_Value( cursor, 5584 );
      end if;
      if not gse.Is_Null( cursor, 5585 )then
         a_frs1516.mpcove11 := gse.Integer_Value( cursor, 5585 );
      end if;
      if not gse.Is_Null( cursor, 5586 )then
         a_frs1516.mpcove12 := gse.Integer_Value( cursor, 5586 );
      end if;
      if not gse.Is_Null( cursor, 5587 )then
         a_frs1516.mpcove13 := gse.Integer_Value( cursor, 5587 );
      end if;
      if not gse.Is_Null( cursor, 5588 )then
         a_frs1516.mpcove21 := gse.Integer_Value( cursor, 5588 );
      end if;
      if not gse.Is_Null( cursor, 5589 )then
         a_frs1516.mpcove22 := gse.Integer_Value( cursor, 5589 );
      end if;
      if not gse.Is_Null( cursor, 5590 )then
         a_frs1516.mpcove23 := gse.Integer_Value( cursor, 5590 );
      end if;
      if not gse.Is_Null( cursor, 5591 )then
         a_frs1516.mpcove31 := gse.Integer_Value( cursor, 5591 );
      end if;
      if not gse.Is_Null( cursor, 5592 )then
         a_frs1516.mpcove32 := gse.Integer_Value( cursor, 5592 );
      end if;
      if not gse.Is_Null( cursor, 5593 )then
         a_frs1516.mpcove33 := gse.Integer_Value( cursor, 5593 );
      end if;
      if not gse.Is_Null( cursor, 5594 )then
         a_frs1516.outsmor1 := gse.Integer_Value( cursor, 5594 );
      end if;
      if not gse.Is_Null( cursor, 5595 )then
         a_frs1516.outsmor2 := gse.Integer_Value( cursor, 5595 );
      end if;
      if not gse.Is_Null( cursor, 5596 )then
         a_frs1516.outsmor3 := gse.Integer_Value( cursor, 5596 );
      end if;
      if not gse.Is_Null( cursor, 5597 )then
         a_frs1516.rmamt1:= Amount'Value( gse.Value( cursor, 5597 ));
      end if;
      if not gse.Is_Null( cursor, 5598 )then
         a_frs1516.rmamt2 := gse.Integer_Value( cursor, 5598 );
      end if;
      if not gse.Is_Null( cursor, 5599 )then
         a_frs1516.rmamt3 := gse.Integer_Value( cursor, 5599 );
      end if;
      if not gse.Is_Null( cursor, 5600 )then
         a_frs1516.rmort1 := gse.Integer_Value( cursor, 5600 );
      end if;
      if not gse.Is_Null( cursor, 5601 )then
         a_frs1516.rmort2 := gse.Integer_Value( cursor, 5601 );
      end if;
      if not gse.Is_Null( cursor, 5602 )then
         a_frs1516.rmort3 := gse.Integer_Value( cursor, 5602 );
      end if;
      if not gse.Is_Null( cursor, 5603 )then
         a_frs1516.rmortyr1 := gse.Integer_Value( cursor, 5603 );
      end if;
      if not gse.Is_Null( cursor, 5604 )then
         a_frs1516.rmortyr2 := gse.Integer_Value( cursor, 5604 );
      end if;
      if not gse.Is_Null( cursor, 5605 )then
         a_frs1516.rmortyr3 := gse.Integer_Value( cursor, 5605 );
      end if;
      if not gse.Is_Null( cursor, 5606 )then
         a_frs1516.rmpur011 := gse.Integer_Value( cursor, 5606 );
      end if;
      if not gse.Is_Null( cursor, 5607 )then
         a_frs1516.rmpur012 := gse.Integer_Value( cursor, 5607 );
      end if;
      if not gse.Is_Null( cursor, 5608 )then
         a_frs1516.rmpur013 := gse.Integer_Value( cursor, 5608 );
      end if;
      if not gse.Is_Null( cursor, 5609 )then
         a_frs1516.rmpur021 := gse.Integer_Value( cursor, 5609 );
      end if;
      if not gse.Is_Null( cursor, 5610 )then
         a_frs1516.rmpur022 := gse.Integer_Value( cursor, 5610 );
      end if;
      if not gse.Is_Null( cursor, 5611 )then
         a_frs1516.rmpur023 := gse.Integer_Value( cursor, 5611 );
      end if;
      if not gse.Is_Null( cursor, 5612 )then
         a_frs1516.rmpur031 := gse.Integer_Value( cursor, 5612 );
      end if;
      if not gse.Is_Null( cursor, 5613 )then
         a_frs1516.rmpur032 := gse.Integer_Value( cursor, 5613 );
      end if;
      if not gse.Is_Null( cursor, 5614 )then
         a_frs1516.rmpur033 := gse.Integer_Value( cursor, 5614 );
      end if;
      if not gse.Is_Null( cursor, 5615 )then
         a_frs1516.rmpur041 := gse.Integer_Value( cursor, 5615 );
      end if;
      if not gse.Is_Null( cursor, 5616 )then
         a_frs1516.rmpur042 := gse.Integer_Value( cursor, 5616 );
      end if;
      if not gse.Is_Null( cursor, 5617 )then
         a_frs1516.rmpur043 := gse.Integer_Value( cursor, 5617 );
      end if;
      if not gse.Is_Null( cursor, 5618 )then
         a_frs1516.rmpur051 := gse.Integer_Value( cursor, 5618 );
      end if;
      if not gse.Is_Null( cursor, 5619 )then
         a_frs1516.rmpur052 := gse.Integer_Value( cursor, 5619 );
      end if;
      if not gse.Is_Null( cursor, 5620 )then
         a_frs1516.rmpur053 := gse.Integer_Value( cursor, 5620 );
      end if;
      if not gse.Is_Null( cursor, 5621 )then
         a_frs1516.rmpur061 := gse.Integer_Value( cursor, 5621 );
      end if;
      if not gse.Is_Null( cursor, 5622 )then
         a_frs1516.rmpur062 := gse.Integer_Value( cursor, 5622 );
      end if;
      if not gse.Is_Null( cursor, 5623 )then
         a_frs1516.rmpur063 := gse.Integer_Value( cursor, 5623 );
      end if;
      if not gse.Is_Null( cursor, 5624 )then
         a_frs1516.rmpur071 := gse.Integer_Value( cursor, 5624 );
      end if;
      if not gse.Is_Null( cursor, 5625 )then
         a_frs1516.rmpur072 := gse.Integer_Value( cursor, 5625 );
      end if;
      if not gse.Is_Null( cursor, 5626 )then
         a_frs1516.rmpur073 := gse.Integer_Value( cursor, 5626 );
      end if;
      if not gse.Is_Null( cursor, 5627 )then
         a_frs1516.rmpur081 := gse.Integer_Value( cursor, 5627 );
      end if;
      if not gse.Is_Null( cursor, 5628 )then
         a_frs1516.rmpur082 := gse.Integer_Value( cursor, 5628 );
      end if;
      if not gse.Is_Null( cursor, 5629 )then
         a_frs1516.rmpur083 := gse.Integer_Value( cursor, 5629 );
      end if;
      if not gse.Is_Null( cursor, 5630 )then
         a_frs1516.buyyear := gse.Integer_Value( cursor, 5630 );
      end if;
      if not gse.Is_Null( cursor, 5631 )then
         a_frs1516.purcamt:= Amount'Value( gse.Value( cursor, 5631 ));
      end if;
      if not gse.Is_Null( cursor, 5632 )then
         a_frs1516.purcloan := gse.Integer_Value( cursor, 5632 );
      end if;
      if not gse.Is_Null( cursor, 5633 )then
         a_frs1516.secmpur3 := gse.Integer_Value( cursor, 5633 );
      end if;
      if not gse.Is_Null( cursor, 5634 )then
         a_frs1516.secmpur4 := gse.Integer_Value( cursor, 5634 );
      end if;
      if not gse.Is_Null( cursor, 5635 )then
         a_frs1516.secmpur1 := gse.Integer_Value( cursor, 5635 );
      end if;
      if not gse.Is_Null( cursor, 5636 )then
         a_frs1516.secmpur5 := gse.Integer_Value( cursor, 5636 );
      end if;
      if not gse.Is_Null( cursor, 5637 )then
         a_frs1516.secmpur6 := gse.Integer_Value( cursor, 5637 );
      end if;
      if not gse.Is_Null( cursor, 5638 )then
         a_frs1516.secmpur2 := gse.Integer_Value( cursor, 5638 );
      end if;
      if not gse.Is_Null( cursor, 5639 )then
         a_frs1516.secmpur7 := gse.Integer_Value( cursor, 5639 );
      end if;
      if not gse.Is_Null( cursor, 5640 )then
         a_frs1516.rexhham1:= Amount'Value( gse.Value( cursor, 5640 ));
      end if;
      if not gse.Is_Null( cursor, 5641 )then
         a_frs1516.accchk1 := gse.Integer_Value( cursor, 5641 );
      end if;
      if not gse.Is_Null( cursor, 5642 )then
         a_frs1516.rexhhwh1 := gse.Integer_Value( cursor, 5642 );
      end if;
      if not gse.Is_Null( cursor, 5643 )then
         a_frs1516.prexhha1 := gse.Integer_Value( cursor, 5643 );
      end if;
      if not gse.Is_Null( cursor, 5644 )then
         a_frs1516.accjbp10 := gse.Integer_Value( cursor, 5644 );
      end if;
      if not gse.Is_Null( cursor, 5645 )then
         a_frs1516.accjbp11 := gse.Integer_Value( cursor, 5645 );
      end if;
      if not gse.Is_Null( cursor, 5646 )then
         a_frs1516.accjbp12 := gse.Integer_Value( cursor, 5646 );
      end if;
      if not gse.Is_Null( cursor, 5647 )then
         a_frs1516.accjbp13 := gse.Integer_Value( cursor, 5647 );
      end if;
      if not gse.Is_Null( cursor, 5648 )then
         a_frs1516.accjbp14 := gse.Integer_Value( cursor, 5648 );
      end if;
      if not gse.Is_Null( cursor, 5649 )then
         a_frs1516.accjob := gse.Integer_Value( cursor, 5649 );
      end if;
      if not gse.Is_Null( cursor, 5650 )then
         a_frs1516.ctract := gse.Integer_Value( cursor, 5650 );
      end if;
      if not gse.Is_Null( cursor, 5651 )then
         a_frs1516.eligamt:= Amount'Value( gse.Value( cursor, 5651 ));
      end if;
      if not gse.Is_Null( cursor, 5652 )then
         a_frs1516.eligpd := gse.Integer_Value( cursor, 5652 );
      end if;
      if not gse.Is_Null( cursor, 5653 )then
         a_frs1516.fairrent := gse.Integer_Value( cursor, 5653 );
      end if;
      if not gse.Is_Null( cursor, 5654 )then
         a_frs1516.furnish := gse.Integer_Value( cursor, 5654 );
      end if;
      if not gse.Is_Null( cursor, 5655 )then
         a_frs1516.hbenamt:= Amount'Value( gse.Value( cursor, 5655 ));
      end if;
      if not gse.Is_Null( cursor, 5656 )then
         a_frs1516.hbenchk := gse.Integer_Value( cursor, 5656 );
      end if;
      if not gse.Is_Null( cursor, 5657 )then
         a_frs1516.hbenefit := gse.Integer_Value( cursor, 5657 );
      end if;
      if not gse.Is_Null( cursor, 5658 )then
         a_frs1516.hbenpd := gse.Integer_Value( cursor, 5658 );
      end if;
      if not gse.Is_Null( cursor, 5659 )then
         a_frs1516.hbenwait := gse.Integer_Value( cursor, 5659 );
      end if;
      if not gse.Is_Null( cursor, 5660 )then
         a_frs1516.hbmnth := gse.Integer_Value( cursor, 5660 );
      end if;
      if not gse.Is_Null( cursor, 5661 )then
         a_frs1516.hbrecp := gse.Integer_Value( cursor, 5661 );
      end if;
      if not gse.Is_Null( cursor, 5662 )then
         a_frs1516.hbweeks := gse.Integer_Value( cursor, 5662 );
      end if;
      if not gse.Is_Null( cursor, 5663 )then
         a_frs1516.hbyear := gse.Integer_Value( cursor, 5663 );
      end if;
      if not gse.Is_Null( cursor, 5664 )then
         a_frs1516.hbyears := gse.Integer_Value( cursor, 5664 );
      end if;
      if not gse.Is_Null( cursor, 5665 )then
         a_frs1516.landlord := gse.Integer_Value( cursor, 5665 );
      end if;
      if not gse.Is_Null( cursor, 5666 )then
         a_frs1516.niystart := gse.Integer_Value( cursor, 5666 );
      end if;
      if not gse.Is_Null( cursor, 5667 )then
         a_frs1516.othtype := gse.Integer_Value( cursor, 5667 );
      end if;
      if not gse.Is_Null( cursor, 5668 )then
         a_frs1516.rebate := gse.Integer_Value( cursor, 5668 );
      end if;
      if not gse.Is_Null( cursor, 5669 )then
         a_frs1516.rent:= Amount'Value( gse.Value( cursor, 5669 ));
      end if;
      if not gse.Is_Null( cursor, 5670 )then
         a_frs1516.rentdoc := gse.Integer_Value( cursor, 5670 );
      end if;
      if not gse.Is_Null( cursor, 5671 )then
         a_frs1516.renthol := gse.Integer_Value( cursor, 5671 );
      end if;
      if not gse.Is_Null( cursor, 5672 )then
         a_frs1516.rentpd := gse.Integer_Value( cursor, 5672 );
      end if;
      if not gse.Is_Null( cursor, 5673 )then
         a_frs1516.rentpd1 := gse.Integer_Value( cursor, 5673 );
      end if;
      if not gse.Is_Null( cursor, 5674 )then
         a_frs1516.rentpd2 := gse.Integer_Value( cursor, 5674 );
      end if;
      if not gse.Is_Null( cursor, 5675 )then
         a_frs1516.resll := gse.Integer_Value( cursor, 5675 );
      end if;
      if not gse.Is_Null( cursor, 5676 )then
         a_frs1516.resll2 := gse.Integer_Value( cursor, 5676 );
      end if;
      if not gse.Is_Null( cursor, 5677 )then
         a_frs1516.serincam := gse.Integer_Value( cursor, 5677 );
      end if;
      if not gse.Is_Null( cursor, 5678 )then
         a_frs1516.tentype := gse.Integer_Value( cursor, 5678 );
      end if;
      if not gse.Is_Null( cursor, 5679 )then
         a_frs1516.weekhol := gse.Integer_Value( cursor, 5679 );
      end if;
      if not gse.Is_Null( cursor, 5680 )then
         a_frs1516.wsinc := gse.Integer_Value( cursor, 5680 );
      end if;
      if not gse.Is_Null( cursor, 5681 )then
         a_frs1516.wsincamt:= Amount'Value( gse.Value( cursor, 5681 ));
      end if;
      if not gse.Is_Null( cursor, 5682 )then
         a_frs1516.ystartr := gse.Integer_Value( cursor, 5682 );
      end if;
      if not gse.Is_Null( cursor, 5683 )then
         a_frs1516.accjbp1 := gse.Integer_Value( cursor, 5683 );
      end if;
      if not gse.Is_Null( cursor, 5684 )then
         a_frs1516.accjbp2 := gse.Integer_Value( cursor, 5684 );
      end if;
      if not gse.Is_Null( cursor, 5685 )then
         a_frs1516.accjbp3 := gse.Integer_Value( cursor, 5685 );
      end if;
      if not gse.Is_Null( cursor, 5686 )then
         a_frs1516.accjbp4 := gse.Integer_Value( cursor, 5686 );
      end if;
      if not gse.Is_Null( cursor, 5687 )then
         a_frs1516.accjbp5 := gse.Integer_Value( cursor, 5687 );
      end if;
      if not gse.Is_Null( cursor, 5688 )then
         a_frs1516.accjbp6 := gse.Integer_Value( cursor, 5688 );
      end if;
      if not gse.Is_Null( cursor, 5689 )then
         a_frs1516.accjbp7 := gse.Integer_Value( cursor, 5689 );
      end if;
      if not gse.Is_Null( cursor, 5690 )then
         a_frs1516.accjbp8 := gse.Integer_Value( cursor, 5690 );
      end if;
      if not gse.Is_Null( cursor, 5691 )then
         a_frs1516.accjbp9 := gse.Integer_Value( cursor, 5691 );
      end if;
      if not gse.Is_Null( cursor, 5692 )then
         a_frs1516.rexhh := gse.Integer_Value( cursor, 5692 );
      end if;
      if not gse.Is_Null( cursor, 5693 )then
         a_frs1516.rntfull:= Amount'Value( gse.Value( cursor, 5693 ));
      end if;
      if not gse.Is_Null( cursor, 5694 )then
         a_frs1516.lighting := gse.Integer_Value( cursor, 5694 );
      end if;
      if not gse.Is_Null( cursor, 5695 )then
         a_frs1516.heating := gse.Integer_Value( cursor, 5695 );
      end if;
      if not gse.Is_Null( cursor, 5696 )then
         a_frs1516.hotwater := gse.Integer_Value( cursor, 5696 );
      end if;
      if not gse.Is_Null( cursor, 5697 )then
         a_frs1516.fuelcook := gse.Integer_Value( cursor, 5697 );
      end if;
      if not gse.Is_Null( cursor, 5698 )then
         a_frs1516.tvlice := gse.Integer_Value( cursor, 5698 );
      end if;
      if not gse.Is_Null( cursor, 5699 )then
         a_frs1516.elec := gse.Integer_Value( cursor, 5699 );
      end if;
      if not gse.Is_Null( cursor, 5700 )then
         a_frs1516.gas := gse.Integer_Value( cursor, 5700 );
      end if;
      if not gse.Is_Null( cursor, 5701 )then
         a_frs1516.lsf := gse.Integer_Value( cursor, 5701 );
      end if;
      return a_frs1516;
   end Map_From_Cursor;

   function Retrieve( sqlstr : String; connection : Database_Connection := null ) return Ukds.Frs.Frs1516_List is
      l : Ukds.Frs.Frs1516_List;
      local_connection : Database_Connection;
      is_local_connection : Boolean;
      query : constant String := DB_Commons.Add_Schema_To_Query( SELECT_PART, SCHEMA_NAME ) 
         & " " & sqlstr;
      cursor   : gse.Forward_Cursor;
   begin
      if( connection = null )then
          local_connection := Connection_Pool.Lease;
          is_local_connection := True;
      else
          local_connection := connection;          
          is_local_connection := False;
      end if;
      Log( "retrieve made this as query " & query );
      cursor.Fetch( local_connection, query );
      Check_Result( local_connection );
      while gse.Has_Row( cursor ) loop
         declare
            a_frs1516 : Ukds.Frs.Frs1516 := Map_From_Cursor( cursor );
         begin
            l.append( a_frs1516 ); 
         end;
         gse.Next( cursor );
      end loop;
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
      return l;
   end Retrieve;

   
   --
   -- Update the given record 
   -- otherwise throws DB_Exception exception. 
   --

   UPDATE_PS : constant gse.Prepared_Statement := Get_Prepared_Update_Statement;
   
   procedure Update( a_frs1516 : Ukds.Frs.Frs1516; connection : Database_Connection := null ) is
      params              : gse.SQL_Parameters := Get_Configured_Insert_Params( Update_Order => True );
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
      aliased_ugrsp1hd : aliased String := To_String( a_frs1516.ugrsp1hd );
   begin
      if( connection = null )then
          local_connection := Connection_Pool.Lease;
          is_local_connection := True;
      else
          local_connection := connection;          
          is_local_connection := False;
      end if;

      params( 1 ) := "+"( Float( a_frs1516.int1hd ));
      params( 2 ) := "+"( Float( a_frs1516.int2hd ));
      params( 3 ) := "+"( Float( a_frs1516.int3hd ));
      params( 4 ) := "+"( Integer'Pos( a_frs1516.int4hd ));
      params( 5 ) := "+"( Float( a_frs1516.int5hd ));
      params( 6 ) := "+"( Float( a_frs1516.int6hd ));
      params( 7 ) := "+"( Float( a_frs1516.int7hd ));
      params( 8 ) := "+"( Float( a_frs1516.int8hd ));
      params( 9 ) := "+"( Integer'Pos( a_frs1516.int9hd ));
      params( 10 ) := "+"( Integer'Pos( a_frs1516.int10hd ));
      params( 11 ) := "+"( Integer'Pos( a_frs1516.int11hd ));
      params( 12 ) := "+"( Integer'Pos( a_frs1516.int12hd ));
      params( 13 ) := "+"( Integer'Pos( a_frs1516.int13hd ));
      params( 14 ) := "+"( Integer'Pos( a_frs1516.int14hd ));
      params( 15 ) := "+"( Integer'Pos( a_frs1516.int15hd ));
      params( 16 ) := "+"( Integer'Pos( a_frs1516.int16hd ));
      params( 17 ) := "+"( Integer'Pos( a_frs1516.int17hd ));
      params( 18 ) := "+"( Integer'Pos( a_frs1516.int18hd ));
      params( 19 ) := "+"( Integer'Pos( a_frs1516.int19hd ));
      params( 20 ) := "+"( Float( a_frs1516.int21hd ));
      params( 21 ) := "+"( Integer'Pos( a_frs1516.int22hd ));
      params( 22 ) := "+"( Integer'Pos( a_frs1516.int23hd ));
      params( 23 ) := "+"( Float( a_frs1516.int24hd ));
      params( 24 ) := "+"( Integer'Pos( a_frs1516.int25hd ));
      params( 25 ) := "+"( Integer'Pos( a_frs1516.int26hd ));
      params( 26 ) := "+"( Float( a_frs1516.int27hd ));
      params( 27 ) := "+"( Float( a_frs1516.int28hd ));
      params( 28 ) := "+"( Integer'Pos( a_frs1516.int29hd ));
      params( 29 ) := "+"( Integer'Pos( a_frs1516.int30hd ));
      params( 30 ) := "+"( Float( a_frs1516.int1sp ));
      params( 31 ) := "+"( Float( a_frs1516.int2sp ));
      params( 32 ) := "+"( Float( a_frs1516.int3sp ));
      params( 33 ) := "+"( Integer'Pos( a_frs1516.int4sp ));
      params( 34 ) := "+"( Float( a_frs1516.int5sp ));
      params( 35 ) := "+"( Float( a_frs1516.int6sp ));
      params( 36 ) := "+"( Float( a_frs1516.int7sp ));
      params( 37 ) := "+"( Float( a_frs1516.int8sp ));
      params( 38 ) := "+"( Integer'Pos( a_frs1516.int9sp ));
      params( 39 ) := "+"( Integer'Pos( a_frs1516.int10sp ));
      params( 40 ) := "+"( Integer'Pos( a_frs1516.int11sp ));
      params( 41 ) := "+"( Integer'Pos( a_frs1516.int12sp ));
      params( 42 ) := "+"( Integer'Pos( a_frs1516.int13sp ));
      params( 43 ) := "+"( Integer'Pos( a_frs1516.int14sp ));
      params( 44 ) := "+"( Integer'Pos( a_frs1516.int15sp ));
      params( 45 ) := "+"( Integer'Pos( a_frs1516.int16sp ));
      params( 46 ) := "+"( Integer'Pos( a_frs1516.int17sp ));
      params( 47 ) := "+"( Integer'Pos( a_frs1516.int18sp ));
      params( 48 ) := "+"( Integer'Pos( a_frs1516.int19sp ));
      params( 49 ) := "+"( Float( a_frs1516.int21sp ));
      params( 50 ) := "+"( Integer'Pos( a_frs1516.int22sp ));
      params( 51 ) := "+"( Integer'Pos( a_frs1516.int23sp ));
      params( 52 ) := "+"( Float( a_frs1516.int24sp ));
      params( 53 ) := "+"( Integer'Pos( a_frs1516.int25sp ));
      params( 54 ) := "+"( Integer'Pos( a_frs1516.int26sp ));
      params( 55 ) := "+"( Float( a_frs1516.int27sp ));
      params( 56 ) := "+"( Float( a_frs1516.int28sp ));
      params( 57 ) := "+"( Integer'Pos( a_frs1516.int29sp ));
      params( 58 ) := "+"( Integer'Pos( a_frs1516.int30sp ));
      params( 59 ) := "+"( Integer'Pos( a_frs1516.intx1hd ));
      params( 60 ) := "+"( Integer'Pos( a_frs1516.intx2hd ));
      params( 61 ) := "+"( Integer'Pos( a_frs1516.intx3hd ));
      params( 62 ) := "+"( Integer'Pos( a_frs1516.intx4hd ));
      params( 63 ) := "+"( Integer'Pos( a_frs1516.intx5hd ));
      params( 64 ) := "+"( Integer'Pos( a_frs1516.intx6hd ));
      params( 65 ) := "+"( Integer'Pos( a_frs1516.intx7hd ));
      params( 66 ) := "+"( Integer'Pos( a_frs1516.intx8hd ));
      params( 67 ) := "+"( Integer'Pos( a_frs1516.intx9hd ));
      params( 68 ) := "+"( Integer'Pos( a_frs1516.intx10hd ));
      params( 69 ) := "+"( Integer'Pos( a_frs1516.intx11hd ));
      params( 70 ) := "+"( Integer'Pos( a_frs1516.intx12hd ));
      params( 71 ) := "+"( Integer'Pos( a_frs1516.intx13hd ));
      params( 72 ) := "+"( Integer'Pos( a_frs1516.intx14hd ));
      params( 73 ) := "+"( Integer'Pos( a_frs1516.intx15hd ));
      params( 74 ) := "+"( Integer'Pos( a_frs1516.intx16hd ));
      params( 75 ) := "+"( Integer'Pos( a_frs1516.intx17hd ));
      params( 76 ) := "+"( Integer'Pos( a_frs1516.intx18hd ));
      params( 77 ) := "+"( Integer'Pos( a_frs1516.intx19hd ));
      params( 78 ) := "+"( Integer'Pos( a_frs1516.intx21hd ));
      params( 79 ) := "+"( Integer'Pos( a_frs1516.intx22hd ));
      params( 80 ) := "+"( Integer'Pos( a_frs1516.intx23hd ));
      params( 81 ) := "+"( Integer'Pos( a_frs1516.intx24hd ));
      params( 82 ) := "+"( Integer'Pos( a_frs1516.intx25hd ));
      params( 83 ) := "+"( Integer'Pos( a_frs1516.intx26hd ));
      params( 84 ) := "+"( Integer'Pos( a_frs1516.intx27hd ));
      params( 85 ) := "+"( Integer'Pos( a_frs1516.intx28hd ));
      params( 86 ) := "+"( Integer'Pos( a_frs1516.intx29hd ));
      params( 87 ) := "+"( Integer'Pos( a_frs1516.intx30hd ));
      params( 88 ) := "+"( Integer'Pos( a_frs1516.intx1sp ));
      params( 89 ) := "+"( Integer'Pos( a_frs1516.intx2sp ));
      params( 90 ) := "+"( Integer'Pos( a_frs1516.intx3sp ));
      params( 91 ) := "+"( Integer'Pos( a_frs1516.intx4sp ));
      params( 92 ) := "+"( Integer'Pos( a_frs1516.intx5sp ));
      params( 93 ) := "+"( Integer'Pos( a_frs1516.intx6sp ));
      params( 94 ) := "+"( Integer'Pos( a_frs1516.intx7sp ));
      params( 95 ) := "+"( Integer'Pos( a_frs1516.intx8sp ));
      params( 96 ) := "+"( Integer'Pos( a_frs1516.intx9sp ));
      params( 97 ) := "+"( Integer'Pos( a_frs1516.intx10sp ));
      params( 98 ) := "+"( Integer'Pos( a_frs1516.intx11sp ));
      params( 99 ) := "+"( Integer'Pos( a_frs1516.intx12sp ));
      params( 100 ) := "+"( Integer'Pos( a_frs1516.intx13sp ));
      params( 101 ) := "+"( Integer'Pos( a_frs1516.intx14sp ));
      params( 102 ) := "+"( Integer'Pos( a_frs1516.intx15sp ));
      params( 103 ) := "+"( Integer'Pos( a_frs1516.intx16sp ));
      params( 104 ) := "+"( Integer'Pos( a_frs1516.intx17sp ));
      params( 105 ) := "+"( Integer'Pos( a_frs1516.intx18sp ));
      params( 106 ) := "+"( Integer'Pos( a_frs1516.intx19sp ));
      params( 107 ) := "+"( Integer'Pos( a_frs1516.intx21sp ));
      params( 108 ) := "+"( Integer'Pos( a_frs1516.intx22sp ));
      params( 109 ) := "+"( Integer'Pos( a_frs1516.intx23sp ));
      params( 110 ) := "+"( Integer'Pos( a_frs1516.intx24sp ));
      params( 111 ) := "+"( Integer'Pos( a_frs1516.intx25sp ));
      params( 112 ) := "+"( Integer'Pos( a_frs1516.intx26sp ));
      params( 113 ) := "+"( Integer'Pos( a_frs1516.intx27sp ));
      params( 114 ) := "+"( Integer'Pos( a_frs1516.intx28sp ));
      params( 115 ) := "+"( Integer'Pos( a_frs1516.intx29sp ));
      params( 116 ) := "+"( Integer'Pos( a_frs1516.intx30sp ));
      params( 117 ) := "+"( Integer'Pos( a_frs1516.invt1hd ));
      params( 118 ) := "+"( Integer'Pos( a_frs1516.invt2hd ));
      params( 119 ) := "+"( Integer'Pos( a_frs1516.invt3hd ));
      params( 120 ) := "+"( Integer'Pos( a_frs1516.invt4hd ));
      params( 121 ) := "+"( Integer'Pos( a_frs1516.invt5hd ));
      params( 122 ) := "+"( Integer'Pos( a_frs1516.invt6hd ));
      params( 123 ) := "+"( Integer'Pos( a_frs1516.invt7hd ));
      params( 124 ) := "+"( Integer'Pos( a_frs1516.invt8hd ));
      params( 125 ) := "+"( Integer'Pos( a_frs1516.invt9hd ));
      params( 126 ) := "+"( Integer'Pos( a_frs1516.invt10hd ));
      params( 127 ) := "+"( Integer'Pos( a_frs1516.invt11hd ));
      params( 128 ) := "+"( Integer'Pos( a_frs1516.invt12hd ));
      params( 129 ) := "+"( Integer'Pos( a_frs1516.invt13hd ));
      params( 130 ) := "+"( Integer'Pos( a_frs1516.invt14hd ));
      params( 131 ) := "+"( Integer'Pos( a_frs1516.invt15hd ));
      params( 132 ) := "+"( Integer'Pos( a_frs1516.invt16hd ));
      params( 133 ) := "+"( Integer'Pos( a_frs1516.invt17hd ));
      params( 134 ) := "+"( Integer'Pos( a_frs1516.invt18hd ));
      params( 135 ) := "+"( Integer'Pos( a_frs1516.invt19hd ));
      params( 136 ) := "+"( Integer'Pos( a_frs1516.invt21hd ));
      params( 137 ) := "+"( Integer'Pos( a_frs1516.invt22hd ));
      params( 138 ) := "+"( Integer'Pos( a_frs1516.invt23hd ));
      params( 139 ) := "+"( Integer'Pos( a_frs1516.invt24hd ));
      params( 140 ) := "+"( Integer'Pos( a_frs1516.invt25hd ));
      params( 141 ) := "+"( Integer'Pos( a_frs1516.invt26hd ));
      params( 142 ) := "+"( Integer'Pos( a_frs1516.invt27hd ));
      params( 143 ) := "+"( Integer'Pos( a_frs1516.invt28hd ));
      params( 144 ) := "+"( Integer'Pos( a_frs1516.invt29hd ));
      params( 145 ) := "+"( Integer'Pos( a_frs1516.invt30hd ));
      params( 146 ) := "+"( Integer'Pos( a_frs1516.invt1sp ));
      params( 147 ) := "+"( Integer'Pos( a_frs1516.invt2sp ));
      params( 148 ) := "+"( Integer'Pos( a_frs1516.invt3sp ));
      params( 149 ) := "+"( Integer'Pos( a_frs1516.invt4sp ));
      params( 150 ) := "+"( Integer'Pos( a_frs1516.invt5sp ));
      params( 151 ) := "+"( Integer'Pos( a_frs1516.invt6sp ));
      params( 152 ) := "+"( Integer'Pos( a_frs1516.invt7sp ));
      params( 153 ) := "+"( Integer'Pos( a_frs1516.invt8sp ));
      params( 154 ) := "+"( Integer'Pos( a_frs1516.invt9sp ));
      params( 155 ) := "+"( Integer'Pos( a_frs1516.invt10sp ));
      params( 156 ) := "+"( Integer'Pos( a_frs1516.invt11sp ));
      params( 157 ) := "+"( Integer'Pos( a_frs1516.invt12sp ));
      params( 158 ) := "+"( Integer'Pos( a_frs1516.invt13sp ));
      params( 159 ) := "+"( Integer'Pos( a_frs1516.invt14sp ));
      params( 160 ) := "+"( Integer'Pos( a_frs1516.invt15sp ));
      params( 161 ) := "+"( Integer'Pos( a_frs1516.invt16sp ));
      params( 162 ) := "+"( Integer'Pos( a_frs1516.invt17sp ));
      params( 163 ) := "+"( Integer'Pos( a_frs1516.invt18sp ));
      params( 164 ) := "+"( Integer'Pos( a_frs1516.invt19sp ));
      params( 165 ) := "+"( Integer'Pos( a_frs1516.invt21sp ));
      params( 166 ) := "+"( Integer'Pos( a_frs1516.invt22sp ));
      params( 167 ) := "+"( Integer'Pos( a_frs1516.invt23sp ));
      params( 168 ) := "+"( Integer'Pos( a_frs1516.invt24sp ));
      params( 169 ) := "+"( Integer'Pos( a_frs1516.invt25sp ));
      params( 170 ) := "+"( Integer'Pos( a_frs1516.invt26sp ));
      params( 171 ) := "+"( Integer'Pos( a_frs1516.invt27sp ));
      params( 172 ) := "+"( Integer'Pos( a_frs1516.invt28sp ));
      params( 173 ) := "+"( Integer'Pos( a_frs1516.invt29sp ));
      params( 174 ) := "+"( Integer'Pos( a_frs1516.invt30sp ));
      params( 175 ) := "+"( Integer'Pos( a_frs1516.nsa1hd ));
      params( 176 ) := "+"( Integer'Pos( a_frs1516.nsa2hd ));
      params( 177 ) := "+"( Integer'Pos( a_frs1516.nsa3hd ));
      params( 178 ) := "+"( Integer'Pos( a_frs1516.nsa4hd ));
      params( 179 ) := "+"( Integer'Pos( a_frs1516.nsa5hd ));
      params( 180 ) := "+"( Integer'Pos( a_frs1516.nsa6hd ));
      params( 181 ) := "+"( Integer'Pos( a_frs1516.nsa7hd ));
      params( 182 ) := "+"( Integer'Pos( a_frs1516.nsa8hd ));
      params( 183 ) := "+"( Integer'Pos( a_frs1516.nsa9hd ));
      params( 184 ) := "+"( Integer'Pos( a_frs1516.nsa10hd ));
      params( 185 ) := "+"( Integer'Pos( a_frs1516.nsa11hd ));
      params( 186 ) := "+"( Integer'Pos( a_frs1516.nsa12hd ));
      params( 187 ) := "+"( Integer'Pos( a_frs1516.nsa13hd ));
      params( 188 ) := "+"( Integer'Pos( a_frs1516.nsa14hd ));
      params( 189 ) := "+"( Integer'Pos( a_frs1516.nsa15hd ));
      params( 190 ) := "+"( Integer'Pos( a_frs1516.nsa16hd ));
      params( 191 ) := "+"( Integer'Pos( a_frs1516.nsa17hd ));
      params( 192 ) := "+"( Integer'Pos( a_frs1516.nsa18hd ));
      params( 193 ) := "+"( Integer'Pos( a_frs1516.nsa19hd ));
      params( 194 ) := "+"( Integer'Pos( a_frs1516.nsa21hd ));
      params( 195 ) := "+"( Integer'Pos( a_frs1516.nsa22hd ));
      params( 196 ) := "+"( Integer'Pos( a_frs1516.nsa23hd ));
      params( 197 ) := "+"( Integer'Pos( a_frs1516.nsa24hd ));
      params( 198 ) := "+"( Integer'Pos( a_frs1516.nsa25hd ));
      params( 199 ) := "+"( Integer'Pos( a_frs1516.nsa26hd ));
      params( 200 ) := "+"( Integer'Pos( a_frs1516.nsa27hd ));
      params( 201 ) := "+"( Integer'Pos( a_frs1516.nsa28hd ));
      params( 202 ) := "+"( Integer'Pos( a_frs1516.nsa29hd ));
      params( 203 ) := "+"( Integer'Pos( a_frs1516.nsa30hd ));
      params( 204 ) := "+"( Integer'Pos( a_frs1516.nsa1sp ));
      params( 205 ) := "+"( Integer'Pos( a_frs1516.nsa2sp ));
      params( 206 ) := "+"( Integer'Pos( a_frs1516.nsa3sp ));
      params( 207 ) := "+"( Integer'Pos( a_frs1516.nsa4sp ));
      params( 208 ) := "+"( Integer'Pos( a_frs1516.nsa5sp ));
      params( 209 ) := "+"( Integer'Pos( a_frs1516.nsa6sp ));
      params( 210 ) := "+"( Integer'Pos( a_frs1516.nsa7sp ));
      params( 211 ) := "+"( Integer'Pos( a_frs1516.nsa8sp ));
      params( 212 ) := "+"( Integer'Pos( a_frs1516.nsa9sp ));
      params( 213 ) := "+"( Integer'Pos( a_frs1516.nsa10sp ));
      params( 214 ) := "+"( Integer'Pos( a_frs1516.nsa11sp ));
      params( 215 ) := "+"( Integer'Pos( a_frs1516.nsa12sp ));
      params( 216 ) := "+"( Integer'Pos( a_frs1516.nsa13sp ));
      params( 217 ) := "+"( Integer'Pos( a_frs1516.nsa14sp ));
      params( 218 ) := "+"( Integer'Pos( a_frs1516.nsa15sp ));
      params( 219 ) := "+"( Integer'Pos( a_frs1516.nsa16sp ));
      params( 220 ) := "+"( Integer'Pos( a_frs1516.nsa17sp ));
      params( 221 ) := "+"( Integer'Pos( a_frs1516.nsa18sp ));
      params( 222 ) := "+"( Integer'Pos( a_frs1516.nsa19sp ));
      params( 223 ) := "+"( Integer'Pos( a_frs1516.nsa21sp ));
      params( 224 ) := "+"( Integer'Pos( a_frs1516.nsa22sp ));
      params( 225 ) := "+"( Integer'Pos( a_frs1516.nsa23sp ));
      params( 226 ) := "+"( Integer'Pos( a_frs1516.nsa24sp ));
      params( 227 ) := "+"( Integer'Pos( a_frs1516.nsa25sp ));
      params( 228 ) := "+"( Integer'Pos( a_frs1516.nsa26sp ));
      params( 229 ) := "+"( Integer'Pos( a_frs1516.nsa27sp ));
      params( 230 ) := "+"( Integer'Pos( a_frs1516.nsa28sp ));
      params( 231 ) := "+"( Integer'Pos( a_frs1516.nsa29sp ));
      params( 232 ) := "+"( Integer'Pos( a_frs1516.nsa30sp ));
      params( 233 ) := "+"( Integer'Pos( a_frs1516.ablehd ));
      params( 234 ) := "+"( Integer'Pos( a_frs1516.ablesp ));
      params( 235 ) := "+"( Integer'Pos( a_frs1516.abs1pdhd ));
      params( 236 ) := "+"( Integer'Pos( a_frs1516.abs1pdsp ));
      params( 237 ) := "+"( Integer'Pos( a_frs1516.absparhd ));
      params( 238 ) := "+"( Integer'Pos( a_frs1516.absparsp ));
      params( 239 ) := "+"( Integer'Pos( a_frs1516.abspayhd ));
      params( 240 ) := "+"( Integer'Pos( a_frs1516.abspaysp ));
      params( 241 ) := "+"( Integer'Pos( a_frs1516.abswhyhd ));
      params( 242 ) := "+"( Integer'Pos( a_frs1516.abswhysp ));
      params( 243 ) := "+"( Integer'Pos( a_frs1516.abswkhd ));
      params( 244 ) := "+"( Integer'Pos( a_frs1516.abswksp ));
      params( 245 ) := "+"( Integer'Pos( a_frs1516.acshd ));
      params( 246 ) := "+"( Integer'Pos( a_frs1516.acssp ));
      params( 247 ) := "+"( Integer'Pos( a_frs1516.acctqhd ));
      params( 248 ) := "+"( Integer'Pos( a_frs1516.acctqsp ));
      params( 249 ) := "+"( Float( a_frs1516.acsamthd ));
      params( 250 ) := "+"( Float( a_frs1516.acsamtsp ));
      params( 251 ) := "+"( Integer'Pos( a_frs1516.acspdhd ));
      params( 252 ) := "+"( Integer'Pos( a_frs1516.acspdsp ));
      params( 253 ) := "+"( Integer'Pos( a_frs1516.actacihd ));
      params( 254 ) := "+"( Integer'Pos( a_frs1516.actacisp ));
      params( 255 ) := "+"( Integer'Pos( a_frs1516.emahd ));
      params( 256 ) := "+"( Integer'Pos( a_frs1516.emasp ));
      params( 257 ) := "+"( Float( a_frs1516.emaamthd ));
      params( 258 ) := "+"( Integer'Pos( a_frs1516.emaamtsp ));
      params( 259 ) := "+"( Integer'Pos( a_frs1516.emapdhd ));
      params( 260 ) := "+"( Integer'Pos( a_frs1516.emapdsp ));
      params( 261 ) := "+"( Integer'Pos( a_frs1516.agehd ));
      params( 262 ) := "+"( Integer'Pos( a_frs1516.agesp ));
      params( 263 ) := "+"( Integer'Pos( a_frs1516.agehqhd ));
      params( 264 ) := "+"( Integer'Pos( a_frs1516.agehqsp ));
      params( 265 ) := "+"( Float( a_frs1516.aliamthd ));
      params( 266 ) := "+"( Float( a_frs1516.aliamtsp ));
      params( 267 ) := "+"( Integer'Pos( a_frs1516.alimnyhd ));
      params( 268 ) := "+"( Integer'Pos( a_frs1516.alimnysp ));
      params( 269 ) := "+"( Integer'Pos( a_frs1516.alipdhd ));
      params( 270 ) := "+"( Integer'Pos( a_frs1516.alipdsp ));
      params( 271 ) := "+"( Integer'Pos( a_frs1516.aliushd ));
      params( 272 ) := "+"( Integer'Pos( a_frs1516.aliussp ));
      params( 273 ) := "+"( Float( a_frs1516.absallhd ));
      params( 274 ) := "+"( Float( a_frs1516.absallsp ));
      params( 275 ) := "+"( Float( a_frs1516.organhd ));
      params( 276 ) := "+"( Float( a_frs1516.organsp ));
      params( 277 ) := "+"( Float( a_frs1516.fosterhd ));
      params( 278 ) := "+"( Float( a_frs1516.fostersp ));
      params( 279 ) := "+"( Float( a_frs1516.adopthd ));
      params( 280 ) := "+"( Float( a_frs1516.adoptsp ));
      params( 281 ) := "+"( Integer'Pos( a_frs1516.pasbalhd ));
      params( 282 ) := "+"( Integer'Pos( a_frs1516.pasbalsp ));
      params( 283 ) := "+"( Integer'Pos( a_frs1516.porganhd ));
      params( 284 ) := "+"( Integer'Pos( a_frs1516.porgansp ));
      params( 285 ) := "+"( Integer'Pos( a_frs1516.pfostehd ));
      params( 286 ) := "+"( Integer'Pos( a_frs1516.pfostesp ));
      params( 287 ) := "+"( Integer'Pos( a_frs1516.padopthd ));
      params( 288 ) := "+"( Integer'Pos( a_frs1516.padoptsp ));
      params( 289 ) := "+"( Integer'Pos( a_frs1516.aluamthd ));
      params( 290 ) := "+"( Integer'Pos( a_frs1516.aluamtsp ));
      params( 291 ) := "+"( Integer'Pos( a_frs1516.alupdhd ));
      params( 292 ) := "+"( Integer'Pos( a_frs1516.alupdsp ));
      params( 293 ) := "+"( Integer'Pos( a_frs1516.anyacchd ));
      params( 294 ) := "+"( Integer'Pos( a_frs1516.anyaccsp ));
      params( 295 ) := "+"( Integer'Pos( a_frs1516.anyedhd ));
      params( 296 ) := "+"( Integer'Pos( a_frs1516.anyedsp ));
      params( 297 ) := "+"( Integer'Pos( a_frs1516.anymonhd ));
      params( 298 ) := "+"( Integer'Pos( a_frs1516.anymonsp ));
      params( 299 ) := "+"( Integer'Pos( a_frs1516.anype1hd ));
      params( 300 ) := "+"( Integer'Pos( a_frs1516.anype1sp ));
      params( 301 ) := "+"( Integer'Pos( a_frs1516.anype2hd ));
      params( 302 ) := "+"( Integer'Pos( a_frs1516.anype2sp ));
      params( 303 ) := "+"( Integer'Pos( a_frs1516.anype3hd ));
      params( 304 ) := "+"( Integer'Pos( a_frs1516.anype3sp ));
      params( 305 ) := "+"( Integer'Pos( a_frs1516.anype4hd ));
      params( 306 ) := "+"( Integer'Pos( a_frs1516.anype4sp ));
      params( 307 ) := "+"( Integer'Pos( a_frs1516.anype5hd ));
      params( 308 ) := "+"( Integer'Pos( a_frs1516.anype5sp ));
      params( 309 ) := "+"( Integer'Pos( a_frs1516.anype6hd ));
      params( 310 ) := "+"( Integer'Pos( a_frs1516.anype6sp ));
      params( 311 ) := "+"( Integer'Pos( a_frs1516.anype7hd ));
      params( 312 ) := "+"( Integer'Pos( a_frs1516.anype7sp ));
      params( 313 ) := "+"( Float( a_frs1516.abspamhd ));
      params( 314 ) := "+"( Integer'Pos( a_frs1516.abspamsp ));
      params( 315 ) := "+"( Float( a_frs1516.abspexhd ));
      params( 316 ) := "+"( Integer'Pos( a_frs1516.abspexsp ));
      params( 317 ) := "+"( Integer'Pos( a_frs1516.apdpdhd ));
      params( 318 ) := "+"( Integer'Pos( a_frs1516.apdpdsp ));
      params( 319 ) := "+"( Integer'Pos( a_frs1516.pabspahd ));
      params( 320 ) := "+"( Integer'Pos( a_frs1516.pabspasp ));
      params( 321 ) := "+"( Integer'Pos( a_frs1516.basacthd ));
      params( 322 ) := "+"( Integer'Pos( a_frs1516.basactsp ));
      params( 323 ) := "+"( Integer'Pos( a_frs1516.bfdhd ));
      params( 324 ) := "+"( Integer'Pos( a_frs1516.bfdsp ));
      params( 325 ) := "+"( Float( a_frs1516.bfdamthd ));
      params( 326 ) := "+"( Float( a_frs1516.bfdamtsp ));
      params( 327 ) := "+"( Integer'Pos( a_frs1516.pbfdhd ));
      params( 328 ) := "+"( Integer'Pos( a_frs1516.pbfdsp ));
      params( 329 ) := "+"( Integer'Pos( a_frs1516.bfdvalhd ));
      params( 330 ) := "+"( Integer'Pos( a_frs1516.bfdvalsp ));
      params( 331 ) := "+"( Integer'Pos( a_frs1516.careabhd ));
      params( 332 ) := "+"( Integer'Pos( a_frs1516.careabsp ));
      params( 333 ) := "+"( Integer'Pos( a_frs1516.careahhd ));
      params( 334 ) := "+"( Integer'Pos( a_frs1516.careahsp ));
      params( 335 ) := "+"( Integer'Pos( a_frs1516.carecbhd ));
      params( 336 ) := "+"( Integer'Pos( a_frs1516.carecbsp ));
      params( 337 ) := "+"( Integer'Pos( a_frs1516.carechhd ));
      params( 338 ) := "+"( Integer'Pos( a_frs1516.carechsp ));
      params( 339 ) := "+"( Integer'Pos( a_frs1516.careclhd ));
      params( 340 ) := "+"( Integer'Pos( a_frs1516.careclsp ));
      params( 341 ) := "+"( Integer'Pos( a_frs1516.careflhd ));
      params( 342 ) := "+"( Integer'Pos( a_frs1516.careflsp ));
      params( 343 ) := "+"( Integer'Pos( a_frs1516.carefrhd ));
      params( 344 ) := "+"( Integer'Pos( a_frs1516.carefrsp ));
      params( 345 ) := "+"( Integer'Pos( a_frs1516.careothd ));
      params( 346 ) := "+"( Integer'Pos( a_frs1516.careotsp ));
      params( 347 ) := "+"( Integer'Pos( a_frs1516.carerhd ));
      params( 348 ) := "+"( Integer'Pos( a_frs1516.carersp ));
      params( 349 ) := "+"( Integer'Pos( a_frs1516.cbaamthd ));
      params( 350 ) := "+"( Integer'Pos( a_frs1516.cbaamtsp ));
      params( 351 ) := "+"( Integer'Pos( a_frs1516.cbchkhd ));
      params( 352 ) := "+"( Integer'Pos( a_frs1516.cbchksp ));
      params( 353 ) := "+"( Integer'Pos( a_frs1516.changehd ));
      params( 354 ) := "+"( Integer'Pos( a_frs1516.changesp ));
      params( 355 ) := "+"( Integer'Pos( a_frs1516.chbflghd ));
      params( 356 ) := "+"( Integer'Pos( a_frs1516.chbflgsp ));
      params( 357 ) := "+"( Integer'Pos( a_frs1516.chknophd ));
      params( 358 ) := "+"( Integer'Pos( a_frs1516.chknopsp ));
      params( 359 ) := "+"( Integer'Pos( a_frs1516.fpchd ));
      params( 360 ) := "+"( Integer'Pos( a_frs1516.fpcsp ));
      params( 361 ) := "+"( Integer'Pos( a_frs1516.fuchd ));
      params( 362 ) := "+"( Integer'Pos( a_frs1516.fucsp ));
      params( 363 ) := "+"( Integer'Pos( a_frs1516.fhbhd ));
      params( 364 ) := "+"( Integer'Pos( a_frs1516.fhbsp ));
      params( 365 ) := "+"( Integer'Pos( a_frs1516.fwtchd ));
      params( 366 ) := "+"( Integer'Pos( a_frs1516.fwtcsp ));
      params( 367 ) := "+"( Integer'Pos( a_frs1516.fctchd ));
      params( 368 ) := "+"( Integer'Pos( a_frs1516.fctcsp ));
      params( 369 ) := "+"( Integer'Pos( a_frs1516.fishd ));
      params( 370 ) := "+"( Integer'Pos( a_frs1516.fissp ));
      params( 371 ) := "+"( Integer'Pos( a_frs1516.fjsahd ));
      params( 372 ) := "+"( Integer'Pos( a_frs1516.fjsasp ));
      params( 373 ) := "+"( Integer'Pos( a_frs1516.fesahd ));
      params( 374 ) := "+"( Integer'Pos( a_frs1516.fesasp ));
      params( 375 ) := "+"( Integer'Pos( a_frs1516.claimahd ));
      params( 376 ) := "+"( Integer'Pos( a_frs1516.claimasp ));
      params( 377 ) := "+"( Integer'Pos( a_frs1516.cohabhd ));
      params( 378 ) := "+"( Integer'Pos( a_frs1516.cohabsp ));
      params( 379 ) := "+"( Integer'Pos( a_frs1516.condithd ));
      params( 380 ) := "+"( Integer'Pos( a_frs1516.conditsp ));
      params( 381 ) := "+"( Integer'Pos( a_frs1516.blodgehd ));
      params( 382 ) := "+"( Integer'Pos( a_frs1516.blodgesp ));
      params( 383 ) := "+"( Integer'Pos( a_frs1516.ctclm1hd ));
      params( 384 ) := "+"( Integer'Pos( a_frs1516.ctclm1sp ));
      params( 385 ) := "+"( Integer'Pos( a_frs1516.ctclm2hd ));
      params( 386 ) := "+"( Integer'Pos( a_frs1516.ctclm2sp ));
      params( 387 ) := "+"( Integer'Pos( a_frs1516.cupchkhd ));
      params( 388 ) := "+"( Integer'Pos( a_frs1516.cupchksp ));
      params( 389 ) := "+"( Integer'Pos( a_frs1516.curacthd ));
      params( 390 ) := "+"( Integer'Pos( a_frs1516.curactsp ));
      params( 391 ) := "+"( Integer'Pos( a_frs1516.curqulhd ));
      params( 392 ) := "+"( Integer'Pos( a_frs1516.curqulsp ));
      params( 393 ) := "+"( Integer'Pos( a_frs1516.blheadhd ));
      params( 394 ) := "+"( Integer'Pos( a_frs1516.blheadsp ));
      params( 395 ) := "+"( Float( a_frs1516.blrenthd ));
      params( 396 ) := "+"( Float( a_frs1516.blrentsp ));
      params( 397 ) := "+"( Integer'Pos( a_frs1516.pblrenhd ));
      params( 398 ) := "+"( Integer'Pos( a_frs1516.pblrensp ));
      params( 399 ) := "+"( Integer'Pos( a_frs1516.ddaprghd ));
      params( 400 ) := "+"( Integer'Pos( a_frs1516.ddaprgsp ));
      params( 401 ) := "+"( Integer'Pos( a_frs1516.ddatrehd ));
      params( 402 ) := "+"( Integer'Pos( a_frs1516.ddatresp ));
      params( 403 ) := "+"( Integer'Pos( a_frs1516.ddatrphd ));
      params( 404 ) := "+"( Integer'Pos( a_frs1516.ddatrpsp ));
      params( 405 ) := "+"( Integer'Pos( a_frs1516.defrpnhd ));
      params( 406 ) := "+"( Integer'Pos( a_frs1516.defrpnsp ));
      params( 407 ) := "+"( Integer'Pos( a_frs1516.dependhd ));
      params( 408 ) := "+"( Integer'Pos( a_frs1516.dependsp ));
      params( 409 ) := "+"( Integer'Pos( a_frs1516.disacahd ));
      params( 410 ) := "+"( Integer'Pos( a_frs1516.disacasp ));
      params( 411 ) := "+"( Integer'Pos( a_frs1516.qpiphd ));
      params( 412 ) := "+"( Integer'Pos( a_frs1516.qpipsp ));
      params( 413 ) := "+"( Integer'Pos( a_frs1516.qdlahd ));
      params( 414 ) := "+"( Integer'Pos( a_frs1516.qdlasp ));
      params( 415 ) := "+"( Integer'Pos( a_frs1516.qaahd ));
      params( 416 ) := "+"( Integer'Pos( a_frs1516.qaasp ));
      params( 417 ) := "+"( Integer'Pos( a_frs1516.qsdahd ));
      params( 418 ) := "+"( Integer'Pos( a_frs1516.qsdasp ));
      params( 419 ) := "+"( Integer'Pos( a_frs1516.qibhd ));
      params( 420 ) := "+"( Integer'Pos( a_frs1516.qibsp ));
      params( 421 ) := "+"( Integer'Pos( a_frs1516.qiidbhd ));
      params( 422 ) := "+"( Integer'Pos( a_frs1516.qiidbsp ));
      params( 423 ) := "+"( Integer'Pos( a_frs1516.discoahd ));
      params( 424 ) := "+"( Integer'Pos( a_frs1516.discoasp ));
      params( 425 ) := "+"( Integer'Pos( a_frs1516.disd01hd ));
      params( 426 ) := "+"( Integer'Pos( a_frs1516.disd01sp ));
      params( 427 ) := "+"( Integer'Pos( a_frs1516.disd02hd ));
      params( 428 ) := "+"( Integer'Pos( a_frs1516.disd02sp ));
      params( 429 ) := "+"( Integer'Pos( a_frs1516.disd03hd ));
      params( 430 ) := "+"( Integer'Pos( a_frs1516.disd03sp ));
      params( 431 ) := "+"( Integer'Pos( a_frs1516.disd04hd ));
      params( 432 ) := "+"( Integer'Pos( a_frs1516.disd04sp ));
      params( 433 ) := "+"( Integer'Pos( a_frs1516.disd05hd ));
      params( 434 ) := "+"( Integer'Pos( a_frs1516.disd05sp ));
      params( 435 ) := "+"( Integer'Pos( a_frs1516.disd06hd ));
      params( 436 ) := "+"( Integer'Pos( a_frs1516.disd06sp ));
      params( 437 ) := "+"( Integer'Pos( a_frs1516.disd07hd ));
      params( 438 ) := "+"( Integer'Pos( a_frs1516.disd07sp ));
      params( 439 ) := "+"( Integer'Pos( a_frs1516.disd08hd ));
      params( 440 ) := "+"( Integer'Pos( a_frs1516.disd08sp ));
      params( 441 ) := "+"( Integer'Pos( a_frs1516.disd09hd ));
      params( 442 ) := "+"( Integer'Pos( a_frs1516.disd09sp ));
      params( 443 ) := "+"( Integer'Pos( a_frs1516.disd10hd ));
      params( 444 ) := "+"( Integer'Pos( a_frs1516.disd10sp ));
      params( 445 ) := "+"( Integer'Pos( a_frs1516.disdifhd ));
      params( 446 ) := "+"( Integer'Pos( a_frs1516.disdifsp ));
      params( 447 ) := "+"( Integer'Pos( a_frs1516.dlachd ));
      params( 448 ) := "+"( Integer'Pos( a_frs1516.dlacsp ));
      params( 449 ) := "+"( Integer'Pos( a_frs1516.dlamhd ));
      params( 450 ) := "+"( Integer'Pos( a_frs1516.dlamsp ));
      params( 451 ) := "+"( Integer'Pos( a_frs1516.dlshd ));
      params( 452 ) := "+"( Integer'Pos( a_frs1516.dlssp ));
      params( 453 ) := "+"( Float( a_frs1516.dlsamthd ));
      params( 454 ) := "+"( Float( a_frs1516.dlsamtsp ));
      params( 455 ) := "+"( Integer'Pos( a_frs1516.pdlshd ));
      params( 456 ) := "+"( Integer'Pos( a_frs1516.pdlssp ));
      params( 457 ) := "+"( Integer'Pos( a_frs1516.dlsvalhd ));
      params( 458 ) := "+"( Integer'Pos( a_frs1516.dlsvalsp ));
      params( 459 ) := "+"( Integer'Pos( a_frs1516.dobhd ));
      params( 460 ) := "+"( Integer'Pos( a_frs1516.dobsp ));
      params( 461 ) := "+"( Integer'Pos( a_frs1516.h3qualhd ));
      params( 462 ) := "+"( Integer'Pos( a_frs1516.h3qualsp ));
      params( 463 ) := "+"( Integer'Pos( a_frs1516.dvil3ahd ));
      params( 464 ) := "+"( Integer'Pos( a_frs1516.dvil3asp ));
      params( 465 ) := "+"( Integer'Pos( a_frs1516.dvil4ahd ));
      params( 466 ) := "+"( Integer'Pos( a_frs1516.dvil4asp ));
      params( 467 ) := "+"( Integer'Pos( a_frs1516.dvjb12hd ));
      params( 468 ) := "+"( Integer'Pos( a_frs1516.dvjb12sp ));
      params( 469 ) := "+"( Integer'Pos( a_frs1516.dvmarhd ));
      params( 470 ) := "+"( Integer'Pos( a_frs1516.dvmarsp ));
      params( 471 ) := "+"( Integer'Pos( a_frs1516.edl1ahd ));
      params( 472 ) := "+"( Integer'Pos( a_frs1516.edl1asp ));
      params( 473 ) := "+"( Integer'Pos( a_frs1516.pedl1ahd ));
      params( 474 ) := "+"( Integer'Pos( a_frs1516.pedl1asp ));
      params( 475 ) := "+"( Integer'Pos( a_frs1516.edl1obhd ));
      params( 476 ) := "+"( Integer'Pos( a_frs1516.edl1obsp ));
      params( 477 ) := "+"( Integer'Pos( a_frs1516.edl2ahd ));
      params( 478 ) := "+"( Integer'Pos( a_frs1516.edl2asp ));
      params( 479 ) := "+"( Integer'Pos( a_frs1516.pedl2ahd ));
      params( 480 ) := "+"( Integer'Pos( a_frs1516.pedl2asp ));
      params( 481 ) := "+"( Integer'Pos( a_frs1516.edl2obhd ));
      params( 482 ) := "+"( Integer'Pos( a_frs1516.edl2obsp ));
      params( 483 ) := "+"( Integer'Pos( a_frs1516.edatthd ));
      params( 484 ) := "+"( Integer'Pos( a_frs1516.edattsp ));
      params( 485 ) := "+"( Integer'Pos( a_frs1516.edhrhd ));
      params( 486 ) := "+"( Integer'Pos( a_frs1516.edhrsp ));
      params( 487 ) := "+"( Integer'Pos( a_frs1516.edtyphd ));
      params( 488 ) := "+"( Integer'Pos( a_frs1516.edtypsp ));
      params( 489 ) := "+"( Integer'Pos( a_frs1516.empconhd ));
      params( 490 ) := "+"( Integer'Pos( a_frs1516.empconsp ));
      params( 491 ) := "+"( Float( a_frs1516.empocchd ));
      params( 492 ) := "+"( Float( a_frs1516.empoccsp ));
      params( 493 ) := "+"( Integer'Pos( a_frs1516.empshd ));
      params( 494 ) := "+"( Integer'Pos( a_frs1516.empssp ));
      params( 495 ) := "+"( Integer'Pos( a_frs1516.empbhd ));
      params( 496 ) := "+"( Integer'Pos( a_frs1516.empbsp ));
      params( 497 ) := "+"( Integer'Pos( a_frs1516.empchd ));
      params( 498 ) := "+"( Integer'Pos( a_frs1516.empcsp ));
      params( 499 ) := "+"( Integer'Pos( a_frs1516.empilohd ));
      params( 500 ) := "+"( Integer'Pos( a_frs1516.empilosp ));
      params( 501 ) := "+"( Integer'Pos( a_frs1516.es2000hd ));
      params( 502 ) := "+"( Integer'Pos( a_frs1516.es2000sp ));
      params( 503 ) := "+"( Integer'Pos( a_frs1516.ethgr3hd ));
      params( 504 ) := "+"( Integer'Pos( a_frs1516.ethgr3sp ));
      params( 505 ) := "+"( Integer'Pos( a_frs1516.ethgpshd ));
      params( 506 ) := "+"( Integer'Pos( a_frs1516.ethgpssp ));
      params( 507 ) := "+"( Integer'Pos( a_frs1516.etngrphd ));
      params( 508 ) := "+"( Integer'Pos( a_frs1516.etngrpsp ));
      params( 509 ) := "+"( Float( a_frs1516.eualamhd ));
      params( 510 ) := "+"( Float( a_frs1516.eualamsp ));
      params( 511 ) := "+"( Integer'Pos( a_frs1516.eualmnhd ));
      params( 512 ) := "+"( Integer'Pos( a_frs1516.eualmnsp ));
      params( 513 ) := "+"( Integer'Pos( a_frs1516.peualihd ));
      params( 514 ) := "+"( Integer'Pos( a_frs1516.peualisp ));
      params( 515 ) := "+"( Integer'Pos( a_frs1516.euetyphd ));
      params( 516 ) := "+"( Integer'Pos( a_frs1516.euetypsp ));
      params( 517 ) := "+"( Integer'Pos( a_frs1516.everwkhd ));
      params( 518 ) := "+"( Integer'Pos( a_frs1516.everwksp ));
      params( 519 ) := "+"( Integer'Pos( a_frs1516.ehbct1hd ));
      params( 520 ) := "+"( Integer'Pos( a_frs1516.ehbct1sp ));
      params( 521 ) := "+"( Integer'Pos( a_frs1516.fllwphd ));
      params( 522 ) := "+"( Integer'Pos( a_frs1516.fllwpsp ));
      params( 523 ) := "+"( Integer'Pos( a_frs1516.ftedhd ));
      params( 524 ) := "+"( Integer'Pos( a_frs1516.ftedsp ));
      params( 525 ) := "+"( Integer'Pos( a_frs1516.ftwkyrhd ));
      params( 526 ) := "+"( Integer'Pos( a_frs1516.ftwkyrsp ));
      params( 527 ) := "+"( Integer'Pos( a_frs1516.gebacthd ));
      params( 528 ) := "+"( Integer'Pos( a_frs1516.gebactsp ));
      params( 529 ) := "+"( Integer'Pos( a_frs1516.giltcthd ));
      params( 530 ) := "+"( Integer'Pos( a_frs1516.giltctsp ));
      params( 531 ) := "+"( Integer'Pos( a_frs1516.gpispchd ));
      params( 532 ) := "+"( Integer'Pos( a_frs1516.gpispcsp ));
      params( 533 ) := "+"( Integer'Pos( a_frs1516.gpjesahd ));
      params( 534 ) := "+"( Integer'Pos( a_frs1516.gpjesasp ));
      params( 535 ) := "+"( Integer'Pos( a_frs1516.gpuchd ));
      params( 536 ) := "+"( Integer'Pos( a_frs1516.gpucsp ));
      params( 537 ) := "+"( Integer'Pos( a_frs1516.granthd ));
      params( 538 ) := "+"( Integer'Pos( a_frs1516.grantsp ));
      params( 539 ) := "+"( Integer'Pos( a_frs1516.gt1valhd ));
      params( 540 ) := "+"( Float( a_frs1516.gt1valsp ));
      params( 541 ) := "+"( Integer'Pos( a_frs1516.gt2valhd ));
      params( 542 ) := "+"( Integer'Pos( a_frs1516.gt2valsp ));
      params( 543 ) := "+"( Integer'Pos( a_frs1516.gt1dirhd ));
      params( 544 ) := "+"( Float( a_frs1516.gt1dirsp ));
      params( 545 ) := "+"( Integer'Pos( a_frs1516.gt2dirhd ));
      params( 546 ) := "+"( Integer'Pos( a_frs1516.gt2dirsp ));
      params( 547 ) := "+"( Integer'Pos( a_frs1516.grtnumhd ));
      params( 548 ) := "+"( Integer'Pos( a_frs1516.grtnumsp ));
      params( 549 ) := "+"( Integer'Pos( a_frs1516.gt1scehd ));
      params( 550 ) := "+"( Integer'Pos( a_frs1516.gt1scesp ));
      params( 551 ) := "+"( Integer'Pos( a_frs1516.gt2scehd ));
      params( 552 ) := "+"( Integer'Pos( a_frs1516.gt2scesp ));
      params( 553 ) := "+"( Integer'Pos( a_frs1516.gt1oshd ));
      params( 554 ) := "+"( Integer'Pos( a_frs1516.gt1ossp ));
      params( 555 ) := "+"( Integer'Pos( a_frs1516.gt2oshd ));
      params( 556 ) := "+"( Integer'Pos( a_frs1516.gt2ossp ));
      params( 557 ) := "+"( Integer'Pos( a_frs1516.gtahd ));
      params( 558 ) := "+"( Integer'Pos( a_frs1516.gtasp ));
      params( 559 ) := "+"( Integer'Pos( a_frs1516.healthhd ));
      params( 560 ) := "+"( Integer'Pos( a_frs1516.healthsp ));
      params( 561 ) := "+"( Float( a_frs1516.heartvhd ));
      params( 562 ) := "+"( Float( a_frs1516.heartvsp ));
      params( 563 ) := "+"( Integer'Pos( a_frs1516.heatadhd ));
      params( 564 ) := "+"( Integer'Pos( a_frs1516.heatadsp ));
      params( 565 ) := "+"( Integer'Pos( a_frs1516.hholdrhd ));
      params( 566 ) := "+"( Integer'Pos( a_frs1516.hholdrsp ));
      params( 567 ) := "+"( Integer'Pos( a_frs1516.hourabhd ));
      params( 568 ) := "+"( Integer'Pos( a_frs1516.hourabsp ));
      params( 569 ) := "+"( Integer'Pos( a_frs1516.hourahhd ));
      params( 570 ) := "+"( Integer'Pos( a_frs1516.hourahsp ));
      params( 571 ) := "+"( Float( a_frs1516.hrcarehd ));
      params( 572 ) := "+"( Float( a_frs1516.hrcaresp ));
      params( 573 ) := "+"( Integer'Pos( a_frs1516.hourcbhd ));
      params( 574 ) := "+"( Integer'Pos( a_frs1516.hourcbsp ));
      params( 575 ) := "+"( Integer'Pos( a_frs1516.hourchhd ));
      params( 576 ) := "+"( Integer'Pos( a_frs1516.hourchsp ));
      params( 577 ) := "+"( Integer'Pos( a_frs1516.hourclhd ));
      params( 578 ) := "+"( Integer'Pos( a_frs1516.hourclsp ));
      params( 579 ) := "+"( Integer'Pos( a_frs1516.hourfrhd ));
      params( 580 ) := "+"( Integer'Pos( a_frs1516.hourfrsp ));
      params( 581 ) := "+"( Integer'Pos( a_frs1516.hourothd ));
      params( 582 ) := "+"( Integer'Pos( a_frs1516.hourotsp ));
      params( 583 ) := "+"( Integer'Pos( a_frs1516.hourrehd ));
      params( 584 ) := "+"( Integer'Pos( a_frs1516.hourresp ));
      params( 585 ) := "+"( Integer'Pos( a_frs1516.hourtthd ));
      params( 586 ) := "+"( Integer'Pos( a_frs1516.hourttsp ));
      params( 587 ) := "+"( Integer'Pos( a_frs1516.hpersohd ));
      params( 588 ) := "+"( Integer'Pos( a_frs1516.hpersosp ));
      params( 589 ) := "+"( Integer'Pos( a_frs1516.hrpidhd ));
      params( 590 ) := "+"( Integer'Pos( a_frs1516.hrpidsp ));
      params( 591 ) := "+"( Integer'Pos( a_frs1516.hsvperhd ));
      params( 592 ) := "+"( Integer'Pos( a_frs1516.hsvpersp ));
      params( 593 ) := "+"( Integer'Pos( a_frs1516.agegp2hd ));
      params( 594 ) := "+"( Integer'Pos( a_frs1516.agegp2sp ));
      params( 595 ) := "+"( Integer'Pos( a_frs1516.agegphd ));
      params( 596 ) := "+"( Integer'Pos( a_frs1516.agegpsp ));
      params( 597 ) := "+"( Integer'Pos( a_frs1516.quninshd ));
      params( 598 ) := "+"( Integer'Pos( a_frs1516.quninssp ));
      params( 599 ) := "+"( Integer'Pos( a_frs1516.qtubenhd ));
      params( 600 ) := "+"( Integer'Pos( a_frs1516.qtubensp ));
      params( 601 ) := "+"( Integer'Pos( a_frs1516.qsicinhd ));
      params( 602 ) := "+"( Integer'Pos( a_frs1516.qsicinsp ));
      params( 603 ) := "+"( Integer'Pos( a_frs1516.qaccinhd ));
      params( 604 ) := "+"( Integer'Pos( a_frs1516.qaccinsp ));
      params( 605 ) := "+"( Integer'Pos( a_frs1516.qpehinhd ));
      params( 606 ) := "+"( Integer'Pos( a_frs1516.qpehinsp ));
      params( 607 ) := "+"( Integer'Pos( a_frs1516.qhosinhd ));
      params( 608 ) := "+"( Integer'Pos( a_frs1516.qhosinsp ));
      params( 609 ) := "+"( Integer'Pos( a_frs1516.qfsbenhd ));
      params( 610 ) := "+"( Integer'Pos( a_frs1516.qfsbensp ));
      params( 611 ) := "+"( Integer'Pos( a_frs1516.qcichd ));
      params( 612 ) := "+"( Integer'Pos( a_frs1516.qcicsp ));
      params( 613 ) := "+"( Integer'Pos( a_frs1516.qotbenhd ));
      params( 614 ) := "+"( Integer'Pos( a_frs1516.qotbensp ));
      params( 615 ) := "+"( Integer'Pos( a_frs1516.incdurhd ));
      params( 616 ) := "+"( Integer'Pos( a_frs1516.incdursp ));
      params( 617 ) := "+"( Integer'Pos( a_frs1516.incsehd ));
      params( 618 ) := "+"( Integer'Pos( a_frs1516.incsesp ));
      params( 619 ) := "+"( Integer'Pos( a_frs1516.indinchd ));
      params( 620 ) := "+"( Integer'Pos( a_frs1516.indincsp ));
      params( 621 ) := "+"( Integer'Pos( a_frs1516.indisbhd ));
      params( 622 ) := "+"( Integer'Pos( a_frs1516.indisbsp ));
      params( 623 ) := "+"( Integer'Pos( a_frs1516.inearnhd ));
      params( 624 ) := "+"( Integer'Pos( a_frs1516.inearnsp ));
      params( 625 ) := "+"( Integer'Pos( a_frs1516.ininvhd ));
      params( 626 ) := "+"( Integer'Pos( a_frs1516.ininvsp ));
      params( 627 ) := "+"( Integer'Pos( a_frs1516.inirbehd ));
      params( 628 ) := "+"( Integer'Pos( a_frs1516.inirbesp ));
      params( 629 ) := "+"( Integer'Pos( a_frs1516.injlonhd ));
      params( 630 ) := "+"( Integer'Pos( a_frs1516.injlonsp ));
      params( 631 ) := "+"( Integer'Pos( a_frs1516.injhrshd ));
      params( 632 ) := "+"( Integer'Pos( a_frs1516.injhrssp ));
      params( 633 ) := "+"( Integer'Pos( a_frs1516.innirbhd ));
      params( 634 ) := "+"( Integer'Pos( a_frs1516.innirbsp ));
      params( 635 ) := "+"( Integer'Pos( a_frs1516.inothbhd ));
      params( 636 ) := "+"( Integer'Pos( a_frs1516.inothbsp ));
      params( 637 ) := "+"( Integer'Pos( a_frs1516.inpenihd ));
      params( 638 ) := "+"( Integer'Pos( a_frs1516.inpenisp ));
      params( 639 ) := "+"( Integer'Pos( a_frs1516.inrinchd ));
      params( 640 ) := "+"( Integer'Pos( a_frs1516.inrincsp ));
      params( 641 ) := "+"( Integer'Pos( a_frs1516.inrpinhd ));
      params( 642 ) := "+"( Integer'Pos( a_frs1516.inrpinsp ));
      params( 643 ) := "+"( Float( a_frs1516.itvlichd ));
      params( 644 ) := "+"( Integer'Pos( a_frs1516.itvlicsp ));
      params( 645 ) := "+"( Integer'Pos( a_frs1516.intxcdhd ));
      params( 646 ) := "+"( Integer'Pos( a_frs1516.intxcdsp ));
      params( 647 ) := "+"( Integer'Pos( a_frs1516.investhd ));
      params( 648 ) := "+"( Integer'Pos( a_frs1516.investsp ));
      params( 649 ) := "+"( Integer'Pos( a_frs1516.isa1tyhd ));
      params( 650 ) := "+"( Integer'Pos( a_frs1516.isa1tysp ));
      params( 651 ) := "+"( Integer'Pos( a_frs1516.isa2tyhd ));
      params( 652 ) := "+"( Integer'Pos( a_frs1516.isa2tysp ));
      params( 653 ) := "+"( Integer'Pos( a_frs1516.isactihd ));
      params( 654 ) := "+"( Integer'Pos( a_frs1516.isactisp ));
      params( 655 ) := "+"( Integer'Pos( a_frs1516.jobawahd ));
      params( 656 ) := "+"( Integer'Pos( a_frs1516.jobawasp ));
      params( 657 ) := "+"( Integer'Pos( a_frs1516.jobbyrhd ));
      params( 658 ) := "+"( Integer'Pos( a_frs1516.jobbyrsp ));
      params( 659 ) := "+"( Integer'Pos( a_frs1516.qcbhd ));
      params( 660 ) := "+"( Integer'Pos( a_frs1516.qcbsp ));
      params( 661 ) := "+"( Integer'Pos( a_frs1516.qgahd ));
      params( 662 ) := "+"( Integer'Pos( a_frs1516.qgasp ));
      params( 663 ) := "+"( Integer'Pos( a_frs1516.qmahd ));
      params( 664 ) := "+"( Integer'Pos( a_frs1516.qmasp ));
      params( 665 ) := "+"( Integer'Pos( a_frs1516.lareghd ));
      params( 666 ) := "+"( Integer'Pos( a_frs1516.laregsp ));
      params( 667 ) := "+"( Integer'Pos( a_frs1516.likewkhd ));
      params( 668 ) := "+"( Integer'Pos( a_frs1516.likewksp ));
      params( 669 ) := "+"( Integer'Pos( a_frs1516.limitlhd ));
      params( 670 ) := "+"( Integer'Pos( a_frs1516.limitlsp ));
      params( 671 ) := "+"( Integer'Pos( a_frs1516.lktimehd ));
      params( 672 ) := "+"( Integer'Pos( a_frs1516.lktimesp ));
      params( 673 ) := "+"( Integer'Pos( a_frs1516.lktrnhd ));
      params( 674 ) := "+"( Integer'Pos( a_frs1516.lktrnsp ));
      params( 675 ) := "+"( Integer'Pos( a_frs1516.lkworkhd ));
      params( 676 ) := "+"( Integer'Pos( a_frs1516.lkworksp ));
      params( 677 ) := "+"( Integer'Pos( a_frs1516.loanhd ));
      params( 678 ) := "+"( Integer'Pos( a_frs1516.loansp ));
      params( 679 ) := "+"( Integer'Pos( a_frs1516.loannuhd ));
      params( 680 ) := "+"( Integer'Pos( a_frs1516.loannusp ));
      params( 681 ) := "+"( Integer'Pos( a_frs1516.lstwkmhd ));
      params( 682 ) := "+"( Integer'Pos( a_frs1516.lstwkmsp ));
      params( 683 ) := "+"( Integer'Pos( a_frs1516.lstwkyhd ));
      params( 684 ) := "+"( Integer'Pos( a_frs1516.lstwkysp ));
      params( 685 ) := "+"( Integer'Pos( a_frs1516.wkswkdhd ));
      params( 686 ) := "+"( Integer'Pos( a_frs1516.wkswkdsp ));
      params( 687 ) := "+"( Integer'Pos( a_frs1516.marithd ));
      params( 688 ) := "+"( Integer'Pos( a_frs1516.maritsp ));
      params( 689 ) := "+"( Float( a_frs1516.mr1hd ));
      params( 690 ) := "+"( Integer'Pos( a_frs1516.mr1sp ));
      params( 691 ) := "+"( Float( a_frs1516.mr2hd ));
      params( 692 ) := "+"( Float( a_frs1516.mr2sp ));
      params( 693 ) := "+"( Integer'Pos( a_frs1516.mntar1hd ));
      params( 694 ) := "+"( Integer'Pos( a_frs1516.mntar1sp ));
      params( 695 ) := "+"( Integer'Pos( a_frs1516.mntar2hd ));
      params( 696 ) := "+"( Integer'Pos( a_frs1516.mntar2sp ));
      params( 697 ) := "+"( Integer'Pos( a_frs1516.mntar3hd ));
      params( 698 ) := "+"( Integer'Pos( a_frs1516.mntar3sp ));
      params( 699 ) := "+"( Integer'Pos( a_frs1516.mntar4hd ));
      params( 700 ) := "+"( Integer'Pos( a_frs1516.mntar4sp ));
      params( 701 ) := "+"( Integer'Pos( a_frs1516.mntar5hd ));
      params( 702 ) := "+"( Integer'Pos( a_frs1516.mntar5sp ));
      params( 703 ) := "+"( Integer'Pos( a_frs1516.mntnc1hd ));
      params( 704 ) := "+"( Integer'Pos( a_frs1516.mntnc1sp ));
      params( 705 ) := "+"( Integer'Pos( a_frs1516.mntnc2hd ));
      params( 706 ) := "+"( Integer'Pos( a_frs1516.mntnc2sp ));
      params( 707 ) := "+"( Integer'Pos( a_frs1516.mntnc3hd ));
      params( 708 ) := "+"( Integer'Pos( a_frs1516.mntnc3sp ));
      params( 709 ) := "+"( Integer'Pos( a_frs1516.mntnc4hd ));
      params( 710 ) := "+"( Integer'Pos( a_frs1516.mntnc4sp ));
      params( 711 ) := "+"( Integer'Pos( a_frs1516.mntnc5hd ));
      params( 712 ) := "+"( Integer'Pos( a_frs1516.mntnc5sp ));
      params( 713 ) := "+"( Integer'Pos( a_frs1516.mntpayhd ));
      params( 714 ) := "+"( Integer'Pos( a_frs1516.mntpaysp ));
      params( 715 ) := "+"( Integer'Pos( a_frs1516.pmr1hd ));
      params( 716 ) := "+"( Integer'Pos( a_frs1516.pmr1sp ));
      params( 717 ) := "+"( Integer'Pos( a_frs1516.pmr2hd ));
      params( 718 ) := "+"( Integer'Pos( a_frs1516.pmr2sp ));
      params( 719 ) := "+"( Integer'Pos( a_frs1516.mntpr1hd ));
      params( 720 ) := "+"( Integer'Pos( a_frs1516.mntpr1sp ));
      params( 721 ) := "+"( Integer'Pos( a_frs1516.mntpr2hd ));
      params( 722 ) := "+"( Integer'Pos( a_frs1516.mntpr2sp ));
      params( 723 ) := "+"( Integer'Pos( a_frs1516.mntpr3hd ));
      params( 724 ) := "+"( Integer'Pos( a_frs1516.mntpr3sp ));
      params( 725 ) := "+"( Integer'Pos( a_frs1516.mr12mhd ));
      params( 726 ) := "+"( Integer'Pos( a_frs1516.mr12msp ));
      params( 727 ) := "+"( Integer'Pos( a_frs1516.mntt1hd ));
      params( 728 ) := "+"( Integer'Pos( a_frs1516.mntt1sp ));
      params( 729 ) := "+"( Integer'Pos( a_frs1516.mntt2hd ));
      params( 730 ) := "+"( Integer'Pos( a_frs1516.mntt2sp ));
      params( 731 ) := "+"( Integer'Pos( a_frs1516.mntt3hd ));
      params( 732 ) := "+"( Integer'Pos( a_frs1516.mntt3sp ));
      params( 733 ) := "+"( Integer'Pos( a_frs1516.mntus1hd ));
      params( 734 ) := "+"( Integer'Pos( a_frs1516.mntus1sp ));
      params( 735 ) := "+"( Integer'Pos( a_frs1516.mntus2hd ));
      params( 736 ) := "+"( Integer'Pos( a_frs1516.mntus2sp ));
      params( 737 ) := "+"( Float( a_frs1516.umr1hd ));
      params( 738 ) := "+"( Integer'Pos( a_frs1516.umr1sp ));
      params( 739 ) := "+"( Float( a_frs1516.umr2hd ));
      params( 740 ) := "+"( Integer'Pos( a_frs1516.umr2sp ));
      params( 741 ) := "+"( Integer'Pos( a_frs1516.pumr1hd ));
      params( 742 ) := "+"( Integer'Pos( a_frs1516.pumr1sp ));
      params( 743 ) := "+"( Integer'Pos( a_frs1516.pumr2hd ));
      params( 744 ) := "+"( Integer'Pos( a_frs1516.pumr2sp ));
      params( 745 ) := "+"( Integer'Pos( a_frs1516.mntw1hd ));
      params( 746 ) := "+"( Integer'Pos( a_frs1516.mntw1sp ));
      params( 747 ) := "+"( Integer'Pos( a_frs1516.mntw2hd ));
      params( 748 ) := "+"( Integer'Pos( a_frs1516.mntw2sp ));
      params( 749 ) := "+"( Integer'Pos( a_frs1516.mntw3hd ));
      params( 750 ) := "+"( Integer'Pos( a_frs1516.mntw3sp ));
      params( 751 ) := "+"( Integer'Pos( a_frs1516.mntw4hd ));
      params( 752 ) := "+"( Integer'Pos( a_frs1516.mntw4sp ));
      params( 753 ) := "+"( Integer'Pos( a_frs1516.mntw5hd ));
      params( 754 ) := "+"( Integer'Pos( a_frs1516.mntw5sp ));
      params( 755 ) := "+"( Integer'Pos( a_frs1516.mshd ));
      params( 756 ) := "+"( Integer'Pos( a_frs1516.mssp ));
      params( 757 ) := "+"( Integer'Pos( a_frs1516.nanid1hd ));
      params( 758 ) := "+"( Integer'Pos( a_frs1516.nanid1sp ));
      params( 759 ) := "+"( Integer'Pos( a_frs1516.nanid2hd ));
      params( 760 ) := "+"( Integer'Pos( a_frs1516.nanid2sp ));
      params( 761 ) := "+"( Integer'Pos( a_frs1516.nanid3hd ));
      params( 762 ) := "+"( Integer'Pos( a_frs1516.nanid3sp ));
      params( 763 ) := "+"( Integer'Pos( a_frs1516.nanid4hd ));
      params( 764 ) := "+"( Integer'Pos( a_frs1516.nanid4sp ));
      params( 765 ) := "+"( Integer'Pos( a_frs1516.nanid5hd ));
      params( 766 ) := "+"( Integer'Pos( a_frs1516.nanid5sp ));
      params( 767 ) := "+"( Integer'Pos( a_frs1516.nanid6hd ));
      params( 768 ) := "+"( Integer'Pos( a_frs1516.nanid6sp ));
      params( 769 ) := "+"( Integer'Pos( a_frs1516.nitrnhd ));
      params( 770 ) := "+"( Integer'Pos( a_frs1516.nitrnsp ));
      params( 771 ) := "+"( Float( a_frs1516.niamthd ));
      params( 772 ) := "+"( Float( a_frs1516.niamtsp ));
      params( 773 ) := "+"( Integer'Pos( a_frs1516.niethghd ));
      params( 774 ) := "+"( Integer'Pos( a_frs1516.niethgsp ));
      params( 775 ) := "+"( Integer'Pos( a_frs1516.nixhbbhd ));
      params( 776 ) := "+"( Integer'Pos( a_frs1516.nixhbbsp ));
      params( 777 ) := "+"( Integer'Pos( a_frs1516.ninid1hd ));
      params( 778 ) := "+"( Integer'Pos( a_frs1516.ninid1sp ));
      params( 779 ) := "+"( Integer'Pos( a_frs1516.ninid2hd ));
      params( 780 ) := "+"( Integer'Pos( a_frs1516.ninid2sp ));
      params( 781 ) := "+"( Integer'Pos( a_frs1516.ninid3hd ));
      params( 782 ) := "+"( Integer'Pos( a_frs1516.ninid3sp ));
      params( 783 ) := "+"( Integer'Pos( a_frs1516.ninid4hd ));
      params( 784 ) := "+"( Integer'Pos( a_frs1516.ninid4sp ));
      params( 785 ) := "+"( Integer'Pos( a_frs1516.ninid5hd ));
      params( 786 ) := "+"( Integer'Pos( a_frs1516.ninid5sp ));
      params( 787 ) := "+"( Integer'Pos( a_frs1516.ninid6hd ));
      params( 788 ) := "+"( Integer'Pos( a_frs1516.ninid6sp ));
      params( 789 ) := "+"( Integer'Pos( a_frs1516.ninid7hd ));
      params( 790 ) := "+"( Integer'Pos( a_frs1516.ninid7sp ));
      params( 791 ) := "+"( Integer'Pos( a_frs1516.nincs2hd ));
      params( 792 ) := "+"( Integer'Pos( a_frs1516.nincs2sp ));
      params( 793 ) := "+"( Integer'Pos( a_frs1516.nininchd ));
      params( 794 ) := "+"( Integer'Pos( a_frs1516.ninincsp ));
      params( 795 ) := "+"( Integer'Pos( a_frs1516.ninearhd ));
      params( 796 ) := "+"( Integer'Pos( a_frs1516.ninearsp ));
      params( 797 ) := "+"( Integer'Pos( a_frs1516.nininvhd ));
      params( 798 ) := "+"( Integer'Pos( a_frs1516.nininvsp ));
      params( 799 ) := "+"( Integer'Pos( a_frs1516.ninpenhd ));
      params( 800 ) := "+"( Integer'Pos( a_frs1516.ninpensp ));
      params( 801 ) := "+"( Integer'Pos( a_frs1516.ninrinhd ));
      params( 802 ) := "+"( Integer'Pos( a_frs1516.ninrinsp ));
      params( 803 ) := "+"( Integer'Pos( a_frs1516.ninseihd ));
      params( 804 ) := "+"( Integer'Pos( a_frs1516.ninseisp ));
      params( 805 ) := "+"( Integer'Pos( a_frs1516.pniamthd ));
      params( 806 ) := "+"( Integer'Pos( a_frs1516.pniamtsp ));
      params( 807 ) := "+"( Integer'Pos( a_frs1516.nireghd ));
      params( 808 ) := "+"( Integer'Pos( a_frs1516.niregsp ));
      params( 809 ) := "+"( Integer'Pos( a_frs1516.nirelghd ));
      params( 810 ) := "+"( Integer'Pos( a_frs1516.nirelgsp ));
      params( 811 ) := "+"( Integer'Pos( a_frs1516.nolk1hd ));
      params( 812 ) := "+"( Integer'Pos( a_frs1516.nolk1sp ));
      params( 813 ) := "+"( Integer'Pos( a_frs1516.nolk2hd ));
      params( 814 ) := "+"( Integer'Pos( a_frs1516.nolk2sp ));
      params( 815 ) := "+"( Integer'Pos( a_frs1516.nolk3hd ));
      params( 816 ) := "+"( Integer'Pos( a_frs1516.nolk3sp ));
      params( 817 ) := "+"( Integer'Pos( a_frs1516.nowanthd ));
      params( 818 ) := "+"( Integer'Pos( a_frs1516.nowantsp ));
      params( 819 ) := "+"( Float( a_frs1516.nssechd ));
      params( 820 ) := "+"( Float( a_frs1516.nssecsp ));
      params( 821 ) := "+"( Integer'Pos( a_frs1516.numjobhd ));
      params( 822 ) := "+"( Integer'Pos( a_frs1516.numjobsp ));
      params( 823 ) := "+"( Integer'Pos( a_frs1516.numj2hd ));
      params( 824 ) := "+"( Integer'Pos( a_frs1516.numj2sp ));
      params( 825 ) := "+"( Integer'Pos( a_frs1516.ocnumhd ));
      params( 826 ) := "+"( Integer'Pos( a_frs1516.ocnumsp ));
      params( 827 ) := "+"( Integer'Pos( a_frs1516.oddjobhd ));
      params( 828 ) := "+"( Integer'Pos( a_frs1516.oddjobsp ));
      params( 829 ) := "+"( Integer'Pos( a_frs1516.oldstdhd ));
      params( 830 ) := "+"( Integer'Pos( a_frs1516.oldstdsp ));
      params( 831 ) := "+"( Integer'Pos( a_frs1516.oabparhd ));
      params( 832 ) := "+"( Integer'Pos( a_frs1516.oabparsp ));
      params( 833 ) := "+"( Float( a_frs1516.otamthd ));
      params( 834 ) := "+"( Float( a_frs1516.otamtsp ));
      params( 835 ) := "+"( Float( a_frs1516.otpamthd ));
      params( 836 ) := "+"( Integer'Pos( a_frs1516.otpamtsp ));
      params( 837 ) := "+"( Integer'Pos( a_frs1516.otappdhd ));
      params( 838 ) := "+"( Integer'Pos( a_frs1516.otappdsp ));
      params( 839 ) := "+"( Integer'Pos( a_frs1516.qehbtbhd ));
      params( 840 ) := "+"( Integer'Pos( a_frs1516.qehbtbsp ));
      params( 841 ) := "+"( Integer'Pos( a_frs1516.qwidplhd ));
      params( 842 ) := "+"( Integer'Pos( a_frs1516.qwidplsp ));
      params( 843 ) := "+"( Integer'Pos( a_frs1516.qinwkchd ));
      params( 844 ) := "+"( Integer'Pos( a_frs1516.qinwkcsp ));
      params( 845 ) := "+"( Integer'Pos( a_frs1516.qrtwkchd ));
      params( 846 ) := "+"( Integer'Pos( a_frs1516.qrtwkcsp ));
      params( 847 ) := "+"( Integer'Pos( a_frs1516.qothbehd ));
      params( 848 ) := "+"( Integer'Pos( a_frs1516.qothbesp ));
      params( 849 ) := "+"( Integer'Pos( a_frs1516.othtaxhd ));
      params( 850 ) := "+"( Integer'Pos( a_frs1516.othtaxsp ));
      params( 851 ) := "+"( Integer'Pos( a_frs1516.otinvahd ));
      params( 852 ) := "+"( Integer'Pos( a_frs1516.otinvasp ));
      params( 853 ) := "+"( Float( a_frs1516.pareamhd ));
      params( 854 ) := "+"( Float( a_frs1516.pareamsp ));
      params( 855 ) := "+"( Integer'Pos( a_frs1516.qpchd ));
      params( 856 ) := "+"( Integer'Pos( a_frs1516.qpcsp ));
      params( 857 ) := "+"( Integer'Pos( a_frs1516.qrphd ));
      params( 858 ) := "+"( Integer'Pos( a_frs1516.qrpsp ));
      params( 859 ) := "+"( Integer'Pos( a_frs1516.qbbhd ));
      params( 860 ) := "+"( Integer'Pos( a_frs1516.qbbsp ));
      params( 861 ) := "+"( Integer'Pos( a_frs1516.qafcshd ));
      params( 862 ) := "+"( Integer'Pos( a_frs1516.qafcssp ));
      params( 863 ) := "+"( Integer'Pos( a_frs1516.qwwphd ));
      params( 864 ) := "+"( Integer'Pos( a_frs1516.qwwpsp ));
      params( 865 ) := "+"( Integer'Pos( a_frs1516.penflghd ));
      params( 866 ) := "+"( Integer'Pos( a_frs1516.penflgsp ));
      params( 867 ) := "+"( Integer'Pos( a_frs1516.penwl1hd ));
      params( 868 ) := "+"( Integer'Pos( a_frs1516.penwl1sp ));
      params( 869 ) := "+"( Integer'Pos( a_frs1516.penwl2hd ));
      params( 870 ) := "+"( Integer'Pos( a_frs1516.penwl2sp ));
      params( 871 ) := "+"( Integer'Pos( a_frs1516.penwl3hd ));
      params( 872 ) := "+"( Integer'Pos( a_frs1516.penwl3sp ));
      params( 873 ) := "+"( Integer'Pos( a_frs1516.penwl4hd ));
      params( 874 ) := "+"( Integer'Pos( a_frs1516.penwl4sp ));
      params( 875 ) := "+"( Integer'Pos( a_frs1516.penwl5hd ));
      params( 876 ) := "+"( Integer'Pos( a_frs1516.penwl5sp ));
      params( 877 ) := "+"( Integer'Pos( a_frs1516.penwl6hd ));
      params( 878 ) := "+"( Integer'Pos( a_frs1516.penwl6sp ));
      params( 879 ) := "+"( Integer'Pos( a_frs1516.pepscthd ));
      params( 880 ) := "+"( Integer'Pos( a_frs1516.pepsctsp ));
      params( 881 ) := "+"( Integer'Pos( a_frs1516.personhd ));
      params( 882 ) := "+"( Integer'Pos( a_frs1516.personsp ));
      params( 883 ) := "+"( Integer'Pos( a_frs1516.qpipdhd ));
      params( 884 ) := "+"( Integer'Pos( a_frs1516.qpipdsp ));
      params( 885 ) := "+"( Integer'Pos( a_frs1516.qpipmhd ));
      params( 886 ) := "+"( Integer'Pos( a_frs1516.qpipmsp ));
      params( 887 ) := "+"( Integer'Pos( a_frs1516.poaccthd ));
      params( 888 ) := "+"( Integer'Pos( a_frs1516.poacctsp ));
      params( 889 ) := "+"( Integer'Pos( a_frs1516.pocardhd ));
      params( 890 ) := "+"( Integer'Pos( a_frs1516.pocardsp ));
      params( 891 ) := "+"( Integer'Pos( a_frs1516.ppnumchd ));
      params( 892 ) := "+"( Integer'Pos( a_frs1516.ppnumcsp ));
      params( 893 ) := "+"( Float( a_frs1516.proptxhd ));
      params( 894 ) := "+"( Float( a_frs1516.proptxsp ));
      params( 895 ) := "+"( Integer'Pos( a_frs1516.ptwkyrhd ));
      params( 896 ) := "+"( Integer'Pos( a_frs1516.ptwkyrsp ));
      params( 897 ) := "+"( Integer'Pos( a_frs1516.relp1hd ));
      params( 898 ) := "+"( Integer'Pos( a_frs1516.relp1sp ));
      params( 899 ) := "+"( Integer'Pos( a_frs1516.relp2hd ));
      params( 900 ) := "+"( Integer'Pos( a_frs1516.relp2sp ));
      params( 901 ) := "+"( Integer'Pos( a_frs1516.relp3hd ));
      params( 902 ) := "+"( Integer'Pos( a_frs1516.relp3sp ));
      params( 903 ) := "+"( Integer'Pos( a_frs1516.relp4hd ));
      params( 904 ) := "+"( Integer'Pos( a_frs1516.relp4sp ));
      params( 905 ) := "+"( Integer'Pos( a_frs1516.relp5hd ));
      params( 906 ) := "+"( Integer'Pos( a_frs1516.relp5sp ));
      params( 907 ) := "+"( Integer'Pos( a_frs1516.relp6hd ));
      params( 908 ) := "+"( Integer'Pos( a_frs1516.relp6sp ));
      params( 909 ) := "+"( Integer'Pos( a_frs1516.relp7hd ));
      params( 910 ) := "+"( Integer'Pos( a_frs1516.relp7sp ));
      params( 911 ) := "+"( Integer'Pos( a_frs1516.relp8hd ));
      params( 912 ) := "+"( Integer'Pos( a_frs1516.relp8sp ));
      params( 913 ) := "+"( Integer'Pos( a_frs1516.relp9hd ));
      params( 914 ) := "+"( Integer'Pos( a_frs1516.relp9sp ));
      params( 915 ) := "+"( Integer'Pos( a_frs1516.relp10hd ));
      params( 916 ) := "+"( Integer'Pos( a_frs1516.relp10sp ));
      params( 917 ) := "+"( Integer'Pos( a_frs1516.relp11hd ));
      params( 918 ) := "+"( Integer'Pos( a_frs1516.relp11sp ));
      params( 919 ) := "+"( Integer'Pos( a_frs1516.relp12hd ));
      params( 920 ) := "+"( Integer'Pos( a_frs1516.relp12sp ));
      params( 921 ) := "+"( Integer'Pos( a_frs1516.relp13hd ));
      params( 922 ) := "+"( Integer'Pos( a_frs1516.relp13sp ));
      params( 923 ) := "+"( Integer'Pos( a_frs1516.relp14hd ));
      params( 924 ) := "+"( Integer'Pos( a_frs1516.relp14sp ));
      params( 925 ) := "+"( Integer'Pos( a_frs1516.reasonhd ));
      params( 926 ) := "+"( Integer'Pos( a_frs1516.reasonsp ));
      params( 927 ) := "+"( Float( a_frs1516.redamthd ));
      params( 928 ) := "+"( Float( a_frs1516.redamtsp ));
      params( 929 ) := "+"( Integer'Pos( a_frs1516.redundhd ));
      params( 930 ) := "+"( Integer'Pos( a_frs1516.redundsp ));
      params( 931 ) := "+"( Integer'Pos( a_frs1516.rednethd ));
      params( 932 ) := "+"( Integer'Pos( a_frs1516.rednetsp ));
      params( 933 ) := "+"( Integer'Pos( a_frs1516.redtaxhd ));
      params( 934 ) := "+"( Integer'Pos( a_frs1516.redtaxsp ));
      params( 935 ) := "+"( Integer'Pos( a_frs1516.relhrphd ));
      params( 936 ) := "+"( Integer'Pos( a_frs1516.relhrpsp ));
      params( 937 ) := "+"( Integer'Pos( a_frs1516.relgewhd ));
      params( 938 ) := "+"( Integer'Pos( a_frs1516.relgewsp ));
      params( 939 ) := "+"( Integer'Pos( a_frs1516.relgschd ));
      params( 940 ) := "+"( Integer'Pos( a_frs1516.relgscsp ));
      params( 941 ) := "+"( Integer'Pos( a_frs1516.rprofhd ));
      params( 942 ) := "+"( Integer'Pos( a_frs1516.rprofsp ));
      params( 943 ) := "+"( Integer'Pos( a_frs1516.retirehd ));
      params( 944 ) := "+"( Integer'Pos( a_frs1516.retiresp ));
      params( 945 ) := "+"( Integer'Pos( a_frs1516.retir1hd ));
      params( 946 ) := "+"( Integer'Pos( a_frs1516.retir1sp ));
      params( 947 ) := "+"( Integer'Pos( a_frs1516.retreshd ));
      params( 948 ) := "+"( Integer'Pos( a_frs1516.retressp ));
      params( 949 ) := "+"( Float( a_frs1516.renthd ));
      params( 950 ) := "+"( Float( a_frs1516.rentsp ));
      params( 951 ) := "+"( Float( a_frs1516.royalhd ));
      params( 952 ) := "+"( Float( a_frs1516.royalsp ));
      params( 953 ) := "+"( Float( a_frs1516.sleephd ));
      params( 954 ) := "+"( Float( a_frs1516.sleepsp ));
      params( 955 ) := "+"( Float( a_frs1516.forpenhd ));
      params( 956 ) := "+"( Float( a_frs1516.forpensp ));
      params( 957 ) := "+"( Integer'Pos( a_frs1516.restrchd ));
      params( 958 ) := "+"( Integer'Pos( a_frs1516.restrcsp ));
      params( 959 ) := "+"( Integer'Pos( a_frs1516.sapadjhd ));
      params( 960 ) := "+"( Integer'Pos( a_frs1516.sapadjsp ));
      params( 961 ) := "+"( Integer'Pos( a_frs1516.sdem01hd ));
      params( 962 ) := "+"( Integer'Pos( a_frs1516.sdem01sp ));
      params( 963 ) := "+"( Integer'Pos( a_frs1516.sdem02hd ));
      params( 964 ) := "+"( Integer'Pos( a_frs1516.sdem02sp ));
      params( 965 ) := "+"( Integer'Pos( a_frs1516.sdem03hd ));
      params( 966 ) := "+"( Integer'Pos( a_frs1516.sdem03sp ));
      params( 967 ) := "+"( Integer'Pos( a_frs1516.sdem04hd ));
      params( 968 ) := "+"( Integer'Pos( a_frs1516.sdem04sp ));
      params( 969 ) := "+"( Integer'Pos( a_frs1516.sdem05hd ));
      params( 970 ) := "+"( Integer'Pos( a_frs1516.sdem05sp ));
      params( 971 ) := "+"( Integer'Pos( a_frs1516.sdem06hd ));
      params( 972 ) := "+"( Integer'Pos( a_frs1516.sdem06sp ));
      params( 973 ) := "+"( Integer'Pos( a_frs1516.sdem07hd ));
      params( 974 ) := "+"( Integer'Pos( a_frs1516.sdem07sp ));
      params( 975 ) := "+"( Integer'Pos( a_frs1516.sdem08hd ));
      params( 976 ) := "+"( Integer'Pos( a_frs1516.sdem08sp ));
      params( 977 ) := "+"( Integer'Pos( a_frs1516.sdem09hd ));
      params( 978 ) := "+"( Integer'Pos( a_frs1516.sdem09sp ));
      params( 979 ) := "+"( Integer'Pos( a_frs1516.sdem10hd ));
      params( 980 ) := "+"( Integer'Pos( a_frs1516.sdem10sp ));
      params( 981 ) := "+"( Integer'Pos( a_frs1516.sdem11hd ));
      params( 982 ) := "+"( Integer'Pos( a_frs1516.sdem11sp ));
      params( 983 ) := "+"( Integer'Pos( a_frs1516.sdem12hd ));
      params( 984 ) := "+"( Integer'Pos( a_frs1516.sdem12sp ));
      params( 985 ) := "+"( Integer'Pos( a_frs1516.inseinhd ));
      params( 986 ) := "+"( Integer'Pos( a_frs1516.inseinsp ));
      params( 987 ) := "+"( Integer'Pos( a_frs1516.sdemphd ));
      params( 988 ) := "+"( Integer'Pos( a_frs1516.sdempsp ));
      params( 989 ) := "+"( Integer'Pos( a_frs1516.sexhd ));
      params( 990 ) := "+"( Integer'Pos( a_frs1516.sexsp ));
      params( 991 ) := "+"( Integer'Pos( a_frs1516.sichd ));
      params( 992 ) := "+"( Integer'Pos( a_frs1516.sicsp ));
      params( 993 ) := "+"( Integer'Pos( a_frs1516.sidqnhd ));
      params( 994 ) := "+"( Integer'Pos( a_frs1516.sidqnsp ));
      params( 995 ) := "+"( Integer'Pos( a_frs1516.sloshd ));
      params( 996 ) := "+"( Integer'Pos( a_frs1516.slossp ));
      params( 997 ) := "+"( Float( a_frs1516.slramthd ));
      params( 998 ) := "+"( Float( a_frs1516.slramtsp ));
      params( 999 ) := "+"( Integer'Pos( a_frs1516.slrppdhd ));
      params( 1000 ) := "+"( Integer'Pos( a_frs1516.slrppdsp ));
      params( 1001 ) := "+"( Float( a_frs1516.smpajhd ));
      params( 1002 ) := "+"( Float( a_frs1516.smpajsp ));
      params( 1003 ) := "+"( Integer'Pos( a_frs1516.sc2010hd ));
      params( 1004 ) := "+"( Integer'Pos( a_frs1516.sc2010sp ));
      params( 1005 ) := "+"( Integer'Pos( a_frs1516.qsfgrhd ));
      params( 1006 ) := "+"( Integer'Pos( a_frs1516.qsfgrsp ));
      params( 1007 ) := "+"( Integer'Pos( a_frs1516.qssmthd ));
      params( 1008 ) := "+"( Integer'Pos( a_frs1516.qssmtsp ));
      params( 1009 ) := "+"( Integer'Pos( a_frs1516.qlgdwphd ));
      params( 1010 ) := "+"( Integer'Pos( a_frs1516.qlgdwpsp ));
      params( 1011 ) := "+"( Integer'Pos( a_frs1516.qlglahd ));
      params( 1012 ) := "+"( Integer'Pos( a_frs1516.qlglasp ));
      params( 1013 ) := "+"( Integer'Pos( a_frs1516.blindhd ));
      params( 1014 ) := "+"( Integer'Pos( a_frs1516.blindsp ));
      params( 1015 ) := "+"( Integer'Pos( a_frs1516.parsihd ));
      params( 1016 ) := "+"( Integer'Pos( a_frs1516.parsisp ));
      params( 1017 ) := "+"( Integer'Pos( a_frs1516.deafhd ));
      params( 1018 ) := "+"( Integer'Pos( a_frs1516.deafsp ));
      params( 1019 ) := "+"( Integer'Pos( a_frs1516.spouthd ));
      params( 1020 ) := "+"( Integer'Pos( a_frs1516.spoutsp ));
      params( 1021 ) := "+"( Float( a_frs1516.sppadjhd ));
      params( 1022 ) := "+"( Float( a_frs1516.sppadjsp ));
      params( 1023 ) := "+"( Integer'Pos( a_frs1516.spyrothd ));
      params( 1024 ) := "+"( Integer'Pos( a_frs1516.spyrotsp ));
      params( 1025 ) := "+"( Float( a_frs1516.srentahd ));
      params( 1026 ) := "+"( Float( a_frs1516.srentasp ));
      params( 1027 ) := "+"( Integer'Pos( a_frs1516.psrenthd ));
      params( 1028 ) := "+"( Integer'Pos( a_frs1516.psrentsp ));
      params( 1029 ) := "+"( Integer'Pos( a_frs1516.sfispchd ));
      params( 1030 ) := "+"( Integer'Pos( a_frs1516.sfispcsp ));
      params( 1031 ) := "+"( Integer'Pos( a_frs1516.sfjesahd ));
      params( 1032 ) := "+"( Integer'Pos( a_frs1516.sfjesasp ));
      params( 1033 ) := "+"( Integer'Pos( a_frs1516.sruchd ));
      params( 1034 ) := "+"( Integer'Pos( a_frs1516.srucsp ));
      params( 1035 ) := "+"( Float( a_frs1516.sspajhd ));
      params( 1036 ) := "+"( Float( a_frs1516.sspajsp ));
      params( 1037 ) := "+"( Integer'Pos( a_frs1516.gtsavahd ));
      params( 1038 ) := "+"( Integer'Pos( a_frs1516.gtsavasp ));
      params( 1039 ) := "+"( Integer'Pos( a_frs1516.stshcthd ));
      params( 1040 ) := "+"( Integer'Pos( a_frs1516.stshctsp ));
      params( 1041 ) := "+"( Integer'Pos( a_frs1516.tdaywkhd ));
      params( 1042 ) := "+"( Integer'Pos( a_frs1516.tdaywksp ));
      params( 1043 ) := "+"( Integer'Pos( a_frs1516.agefedhd ));
      params( 1044 ) := "+"( Integer'Pos( a_frs1516.agefedsp ));
      params( 1045 ) := "+"( Integer'Pos( a_frs1516.tmpjobhd ));
      params( 1046 ) := "+"( Integer'Pos( a_frs1516.tmpjobsp ));
      params( 1047 ) := "+"( Integer'Pos( a_frs1516.tesscthd ));
      params( 1048 ) := "+"( Integer'Pos( a_frs1516.tessctsp ));
      params( 1049 ) := "+"( Integer'Pos( a_frs1516.totgrahd ));
      params( 1050 ) := "+"( Float( a_frs1516.totgrasp ));
      params( 1051 ) := "+"( Float( a_frs1516.tothouhd ));
      params( 1052 ) := "+"( Float( a_frs1516.tothousp ));
      params( 1053 ) := "+"( Float( a_frs1516.totinthd ));
      params( 1054 ) := "+"( Float( a_frs1516.totintsp ));
      params( 1055 ) := "+"( Float( a_frs1516.totocchd ));
      params( 1056 ) := "+"( Float( a_frs1516.totoccsp ));
      params( 1057 ) := "+"( Integer'Pos( a_frs1516.trainhd ));
      params( 1058 ) := "+"( Integer'Pos( a_frs1516.trainsp ));
      params( 1059 ) := "+"( Integer'Pos( a_frs1516.trnallhd ));
      params( 1060 ) := "+"( Integer'Pos( a_frs1516.trnallsp ));
      params( 1061 ) := "+"( Float( a_frs1516.ttbprxhd ));
      params( 1062 ) := "+"( Float( a_frs1516.ttbprxsp ));
      params( 1063 ) := "+"( Integer'Pos( a_frs1516.tuborrhd ));
      params( 1064 ) := "+"( Integer'Pos( a_frs1516.tuborrsp ));
      params( 1065 ) := "+"( Integer'Pos( a_frs1516.typeedhd ));
      params( 1066 ) := "+"( Integer'Pos( a_frs1516.typeedsp ));
      params( 1067 ) := "+"( Integer'Pos( a_frs1516.unpd1hd ));
      params( 1068 ) := "+"( Integer'Pos( a_frs1516.unpd1sp ));
      params( 1069 ) := "+"( Integer'Pos( a_frs1516.unpd2hd ));
      params( 1070 ) := "+"( Integer'Pos( a_frs1516.unpd2sp ));
      params( 1071 ) := "+"( Integer'Pos( a_frs1516.untrcthd ));
      params( 1072 ) := "+"( Integer'Pos( a_frs1516.untrctsp ));
      params( 1073 ) := "+"( Integer'Pos( a_frs1516.upersohd ));
      params( 1074 ) := "+"( Integer'Pos( a_frs1516.upersosp ));
      params( 1075 ) := "+"( Integer'Pos( a_frs1516.agewidhd ));
      params( 1076 ) := "+"( Integer'Pos( a_frs1516.agewidsp ));
      params( 1077 ) := "+"( Integer'Pos( a_frs1516.kidwidhd ));
      params( 1078 ) := "+"( Integer'Pos( a_frs1516.kidwidsp ));
      params( 1079 ) := "+"( Integer'Pos( a_frs1516.quchd ));
      params( 1080 ) := "+"( Integer'Pos( a_frs1516.qucsp ));
      params( 1081 ) := "+"( Integer'Pos( a_frs1516.qhbhd ));
      params( 1082 ) := "+"( Integer'Pos( a_frs1516.qhbsp ));
      params( 1083 ) := "+"( Integer'Pos( a_frs1516.qwtchd ));
      params( 1084 ) := "+"( Integer'Pos( a_frs1516.qwtcsp ));
      params( 1085 ) := "+"( Integer'Pos( a_frs1516.qctchd ));
      params( 1086 ) := "+"( Integer'Pos( a_frs1516.qctcsp ));
      params( 1087 ) := "+"( Integer'Pos( a_frs1516.qishd ));
      params( 1088 ) := "+"( Integer'Pos( a_frs1516.qissp ));
      params( 1089 ) := "+"( Integer'Pos( a_frs1516.qjsahd ));
      params( 1090 ) := "+"( Integer'Pos( a_frs1516.qjsasp ));
      params( 1091 ) := "+"( Integer'Pos( a_frs1516.qesahd ));
      params( 1092 ) := "+"( Integer'Pos( a_frs1516.qesasp ));
      params( 1093 ) := "+"( Integer'Pos( a_frs1516.qcahd ));
      params( 1094 ) := "+"( Integer'Pos( a_frs1516.qcasp ));
      params( 1095 ) := "+"( Integer'Pos( a_frs1516.waithd ));
      params( 1096 ) := "+"( Integer'Pos( a_frs1516.waitsp ));
      params( 1097 ) := "+"( Integer'Pos( a_frs1516.whresphd ));
      params( 1098 ) := "+"( Integer'Pos( a_frs1516.whrespsp ));
      params( 1099 ) := "+"( Integer'Pos( a_frs1516.whoctbhd ));
      params( 1100 ) := "+"( Integer'Pos( a_frs1516.whoctbsp ));
      params( 1101 ) := "+"( Float( a_frs1516.widocchd ));
      params( 1102 ) := "+"( Float( a_frs1516.widoccsp ));
      params( 1103 ) := "+"( Integer'Pos( a_frs1516.wintflhd ));
      params( 1104 ) := "+"( Integer'Pos( a_frs1516.wintflsp ));
      params( 1105 ) := "+"( Integer'Pos( a_frs1516.workinhd ));
      params( 1106 ) := "+"( Integer'Pos( a_frs1516.workinsp ));
      params( 1107 ) := "+"( Integer'Pos( a_frs1516.wpahd ));
      params( 1108 ) := "+"( Integer'Pos( a_frs1516.wpasp ));
      params( 1109 ) := "+"( Integer'Pos( a_frs1516.wpbahd ));
      params( 1110 ) := "+"( Integer'Pos( a_frs1516.wpbasp ));
      params( 1111 ) := "+"( Integer'Pos( a_frs1516.wtclm1hd ));
      params( 1112 ) := "+"( Integer'Pos( a_frs1516.wtclm1sp ));
      params( 1113 ) := "+"( Integer'Pos( a_frs1516.wtclm2hd ));
      params( 1114 ) := "+"( Integer'Pos( a_frs1516.wtclm2sp ));
      params( 1115 ) := "+"( Integer'Pos( a_frs1516.yjblevhd ));
      params( 1116 ) := "+"( Integer'Pos( a_frs1516.yjblevsp ));
      params( 1117 ) := "+"( Integer'Pos( a_frs1516.ystwkhd ));
      params( 1118 ) := "+"( Integer'Pos( a_frs1516.ystwksp ));
      params( 1119 ) := "+"( Float( a_frs1516.as011hd ));
      params( 1120 ) := "+"( Float( a_frs1516.as012hd ));
      params( 1121 ) := "+"( Float( a_frs1516.as013hd ));
      params( 1122 ) := "+"( Integer'Pos( a_frs1516.as014hd ));
      params( 1123 ) := "+"( Float( a_frs1516.as011sp ));
      params( 1124 ) := "+"( Float( a_frs1516.as012sp ));
      params( 1125 ) := "+"( Integer'Pos( a_frs1516.as013sp ));
      params( 1126 ) := "+"( Integer'Pos( a_frs1516.as014sp ));
      params( 1127 ) := "+"( Integer'Pos( a_frs1516.as021hd ));
      params( 1128 ) := "+"( Integer'Pos( a_frs1516.as022hd ));
      params( 1129 ) := "+"( Float( a_frs1516.as021sp ));
      params( 1130 ) := "+"( Integer'Pos( a_frs1516.as022sp ));
      params( 1131 ) := "+"( Integer'Pos( a_frs1516.as031hd ));
      params( 1132 ) := "+"( Integer'Pos( a_frs1516.as031sp ));
      params( 1133 ) := "+"( Float( a_frs1516.as051hd ));
      params( 1134 ) := "+"( Float( a_frs1516.as052hd ));
      params( 1135 ) := "+"( Float( a_frs1516.as053hd ));
      params( 1136 ) := "+"( Integer'Pos( a_frs1516.as054hd ));
      params( 1137 ) := "+"( Integer'Pos( a_frs1516.as055hd ));
      params( 1138 ) := "+"( Integer'Pos( a_frs1516.as056hd ));
      params( 1139 ) := "+"( Integer'Pos( a_frs1516.as057hd ));
      params( 1140 ) := "+"( Float( a_frs1516.as051sp ));
      params( 1141 ) := "+"( Float( a_frs1516.as052sp ));
      params( 1142 ) := "+"( Float( a_frs1516.as053sp ));
      params( 1143 ) := "+"( Integer'Pos( a_frs1516.as054sp ));
      params( 1144 ) := "+"( Integer'Pos( a_frs1516.as055sp ));
      params( 1145 ) := "+"( Integer'Pos( a_frs1516.as056sp ));
      params( 1146 ) := "+"( Integer'Pos( a_frs1516.as057sp ));
      params( 1147 ) := "+"( Integer'Pos( a_frs1516.as061hd ));
      params( 1148 ) := "+"( Integer'Pos( a_frs1516.as061sp ));
      params( 1149 ) := "+"( Integer'Pos( a_frs1516.as071hd ));
      params( 1150 ) := "+"( Integer'Pos( a_frs1516.as071sp ));
      params( 1151 ) := "+"( Float( a_frs1516.as081hd ));
      params( 1152 ) := "+"( Float( a_frs1516.as082hd ));
      params( 1153 ) := "+"( Integer'Pos( a_frs1516.as083hd ));
      params( 1154 ) := "+"( Integer'Pos( a_frs1516.as084hd ));
      params( 1155 ) := "+"( Integer'Pos( a_frs1516.as085hd ));
      params( 1156 ) := "+"( Float( a_frs1516.as081sp ));
      params( 1157 ) := "+"( Float( a_frs1516.as082sp ));
      params( 1158 ) := "+"( Integer'Pos( a_frs1516.as083sp ));
      params( 1159 ) := "+"( Integer'Pos( a_frs1516.as084sp ));
      params( 1160 ) := "+"( Integer'Pos( a_frs1516.as085sp ));
      params( 1161 ) := "+"( Integer'Pos( a_frs1516.as101hd ));
      params( 1162 ) := "+"( Integer'Pos( a_frs1516.as101sp ));
      params( 1163 ) := "+"( Integer'Pos( a_frs1516.as111hd ));
      params( 1164 ) := "+"( Integer'Pos( a_frs1516.as111sp ));
      params( 1165 ) := "+"( Integer'Pos( a_frs1516.as121hd ));
      params( 1166 ) := "+"( Integer'Pos( a_frs1516.as121sp ));
      params( 1167 ) := "+"( Integer'Pos( a_frs1516.as131hd ));
      params( 1168 ) := "+"( Integer'Pos( a_frs1516.as131sp ));
      params( 1169 ) := "+"( Integer'Pos( a_frs1516.as141hd ));
      params( 1170 ) := "+"( Integer'Pos( a_frs1516.as142hd ));
      params( 1171 ) := "+"( Integer'Pos( a_frs1516.as143hd ));
      params( 1172 ) := "+"( Integer'Pos( a_frs1516.as141sp ));
      params( 1173 ) := "+"( Integer'Pos( a_frs1516.as142sp ));
      params( 1174 ) := "+"( Integer'Pos( a_frs1516.as143sp ));
      params( 1175 ) := "+"( Float( a_frs1516.as151hd ));
      params( 1176 ) := "+"( Float( a_frs1516.as151sp ));
      params( 1177 ) := "+"( Integer'Pos( a_frs1516.as161hd ));
      params( 1178 ) := "+"( Integer'Pos( a_frs1516.as161sp ));
      params( 1179 ) := "+"( Integer'Pos( a_frs1516.as191hd ));
      params( 1180 ) := "+"( Integer'Pos( a_frs1516.as191sp ));
      params( 1181 ) := "+"( Float( a_frs1516.as211hd ));
      params( 1182 ) := "+"( Integer'Pos( a_frs1516.as212hd ));
      params( 1183 ) := "+"( Integer'Pos( a_frs1516.as213hd ));
      params( 1184 ) := "+"( Integer'Pos( a_frs1516.as214hd ));
      params( 1185 ) := "+"( Float( a_frs1516.as211sp ));
      params( 1186 ) := "+"( Float( a_frs1516.as212sp ));
      params( 1187 ) := "+"( Integer'Pos( a_frs1516.as213sp ));
      params( 1188 ) := "+"( Integer'Pos( a_frs1516.as214sp ));
      params( 1189 ) := "+"( Integer'Pos( a_frs1516.as261hd ));
      params( 1190 ) := "+"( Integer'Pos( a_frs1516.as261sp ));
      params( 1191 ) := "+"( Float( a_frs1516.as271hd ));
      params( 1192 ) := "+"( Integer'Pos( a_frs1516.as272hd ));
      params( 1193 ) := "+"( Integer'Pos( a_frs1516.as271sp ));
      params( 1194 ) := "+"( Integer'Pos( a_frs1516.as272sp ));
      params( 1195 ) := "+"( Integer'Pos( a_frs1516.as281hd ));
      params( 1196 ) := "+"( Float( a_frs1516.as281sp ));
      params( 1197 ) := "+"( Integer'Pos( a_frs1516.as291hd ));
      params( 1198 ) := "+"( Integer'Pos( a_frs1516.as292hd ));
      params( 1199 ) := "+"( Integer'Pos( a_frs1516.as293hd ));
      params( 1200 ) := "+"( Integer'Pos( a_frs1516.as291sp ));
      params( 1201 ) := "+"( Integer'Pos( a_frs1516.as292sp ));
      params( 1202 ) := "+"( Integer'Pos( a_frs1516.as293sp ));
      params( 1203 ) := "+"( Integer'Pos( a_frs1516.stdlachd ));
      params( 1204 ) := "+"( Integer'Pos( a_frs1516.stdlamhd ));
      params( 1205 ) := "+"( Integer'Pos( a_frs1516.stcbhd ));
      params( 1206 ) := "+"( Integer'Pos( a_frs1516.stpenchd ));
      params( 1207 ) := "+"( Integer'Pos( a_frs1516.strphd ));
      params( 1208 ) := "+"( Integer'Pos( a_frs1516.stwphd ));
      params( 1209 ) := "+"( Integer'Pos( a_frs1516.stwdphd ));
      params( 1210 ) := "+"( Integer'Pos( a_frs1516.stwwphd ));
      params( 1211 ) := "+"( Integer'Pos( a_frs1516.stsdahd ));
      params( 1212 ) := "+"( Integer'Pos( a_frs1516.staahd ));
      params( 1213 ) := "+"( Integer'Pos( a_frs1516.sticahd ));
      params( 1214 ) := "+"( Integer'Pos( a_frs1516.stjsahd ));
      params( 1215 ) := "+"( Integer'Pos( a_frs1516.stiidbhd ));
      params( 1216 ) := "+"( Integer'Pos( a_frs1516.stesahd ));
      params( 1217 ) := "+"( Integer'Pos( a_frs1516.stibhd ));
      params( 1218 ) := "+"( Integer'Pos( a_frs1516.stishd ));
      params( 1219 ) := "+"( Integer'Pos( a_frs1516.stmahd ));
      params( 1220 ) := "+"( Integer'Pos( a_frs1516.stshhd ));
      params( 1221 ) := "+"( Integer'Pos( a_frs1516.stgahd ));
      params( 1222 ) := "+"( Integer'Pos( a_frs1516.stwtchd ));
      params( 1223 ) := "+"( Integer'Pos( a_frs1516.stctchd ));
      params( 1224 ) := "+"( Integer'Pos( a_frs1516.stwtclhd ));
      params( 1225 ) := "+"( Integer'Pos( a_frs1516.stctclhd ));
      params( 1226 ) := "+"( Integer'Pos( a_frs1516.stuchd ));
      params( 1227 ) := "+"( Integer'Pos( a_frs1516.stpipdhd ));
      params( 1228 ) := "+"( Integer'Pos( a_frs1516.stpipmhd ));
      params( 1229 ) := "+"( Integer'Pos( a_frs1516.stdlacsp ));
      params( 1230 ) := "+"( Integer'Pos( a_frs1516.stdlamsp ));
      params( 1231 ) := "+"( Integer'Pos( a_frs1516.stcbsp ));
      params( 1232 ) := "+"( Integer'Pos( a_frs1516.stpencsp ));
      params( 1233 ) := "+"( Integer'Pos( a_frs1516.strpsp ));
      params( 1234 ) := "+"( Integer'Pos( a_frs1516.stwpsp ));
      params( 1235 ) := "+"( Integer'Pos( a_frs1516.stwdpsp ));
      params( 1236 ) := "+"( Integer'Pos( a_frs1516.stwwpsp ));
      params( 1237 ) := "+"( Integer'Pos( a_frs1516.stsdasp ));
      params( 1238 ) := "+"( Integer'Pos( a_frs1516.staasp ));
      params( 1239 ) := "+"( Integer'Pos( a_frs1516.sticasp ));
      params( 1240 ) := "+"( Integer'Pos( a_frs1516.stjsasp ));
      params( 1241 ) := "+"( Integer'Pos( a_frs1516.stiidbsp ));
      params( 1242 ) := "+"( Integer'Pos( a_frs1516.stesasp ));
      params( 1243 ) := "+"( Integer'Pos( a_frs1516.stibsp ));
      params( 1244 ) := "+"( Integer'Pos( a_frs1516.stissp ));
      params( 1245 ) := "+"( Integer'Pos( a_frs1516.stmasp ));
      params( 1246 ) := "+"( Integer'Pos( a_frs1516.stshsp ));
      params( 1247 ) := "+"( Integer'Pos( a_frs1516.stgasp ));
      params( 1248 ) := "+"( Integer'Pos( a_frs1516.stwtcsp ));
      params( 1249 ) := "+"( Integer'Pos( a_frs1516.stctcsp ));
      params( 1250 ) := "+"( Integer'Pos( a_frs1516.stwtclsp ));
      params( 1251 ) := "+"( Integer'Pos( a_frs1516.stctclsp ));
      params( 1252 ) := "+"( Integer'Pos( a_frs1516.stucsp ));
      params( 1253 ) := "+"( Integer'Pos( a_frs1516.stpipdsp ));
      params( 1254 ) := "+"( Integer'Pos( a_frs1516.stpipmsp ));
      params( 1255 ) := "+"( Float( a_frs1516.dlacahd ));
      params( 1256 ) := "+"( Float( a_frs1516.dlamohd ));
      params( 1257 ) := "+"( Float( a_frs1516.cbhd ));
      params( 1258 ) := "+"( Float( a_frs1516.lpencrhd ));
      params( 1259 ) := "+"( Float( a_frs1516.rphd ));
      params( 1260 ) := "+"( Float( a_frs1516.wphd ));
      params( 1261 ) := "+"( Float( a_frs1516.wdphd ));
      params( 1262 ) := "+"( Float( a_frs1516.wwphd ));
      params( 1263 ) := "+"( Float( a_frs1516.sdahd ));
      params( 1264 ) := "+"( Float( a_frs1516.aahd ));
      params( 1265 ) := "+"( Float( a_frs1516.icahd ));
      params( 1266 ) := "+"( Float( a_frs1516.jsahd ));
      params( 1267 ) := "+"( Float( a_frs1516.iidbhd ));
      params( 1268 ) := "+"( Float( a_frs1516.esahd ));
      params( 1269 ) := "+"( Float( a_frs1516.ibhd ));
      params( 1270 ) := "+"( Float( a_frs1516.ishd ));
      params( 1271 ) := "+"( Float( a_frs1516.mahd ));
      params( 1272 ) := "+"( Integer'Pos( a_frs1516.sfmghd ));
      params( 1273 ) := "+"( Float( a_frs1516.sffghd ));
      params( 1274 ) := "+"( Float( a_frs1516.othbenhd ));
      params( 1275 ) := "+"( Float( a_frs1516.tubenhd ));
      params( 1276 ) := "+"( Float( a_frs1516.fsbenhd ));
      params( 1277 ) := "+"( Float( a_frs1516.sicinhd ));
      params( 1278 ) := "+"( Integer'Pos( a_frs1516.accinhd ));
      params( 1279 ) := "+"( Float( a_frs1516.hosinhd ));
      params( 1280 ) := "+"( Integer'Pos( a_frs1516.gtshd ));
      params( 1281 ) := "+"( Float( a_frs1516.gahd ));
      params( 1282 ) := "+"( Integer'Pos( a_frs1516.iwchd ));
      params( 1283 ) := "+"( Integer'Pos( a_frs1516.r2wchd ));
      params( 1284 ) := "+"( Integer'Pos( a_frs1516.widplhd ));
      params( 1285 ) := "+"( Float( a_frs1516.uninshd ));
      params( 1286 ) := "+"( Integer'Pos( a_frs1516.wfamthd ));
      params( 1287 ) := "+"( Float( a_frs1516.dssdpihd ));
      params( 1288 ) := "+"( Float( a_frs1516.dssdpjhd ));
      params( 1289 ) := "+"( Float( a_frs1516.sfrpaihd ));
      params( 1290 ) := "+"( Float( a_frs1516.sfrpajhd ));
      params( 1291 ) := "+"( Float( a_frs1516.exhbhd ));
      params( 1292 ) := "+"( Float( a_frs1516.perhinhd ));
      params( 1293 ) := "+"( Float( a_frs1516.otsiinhd ));
      params( 1294 ) := "+"( Float( a_frs1516.cichd ));
      params( 1295 ) := "+"( Float( a_frs1516.bowtchd ));
      params( 1296 ) := "+"( Float( a_frs1516.boctchd ));
      params( 1297 ) := "+"( Float( a_frs1516.bowtclhd ));
      params( 1298 ) := "+"( Float( a_frs1516.boctclhd ));
      params( 1299 ) := "+"( Float( a_frs1516.hbhd ));
      params( 1300 ) := "+"( Float( a_frs1516.uchd ));
      params( 1301 ) := "+"( Float( a_frs1516.pipdhd ));
      params( 1302 ) := "+"( Float( a_frs1516.pipmhd ));
      params( 1303 ) := "+"( Float( a_frs1516.lndwphd ));
      params( 1304 ) := "+"( Integer'Pos( a_frs1516.lnlahd ));
      params( 1305 ) := "+"( Float( a_frs1516.dwpauchd ));
      params( 1306 ) := "+"( Float( a_frs1516.sfrpuchd ));
      params( 1307 ) := "+"( Float( a_frs1516.dlacasp ));
      params( 1308 ) := "+"( Float( a_frs1516.dlamosp ));
      params( 1309 ) := "+"( Float( a_frs1516.cbsp ));
      params( 1310 ) := "+"( Float( a_frs1516.lpencrsp ));
      params( 1311 ) := "+"( Float( a_frs1516.rpsp ));
      params( 1312 ) := "+"( Integer'Pos( a_frs1516.wpsp ));
      params( 1313 ) := "+"( Float( a_frs1516.wdpsp ));
      params( 1314 ) := "+"( Float( a_frs1516.wwpsp ));
      params( 1315 ) := "+"( Float( a_frs1516.sdasp ));
      params( 1316 ) := "+"( Float( a_frs1516.aasp ));
      params( 1317 ) := "+"( Float( a_frs1516.icasp ));
      params( 1318 ) := "+"( Float( a_frs1516.jsasp ));
      params( 1319 ) := "+"( Float( a_frs1516.iidbsp ));
      params( 1320 ) := "+"( Float( a_frs1516.esasp ));
      params( 1321 ) := "+"( Float( a_frs1516.ibsp ));
      params( 1322 ) := "+"( Float( a_frs1516.issp ));
      params( 1323 ) := "+"( Float( a_frs1516.masp ));
      params( 1324 ) := "+"( Integer'Pos( a_frs1516.sfmgsp ));
      params( 1325 ) := "+"( Integer'Pos( a_frs1516.sffgsp ));
      params( 1326 ) := "+"( Integer'Pos( a_frs1516.othbensp ));
      params( 1327 ) := "+"( Integer'Pos( a_frs1516.tubensp ));
      params( 1328 ) := "+"( Integer'Pos( a_frs1516.fsbensp ));
      params( 1329 ) := "+"( Float( a_frs1516.sicinsp ));
      params( 1330 ) := "+"( Integer'Pos( a_frs1516.accinsp ));
      params( 1331 ) := "+"( Float( a_frs1516.hosinsp ));
      params( 1332 ) := "+"( Integer'Pos( a_frs1516.gtssp ));
      params( 1333 ) := "+"( Integer'Pos( a_frs1516.gasp ));
      params( 1334 ) := "+"( Integer'Pos( a_frs1516.iwcsp ));
      params( 1335 ) := "+"( Integer'Pos( a_frs1516.r2wcsp ));
      params( 1336 ) := "+"( Integer'Pos( a_frs1516.widplsp ));
      params( 1337 ) := "+"( Float( a_frs1516.uninssp ));
      params( 1338 ) := "+"( Integer'Pos( a_frs1516.wfamtsp ));
      params( 1339 ) := "+"( Float( a_frs1516.dssdpisp ));
      params( 1340 ) := "+"( Float( a_frs1516.dssdpjsp ));
      params( 1341 ) := "+"( Float( a_frs1516.sfrpaisp ));
      params( 1342 ) := "+"( Float( a_frs1516.sfrpajsp ));
      params( 1343 ) := "+"( Integer'Pos( a_frs1516.exhbsp ));
      params( 1344 ) := "+"( Float( a_frs1516.perhinsp ));
      params( 1345 ) := "+"( Float( a_frs1516.otsiinsp ));
      params( 1346 ) := "+"( Integer'Pos( a_frs1516.cicsp ));
      params( 1347 ) := "+"( Float( a_frs1516.bowtcsp ));
      params( 1348 ) := "+"( Float( a_frs1516.boctcsp ));
      params( 1349 ) := "+"( Integer'Pos( a_frs1516.bowtclsp ));
      params( 1350 ) := "+"( Float( a_frs1516.boctclsp ));
      params( 1351 ) := "+"( Float( a_frs1516.hbsp ));
      params( 1352 ) := "+"( Float( a_frs1516.ucsp ));
      params( 1353 ) := "+"( Float( a_frs1516.pipdsp ));
      params( 1354 ) := "+"( Float( a_frs1516.pipmsp ));
      params( 1355 ) := "+"( Integer'Pos( a_frs1516.lndwpsp ));
      params( 1356 ) := "+"( Integer'Pos( a_frs1516.lnlasp ));
      params( 1357 ) := "+"( Integer'Pos( a_frs1516.dwpaucsp ));
      params( 1358 ) := "+"( Float( a_frs1516.sfrpucsp ));
      params( 1359 ) := "+"( Integer'Pos( a_frs1516.ltdlachd ));
      params( 1360 ) := "+"( Integer'Pos( a_frs1516.ltdlamhd ));
      params( 1361 ) := "+"( Integer'Pos( a_frs1516.ltcbhd ));
      params( 1362 ) := "+"( Integer'Pos( a_frs1516.bopenchd ));
      params( 1363 ) := "+"( Integer'Pos( a_frs1516.ltrphd ));
      params( 1364 ) := "+"( Integer'Pos( a_frs1516.ltwphd ));
      params( 1365 ) := "+"( Integer'Pos( a_frs1516.ltwdphd ));
      params( 1366 ) := "+"( Integer'Pos( a_frs1516.ltwwphd ));
      params( 1367 ) := "+"( Integer'Pos( a_frs1516.ltsdahd ));
      params( 1368 ) := "+"( Integer'Pos( a_frs1516.ltaahd ));
      params( 1369 ) := "+"( Integer'Pos( a_frs1516.lticahd ));
      params( 1370 ) := "+"( Integer'Pos( a_frs1516.ltjsahd ));
      params( 1371 ) := "+"( Integer'Pos( a_frs1516.ltiidbhd ));
      params( 1372 ) := "+"( Integer'Pos( a_frs1516.ltesahd ));
      params( 1373 ) := "+"( Integer'Pos( a_frs1516.ltibhd ));
      params( 1374 ) := "+"( Integer'Pos( a_frs1516.ltishd ));
      params( 1375 ) := "+"( Integer'Pos( a_frs1516.ltmahd ));
      params( 1376 ) := "+"( Integer'Pos( a_frs1516.ltshhd ));
      params( 1377 ) := "+"( Integer'Pos( a_frs1516.ltgahd ));
      params( 1378 ) := "+"( Integer'Pos( a_frs1516.hwtchd ));
      params( 1379 ) := "+"( Integer'Pos( a_frs1516.hctchd ));
      params( 1380 ) := "+"( Integer'Pos( a_frs1516.hwtclhd ));
      params( 1381 ) := "+"( Integer'Pos( a_frs1516.hctclhd ));
      params( 1382 ) := "+"( Integer'Pos( a_frs1516.ltuchd ));
      params( 1383 ) := "+"( Integer'Pos( a_frs1516.ltpipdhd ));
      params( 1384 ) := "+"( Integer'Pos( a_frs1516.ltpipmhd ));
      params( 1385 ) := "+"( Integer'Pos( a_frs1516.ltdlacsp ));
      params( 1386 ) := "+"( Integer'Pos( a_frs1516.ltdlamsp ));
      params( 1387 ) := "+"( Integer'Pos( a_frs1516.ltcbsp ));
      params( 1388 ) := "+"( Integer'Pos( a_frs1516.bopencsp ));
      params( 1389 ) := "+"( Integer'Pos( a_frs1516.ltrpsp ));
      params( 1390 ) := "+"( Integer'Pos( a_frs1516.ltwpsp ));
      params( 1391 ) := "+"( Integer'Pos( a_frs1516.ltwdpsp ));
      params( 1392 ) := "+"( Integer'Pos( a_frs1516.ltwwpsp ));
      params( 1393 ) := "+"( Integer'Pos( a_frs1516.ltsdasp ));
      params( 1394 ) := "+"( Integer'Pos( a_frs1516.ltaasp ));
      params( 1395 ) := "+"( Integer'Pos( a_frs1516.lticasp ));
      params( 1396 ) := "+"( Integer'Pos( a_frs1516.ltjsasp ));
      params( 1397 ) := "+"( Integer'Pos( a_frs1516.ltiidbsp ));
      params( 1398 ) := "+"( Integer'Pos( a_frs1516.ltesasp ));
      params( 1399 ) := "+"( Integer'Pos( a_frs1516.ltibsp ));
      params( 1400 ) := "+"( Integer'Pos( a_frs1516.ltissp ));
      params( 1401 ) := "+"( Integer'Pos( a_frs1516.ltmasp ));
      params( 1402 ) := "+"( Integer'Pos( a_frs1516.ltshsp ));
      params( 1403 ) := "+"( Integer'Pos( a_frs1516.ltgasp ));
      params( 1404 ) := "+"( Integer'Pos( a_frs1516.hwtcsp ));
      params( 1405 ) := "+"( Integer'Pos( a_frs1516.hctcsp ));
      params( 1406 ) := "+"( Integer'Pos( a_frs1516.hwtclsp ));
      params( 1407 ) := "+"( Integer'Pos( a_frs1516.hctclsp ));
      params( 1408 ) := "+"( Integer'Pos( a_frs1516.ltucsp ));
      params( 1409 ) := "+"( Integer'Pos( a_frs1516.ltpipdsp ));
      params( 1410 ) := "+"( Integer'Pos( a_frs1516.ltpipmsp ));
      params( 1411 ) := "+"( Integer'Pos( a_frs1516.pdlacahd ));
      params( 1412 ) := "+"( Integer'Pos( a_frs1516.pdlamohd ));
      params( 1413 ) := "+"( Integer'Pos( a_frs1516.pcbhd ));
      params( 1414 ) := "+"( Integer'Pos( a_frs1516.hpenchd ));
      params( 1415 ) := "+"( Integer'Pos( a_frs1516.prphd ));
      params( 1416 ) := "+"( Integer'Pos( a_frs1516.pwphd ));
      params( 1417 ) := "+"( Integer'Pos( a_frs1516.pwdphd ));
      params( 1418 ) := "+"( Integer'Pos( a_frs1516.pwwphd ));
      params( 1419 ) := "+"( Integer'Pos( a_frs1516.psdahd ));
      params( 1420 ) := "+"( Integer'Pos( a_frs1516.paahd ));
      params( 1421 ) := "+"( Integer'Pos( a_frs1516.picahd ));
      params( 1422 ) := "+"( Integer'Pos( a_frs1516.pjsahd ));
      params( 1423 ) := "+"( Integer'Pos( a_frs1516.piidbhd ));
      params( 1424 ) := "+"( Integer'Pos( a_frs1516.pesahd ));
      params( 1425 ) := "+"( Integer'Pos( a_frs1516.pibhd ));
      params( 1426 ) := "+"( Integer'Pos( a_frs1516.pishd ));
      params( 1427 ) := "+"( Integer'Pos( a_frs1516.pmahd ));
      params( 1428 ) := "+"( Integer'Pos( a_frs1516.pothbehd ));
      params( 1429 ) := "+"( Integer'Pos( a_frs1516.ptubenhd ));
      params( 1430 ) := "+"( Integer'Pos( a_frs1516.pfsbenhd ));
      params( 1431 ) := "+"( Integer'Pos( a_frs1516.psicinhd ));
      params( 1432 ) := "+"( Integer'Pos( a_frs1516.paccinhd ));
      params( 1433 ) := "+"( Integer'Pos( a_frs1516.phosinhd ));
      params( 1434 ) := "+"( Integer'Pos( a_frs1516.pgtshd ));
      params( 1435 ) := "+"( Integer'Pos( a_frs1516.pgahd ));
      params( 1436 ) := "+"( Integer'Pos( a_frs1516.iwcpdhd ));
      params( 1437 ) := "+"( Integer'Pos( a_frs1516.r2wcpdhd ));
      params( 1438 ) := "+"( Integer'Pos( a_frs1516.puninshd ));
      params( 1439 ) := "+"( Integer'Pos( a_frs1516.pdsspihd ));
      params( 1440 ) := "+"( Integer'Pos( a_frs1516.pdsspjhd ));
      params( 1441 ) := "+"( Integer'Pos( a_frs1516.pexhbhd ));
      params( 1442 ) := "+"( Integer'Pos( a_frs1516.ppehinhd ));
      params( 1443 ) := "+"( Integer'Pos( a_frs1516.potsinhd ));
      params( 1444 ) := "+"( Integer'Pos( a_frs1516.pdcichd ));
      params( 1445 ) := "+"( Integer'Pos( a_frs1516.wwtchd ));
      params( 1446 ) := "+"( Integer'Pos( a_frs1516.wctchd ));
      params( 1447 ) := "+"( Integer'Pos( a_frs1516.wwtclhd ));
      params( 1448 ) := "+"( Integer'Pos( a_frs1516.wctclhd ));
      params( 1449 ) := "+"( Integer'Pos( a_frs1516.phbhd ));
      params( 1450 ) := "+"( Integer'Pos( a_frs1516.puchd ));
      params( 1451 ) := "+"( Integer'Pos( a_frs1516.ppipdhd ));
      params( 1452 ) := "+"( Integer'Pos( a_frs1516.ppipmhd ));
      params( 1453 ) := "+"( Integer'Pos( a_frs1516.pdwpuchd ));
      params( 1454 ) := "+"( Integer'Pos( a_frs1516.pdlacasp ));
      params( 1455 ) := "+"( Integer'Pos( a_frs1516.pdlamosp ));
      params( 1456 ) := "+"( Integer'Pos( a_frs1516.pcbsp ));
      params( 1457 ) := "+"( Integer'Pos( a_frs1516.hpencsp ));
      params( 1458 ) := "+"( Integer'Pos( a_frs1516.prpsp ));
      params( 1459 ) := "+"( Integer'Pos( a_frs1516.pwpsp ));
      params( 1460 ) := "+"( Integer'Pos( a_frs1516.pwdpsp ));
      params( 1461 ) := "+"( Integer'Pos( a_frs1516.pwwpsp ));
      params( 1462 ) := "+"( Integer'Pos( a_frs1516.psdasp ));
      params( 1463 ) := "+"( Integer'Pos( a_frs1516.paasp ));
      params( 1464 ) := "+"( Integer'Pos( a_frs1516.picasp ));
      params( 1465 ) := "+"( Integer'Pos( a_frs1516.pjsasp ));
      params( 1466 ) := "+"( Integer'Pos( a_frs1516.piidbsp ));
      params( 1467 ) := "+"( Integer'Pos( a_frs1516.pesasp ));
      params( 1468 ) := "+"( Integer'Pos( a_frs1516.pibsp ));
      params( 1469 ) := "+"( Integer'Pos( a_frs1516.pissp ));
      params( 1470 ) := "+"( Integer'Pos( a_frs1516.pmasp ));
      params( 1471 ) := "+"( Integer'Pos( a_frs1516.pothbesp ));
      params( 1472 ) := "+"( Integer'Pos( a_frs1516.ptubensp ));
      params( 1473 ) := "+"( Integer'Pos( a_frs1516.pfsbensp ));
      params( 1474 ) := "+"( Integer'Pos( a_frs1516.psicinsp ));
      params( 1475 ) := "+"( Integer'Pos( a_frs1516.paccinsp ));
      params( 1476 ) := "+"( Integer'Pos( a_frs1516.phosinsp ));
      params( 1477 ) := "+"( Integer'Pos( a_frs1516.pgtssp ));
      params( 1478 ) := "+"( Integer'Pos( a_frs1516.pgasp ));
      params( 1479 ) := "+"( Integer'Pos( a_frs1516.iwcpdsp ));
      params( 1480 ) := "+"( Integer'Pos( a_frs1516.r2wcpdsp ));
      params( 1481 ) := "+"( Integer'Pos( a_frs1516.puninssp ));
      params( 1482 ) := "+"( Integer'Pos( a_frs1516.pdsspisp ));
      params( 1483 ) := "+"( Integer'Pos( a_frs1516.pdsspjsp ));
      params( 1484 ) := "+"( Integer'Pos( a_frs1516.pexhbsp ));
      params( 1485 ) := "+"( Integer'Pos( a_frs1516.ppehinsp ));
      params( 1486 ) := "+"( Integer'Pos( a_frs1516.potsinsp ));
      params( 1487 ) := "+"( Integer'Pos( a_frs1516.pdcicsp ));
      params( 1488 ) := "+"( Integer'Pos( a_frs1516.wwtcsp ));
      params( 1489 ) := "+"( Integer'Pos( a_frs1516.wctcsp ));
      params( 1490 ) := "+"( Integer'Pos( a_frs1516.wwtclsp ));
      params( 1491 ) := "+"( Integer'Pos( a_frs1516.wctclsp ));
      params( 1492 ) := "+"( Integer'Pos( a_frs1516.phbsp ));
      params( 1493 ) := "+"( Integer'Pos( a_frs1516.pucsp ));
      params( 1494 ) := "+"( Integer'Pos( a_frs1516.ppipdsp ));
      params( 1495 ) := "+"( Integer'Pos( a_frs1516.ppipmsp ));
      params( 1496 ) := "+"( Integer'Pos( a_frs1516.pdwpucsp ));
      params( 1497 ) := "+"( Integer'Pos( a_frs1516.cbpayehd ));
      params( 1498 ) := "+"( Integer'Pos( a_frs1516.cbpayesp ));
      params( 1499 ) := "+"( Integer'Pos( a_frs1516.cbtaxhd ));
      params( 1500 ) := "+"( Integer'Pos( a_frs1516.cbtaxsp ));
      params( 1501 ) := "+"( Integer'Pos( a_frs1516.pwtchd ));
      params( 1502 ) := "+"( Integer'Pos( a_frs1516.pctchd ));
      params( 1503 ) := "+"( Integer'Pos( a_frs1516.pwtcsp ));
      params( 1504 ) := "+"( Integer'Pos( a_frs1516.pctcsp ));
      params( 1505 ) := "+"( Integer'Pos( a_frs1516.npcamthd ));
      params( 1506 ) := "+"( Float( a_frs1516.urphd ));
      params( 1507 ) := "+"( Integer'Pos( a_frs1516.uwphd ));
      params( 1508 ) := "+"( Float( a_frs1516.uesahd ));
      params( 1509 ) := "+"( Float( a_frs1516.uishd ));
      params( 1510 ) := "+"( Float( a_frs1516.uwtchd ));
      params( 1511 ) := "+"( Integer'Pos( a_frs1516.uctchd ));
      params( 1512 ) := "+"( Integer'Pos( a_frs1516.npcamtsp ));
      params( 1513 ) := "+"( Float( a_frs1516.urpsp ));
      params( 1514 ) := "+"( Integer'Pos( a_frs1516.uwpsp ));
      params( 1515 ) := "+"( Float( a_frs1516.uesasp ));
      params( 1516 ) := "+"( Integer'Pos( a_frs1516.uissp ));
      params( 1517 ) := "+"( Float( a_frs1516.uwtcsp ));
      params( 1518 ) := "+"( Integer'Pos( a_frs1516.uctcsp ));
      params( 1519 ) := "+"( Integer'Pos( a_frs1516.dmpenchd ));
      params( 1520 ) := "+"( Integer'Pos( a_frs1516.purphd ));
      params( 1521 ) := "+"( Integer'Pos( a_frs1516.puwphd ));
      params( 1522 ) := "+"( Integer'Pos( a_frs1516.nupesahd ));
      params( 1523 ) := "+"( Integer'Pos( a_frs1516.puishd ));
      params( 1524 ) := "+"( Integer'Pos( a_frs1516.dmpencsp ));
      params( 1525 ) := "+"( Integer'Pos( a_frs1516.purpsp ));
      params( 1526 ) := "+"( Integer'Pos( a_frs1516.puwpsp ));
      params( 1527 ) := "+"( Integer'Pos( a_frs1516.nupesasp ));
      params( 1528 ) := "+"( Integer'Pos( a_frs1516.puissp ));
      params( 1529 ) := "+"( Integer'Pos( a_frs1516.wjsahd ));
      params( 1530 ) := "+"( Integer'Pos( a_frs1516.wesahd ));
      params( 1531 ) := "+"( Integer'Pos( a_frs1516.wishd ));
      params( 1532 ) := "+"( Integer'Pos( a_frs1516.wothbehd ));
      params( 1533 ) := "+"( Integer'Pos( a_frs1516.wtubenhd ));
      params( 1534 ) := "+"( Integer'Pos( a_frs1516.wfsbenhd ));
      params( 1535 ) := "+"( Integer'Pos( a_frs1516.wsicinhd ));
      params( 1536 ) := "+"( Integer'Pos( a_frs1516.waccinhd ));
      params( 1537 ) := "+"( Integer'Pos( a_frs1516.whosinhd ));
      params( 1538 ) := "+"( Integer'Pos( a_frs1516.wkiwchd ));
      params( 1539 ) := "+"( Integer'Pos( a_frs1516.wkr2whd ));
      params( 1540 ) := "+"( Integer'Pos( a_frs1516.wuninshd ));
      params( 1541 ) := "+"( Integer'Pos( a_frs1516.wpehinhd ));
      params( 1542 ) := "+"( Integer'Pos( a_frs1516.wotsinhd ));
      params( 1543 ) := "+"( Integer'Pos( a_frs1516.wocichd ));
      params( 1544 ) := "+"( Integer'Pos( a_frs1516.whbhd ));
      params( 1545 ) := "+"( Integer'Pos( a_frs1516.wjsasp ));
      params( 1546 ) := "+"( Integer'Pos( a_frs1516.wesasp ));
      params( 1547 ) := "+"( Integer'Pos( a_frs1516.wissp ));
      params( 1548 ) := "+"( Integer'Pos( a_frs1516.wothbesp ));
      params( 1549 ) := "+"( Integer'Pos( a_frs1516.wtubensp ));
      params( 1550 ) := "+"( Integer'Pos( a_frs1516.wfsbensp ));
      params( 1551 ) := "+"( Integer'Pos( a_frs1516.wsicinsp ));
      params( 1552 ) := "+"( Integer'Pos( a_frs1516.waccinsp ));
      params( 1553 ) := "+"( Integer'Pos( a_frs1516.whosinsp ));
      params( 1554 ) := "+"( Integer'Pos( a_frs1516.wkiwcsp ));
      params( 1555 ) := "+"( Integer'Pos( a_frs1516.wkr2wsp ));
      params( 1556 ) := "+"( Integer'Pos( a_frs1516.wuninssp ));
      params( 1557 ) := "+"( Integer'Pos( a_frs1516.wpehinsp ));
      params( 1558 ) := "+"( Integer'Pos( a_frs1516.wotsinsp ));
      params( 1559 ) := "+"( Integer'Pos( a_frs1516.wocicsp ));
      params( 1560 ) := "+"( Integer'Pos( a_frs1516.whbsp ));
      params( 1561 ) := "+"( Integer'Pos( a_frs1516.yjsahd ));
      params( 1562 ) := "+"( Integer'Pos( a_frs1516.yesahd ));
      params( 1563 ) := "+"( Integer'Pos( a_frs1516.yishd ));
      params( 1564 ) := "+"( Integer'Pos( a_frs1516.yhbhd ));
      params( 1565 ) := "+"( Integer'Pos( a_frs1516.yjsasp ));
      params( 1566 ) := "+"( Integer'Pos( a_frs1516.yesasp ));
      params( 1567 ) := "+"( Integer'Pos( a_frs1516.yissp ));
      params( 1568 ) := "+"( Integer'Pos( a_frs1516.yhbsp ));
      params( 1569 ) := "+"( Integer'Pos( a_frs1516.prothbhd ));
      params( 1570 ) := "+"( Integer'Pos( a_frs1516.prtubehd ));
      params( 1571 ) := "+"( Integer'Pos( a_frs1516.prfsbehd ));
      params( 1572 ) := "+"( Integer'Pos( a_frs1516.prsicihd ));
      params( 1573 ) := "+"( Integer'Pos( a_frs1516.praccihd ));
      params( 1574 ) := "+"( Integer'Pos( a_frs1516.prhosihd ));
      params( 1575 ) := "+"( Integer'Pos( a_frs1516.pruninhd ));
      params( 1576 ) := "+"( Integer'Pos( a_frs1516.prphinhd ));
      params( 1577 ) := "+"( Integer'Pos( a_frs1516.prosinhd ));
      params( 1578 ) := "+"( Integer'Pos( a_frs1516.prcichd ));
      params( 1579 ) := "+"( Integer'Pos( a_frs1516.prothbsp ));
      params( 1580 ) := "+"( Integer'Pos( a_frs1516.prtubesp ));
      params( 1581 ) := "+"( Integer'Pos( a_frs1516.prfsbesp ));
      params( 1582 ) := "+"( Integer'Pos( a_frs1516.prsicisp ));
      params( 1583 ) := "+"( Integer'Pos( a_frs1516.praccisp ));
      params( 1584 ) := "+"( Integer'Pos( a_frs1516.prhosisp ));
      params( 1585 ) := "+"( Integer'Pos( a_frs1516.pruninsp ));
      params( 1586 ) := "+"( Integer'Pos( a_frs1516.prphinsp ));
      params( 1587 ) := "+"( Integer'Pos( a_frs1516.prosinsp ));
      params( 1588 ) := "+"( Integer'Pos( a_frs1516.prcicsp ));
      params( 1589 ) := "+"( Integer'Pos( a_frs1516.uspenchd ));
      params( 1590 ) := "+"( Integer'Pos( a_frs1516.usrphd ));
      params( 1591 ) := "+"( Integer'Pos( a_frs1516.uswphd ));
      params( 1592 ) := "+"( Integer'Pos( a_frs1516.usjsahd ));
      params( 1593 ) := "+"( Integer'Pos( a_frs1516.usishd ));
      params( 1594 ) := "+"( Integer'Pos( a_frs1516.uspencsp ));
      params( 1595 ) := "+"( Integer'Pos( a_frs1516.usrpsp ));
      params( 1596 ) := "+"( Integer'Pos( a_frs1516.uswpsp ));
      params( 1597 ) := "+"( Integer'Pos( a_frs1516.usjsasp ));
      params( 1598 ) := "+"( Integer'Pos( a_frs1516.usissp ));
      params( 1599 ) := "+"( Integer'Pos( a_frs1516.gicacahd ));
      params( 1600 ) := "+"( Integer'Pos( a_frs1516.pencrdhd ));
      params( 1601 ) := "+"( Integer'Pos( a_frs1516.gicaahd ));
      params( 1602 ) := "+"( Integer'Pos( a_frs1516.muibwhd ));
      params( 1603 ) := "+"( Integer'Pos( a_frs1516.wfuelhd ));
      params( 1604 ) := "+"( Integer'Pos( a_frs1516.exhbtyhd ));
      params( 1605 ) := "+"( Integer'Pos( a_frs1516.lnodwphd ));
      params( 1606 ) := "+"( Integer'Pos( a_frs1516.lnolahd ));
      params( 1607 ) := "+"( Integer'Pos( a_frs1516.gicacasp ));
      params( 1608 ) := "+"( Integer'Pos( a_frs1516.pencrdsp ));
      params( 1609 ) := "+"( Integer'Pos( a_frs1516.gicaasp ));
      params( 1610 ) := "+"( Integer'Pos( a_frs1516.muibwsp ));
      params( 1611 ) := "+"( Integer'Pos( a_frs1516.wfuelsp ));
      params( 1612 ) := "+"( Integer'Pos( a_frs1516.exhbtysp ));
      params( 1613 ) := "+"( Integer'Pos( a_frs1516.lnodwpsp ));
      params( 1614 ) := "+"( Integer'Pos( a_frs1516.lnolasp ));
      params( 1615 ) := "+"( Integer'Pos( a_frs1516.dcpayhd ));
      params( 1616 ) := "+"( Integer'Pos( a_frs1516.dmpayhd ));
      params( 1617 ) := "+"( Integer'Pos( a_frs1516.ecpenchd ));
      params( 1618 ) := "+"( Integer'Pos( a_frs1516.wporbahd ));
      params( 1619 ) := "+"( Integer'Pos( a_frs1516.aapayhd ));
      params( 1620 ) := "+"( Integer'Pos( a_frs1516.jsatyphd ));
      params( 1621 ) := "+"( Integer'Pos( a_frs1516.esatyphd ));
      params( 1622 ) := "+"( Integer'Pos( a_frs1516.mupibhd ));
      params( 1623 ) := "+"( Integer'Pos( a_frs1516.dssishd ));
      params( 1624 ) := "+"( Integer'Pos( a_frs1516.dssjsahd ));
      params( 1625 ) := "+"( Integer'Pos( a_frs1516.sfincihd ));
      params( 1626 ) := "+"( Integer'Pos( a_frs1516.sfincjhd ));
      params( 1627 ) := "+"( Integer'Pos( a_frs1516.pdlpayhd ));
      params( 1628 ) := "+"( Integer'Pos( a_frs1516.pmpayhd ));
      params( 1629 ) := "+"( Integer'Pos( a_frs1516.dwpuchd ));
      params( 1630 ) := "+"( Integer'Pos( a_frs1516.sfinuchd ));
      params( 1631 ) := "+"( Integer'Pos( a_frs1516.dcpaysp ));
      params( 1632 ) := "+"( Integer'Pos( a_frs1516.dmpaysp ));
      params( 1633 ) := "+"( Integer'Pos( a_frs1516.ecpencsp ));
      params( 1634 ) := "+"( Integer'Pos( a_frs1516.wporbasp ));
      params( 1635 ) := "+"( Integer'Pos( a_frs1516.aapaysp ));
      params( 1636 ) := "+"( Integer'Pos( a_frs1516.jsatypsp ));
      params( 1637 ) := "+"( Integer'Pos( a_frs1516.esatypsp ));
      params( 1638 ) := "+"( Integer'Pos( a_frs1516.mupibsp ));
      params( 1639 ) := "+"( Integer'Pos( a_frs1516.dssissp ));
      params( 1640 ) := "+"( Integer'Pos( a_frs1516.dssjsasp ));
      params( 1641 ) := "+"( Integer'Pos( a_frs1516.sfincisp ));
      params( 1642 ) := "+"( Integer'Pos( a_frs1516.sfincjsp ));
      params( 1643 ) := "+"( Integer'Pos( a_frs1516.pdlpaysp ));
      params( 1644 ) := "+"( Integer'Pos( a_frs1516.pmpaysp ));
      params( 1645 ) := "+"( Integer'Pos( a_frs1516.dwpucsp ));
      params( 1646 ) := "+"( Integer'Pos( a_frs1516.sfinucsp ));
      params( 1647 ) := "+"( Integer'Pos( a_frs1516.icaperhd ));
      params( 1648 ) := "+"( Integer'Pos( a_frs1516.pmuibhd ));
      params( 1649 ) := "+"( Integer'Pos( a_frs1516.pipmothd ));
      params( 1650 ) := "+"( Integer'Pos( a_frs1516.icapersp ));
      params( 1651 ) := "+"( Integer'Pos( a_frs1516.pmuibsp ));
      params( 1652 ) := "+"( Integer'Pos( a_frs1516.pipmotsp ));
      params( 1653 ) := "+"( Integer'Pos( a_frs1516.r1dlchd ));
      params( 1654 ) := "+"( Integer'Pos( a_frs1516.r1dlmhd ));
      params( 1655 ) := "+"( Integer'Pos( a_frs1516.r1aahd ));
      params( 1656 ) := "+"( Integer'Pos( a_frs1516.r1hbhd ));
      params( 1657 ) := "+"( Integer'Pos( a_frs1516.r1pipdhd ));
      params( 1658 ) := "+"( Integer'Pos( a_frs1516.r1pipmhd ));
      params( 1659 ) := "+"( Integer'Pos( a_frs1516.r1dlcsp ));
      params( 1660 ) := "+"( Integer'Pos( a_frs1516.r1dlmsp ));
      params( 1661 ) := "+"( Integer'Pos( a_frs1516.r1aasp ));
      params( 1662 ) := "+"( Integer'Pos( a_frs1516.r1hbsp ));
      params( 1663 ) := "+"( Integer'Pos( a_frs1516.r1pipdsp ));
      params( 1664 ) := "+"( Integer'Pos( a_frs1516.r1pipmsp ));
      params( 1665 ) := "+"( Integer'Pos( a_frs1516.r2dlchd ));
      params( 1666 ) := "+"( Integer'Pos( a_frs1516.r2dlmhd ));
      params( 1667 ) := "+"( Integer'Pos( a_frs1516.r2aahd ));
      params( 1668 ) := "+"( Integer'Pos( a_frs1516.r2hbhd ));
      params( 1669 ) := "+"( Integer'Pos( a_frs1516.r2pipdhd ));
      params( 1670 ) := "+"( Integer'Pos( a_frs1516.r2pipmhd ));
      params( 1671 ) := "+"( Integer'Pos( a_frs1516.r2dlcsp ));
      params( 1672 ) := "+"( Integer'Pos( a_frs1516.r2dlmsp ));
      params( 1673 ) := "+"( Integer'Pos( a_frs1516.r2aasp ));
      params( 1674 ) := "+"( Integer'Pos( a_frs1516.r2hbsp ));
      params( 1675 ) := "+"( Integer'Pos( a_frs1516.r2pipdsp ));
      params( 1676 ) := "+"( Integer'Pos( a_frs1516.r2pipmsp ));
      params( 1677 ) := "+"( Integer'Pos( a_frs1516.r3dlchd ));
      params( 1678 ) := "+"( Integer'Pos( a_frs1516.r3dlmhd ));
      params( 1679 ) := "+"( Integer'Pos( a_frs1516.r3aahd ));
      params( 1680 ) := "+"( Integer'Pos( a_frs1516.r3hbhd ));
      params( 1681 ) := "+"( Integer'Pos( a_frs1516.r3pipdhd ));
      params( 1682 ) := "+"( Integer'Pos( a_frs1516.r3pipmhd ));
      params( 1683 ) := "+"( Integer'Pos( a_frs1516.r3dlcsp ));
      params( 1684 ) := "+"( Integer'Pos( a_frs1516.r3dlmsp ));
      params( 1685 ) := "+"( Integer'Pos( a_frs1516.r3aasp ));
      params( 1686 ) := "+"( Integer'Pos( a_frs1516.r3hbsp ));
      params( 1687 ) := "+"( Integer'Pos( a_frs1516.r3pipdsp ));
      params( 1688 ) := "+"( Integer'Pos( a_frs1516.r3pipmsp ));
      params( 1689 ) := "+"( Integer'Pos( a_frs1516.r4dlchd ));
      params( 1690 ) := "+"( Integer'Pos( a_frs1516.r4dlmhd ));
      params( 1691 ) := "+"( Integer'Pos( a_frs1516.r4aahd ));
      params( 1692 ) := "+"( Integer'Pos( a_frs1516.r4hbhd ));
      params( 1693 ) := "+"( Integer'Pos( a_frs1516.r4pipdhd ));
      params( 1694 ) := "+"( Integer'Pos( a_frs1516.r4pipmhd ));
      params( 1695 ) := "+"( Integer'Pos( a_frs1516.r4dlcsp ));
      params( 1696 ) := "+"( Integer'Pos( a_frs1516.r4dlmsp ));
      params( 1697 ) := "+"( Integer'Pos( a_frs1516.r4aasp ));
      params( 1698 ) := "+"( Integer'Pos( a_frs1516.r4hbsp ));
      params( 1699 ) := "+"( Integer'Pos( a_frs1516.r4pipdsp ));
      params( 1700 ) := "+"( Integer'Pos( a_frs1516.r4pipmsp ));
      params( 1701 ) := "+"( Integer'Pos( a_frs1516.r5dlchd ));
      params( 1702 ) := "+"( Integer'Pos( a_frs1516.r5dlmhd ));
      params( 1703 ) := "+"( Integer'Pos( a_frs1516.r5aahd ));
      params( 1704 ) := "+"( Integer'Pos( a_frs1516.r5hbhd ));
      params( 1705 ) := "+"( Integer'Pos( a_frs1516.r5pipdhd ));
      params( 1706 ) := "+"( Integer'Pos( a_frs1516.r5pipmhd ));
      params( 1707 ) := "+"( Integer'Pos( a_frs1516.r5dlcsp ));
      params( 1708 ) := "+"( Integer'Pos( a_frs1516.r5dlmsp ));
      params( 1709 ) := "+"( Integer'Pos( a_frs1516.r5aasp ));
      params( 1710 ) := "+"( Integer'Pos( a_frs1516.r5hbsp ));
      params( 1711 ) := "+"( Integer'Pos( a_frs1516.r5pipdsp ));
      params( 1712 ) := "+"( Integer'Pos( a_frs1516.r5pipmsp ));
      params( 1713 ) := "+"( Integer'Pos( a_frs1516.stdlacc1 ));
      params( 1714 ) := "+"( Integer'Pos( a_frs1516.stdlamc1 ));
      params( 1715 ) := "+"( Integer'Pos( a_frs1516.stdlacc2 ));
      params( 1716 ) := "+"( Integer'Pos( a_frs1516.stdlamc2 ));
      params( 1717 ) := "+"( Integer'Pos( a_frs1516.stdlacc3 ));
      params( 1718 ) := "+"( Integer'Pos( a_frs1516.stdlamc3 ));
      params( 1719 ) := "+"( Integer'Pos( a_frs1516.stdlacc4 ));
      params( 1720 ) := "+"( Integer'Pos( a_frs1516.stdlamc4 ));
      params( 1721 ) := "+"( Integer'Pos( a_frs1516.stdlacc5 ));
      params( 1722 ) := "+"( Integer'Pos( a_frs1516.stdlamc5 ));
      params( 1723 ) := "+"( Integer'Pos( a_frs1516.stdlacc6 ));
      params( 1724 ) := "+"( Integer'Pos( a_frs1516.stdlamc6 ));
      params( 1725 ) := "+"( Integer'Pos( a_frs1516.stdlacc7 ));
      params( 1726 ) := "+"( Integer'Pos( a_frs1516.stdlamc7 ));
      params( 1727 ) := "+"( Integer'Pos( a_frs1516.stdlacc8 ));
      params( 1728 ) := "+"( Integer'Pos( a_frs1516.stdlamc8 ));
      params( 1729 ) := "+"( Integer'Pos( a_frs1516.stdlacc9 ));
      params( 1730 ) := "+"( Integer'Pos( a_frs1516.stdlamc9 ));
      params( 1731 ) := "+"( Float( a_frs1516.dlacac1 ));
      params( 1732 ) := "+"( Float( a_frs1516.dlamoc1 ));
      params( 1733 ) := "+"( Float( a_frs1516.dlacac2 ));
      params( 1734 ) := "+"( Float( a_frs1516.dlamoc2 ));
      params( 1735 ) := "+"( Integer'Pos( a_frs1516.dlacac3 ));
      params( 1736 ) := "+"( Integer'Pos( a_frs1516.dlamoc3 ));
      params( 1737 ) := "+"( Integer'Pos( a_frs1516.dlacac4 ));
      params( 1738 ) := "+"( Integer'Pos( a_frs1516.dlamoc4 ));
      params( 1739 ) := "+"( Integer'Pos( a_frs1516.dlacac5 ));
      params( 1740 ) := "+"( Integer'Pos( a_frs1516.dlamoc5 ));
      params( 1741 ) := "+"( Integer'Pos( a_frs1516.dlacac6 ));
      params( 1742 ) := "+"( Integer'Pos( a_frs1516.dlamoc6 ));
      params( 1743 ) := "+"( Integer'Pos( a_frs1516.dlacac7 ));
      params( 1744 ) := "+"( Integer'Pos( a_frs1516.dlamoc7 ));
      params( 1745 ) := "+"( Integer'Pos( a_frs1516.dlacac8 ));
      params( 1746 ) := "+"( Integer'Pos( a_frs1516.dlamoc8 ));
      params( 1747 ) := "+"( Integer'Pos( a_frs1516.dlacac9 ));
      params( 1748 ) := "+"( Integer'Pos( a_frs1516.dlamoc9 ));
      params( 1749 ) := "+"( Integer'Pos( a_frs1516.ltdlacc1 ));
      params( 1750 ) := "+"( Integer'Pos( a_frs1516.ltdlamc1 ));
      params( 1751 ) := "+"( Integer'Pos( a_frs1516.ltdlacc2 ));
      params( 1752 ) := "+"( Integer'Pos( a_frs1516.ltdlamc2 ));
      params( 1753 ) := "+"( Integer'Pos( a_frs1516.ltdlacc3 ));
      params( 1754 ) := "+"( Integer'Pos( a_frs1516.ltdlamc3 ));
      params( 1755 ) := "+"( Integer'Pos( a_frs1516.ltdlacc4 ));
      params( 1756 ) := "+"( Integer'Pos( a_frs1516.ltdlamc4 ));
      params( 1757 ) := "+"( Integer'Pos( a_frs1516.ltdlacc5 ));
      params( 1758 ) := "+"( Integer'Pos( a_frs1516.ltdlamc5 ));
      params( 1759 ) := "+"( Integer'Pos( a_frs1516.ltdlacc6 ));
      params( 1760 ) := "+"( Integer'Pos( a_frs1516.ltdlamc6 ));
      params( 1761 ) := "+"( Integer'Pos( a_frs1516.ltdlacc7 ));
      params( 1762 ) := "+"( Integer'Pos( a_frs1516.ltdlamc7 ));
      params( 1763 ) := "+"( Integer'Pos( a_frs1516.ltdlacc8 ));
      params( 1764 ) := "+"( Integer'Pos( a_frs1516.ltdlamc8 ));
      params( 1765 ) := "+"( Integer'Pos( a_frs1516.ltdlacc9 ));
      params( 1766 ) := "+"( Integer'Pos( a_frs1516.ltdlamc9 ));
      params( 1767 ) := "+"( Integer'Pos( a_frs1516.pdlacac1 ));
      params( 1768 ) := "+"( Integer'Pos( a_frs1516.pdlamoc1 ));
      params( 1769 ) := "+"( Integer'Pos( a_frs1516.pdlacac2 ));
      params( 1770 ) := "+"( Integer'Pos( a_frs1516.pdlamoc2 ));
      params( 1771 ) := "+"( Integer'Pos( a_frs1516.pdlacac3 ));
      params( 1772 ) := "+"( Integer'Pos( a_frs1516.pdlamoc3 ));
      params( 1773 ) := "+"( Integer'Pos( a_frs1516.pdlacac4 ));
      params( 1774 ) := "+"( Integer'Pos( a_frs1516.pdlamoc4 ));
      params( 1775 ) := "+"( Integer'Pos( a_frs1516.pdlacac5 ));
      params( 1776 ) := "+"( Integer'Pos( a_frs1516.pdlamoc5 ));
      params( 1777 ) := "+"( Integer'Pos( a_frs1516.pdlacac6 ));
      params( 1778 ) := "+"( Integer'Pos( a_frs1516.pdlamoc6 ));
      params( 1779 ) := "+"( Integer'Pos( a_frs1516.pdlacac7 ));
      params( 1780 ) := "+"( Integer'Pos( a_frs1516.pdlamoc7 ));
      params( 1781 ) := "+"( Integer'Pos( a_frs1516.pdlacac8 ));
      params( 1782 ) := "+"( Integer'Pos( a_frs1516.pdlamoc8 ));
      params( 1783 ) := "+"( Integer'Pos( a_frs1516.pdlacac9 ));
      params( 1784 ) := "+"( Integer'Pos( a_frs1516.pdlamoc9 ));
      params( 1785 ) := "+"( Integer'Pos( a_frs1516.dcpayc1 ));
      params( 1786 ) := "+"( Integer'Pos( a_frs1516.dmpayc1 ));
      params( 1787 ) := "+"( Integer'Pos( a_frs1516.dcpayc2 ));
      params( 1788 ) := "+"( Integer'Pos( a_frs1516.dmpayc2 ));
      params( 1789 ) := "+"( Integer'Pos( a_frs1516.dcpayc3 ));
      params( 1790 ) := "+"( Integer'Pos( a_frs1516.dmpayc3 ));
      params( 1791 ) := "+"( Integer'Pos( a_frs1516.dcpayc4 ));
      params( 1792 ) := "+"( Integer'Pos( a_frs1516.dmpayc4 ));
      params( 1793 ) := "+"( Integer'Pos( a_frs1516.dcpayc5 ));
      params( 1794 ) := "+"( Integer'Pos( a_frs1516.dmpayc5 ));
      params( 1795 ) := "+"( Integer'Pos( a_frs1516.dcpayc6 ));
      params( 1796 ) := "+"( Integer'Pos( a_frs1516.dmpayc6 ));
      params( 1797 ) := "+"( Integer'Pos( a_frs1516.dcpayc7 ));
      params( 1798 ) := "+"( Integer'Pos( a_frs1516.dmpayc7 ));
      params( 1799 ) := "+"( Integer'Pos( a_frs1516.dcpayc8 ));
      params( 1800 ) := "+"( Integer'Pos( a_frs1516.dmpayc8 ));
      params( 1801 ) := "+"( Integer'Pos( a_frs1516.dcpayc9 ));
      params( 1802 ) := "+"( Integer'Pos( a_frs1516.dmpayc9 ));
      params( 1803 ) := "+"( Integer'Pos( a_frs1516.r1dlcc1 ));
      params( 1804 ) := "+"( Integer'Pos( a_frs1516.r1dlmc1 ));
      params( 1805 ) := "+"( Integer'Pos( a_frs1516.r1dlcc2 ));
      params( 1806 ) := "+"( Integer'Pos( a_frs1516.r1dlmc2 ));
      params( 1807 ) := "+"( Integer'Pos( a_frs1516.r1dlcc3 ));
      params( 1808 ) := "+"( Integer'Pos( a_frs1516.r1dlmc3 ));
      params( 1809 ) := "+"( Integer'Pos( a_frs1516.r1dlcc4 ));
      params( 1810 ) := "+"( Integer'Pos( a_frs1516.r1dlmc4 ));
      params( 1811 ) := "+"( Integer'Pos( a_frs1516.r1dlcc5 ));
      params( 1812 ) := "+"( Integer'Pos( a_frs1516.r1dlmc5 ));
      params( 1813 ) := "+"( Integer'Pos( a_frs1516.r1dlcc6 ));
      params( 1814 ) := "+"( Integer'Pos( a_frs1516.r1dlmc6 ));
      params( 1815 ) := "+"( Integer'Pos( a_frs1516.r1dlcc7 ));
      params( 1816 ) := "+"( Integer'Pos( a_frs1516.r1dlmc7 ));
      params( 1817 ) := "+"( Integer'Pos( a_frs1516.r1dlcc8 ));
      params( 1818 ) := "+"( Integer'Pos( a_frs1516.r1dlmc8 ));
      params( 1819 ) := "+"( Integer'Pos( a_frs1516.r1dlcc9 ));
      params( 1820 ) := "+"( Integer'Pos( a_frs1516.r1dlmc9 ));
      params( 1821 ) := "+"( Integer'Pos( a_frs1516.r2dlcc1 ));
      params( 1822 ) := "+"( Integer'Pos( a_frs1516.r2dlmc1 ));
      params( 1823 ) := "+"( Integer'Pos( a_frs1516.r2dlcc2 ));
      params( 1824 ) := "+"( Integer'Pos( a_frs1516.r2dlmc2 ));
      params( 1825 ) := "+"( Integer'Pos( a_frs1516.r2dlcc3 ));
      params( 1826 ) := "+"( Integer'Pos( a_frs1516.r2dlmc3 ));
      params( 1827 ) := "+"( Integer'Pos( a_frs1516.r2dlcc4 ));
      params( 1828 ) := "+"( Integer'Pos( a_frs1516.r2dlmc4 ));
      params( 1829 ) := "+"( Integer'Pos( a_frs1516.r2dlcc5 ));
      params( 1830 ) := "+"( Integer'Pos( a_frs1516.r2dlmc5 ));
      params( 1831 ) := "+"( Integer'Pos( a_frs1516.r2dlcc6 ));
      params( 1832 ) := "+"( Integer'Pos( a_frs1516.r2dlmc6 ));
      params( 1833 ) := "+"( Integer'Pos( a_frs1516.r2dlcc7 ));
      params( 1834 ) := "+"( Integer'Pos( a_frs1516.r2dlmc7 ));
      params( 1835 ) := "+"( Integer'Pos( a_frs1516.r2dlcc8 ));
      params( 1836 ) := "+"( Integer'Pos( a_frs1516.r2dlmc8 ));
      params( 1837 ) := "+"( Integer'Pos( a_frs1516.r2dlcc9 ));
      params( 1838 ) := "+"( Integer'Pos( a_frs1516.r2dlmc9 ));
      params( 1839 ) := "+"( Integer'Pos( a_frs1516.r3dlcc1 ));
      params( 1840 ) := "+"( Integer'Pos( a_frs1516.r3dlmc1 ));
      params( 1841 ) := "+"( Integer'Pos( a_frs1516.r3dlcc2 ));
      params( 1842 ) := "+"( Integer'Pos( a_frs1516.r3dlmc2 ));
      params( 1843 ) := "+"( Integer'Pos( a_frs1516.r3dlcc3 ));
      params( 1844 ) := "+"( Integer'Pos( a_frs1516.r3dlmc3 ));
      params( 1845 ) := "+"( Integer'Pos( a_frs1516.r3dlcc4 ));
      params( 1846 ) := "+"( Integer'Pos( a_frs1516.r3dlmc4 ));
      params( 1847 ) := "+"( Integer'Pos( a_frs1516.r3dlcc5 ));
      params( 1848 ) := "+"( Integer'Pos( a_frs1516.r3dlmc5 ));
      params( 1849 ) := "+"( Integer'Pos( a_frs1516.r3dlcc6 ));
      params( 1850 ) := "+"( Integer'Pos( a_frs1516.r3dlmc6 ));
      params( 1851 ) := "+"( Integer'Pos( a_frs1516.r3dlcc7 ));
      params( 1852 ) := "+"( Integer'Pos( a_frs1516.r3dlmc7 ));
      params( 1853 ) := "+"( Integer'Pos( a_frs1516.r3dlcc8 ));
      params( 1854 ) := "+"( Integer'Pos( a_frs1516.r3dlmc8 ));
      params( 1855 ) := "+"( Integer'Pos( a_frs1516.r3dlcc9 ));
      params( 1856 ) := "+"( Integer'Pos( a_frs1516.r3dlmc9 ));
      params( 1857 ) := "+"( Integer'Pos( a_frs1516.r4dlcc1 ));
      params( 1858 ) := "+"( Integer'Pos( a_frs1516.r4dlmc1 ));
      params( 1859 ) := "+"( Integer'Pos( a_frs1516.r4dlcc2 ));
      params( 1860 ) := "+"( Integer'Pos( a_frs1516.r4dlmc2 ));
      params( 1861 ) := "+"( Integer'Pos( a_frs1516.r4dlcc3 ));
      params( 1862 ) := "+"( Integer'Pos( a_frs1516.r4dlmc3 ));
      params( 1863 ) := "+"( Integer'Pos( a_frs1516.r4dlcc4 ));
      params( 1864 ) := "+"( Integer'Pos( a_frs1516.r4dlmc4 ));
      params( 1865 ) := "+"( Integer'Pos( a_frs1516.r4dlcc5 ));
      params( 1866 ) := "+"( Integer'Pos( a_frs1516.r4dlmc5 ));
      params( 1867 ) := "+"( Integer'Pos( a_frs1516.r4dlcc6 ));
      params( 1868 ) := "+"( Integer'Pos( a_frs1516.r4dlmc6 ));
      params( 1869 ) := "+"( Integer'Pos( a_frs1516.r4dlcc7 ));
      params( 1870 ) := "+"( Integer'Pos( a_frs1516.r4dlmc7 ));
      params( 1871 ) := "+"( Integer'Pos( a_frs1516.r4dlcc8 ));
      params( 1872 ) := "+"( Integer'Pos( a_frs1516.r4dlmc8 ));
      params( 1873 ) := "+"( Integer'Pos( a_frs1516.r4dlcc9 ));
      params( 1874 ) := "+"( Integer'Pos( a_frs1516.r4dlmc9 ));
      params( 1875 ) := "+"( Integer'Pos( a_frs1516.r5dlcc1 ));
      params( 1876 ) := "+"( Integer'Pos( a_frs1516.r5dlmc1 ));
      params( 1877 ) := "+"( Integer'Pos( a_frs1516.r5dlcc2 ));
      params( 1878 ) := "+"( Integer'Pos( a_frs1516.r5dlmc2 ));
      params( 1879 ) := "+"( Integer'Pos( a_frs1516.r5dlcc3 ));
      params( 1880 ) := "+"( Integer'Pos( a_frs1516.r5dlmc3 ));
      params( 1881 ) := "+"( Integer'Pos( a_frs1516.r5dlcc4 ));
      params( 1882 ) := "+"( Integer'Pos( a_frs1516.r5dlmc4 ));
      params( 1883 ) := "+"( Integer'Pos( a_frs1516.r5dlcc5 ));
      params( 1884 ) := "+"( Integer'Pos( a_frs1516.r5dlmc5 ));
      params( 1885 ) := "+"( Integer'Pos( a_frs1516.r5dlcc6 ));
      params( 1886 ) := "+"( Integer'Pos( a_frs1516.r5dlmc6 ));
      params( 1887 ) := "+"( Integer'Pos( a_frs1516.r5dlcc7 ));
      params( 1888 ) := "+"( Integer'Pos( a_frs1516.r5dlmc7 ));
      params( 1889 ) := "+"( Integer'Pos( a_frs1516.r5dlcc8 ));
      params( 1890 ) := "+"( Integer'Pos( a_frs1516.r5dlmc8 ));
      params( 1891 ) := "+"( Integer'Pos( a_frs1516.r5dlcc9 ));
      params( 1892 ) := "+"( Integer'Pos( a_frs1516.r5dlmc9 ));
      params( 1893 ) := "+"( Integer'Pos( a_frs1516.adbtbl ));
      params( 1894 ) := "+"( Integer'Pos( a_frs1516.adddec ));
      params( 1895 ) := "+"( Integer'Pos( a_frs1516.addhol ));
      params( 1896 ) := "+"( Integer'Pos( a_frs1516.addholr ));
      params( 1897 ) := "+"( Integer'Pos( a_frs1516.addins ));
      params( 1898 ) := "+"( Integer'Pos( a_frs1516.addmon ));
      params( 1899 ) := "+"( Integer'Pos( a_frs1516.adepfur ));
      params( 1900 ) := "+"( Integer'Pos( a_frs1516.adles ));
      params( 1901 ) := "+"( Integer'Pos( a_frs1516.adlesoa ));
      params( 1902 ) := "+"( Integer'Pos( a_frs1516.af1 ));
      params( 1903 ) := "+"( Integer'Pos( a_frs1516.afdep2 ));
      params( 1904 ) := "+"( Integer'Pos( a_frs1516.cdelply ));
      params( 1905 ) := "+"( Integer'Pos( a_frs1516.cdepact ));
      params( 1906 ) := "+"( Integer'Pos( a_frs1516.cdepbed ));
      params( 1907 ) := "+"( Integer'Pos( a_frs1516.cdepcel ));
      params( 1908 ) := "+"( Integer'Pos( a_frs1516.cdepeqp ));
      params( 1909 ) := "+"( Integer'Pos( a_frs1516.cdephol ));
      params( 1910 ) := "+"( Integer'Pos( a_frs1516.cdeples ));
      params( 1911 ) := "+"( Integer'Pos( a_frs1516.cdeptea ));
      params( 1912 ) := "+"( Integer'Pos( a_frs1516.cdeptrp ));
      params( 1913 ) := "+"( Integer'Pos( a_frs1516.cdepveg ));
      params( 1914 ) := "+"( Integer'Pos( a_frs1516.cdpcoat ));
      params( 1915 ) := "+"( Integer'Pos( a_frs1516.clothes ));
      params( 1916 ) := "+"( Integer'Pos( a_frs1516.cplay ));
      params( 1917 ) := "+"( Integer'Pos( a_frs1516.debt10 ));
      params( 1918 ) := "+"( Integer'Pos( a_frs1516.debt11 ));
      params( 1919 ) := "+"( Integer'Pos( a_frs1516.debt12 ));
      params( 1920 ) := "+"( Integer'Pos( a_frs1516.debt13 ));
      params( 1921 ) := "+"( Integer'Pos( a_frs1516.debtar01 ));
      params( 1922 ) := "+"( Integer'Pos( a_frs1516.debtar02 ));
      params( 1923 ) := "+"( Integer'Pos( a_frs1516.debtar03 ));
      params( 1924 ) := "+"( Integer'Pos( a_frs1516.debtar04 ));
      params( 1925 ) := "+"( Integer'Pos( a_frs1516.debtar05 ));
      params( 1926 ) := "+"( Integer'Pos( a_frs1516.debtar06 ));
      params( 1927 ) := "+"( Integer'Pos( a_frs1516.debtar07 ));
      params( 1928 ) := "+"( Integer'Pos( a_frs1516.debtar08 ));
      params( 1929 ) := "+"( Integer'Pos( a_frs1516.debtar09 ));
      params( 1930 ) := "+"( Integer'Pos( a_frs1516.debtar10 ));
      params( 1931 ) := "+"( Integer'Pos( a_frs1516.debtar11 ));
      params( 1932 ) := "+"( Integer'Pos( a_frs1516.debtar12 ));
      params( 1933 ) := "+"( Integer'Pos( a_frs1516.debtar13 ));
      params( 1934 ) := "+"( Integer'Pos( a_frs1516.debtfre1 ));
      params( 1935 ) := "+"( Integer'Pos( a_frs1516.debtfre2 ));
      params( 1936 ) := "+"( Integer'Pos( a_frs1516.debtfre3 ));
      params( 1937 ) := "+"( Integer'Pos( a_frs1516.hbolng ));
      params( 1938 ) := "+"( Integer'Pos( a_frs1516.houshe1 ));
      params( 1939 ) := "+"( Integer'Pos( a_frs1516.kidinc ));
      params( 1940 ) := "+"( Integer'Pos( a_frs1516.meal ));
      params( 1941 ) := "+"( Integer'Pos( a_frs1516.nhhchild ));
      params( 1942 ) := "+"( Integer'Pos( a_frs1516.oafur ));
      params( 1943 ) := "+"( Integer'Pos( a_frs1516.oapre ));
      params( 1944 ) := "+"( Integer'Pos( a_frs1516.outpay ));
      params( 1945 ) := "+"( Float( a_frs1516.outpyamt ));
      params( 1946 ) := "+"( Float( a_frs1516.regpamt ));
      params( 1947 ) := "+"( Integer'Pos( a_frs1516.regularp ));
      params( 1948 ) := "+"( Integer'Pos( a_frs1516.shoeoa ));
      params( 1949 ) := "+"( Integer'Pos( a_frs1516.totsav ));
      params( 1950 ) := "+"( Integer'Pos( a_frs1516.adultb ));
      params( 1951 ) := "+"( Float( a_frs1516.boarder ));
      params( 1952 ) := "+"( Integer'Pos( a_frs1516.bpeninc ));
      params( 1953 ) := "+"( Integer'Pos( a_frs1516.bseinc ));
      params( 1954 ) := "+"( Integer'Pos( a_frs1516.budisben ));
      params( 1955 ) := "+"( Integer'Pos( a_frs1516.buearns ));
      params( 1956 ) := "+"( Integer'Pos( a_frs1516.buethgr3 ));
      params( 1957 ) := "+"( Integer'Pos( a_frs1516.buinc ));
      params( 1958 ) := "+"( Integer'Pos( a_frs1516.buinv ));
      params( 1959 ) := "+"( Integer'Pos( a_frs1516.buirben ));
      params( 1960 ) := "+"( Integer'Pos( a_frs1516.bukids ));
      params( 1961 ) := "+"( Integer'Pos( a_frs1516.bunirben ));
      params( 1962 ) := "+"( Integer'Pos( a_frs1516.buothben ));
      params( 1963 ) := "+"( Integer'Pos( a_frs1516.burent ));
      params( 1964 ) := "+"( Integer'Pos( a_frs1516.burinc ));
      params( 1965 ) := "+"( Integer'Pos( a_frs1516.burpinc ));
      params( 1966 ) := "+"( Float( a_frs1516.butvlic ));
      params( 1967 ) := "+"( Integer'Pos( a_frs1516.butxcred ));
      params( 1968 ) := "+"( Integer'Pos( a_frs1516.depchldb ));
      params( 1969 ) := "+"( Integer'Pos( a_frs1516.diswbua1 ));
      params( 1970 ) := "+"( Integer'Pos( a_frs1516.diswbuc1 ));
      params( 1971 ) := "+"( Integer'Pos( a_frs1516.ecstatbu ));
      params( 1972 ) := "+"( Integer'Pos( a_frs1516.famtypb2 ));
      params( 1973 ) := "+"( Integer'Pos( a_frs1516.famtypbs ));
      params( 1974 ) := "+"( Integer'Pos( a_frs1516.famtypbu ));
      params( 1975 ) := "+"( Float( a_frs1516.fsfvbu ));
      params( 1976 ) := "+"( Float( a_frs1516.fsmbu ));
      params( 1977 ) := "+"( Float( a_frs1516.fsmlkbu ));
      params( 1978 ) := "+"( Integer'Pos( a_frs1516.gross4 ));
      params( 1979 ) := "+"( Integer'Pos( a_frs1516.hbindbu ));
      params( 1980 ) := "+"( Integer'Pos( a_frs1516.hbindbu2 ));
      params( 1981 ) := "+"( Float( a_frs1516.heartbu ));
      params( 1982 ) := "+"( Integer'Pos( a_frs1516.kid04 ));
      params( 1983 ) := "+"( Integer'Pos( a_frs1516.kid1115 ));
      params( 1984 ) := "+"( Integer'Pos( a_frs1516.kid1619 ));
      params( 1985 ) := "+"( Integer'Pos( a_frs1516.kid510 ));
      params( 1986 ) := "+"( Float( a_frs1516.lodger ));
      params( 1987 ) := "+"( Float( a_frs1516.subltamt ));
      params( 1988 ) := "+"( Float( a_frs1516.totcapb3 ));
      params( 1989 ) := "+"( Integer'Pos( a_frs1516.totsavbu ));
      params( 1990 ) := "+"( Integer'Pos( a_frs1516.tuburent ));
      params( 1991 ) := "+"( Integer'Pos( a_frs1516.youngch ));
      params( 1992 ) := "+"( Integer'Pos( a_frs1516.clthsoa ));
      params( 1993 ) := "+"( Integer'Pos( a_frs1516.debt1 ));
      params( 1994 ) := "+"( Integer'Pos( a_frs1516.debt2 ));
      params( 1995 ) := "+"( Integer'Pos( a_frs1516.debt3 ));
      params( 1996 ) := "+"( Integer'Pos( a_frs1516.debt4 ));
      params( 1997 ) := "+"( Integer'Pos( a_frs1516.debt5 ));
      params( 1998 ) := "+"( Integer'Pos( a_frs1516.debt6 ));
      params( 1999 ) := "+"( Integer'Pos( a_frs1516.debt7 ));
      params( 2000 ) := "+"( Integer'Pos( a_frs1516.debt8 ));
      params( 2001 ) := "+"( Integer'Pos( a_frs1516.debt9 ));
      params( 2002 ) := "+"( Integer'Pos( a_frs1516.discbua ));
      params( 2003 ) := "+"( Integer'Pos( a_frs1516.discbuc ));
      params( 2004 ) := "+"( Float( a_frs1516.hbtham ));
      params( 2005 ) := "+"( Integer'Pos( a_frs1516.hbthbu ));
      params( 2006 ) := "+"( Integer'Pos( a_frs1516.hbthmn ));
      params( 2007 ) := "+"( Integer'Pos( a_frs1516.hbthpd ));
      params( 2008 ) := "+"( Integer'Pos( a_frs1516.hbthwk ));
      params( 2009 ) := "+"( Integer'Pos( a_frs1516.hbthyr ));
      params( 2010 ) := "+"( Integer'Pos( a_frs1516.hbwait ));
      params( 2011 ) := "+"( Integer'Pos( a_frs1516.intrnt ));
      params( 2012 ) := "+"( Integer'Pos( a_frs1516.oadep ));
      params( 2013 ) := "+"( Integer'Pos( a_frs1516.oanet ));
      params( 2014 ) := "+"( Integer'Pos( a_frs1516.dynhthd ));
      params( 2015 ) := "+"( Integer'Pos( a_frs1516.dynhtsp ));
      params( 2016 ) := "+"( Integer'Pos( a_frs1516.freqhd ));
      params( 2017 ) := "+"( Integer'Pos( a_frs1516.freqsp ));
      params( 2018 ) := "+"( Integer'Pos( a_frs1516.hur01hd ));
      params( 2019 ) := "+"( Integer'Pos( a_frs1516.hur01sp ));
      params( 2020 ) := "+"( Integer'Pos( a_frs1516.hur02hd ));
      params( 2021 ) := "+"( Integer'Pos( a_frs1516.hur02sp ));
      params( 2022 ) := "+"( Integer'Pos( a_frs1516.hur03hd ));
      params( 2023 ) := "+"( Integer'Pos( a_frs1516.hur03sp ));
      params( 2024 ) := "+"( Integer'Pos( a_frs1516.hur04hd ));
      params( 2025 ) := "+"( Integer'Pos( a_frs1516.hur04sp ));
      params( 2026 ) := "+"( Integer'Pos( a_frs1516.hur05hd ));
      params( 2027 ) := "+"( Integer'Pos( a_frs1516.hur05sp ));
      params( 2028 ) := "+"( Integer'Pos( a_frs1516.hur06hd ));
      params( 2029 ) := "+"( Integer'Pos( a_frs1516.hur06sp ));
      params( 2030 ) := "+"( Integer'Pos( a_frs1516.hur07hd ));
      params( 2031 ) := "+"( Integer'Pos( a_frs1516.hur07sp ));
      params( 2032 ) := "+"( Integer'Pos( a_frs1516.hur08hd ));
      params( 2033 ) := "+"( Integer'Pos( a_frs1516.hur08sp ));
      params( 2034 ) := "+"( Integer'Pos( a_frs1516.hur09hd ));
      params( 2035 ) := "+"( Integer'Pos( a_frs1516.hur09sp ));
      params( 2036 ) := "+"( Integer'Pos( a_frs1516.hur10hd ));
      params( 2037 ) := "+"( Integer'Pos( a_frs1516.hur10sp ));
      params( 2038 ) := "+"( Integer'Pos( a_frs1516.hur11hd ));
      params( 2039 ) := "+"( Integer'Pos( a_frs1516.hur11sp ));
      params( 2040 ) := "+"( Integer'Pos( a_frs1516.hur12hd ));
      params( 2041 ) := "+"( Integer'Pos( a_frs1516.hur12sp ));
      params( 2042 ) := "+"( Integer'Pos( a_frs1516.hur13hd ));
      params( 2043 ) := "+"( Integer'Pos( a_frs1516.hur13sp ));
      params( 2044 ) := "+"( Integer'Pos( a_frs1516.hur14hd ));
      params( 2045 ) := "+"( Integer'Pos( a_frs1516.hur14sp ));
      params( 2046 ) := "+"( Integer'Pos( a_frs1516.hur15hd ));
      params( 2047 ) := "+"( Integer'Pos( a_frs1516.hur15sp ));
      params( 2048 ) := "+"( Integer'Pos( a_frs1516.hur16hd ));
      params( 2049 ) := "+"( Integer'Pos( a_frs1516.hur16sp ));
      params( 2050 ) := "+"( Integer'Pos( a_frs1516.hur17hd ));
      params( 2051 ) := "+"( Integer'Pos( a_frs1516.hur17sp ));
      params( 2052 ) := "+"( Integer'Pos( a_frs1516.hur18hd ));
      params( 2053 ) := "+"( Integer'Pos( a_frs1516.hur18sp ));
      params( 2054 ) := "+"( Integer'Pos( a_frs1516.hur19hd ));
      params( 2055 ) := "+"( Integer'Pos( a_frs1516.hur19sp ));
      params( 2056 ) := "+"( Integer'Pos( a_frs1516.hur20hd ));
      params( 2057 ) := "+"( Integer'Pos( a_frs1516.hur20sp ));
      params( 2058 ) := "+"( Integer'Pos( a_frs1516.whl01hd ));
      params( 2059 ) := "+"( Integer'Pos( a_frs1516.whl01sp ));
      params( 2060 ) := "+"( Integer'Pos( a_frs1516.whl02hd ));
      params( 2061 ) := "+"( Integer'Pos( a_frs1516.whl02sp ));
      params( 2062 ) := "+"( Integer'Pos( a_frs1516.whl03hd ));
      params( 2063 ) := "+"( Integer'Pos( a_frs1516.whl03sp ));
      params( 2064 ) := "+"( Integer'Pos( a_frs1516.whl04hd ));
      params( 2065 ) := "+"( Integer'Pos( a_frs1516.whl04sp ));
      params( 2066 ) := "+"( Integer'Pos( a_frs1516.whl05hd ));
      params( 2067 ) := "+"( Integer'Pos( a_frs1516.whl05sp ));
      params( 2068 ) := "+"( Integer'Pos( a_frs1516.whl06hd ));
      params( 2069 ) := "+"( Integer'Pos( a_frs1516.whl06sp ));
      params( 2070 ) := "+"( Integer'Pos( a_frs1516.whl07hd ));
      params( 2071 ) := "+"( Integer'Pos( a_frs1516.whl07sp ));
      params( 2072 ) := "+"( Integer'Pos( a_frs1516.whl08hd ));
      params( 2073 ) := "+"( Integer'Pos( a_frs1516.whl08sp ));
      params( 2074 ) := "+"( Integer'Pos( a_frs1516.whl09hd ));
      params( 2075 ) := "+"( Integer'Pos( a_frs1516.whl09sp ));
      params( 2076 ) := "+"( Integer'Pos( a_frs1516.whl10hd ));
      params( 2077 ) := "+"( Integer'Pos( a_frs1516.whl10sp ));
      params( 2078 ) := "+"( Integer'Pos( a_frs1516.whl11hd ));
      params( 2079 ) := "+"( Integer'Pos( a_frs1516.whl11sp ));
      params( 2080 ) := "+"( Integer'Pos( a_frs1516.whl12hd ));
      params( 2081 ) := "+"( Integer'Pos( a_frs1516.whl12sp ));
      params( 2082 ) := "+"( Integer'Pos( a_frs1516.whl13hd ));
      params( 2083 ) := "+"( Integer'Pos( a_frs1516.whl13sp ));
      params( 2084 ) := "+"( Integer'Pos( a_frs1516.whl14hd ));
      params( 2085 ) := "+"( Integer'Pos( a_frs1516.whl14sp ));
      params( 2086 ) := "+"( Integer'Pos( a_frs1516.whl15hd ));
      params( 2087 ) := "+"( Integer'Pos( a_frs1516.whl15sp ));
      params( 2088 ) := "+"( Integer'Pos( a_frs1516.whl16hd ));
      params( 2089 ) := "+"( Integer'Pos( a_frs1516.whl16sp ));
      params( 2090 ) := "+"( Integer'Pos( a_frs1516.whl17hd ));
      params( 2091 ) := "+"( Integer'Pos( a_frs1516.whl17sp ));
      params( 2092 ) := "+"( Integer'Pos( a_frs1516.whl18hd ));
      params( 2093 ) := "+"( Integer'Pos( a_frs1516.whl18sp ));
      params( 2094 ) := "+"( Integer'Pos( a_frs1516.whl19hd ));
      params( 2095 ) := "+"( Integer'Pos( a_frs1516.whl19sp ));
      params( 2096 ) := "+"( Integer'Pos( a_frs1516.whl20hd ));
      params( 2097 ) := "+"( Integer'Pos( a_frs1516.whl20sp ));
      params( 2098 ) := "+"( Integer'Pos( a_frs1516.dynhtc1 ));
      params( 2099 ) := "+"( Integer'Pos( a_frs1516.dynhtc2 ));
      params( 2100 ) := "+"( Integer'Pos( a_frs1516.dynhtc3 ));
      params( 2101 ) := "+"( Integer'Pos( a_frs1516.dynhtc4 ));
      params( 2102 ) := "+"( Integer'Pos( a_frs1516.dynhtc5 ));
      params( 2103 ) := "+"( Integer'Pos( a_frs1516.dynhtc6 ));
      params( 2104 ) := "+"( Integer'Pos( a_frs1516.dynhtc7 ));
      params( 2105 ) := "+"( Integer'Pos( a_frs1516.dynhtc8 ));
      params( 2106 ) := "+"( Integer'Pos( a_frs1516.dynhtc9 ));
      params( 2107 ) := "+"( Integer'Pos( a_frs1516.freqc1 ));
      params( 2108 ) := "+"( Integer'Pos( a_frs1516.freqc2 ));
      params( 2109 ) := "+"( Integer'Pos( a_frs1516.freqc3 ));
      params( 2110 ) := "+"( Integer'Pos( a_frs1516.freqc4 ));
      params( 2111 ) := "+"( Integer'Pos( a_frs1516.freqc5 ));
      params( 2112 ) := "+"( Integer'Pos( a_frs1516.freqc6 ));
      params( 2113 ) := "+"( Integer'Pos( a_frs1516.freqc7 ));
      params( 2114 ) := "+"( Integer'Pos( a_frs1516.freqc8 ));
      params( 2115 ) := "+"( Integer'Pos( a_frs1516.freqc9 ));
      params( 2116 ) := "+"( Integer'Pos( a_frs1516.hur01c1 ));
      params( 2117 ) := "+"( Integer'Pos( a_frs1516.hur01c2 ));
      params( 2118 ) := "+"( Integer'Pos( a_frs1516.hur01c3 ));
      params( 2119 ) := "+"( Integer'Pos( a_frs1516.hur01c4 ));
      params( 2120 ) := "+"( Integer'Pos( a_frs1516.hur01c5 ));
      params( 2121 ) := "+"( Integer'Pos( a_frs1516.hur01c6 ));
      params( 2122 ) := "+"( Integer'Pos( a_frs1516.hur01c7 ));
      params( 2123 ) := "+"( Integer'Pos( a_frs1516.hur01c8 ));
      params( 2124 ) := "+"( Integer'Pos( a_frs1516.hur01c9 ));
      params( 2125 ) := "+"( Integer'Pos( a_frs1516.hur02c1 ));
      params( 2126 ) := "+"( Integer'Pos( a_frs1516.hur02c2 ));
      params( 2127 ) := "+"( Integer'Pos( a_frs1516.hur02c3 ));
      params( 2128 ) := "+"( Integer'Pos( a_frs1516.hur02c4 ));
      params( 2129 ) := "+"( Integer'Pos( a_frs1516.hur02c5 ));
      params( 2130 ) := "+"( Integer'Pos( a_frs1516.hur02c6 ));
      params( 2131 ) := "+"( Integer'Pos( a_frs1516.hur02c7 ));
      params( 2132 ) := "+"( Integer'Pos( a_frs1516.hur02c8 ));
      params( 2133 ) := "+"( Integer'Pos( a_frs1516.hur02c9 ));
      params( 2134 ) := "+"( Integer'Pos( a_frs1516.hur03c1 ));
      params( 2135 ) := "+"( Integer'Pos( a_frs1516.hur03c2 ));
      params( 2136 ) := "+"( Integer'Pos( a_frs1516.hur03c3 ));
      params( 2137 ) := "+"( Integer'Pos( a_frs1516.hur03c4 ));
      params( 2138 ) := "+"( Integer'Pos( a_frs1516.hur03c5 ));
      params( 2139 ) := "+"( Integer'Pos( a_frs1516.hur03c6 ));
      params( 2140 ) := "+"( Integer'Pos( a_frs1516.hur03c7 ));
      params( 2141 ) := "+"( Integer'Pos( a_frs1516.hur03c8 ));
      params( 2142 ) := "+"( Integer'Pos( a_frs1516.hur03c9 ));
      params( 2143 ) := "+"( Integer'Pos( a_frs1516.hur04c1 ));
      params( 2144 ) := "+"( Integer'Pos( a_frs1516.hur04c2 ));
      params( 2145 ) := "+"( Integer'Pos( a_frs1516.hur04c3 ));
      params( 2146 ) := "+"( Integer'Pos( a_frs1516.hur04c4 ));
      params( 2147 ) := "+"( Integer'Pos( a_frs1516.hur04c5 ));
      params( 2148 ) := "+"( Integer'Pos( a_frs1516.hur04c6 ));
      params( 2149 ) := "+"( Integer'Pos( a_frs1516.hur04c7 ));
      params( 2150 ) := "+"( Integer'Pos( a_frs1516.hur04c8 ));
      params( 2151 ) := "+"( Integer'Pos( a_frs1516.hur04c9 ));
      params( 2152 ) := "+"( Integer'Pos( a_frs1516.hur05c1 ));
      params( 2153 ) := "+"( Integer'Pos( a_frs1516.hur05c2 ));
      params( 2154 ) := "+"( Integer'Pos( a_frs1516.hur05c3 ));
      params( 2155 ) := "+"( Integer'Pos( a_frs1516.hur05c4 ));
      params( 2156 ) := "+"( Integer'Pos( a_frs1516.hur05c5 ));
      params( 2157 ) := "+"( Integer'Pos( a_frs1516.hur05c6 ));
      params( 2158 ) := "+"( Integer'Pos( a_frs1516.hur05c7 ));
      params( 2159 ) := "+"( Integer'Pos( a_frs1516.hur05c8 ));
      params( 2160 ) := "+"( Integer'Pos( a_frs1516.hur05c9 ));
      params( 2161 ) := "+"( Integer'Pos( a_frs1516.hur06c1 ));
      params( 2162 ) := "+"( Integer'Pos( a_frs1516.hur06c2 ));
      params( 2163 ) := "+"( Integer'Pos( a_frs1516.hur06c3 ));
      params( 2164 ) := "+"( Integer'Pos( a_frs1516.hur06c4 ));
      params( 2165 ) := "+"( Integer'Pos( a_frs1516.hur06c5 ));
      params( 2166 ) := "+"( Integer'Pos( a_frs1516.hur06c6 ));
      params( 2167 ) := "+"( Integer'Pos( a_frs1516.hur06c7 ));
      params( 2168 ) := "+"( Integer'Pos( a_frs1516.hur06c8 ));
      params( 2169 ) := "+"( Integer'Pos( a_frs1516.hur06c9 ));
      params( 2170 ) := "+"( Integer'Pos( a_frs1516.hur07c1 ));
      params( 2171 ) := "+"( Integer'Pos( a_frs1516.hur07c2 ));
      params( 2172 ) := "+"( Integer'Pos( a_frs1516.hur07c3 ));
      params( 2173 ) := "+"( Integer'Pos( a_frs1516.hur07c4 ));
      params( 2174 ) := "+"( Integer'Pos( a_frs1516.hur07c5 ));
      params( 2175 ) := "+"( Integer'Pos( a_frs1516.hur07c6 ));
      params( 2176 ) := "+"( Integer'Pos( a_frs1516.hur07c7 ));
      params( 2177 ) := "+"( Integer'Pos( a_frs1516.hur07c8 ));
      params( 2178 ) := "+"( Integer'Pos( a_frs1516.hur07c9 ));
      params( 2179 ) := "+"( Integer'Pos( a_frs1516.hur08c1 ));
      params( 2180 ) := "+"( Integer'Pos( a_frs1516.hur08c2 ));
      params( 2181 ) := "+"( Integer'Pos( a_frs1516.hur08c3 ));
      params( 2182 ) := "+"( Integer'Pos( a_frs1516.hur08c4 ));
      params( 2183 ) := "+"( Integer'Pos( a_frs1516.hur08c5 ));
      params( 2184 ) := "+"( Integer'Pos( a_frs1516.hur08c6 ));
      params( 2185 ) := "+"( Integer'Pos( a_frs1516.hur08c7 ));
      params( 2186 ) := "+"( Integer'Pos( a_frs1516.hur08c8 ));
      params( 2187 ) := "+"( Integer'Pos( a_frs1516.hur08c9 ));
      params( 2188 ) := "+"( Integer'Pos( a_frs1516.hur09c1 ));
      params( 2189 ) := "+"( Integer'Pos( a_frs1516.hur09c2 ));
      params( 2190 ) := "+"( Integer'Pos( a_frs1516.hur09c3 ));
      params( 2191 ) := "+"( Integer'Pos( a_frs1516.hur09c4 ));
      params( 2192 ) := "+"( Integer'Pos( a_frs1516.hur09c5 ));
      params( 2193 ) := "+"( Integer'Pos( a_frs1516.hur09c6 ));
      params( 2194 ) := "+"( Integer'Pos( a_frs1516.hur09c7 ));
      params( 2195 ) := "+"( Integer'Pos( a_frs1516.hur09c8 ));
      params( 2196 ) := "+"( Integer'Pos( a_frs1516.hur09c9 ));
      params( 2197 ) := "+"( Integer'Pos( a_frs1516.hur10c1 ));
      params( 2198 ) := "+"( Integer'Pos( a_frs1516.hur10c2 ));
      params( 2199 ) := "+"( Integer'Pos( a_frs1516.hur10c3 ));
      params( 2200 ) := "+"( Integer'Pos( a_frs1516.hur10c4 ));
      params( 2201 ) := "+"( Integer'Pos( a_frs1516.hur10c5 ));
      params( 2202 ) := "+"( Integer'Pos( a_frs1516.hur10c6 ));
      params( 2203 ) := "+"( Integer'Pos( a_frs1516.hur10c7 ));
      params( 2204 ) := "+"( Integer'Pos( a_frs1516.hur10c8 ));
      params( 2205 ) := "+"( Integer'Pos( a_frs1516.hur10c9 ));
      params( 2206 ) := "+"( Integer'Pos( a_frs1516.hur11c1 ));
      params( 2207 ) := "+"( Integer'Pos( a_frs1516.hur11c2 ));
      params( 2208 ) := "+"( Integer'Pos( a_frs1516.hur11c3 ));
      params( 2209 ) := "+"( Integer'Pos( a_frs1516.hur11c4 ));
      params( 2210 ) := "+"( Integer'Pos( a_frs1516.hur11c5 ));
      params( 2211 ) := "+"( Integer'Pos( a_frs1516.hur11c6 ));
      params( 2212 ) := "+"( Integer'Pos( a_frs1516.hur11c7 ));
      params( 2213 ) := "+"( Integer'Pos( a_frs1516.hur11c8 ));
      params( 2214 ) := "+"( Integer'Pos( a_frs1516.hur11c9 ));
      params( 2215 ) := "+"( Integer'Pos( a_frs1516.hur12c1 ));
      params( 2216 ) := "+"( Integer'Pos( a_frs1516.hur12c2 ));
      params( 2217 ) := "+"( Integer'Pos( a_frs1516.hur12c3 ));
      params( 2218 ) := "+"( Integer'Pos( a_frs1516.hur12c4 ));
      params( 2219 ) := "+"( Integer'Pos( a_frs1516.hur12c5 ));
      params( 2220 ) := "+"( Integer'Pos( a_frs1516.hur12c6 ));
      params( 2221 ) := "+"( Integer'Pos( a_frs1516.hur12c7 ));
      params( 2222 ) := "+"( Integer'Pos( a_frs1516.hur12c8 ));
      params( 2223 ) := "+"( Integer'Pos( a_frs1516.hur12c9 ));
      params( 2224 ) := "+"( Integer'Pos( a_frs1516.hur13c1 ));
      params( 2225 ) := "+"( Integer'Pos( a_frs1516.hur13c2 ));
      params( 2226 ) := "+"( Integer'Pos( a_frs1516.hur13c3 ));
      params( 2227 ) := "+"( Integer'Pos( a_frs1516.hur13c4 ));
      params( 2228 ) := "+"( Integer'Pos( a_frs1516.hur13c5 ));
      params( 2229 ) := "+"( Integer'Pos( a_frs1516.hur13c6 ));
      params( 2230 ) := "+"( Integer'Pos( a_frs1516.hur13c7 ));
      params( 2231 ) := "+"( Integer'Pos( a_frs1516.hur13c8 ));
      params( 2232 ) := "+"( Integer'Pos( a_frs1516.hur13c9 ));
      params( 2233 ) := "+"( Integer'Pos( a_frs1516.hur14c1 ));
      params( 2234 ) := "+"( Integer'Pos( a_frs1516.hur14c2 ));
      params( 2235 ) := "+"( Integer'Pos( a_frs1516.hur14c3 ));
      params( 2236 ) := "+"( Integer'Pos( a_frs1516.hur14c4 ));
      params( 2237 ) := "+"( Integer'Pos( a_frs1516.hur14c5 ));
      params( 2238 ) := "+"( Integer'Pos( a_frs1516.hur14c6 ));
      params( 2239 ) := "+"( Integer'Pos( a_frs1516.hur14c7 ));
      params( 2240 ) := "+"( Integer'Pos( a_frs1516.hur14c8 ));
      params( 2241 ) := "+"( Integer'Pos( a_frs1516.hur14c9 ));
      params( 2242 ) := "+"( Integer'Pos( a_frs1516.hur15c1 ));
      params( 2243 ) := "+"( Integer'Pos( a_frs1516.hur15c2 ));
      params( 2244 ) := "+"( Integer'Pos( a_frs1516.hur15c3 ));
      params( 2245 ) := "+"( Integer'Pos( a_frs1516.hur15c4 ));
      params( 2246 ) := "+"( Integer'Pos( a_frs1516.hur15c5 ));
      params( 2247 ) := "+"( Integer'Pos( a_frs1516.hur15c6 ));
      params( 2248 ) := "+"( Integer'Pos( a_frs1516.hur15c7 ));
      params( 2249 ) := "+"( Integer'Pos( a_frs1516.hur15c8 ));
      params( 2250 ) := "+"( Integer'Pos( a_frs1516.hur15c9 ));
      params( 2251 ) := "+"( Integer'Pos( a_frs1516.hur16c1 ));
      params( 2252 ) := "+"( Integer'Pos( a_frs1516.hur16c2 ));
      params( 2253 ) := "+"( Integer'Pos( a_frs1516.hur16c3 ));
      params( 2254 ) := "+"( Integer'Pos( a_frs1516.hur16c4 ));
      params( 2255 ) := "+"( Integer'Pos( a_frs1516.hur16c5 ));
      params( 2256 ) := "+"( Integer'Pos( a_frs1516.hur16c6 ));
      params( 2257 ) := "+"( Integer'Pos( a_frs1516.hur16c7 ));
      params( 2258 ) := "+"( Integer'Pos( a_frs1516.hur16c8 ));
      params( 2259 ) := "+"( Integer'Pos( a_frs1516.hur16c9 ));
      params( 2260 ) := "+"( Integer'Pos( a_frs1516.hur17c1 ));
      params( 2261 ) := "+"( Integer'Pos( a_frs1516.hur17c2 ));
      params( 2262 ) := "+"( Integer'Pos( a_frs1516.hur17c3 ));
      params( 2263 ) := "+"( Integer'Pos( a_frs1516.hur17c4 ));
      params( 2264 ) := "+"( Integer'Pos( a_frs1516.hur17c5 ));
      params( 2265 ) := "+"( Integer'Pos( a_frs1516.hur17c6 ));
      params( 2266 ) := "+"( Integer'Pos( a_frs1516.hur17c7 ));
      params( 2267 ) := "+"( Integer'Pos( a_frs1516.hur17c8 ));
      params( 2268 ) := "+"( Integer'Pos( a_frs1516.hur17c9 ));
      params( 2269 ) := "+"( Integer'Pos( a_frs1516.hur18c1 ));
      params( 2270 ) := "+"( Integer'Pos( a_frs1516.hur18c2 ));
      params( 2271 ) := "+"( Integer'Pos( a_frs1516.hur18c3 ));
      params( 2272 ) := "+"( Integer'Pos( a_frs1516.hur18c4 ));
      params( 2273 ) := "+"( Integer'Pos( a_frs1516.hur18c5 ));
      params( 2274 ) := "+"( Integer'Pos( a_frs1516.hur18c6 ));
      params( 2275 ) := "+"( Integer'Pos( a_frs1516.hur18c7 ));
      params( 2276 ) := "+"( Integer'Pos( a_frs1516.hur18c8 ));
      params( 2277 ) := "+"( Integer'Pos( a_frs1516.hur18c9 ));
      params( 2278 ) := "+"( Integer'Pos( a_frs1516.hur19c1 ));
      params( 2279 ) := "+"( Integer'Pos( a_frs1516.hur19c2 ));
      params( 2280 ) := "+"( Integer'Pos( a_frs1516.hur19c3 ));
      params( 2281 ) := "+"( Integer'Pos( a_frs1516.hur19c4 ));
      params( 2282 ) := "+"( Integer'Pos( a_frs1516.hur19c5 ));
      params( 2283 ) := "+"( Integer'Pos( a_frs1516.hur19c6 ));
      params( 2284 ) := "+"( Integer'Pos( a_frs1516.hur19c7 ));
      params( 2285 ) := "+"( Integer'Pos( a_frs1516.hur19c8 ));
      params( 2286 ) := "+"( Integer'Pos( a_frs1516.hur19c9 ));
      params( 2287 ) := "+"( Integer'Pos( a_frs1516.hur20c1 ));
      params( 2288 ) := "+"( Integer'Pos( a_frs1516.hur20c2 ));
      params( 2289 ) := "+"( Integer'Pos( a_frs1516.hur20c3 ));
      params( 2290 ) := "+"( Integer'Pos( a_frs1516.hur20c4 ));
      params( 2291 ) := "+"( Integer'Pos( a_frs1516.hur20c5 ));
      params( 2292 ) := "+"( Integer'Pos( a_frs1516.hur20c6 ));
      params( 2293 ) := "+"( Integer'Pos( a_frs1516.hur20c7 ));
      params( 2294 ) := "+"( Integer'Pos( a_frs1516.hur20c8 ));
      params( 2295 ) := "+"( Integer'Pos( a_frs1516.hur20c9 ));
      params( 2296 ) := "+"( Integer'Pos( a_frs1516.whl01c1 ));
      params( 2297 ) := "+"( Integer'Pos( a_frs1516.whl01c2 ));
      params( 2298 ) := "+"( Integer'Pos( a_frs1516.whl01c3 ));
      params( 2299 ) := "+"( Integer'Pos( a_frs1516.whl01c4 ));
      params( 2300 ) := "+"( Integer'Pos( a_frs1516.whl01c5 ));
      params( 2301 ) := "+"( Integer'Pos( a_frs1516.whl01c6 ));
      params( 2302 ) := "+"( Integer'Pos( a_frs1516.whl01c7 ));
      params( 2303 ) := "+"( Integer'Pos( a_frs1516.whl01c8 ));
      params( 2304 ) := "+"( Integer'Pos( a_frs1516.whl01c9 ));
      params( 2305 ) := "+"( Integer'Pos( a_frs1516.whl02c1 ));
      params( 2306 ) := "+"( Integer'Pos( a_frs1516.whl02c2 ));
      params( 2307 ) := "+"( Integer'Pos( a_frs1516.whl02c3 ));
      params( 2308 ) := "+"( Integer'Pos( a_frs1516.whl02c4 ));
      params( 2309 ) := "+"( Integer'Pos( a_frs1516.whl02c5 ));
      params( 2310 ) := "+"( Integer'Pos( a_frs1516.whl02c6 ));
      params( 2311 ) := "+"( Integer'Pos( a_frs1516.whl02c7 ));
      params( 2312 ) := "+"( Integer'Pos( a_frs1516.whl02c8 ));
      params( 2313 ) := "+"( Integer'Pos( a_frs1516.whl02c9 ));
      params( 2314 ) := "+"( Integer'Pos( a_frs1516.whl03c1 ));
      params( 2315 ) := "+"( Integer'Pos( a_frs1516.whl03c2 ));
      params( 2316 ) := "+"( Integer'Pos( a_frs1516.whl03c3 ));
      params( 2317 ) := "+"( Integer'Pos( a_frs1516.whl03c4 ));
      params( 2318 ) := "+"( Integer'Pos( a_frs1516.whl03c5 ));
      params( 2319 ) := "+"( Integer'Pos( a_frs1516.whl03c6 ));
      params( 2320 ) := "+"( Integer'Pos( a_frs1516.whl03c7 ));
      params( 2321 ) := "+"( Integer'Pos( a_frs1516.whl03c8 ));
      params( 2322 ) := "+"( Integer'Pos( a_frs1516.whl03c9 ));
      params( 2323 ) := "+"( Integer'Pos( a_frs1516.whl04c1 ));
      params( 2324 ) := "+"( Integer'Pos( a_frs1516.whl04c2 ));
      params( 2325 ) := "+"( Integer'Pos( a_frs1516.whl04c3 ));
      params( 2326 ) := "+"( Integer'Pos( a_frs1516.whl04c4 ));
      params( 2327 ) := "+"( Integer'Pos( a_frs1516.whl04c5 ));
      params( 2328 ) := "+"( Integer'Pos( a_frs1516.whl04c6 ));
      params( 2329 ) := "+"( Integer'Pos( a_frs1516.whl04c7 ));
      params( 2330 ) := "+"( Integer'Pos( a_frs1516.whl04c8 ));
      params( 2331 ) := "+"( Integer'Pos( a_frs1516.whl04c9 ));
      params( 2332 ) := "+"( Integer'Pos( a_frs1516.whl05c1 ));
      params( 2333 ) := "+"( Integer'Pos( a_frs1516.whl05c2 ));
      params( 2334 ) := "+"( Integer'Pos( a_frs1516.whl05c3 ));
      params( 2335 ) := "+"( Integer'Pos( a_frs1516.whl05c4 ));
      params( 2336 ) := "+"( Integer'Pos( a_frs1516.whl05c5 ));
      params( 2337 ) := "+"( Integer'Pos( a_frs1516.whl05c6 ));
      params( 2338 ) := "+"( Integer'Pos( a_frs1516.whl05c7 ));
      params( 2339 ) := "+"( Integer'Pos( a_frs1516.whl05c8 ));
      params( 2340 ) := "+"( Integer'Pos( a_frs1516.whl05c9 ));
      params( 2341 ) := "+"( Integer'Pos( a_frs1516.whl06c1 ));
      params( 2342 ) := "+"( Integer'Pos( a_frs1516.whl06c2 ));
      params( 2343 ) := "+"( Integer'Pos( a_frs1516.whl06c3 ));
      params( 2344 ) := "+"( Integer'Pos( a_frs1516.whl06c4 ));
      params( 2345 ) := "+"( Integer'Pos( a_frs1516.whl06c5 ));
      params( 2346 ) := "+"( Integer'Pos( a_frs1516.whl06c6 ));
      params( 2347 ) := "+"( Integer'Pos( a_frs1516.whl06c7 ));
      params( 2348 ) := "+"( Integer'Pos( a_frs1516.whl06c8 ));
      params( 2349 ) := "+"( Integer'Pos( a_frs1516.whl06c9 ));
      params( 2350 ) := "+"( Integer'Pos( a_frs1516.whl07c1 ));
      params( 2351 ) := "+"( Integer'Pos( a_frs1516.whl07c2 ));
      params( 2352 ) := "+"( Integer'Pos( a_frs1516.whl07c3 ));
      params( 2353 ) := "+"( Integer'Pos( a_frs1516.whl07c4 ));
      params( 2354 ) := "+"( Integer'Pos( a_frs1516.whl07c5 ));
      params( 2355 ) := "+"( Integer'Pos( a_frs1516.whl07c6 ));
      params( 2356 ) := "+"( Integer'Pos( a_frs1516.whl07c7 ));
      params( 2357 ) := "+"( Integer'Pos( a_frs1516.whl07c8 ));
      params( 2358 ) := "+"( Integer'Pos( a_frs1516.whl07c9 ));
      params( 2359 ) := "+"( Integer'Pos( a_frs1516.whl08c1 ));
      params( 2360 ) := "+"( Integer'Pos( a_frs1516.whl08c2 ));
      params( 2361 ) := "+"( Integer'Pos( a_frs1516.whl08c3 ));
      params( 2362 ) := "+"( Integer'Pos( a_frs1516.whl08c4 ));
      params( 2363 ) := "+"( Integer'Pos( a_frs1516.whl08c5 ));
      params( 2364 ) := "+"( Integer'Pos( a_frs1516.whl08c6 ));
      params( 2365 ) := "+"( Integer'Pos( a_frs1516.whl08c7 ));
      params( 2366 ) := "+"( Integer'Pos( a_frs1516.whl08c8 ));
      params( 2367 ) := "+"( Integer'Pos( a_frs1516.whl08c9 ));
      params( 2368 ) := "+"( Integer'Pos( a_frs1516.whl09c1 ));
      params( 2369 ) := "+"( Integer'Pos( a_frs1516.whl09c2 ));
      params( 2370 ) := "+"( Integer'Pos( a_frs1516.whl09c3 ));
      params( 2371 ) := "+"( Integer'Pos( a_frs1516.whl09c4 ));
      params( 2372 ) := "+"( Integer'Pos( a_frs1516.whl09c5 ));
      params( 2373 ) := "+"( Integer'Pos( a_frs1516.whl09c6 ));
      params( 2374 ) := "+"( Integer'Pos( a_frs1516.whl09c7 ));
      params( 2375 ) := "+"( Integer'Pos( a_frs1516.whl09c8 ));
      params( 2376 ) := "+"( Integer'Pos( a_frs1516.whl09c9 ));
      params( 2377 ) := "+"( Integer'Pos( a_frs1516.whl10c1 ));
      params( 2378 ) := "+"( Integer'Pos( a_frs1516.whl10c2 ));
      params( 2379 ) := "+"( Integer'Pos( a_frs1516.whl10c3 ));
      params( 2380 ) := "+"( Integer'Pos( a_frs1516.whl10c4 ));
      params( 2381 ) := "+"( Integer'Pos( a_frs1516.whl10c5 ));
      params( 2382 ) := "+"( Integer'Pos( a_frs1516.whl10c6 ));
      params( 2383 ) := "+"( Integer'Pos( a_frs1516.whl10c7 ));
      params( 2384 ) := "+"( Integer'Pos( a_frs1516.whl10c8 ));
      params( 2385 ) := "+"( Integer'Pos( a_frs1516.whl10c9 ));
      params( 2386 ) := "+"( Integer'Pos( a_frs1516.whl11c1 ));
      params( 2387 ) := "+"( Integer'Pos( a_frs1516.whl11c2 ));
      params( 2388 ) := "+"( Integer'Pos( a_frs1516.whl11c3 ));
      params( 2389 ) := "+"( Integer'Pos( a_frs1516.whl11c4 ));
      params( 2390 ) := "+"( Integer'Pos( a_frs1516.whl11c5 ));
      params( 2391 ) := "+"( Integer'Pos( a_frs1516.whl11c6 ));
      params( 2392 ) := "+"( Integer'Pos( a_frs1516.whl11c7 ));
      params( 2393 ) := "+"( Integer'Pos( a_frs1516.whl11c8 ));
      params( 2394 ) := "+"( Integer'Pos( a_frs1516.whl11c9 ));
      params( 2395 ) := "+"( Integer'Pos( a_frs1516.whl12c1 ));
      params( 2396 ) := "+"( Integer'Pos( a_frs1516.whl12c2 ));
      params( 2397 ) := "+"( Integer'Pos( a_frs1516.whl12c3 ));
      params( 2398 ) := "+"( Integer'Pos( a_frs1516.whl12c4 ));
      params( 2399 ) := "+"( Integer'Pos( a_frs1516.whl12c5 ));
      params( 2400 ) := "+"( Integer'Pos( a_frs1516.whl12c6 ));
      params( 2401 ) := "+"( Integer'Pos( a_frs1516.whl12c7 ));
      params( 2402 ) := "+"( Integer'Pos( a_frs1516.whl12c8 ));
      params( 2403 ) := "+"( Integer'Pos( a_frs1516.whl12c9 ));
      params( 2404 ) := "+"( Integer'Pos( a_frs1516.whl13c1 ));
      params( 2405 ) := "+"( Integer'Pos( a_frs1516.whl13c2 ));
      params( 2406 ) := "+"( Integer'Pos( a_frs1516.whl13c3 ));
      params( 2407 ) := "+"( Integer'Pos( a_frs1516.whl13c4 ));
      params( 2408 ) := "+"( Integer'Pos( a_frs1516.whl13c5 ));
      params( 2409 ) := "+"( Integer'Pos( a_frs1516.whl13c6 ));
      params( 2410 ) := "+"( Integer'Pos( a_frs1516.whl13c7 ));
      params( 2411 ) := "+"( Integer'Pos( a_frs1516.whl13c8 ));
      params( 2412 ) := "+"( Integer'Pos( a_frs1516.whl13c9 ));
      params( 2413 ) := "+"( Integer'Pos( a_frs1516.whl14c1 ));
      params( 2414 ) := "+"( Integer'Pos( a_frs1516.whl14c2 ));
      params( 2415 ) := "+"( Integer'Pos( a_frs1516.whl14c3 ));
      params( 2416 ) := "+"( Integer'Pos( a_frs1516.whl14c4 ));
      params( 2417 ) := "+"( Integer'Pos( a_frs1516.whl14c5 ));
      params( 2418 ) := "+"( Integer'Pos( a_frs1516.whl14c6 ));
      params( 2419 ) := "+"( Integer'Pos( a_frs1516.whl14c7 ));
      params( 2420 ) := "+"( Integer'Pos( a_frs1516.whl14c8 ));
      params( 2421 ) := "+"( Integer'Pos( a_frs1516.whl14c9 ));
      params( 2422 ) := "+"( Integer'Pos( a_frs1516.whl15c1 ));
      params( 2423 ) := "+"( Integer'Pos( a_frs1516.whl15c2 ));
      params( 2424 ) := "+"( Integer'Pos( a_frs1516.whl15c3 ));
      params( 2425 ) := "+"( Integer'Pos( a_frs1516.whl15c4 ));
      params( 2426 ) := "+"( Integer'Pos( a_frs1516.whl15c5 ));
      params( 2427 ) := "+"( Integer'Pos( a_frs1516.whl15c6 ));
      params( 2428 ) := "+"( Integer'Pos( a_frs1516.whl15c7 ));
      params( 2429 ) := "+"( Integer'Pos( a_frs1516.whl15c8 ));
      params( 2430 ) := "+"( Integer'Pos( a_frs1516.whl15c9 ));
      params( 2431 ) := "+"( Integer'Pos( a_frs1516.whl16c1 ));
      params( 2432 ) := "+"( Integer'Pos( a_frs1516.whl16c2 ));
      params( 2433 ) := "+"( Integer'Pos( a_frs1516.whl16c3 ));
      params( 2434 ) := "+"( Integer'Pos( a_frs1516.whl16c4 ));
      params( 2435 ) := "+"( Integer'Pos( a_frs1516.whl16c5 ));
      params( 2436 ) := "+"( Integer'Pos( a_frs1516.whl16c6 ));
      params( 2437 ) := "+"( Integer'Pos( a_frs1516.whl16c7 ));
      params( 2438 ) := "+"( Integer'Pos( a_frs1516.whl16c8 ));
      params( 2439 ) := "+"( Integer'Pos( a_frs1516.whl16c9 ));
      params( 2440 ) := "+"( Integer'Pos( a_frs1516.whl17c1 ));
      params( 2441 ) := "+"( Integer'Pos( a_frs1516.whl17c2 ));
      params( 2442 ) := "+"( Integer'Pos( a_frs1516.whl17c3 ));
      params( 2443 ) := "+"( Integer'Pos( a_frs1516.whl17c4 ));
      params( 2444 ) := "+"( Integer'Pos( a_frs1516.whl17c5 ));
      params( 2445 ) := "+"( Integer'Pos( a_frs1516.whl17c6 ));
      params( 2446 ) := "+"( Integer'Pos( a_frs1516.whl17c7 ));
      params( 2447 ) := "+"( Integer'Pos( a_frs1516.whl17c8 ));
      params( 2448 ) := "+"( Integer'Pos( a_frs1516.whl17c9 ));
      params( 2449 ) := "+"( Integer'Pos( a_frs1516.whl18c1 ));
      params( 2450 ) := "+"( Integer'Pos( a_frs1516.whl18c2 ));
      params( 2451 ) := "+"( Integer'Pos( a_frs1516.whl18c3 ));
      params( 2452 ) := "+"( Integer'Pos( a_frs1516.whl18c4 ));
      params( 2453 ) := "+"( Integer'Pos( a_frs1516.whl18c5 ));
      params( 2454 ) := "+"( Integer'Pos( a_frs1516.whl18c6 ));
      params( 2455 ) := "+"( Integer'Pos( a_frs1516.whl18c7 ));
      params( 2456 ) := "+"( Integer'Pos( a_frs1516.whl18c8 ));
      params( 2457 ) := "+"( Integer'Pos( a_frs1516.whl18c9 ));
      params( 2458 ) := "+"( Integer'Pos( a_frs1516.whl19c1 ));
      params( 2459 ) := "+"( Integer'Pos( a_frs1516.whl19c2 ));
      params( 2460 ) := "+"( Integer'Pos( a_frs1516.whl19c3 ));
      params( 2461 ) := "+"( Integer'Pos( a_frs1516.whl19c4 ));
      params( 2462 ) := "+"( Integer'Pos( a_frs1516.whl19c5 ));
      params( 2463 ) := "+"( Integer'Pos( a_frs1516.whl19c6 ));
      params( 2464 ) := "+"( Integer'Pos( a_frs1516.whl19c7 ));
      params( 2465 ) := "+"( Integer'Pos( a_frs1516.whl19c8 ));
      params( 2466 ) := "+"( Integer'Pos( a_frs1516.whl19c9 ));
      params( 2467 ) := "+"( Integer'Pos( a_frs1516.whl20c1 ));
      params( 2468 ) := "+"( Integer'Pos( a_frs1516.whl20c2 ));
      params( 2469 ) := "+"( Integer'Pos( a_frs1516.whl20c3 ));
      params( 2470 ) := "+"( Integer'Pos( a_frs1516.whl20c4 ));
      params( 2471 ) := "+"( Integer'Pos( a_frs1516.whl20c5 ));
      params( 2472 ) := "+"( Integer'Pos( a_frs1516.whl20c6 ));
      params( 2473 ) := "+"( Integer'Pos( a_frs1516.whl20c7 ));
      params( 2474 ) := "+"( Integer'Pos( a_frs1516.whl20c8 ));
      params( 2475 ) := "+"( Integer'Pos( a_frs1516.whl20c9 ));
      params( 2476 ) := "+"( Integer'Pos( a_frs1516.agec1 ));
      params( 2477 ) := "+"( Integer'Pos( a_frs1516.agec2 ));
      params( 2478 ) := "+"( Integer'Pos( a_frs1516.agec3 ));
      params( 2479 ) := "+"( Integer'Pos( a_frs1516.agec4 ));
      params( 2480 ) := "+"( Integer'Pos( a_frs1516.agec5 ));
      params( 2481 ) := "+"( Integer'Pos( a_frs1516.agec6 ));
      params( 2482 ) := "+"( Integer'Pos( a_frs1516.agec7 ));
      params( 2483 ) := "+"( Integer'Pos( a_frs1516.agec8 ));
      params( 2484 ) := "+"( Integer'Pos( a_frs1516.cameyrc1 ));
      params( 2485 ) := "+"( Integer'Pos( a_frs1516.cameyrc2 ));
      params( 2486 ) := "+"( Integer'Pos( a_frs1516.cameyrc3 ));
      params( 2487 ) := "+"( Integer'Pos( a_frs1516.cameyrc4 ));
      params( 2488 ) := "+"( Integer'Pos( a_frs1516.cameyrc5 ));
      params( 2489 ) := "+"( Integer'Pos( a_frs1516.cameyrc6 ));
      params( 2490 ) := "+"( Integer'Pos( a_frs1516.cameyrc7 ));
      params( 2491 ) := "+"( Integer'Pos( a_frs1516.cameyrc8 ));
      params( 2492 ) := "+"( Integer'Pos( a_frs1516.chcrec1 ));
      params( 2493 ) := "+"( Integer'Pos( a_frs1516.chcrec2 ));
      params( 2494 ) := "+"( Integer'Pos( a_frs1516.chcrec3 ));
      params( 2495 ) := "+"( Integer'Pos( a_frs1516.chcrec4 ));
      params( 2496 ) := "+"( Integer'Pos( a_frs1516.chcrec5 ));
      params( 2497 ) := "+"( Integer'Pos( a_frs1516.chcrec6 ));
      params( 2498 ) := "+"( Integer'Pos( a_frs1516.chcrec7 ));
      params( 2499 ) := "+"( Integer'Pos( a_frs1516.chcrec8 ));
      params( 2500 ) := "+"( Integer'Pos( a_frs1516.creabc1 ));
      params( 2501 ) := "+"( Integer'Pos( a_frs1516.creabc2 ));
      params( 2502 ) := "+"( Integer'Pos( a_frs1516.creabc3 ));
      params( 2503 ) := "+"( Integer'Pos( a_frs1516.creabc4 ));
      params( 2504 ) := "+"( Integer'Pos( a_frs1516.creabc5 ));
      params( 2505 ) := "+"( Integer'Pos( a_frs1516.creabc6 ));
      params( 2506 ) := "+"( Integer'Pos( a_frs1516.creabc7 ));
      params( 2507 ) := "+"( Integer'Pos( a_frs1516.creabc8 ));
      params( 2508 ) := "+"( Integer'Pos( a_frs1516.creahc1 ));
      params( 2509 ) := "+"( Integer'Pos( a_frs1516.creahc2 ));
      params( 2510 ) := "+"( Integer'Pos( a_frs1516.creahc3 ));
      params( 2511 ) := "+"( Integer'Pos( a_frs1516.creahc4 ));
      params( 2512 ) := "+"( Integer'Pos( a_frs1516.creahc5 ));
      params( 2513 ) := "+"( Integer'Pos( a_frs1516.creahc6 ));
      params( 2514 ) := "+"( Integer'Pos( a_frs1516.creahc7 ));
      params( 2515 ) := "+"( Integer'Pos( a_frs1516.creahc8 ));
      params( 2516 ) := "+"( Integer'Pos( a_frs1516.crecbc1 ));
      params( 2517 ) := "+"( Integer'Pos( a_frs1516.crecbc2 ));
      params( 2518 ) := "+"( Integer'Pos( a_frs1516.crecbc3 ));
      params( 2519 ) := "+"( Integer'Pos( a_frs1516.crecbc4 ));
      params( 2520 ) := "+"( Integer'Pos( a_frs1516.crecbc5 ));
      params( 2521 ) := "+"( Integer'Pos( a_frs1516.crecbc6 ));
      params( 2522 ) := "+"( Integer'Pos( a_frs1516.crecbc7 ));
      params( 2523 ) := "+"( Integer'Pos( a_frs1516.crecbc8 ));
      params( 2524 ) := "+"( Integer'Pos( a_frs1516.crechc1 ));
      params( 2525 ) := "+"( Integer'Pos( a_frs1516.crechc2 ));
      params( 2526 ) := "+"( Integer'Pos( a_frs1516.crechc3 ));
      params( 2527 ) := "+"( Integer'Pos( a_frs1516.crechc4 ));
      params( 2528 ) := "+"( Integer'Pos( a_frs1516.crechc5 ));
      params( 2529 ) := "+"( Integer'Pos( a_frs1516.crechc6 ));
      params( 2530 ) := "+"( Integer'Pos( a_frs1516.crechc7 ));
      params( 2531 ) := "+"( Integer'Pos( a_frs1516.crechc8 ));
      params( 2532 ) := "+"( Integer'Pos( a_frs1516.creclc1 ));
      params( 2533 ) := "+"( Integer'Pos( a_frs1516.creclc2 ));
      params( 2534 ) := "+"( Integer'Pos( a_frs1516.creclc3 ));
      params( 2535 ) := "+"( Integer'Pos( a_frs1516.creclc4 ));
      params( 2536 ) := "+"( Integer'Pos( a_frs1516.creclc5 ));
      params( 2537 ) := "+"( Integer'Pos( a_frs1516.creclc6 ));
      params( 2538 ) := "+"( Integer'Pos( a_frs1516.creclc7 ));
      params( 2539 ) := "+"( Integer'Pos( a_frs1516.creclc8 ));
      params( 2540 ) := "+"( Integer'Pos( a_frs1516.crefrc1 ));
      params( 2541 ) := "+"( Integer'Pos( a_frs1516.crefrc2 ));
      params( 2542 ) := "+"( Integer'Pos( a_frs1516.crefrc3 ));
      params( 2543 ) := "+"( Integer'Pos( a_frs1516.crefrc4 ));
      params( 2544 ) := "+"( Integer'Pos( a_frs1516.crefrc5 ));
      params( 2545 ) := "+"( Integer'Pos( a_frs1516.crefrc6 ));
      params( 2546 ) := "+"( Integer'Pos( a_frs1516.crefrc7 ));
      params( 2547 ) := "+"( Integer'Pos( a_frs1516.crefrc8 ));
      params( 2548 ) := "+"( Integer'Pos( a_frs1516.creotc1 ));
      params( 2549 ) := "+"( Integer'Pos( a_frs1516.creotc2 ));
      params( 2550 ) := "+"( Integer'Pos( a_frs1516.creotc3 ));
      params( 2551 ) := "+"( Integer'Pos( a_frs1516.creotc4 ));
      params( 2552 ) := "+"( Integer'Pos( a_frs1516.creotc5 ));
      params( 2553 ) := "+"( Integer'Pos( a_frs1516.creotc6 ));
      params( 2554 ) := "+"( Integer'Pos( a_frs1516.creotc7 ));
      params( 2555 ) := "+"( Integer'Pos( a_frs1516.creotc8 ));
      params( 2556 ) := "+"( Integer'Pos( a_frs1516.carerc1 ));
      params( 2557 ) := "+"( Integer'Pos( a_frs1516.carerc2 ));
      params( 2558 ) := "+"( Integer'Pos( a_frs1516.carerc3 ));
      params( 2559 ) := "+"( Integer'Pos( a_frs1516.carerc4 ));
      params( 2560 ) := "+"( Integer'Pos( a_frs1516.carerc5 ));
      params( 2561 ) := "+"( Integer'Pos( a_frs1516.carerc6 ));
      params( 2562 ) := "+"( Integer'Pos( a_frs1516.carerc7 ));
      params( 2563 ) := "+"( Integer'Pos( a_frs1516.carerc8 ));
      params( 2564 ) := "+"( Integer'Pos( a_frs1516.cdatrec1 ));
      params( 2565 ) := "+"( Integer'Pos( a_frs1516.cdatrec2 ));
      params( 2566 ) := "+"( Integer'Pos( a_frs1516.cdatrec3 ));
      params( 2567 ) := "+"( Integer'Pos( a_frs1516.cdatrec4 ));
      params( 2568 ) := "+"( Integer'Pos( a_frs1516.cdatrec5 ));
      params( 2569 ) := "+"( Integer'Pos( a_frs1516.cdatrec6 ));
      params( 2570 ) := "+"( Integer'Pos( a_frs1516.cdatrec7 ));
      params( 2571 ) := "+"( Integer'Pos( a_frs1516.cdatrec8 ));
      params( 2572 ) := "+"( Integer'Pos( a_frs1516.cdtrepc1 ));
      params( 2573 ) := "+"( Integer'Pos( a_frs1516.cdtrepc2 ));
      params( 2574 ) := "+"( Integer'Pos( a_frs1516.cdtrepc3 ));
      params( 2575 ) := "+"( Integer'Pos( a_frs1516.cdtrepc4 ));
      params( 2576 ) := "+"( Integer'Pos( a_frs1516.cdtrepc5 ));
      params( 2577 ) := "+"( Integer'Pos( a_frs1516.cdtrepc6 ));
      params( 2578 ) := "+"( Integer'Pos( a_frs1516.cdtrepc7 ));
      params( 2579 ) := "+"( Integer'Pos( a_frs1516.cdtrepc8 ));
      params( 2580 ) := "+"( Integer'Pos( a_frs1516.cdis1c1 ));
      params( 2581 ) := "+"( Integer'Pos( a_frs1516.cdis1c2 ));
      params( 2582 ) := "+"( Integer'Pos( a_frs1516.cdis1c3 ));
      params( 2583 ) := "+"( Integer'Pos( a_frs1516.cdis1c4 ));
      params( 2584 ) := "+"( Integer'Pos( a_frs1516.cdis1c5 ));
      params( 2585 ) := "+"( Integer'Pos( a_frs1516.cdis1c6 ));
      params( 2586 ) := "+"( Integer'Pos( a_frs1516.cdis1c7 ));
      params( 2587 ) := "+"( Integer'Pos( a_frs1516.cdis1c8 ));
      params( 2588 ) := "+"( Integer'Pos( a_frs1516.cdis2c1 ));
      params( 2589 ) := "+"( Integer'Pos( a_frs1516.cdis2c2 ));
      params( 2590 ) := "+"( Integer'Pos( a_frs1516.cdis2c3 ));
      params( 2591 ) := "+"( Integer'Pos( a_frs1516.cdis2c4 ));
      params( 2592 ) := "+"( Integer'Pos( a_frs1516.cdis2c5 ));
      params( 2593 ) := "+"( Integer'Pos( a_frs1516.cdis2c6 ));
      params( 2594 ) := "+"( Integer'Pos( a_frs1516.cdis2c7 ));
      params( 2595 ) := "+"( Integer'Pos( a_frs1516.cdis2c8 ));
      params( 2596 ) := "+"( Integer'Pos( a_frs1516.cdis3c1 ));
      params( 2597 ) := "+"( Integer'Pos( a_frs1516.cdis3c2 ));
      params( 2598 ) := "+"( Integer'Pos( a_frs1516.cdis3c3 ));
      params( 2599 ) := "+"( Integer'Pos( a_frs1516.cdis3c4 ));
      params( 2600 ) := "+"( Integer'Pos( a_frs1516.cdis3c5 ));
      params( 2601 ) := "+"( Integer'Pos( a_frs1516.cdis3c6 ));
      params( 2602 ) := "+"( Integer'Pos( a_frs1516.cdis3c7 ));
      params( 2603 ) := "+"( Integer'Pos( a_frs1516.cdis3c8 ));
      params( 2604 ) := "+"( Integer'Pos( a_frs1516.cdis4c1 ));
      params( 2605 ) := "+"( Integer'Pos( a_frs1516.cdis4c2 ));
      params( 2606 ) := "+"( Integer'Pos( a_frs1516.cdis4c3 ));
      params( 2607 ) := "+"( Integer'Pos( a_frs1516.cdis4c4 ));
      params( 2608 ) := "+"( Integer'Pos( a_frs1516.cdis4c5 ));
      params( 2609 ) := "+"( Integer'Pos( a_frs1516.cdis4c6 ));
      params( 2610 ) := "+"( Integer'Pos( a_frs1516.cdis4c7 ));
      params( 2611 ) := "+"( Integer'Pos( a_frs1516.cdis4c8 ));
      params( 2612 ) := "+"( Integer'Pos( a_frs1516.cdis5c1 ));
      params( 2613 ) := "+"( Integer'Pos( a_frs1516.cdis5c2 ));
      params( 2614 ) := "+"( Integer'Pos( a_frs1516.cdis5c3 ));
      params( 2615 ) := "+"( Integer'Pos( a_frs1516.cdis5c4 ));
      params( 2616 ) := "+"( Integer'Pos( a_frs1516.cdis5c5 ));
      params( 2617 ) := "+"( Integer'Pos( a_frs1516.cdis5c6 ));
      params( 2618 ) := "+"( Integer'Pos( a_frs1516.cdis5c7 ));
      params( 2619 ) := "+"( Integer'Pos( a_frs1516.cdis5c8 ));
      params( 2620 ) := "+"( Integer'Pos( a_frs1516.cdis6c1 ));
      params( 2621 ) := "+"( Integer'Pos( a_frs1516.cdis6c2 ));
      params( 2622 ) := "+"( Integer'Pos( a_frs1516.cdis6c3 ));
      params( 2623 ) := "+"( Integer'Pos( a_frs1516.cdis6c4 ));
      params( 2624 ) := "+"( Integer'Pos( a_frs1516.cdis6c5 ));
      params( 2625 ) := "+"( Integer'Pos( a_frs1516.cdis6c6 ));
      params( 2626 ) := "+"( Integer'Pos( a_frs1516.cdis6c7 ));
      params( 2627 ) := "+"( Integer'Pos( a_frs1516.cdis6c8 ));
      params( 2628 ) := "+"( Integer'Pos( a_frs1516.cdis7c1 ));
      params( 2629 ) := "+"( Integer'Pos( a_frs1516.cdis7c2 ));
      params( 2630 ) := "+"( Integer'Pos( a_frs1516.cdis7c3 ));
      params( 2631 ) := "+"( Integer'Pos( a_frs1516.cdis7c4 ));
      params( 2632 ) := "+"( Integer'Pos( a_frs1516.cdis7c5 ));
      params( 2633 ) := "+"( Integer'Pos( a_frs1516.cdis7c6 ));
      params( 2634 ) := "+"( Integer'Pos( a_frs1516.cdis7c7 ));
      params( 2635 ) := "+"( Integer'Pos( a_frs1516.cdis7c8 ));
      params( 2636 ) := "+"( Integer'Pos( a_frs1516.cdis8c1 ));
      params( 2637 ) := "+"( Integer'Pos( a_frs1516.cdis8c2 ));
      params( 2638 ) := "+"( Integer'Pos( a_frs1516.cdis8c3 ));
      params( 2639 ) := "+"( Integer'Pos( a_frs1516.cdis8c4 ));
      params( 2640 ) := "+"( Integer'Pos( a_frs1516.cdis8c5 ));
      params( 2641 ) := "+"( Integer'Pos( a_frs1516.cdis8c6 ));
      params( 2642 ) := "+"( Integer'Pos( a_frs1516.cdis8c7 ));
      params( 2643 ) := "+"( Integer'Pos( a_frs1516.cdis8c8 ));
      params( 2644 ) := "+"( Integer'Pos( a_frs1516.cdis9c1 ));
      params( 2645 ) := "+"( Integer'Pos( a_frs1516.cdis9c2 ));
      params( 2646 ) := "+"( Integer'Pos( a_frs1516.cdis9c3 ));
      params( 2647 ) := "+"( Integer'Pos( a_frs1516.cdis9c4 ));
      params( 2648 ) := "+"( Integer'Pos( a_frs1516.cdis9c5 ));
      params( 2649 ) := "+"( Integer'Pos( a_frs1516.cdis9c6 ));
      params( 2650 ) := "+"( Integer'Pos( a_frs1516.cdis9c7 ));
      params( 2651 ) := "+"( Integer'Pos( a_frs1516.cdis9c8 ));
      params( 2652 ) := "+"( Integer'Pos( a_frs1516.cdis10c1 ));
      params( 2653 ) := "+"( Integer'Pos( a_frs1516.cdis10c2 ));
      params( 2654 ) := "+"( Integer'Pos( a_frs1516.cdis10c3 ));
      params( 2655 ) := "+"( Integer'Pos( a_frs1516.cdis10c4 ));
      params( 2656 ) := "+"( Integer'Pos( a_frs1516.cdis10c5 ));
      params( 2657 ) := "+"( Integer'Pos( a_frs1516.cdis10c6 ));
      params( 2658 ) := "+"( Integer'Pos( a_frs1516.cdis10c7 ));
      params( 2659 ) := "+"( Integer'Pos( a_frs1516.cdis10c8 ));
      params( 2660 ) := "+"( Integer'Pos( a_frs1516.cdifc1 ));
      params( 2661 ) := "+"( Integer'Pos( a_frs1516.cdifc2 ));
      params( 2662 ) := "+"( Integer'Pos( a_frs1516.cdifc3 ));
      params( 2663 ) := "+"( Integer'Pos( a_frs1516.cdifc4 ));
      params( 2664 ) := "+"( Integer'Pos( a_frs1516.cdifc5 ));
      params( 2665 ) := "+"( Integer'Pos( a_frs1516.cdifc6 ));
      params( 2666 ) := "+"( Integer'Pos( a_frs1516.cdifc7 ));
      params( 2667 ) := "+"( Integer'Pos( a_frs1516.cdifc8 ));
      params( 2668 ) := "+"( Float( a_frs1516.ernamc1 ));
      params( 2669 ) := "+"( Float( a_frs1516.ernamc2 ));
      params( 2670 ) := "+"( Float( a_frs1516.ernamc3 ));
      params( 2671 ) := "+"( Integer'Pos( a_frs1516.ernamc4 ));
      params( 2672 ) := "+"( Integer'Pos( a_frs1516.ernamc5 ));
      params( 2673 ) := "+"( Integer'Pos( a_frs1516.ernamc6 ));
      params( 2674 ) := "+"( Integer'Pos( a_frs1516.ernamc7 ));
      params( 2675 ) := "+"( Integer'Pos( a_frs1516.ernamc8 ));
      params( 2676 ) := "+"( Float( a_frs1516.trustc1 ));
      params( 2677 ) := "+"( Float( a_frs1516.trustc2 ));
      params( 2678 ) := "+"( Float( a_frs1516.trustc3 ));
      params( 2679 ) := "+"( Integer'Pos( a_frs1516.trustc4 ));
      params( 2680 ) := "+"( Integer'Pos( a_frs1516.trustc5 ));
      params( 2681 ) := "+"( Integer'Pos( a_frs1516.trustc6 ));
      params( 2682 ) := "+"( Integer'Pos( a_frs1516.trustc7 ));
      params( 2683 ) := "+"( Integer'Pos( a_frs1516.trustc8 ));
      params( 2684 ) := "+"( Integer'Pos( a_frs1516.chbfdc1 ));
      params( 2685 ) := "+"( Integer'Pos( a_frs1516.chbfdc2 ));
      params( 2686 ) := "+"( Integer'Pos( a_frs1516.chbfdc3 ));
      params( 2687 ) := "+"( Integer'Pos( a_frs1516.chbfdc4 ));
      params( 2688 ) := "+"( Integer'Pos( a_frs1516.chbfdc5 ));
      params( 2689 ) := "+"( Integer'Pos( a_frs1516.chbfdc6 ));
      params( 2690 ) := "+"( Integer'Pos( a_frs1516.chbfdc7 ));
      params( 2691 ) := "+"( Integer'Pos( a_frs1516.chbfdc8 ));
      params( 2692 ) := "+"( Float( a_frs1516.cbfamtc1 ));
      params( 2693 ) := "+"( Float( a_frs1516.cbfamtc2 ));
      params( 2694 ) := "+"( Integer'Pos( a_frs1516.cbfamtc3 ));
      params( 2695 ) := "+"( Integer'Pos( a_frs1516.cbfamtc4 ));
      params( 2696 ) := "+"( Integer'Pos( a_frs1516.cbfamtc5 ));
      params( 2697 ) := "+"( Integer'Pos( a_frs1516.cbfamtc6 ));
      params( 2698 ) := "+"( Integer'Pos( a_frs1516.cbfamtc7 ));
      params( 2699 ) := "+"( Integer'Pos( a_frs1516.cbfamtc8 ));
      params( 2700 ) := "+"( Integer'Pos( a_frs1516.pbfamtc1 ));
      params( 2701 ) := "+"( Integer'Pos( a_frs1516.pbfamtc2 ));
      params( 2702 ) := "+"( Integer'Pos( a_frs1516.pbfamtc3 ));
      params( 2703 ) := "+"( Integer'Pos( a_frs1516.pbfamtc4 ));
      params( 2704 ) := "+"( Integer'Pos( a_frs1516.pbfamtc5 ));
      params( 2705 ) := "+"( Integer'Pos( a_frs1516.pbfamtc6 ));
      params( 2706 ) := "+"( Integer'Pos( a_frs1516.pbfamtc7 ));
      params( 2707 ) := "+"( Integer'Pos( a_frs1516.pbfamtc8 ));
      params( 2708 ) := "+"( Integer'Pos( a_frs1516.cbfvalc1 ));
      params( 2709 ) := "+"( Integer'Pos( a_frs1516.cbfvalc2 ));
      params( 2710 ) := "+"( Integer'Pos( a_frs1516.cbfvalc3 ));
      params( 2711 ) := "+"( Integer'Pos( a_frs1516.cbfvalc4 ));
      params( 2712 ) := "+"( Integer'Pos( a_frs1516.cbfvalc5 ));
      params( 2713 ) := "+"( Integer'Pos( a_frs1516.cbfvalc6 ));
      params( 2714 ) := "+"( Integer'Pos( a_frs1516.cbfvalc7 ));
      params( 2715 ) := "+"( Integer'Pos( a_frs1516.cbfvalc8 ));
      params( 2716 ) := "+"( Integer'Pos( a_frs1516.chcondc1 ));
      params( 2717 ) := "+"( Integer'Pos( a_frs1516.chcondc2 ));
      params( 2718 ) := "+"( Integer'Pos( a_frs1516.chcondc3 ));
      params( 2719 ) := "+"( Integer'Pos( a_frs1516.chcondc4 ));
      params( 2720 ) := "+"( Integer'Pos( a_frs1516.chcondc5 ));
      params( 2721 ) := "+"( Integer'Pos( a_frs1516.chcondc6 ));
      params( 2722 ) := "+"( Integer'Pos( a_frs1516.chcondc7 ));
      params( 2723 ) := "+"( Integer'Pos( a_frs1516.chcondc8 ));
      params( 2724 ) := "+"( Integer'Pos( a_frs1516.cdla1c1 ));
      params( 2725 ) := "+"( Integer'Pos( a_frs1516.cdla1c2 ));
      params( 2726 ) := "+"( Integer'Pos( a_frs1516.cdla1c3 ));
      params( 2727 ) := "+"( Integer'Pos( a_frs1516.cdla1c4 ));
      params( 2728 ) := "+"( Integer'Pos( a_frs1516.cdla1c5 ));
      params( 2729 ) := "+"( Integer'Pos( a_frs1516.cdla1c6 ));
      params( 2730 ) := "+"( Integer'Pos( a_frs1516.cdla1c7 ));
      params( 2731 ) := "+"( Integer'Pos( a_frs1516.cdla1c8 ));
      params( 2732 ) := "+"( Integer'Pos( a_frs1516.cdla2c1 ));
      params( 2733 ) := "+"( Integer'Pos( a_frs1516.cdla2c2 ));
      params( 2734 ) := "+"( Integer'Pos( a_frs1516.cdla2c3 ));
      params( 2735 ) := "+"( Integer'Pos( a_frs1516.cdla2c4 ));
      params( 2736 ) := "+"( Integer'Pos( a_frs1516.cdla2c5 ));
      params( 2737 ) := "+"( Integer'Pos( a_frs1516.cdla2c6 ));
      params( 2738 ) := "+"( Integer'Pos( a_frs1516.cdla2c7 ));
      params( 2739 ) := "+"( Integer'Pos( a_frs1516.cdla2c8 ));
      params( 2740 ) := "+"( Integer'Pos( a_frs1516.chelfc1 ));
      params( 2741 ) := "+"( Integer'Pos( a_frs1516.chelfc2 ));
      params( 2742 ) := "+"( Integer'Pos( a_frs1516.chelfc3 ));
      params( 2743 ) := "+"( Integer'Pos( a_frs1516.chelfc4 ));
      params( 2744 ) := "+"( Integer'Pos( a_frs1516.chelfc5 ));
      params( 2745 ) := "+"( Integer'Pos( a_frs1516.chelfc6 ));
      params( 2746 ) := "+"( Integer'Pos( a_frs1516.chelfc7 ));
      params( 2747 ) := "+"( Integer'Pos( a_frs1516.chelfc8 ));
      params( 2748 ) := "+"( Float( a_frs1516.chernc1 ));
      params( 2749 ) := "+"( Float( a_frs1516.chernc2 ));
      params( 2750 ) := "+"( Float( a_frs1516.chernc3 ));
      params( 2751 ) := "+"( Integer'Pos( a_frs1516.chernc4 ));
      params( 2752 ) := "+"( Integer'Pos( a_frs1516.chernc5 ));
      params( 2753 ) := "+"( Integer'Pos( a_frs1516.chernc6 ));
      params( 2754 ) := "+"( Integer'Pos( a_frs1516.chernc7 ));
      params( 2755 ) := "+"( Integer'Pos( a_frs1516.chernc8 ));
      params( 2756 ) := "+"( Integer'Pos( a_frs1516.crns1c1 ));
      params( 2757 ) := "+"( Integer'Pos( a_frs1516.crns1c2 ));
      params( 2758 ) := "+"( Integer'Pos( a_frs1516.crns1c3 ));
      params( 2759 ) := "+"( Integer'Pos( a_frs1516.crns1c4 ));
      params( 2760 ) := "+"( Integer'Pos( a_frs1516.crns1c5 ));
      params( 2761 ) := "+"( Integer'Pos( a_frs1516.crns1c6 ));
      params( 2762 ) := "+"( Integer'Pos( a_frs1516.crns1c7 ));
      params( 2763 ) := "+"( Integer'Pos( a_frs1516.crns1c8 ));
      params( 2764 ) := "+"( Integer'Pos( a_frs1516.crns2c1 ));
      params( 2765 ) := "+"( Integer'Pos( a_frs1516.crns2c2 ));
      params( 2766 ) := "+"( Integer'Pos( a_frs1516.crns2c3 ));
      params( 2767 ) := "+"( Integer'Pos( a_frs1516.crns2c4 ));
      params( 2768 ) := "+"( Integer'Pos( a_frs1516.crns2c5 ));
      params( 2769 ) := "+"( Integer'Pos( a_frs1516.crns2c6 ));
      params( 2770 ) := "+"( Integer'Pos( a_frs1516.crns2c7 ));
      params( 2771 ) := "+"( Integer'Pos( a_frs1516.crns2c8 ));
      params( 2772 ) := "+"( Integer'Pos( a_frs1516.crns3c1 ));
      params( 2773 ) := "+"( Integer'Pos( a_frs1516.crns3c2 ));
      params( 2774 ) := "+"( Integer'Pos( a_frs1516.crns3c3 ));
      params( 2775 ) := "+"( Integer'Pos( a_frs1516.crns3c4 ));
      params( 2776 ) := "+"( Integer'Pos( a_frs1516.crns3c5 ));
      params( 2777 ) := "+"( Integer'Pos( a_frs1516.crns3c6 ));
      params( 2778 ) := "+"( Integer'Pos( a_frs1516.crns3c7 ));
      params( 2779 ) := "+"( Integer'Pos( a_frs1516.crns3c8 ));
      params( 2780 ) := "+"( Integer'Pos( a_frs1516.chemac1 ));
      params( 2781 ) := "+"( Integer'Pos( a_frs1516.chemac2 ));
      params( 2782 ) := "+"( Integer'Pos( a_frs1516.chemac3 ));
      params( 2783 ) := "+"( Integer'Pos( a_frs1516.chemac4 ));
      params( 2784 ) := "+"( Integer'Pos( a_frs1516.chemac5 ));
      params( 2785 ) := "+"( Integer'Pos( a_frs1516.chemac6 ));
      params( 2786 ) := "+"( Integer'Pos( a_frs1516.chemac7 ));
      params( 2787 ) := "+"( Integer'Pos( a_frs1516.chemac8 ));
      params( 2788 ) := "+"( Float( a_frs1516.emamtc1 ));
      params( 2789 ) := "+"( Float( a_frs1516.emamtc2 ));
      params( 2790 ) := "+"( Integer'Pos( a_frs1516.emamtc3 ));
      params( 2791 ) := "+"( Integer'Pos( a_frs1516.emamtc4 ));
      params( 2792 ) := "+"( Integer'Pos( a_frs1516.emamtc5 ));
      params( 2793 ) := "+"( Integer'Pos( a_frs1516.emamtc6 ));
      params( 2794 ) := "+"( Integer'Pos( a_frs1516.emamtc7 ));
      params( 2795 ) := "+"( Integer'Pos( a_frs1516.emamtc8 ));
      params( 2796 ) := "+"( Integer'Pos( a_frs1516.emapdc1 ));
      params( 2797 ) := "+"( Integer'Pos( a_frs1516.emapdc2 ));
      params( 2798 ) := "+"( Integer'Pos( a_frs1516.emapdc3 ));
      params( 2799 ) := "+"( Integer'Pos( a_frs1516.emapdc4 ));
      params( 2800 ) := "+"( Integer'Pos( a_frs1516.emapdc5 ));
      params( 2801 ) := "+"( Integer'Pos( a_frs1516.emapdc6 ));
      params( 2802 ) := "+"( Integer'Pos( a_frs1516.emapdc7 ));
      params( 2803 ) := "+"( Integer'Pos( a_frs1516.emapdc8 ));
      params( 2804 ) := "+"( Float( a_frs1516.chidvc1 ));
      params( 2805 ) := "+"( Float( a_frs1516.chidvc2 ));
      params( 2806 ) := "+"( Float( a_frs1516.chidvc3 ));
      params( 2807 ) := "+"( Integer'Pos( a_frs1516.chidvc4 ));
      params( 2808 ) := "+"( Integer'Pos( a_frs1516.chidvc5 ));
      params( 2809 ) := "+"( Integer'Pos( a_frs1516.chidvc6 ));
      params( 2810 ) := "+"( Integer'Pos( a_frs1516.chidvc7 ));
      params( 2811 ) := "+"( Integer'Pos( a_frs1516.chidvc8 ));
      params( 2812 ) := "+"( Integer'Pos( a_frs1516.climitc1 ));
      params( 2813 ) := "+"( Integer'Pos( a_frs1516.climitc2 ));
      params( 2814 ) := "+"( Integer'Pos( a_frs1516.climitc3 ));
      params( 2815 ) := "+"( Integer'Pos( a_frs1516.climitc4 ));
      params( 2816 ) := "+"( Integer'Pos( a_frs1516.climitc5 ));
      params( 2817 ) := "+"( Integer'Pos( a_frs1516.climitc6 ));
      params( 2818 ) := "+"( Integer'Pos( a_frs1516.climitc7 ));
      params( 2819 ) := "+"( Integer'Pos( a_frs1516.climitc8 ));
      params( 2820 ) := "+"( Integer'Pos( a_frs1516.pearnc1 ));
      params( 2821 ) := "+"( Integer'Pos( a_frs1516.pearnc2 ));
      params( 2822 ) := "+"( Integer'Pos( a_frs1516.pearnc3 ));
      params( 2823 ) := "+"( Integer'Pos( a_frs1516.pearnc4 ));
      params( 2824 ) := "+"( Integer'Pos( a_frs1516.pearnc5 ));
      params( 2825 ) := "+"( Integer'Pos( a_frs1516.pearnc6 ));
      params( 2826 ) := "+"( Integer'Pos( a_frs1516.pearnc7 ));
      params( 2827 ) := "+"( Integer'Pos( a_frs1516.pearnc8 ));
      params( 2828 ) := "+"( Integer'Pos( a_frs1516.ptrusc1 ));
      params( 2829 ) := "+"( Integer'Pos( a_frs1516.ptrusc2 ));
      params( 2830 ) := "+"( Integer'Pos( a_frs1516.ptrusc3 ));
      params( 2831 ) := "+"( Integer'Pos( a_frs1516.ptrusc4 ));
      params( 2832 ) := "+"( Integer'Pos( a_frs1516.ptrusc5 ));
      params( 2833 ) := "+"( Integer'Pos( a_frs1516.ptrusc6 ));
      params( 2834 ) := "+"( Integer'Pos( a_frs1516.ptrusc7 ));
      params( 2835 ) := "+"( Integer'Pos( a_frs1516.ptrusc8 ));
      params( 2836 ) := "+"( Float( a_frs1516.chrinc1 ));
      params( 2837 ) := "+"( Float( a_frs1516.chrinc2 ));
      params( 2838 ) := "+"( Float( a_frs1516.chrinc3 ));
      params( 2839 ) := "+"( Integer'Pos( a_frs1516.chrinc4 ));
      params( 2840 ) := "+"( Integer'Pos( a_frs1516.chrinc5 ));
      params( 2841 ) := "+"( Integer'Pos( a_frs1516.chrinc6 ));
      params( 2842 ) := "+"( Integer'Pos( a_frs1516.chrinc7 ));
      params( 2843 ) := "+"( Integer'Pos( a_frs1516.chrinc8 ));
      params( 2844 ) := "+"( Integer'Pos( a_frs1516.csavec1 ));
      params( 2845 ) := "+"( Integer'Pos( a_frs1516.csavec2 ));
      params( 2846 ) := "+"( Integer'Pos( a_frs1516.csavec3 ));
      params( 2847 ) := "+"( Integer'Pos( a_frs1516.csavec4 ));
      params( 2848 ) := "+"( Integer'Pos( a_frs1516.csavec5 ));
      params( 2849 ) := "+"( Integer'Pos( a_frs1516.csavec6 ));
      params( 2850 ) := "+"( Integer'Pos( a_frs1516.csavec7 ));
      params( 2851 ) := "+"( Integer'Pos( a_frs1516.csavec8 ));
      params( 2852 ) := "+"( Float( a_frs1516.tramtc1 ));
      params( 2853 ) := "+"( Float( a_frs1516.tramtc2 ));
      params( 2854 ) := "+"( Integer'Pos( a_frs1516.tramtc3 ));
      params( 2855 ) := "+"( Integer'Pos( a_frs1516.tramtc4 ));
      params( 2856 ) := "+"( Integer'Pos( a_frs1516.tramtc5 ));
      params( 2857 ) := "+"( Integer'Pos( a_frs1516.tramtc6 ));
      params( 2858 ) := "+"( Integer'Pos( a_frs1516.tramtc7 ));
      params( 2859 ) := "+"( Integer'Pos( a_frs1516.tramtc8 ));
      params( 2860 ) := "+"( Integer'Pos( a_frs1516.trnpdc1 ));
      params( 2861 ) := "+"( Integer'Pos( a_frs1516.trnpdc2 ));
      params( 2862 ) := "+"( Integer'Pos( a_frs1516.trnpdc3 ));
      params( 2863 ) := "+"( Integer'Pos( a_frs1516.trnpdc4 ));
      params( 2864 ) := "+"( Integer'Pos( a_frs1516.trnpdc5 ));
      params( 2865 ) := "+"( Integer'Pos( a_frs1516.trnpdc6 ));
      params( 2866 ) := "+"( Integer'Pos( a_frs1516.trnpdc7 ));
      params( 2867 ) := "+"( Integer'Pos( a_frs1516.trnpdc8 ));
      params( 2868 ) := "+"( Integer'Pos( a_frs1516.cohabc1 ));
      params( 2869 ) := "+"( Integer'Pos( a_frs1516.cohabc2 ));
      params( 2870 ) := "+"( Integer'Pos( a_frs1516.cohabc3 ));
      params( 2871 ) := "+"( Integer'Pos( a_frs1516.cohabc4 ));
      params( 2872 ) := "+"( Integer'Pos( a_frs1516.cohabc5 ));
      params( 2873 ) := "+"( Integer'Pos( a_frs1516.cohabc6 ));
      params( 2874 ) := "+"( Integer'Pos( a_frs1516.cohabc7 ));
      params( 2875 ) := "+"( Integer'Pos( a_frs1516.cohabc8 ));
      params( 2876 ) := "+"( Integer'Pos( a_frs1516.curqulc1 ));
      params( 2877 ) := "+"( Integer'Pos( a_frs1516.curqulc2 ));
      params( 2878 ) := "+"( Integer'Pos( a_frs1516.curqulc3 ));
      params( 2879 ) := "+"( Integer'Pos( a_frs1516.curqulc4 ));
      params( 2880 ) := "+"( Integer'Pos( a_frs1516.curqulc5 ));
      params( 2881 ) := "+"( Integer'Pos( a_frs1516.curqulc6 ));
      params( 2882 ) := "+"( Integer'Pos( a_frs1516.curqulc7 ));
      params( 2883 ) := "+"( Integer'Pos( a_frs1516.curqulc8 ));
      params( 2884 ) := "+"( Integer'Pos( a_frs1516.disacc1 ));
      params( 2885 ) := "+"( Integer'Pos( a_frs1516.disacc2 ));
      params( 2886 ) := "+"( Integer'Pos( a_frs1516.disacc3 ));
      params( 2887 ) := "+"( Integer'Pos( a_frs1516.disacc4 ));
      params( 2888 ) := "+"( Integer'Pos( a_frs1516.disacc5 ));
      params( 2889 ) := "+"( Integer'Pos( a_frs1516.disacc6 ));
      params( 2890 ) := "+"( Integer'Pos( a_frs1516.disacc7 ));
      params( 2891 ) := "+"( Integer'Pos( a_frs1516.disacc8 ));
      params( 2892 ) := "+"( Integer'Pos( a_frs1516.discoc1 ));
      params( 2893 ) := "+"( Integer'Pos( a_frs1516.discoc2 ));
      params( 2894 ) := "+"( Integer'Pos( a_frs1516.discoc3 ));
      params( 2895 ) := "+"( Integer'Pos( a_frs1516.discoc4 ));
      params( 2896 ) := "+"( Integer'Pos( a_frs1516.discoc5 ));
      params( 2897 ) := "+"( Integer'Pos( a_frs1516.discoc6 ));
      params( 2898 ) := "+"( Integer'Pos( a_frs1516.discoc7 ));
      params( 2899 ) := "+"( Integer'Pos( a_frs1516.discoc8 ));
      params( 2900 ) := "+"( Integer'Pos( a_frs1516.dobc1 ));
      params( 2901 ) := "+"( Integer'Pos( a_frs1516.dobc2 ));
      params( 2902 ) := "+"( Integer'Pos( a_frs1516.dobc3 ));
      params( 2903 ) := "+"( Integer'Pos( a_frs1516.dobc4 ));
      params( 2904 ) := "+"( Integer'Pos( a_frs1516.dobc5 ));
      params( 2905 ) := "+"( Integer'Pos( a_frs1516.dobc6 ));
      params( 2906 ) := "+"( Integer'Pos( a_frs1516.dobc7 ));
      params( 2907 ) := "+"( Integer'Pos( a_frs1516.dobc8 ));
      params( 2908 ) := "+"( Integer'Pos( a_frs1516.dvmarc1 ));
      params( 2909 ) := "+"( Integer'Pos( a_frs1516.dvmarc2 ));
      params( 2910 ) := "+"( Integer'Pos( a_frs1516.dvmarc3 ));
      params( 2911 ) := "+"( Integer'Pos( a_frs1516.dvmarc4 ));
      params( 2912 ) := "+"( Integer'Pos( a_frs1516.dvmarc5 ));
      params( 2913 ) := "+"( Integer'Pos( a_frs1516.dvmarc6 ));
      params( 2914 ) := "+"( Integer'Pos( a_frs1516.dvmarc7 ));
      params( 2915 ) := "+"( Integer'Pos( a_frs1516.dvmarc8 ));
      params( 2916 ) := "+"( Float( a_frs1516.fsvvlc1 ));
      params( 2917 ) := "+"( Float( a_frs1516.fsvvlc2 ));
      params( 2918 ) := "+"( Float( a_frs1516.fsvvlc3 ));
      params( 2919 ) := "+"( Float( a_frs1516.fsvvlc4 ));
      params( 2920 ) := "+"( Float( a_frs1516.fsvvlc5 ));
      params( 2921 ) := "+"( Float( a_frs1516.fsvvlc6 ));
      params( 2922 ) := "+"( Integer'Pos( a_frs1516.fsvvlc7 ));
      params( 2923 ) := "+"( Integer'Pos( a_frs1516.fsvvlc8 ));
      params( 2924 ) := "+"( Float( a_frs1516.fsmkvc1 ));
      params( 2925 ) := "+"( Float( a_frs1516.fsmkvc2 ));
      params( 2926 ) := "+"( Float( a_frs1516.fsmkvc3 ));
      params( 2927 ) := "+"( Float( a_frs1516.fsmkvc4 ));
      params( 2928 ) := "+"( Float( a_frs1516.fsmkvc5 ));
      params( 2929 ) := "+"( Integer'Pos( a_frs1516.fsmkvc6 ));
      params( 2930 ) := "+"( Integer'Pos( a_frs1516.fsmkvc7 ));
      params( 2931 ) := "+"( Integer'Pos( a_frs1516.fsmkvc8 ));
      params( 2932 ) := "+"( Float( a_frs1516.fsmlvc1 ));
      params( 2933 ) := "+"( Float( a_frs1516.fsmlvc2 ));
      params( 2934 ) := "+"( Float( a_frs1516.fsmlvc3 ));
      params( 2935 ) := "+"( Float( a_frs1516.fsmlvc4 ));
      params( 2936 ) := "+"( Float( a_frs1516.fsmlvc5 ));
      params( 2937 ) := "+"( Float( a_frs1516.fsmlvc6 ));
      params( 2938 ) := "+"( Integer'Pos( a_frs1516.fsmlvc7 ));
      params( 2939 ) := "+"( Integer'Pos( a_frs1516.fsmlvc8 ));
      params( 2940 ) := "+"( Integer'Pos( a_frs1516.ftedc1 ));
      params( 2941 ) := "+"( Integer'Pos( a_frs1516.ftedc2 ));
      params( 2942 ) := "+"( Integer'Pos( a_frs1516.ftedc3 ));
      params( 2943 ) := "+"( Integer'Pos( a_frs1516.ftedc4 ));
      params( 2944 ) := "+"( Integer'Pos( a_frs1516.ftedc5 ));
      params( 2945 ) := "+"( Integer'Pos( a_frs1516.ftedc6 ));
      params( 2946 ) := "+"( Integer'Pos( a_frs1516.ftedc7 ));
      params( 2947 ) := "+"( Integer'Pos( a_frs1516.ftedc8 ));
      params( 2948 ) := "+"( Integer'Pos( a_frs1516.g1valc1 ));
      params( 2949 ) := "+"( Integer'Pos( a_frs1516.g1valc2 ));
      params( 2950 ) := "+"( Integer'Pos( a_frs1516.g1valc3 ));
      params( 2951 ) := "+"( Integer'Pos( a_frs1516.g1valc4 ));
      params( 2952 ) := "+"( Integer'Pos( a_frs1516.g1valc5 ));
      params( 2953 ) := "+"( Integer'Pos( a_frs1516.g1valc6 ));
      params( 2954 ) := "+"( Integer'Pos( a_frs1516.g1valc7 ));
      params( 2955 ) := "+"( Integer'Pos( a_frs1516.g1valc8 ));
      params( 2956 ) := "+"( Integer'Pos( a_frs1516.g2valc1 ));
      params( 2957 ) := "+"( Integer'Pos( a_frs1516.g2valc2 ));
      params( 2958 ) := "+"( Integer'Pos( a_frs1516.g2valc3 ));
      params( 2959 ) := "+"( Integer'Pos( a_frs1516.g2valc4 ));
      params( 2960 ) := "+"( Integer'Pos( a_frs1516.g2valc5 ));
      params( 2961 ) := "+"( Integer'Pos( a_frs1516.g2valc6 ));
      params( 2962 ) := "+"( Integer'Pos( a_frs1516.g2valc7 ));
      params( 2963 ) := "+"( Integer'Pos( a_frs1516.g2valc8 ));
      params( 2964 ) := "+"( Integer'Pos( a_frs1516.g1dirc1 ));
      params( 2965 ) := "+"( Integer'Pos( a_frs1516.g1dirc2 ));
      params( 2966 ) := "+"( Integer'Pos( a_frs1516.g1dirc3 ));
      params( 2967 ) := "+"( Integer'Pos( a_frs1516.g1dirc4 ));
      params( 2968 ) := "+"( Integer'Pos( a_frs1516.g1dirc5 ));
      params( 2969 ) := "+"( Integer'Pos( a_frs1516.g1dirc6 ));
      params( 2970 ) := "+"( Integer'Pos( a_frs1516.g1dirc7 ));
      params( 2971 ) := "+"( Integer'Pos( a_frs1516.g1dirc8 ));
      params( 2972 ) := "+"( Integer'Pos( a_frs1516.g2dirc1 ));
      params( 2973 ) := "+"( Integer'Pos( a_frs1516.g2dirc2 ));
      params( 2974 ) := "+"( Integer'Pos( a_frs1516.g2dirc3 ));
      params( 2975 ) := "+"( Integer'Pos( a_frs1516.g2dirc4 ));
      params( 2976 ) := "+"( Integer'Pos( a_frs1516.g2dirc5 ));
      params( 2977 ) := "+"( Integer'Pos( a_frs1516.g2dirc6 ));
      params( 2978 ) := "+"( Integer'Pos( a_frs1516.g2dirc7 ));
      params( 2979 ) := "+"( Integer'Pos( a_frs1516.g2dirc8 ));
      params( 2980 ) := "+"( Integer'Pos( a_frs1516.gtnumc1 ));
      params( 2981 ) := "+"( Integer'Pos( a_frs1516.gtnumc2 ));
      params( 2982 ) := "+"( Integer'Pos( a_frs1516.gtnumc3 ));
      params( 2983 ) := "+"( Integer'Pos( a_frs1516.gtnumc4 ));
      params( 2984 ) := "+"( Integer'Pos( a_frs1516.gtnumc5 ));
      params( 2985 ) := "+"( Integer'Pos( a_frs1516.gtnumc6 ));
      params( 2986 ) := "+"( Integer'Pos( a_frs1516.gtnumc7 ));
      params( 2987 ) := "+"( Integer'Pos( a_frs1516.gtnumc8 ));
      params( 2988 ) := "+"( Integer'Pos( a_frs1516.gt1scc1 ));
      params( 2989 ) := "+"( Integer'Pos( a_frs1516.gt1scc2 ));
      params( 2990 ) := "+"( Integer'Pos( a_frs1516.gt1scc3 ));
      params( 2991 ) := "+"( Integer'Pos( a_frs1516.gt1scc4 ));
      params( 2992 ) := "+"( Integer'Pos( a_frs1516.gt1scc5 ));
      params( 2993 ) := "+"( Integer'Pos( a_frs1516.gt1scc6 ));
      params( 2994 ) := "+"( Integer'Pos( a_frs1516.gt1scc7 ));
      params( 2995 ) := "+"( Integer'Pos( a_frs1516.gt1scc8 ));
      params( 2996 ) := "+"( Integer'Pos( a_frs1516.gt2scc1 ));
      params( 2997 ) := "+"( Integer'Pos( a_frs1516.gt2scc2 ));
      params( 2998 ) := "+"( Integer'Pos( a_frs1516.gt2scc3 ));
      params( 2999 ) := "+"( Integer'Pos( a_frs1516.gt2scc4 ));
      params( 3000 ) := "+"( Integer'Pos( a_frs1516.gt2scc5 ));
      params( 3001 ) := "+"( Integer'Pos( a_frs1516.gt2scc6 ));
      params( 3002 ) := "+"( Integer'Pos( a_frs1516.gt2scc7 ));
      params( 3003 ) := "+"( Integer'Pos( a_frs1516.gt2scc8 ));
      params( 3004 ) := "+"( Float( a_frs1516.gt10sc1 ));
      params( 3005 ) := "+"( Integer'Pos( a_frs1516.gt10sc2 ));
      params( 3006 ) := "+"( Integer'Pos( a_frs1516.gt10sc3 ));
      params( 3007 ) := "+"( Integer'Pos( a_frs1516.gt10sc4 ));
      params( 3008 ) := "+"( Integer'Pos( a_frs1516.gt10sc5 ));
      params( 3009 ) := "+"( Integer'Pos( a_frs1516.gt10sc6 ));
      params( 3010 ) := "+"( Integer'Pos( a_frs1516.gt10sc7 ));
      params( 3011 ) := "+"( Integer'Pos( a_frs1516.gt10sc8 ));
      params( 3012 ) := "+"( Integer'Pos( a_frs1516.gt20sc1 ));
      params( 3013 ) := "+"( Integer'Pos( a_frs1516.gt20sc2 ));
      params( 3014 ) := "+"( Integer'Pos( a_frs1516.gt20sc3 ));
      params( 3015 ) := "+"( Integer'Pos( a_frs1516.gt20sc4 ));
      params( 3016 ) := "+"( Integer'Pos( a_frs1516.gt20sc5 ));
      params( 3017 ) := "+"( Integer'Pos( a_frs1516.gt20sc6 ));
      params( 3018 ) := "+"( Integer'Pos( a_frs1516.gt20sc7 ));
      params( 3019 ) := "+"( Integer'Pos( a_frs1516.gt20sc8 ));
      params( 3020 ) := "+"( Integer'Pos( a_frs1516.hartvc1 ));
      params( 3021 ) := "+"( Integer'Pos( a_frs1516.hartvc2 ));
      params( 3022 ) := "+"( Integer'Pos( a_frs1516.hartvc3 ));
      params( 3023 ) := "+"( Integer'Pos( a_frs1516.hartvc4 ));
      params( 3024 ) := "+"( Integer'Pos( a_frs1516.hartvc5 ));
      params( 3025 ) := "+"( Integer'Pos( a_frs1516.hartvc6 ));
      params( 3026 ) := "+"( Integer'Pos( a_frs1516.hartvc7 ));
      params( 3027 ) := "+"( Integer'Pos( a_frs1516.hartvc8 ));
      params( 3028 ) := "+"( Integer'Pos( a_frs1516.heatchc1 ));
      params( 3029 ) := "+"( Integer'Pos( a_frs1516.heatchc2 ));
      params( 3030 ) := "+"( Integer'Pos( a_frs1516.heatchc3 ));
      params( 3031 ) := "+"( Integer'Pos( a_frs1516.heatchc4 ));
      params( 3032 ) := "+"( Integer'Pos( a_frs1516.heatchc5 ));
      params( 3033 ) := "+"( Integer'Pos( a_frs1516.heatchc6 ));
      params( 3034 ) := "+"( Integer'Pos( a_frs1516.heatchc7 ));
      params( 3035 ) := "+"( Integer'Pos( a_frs1516.heatchc8 ));
      params( 3036 ) := "+"( Integer'Pos( a_frs1516.hhldrc1 ));
      params( 3037 ) := "+"( Integer'Pos( a_frs1516.hhldrc2 ));
      params( 3038 ) := "+"( Integer'Pos( a_frs1516.hhldrc3 ));
      params( 3039 ) := "+"( Integer'Pos( a_frs1516.hhldrc4 ));
      params( 3040 ) := "+"( Integer'Pos( a_frs1516.hhldrc5 ));
      params( 3041 ) := "+"( Integer'Pos( a_frs1516.hhldrc6 ));
      params( 3042 ) := "+"( Integer'Pos( a_frs1516.hhldrc7 ));
      params( 3043 ) := "+"( Integer'Pos( a_frs1516.hhldrc8 ));
      params( 3044 ) := "+"( Integer'Pos( a_frs1516.hurabc1 ));
      params( 3045 ) := "+"( Integer'Pos( a_frs1516.hurabc2 ));
      params( 3046 ) := "+"( Integer'Pos( a_frs1516.hurabc3 ));
      params( 3047 ) := "+"( Integer'Pos( a_frs1516.hurabc4 ));
      params( 3048 ) := "+"( Integer'Pos( a_frs1516.hurabc5 ));
      params( 3049 ) := "+"( Integer'Pos( a_frs1516.hurabc6 ));
      params( 3050 ) := "+"( Integer'Pos( a_frs1516.hurabc7 ));
      params( 3051 ) := "+"( Integer'Pos( a_frs1516.hurabc8 ));
      params( 3052 ) := "+"( Integer'Pos( a_frs1516.hurahc1 ));
      params( 3053 ) := "+"( Integer'Pos( a_frs1516.hurahc2 ));
      params( 3054 ) := "+"( Integer'Pos( a_frs1516.hurahc3 ));
      params( 3055 ) := "+"( Integer'Pos( a_frs1516.hurahc4 ));
      params( 3056 ) := "+"( Integer'Pos( a_frs1516.hurahc5 ));
      params( 3057 ) := "+"( Integer'Pos( a_frs1516.hurahc6 ));
      params( 3058 ) := "+"( Integer'Pos( a_frs1516.hurahc7 ));
      params( 3059 ) := "+"( Integer'Pos( a_frs1516.hurahc8 ));
      params( 3060 ) := "+"( Integer'Pos( a_frs1516.hurcbc1 ));
      params( 3061 ) := "+"( Integer'Pos( a_frs1516.hurcbc2 ));
      params( 3062 ) := "+"( Integer'Pos( a_frs1516.hurcbc3 ));
      params( 3063 ) := "+"( Integer'Pos( a_frs1516.hurcbc4 ));
      params( 3064 ) := "+"( Integer'Pos( a_frs1516.hurcbc5 ));
      params( 3065 ) := "+"( Integer'Pos( a_frs1516.hurcbc6 ));
      params( 3066 ) := "+"( Integer'Pos( a_frs1516.hurcbc7 ));
      params( 3067 ) := "+"( Integer'Pos( a_frs1516.hurcbc8 ));
      params( 3068 ) := "+"( Integer'Pos( a_frs1516.hurchc1 ));
      params( 3069 ) := "+"( Integer'Pos( a_frs1516.hurchc2 ));
      params( 3070 ) := "+"( Integer'Pos( a_frs1516.hurchc3 ));
      params( 3071 ) := "+"( Integer'Pos( a_frs1516.hurchc4 ));
      params( 3072 ) := "+"( Integer'Pos( a_frs1516.hurchc5 ));
      params( 3073 ) := "+"( Integer'Pos( a_frs1516.hurchc6 ));
      params( 3074 ) := "+"( Integer'Pos( a_frs1516.hurchc7 ));
      params( 3075 ) := "+"( Integer'Pos( a_frs1516.hurchc8 ));
      params( 3076 ) := "+"( Integer'Pos( a_frs1516.hurclc1 ));
      params( 3077 ) := "+"( Integer'Pos( a_frs1516.hurclc2 ));
      params( 3078 ) := "+"( Integer'Pos( a_frs1516.hurclc3 ));
      params( 3079 ) := "+"( Integer'Pos( a_frs1516.hurclc4 ));
      params( 3080 ) := "+"( Integer'Pos( a_frs1516.hurclc5 ));
      params( 3081 ) := "+"( Integer'Pos( a_frs1516.hurclc6 ));
      params( 3082 ) := "+"( Integer'Pos( a_frs1516.hurclc7 ));
      params( 3083 ) := "+"( Integer'Pos( a_frs1516.hurclc8 ));
      params( 3084 ) := "+"( Integer'Pos( a_frs1516.hurfrc1 ));
      params( 3085 ) := "+"( Integer'Pos( a_frs1516.hurfrc2 ));
      params( 3086 ) := "+"( Integer'Pos( a_frs1516.hurfrc3 ));
      params( 3087 ) := "+"( Integer'Pos( a_frs1516.hurfrc4 ));
      params( 3088 ) := "+"( Integer'Pos( a_frs1516.hurfrc5 ));
      params( 3089 ) := "+"( Integer'Pos( a_frs1516.hurfrc6 ));
      params( 3090 ) := "+"( Integer'Pos( a_frs1516.hurfrc7 ));
      params( 3091 ) := "+"( Integer'Pos( a_frs1516.hurfrc8 ));
      params( 3092 ) := "+"( Integer'Pos( a_frs1516.hurotc1 ));
      params( 3093 ) := "+"( Integer'Pos( a_frs1516.hurotc2 ));
      params( 3094 ) := "+"( Integer'Pos( a_frs1516.hurotc3 ));
      params( 3095 ) := "+"( Integer'Pos( a_frs1516.hurotc4 ));
      params( 3096 ) := "+"( Integer'Pos( a_frs1516.hurotc5 ));
      params( 3097 ) := "+"( Integer'Pos( a_frs1516.hurotc6 ));
      params( 3098 ) := "+"( Integer'Pos( a_frs1516.hurotc7 ));
      params( 3099 ) := "+"( Integer'Pos( a_frs1516.hurotc8 ));
      params( 3100 ) := "+"( Integer'Pos( a_frs1516.hurrec1 ));
      params( 3101 ) := "+"( Integer'Pos( a_frs1516.hurrec2 ));
      params( 3102 ) := "+"( Integer'Pos( a_frs1516.hurrec3 ));
      params( 3103 ) := "+"( Integer'Pos( a_frs1516.hurrec4 ));
      params( 3104 ) := "+"( Integer'Pos( a_frs1516.hurrec5 ));
      params( 3105 ) := "+"( Integer'Pos( a_frs1516.hurrec6 ));
      params( 3106 ) := "+"( Integer'Pos( a_frs1516.hurrec7 ));
      params( 3107 ) := "+"( Integer'Pos( a_frs1516.hurrec8 ));
      params( 3108 ) := "+"( Integer'Pos( a_frs1516.hpersc1 ));
      params( 3109 ) := "+"( Integer'Pos( a_frs1516.hpersc2 ));
      params( 3110 ) := "+"( Integer'Pos( a_frs1516.hpersc3 ));
      params( 3111 ) := "+"( Integer'Pos( a_frs1516.hpersc4 ));
      params( 3112 ) := "+"( Integer'Pos( a_frs1516.hpersc5 ));
      params( 3113 ) := "+"( Integer'Pos( a_frs1516.hpersc6 ));
      params( 3114 ) := "+"( Integer'Pos( a_frs1516.hpersc7 ));
      params( 3115 ) := "+"( Integer'Pos( a_frs1516.hpersc8 ));
      params( 3116 ) := "+"( Integer'Pos( a_frs1516.hrsedc1 ));
      params( 3117 ) := "+"( Integer'Pos( a_frs1516.hrsedc2 ));
      params( 3118 ) := "+"( Integer'Pos( a_frs1516.hrsedc3 ));
      params( 3119 ) := "+"( Integer'Pos( a_frs1516.hrsedc4 ));
      params( 3120 ) := "+"( Integer'Pos( a_frs1516.hrsedc5 ));
      params( 3121 ) := "+"( Integer'Pos( a_frs1516.hrsedc6 ));
      params( 3122 ) := "+"( Integer'Pos( a_frs1516.hrsedc7 ));
      params( 3123 ) := "+"( Integer'Pos( a_frs1516.hrsedc8 ));
      params( 3124 ) := "+"( Integer'Pos( a_frs1516.hsvprc1 ));
      params( 3125 ) := "+"( Integer'Pos( a_frs1516.hsvprc2 ));
      params( 3126 ) := "+"( Integer'Pos( a_frs1516.hsvprc3 ));
      params( 3127 ) := "+"( Integer'Pos( a_frs1516.hsvprc4 ));
      params( 3128 ) := "+"( Integer'Pos( a_frs1516.hsvprc5 ));
      params( 3129 ) := "+"( Integer'Pos( a_frs1516.hsvprc6 ));
      params( 3130 ) := "+"( Integer'Pos( a_frs1516.hsvprc7 ));
      params( 3131 ) := "+"( Integer'Pos( a_frs1516.hsvprc8 ));
      params( 3132 ) := "+"( Integer'Pos( a_frs1516.laregc1 ));
      params( 3133 ) := "+"( Integer'Pos( a_frs1516.laregc2 ));
      params( 3134 ) := "+"( Integer'Pos( a_frs1516.laregc3 ));
      params( 3135 ) := "+"( Integer'Pos( a_frs1516.laregc4 ));
      params( 3136 ) := "+"( Integer'Pos( a_frs1516.laregc5 ));
      params( 3137 ) := "+"( Integer'Pos( a_frs1516.laregc6 ));
      params( 3138 ) := "+"( Integer'Pos( a_frs1516.laregc7 ));
      params( 3139 ) := "+"( Integer'Pos( a_frs1516.laregc8 ));
      params( 3140 ) := "+"( Integer'Pos( a_frs1516.msc1 ));
      params( 3141 ) := "+"( Integer'Pos( a_frs1516.msc2 ));
      params( 3142 ) := "+"( Integer'Pos( a_frs1516.msc3 ));
      params( 3143 ) := "+"( Integer'Pos( a_frs1516.msc4 ));
      params( 3144 ) := "+"( Integer'Pos( a_frs1516.msc5 ));
      params( 3145 ) := "+"( Integer'Pos( a_frs1516.msc6 ));
      params( 3146 ) := "+"( Integer'Pos( a_frs1516.msc7 ));
      params( 3147 ) := "+"( Integer'Pos( a_frs1516.msc8 ));
      params( 3148 ) := "+"( Integer'Pos( a_frs1516.prsonc1 ));
      params( 3149 ) := "+"( Integer'Pos( a_frs1516.prsonc2 ));
      params( 3150 ) := "+"( Integer'Pos( a_frs1516.prsonc3 ));
      params( 3151 ) := "+"( Integer'Pos( a_frs1516.prsonc4 ));
      params( 3152 ) := "+"( Integer'Pos( a_frs1516.prsonc5 ));
      params( 3153 ) := "+"( Integer'Pos( a_frs1516.prsonc6 ));
      params( 3154 ) := "+"( Integer'Pos( a_frs1516.prsonc7 ));
      params( 3155 ) := "+"( Integer'Pos( a_frs1516.prsonc8 ));
      params( 3156 ) := "+"( Integer'Pos( a_frs1516.rlp1c1 ));
      params( 3157 ) := "+"( Integer'Pos( a_frs1516.rlp1c2 ));
      params( 3158 ) := "+"( Integer'Pos( a_frs1516.rlp1c3 ));
      params( 3159 ) := "+"( Integer'Pos( a_frs1516.rlp1c4 ));
      params( 3160 ) := "+"( Integer'Pos( a_frs1516.rlp1c5 ));
      params( 3161 ) := "+"( Integer'Pos( a_frs1516.rlp1c6 ));
      params( 3162 ) := "+"( Integer'Pos( a_frs1516.rlp1c7 ));
      params( 3163 ) := "+"( Integer'Pos( a_frs1516.rlp1c8 ));
      params( 3164 ) := "+"( Integer'Pos( a_frs1516.rlp2c1 ));
      params( 3165 ) := "+"( Integer'Pos( a_frs1516.rlp2c2 ));
      params( 3166 ) := "+"( Integer'Pos( a_frs1516.rlp2c3 ));
      params( 3167 ) := "+"( Integer'Pos( a_frs1516.rlp2c4 ));
      params( 3168 ) := "+"( Integer'Pos( a_frs1516.rlp2c5 ));
      params( 3169 ) := "+"( Integer'Pos( a_frs1516.rlp2c6 ));
      params( 3170 ) := "+"( Integer'Pos( a_frs1516.rlp2c7 ));
      params( 3171 ) := "+"( Integer'Pos( a_frs1516.rlp2c8 ));
      params( 3172 ) := "+"( Integer'Pos( a_frs1516.rlp3c1 ));
      params( 3173 ) := "+"( Integer'Pos( a_frs1516.rlp3c2 ));
      params( 3174 ) := "+"( Integer'Pos( a_frs1516.rlp3c3 ));
      params( 3175 ) := "+"( Integer'Pos( a_frs1516.rlp3c4 ));
      params( 3176 ) := "+"( Integer'Pos( a_frs1516.rlp3c5 ));
      params( 3177 ) := "+"( Integer'Pos( a_frs1516.rlp3c6 ));
      params( 3178 ) := "+"( Integer'Pos( a_frs1516.rlp3c7 ));
      params( 3179 ) := "+"( Integer'Pos( a_frs1516.rlp3c8 ));
      params( 3180 ) := "+"( Integer'Pos( a_frs1516.rlp4c1 ));
      params( 3181 ) := "+"( Integer'Pos( a_frs1516.rlp4c2 ));
      params( 3182 ) := "+"( Integer'Pos( a_frs1516.rlp4c3 ));
      params( 3183 ) := "+"( Integer'Pos( a_frs1516.rlp4c4 ));
      params( 3184 ) := "+"( Integer'Pos( a_frs1516.rlp4c5 ));
      params( 3185 ) := "+"( Integer'Pos( a_frs1516.rlp4c6 ));
      params( 3186 ) := "+"( Integer'Pos( a_frs1516.rlp4c7 ));
      params( 3187 ) := "+"( Integer'Pos( a_frs1516.rlp4c8 ));
      params( 3188 ) := "+"( Integer'Pos( a_frs1516.rlp5c1 ));
      params( 3189 ) := "+"( Integer'Pos( a_frs1516.rlp5c2 ));
      params( 3190 ) := "+"( Integer'Pos( a_frs1516.rlp5c3 ));
      params( 3191 ) := "+"( Integer'Pos( a_frs1516.rlp5c4 ));
      params( 3192 ) := "+"( Integer'Pos( a_frs1516.rlp5c5 ));
      params( 3193 ) := "+"( Integer'Pos( a_frs1516.rlp5c6 ));
      params( 3194 ) := "+"( Integer'Pos( a_frs1516.rlp5c7 ));
      params( 3195 ) := "+"( Integer'Pos( a_frs1516.rlp5c8 ));
      params( 3196 ) := "+"( Integer'Pos( a_frs1516.rlp6c1 ));
      params( 3197 ) := "+"( Integer'Pos( a_frs1516.rlp6c2 ));
      params( 3198 ) := "+"( Integer'Pos( a_frs1516.rlp6c3 ));
      params( 3199 ) := "+"( Integer'Pos( a_frs1516.rlp6c4 ));
      params( 3200 ) := "+"( Integer'Pos( a_frs1516.rlp6c5 ));
      params( 3201 ) := "+"( Integer'Pos( a_frs1516.rlp6c6 ));
      params( 3202 ) := "+"( Integer'Pos( a_frs1516.rlp6c7 ));
      params( 3203 ) := "+"( Integer'Pos( a_frs1516.rlp6c8 ));
      params( 3204 ) := "+"( Integer'Pos( a_frs1516.rlp7c1 ));
      params( 3205 ) := "+"( Integer'Pos( a_frs1516.rlp7c2 ));
      params( 3206 ) := "+"( Integer'Pos( a_frs1516.rlp7c3 ));
      params( 3207 ) := "+"( Integer'Pos( a_frs1516.rlp7c4 ));
      params( 3208 ) := "+"( Integer'Pos( a_frs1516.rlp7c5 ));
      params( 3209 ) := "+"( Integer'Pos( a_frs1516.rlp7c6 ));
      params( 3210 ) := "+"( Integer'Pos( a_frs1516.rlp7c7 ));
      params( 3211 ) := "+"( Integer'Pos( a_frs1516.rlp7c8 ));
      params( 3212 ) := "+"( Integer'Pos( a_frs1516.rlp8c1 ));
      params( 3213 ) := "+"( Integer'Pos( a_frs1516.rlp8c2 ));
      params( 3214 ) := "+"( Integer'Pos( a_frs1516.rlp8c3 ));
      params( 3215 ) := "+"( Integer'Pos( a_frs1516.rlp8c4 ));
      params( 3216 ) := "+"( Integer'Pos( a_frs1516.rlp8c5 ));
      params( 3217 ) := "+"( Integer'Pos( a_frs1516.rlp8c6 ));
      params( 3218 ) := "+"( Integer'Pos( a_frs1516.rlp8c7 ));
      params( 3219 ) := "+"( Integer'Pos( a_frs1516.rlp8c8 ));
      params( 3220 ) := "+"( Integer'Pos( a_frs1516.rlp9c1 ));
      params( 3221 ) := "+"( Integer'Pos( a_frs1516.rlp9c2 ));
      params( 3222 ) := "+"( Integer'Pos( a_frs1516.rlp9c3 ));
      params( 3223 ) := "+"( Integer'Pos( a_frs1516.rlp9c4 ));
      params( 3224 ) := "+"( Integer'Pos( a_frs1516.rlp9c5 ));
      params( 3225 ) := "+"( Integer'Pos( a_frs1516.rlp9c6 ));
      params( 3226 ) := "+"( Integer'Pos( a_frs1516.rlp9c7 ));
      params( 3227 ) := "+"( Integer'Pos( a_frs1516.rlp9c8 ));
      params( 3228 ) := "+"( Integer'Pos( a_frs1516.rlp10c1 ));
      params( 3229 ) := "+"( Integer'Pos( a_frs1516.rlp10c2 ));
      params( 3230 ) := "+"( Integer'Pos( a_frs1516.rlp10c3 ));
      params( 3231 ) := "+"( Integer'Pos( a_frs1516.rlp10c4 ));
      params( 3232 ) := "+"( Integer'Pos( a_frs1516.rlp10c5 ));
      params( 3233 ) := "+"( Integer'Pos( a_frs1516.rlp10c6 ));
      params( 3234 ) := "+"( Integer'Pos( a_frs1516.rlp10c7 ));
      params( 3235 ) := "+"( Integer'Pos( a_frs1516.rlp10c8 ));
      params( 3236 ) := "+"( Integer'Pos( a_frs1516.rlp11c1 ));
      params( 3237 ) := "+"( Integer'Pos( a_frs1516.rlp11c2 ));
      params( 3238 ) := "+"( Integer'Pos( a_frs1516.rlp11c3 ));
      params( 3239 ) := "+"( Integer'Pos( a_frs1516.rlp11c4 ));
      params( 3240 ) := "+"( Integer'Pos( a_frs1516.rlp11c5 ));
      params( 3241 ) := "+"( Integer'Pos( a_frs1516.rlp11c6 ));
      params( 3242 ) := "+"( Integer'Pos( a_frs1516.rlp11c7 ));
      params( 3243 ) := "+"( Integer'Pos( a_frs1516.rlp11c8 ));
      params( 3244 ) := "+"( Integer'Pos( a_frs1516.rlp12c1 ));
      params( 3245 ) := "+"( Integer'Pos( a_frs1516.rlp12c2 ));
      params( 3246 ) := "+"( Integer'Pos( a_frs1516.rlp12c3 ));
      params( 3247 ) := "+"( Integer'Pos( a_frs1516.rlp12c4 ));
      params( 3248 ) := "+"( Integer'Pos( a_frs1516.rlp12c5 ));
      params( 3249 ) := "+"( Integer'Pos( a_frs1516.rlp12c6 ));
      params( 3250 ) := "+"( Integer'Pos( a_frs1516.rlp12c7 ));
      params( 3251 ) := "+"( Integer'Pos( a_frs1516.rlp12c8 ));
      params( 3252 ) := "+"( Integer'Pos( a_frs1516.rlp13c1 ));
      params( 3253 ) := "+"( Integer'Pos( a_frs1516.rlp13c2 ));
      params( 3254 ) := "+"( Integer'Pos( a_frs1516.rlp13c3 ));
      params( 3255 ) := "+"( Integer'Pos( a_frs1516.rlp13c4 ));
      params( 3256 ) := "+"( Integer'Pos( a_frs1516.rlp13c5 ));
      params( 3257 ) := "+"( Integer'Pos( a_frs1516.rlp13c6 ));
      params( 3258 ) := "+"( Integer'Pos( a_frs1516.rlp13c7 ));
      params( 3259 ) := "+"( Integer'Pos( a_frs1516.rlp13c8 ));
      params( 3260 ) := "+"( Integer'Pos( a_frs1516.rlp14c1 ));
      params( 3261 ) := "+"( Integer'Pos( a_frs1516.rlp14c2 ));
      params( 3262 ) := "+"( Integer'Pos( a_frs1516.rlp14c3 ));
      params( 3263 ) := "+"( Integer'Pos( a_frs1516.rlp14c4 ));
      params( 3264 ) := "+"( Integer'Pos( a_frs1516.rlp14c5 ));
      params( 3265 ) := "+"( Integer'Pos( a_frs1516.rlp14c6 ));
      params( 3266 ) := "+"( Integer'Pos( a_frs1516.rlp14c7 ));
      params( 3267 ) := "+"( Integer'Pos( a_frs1516.rlp14c8 ));
      params( 3268 ) := "+"( Integer'Pos( a_frs1516.rhrpcc1 ));
      params( 3269 ) := "+"( Integer'Pos( a_frs1516.rhrpcc2 ));
      params( 3270 ) := "+"( Integer'Pos( a_frs1516.rhrpcc3 ));
      params( 3271 ) := "+"( Integer'Pos( a_frs1516.rhrpcc4 ));
      params( 3272 ) := "+"( Integer'Pos( a_frs1516.rhrpcc5 ));
      params( 3273 ) := "+"( Integer'Pos( a_frs1516.rhrpcc6 ));
      params( 3274 ) := "+"( Integer'Pos( a_frs1516.rhrpcc7 ));
      params( 3275 ) := "+"( Integer'Pos( a_frs1516.rhrpcc8 ));
      params( 3276 ) := "+"( Integer'Pos( a_frs1516.sbkitc1 ));
      params( 3277 ) := "+"( Integer'Pos( a_frs1516.sbkitc2 ));
      params( 3278 ) := "+"( Integer'Pos( a_frs1516.sbkitc3 ));
      params( 3279 ) := "+"( Integer'Pos( a_frs1516.sbkitc4 ));
      params( 3280 ) := "+"( Integer'Pos( a_frs1516.sbkitc5 ));
      params( 3281 ) := "+"( Integer'Pos( a_frs1516.sbkitc6 ));
      params( 3282 ) := "+"( Integer'Pos( a_frs1516.sbkitc7 ));
      params( 3283 ) := "+"( Integer'Pos( a_frs1516.sbkitc8 ));
      params( 3284 ) := "+"( Integer'Pos( a_frs1516.sexc1 ));
      params( 3285 ) := "+"( Integer'Pos( a_frs1516.sexc2 ));
      params( 3286 ) := "+"( Integer'Pos( a_frs1516.sexc3 ));
      params( 3287 ) := "+"( Integer'Pos( a_frs1516.sexc4 ));
      params( 3288 ) := "+"( Integer'Pos( a_frs1516.sexc5 ));
      params( 3289 ) := "+"( Integer'Pos( a_frs1516.sexc6 ));
      params( 3290 ) := "+"( Integer'Pos( a_frs1516.sexc7 ));
      params( 3291 ) := "+"( Integer'Pos( a_frs1516.sexc8 ));
      params( 3292 ) := "+"( Integer'Pos( a_frs1516.sfvitc1 ));
      params( 3293 ) := "+"( Integer'Pos( a_frs1516.sfvitc2 ));
      params( 3294 ) := "+"( Integer'Pos( a_frs1516.sfvitc3 ));
      params( 3295 ) := "+"( Integer'Pos( a_frs1516.sfvitc4 ));
      params( 3296 ) := "+"( Integer'Pos( a_frs1516.sfvitc5 ));
      params( 3297 ) := "+"( Integer'Pos( a_frs1516.sfvitc6 ));
      params( 3298 ) := "+"( Integer'Pos( a_frs1516.sfvitc7 ));
      params( 3299 ) := "+"( Integer'Pos( a_frs1516.sfvitc8 ));
      params( 3300 ) := "+"( Integer'Pos( a_frs1516.fmctsc1 ));
      params( 3301 ) := "+"( Integer'Pos( a_frs1516.fmctsc2 ));
      params( 3302 ) := "+"( Integer'Pos( a_frs1516.fmctsc3 ));
      params( 3303 ) := "+"( Integer'Pos( a_frs1516.fmctsc4 ));
      params( 3304 ) := "+"( Integer'Pos( a_frs1516.fmctsc5 ));
      params( 3305 ) := "+"( Integer'Pos( a_frs1516.fmctsc6 ));
      params( 3306 ) := "+"( Integer'Pos( a_frs1516.fmctsc7 ));
      params( 3307 ) := "+"( Integer'Pos( a_frs1516.fmctsc8 ));
      params( 3308 ) := "+"( Integer'Pos( a_frs1516.fmealc1 ));
      params( 3309 ) := "+"( Integer'Pos( a_frs1516.fmealc2 ));
      params( 3310 ) := "+"( Integer'Pos( a_frs1516.fmealc3 ));
      params( 3311 ) := "+"( Integer'Pos( a_frs1516.fmealc4 ));
      params( 3312 ) := "+"( Integer'Pos( a_frs1516.fmealc5 ));
      params( 3313 ) := "+"( Integer'Pos( a_frs1516.fmealc6 ));
      params( 3314 ) := "+"( Integer'Pos( a_frs1516.fmealc7 ));
      params( 3315 ) := "+"( Integer'Pos( a_frs1516.fmealc8 ));
      params( 3316 ) := "+"( Integer'Pos( a_frs1516.cblndc1 ));
      params( 3317 ) := "+"( Integer'Pos( a_frs1516.cblndc2 ));
      params( 3318 ) := "+"( Integer'Pos( a_frs1516.cblndc3 ));
      params( 3319 ) := "+"( Integer'Pos( a_frs1516.cblndc4 ));
      params( 3320 ) := "+"( Integer'Pos( a_frs1516.cblndc5 ));
      params( 3321 ) := "+"( Integer'Pos( a_frs1516.cblndc6 ));
      params( 3322 ) := "+"( Integer'Pos( a_frs1516.cblndc7 ));
      params( 3323 ) := "+"( Integer'Pos( a_frs1516.cblndc8 ));
      params( 3324 ) := "+"( Integer'Pos( a_frs1516.cparsc1 ));
      params( 3325 ) := "+"( Integer'Pos( a_frs1516.cparsc2 ));
      params( 3326 ) := "+"( Integer'Pos( a_frs1516.cparsc3 ));
      params( 3327 ) := "+"( Integer'Pos( a_frs1516.cparsc4 ));
      params( 3328 ) := "+"( Integer'Pos( a_frs1516.cparsc5 ));
      params( 3329 ) := "+"( Integer'Pos( a_frs1516.cparsc6 ));
      params( 3330 ) := "+"( Integer'Pos( a_frs1516.cparsc7 ));
      params( 3331 ) := "+"( Integer'Pos( a_frs1516.cparsc8 ));
      params( 3332 ) := "+"( Integer'Pos( a_frs1516.cdeafc1 ));
      params( 3333 ) := "+"( Integer'Pos( a_frs1516.cdeafc2 ));
      params( 3334 ) := "+"( Integer'Pos( a_frs1516.cdeafc3 ));
      params( 3335 ) := "+"( Integer'Pos( a_frs1516.cdeafc4 ));
      params( 3336 ) := "+"( Integer'Pos( a_frs1516.cdeafc5 ));
      params( 3337 ) := "+"( Integer'Pos( a_frs1516.cdeafc6 ));
      params( 3338 ) := "+"( Integer'Pos( a_frs1516.cdeafc7 ));
      params( 3339 ) := "+"( Integer'Pos( a_frs1516.cdeafc8 ));
      params( 3340 ) := "+"( Integer'Pos( a_frs1516.totgtc1 ));
      params( 3341 ) := "+"( Integer'Pos( a_frs1516.totgtc2 ));
      params( 3342 ) := "+"( Integer'Pos( a_frs1516.totgtc3 ));
      params( 3343 ) := "+"( Integer'Pos( a_frs1516.totgtc4 ));
      params( 3344 ) := "+"( Integer'Pos( a_frs1516.totgtc5 ));
      params( 3345 ) := "+"( Integer'Pos( a_frs1516.totgtc6 ));
      params( 3346 ) := "+"( Integer'Pos( a_frs1516.totgtc7 ));
      params( 3347 ) := "+"( Integer'Pos( a_frs1516.totgtc8 ));
      params( 3348 ) := "+"( Integer'Pos( a_frs1516.totsvc1 ));
      params( 3349 ) := "+"( Integer'Pos( a_frs1516.totsvc2 ));
      params( 3350 ) := "+"( Integer'Pos( a_frs1516.totsvc3 ));
      params( 3351 ) := "+"( Integer'Pos( a_frs1516.totsvc4 ));
      params( 3352 ) := "+"( Integer'Pos( a_frs1516.totsvc5 ));
      params( 3353 ) := "+"( Integer'Pos( a_frs1516.totsvc6 ));
      params( 3354 ) := "+"( Integer'Pos( a_frs1516.totsvc7 ));
      params( 3355 ) := "+"( Integer'Pos( a_frs1516.totsvc8 ));
      params( 3356 ) := "+"( Float( a_frs1516.tacamc1 ));
      params( 3357 ) := "+"( Float( a_frs1516.tacamc2 ));
      params( 3358 ) := "+"( Float( a_frs1516.tacamc3 ));
      params( 3359 ) := "+"( Float( a_frs1516.tacamc4 ));
      params( 3360 ) := "+"( Float( a_frs1516.tacamc5 ));
      params( 3361 ) := "+"( Float( a_frs1516.tacamc6 ));
      params( 3362 ) := "+"( Integer'Pos( a_frs1516.tacamc7 ));
      params( 3363 ) := "+"( Integer'Pos( a_frs1516.tacamc8 ));
      params( 3364 ) := "+"( Integer'Pos( a_frs1516.tpeedc1 ));
      params( 3365 ) := "+"( Integer'Pos( a_frs1516.tpeedc2 ));
      params( 3366 ) := "+"( Integer'Pos( a_frs1516.tpeedc3 ));
      params( 3367 ) := "+"( Integer'Pos( a_frs1516.tpeedc4 ));
      params( 3368 ) := "+"( Integer'Pos( a_frs1516.tpeedc5 ));
      params( 3369 ) := "+"( Integer'Pos( a_frs1516.tpeedc6 ));
      params( 3370 ) := "+"( Integer'Pos( a_frs1516.tpeedc7 ));
      params( 3371 ) := "+"( Integer'Pos( a_frs1516.tpeedc8 ));
      params( 3372 ) := "+"( Integer'Pos( a_frs1516.uprsoc1 ));
      params( 3373 ) := "+"( Integer'Pos( a_frs1516.uprsoc2 ));
      params( 3374 ) := "+"( Integer'Pos( a_frs1516.uprsoc3 ));
      params( 3375 ) := "+"( Integer'Pos( a_frs1516.uprsoc4 ));
      params( 3376 ) := "+"( Integer'Pos( a_frs1516.uprsoc5 ));
      params( 3377 ) := "+"( Integer'Pos( a_frs1516.uprsoc6 ));
      params( 3378 ) := "+"( Integer'Pos( a_frs1516.uprsoc7 ));
      params( 3379 ) := "+"( Integer'Pos( a_frs1516.uprsoc8 ));
      params( 3380 ) := "+"( Integer'Pos( a_frs1516.govpy1hd ));
      params( 3381 ) := "+"( Integer'Pos( a_frs1516.govpy2hd ));
      params( 3382 ) := "+"( Integer'Pos( a_frs1516.govpy3hd ));
      params( 3383 ) := "+"( Integer'Pos( a_frs1516.govpy4hd ));
      params( 3384 ) := "+"( Integer'Pos( a_frs1516.govpy5hd ));
      params( 3385 ) := "+"( Integer'Pos( a_frs1516.govpy6hd ));
      params( 3386 ) := "+"( Integer'Pos( a_frs1516.govpy7hd ));
      params( 3387 ) := "+"( Integer'Pos( a_frs1516.govpy8hd ));
      params( 3388 ) := "+"( Integer'Pos( a_frs1516.govpy9hd ));
      params( 3389 ) := "+"( Integer'Pos( a_frs1516.gvpy10hd ));
      params( 3390 ) := "+"( Integer'Pos( a_frs1516.gvpy11hd ));
      params( 3391 ) := "+"( Integer'Pos( a_frs1516.govpy1sp ));
      params( 3392 ) := "+"( Integer'Pos( a_frs1516.govpy2sp ));
      params( 3393 ) := "+"( Integer'Pos( a_frs1516.govpy3sp ));
      params( 3394 ) := "+"( Integer'Pos( a_frs1516.govpy4sp ));
      params( 3395 ) := "+"( Integer'Pos( a_frs1516.govpy5sp ));
      params( 3396 ) := "+"( Integer'Pos( a_frs1516.govpy6sp ));
      params( 3397 ) := "+"( Integer'Pos( a_frs1516.govpy7sp ));
      params( 3398 ) := "+"( Integer'Pos( a_frs1516.govpy8sp ));
      params( 3399 ) := "+"( Integer'Pos( a_frs1516.govpy9sp ));
      params( 3400 ) := "+"( Integer'Pos( a_frs1516.gvpy10sp ));
      params( 3401 ) := "+"( Integer'Pos( a_frs1516.gvpy11sp ));
      params( 3402 ) := "+"( Float( a_frs1516.nhhamt1 ));
      params( 3403 ) := "+"( Float( a_frs1516.nhhamt2 ));
      params( 3404 ) := "+"( Float( a_frs1516.nhhamt3 ));
      params( 3405 ) := "+"( Float( a_frs1516.nhhamt4 ));
      params( 3406 ) := "+"( Integer'Pos( a_frs1516.nhhfee1 ));
      params( 3407 ) := "+"( Integer'Pos( a_frs1516.nhhfee2 ));
      params( 3408 ) := "+"( Integer'Pos( a_frs1516.nhhfee3 ));
      params( 3409 ) := "+"( Integer'Pos( a_frs1516.nhhfee4 ));
      params( 3410 ) := "+"( Integer'Pos( a_frs1516.pnhhamt1 ));
      params( 3411 ) := "+"( Integer'Pos( a_frs1516.pnhhamt2 ));
      params( 3412 ) := "+"( Integer'Pos( a_frs1516.pnhhamt3 ));
      params( 3413 ) := "+"( Integer'Pos( a_frs1516.pnhhamt4 ));
      params( 3414 ) := "+"( Float( a_frs1516.bona11hd ));
      params( 3415 ) := "+"( Integer'Pos( a_frs1516.bona12hd ));
      params( 3416 ) := "+"( Integer'Pos( a_frs1516.bona13hd ));
      params( 3417 ) := "+"( Float( a_frs1516.bona11sp ));
      params( 3418 ) := "+"( Integer'Pos( a_frs1516.bona12sp ));
      params( 3419 ) := "+"( Integer'Pos( a_frs1516.bona13sp ));
      params( 3420 ) := "+"( Float( a_frs1516.bona21hd ));
      params( 3421 ) := "+"( Integer'Pos( a_frs1516.bona22hd ));
      params( 3422 ) := "+"( Integer'Pos( a_frs1516.bona23hd ));
      params( 3423 ) := "+"( Integer'Pos( a_frs1516.bona21sp ));
      params( 3424 ) := "+"( Integer'Pos( a_frs1516.bona22sp ));
      params( 3425 ) := "+"( Integer'Pos( a_frs1516.bona23sp ));
      params( 3426 ) := "+"( Float( a_frs1516.bona31hd ));
      params( 3427 ) := "+"( Integer'Pos( a_frs1516.bona32hd ));
      params( 3428 ) := "+"( Integer'Pos( a_frs1516.bona33hd ));
      params( 3429 ) := "+"( Integer'Pos( a_frs1516.bona31sp ));
      params( 3430 ) := "+"( Integer'Pos( a_frs1516.bona32sp ));
      params( 3431 ) := "+"( Integer'Pos( a_frs1516.bona33sp ));
      params( 3432 ) := "+"( Float( a_frs1516.bona41hd ));
      params( 3433 ) := "+"( Integer'Pos( a_frs1516.bona42hd ));
      params( 3434 ) := "+"( Integer'Pos( a_frs1516.bona43hd ));
      params( 3435 ) := "+"( Integer'Pos( a_frs1516.bona41sp ));
      params( 3436 ) := "+"( Integer'Pos( a_frs1516.bona42sp ));
      params( 3437 ) := "+"( Integer'Pos( a_frs1516.bona43sp ));
      params( 3438 ) := "+"( Float( a_frs1516.bona51hd ));
      params( 3439 ) := "+"( Integer'Pos( a_frs1516.bona52hd ));
      params( 3440 ) := "+"( Integer'Pos( a_frs1516.bona53hd ));
      params( 3441 ) := "+"( Integer'Pos( a_frs1516.bona51sp ));
      params( 3442 ) := "+"( Integer'Pos( a_frs1516.bona52sp ));
      params( 3443 ) := "+"( Integer'Pos( a_frs1516.bona53sp ));
      params( 3444 ) := "+"( Float( a_frs1516.bona61hd ));
      params( 3445 ) := "+"( Integer'Pos( a_frs1516.bona62hd ));
      params( 3446 ) := "+"( Integer'Pos( a_frs1516.bona63hd ));
      params( 3447 ) := "+"( Integer'Pos( a_frs1516.bona61sp ));
      params( 3448 ) := "+"( Integer'Pos( a_frs1516.bona62sp ));
      params( 3449 ) := "+"( Integer'Pos( a_frs1516.bona63sp ));
      params( 3450 ) := "+"( Integer'Pos( a_frs1516.bont11hd ));
      params( 3451 ) := "+"( Integer'Pos( a_frs1516.bont12hd ));
      params( 3452 ) := "+"( Integer'Pos( a_frs1516.bont13hd ));
      params( 3453 ) := "+"( Integer'Pos( a_frs1516.bont11sp ));
      params( 3454 ) := "+"( Integer'Pos( a_frs1516.bont12sp ));
      params( 3455 ) := "+"( Integer'Pos( a_frs1516.bont13sp ));
      params( 3456 ) := "+"( Integer'Pos( a_frs1516.bont21hd ));
      params( 3457 ) := "+"( Integer'Pos( a_frs1516.bont22hd ));
      params( 3458 ) := "+"( Integer'Pos( a_frs1516.bont23hd ));
      params( 3459 ) := "+"( Integer'Pos( a_frs1516.bont21sp ));
      params( 3460 ) := "+"( Integer'Pos( a_frs1516.bont22sp ));
      params( 3461 ) := "+"( Integer'Pos( a_frs1516.bont23sp ));
      params( 3462 ) := "+"( Integer'Pos( a_frs1516.bont31hd ));
      params( 3463 ) := "+"( Integer'Pos( a_frs1516.bont32hd ));
      params( 3464 ) := "+"( Integer'Pos( a_frs1516.bont33hd ));
      params( 3465 ) := "+"( Integer'Pos( a_frs1516.bont31sp ));
      params( 3466 ) := "+"( Integer'Pos( a_frs1516.bont32sp ));
      params( 3467 ) := "+"( Integer'Pos( a_frs1516.bont33sp ));
      params( 3468 ) := "+"( Integer'Pos( a_frs1516.bont41hd ));
      params( 3469 ) := "+"( Integer'Pos( a_frs1516.bont42hd ));
      params( 3470 ) := "+"( Integer'Pos( a_frs1516.bont43hd ));
      params( 3471 ) := "+"( Integer'Pos( a_frs1516.bont41sp ));
      params( 3472 ) := "+"( Integer'Pos( a_frs1516.bont42sp ));
      params( 3473 ) := "+"( Integer'Pos( a_frs1516.bont43sp ));
      params( 3474 ) := "+"( Integer'Pos( a_frs1516.bont51hd ));
      params( 3475 ) := "+"( Integer'Pos( a_frs1516.bont52hd ));
      params( 3476 ) := "+"( Integer'Pos( a_frs1516.bont53hd ));
      params( 3477 ) := "+"( Integer'Pos( a_frs1516.bont51sp ));
      params( 3478 ) := "+"( Integer'Pos( a_frs1516.bont52sp ));
      params( 3479 ) := "+"( Integer'Pos( a_frs1516.bont53sp ));
      params( 3480 ) := "+"( Integer'Pos( a_frs1516.bont61hd ));
      params( 3481 ) := "+"( Integer'Pos( a_frs1516.bont62hd ));
      params( 3482 ) := "+"( Integer'Pos( a_frs1516.bont63hd ));
      params( 3483 ) := "+"( Integer'Pos( a_frs1516.bont61sp ));
      params( 3484 ) := "+"( Integer'Pos( a_frs1516.bont62sp ));
      params( 3485 ) := "+"( Integer'Pos( a_frs1516.bont63sp ));
      params( 3486 ) := "+"( Float( a_frs1516.btax11hd ));
      params( 3487 ) := "+"( Float( a_frs1516.btax12hd ));
      params( 3488 ) := "+"( Integer'Pos( a_frs1516.btax13hd ));
      params( 3489 ) := "+"( Float( a_frs1516.btax11sp ));
      params( 3490 ) := "+"( Integer'Pos( a_frs1516.btax12sp ));
      params( 3491 ) := "+"( Integer'Pos( a_frs1516.btax13sp ));
      params( 3492 ) := "+"( Float( a_frs1516.btax21hd ));
      params( 3493 ) := "+"( Integer'Pos( a_frs1516.btax22hd ));
      params( 3494 ) := "+"( Integer'Pos( a_frs1516.btax23hd ));
      params( 3495 ) := "+"( Float( a_frs1516.btax21sp ));
      params( 3496 ) := "+"( Integer'Pos( a_frs1516.btax22sp ));
      params( 3497 ) := "+"( Integer'Pos( a_frs1516.btax23sp ));
      params( 3498 ) := "+"( Float( a_frs1516.btax31hd ));
      params( 3499 ) := "+"( Integer'Pos( a_frs1516.btax32hd ));
      params( 3500 ) := "+"( Integer'Pos( a_frs1516.btax33hd ));
      params( 3501 ) := "+"( Float( a_frs1516.btax31sp ));
      params( 3502 ) := "+"( Integer'Pos( a_frs1516.btax32sp ));
      params( 3503 ) := "+"( Integer'Pos( a_frs1516.btax33sp ));
      params( 3504 ) := "+"( Float( a_frs1516.btax41hd ));
      params( 3505 ) := "+"( Integer'Pos( a_frs1516.btax42hd ));
      params( 3506 ) := "+"( Integer'Pos( a_frs1516.btax43hd ));
      params( 3507 ) := "+"( Float( a_frs1516.btax41sp ));
      params( 3508 ) := "+"( Integer'Pos( a_frs1516.btax42sp ));
      params( 3509 ) := "+"( Integer'Pos( a_frs1516.btax43sp ));
      params( 3510 ) := "+"( Float( a_frs1516.btax51hd ));
      params( 3511 ) := "+"( Integer'Pos( a_frs1516.btax52hd ));
      params( 3512 ) := "+"( Integer'Pos( a_frs1516.btax53hd ));
      params( 3513 ) := "+"( Float( a_frs1516.btax51sp ));
      params( 3514 ) := "+"( Integer'Pos( a_frs1516.btax52sp ));
      params( 3515 ) := "+"( Integer'Pos( a_frs1516.btax53sp ));
      params( 3516 ) := "+"( Float( a_frs1516.btax61hd ));
      params( 3517 ) := "+"( Integer'Pos( a_frs1516.btax62hd ));
      params( 3518 ) := "+"( Integer'Pos( a_frs1516.btax63hd ));
      params( 3519 ) := "+"( Integer'Pos( a_frs1516.btax61sp ));
      params( 3520 ) := "+"( Integer'Pos( a_frs1516.btax62sp ));
      params( 3521 ) := "+"( Integer'Pos( a_frs1516.btax63sp ));
      params( 3522 ) := "+"( Integer'Pos( a_frs1516.busac1hd ));
      params( 3523 ) := "+"( Integer'Pos( a_frs1516.busac2hd ));
      params( 3524 ) := "+"( Integer'Pos( a_frs1516.busac3hd ));
      params( 3525 ) := "+"( Integer'Pos( a_frs1516.busac1sp ));
      params( 3526 ) := "+"( Integer'Pos( a_frs1516.busac2sp ));
      params( 3527 ) := "+"( Integer'Pos( a_frs1516.busac3sp ));
      params( 3528 ) := "+"( Float( a_frs1516.caram1hd ));
      params( 3529 ) := "+"( Integer'Pos( a_frs1516.caram2hd ));
      params( 3530 ) := "+"( Integer'Pos( a_frs1516.caram3hd ));
      params( 3531 ) := "+"( Float( a_frs1516.caram1sp ));
      params( 3532 ) := "+"( Integer'Pos( a_frs1516.caram2sp ));
      params( 3533 ) := "+"( Integer'Pos( a_frs1516.caram3sp ));
      params( 3534 ) := "+"( Integer'Pos( a_frs1516.carcn1hd ));
      params( 3535 ) := "+"( Integer'Pos( a_frs1516.carcn2hd ));
      params( 3536 ) := "+"( Integer'Pos( a_frs1516.carcn3hd ));
      params( 3537 ) := "+"( Integer'Pos( a_frs1516.carcn1sp ));
      params( 3538 ) := "+"( Integer'Pos( a_frs1516.carcn2sp ));
      params( 3539 ) := "+"( Integer'Pos( a_frs1516.carcn3sp ));
      params( 3540 ) := "+"( Integer'Pos( a_frs1516.carvl1hd ));
      params( 3541 ) := "+"( Integer'Pos( a_frs1516.carvl2hd ));
      params( 3542 ) := "+"( Integer'Pos( a_frs1516.carvl3hd ));
      params( 3543 ) := "+"( Integer'Pos( a_frs1516.carvl1sp ));
      params( 3544 ) := "+"( Integer'Pos( a_frs1516.carvl2sp ));
      params( 3545 ) := "+"( Integer'Pos( a_frs1516.carvl3sp ));
      params( 3546 ) := "+"( Integer'Pos( a_frs1516.chktx1hd ));
      params( 3547 ) := "+"( Integer'Pos( a_frs1516.chktx2hd ));
      params( 3548 ) := "+"( Integer'Pos( a_frs1516.chktx3hd ));
      params( 3549 ) := "+"( Integer'Pos( a_frs1516.chktx1sp ));
      params( 3550 ) := "+"( Integer'Pos( a_frs1516.chktx2sp ));
      params( 3551 ) := "+"( Integer'Pos( a_frs1516.chktx3sp ));
      params( 3552 ) := "+"( Integer'Pos( a_frs1516.chcom1hd ));
      params( 3553 ) := "+"( Integer'Pos( a_frs1516.chcom2hd ));
      params( 3554 ) := "+"( Integer'Pos( a_frs1516.chcom3hd ));
      params( 3555 ) := "+"( Integer'Pos( a_frs1516.chcom1sp ));
      params( 3556 ) := "+"( Integer'Pos( a_frs1516.chcom2sp ));
      params( 3557 ) := "+"( Integer'Pos( a_frs1516.chcom3sp ));
      params( 3558 ) := "+"( Float( a_frs1516.chvam1hd ));
      params( 3559 ) := "+"( Integer'Pos( a_frs1516.chvam2hd ));
      params( 3560 ) := "+"( Integer'Pos( a_frs1516.chvam3hd ));
      params( 3561 ) := "+"( Float( a_frs1516.chvam1sp ));
      params( 3562 ) := "+"( Float( a_frs1516.chvam2sp ));
      params( 3563 ) := "+"( Integer'Pos( a_frs1516.chvam3sp ));
      params( 3564 ) := "+"( Integer'Pos( a_frs1516.chvpd1hd ));
      params( 3565 ) := "+"( Integer'Pos( a_frs1516.chvpd2hd ));
      params( 3566 ) := "+"( Integer'Pos( a_frs1516.chvpd3hd ));
      params( 3567 ) := "+"( Integer'Pos( a_frs1516.chvpd1sp ));
      params( 3568 ) := "+"( Integer'Pos( a_frs1516.chvpd2sp ));
      params( 3569 ) := "+"( Integer'Pos( a_frs1516.chvpd3sp ));
      params( 3570 ) := "+"( Integer'Pos( a_frs1516.chsac1hd ));
      params( 3571 ) := "+"( Integer'Pos( a_frs1516.chsac2hd ));
      params( 3572 ) := "+"( Integer'Pos( a_frs1516.chsac3hd ));
      params( 3573 ) := "+"( Integer'Pos( a_frs1516.chsac1sp ));
      params( 3574 ) := "+"( Integer'Pos( a_frs1516.chsac2sp ));
      params( 3575 ) := "+"( Integer'Pos( a_frs1516.chsac3sp ));
      params( 3576 ) := "+"( Integer'Pos( a_frs1516.chuam1hd ));
      params( 3577 ) := "+"( Integer'Pos( a_frs1516.chuam2hd ));
      params( 3578 ) := "+"( Integer'Pos( a_frs1516.chuam3hd ));
      params( 3579 ) := "+"( Integer'Pos( a_frs1516.chuam1sp ));
      params( 3580 ) := "+"( Integer'Pos( a_frs1516.chuam2sp ));
      params( 3581 ) := "+"( Integer'Pos( a_frs1516.chuam3sp ));
      params( 3582 ) := "+"( Integer'Pos( a_frs1516.chupd1hd ));
      params( 3583 ) := "+"( Integer'Pos( a_frs1516.chupd2hd ));
      params( 3584 ) := "+"( Integer'Pos( a_frs1516.chupd3hd ));
      params( 3585 ) := "+"( Integer'Pos( a_frs1516.chupd1sp ));
      params( 3586 ) := "+"( Integer'Pos( a_frs1516.chupd2sp ));
      params( 3587 ) := "+"( Integer'Pos( a_frs1516.chupd3sp ));
      params( 3588 ) := "+"( Integer'Pos( a_frs1516.chusu1hd ));
      params( 3589 ) := "+"( Integer'Pos( a_frs1516.chusu2hd ));
      params( 3590 ) := "+"( Integer'Pos( a_frs1516.chusu3hd ));
      params( 3591 ) := "+"( Integer'Pos( a_frs1516.chusu1sp ));
      params( 3592 ) := "+"( Integer'Pos( a_frs1516.chusu2sp ));
      params( 3593 ) := "+"( Integer'Pos( a_frs1516.chusu3sp ));
      params( 3594 ) := "+"( Float( a_frs1516.doth1hd ));
      params( 3595 ) := "+"( Float( a_frs1516.doth2hd ));
      params( 3596 ) := "+"( Integer'Pos( a_frs1516.doth3hd ));
      params( 3597 ) := "+"( Float( a_frs1516.doth1sp ));
      params( 3598 ) := "+"( Integer'Pos( a_frs1516.doth2sp ));
      params( 3599 ) := "+"( Integer'Pos( a_frs1516.doth3sp ));
      params( 3600 ) := "+"( Float( a_frs1516.dpen1hd ));
      params( 3601 ) := "+"( Float( a_frs1516.dpen2hd ));
      params( 3602 ) := "+"( Integer'Pos( a_frs1516.dpen3hd ));
      params( 3603 ) := "+"( Float( a_frs1516.dpen1sp ));
      params( 3604 ) := "+"( Float( a_frs1516.dpen2sp ));
      params( 3605 ) := "+"( Integer'Pos( a_frs1516.dpen3sp ));
      params( 3606 ) := "+"( Float( a_frs1516.davc1hd ));
      params( 3607 ) := "+"( Integer'Pos( a_frs1516.davc2hd ));
      params( 3608 ) := "+"( Integer'Pos( a_frs1516.davc3hd ));
      params( 3609 ) := "+"( Float( a_frs1516.davc1sp ));
      params( 3610 ) := "+"( Integer'Pos( a_frs1516.davc2sp ));
      params( 3611 ) := "+"( Integer'Pos( a_frs1516.davc3sp ));
      params( 3612 ) := "+"( Float( a_frs1516.dtuf1hd ));
      params( 3613 ) := "+"( Float( a_frs1516.dtuf2hd ));
      params( 3614 ) := "+"( Integer'Pos( a_frs1516.dtuf3hd ));
      params( 3615 ) := "+"( Float( a_frs1516.dtuf1sp ));
      params( 3616 ) := "+"( Float( a_frs1516.dtuf2sp ));
      params( 3617 ) := "+"( Integer'Pos( a_frs1516.dtuf3sp ));
      params( 3618 ) := "+"( Float( a_frs1516.dfrso1hd ));
      params( 3619 ) := "+"( Integer'Pos( a_frs1516.dfrso2hd ));
      params( 3620 ) := "+"( Integer'Pos( a_frs1516.dfrso3hd ));
      params( 3621 ) := "+"( Float( a_frs1516.dfrso1sp ));
      params( 3622 ) := "+"( Integer'Pos( a_frs1516.dfrso2sp ));
      params( 3623 ) := "+"( Integer'Pos( a_frs1516.dfrso3sp ));
      params( 3624 ) := "+"( Float( a_frs1516.dspor1hd ));
      params( 3625 ) := "+"( Integer'Pos( a_frs1516.dspor2hd ));
      params( 3626 ) := "+"( Integer'Pos( a_frs1516.dspor3hd ));
      params( 3627 ) := "+"( Float( a_frs1516.dspor1sp ));
      params( 3628 ) := "+"( Integer'Pos( a_frs1516.dspor2sp ));
      params( 3629 ) := "+"( Integer'Pos( a_frs1516.dspor3sp ));
      params( 3630 ) := "+"( Float( a_frs1516.drepl1hd ));
      params( 3631 ) := "+"( Integer'Pos( a_frs1516.drepl2hd ));
      params( 3632 ) := "+"( Integer'Pos( a_frs1516.drepl3hd ));
      params( 3633 ) := "+"( Float( a_frs1516.drepl1sp ));
      params( 3634 ) := "+"( Integer'Pos( a_frs1516.drepl2sp ));
      params( 3635 ) := "+"( Integer'Pos( a_frs1516.drepl3sp ));
      params( 3636 ) := "+"( Float( a_frs1516.dmed1hd ));
      params( 3637 ) := "+"( Integer'Pos( a_frs1516.dmed2hd ));
      params( 3638 ) := "+"( Integer'Pos( a_frs1516.dmed3hd ));
      params( 3639 ) := "+"( Float( a_frs1516.dmed1sp ));
      params( 3640 ) := "+"( Integer'Pos( a_frs1516.dmed2sp ));
      params( 3641 ) := "+"( Integer'Pos( a_frs1516.dmed3sp ));
      params( 3642 ) := "+"( Float( a_frs1516.dchar1hd ));
      params( 3643 ) := "+"( Float( a_frs1516.dchar2hd ));
      params( 3644 ) := "+"( Integer'Pos( a_frs1516.dchar3hd ));
      params( 3645 ) := "+"( Float( a_frs1516.dchar1sp ));
      params( 3646 ) := "+"( Integer'Pos( a_frs1516.dchar2sp ));
      params( 3647 ) := "+"( Integer'Pos( a_frs1516.dchar3sp ));
      params( 3648 ) := "+"( Float( a_frs1516.dslrp1hd ));
      params( 3649 ) := "+"( Integer'Pos( a_frs1516.dslrp2hd ));
      params( 3650 ) := "+"( Integer'Pos( a_frs1516.dslrp3hd ));
      params( 3651 ) := "+"( Float( a_frs1516.dslrp1sp ));
      params( 3652 ) := "+"( Integer'Pos( a_frs1516.dslrp2sp ));
      params( 3653 ) := "+"( Integer'Pos( a_frs1516.dslrp3sp ));
      params( 3654 ) := "+"( Integer'Pos( a_frs1516.dirni1hd ));
      params( 3655 ) := "+"( Integer'Pos( a_frs1516.dirni2hd ));
      params( 3656 ) := "+"( Integer'Pos( a_frs1516.dirni3hd ));
      params( 3657 ) := "+"( Integer'Pos( a_frs1516.dirni1sp ));
      params( 3658 ) := "+"( Integer'Pos( a_frs1516.dirni2sp ));
      params( 3659 ) := "+"( Integer'Pos( a_frs1516.dirni3sp ));
      params( 3660 ) := "+"( Integer'Pos( a_frs1516.totov1hd ));
      params( 3661 ) := "+"( Integer'Pos( a_frs1516.totov2hd ));
      params( 3662 ) := "+"( Integer'Pos( a_frs1516.totov3hd ));
      params( 3663 ) := "+"( Integer'Pos( a_frs1516.totov1sp ));
      params( 3664 ) := "+"( Integer'Pos( a_frs1516.totov2sp ));
      params( 3665 ) := "+"( Integer'Pos( a_frs1516.totov3sp ));
      params( 3666 ) := "+"( Float( a_frs1516.dvuhr1hd ));
      params( 3667 ) := "+"( Float( a_frs1516.dvuhr2hd ));
      params( 3668 ) := "+"( Float( a_frs1516.dvuhr3hd ));
      params( 3669 ) := "+"( Float( a_frs1516.dvuhr1sp ));
      params( 3670 ) := "+"( Float( a_frs1516.dvuhr2sp ));
      params( 3671 ) := "+"( Integer'Pos( a_frs1516.dvuhr3sp ));
      params( 3672 ) := "+"( Integer'Pos( a_frs1516.empan1hd ));
      params( 3673 ) := "+"( Integer'Pos( a_frs1516.empan2hd ));
      params( 3674 ) := "+"( Integer'Pos( a_frs1516.empan3hd ));
      params( 3675 ) := "+"( Integer'Pos( a_frs1516.empan1sp ));
      params( 3676 ) := "+"( Integer'Pos( a_frs1516.empan2sp ));
      params( 3677 ) := "+"( Integer'Pos( a_frs1516.empan3sp ));
      params( 3678 ) := "+"( Integer'Pos( a_frs1516.empen1hd ));
      params( 3679 ) := "+"( Integer'Pos( a_frs1516.empen2hd ));
      params( 3680 ) := "+"( Integer'Pos( a_frs1516.empen3hd ));
      params( 3681 ) := "+"( Integer'Pos( a_frs1516.empen1sp ));
      params( 3682 ) := "+"( Integer'Pos( a_frs1516.empen2sp ));
      params( 3683 ) := "+"( Integer'Pos( a_frs1516.empen3sp ));
      params( 3684 ) := "+"( Integer'Pos( a_frs1516.etype1hd ));
      params( 3685 ) := "+"( Integer'Pos( a_frs1516.etype2hd ));
      params( 3686 ) := "+"( Integer'Pos( a_frs1516.etype3hd ));
      params( 3687 ) := "+"( Integer'Pos( a_frs1516.etype1sp ));
      params( 3688 ) := "+"( Integer'Pos( a_frs1516.etype2sp ));
      params( 3689 ) := "+"( Integer'Pos( a_frs1516.etype3sp ));
      params( 3690 ) := "+"( Integer'Pos( a_frs1516.evrot1hd ));
      params( 3691 ) := "+"( Integer'Pos( a_frs1516.evrot2hd ));
      params( 3692 ) := "+"( Integer'Pos( a_frs1516.evrot3hd ));
      params( 3693 ) := "+"( Integer'Pos( a_frs1516.evrot1sp ));
      params( 3694 ) := "+"( Integer'Pos( a_frs1516.evrot2sp ));
      params( 3695 ) := "+"( Integer'Pos( a_frs1516.evrot3sp ));
      params( 3696 ) := "+"( Integer'Pos( a_frs1516.exb011hd ));
      params( 3697 ) := "+"( Integer'Pos( a_frs1516.exb012hd ));
      params( 3698 ) := "+"( Integer'Pos( a_frs1516.exb013hd ));
      params( 3699 ) := "+"( Integer'Pos( a_frs1516.exb011sp ));
      params( 3700 ) := "+"( Integer'Pos( a_frs1516.exb012sp ));
      params( 3701 ) := "+"( Integer'Pos( a_frs1516.exb013sp ));
      params( 3702 ) := "+"( Integer'Pos( a_frs1516.exb021hd ));
      params( 3703 ) := "+"( Integer'Pos( a_frs1516.exb022hd ));
      params( 3704 ) := "+"( Integer'Pos( a_frs1516.exb023hd ));
      params( 3705 ) := "+"( Integer'Pos( a_frs1516.exb021sp ));
      params( 3706 ) := "+"( Integer'Pos( a_frs1516.exb022sp ));
      params( 3707 ) := "+"( Integer'Pos( a_frs1516.exb023sp ));
      params( 3708 ) := "+"( Integer'Pos( a_frs1516.exb031hd ));
      params( 3709 ) := "+"( Integer'Pos( a_frs1516.exb032hd ));
      params( 3710 ) := "+"( Integer'Pos( a_frs1516.exb033hd ));
      params( 3711 ) := "+"( Integer'Pos( a_frs1516.exb031sp ));
      params( 3712 ) := "+"( Integer'Pos( a_frs1516.exb032sp ));
      params( 3713 ) := "+"( Integer'Pos( a_frs1516.exb033sp ));
      params( 3714 ) := "+"( Integer'Pos( a_frs1516.exb041hd ));
      params( 3715 ) := "+"( Integer'Pos( a_frs1516.exb042hd ));
      params( 3716 ) := "+"( Integer'Pos( a_frs1516.exb043hd ));
      params( 3717 ) := "+"( Integer'Pos( a_frs1516.exb041sp ));
      params( 3718 ) := "+"( Integer'Pos( a_frs1516.exb042sp ));
      params( 3719 ) := "+"( Integer'Pos( a_frs1516.exb043sp ));
      params( 3720 ) := "+"( Integer'Pos( a_frs1516.exb051hd ));
      params( 3721 ) := "+"( Integer'Pos( a_frs1516.exb052hd ));
      params( 3722 ) := "+"( Integer'Pos( a_frs1516.exb053hd ));
      params( 3723 ) := "+"( Integer'Pos( a_frs1516.exb051sp ));
      params( 3724 ) := "+"( Integer'Pos( a_frs1516.exb052sp ));
      params( 3725 ) := "+"( Integer'Pos( a_frs1516.exb053sp ));
      params( 3726 ) := "+"( Integer'Pos( a_frs1516.exb061hd ));
      params( 3727 ) := "+"( Integer'Pos( a_frs1516.exb062hd ));
      params( 3728 ) := "+"( Integer'Pos( a_frs1516.exb063hd ));
      params( 3729 ) := "+"( Integer'Pos( a_frs1516.exb061sp ));
      params( 3730 ) := "+"( Integer'Pos( a_frs1516.exb062sp ));
      params( 3731 ) := "+"( Integer'Pos( a_frs1516.exb063sp ));
      params( 3732 ) := "+"( Integer'Pos( a_frs1516.exb071hd ));
      params( 3733 ) := "+"( Integer'Pos( a_frs1516.exb072hd ));
      params( 3734 ) := "+"( Integer'Pos( a_frs1516.exb073hd ));
      params( 3735 ) := "+"( Integer'Pos( a_frs1516.exb071sp ));
      params( 3736 ) := "+"( Integer'Pos( a_frs1516.exb072sp ));
      params( 3737 ) := "+"( Integer'Pos( a_frs1516.exb073sp ));
      params( 3738 ) := "+"( Integer'Pos( a_frs1516.exb081hd ));
      params( 3739 ) := "+"( Integer'Pos( a_frs1516.exb082hd ));
      params( 3740 ) := "+"( Integer'Pos( a_frs1516.exb083hd ));
      params( 3741 ) := "+"( Integer'Pos( a_frs1516.exb081sp ));
      params( 3742 ) := "+"( Integer'Pos( a_frs1516.exb082sp ));
      params( 3743 ) := "+"( Integer'Pos( a_frs1516.exb083sp ));
      params( 3744 ) := "+"( Integer'Pos( a_frs1516.exb091hd ));
      params( 3745 ) := "+"( Integer'Pos( a_frs1516.exb092hd ));
      params( 3746 ) := "+"( Integer'Pos( a_frs1516.exb093hd ));
      params( 3747 ) := "+"( Integer'Pos( a_frs1516.exb091sp ));
      params( 3748 ) := "+"( Integer'Pos( a_frs1516.exb092sp ));
      params( 3749 ) := "+"( Integer'Pos( a_frs1516.exb093sp ));
      params( 3750 ) := "+"( Integer'Pos( a_frs1516.exb101hd ));
      params( 3751 ) := "+"( Integer'Pos( a_frs1516.exb102hd ));
      params( 3752 ) := "+"( Integer'Pos( a_frs1516.exb103hd ));
      params( 3753 ) := "+"( Integer'Pos( a_frs1516.exb101sp ));
      params( 3754 ) := "+"( Integer'Pos( a_frs1516.exb102sp ));
      params( 3755 ) := "+"( Integer'Pos( a_frs1516.exb103sp ));
      params( 3756 ) := "+"( Integer'Pos( a_frs1516.exb111hd ));
      params( 3757 ) := "+"( Integer'Pos( a_frs1516.exb112hd ));
      params( 3758 ) := "+"( Integer'Pos( a_frs1516.exb113hd ));
      params( 3759 ) := "+"( Integer'Pos( a_frs1516.exb111sp ));
      params( 3760 ) := "+"( Integer'Pos( a_frs1516.exb112sp ));
      params( 3761 ) := "+"( Integer'Pos( a_frs1516.exb113sp ));
      params( 3762 ) := "+"( Integer'Pos( a_frs1516.exb121hd ));
      params( 3763 ) := "+"( Integer'Pos( a_frs1516.exb122hd ));
      params( 3764 ) := "+"( Integer'Pos( a_frs1516.exb123hd ));
      params( 3765 ) := "+"( Integer'Pos( a_frs1516.exb121sp ));
      params( 3766 ) := "+"( Integer'Pos( a_frs1516.exb122sp ));
      params( 3767 ) := "+"( Integer'Pos( a_frs1516.exb123sp ));
      params( 3768 ) := "+"( Integer'Pos( a_frs1516.ftpt1hd ));
      params( 3769 ) := "+"( Integer'Pos( a_frs1516.ftpt2hd ));
      params( 3770 ) := "+"( Integer'Pos( a_frs1516.ftpt3hd ));
      params( 3771 ) := "+"( Integer'Pos( a_frs1516.ftpt1sp ));
      params( 3772 ) := "+"( Integer'Pos( a_frs1516.ftpt2sp ));
      params( 3773 ) := "+"( Integer'Pos( a_frs1516.ftpt3sp ));
      params( 3774 ) := "+"( Float( a_frs1516.fulam1hd ));
      params( 3775 ) := "+"( Integer'Pos( a_frs1516.fulam2hd ));
      params( 3776 ) := "+"( Integer'Pos( a_frs1516.fulam3hd ));
      params( 3777 ) := "+"( Float( a_frs1516.fulam1sp ));
      params( 3778 ) := "+"( Integer'Pos( a_frs1516.fulam2sp ));
      params( 3779 ) := "+"( Integer'Pos( a_frs1516.fulam3sp ));
      params( 3780 ) := "+"( Integer'Pos( a_frs1516.fulbn1hd ));
      params( 3781 ) := "+"( Integer'Pos( a_frs1516.fulbn2hd ));
      params( 3782 ) := "+"( Integer'Pos( a_frs1516.fulbn3hd ));
      params( 3783 ) := "+"( Integer'Pos( a_frs1516.fulbn1sp ));
      params( 3784 ) := "+"( Integer'Pos( a_frs1516.fulbn2sp ));
      params( 3785 ) := "+"( Integer'Pos( a_frs1516.fulbn3sp ));
      params( 3786 ) := "+"( Integer'Pos( a_frs1516.fulpd1hd ));
      params( 3787 ) := "+"( Integer'Pos( a_frs1516.fulpd2hd ));
      params( 3788 ) := "+"( Integer'Pos( a_frs1516.fulpd3hd ));
      params( 3789 ) := "+"( Integer'Pos( a_frs1516.fulpd1sp ));
      params( 3790 ) := "+"( Integer'Pos( a_frs1516.fulpd2sp ));
      params( 3791 ) := "+"( Integer'Pos( a_frs1516.fulpd3sp ));
      params( 3792 ) := "+"( Integer'Pos( a_frs1516.fulty1hd ));
      params( 3793 ) := "+"( Integer'Pos( a_frs1516.fulty2hd ));
      params( 3794 ) := "+"( Integer'Pos( a_frs1516.fulty3hd ));
      params( 3795 ) := "+"( Integer'Pos( a_frs1516.fulty1sp ));
      params( 3796 ) := "+"( Integer'Pos( a_frs1516.fulty2sp ));
      params( 3797 ) := "+"( Integer'Pos( a_frs1516.fulty3sp ));
      params( 3798 ) := "+"( Integer'Pos( a_frs1516.fluam1hd ));
      params( 3799 ) := "+"( Integer'Pos( a_frs1516.fluam2hd ));
      params( 3800 ) := "+"( Integer'Pos( a_frs1516.fluam3hd ));
      params( 3801 ) := "+"( Integer'Pos( a_frs1516.fluam1sp ));
      params( 3802 ) := "+"( Integer'Pos( a_frs1516.fluam2sp ));
      params( 3803 ) := "+"( Integer'Pos( a_frs1516.fluam3sp ));
      params( 3804 ) := "+"( Integer'Pos( a_frs1516.flupd1hd ));
      params( 3805 ) := "+"( Integer'Pos( a_frs1516.flupd2hd ));
      params( 3806 ) := "+"( Integer'Pos( a_frs1516.flupd3hd ));
      params( 3807 ) := "+"( Integer'Pos( a_frs1516.flupd1sp ));
      params( 3808 ) := "+"( Integer'Pos( a_frs1516.flupd2sp ));
      params( 3809 ) := "+"( Integer'Pos( a_frs1516.flupd3sp ));
      params( 3810 ) := "+"( Integer'Pos( a_frs1516.flusu1hd ));
      params( 3811 ) := "+"( Integer'Pos( a_frs1516.flusu2hd ));
      params( 3812 ) := "+"( Integer'Pos( a_frs1516.flusu3hd ));
      params( 3813 ) := "+"( Integer'Pos( a_frs1516.flusu1sp ));
      params( 3814 ) := "+"( Integer'Pos( a_frs1516.flusu2sp ));
      params( 3815 ) := "+"( Integer'Pos( a_frs1516.flusu3sp ));
      params( 3816 ) := "+"( Float( a_frs1516.grwag1hd ));
      params( 3817 ) := "+"( Float( a_frs1516.grwag2hd ));
      params( 3818 ) := "+"( Float( a_frs1516.grwag3hd ));
      params( 3819 ) := "+"( Float( a_frs1516.grwag1sp ));
      params( 3820 ) := "+"( Float( a_frs1516.grwag2sp ));
      params( 3821 ) := "+"( Float( a_frs1516.grwag3sp ));
      params( 3822 ) := "+"( Integer'Pos( a_frs1516.grwap1hd ));
      params( 3823 ) := "+"( Integer'Pos( a_frs1516.grwap2hd ));
      params( 3824 ) := "+"( Integer'Pos( a_frs1516.grwap3hd ));
      params( 3825 ) := "+"( Integer'Pos( a_frs1516.grwap1sp ));
      params( 3826 ) := "+"( Integer'Pos( a_frs1516.grwap2sp ));
      params( 3827 ) := "+"( Integer'Pos( a_frs1516.grwap3sp ));
      params( 3828 ) := "+"( Float( a_frs1516.hha11hd ));
      params( 3829 ) := "+"( Integer'Pos( a_frs1516.hha12hd ));
      params( 3830 ) := "+"( Float( a_frs1516.hha13hd ));
      params( 3831 ) := "+"( Float( a_frs1516.hha11sp ));
      params( 3832 ) := "+"( Integer'Pos( a_frs1516.hha12sp ));
      params( 3833 ) := "+"( Integer'Pos( a_frs1516.hha13sp ));
      params( 3834 ) := "+"( Float( a_frs1516.hha21hd ));
      params( 3835 ) := "+"( Integer'Pos( a_frs1516.hha22hd ));
      params( 3836 ) := "+"( Float( a_frs1516.hha23hd ));
      params( 3837 ) := "+"( Float( a_frs1516.hha21sp ));
      params( 3838 ) := "+"( Integer'Pos( a_frs1516.hha22sp ));
      params( 3839 ) := "+"( Integer'Pos( a_frs1516.hha23sp ));
      params( 3840 ) := "+"( Integer'Pos( a_frs1516.hha31hd ));
      params( 3841 ) := "+"( Integer'Pos( a_frs1516.hha32hd ));
      params( 3842 ) := "+"( Integer'Pos( a_frs1516.hha33hd ));
      params( 3843 ) := "+"( Integer'Pos( a_frs1516.hha31sp ));
      params( 3844 ) := "+"( Integer'Pos( a_frs1516.hha32sp ));
      params( 3845 ) := "+"( Integer'Pos( a_frs1516.hha33sp ));
      params( 3846 ) := "+"( Integer'Pos( a_frs1516.hour1hd ));
      params( 3847 ) := "+"( Integer'Pos( a_frs1516.hour2hd ));
      params( 3848 ) := "+"( Integer'Pos( a_frs1516.hour3hd ));
      params( 3849 ) := "+"( Integer'Pos( a_frs1516.hour1sp ));
      params( 3850 ) := "+"( Integer'Pos( a_frs1516.hour2sp ));
      params( 3851 ) := "+"( Integer'Pos( a_frs1516.hour3sp ));
      params( 3852 ) := "+"( Float( a_frs1516.hrrte1hd ));
      params( 3853 ) := "+"( Float( a_frs1516.hrrte2hd ));
      params( 3854 ) := "+"( Float( a_frs1516.hrrte3hd ));
      params( 3855 ) := "+"( Float( a_frs1516.hrrte1sp ));
      params( 3856 ) := "+"( Float( a_frs1516.hrrte2sp ));
      params( 3857 ) := "+"( Float( a_frs1516.hrrte3sp ));
      params( 3858 ) := "+"( Integer'Pos( a_frs1516.ipay11hd ));
      params( 3859 ) := "+"( Integer'Pos( a_frs1516.ipay12hd ));
      params( 3860 ) := "+"( Integer'Pos( a_frs1516.ipay13hd ));
      params( 3861 ) := "+"( Integer'Pos( a_frs1516.ipay11sp ));
      params( 3862 ) := "+"( Integer'Pos( a_frs1516.ipay12sp ));
      params( 3863 ) := "+"( Integer'Pos( a_frs1516.ipay13sp ));
      params( 3864 ) := "+"( Integer'Pos( a_frs1516.ipay21hd ));
      params( 3865 ) := "+"( Integer'Pos( a_frs1516.ipay22hd ));
      params( 3866 ) := "+"( Integer'Pos( a_frs1516.ipay23hd ));
      params( 3867 ) := "+"( Integer'Pos( a_frs1516.ipay21sp ));
      params( 3868 ) := "+"( Integer'Pos( a_frs1516.ipay22sp ));
      params( 3869 ) := "+"( Integer'Pos( a_frs1516.ipay23sp ));
      params( 3870 ) := "+"( Integer'Pos( a_frs1516.ipay31hd ));
      params( 3871 ) := "+"( Integer'Pos( a_frs1516.ipay32hd ));
      params( 3872 ) := "+"( Integer'Pos( a_frs1516.ipay33hd ));
      params( 3873 ) := "+"( Integer'Pos( a_frs1516.ipay31sp ));
      params( 3874 ) := "+"( Integer'Pos( a_frs1516.ipay32sp ));
      params( 3875 ) := "+"( Integer'Pos( a_frs1516.ipay33sp ));
      params( 3876 ) := "+"( Integer'Pos( a_frs1516.ipay41hd ));
      params( 3877 ) := "+"( Integer'Pos( a_frs1516.ipay42hd ));
      params( 3878 ) := "+"( Integer'Pos( a_frs1516.ipay43hd ));
      params( 3879 ) := "+"( Integer'Pos( a_frs1516.ipay41sp ));
      params( 3880 ) := "+"( Integer'Pos( a_frs1516.ipay42sp ));
      params( 3881 ) := "+"( Integer'Pos( a_frs1516.ipay43sp ));
      params( 3882 ) := "+"( Integer'Pos( a_frs1516.ipay51hd ));
      params( 3883 ) := "+"( Integer'Pos( a_frs1516.ipay52hd ));
      params( 3884 ) := "+"( Integer'Pos( a_frs1516.ipay53hd ));
      params( 3885 ) := "+"( Integer'Pos( a_frs1516.ipay51sp ));
      params( 3886 ) := "+"( Integer'Pos( a_frs1516.ipay52sp ));
      params( 3887 ) := "+"( Integer'Pos( a_frs1516.ipay53sp ));
      params( 3888 ) := "+"( Integer'Pos( a_frs1516.ipay61hd ));
      params( 3889 ) := "+"( Integer'Pos( a_frs1516.ipay62hd ));
      params( 3890 ) := "+"( Integer'Pos( a_frs1516.ipay63hd ));
      params( 3891 ) := "+"( Integer'Pos( a_frs1516.ipay61sp ));
      params( 3892 ) := "+"( Integer'Pos( a_frs1516.ipay62sp ));
      params( 3893 ) := "+"( Integer'Pos( a_frs1516.ipay63sp ));
      params( 3894 ) := "+"( Integer'Pos( a_frs1516.ipay71hd ));
      params( 3895 ) := "+"( Integer'Pos( a_frs1516.ipay72hd ));
      params( 3896 ) := "+"( Integer'Pos( a_frs1516.ipay73hd ));
      params( 3897 ) := "+"( Integer'Pos( a_frs1516.ipay71sp ));
      params( 3898 ) := "+"( Integer'Pos( a_frs1516.ipay72sp ));
      params( 3899 ) := "+"( Integer'Pos( a_frs1516.ipay73sp ));
      params( 3900 ) := "+"( Integer'Pos( a_frs1516.jbchg1hd ));
      params( 3901 ) := "+"( Integer'Pos( a_frs1516.jbchg2hd ));
      params( 3902 ) := "+"( Integer'Pos( a_frs1516.jbchg3hd ));
      params( 3903 ) := "+"( Integer'Pos( a_frs1516.jbchg1sp ));
      params( 3904 ) := "+"( Integer'Pos( a_frs1516.jbchg2sp ));
      params( 3905 ) := "+"( Integer'Pos( a_frs1516.jbchg3sp ));
      params( 3906 ) := "+"( Integer'Pos( a_frs1516.jobus1hd ));
      params( 3907 ) := "+"( Integer'Pos( a_frs1516.jobus2hd ));
      params( 3908 ) := "+"( Integer'Pos( a_frs1516.jobus3hd ));
      params( 3909 ) := "+"( Integer'Pos( a_frs1516.jobus1sp ));
      params( 3910 ) := "+"( Integer'Pos( a_frs1516.jobus2sp ));
      params( 3911 ) := "+"( Integer'Pos( a_frs1516.jobus3sp ));
      params( 3912 ) := "+"( Float( a_frs1516.jbhrs1hd ));
      params( 3913 ) := "+"( Float( a_frs1516.jbhrs2hd ));
      params( 3914 ) := "+"( Float( a_frs1516.jbhrs3hd ));
      params( 3915 ) := "+"( Float( a_frs1516.jbhrs1sp ));
      params( 3916 ) := "+"( Float( a_frs1516.jbhrs2sp ));
      params( 3917 ) := "+"( Integer'Pos( a_frs1516.jbhrs3sp ));
      params( 3918 ) := "+"( Integer'Pos( a_frs1516.lt301hd ));
      params( 3919 ) := "+"( Integer'Pos( a_frs1516.lt302hd ));
      params( 3920 ) := "+"( Integer'Pos( a_frs1516.lt303hd ));
      params( 3921 ) := "+"( Integer'Pos( a_frs1516.lt301sp ));
      params( 3922 ) := "+"( Integer'Pos( a_frs1516.lt302sp ));
      params( 3923 ) := "+"( Integer'Pos( a_frs1516.lt303sp ));
      params( 3924 ) := "+"( Integer'Pos( a_frs1516.madem1hd ));
      params( 3925 ) := "+"( Integer'Pos( a_frs1516.madem2hd ));
      params( 3926 ) := "+"( Integer'Pos( a_frs1516.madem3hd ));
      params( 3927 ) := "+"( Integer'Pos( a_frs1516.madem1sp ));
      params( 3928 ) := "+"( Integer'Pos( a_frs1516.madem2sp ));
      params( 3929 ) := "+"( Integer'Pos( a_frs1516.madem3sp ));
      params( 3930 ) := "+"( Float( a_frs1516.mile1hd ));
      params( 3931 ) := "+"( Float( a_frs1516.mile2hd ));
      params( 3932 ) := "+"( Integer'Pos( a_frs1516.mile3hd ));
      params( 3933 ) := "+"( Float( a_frs1516.mile1sp ));
      params( 3934 ) := "+"( Float( a_frs1516.mile2sp ));
      params( 3935 ) := "+"( Integer'Pos( a_frs1516.mile3sp ));
      params( 3936 ) := "+"( Float( a_frs1516.moref1hd ));
      params( 3937 ) := "+"( Integer'Pos( a_frs1516.moref2hd ));
      params( 3938 ) := "+"( Integer'Pos( a_frs1516.moref3hd ));
      params( 3939 ) := "+"( Float( a_frs1516.moref1sp ));
      params( 3940 ) := "+"( Float( a_frs1516.moref2sp ));
      params( 3941 ) := "+"( Integer'Pos( a_frs1516.moref3sp ));
      params( 3942 ) := "+"( Float( a_frs1516.nic1hd ));
      params( 3943 ) := "+"( Float( a_frs1516.nic2hd ));
      params( 3944 ) := "+"( Float( a_frs1516.nic3hd ));
      params( 3945 ) := "+"( Float( a_frs1516.nic1sp ));
      params( 3946 ) := "+"( Float( a_frs1516.nic2sp ));
      params( 3947 ) := "+"( Integer'Pos( a_frs1516.nic3sp ));
      params( 3948 ) := "+"( Float( a_frs1516.nidam1hd ));
      params( 3949 ) := "+"( Integer'Pos( a_frs1516.nidam2hd ));
      params( 3950 ) := "+"( Integer'Pos( a_frs1516.nidam3hd ));
      params( 3951 ) := "+"( Float( a_frs1516.nidam1sp ));
      params( 3952 ) := "+"( Float( a_frs1516.nidam2sp ));
      params( 3953 ) := "+"( Integer'Pos( a_frs1516.nidam3sp ));
      params( 3954 ) := "+"( Integer'Pos( a_frs1516.nipd1hd ));
      params( 3955 ) := "+"( Integer'Pos( a_frs1516.nipd2hd ));
      params( 3956 ) := "+"( Integer'Pos( a_frs1516.nipd3hd ));
      params( 3957 ) := "+"( Integer'Pos( a_frs1516.nipd1sp ));
      params( 3958 ) := "+"( Integer'Pos( a_frs1516.nipd2sp ));
      params( 3959 ) := "+"( Integer'Pos( a_frs1516.nipd3sp ));
      params( 3960 ) := "+"( Integer'Pos( a_frs1516.noemp1hd ));
      params( 3961 ) := "+"( Integer'Pos( a_frs1516.noemp2hd ));
      params( 3962 ) := "+"( Integer'Pos( a_frs1516.noemp3hd ));
      params( 3963 ) := "+"( Integer'Pos( a_frs1516.noemp1sp ));
      params( 3964 ) := "+"( Integer'Pos( a_frs1516.noemp2sp ));
      params( 3965 ) := "+"( Integer'Pos( a_frs1516.noemp3sp ));
      params( 3966 ) := "+"( Integer'Pos( a_frs1516.oremp1hd ));
      params( 3967 ) := "+"( Integer'Pos( a_frs1516.oremp2hd ));
      params( 3968 ) := "+"( Integer'Pos( a_frs1516.oremp3hd ));
      params( 3969 ) := "+"( Integer'Pos( a_frs1516.oremp1sp ));
      params( 3970 ) := "+"( Integer'Pos( a_frs1516.oremp2sp ));
      params( 3971 ) := "+"( Integer'Pos( a_frs1516.oremp3sp ));
      params( 3972 ) := "+"( Integer'Pos( a_frs1516.othd11hd ));
      params( 3973 ) := "+"( Integer'Pos( a_frs1516.othd12hd ));
      params( 3974 ) := "+"( Integer'Pos( a_frs1516.othd13hd ));
      params( 3975 ) := "+"( Integer'Pos( a_frs1516.othd11sp ));
      params( 3976 ) := "+"( Integer'Pos( a_frs1516.othd12sp ));
      params( 3977 ) := "+"( Integer'Pos( a_frs1516.othd13sp ));
      params( 3978 ) := "+"( Integer'Pos( a_frs1516.othd21hd ));
      params( 3979 ) := "+"( Integer'Pos( a_frs1516.othd22hd ));
      params( 3980 ) := "+"( Integer'Pos( a_frs1516.othd23hd ));
      params( 3981 ) := "+"( Integer'Pos( a_frs1516.othd21sp ));
      params( 3982 ) := "+"( Integer'Pos( a_frs1516.othd22sp ));
      params( 3983 ) := "+"( Integer'Pos( a_frs1516.othd23sp ));
      params( 3984 ) := "+"( Integer'Pos( a_frs1516.othd31hd ));
      params( 3985 ) := "+"( Integer'Pos( a_frs1516.othd32hd ));
      params( 3986 ) := "+"( Integer'Pos( a_frs1516.othd33hd ));
      params( 3987 ) := "+"( Integer'Pos( a_frs1516.othd31sp ));
      params( 3988 ) := "+"( Integer'Pos( a_frs1516.othd32sp ));
      params( 3989 ) := "+"( Integer'Pos( a_frs1516.othd33sp ));
      params( 3990 ) := "+"( Integer'Pos( a_frs1516.othd41hd ));
      params( 3991 ) := "+"( Integer'Pos( a_frs1516.othd42hd ));
      params( 3992 ) := "+"( Integer'Pos( a_frs1516.othd43hd ));
      params( 3993 ) := "+"( Integer'Pos( a_frs1516.othd41sp ));
      params( 3994 ) := "+"( Integer'Pos( a_frs1516.othd42sp ));
      params( 3995 ) := "+"( Integer'Pos( a_frs1516.othd43sp ));
      params( 3996 ) := "+"( Integer'Pos( a_frs1516.othd51hd ));
      params( 3997 ) := "+"( Integer'Pos( a_frs1516.othd52hd ));
      params( 3998 ) := "+"( Integer'Pos( a_frs1516.othd53hd ));
      params( 3999 ) := "+"( Integer'Pos( a_frs1516.othd51sp ));
      params( 4000 ) := "+"( Integer'Pos( a_frs1516.othd52sp ));
      params( 4001 ) := "+"( Integer'Pos( a_frs1516.othd53sp ));
      params( 4002 ) := "+"( Integer'Pos( a_frs1516.othd61hd ));
      params( 4003 ) := "+"( Integer'Pos( a_frs1516.othd62hd ));
      params( 4004 ) := "+"( Integer'Pos( a_frs1516.othd63hd ));
      params( 4005 ) := "+"( Integer'Pos( a_frs1516.othd61sp ));
      params( 4006 ) := "+"( Integer'Pos( a_frs1516.othd62sp ));
      params( 4007 ) := "+"( Integer'Pos( a_frs1516.othd63sp ));
      params( 4008 ) := "+"( Integer'Pos( a_frs1516.othd71hd ));
      params( 4009 ) := "+"( Integer'Pos( a_frs1516.othd72hd ));
      params( 4010 ) := "+"( Integer'Pos( a_frs1516.othd73hd ));
      params( 4011 ) := "+"( Integer'Pos( a_frs1516.othd71sp ));
      params( 4012 ) := "+"( Integer'Pos( a_frs1516.othd72sp ));
      params( 4013 ) := "+"( Integer'Pos( a_frs1516.othd73sp ));
      params( 4014 ) := "+"( Integer'Pos( a_frs1516.othd81hd ));
      params( 4015 ) := "+"( Integer'Pos( a_frs1516.othd82hd ));
      params( 4016 ) := "+"( Integer'Pos( a_frs1516.othd83hd ));
      params( 4017 ) := "+"( Integer'Pos( a_frs1516.othd81sp ));
      params( 4018 ) := "+"( Integer'Pos( a_frs1516.othd82sp ));
      params( 4019 ) := "+"( Integer'Pos( a_frs1516.othd83sp ));
      params( 4020 ) := "+"( Integer'Pos( a_frs1516.othd91hd ));
      params( 4021 ) := "+"( Integer'Pos( a_frs1516.othd92hd ));
      params( 4022 ) := "+"( Integer'Pos( a_frs1516.othd93hd ));
      params( 4023 ) := "+"( Integer'Pos( a_frs1516.othd91sp ));
      params( 4024 ) := "+"( Integer'Pos( a_frs1516.othd92sp ));
      params( 4025 ) := "+"( Integer'Pos( a_frs1516.othd93sp ));
      params( 4026 ) := "+"( Integer'Pos( a_frs1516.otd101hd ));
      params( 4027 ) := "+"( Integer'Pos( a_frs1516.otd102hd ));
      params( 4028 ) := "+"( Integer'Pos( a_frs1516.otd103hd ));
      params( 4029 ) := "+"( Integer'Pos( a_frs1516.otd101sp ));
      params( 4030 ) := "+"( Integer'Pos( a_frs1516.otd102sp ));
      params( 4031 ) := "+"( Integer'Pos( a_frs1516.otd103sp ));
      params( 4032 ) := "+"( Float( a_frs1516.ownam1hd ));
      params( 4033 ) := "+"( Float( a_frs1516.ownam2hd ));
      params( 4034 ) := "+"( Integer'Pos( a_frs1516.ownam3hd ));
      params( 4035 ) := "+"( Float( a_frs1516.ownam1sp ));
      params( 4036 ) := "+"( Float( a_frs1516.ownam2sp ));
      params( 4037 ) := "+"( Float( a_frs1516.ownam3sp ));
      params( 4038 ) := "+"( Float( a_frs1516.ownoa1hd ));
      params( 4039 ) := "+"( Float( a_frs1516.ownoa2hd ));
      params( 4040 ) := "+"( Integer'Pos( a_frs1516.ownoa3hd ));
      params( 4041 ) := "+"( Float( a_frs1516.ownoa1sp ));
      params( 4042 ) := "+"( Integer'Pos( a_frs1516.ownoa2sp ));
      params( 4043 ) := "+"( Integer'Pos( a_frs1516.ownoa3sp ));
      params( 4044 ) := "+"( Integer'Pos( a_frs1516.ownot1hd ));
      params( 4045 ) := "+"( Integer'Pos( a_frs1516.ownot2hd ));
      params( 4046 ) := "+"( Integer'Pos( a_frs1516.ownot3hd ));
      params( 4047 ) := "+"( Integer'Pos( a_frs1516.ownot1sp ));
      params( 4048 ) := "+"( Integer'Pos( a_frs1516.ownot2sp ));
      params( 4049 ) := "+"( Integer'Pos( a_frs1516.ownot3sp ));
      params( 4050 ) := "+"( Integer'Pos( a_frs1516.ownsm1hd ));
      params( 4051 ) := "+"( Integer'Pos( a_frs1516.ownsm2hd ));
      params( 4052 ) := "+"( Integer'Pos( a_frs1516.ownsm3hd ));
      params( 4053 ) := "+"( Integer'Pos( a_frs1516.ownsm1sp ));
      params( 4054 ) := "+"( Integer'Pos( a_frs1516.ownsm2sp ));
      params( 4055 ) := "+"( Integer'Pos( a_frs1516.ownsm3sp ));
      params( 4056 ) := "+"( Integer'Pos( a_frs1516.pappd1hd ));
      params( 4057 ) := "+"( Integer'Pos( a_frs1516.pappd2hd ));
      params( 4058 ) := "+"( Integer'Pos( a_frs1516.pappd3hd ));
      params( 4059 ) := "+"( Integer'Pos( a_frs1516.pappd1sp ));
      params( 4060 ) := "+"( Integer'Pos( a_frs1516.pappd2sp ));
      params( 4061 ) := "+"( Integer'Pos( a_frs1516.pappd3sp ));
      params( 4062 ) := "+"( Float( a_frs1516.payam1hd ));
      params( 4063 ) := "+"( Float( a_frs1516.payam2hd ));
      params( 4064 ) := "+"( Float( a_frs1516.payam3hd ));
      params( 4065 ) := "+"( Float( a_frs1516.payam1sp ));
      params( 4066 ) := "+"( Float( a_frs1516.payam2sp ));
      params( 4067 ) := "+"( Float( a_frs1516.payam3sp ));
      params( 4068 ) := "+"( Integer'Pos( a_frs1516.pdate1hd ));
      params( 4069 ) := "+"( Integer'Pos( a_frs1516.pdate2hd ));
      params( 4070 ) := "+"( Integer'Pos( a_frs1516.pdate3hd ));
      params( 4071 ) := "+"( Integer'Pos( a_frs1516.pdate1sp ));
      params( 4072 ) := "+"( Integer'Pos( a_frs1516.pdate2sp ));
      params( 4073 ) := "+"( Integer'Pos( a_frs1516.pdate3sp ));
      params( 4074 ) := "+"( Float( a_frs1516.paye1hd ));
      params( 4075 ) := "+"( Float( a_frs1516.paye2hd ));
      params( 4076 ) := "+"( Float( a_frs1516.paye3hd ));
      params( 4077 ) := "+"( Float( a_frs1516.paye1sp ));
      params( 4078 ) := "+"( Float( a_frs1516.paye2sp ));
      params( 4079 ) := "+"( Float( a_frs1516.paye3sp ));
      params( 4080 ) := "+"( Integer'Pos( a_frs1516.paype1hd ));
      params( 4081 ) := "+"( Integer'Pos( a_frs1516.paype2hd ));
      params( 4082 ) := "+"( Integer'Pos( a_frs1516.paype3hd ));
      params( 4083 ) := "+"( Integer'Pos( a_frs1516.paype1sp ));
      params( 4084 ) := "+"( Integer'Pos( a_frs1516.paype2sp ));
      params( 4085 ) := "+"( Integer'Pos( a_frs1516.paype3sp ));
      params( 4086 ) := "+"( Integer'Pos( a_frs1516.paysl1hd ));
      params( 4087 ) := "+"( Integer'Pos( a_frs1516.paysl2hd ));
      params( 4088 ) := "+"( Integer'Pos( a_frs1516.paysl3hd ));
      params( 4089 ) := "+"( Integer'Pos( a_frs1516.paysl1sp ));
      params( 4090 ) := "+"( Integer'Pos( a_frs1516.paysl2sp ));
      params( 4091 ) := "+"( Integer'Pos( a_frs1516.paysl3sp ));
      params( 4092 ) := "+"( Integer'Pos( a_frs1516.payus1hd ));
      params( 4093 ) := "+"( Integer'Pos( a_frs1516.payus2hd ));
      params( 4094 ) := "+"( Integer'Pos( a_frs1516.payus3hd ));
      params( 4095 ) := "+"( Integer'Pos( a_frs1516.payus1sp ));
      params( 4096 ) := "+"( Integer'Pos( a_frs1516.payus2sp ));
      params( 4097 ) := "+"( Integer'Pos( a_frs1516.payus3sp ));
      params( 4098 ) := "+"( Float( a_frs1516.pothr1hd ));
      params( 4099 ) := "+"( Integer'Pos( a_frs1516.pothr2hd ));
      params( 4100 ) := "+"( Integer'Pos( a_frs1516.pothr3hd ));
      params( 4101 ) := "+"( Float( a_frs1516.pothr1sp ));
      params( 4102 ) := "+"( Integer'Pos( a_frs1516.pothr2sp ));
      params( 4103 ) := "+"( Integer'Pos( a_frs1516.pothr3sp ));
      params( 4104 ) := "+"( Integer'Pos( a_frs1516.ppppd1hd ));
      params( 4105 ) := "+"( Integer'Pos( a_frs1516.ppppd2hd ));
      params( 4106 ) := "+"( Integer'Pos( a_frs1516.ppppd3hd ));
      params( 4107 ) := "+"( Integer'Pos( a_frs1516.ppppd1sp ));
      params( 4108 ) := "+"( Integer'Pos( a_frs1516.ppppd2sp ));
      params( 4109 ) := "+"( Integer'Pos( a_frs1516.ppppd3sp ));
      params( 4110 ) := "+"( Float( a_frs1516.prbef1hd ));
      params( 4111 ) := "+"( Float( a_frs1516.prbef2hd ));
      params( 4112 ) := "+"( Float( a_frs1516.prbef3hd ));
      params( 4113 ) := "+"( Float( a_frs1516.prbef1sp ));
      params( 4114 ) := "+"( Float( a_frs1516.prbef2sp ));
      params( 4115 ) := "+"( Float( a_frs1516.prbef3sp ));
      params( 4116 ) := "+"( Integer'Pos( a_frs1516.prdoc1hd ));
      params( 4117 ) := "+"( Integer'Pos( a_frs1516.prdoc2hd ));
      params( 4118 ) := "+"( Integer'Pos( a_frs1516.prdoc3hd ));
      params( 4119 ) := "+"( Integer'Pos( a_frs1516.prdoc1sp ));
      params( 4120 ) := "+"( Integer'Pos( a_frs1516.prdoc2sp ));
      params( 4121 ) := "+"( Integer'Pos( a_frs1516.prdoc3sp ));
      params( 4122 ) := "+"( Float( a_frs1516.sepro1hd ));
      params( 4123 ) := "+"( Float( a_frs1516.sepro2hd ));
      params( 4124 ) := "+"( Float( a_frs1516.sepro3hd ));
      params( 4125 ) := "+"( Float( a_frs1516.sepro1sp ));
      params( 4126 ) := "+"( Float( a_frs1516.sepro2sp ));
      params( 4127 ) := "+"( Float( a_frs1516.sepro3sp ));
      params( 4128 ) := "+"( Integer'Pos( a_frs1516.prolo1hd ));
      params( 4129 ) := "+"( Integer'Pos( a_frs1516.prolo2hd ));
      params( 4130 ) := "+"( Integer'Pos( a_frs1516.prolo3hd ));
      params( 4131 ) := "+"( Integer'Pos( a_frs1516.prolo1sp ));
      params( 4132 ) := "+"( Integer'Pos( a_frs1516.prolo2sp ));
      params( 4133 ) := "+"( Integer'Pos( a_frs1516.prolo3sp ));
      params( 4134 ) := "+"( Integer'Pos( a_frs1516.profn1hd ));
      params( 4135 ) := "+"( Integer'Pos( a_frs1516.profn2hd ));
      params( 4136 ) := "+"( Integer'Pos( a_frs1516.profn3hd ));
      params( 4137 ) := "+"( Integer'Pos( a_frs1516.profn1sp ));
      params( 4138 ) := "+"( Integer'Pos( a_frs1516.profn2sp ));
      params( 4139 ) := "+"( Integer'Pos( a_frs1516.profn3sp ));
      params( 4140 ) := "+"( Integer'Pos( a_frs1516.protx1hd ));
      params( 4141 ) := "+"( Integer'Pos( a_frs1516.protx2hd ));
      params( 4142 ) := "+"( Integer'Pos( a_frs1516.protx3hd ));
      params( 4143 ) := "+"( Integer'Pos( a_frs1516.protx1sp ));
      params( 4144 ) := "+"( Integer'Pos( a_frs1516.protx2sp ));
      params( 4145 ) := "+"( Integer'Pos( a_frs1516.protx3sp ));
      params( 4146 ) := "+"( Integer'Pos( a_frs1516.rspvr1hd ));
      params( 4147 ) := "+"( Integer'Pos( a_frs1516.rspvr2hd ));
      params( 4148 ) := "+"( Integer'Pos( a_frs1516.rspvr3hd ));
      params( 4149 ) := "+"( Integer'Pos( a_frs1516.rspvr1sp ));
      params( 4150 ) := "+"( Integer'Pos( a_frs1516.rspvr2sp ));
      params( 4151 ) := "+"( Integer'Pos( a_frs1516.rspvr3sp ));
      params( 4152 ) := "+"( Integer'Pos( a_frs1516.apamt1hd ));
      params( 4153 ) := "+"( Integer'Pos( a_frs1516.apamt2hd ));
      params( 4154 ) := "+"( Integer'Pos( a_frs1516.apamt3hd ));
      params( 4155 ) := "+"( Integer'Pos( a_frs1516.apamt1sp ));
      params( 4156 ) := "+"( Integer'Pos( a_frs1516.apamt2sp ));
      params( 4157 ) := "+"( Integer'Pos( a_frs1516.apamt3sp ));
      params( 4158 ) := "+"( Integer'Pos( a_frs1516.sebeg1hd ));
      params( 4159 ) := "+"( Integer'Pos( a_frs1516.sebeg2hd ));
      params( 4160 ) := "+"( Integer'Pos( a_frs1516.sebeg3hd ));
      params( 4161 ) := "+"( Integer'Pos( a_frs1516.sebeg1sp ));
      params( 4162 ) := "+"( Integer'Pos( a_frs1516.sebeg2sp ));
      params( 4163 ) := "+"( Integer'Pos( a_frs1516.sebeg3sp ));
      params( 4164 ) := "+"( Integer'Pos( a_frs1516.seend1hd ));
      params( 4165 ) := "+"( Integer'Pos( a_frs1516.seend2hd ));
      params( 4166 ) := "+"( Integer'Pos( a_frs1516.seend3hd ));
      params( 4167 ) := "+"( Integer'Pos( a_frs1516.seend1sp ));
      params( 4168 ) := "+"( Integer'Pos( a_frs1516.seend2sp ));
      params( 4169 ) := "+"( Integer'Pos( a_frs1516.seend3sp ));
      params( 4170 ) := "+"( Integer'Pos( a_frs1516.sectr1hd ));
      params( 4171 ) := "+"( Integer'Pos( a_frs1516.sectr2hd ));
      params( 4172 ) := "+"( Integer'Pos( a_frs1516.sectr3hd ));
      params( 4173 ) := "+"( Integer'Pos( a_frs1516.sectr1sp ));
      params( 4174 ) := "+"( Integer'Pos( a_frs1516.sectr2sp ));
      params( 4175 ) := "+"( Integer'Pos( a_frs1516.sectr3sp ));
      params( 4176 ) := "+"( Integer'Pos( a_frs1516.sectt1hd ));
      params( 4177 ) := "+"( Integer'Pos( a_frs1516.sectt2hd ));
      params( 4178 ) := "+"( Integer'Pos( a_frs1516.sectt3hd ));
      params( 4179 ) := "+"( Integer'Pos( a_frs1516.sectt1sp ));
      params( 4180 ) := "+"( Integer'Pos( a_frs1516.sectt2sp ));
      params( 4181 ) := "+"( Integer'Pos( a_frs1516.sectt3sp ));
      params( 4182 ) := "+"( Integer'Pos( a_frs1516.sefin1hd ));
      params( 4183 ) := "+"( Integer'Pos( a_frs1516.sefin2hd ));
      params( 4184 ) := "+"( Integer'Pos( a_frs1516.sefin3hd ));
      params( 4185 ) := "+"( Integer'Pos( a_frs1516.sefin1sp ));
      params( 4186 ) := "+"( Integer'Pos( a_frs1516.sefin2sp ));
      params( 4187 ) := "+"( Integer'Pos( a_frs1516.sefin3sp ));
      params( 4188 ) := "+"( Float( a_frs1516.secam1hd ));
      params( 4189 ) := "+"( Float( a_frs1516.secam2hd ));
      params( 4190 ) := "+"( Float( a_frs1516.secam3hd ));
      params( 4191 ) := "+"( Float( a_frs1516.secam1sp ));
      params( 4192 ) := "+"( Float( a_frs1516.secam2sp ));
      params( 4193 ) := "+"( Float( a_frs1516.secam3sp ));
      params( 4194 ) := "+"( Integer'Pos( a_frs1516.seciw1hd ));
      params( 4195 ) := "+"( Integer'Pos( a_frs1516.seciw2hd ));
      params( 4196 ) := "+"( Integer'Pos( a_frs1516.seciw3hd ));
      params( 4197 ) := "+"( Integer'Pos( a_frs1516.seciw1sp ));
      params( 4198 ) := "+"( Integer'Pos( a_frs1516.seciw2sp ));
      params( 4199 ) := "+"( Integer'Pos( a_frs1516.seciw3sp ));
      params( 4200 ) := "+"( Integer'Pos( a_frs1516.sewks1hd ));
      params( 4201 ) := "+"( Integer'Pos( a_frs1516.sewks2hd ));
      params( 4202 ) := "+"( Integer'Pos( a_frs1516.sewks3hd ));
      params( 4203 ) := "+"( Integer'Pos( a_frs1516.sewks1sp ));
      params( 4204 ) := "+"( Integer'Pos( a_frs1516.sewks2sp ));
      params( 4205 ) := "+"( Integer'Pos( a_frs1516.sewks3sp ));
      params( 4206 ) := "+"( Float( a_frs1516.senam1hd ));
      params( 4207 ) := "+"( Float( a_frs1516.senam2hd ));
      params( 4208 ) := "+"( Integer'Pos( a_frs1516.senam3hd ));
      params( 4209 ) := "+"( Float( a_frs1516.senam1sp ));
      params( 4210 ) := "+"( Float( a_frs1516.senam2sp ));
      params( 4211 ) := "+"( Integer'Pos( a_frs1516.senam3sp ));
      params( 4212 ) := "+"( Integer'Pos( a_frs1516.seiin1hd ));
      params( 4213 ) := "+"( Integer'Pos( a_frs1516.seiin2hd ));
      params( 4214 ) := "+"( Integer'Pos( a_frs1516.seiin3hd ));
      params( 4215 ) := "+"( Integer'Pos( a_frs1516.seiin1sp ));
      params( 4216 ) := "+"( Integer'Pos( a_frs1516.seiin2sp ));
      params( 4217 ) := "+"( Integer'Pos( a_frs1516.seiin3sp ));
      params( 4218 ) := "+"( Float( a_frs1516.senil1hd ));
      params( 4219 ) := "+"( Float( a_frs1516.senil2hd ));
      params( 4220 ) := "+"( Integer'Pos( a_frs1516.senil3hd ));
      params( 4221 ) := "+"( Float( a_frs1516.senil1sp ));
      params( 4222 ) := "+"( Float( a_frs1516.senil2sp ));
      params( 4223 ) := "+"( Integer'Pos( a_frs1516.senil3sp ));
      params( 4224 ) := "+"( Float( a_frs1516.senir1hd ));
      params( 4225 ) := "+"( Float( a_frs1516.senir2hd ));
      params( 4226 ) := "+"( Float( a_frs1516.senir3hd ));
      params( 4227 ) := "+"( Float( a_frs1516.senir1sp ));
      params( 4228 ) := "+"( Float( a_frs1516.senir2sp ));
      params( 4229 ) := "+"( Float( a_frs1516.senir3sp ));
      params( 4230 ) := "+"( Integer'Pos( a_frs1516.psenr1hd ));
      params( 4231 ) := "+"( Integer'Pos( a_frs1516.psenr2hd ));
      params( 4232 ) := "+"( Integer'Pos( a_frs1516.psenr3hd ));
      params( 4233 ) := "+"( Integer'Pos( a_frs1516.psenr1sp ));
      params( 4234 ) := "+"( Integer'Pos( a_frs1516.psenr2sp ));
      params( 4235 ) := "+"( Integer'Pos( a_frs1516.psenr3sp ));
      params( 4236 ) := "+"( Float( a_frs1516.setax1hd ));
      params( 4237 ) := "+"( Float( a_frs1516.setax2hd ));
      params( 4238 ) := "+"( Float( a_frs1516.setax3hd ));
      params( 4239 ) := "+"( Float( a_frs1516.setax1sp ));
      params( 4240 ) := "+"( Float( a_frs1516.setax2sp ));
      params( 4241 ) := "+"( Float( a_frs1516.setax3sp ));
      params( 4242 ) := "+"( Float( a_frs1516.smpam1hd ));
      params( 4243 ) := "+"( Integer'Pos( a_frs1516.smpam2hd ));
      params( 4244 ) := "+"( Integer'Pos( a_frs1516.smpam3hd ));
      params( 4245 ) := "+"( Float( a_frs1516.smpam1sp ));
      params( 4246 ) := "+"( Float( a_frs1516.smpam2sp ));
      params( 4247 ) := "+"( Integer'Pos( a_frs1516.smpam3sp ));
      params( 4248 ) := "+"( Integer'Pos( a_frs1516.smprt1hd ));
      params( 4249 ) := "+"( Integer'Pos( a_frs1516.smprt2hd ));
      params( 4250 ) := "+"( Integer'Pos( a_frs1516.smprt3hd ));
      params( 4251 ) := "+"( Integer'Pos( a_frs1516.smprt1sp ));
      params( 4252 ) := "+"( Integer'Pos( a_frs1516.smprt2sp ));
      params( 4253 ) := "+"( Integer'Pos( a_frs1516.smprt3sp ));
      params( 4254 ) := "+"( Integer'Pos( a_frs1516.sole1hd ));
      params( 4255 ) := "+"( Integer'Pos( a_frs1516.sole2hd ));
      params( 4256 ) := "+"( Integer'Pos( a_frs1516.sole3hd ));
      params( 4257 ) := "+"( Integer'Pos( a_frs1516.sole1sp ));
      params( 4258 ) := "+"( Integer'Pos( a_frs1516.sole2sp ));
      params( 4259 ) := "+"( Integer'Pos( a_frs1516.sole3sp ));
      params( 4260 ) := "+"( Float( a_frs1516.spamt1hd ));
      params( 4261 ) := "+"( Integer'Pos( a_frs1516.spamt2hd ));
      params( 4262 ) := "+"( Integer'Pos( a_frs1516.spamt3hd ));
      params( 4263 ) := "+"( Float( a_frs1516.spamt1sp ));
      params( 4264 ) := "+"( Integer'Pos( a_frs1516.spamt2sp ));
      params( 4265 ) := "+"( Integer'Pos( a_frs1516.spamt3sp ));
      params( 4266 ) := "+"( Integer'Pos( a_frs1516.sppd1hd ));
      params( 4267 ) := "+"( Integer'Pos( a_frs1516.sppd2hd ));
      params( 4268 ) := "+"( Integer'Pos( a_frs1516.sppd3hd ));
      params( 4269 ) := "+"( Integer'Pos( a_frs1516.sppd1sp ));
      params( 4270 ) := "+"( Integer'Pos( a_frs1516.sppd2sp ));
      params( 4271 ) := "+"( Integer'Pos( a_frs1516.sppd3sp ));
      params( 4272 ) := "+"( Integer'Pos( a_frs1516.spsac1hd ));
      params( 4273 ) := "+"( Integer'Pos( a_frs1516.spsac2hd ));
      params( 4274 ) := "+"( Integer'Pos( a_frs1516.spsac3hd ));
      params( 4275 ) := "+"( Integer'Pos( a_frs1516.spsac1sp ));
      params( 4276 ) := "+"( Integer'Pos( a_frs1516.spsac2sp ));
      params( 4277 ) := "+"( Integer'Pos( a_frs1516.spsac3sp ));
      params( 4278 ) := "+"( Float( a_frs1516.spuam1hd ));
      params( 4279 ) := "+"( Integer'Pos( a_frs1516.spuam2hd ));
      params( 4280 ) := "+"( Integer'Pos( a_frs1516.spuam3hd ));
      params( 4281 ) := "+"( Integer'Pos( a_frs1516.spuam1sp ));
      params( 4282 ) := "+"( Integer'Pos( a_frs1516.spuam2sp ));
      params( 4283 ) := "+"( Integer'Pos( a_frs1516.spuam3sp ));
      params( 4284 ) := "+"( Integer'Pos( a_frs1516.spupd1hd ));
      params( 4285 ) := "+"( Integer'Pos( a_frs1516.spupd2hd ));
      params( 4286 ) := "+"( Integer'Pos( a_frs1516.spupd3hd ));
      params( 4287 ) := "+"( Integer'Pos( a_frs1516.spupd1sp ));
      params( 4288 ) := "+"( Integer'Pos( a_frs1516.spupd2sp ));
      params( 4289 ) := "+"( Integer'Pos( a_frs1516.spupd3sp ));
      params( 4290 ) := "+"( Integer'Pos( a_frs1516.spusu1hd ));
      params( 4291 ) := "+"( Integer'Pos( a_frs1516.spusu2hd ));
      params( 4292 ) := "+"( Integer'Pos( a_frs1516.spusu3hd ));
      params( 4293 ) := "+"( Integer'Pos( a_frs1516.spusu1sp ));
      params( 4294 ) := "+"( Integer'Pos( a_frs1516.spusu2sp ));
      params( 4295 ) := "+"( Integer'Pos( a_frs1516.spusu3sp ));
      params( 4296 ) := "+"( Float( a_frs1516.ppamt1hd ));
      params( 4297 ) := "+"( Integer'Pos( a_frs1516.ppamt2hd ));
      params( 4298 ) := "+"( Integer'Pos( a_frs1516.ppamt3hd ));
      params( 4299 ) := "+"( Float( a_frs1516.ppamt1sp ));
      params( 4300 ) := "+"( Integer'Pos( a_frs1516.ppamt2sp ));
      params( 4301 ) := "+"( Integer'Pos( a_frs1516.ppamt3sp ));
      params( 4302 ) := "+"( Float( a_frs1516.sspam1hd ));
      params( 4303 ) := "+"( Float( a_frs1516.sspam2hd ));
      params( 4304 ) := "+"( Integer'Pos( a_frs1516.sspam3hd ));
      params( 4305 ) := "+"( Float( a_frs1516.sspam1sp ));
      params( 4306 ) := "+"( Integer'Pos( a_frs1516.sspam2sp ));
      params( 4307 ) := "+"( Integer'Pos( a_frs1516.sspam3sp ));
      params( 4308 ) := "+"( Integer'Pos( a_frs1516.spsmp1hd ));
      params( 4309 ) := "+"( Integer'Pos( a_frs1516.spsmp2hd ));
      params( 4310 ) := "+"( Integer'Pos( a_frs1516.spsmp3hd ));
      params( 4311 ) := "+"( Integer'Pos( a_frs1516.spsmp1sp ));
      params( 4312 ) := "+"( Integer'Pos( a_frs1516.spsmp2sp ));
      params( 4313 ) := "+"( Integer'Pos( a_frs1516.spsmp3sp ));
      params( 4314 ) := "+"( Float( a_frs1516.taxam1hd ));
      params( 4315 ) := "+"( Float( a_frs1516.taxam2hd ));
      params( 4316 ) := "+"( Integer'Pos( a_frs1516.taxam3hd ));
      params( 4317 ) := "+"( Float( a_frs1516.taxam1sp ));
      params( 4318 ) := "+"( Integer'Pos( a_frs1516.taxam2sp ));
      params( 4319 ) := "+"( Integer'Pos( a_frs1516.taxam3sp ));
      params( 4320 ) := "+"( Float( a_frs1516.taxda1hd ));
      params( 4321 ) := "+"( Float( a_frs1516.taxda2hd ));
      params( 4322 ) := "+"( Float( a_frs1516.taxda3hd ));
      params( 4323 ) := "+"( Float( a_frs1516.taxda1sp ));
      params( 4324 ) := "+"( Float( a_frs1516.taxda2sp ));
      params( 4325 ) := "+"( Integer'Pos( a_frs1516.taxda3sp ));
      params( 4326 ) := "+"( Integer'Pos( a_frs1516.taxpd1hd ));
      params( 4327 ) := "+"( Integer'Pos( a_frs1516.taxpd2hd ));
      params( 4328 ) := "+"( Integer'Pos( a_frs1516.taxpd3hd ));
      params( 4329 ) := "+"( Integer'Pos( a_frs1516.taxpd1sp ));
      params( 4330 ) := "+"( Integer'Pos( a_frs1516.taxpd2sp ));
      params( 4331 ) := "+"( Integer'Pos( a_frs1516.taxpd3sp ));
      params( 4332 ) := "+"( Float( a_frs1516.to1hr1hd ));
      params( 4333 ) := "+"( Float( a_frs1516.to1hr2hd ));
      params( 4334 ) := "+"( Float( a_frs1516.to1hr3hd ));
      params( 4335 ) := "+"( Float( a_frs1516.to1hr1sp ));
      params( 4336 ) := "+"( Float( a_frs1516.to1hr2sp ));
      params( 4337 ) := "+"( Integer'Pos( a_frs1516.to1hr3sp ));
      params( 4338 ) := "+"( Float( a_frs1516.boinu1hd ));
      params( 4339 ) := "+"( Integer'Pos( a_frs1516.boinu2hd ));
      params( 4340 ) := "+"( Integer'Pos( a_frs1516.boinu3hd ));
      params( 4341 ) := "+"( Float( a_frs1516.boinu1sp ));
      params( 4342 ) := "+"( Integer'Pos( a_frs1516.boinu2sp ));
      params( 4343 ) := "+"( Integer'Pos( a_frs1516.boinu3sp ));
      params( 4344 ) := "+"( Integer'Pos( a_frs1516.uincb1hd ));
      params( 4345 ) := "+"( Integer'Pos( a_frs1516.uincb2hd ));
      params( 4346 ) := "+"( Integer'Pos( a_frs1516.uincb3hd ));
      params( 4347 ) := "+"( Integer'Pos( a_frs1516.uincb1sp ));
      params( 4348 ) := "+"( Integer'Pos( a_frs1516.uincb2sp ));
      params( 4349 ) := "+"( Integer'Pos( a_frs1516.uincb3sp ));
      params( 4350 ) := "+"( Float( a_frs1516.uded11hd ));
      params( 4351 ) := "+"( Integer'Pos( a_frs1516.uded12hd ));
      params( 4352 ) := "+"( Integer'Pos( a_frs1516.uded13hd ));
      params( 4353 ) := "+"( Float( a_frs1516.uded11sp ));
      params( 4354 ) := "+"( Integer'Pos( a_frs1516.uded12sp ));
      params( 4355 ) := "+"( Integer'Pos( a_frs1516.uded13sp ));
      params( 4356 ) := "+"( Integer'Pos( a_frs1516.uded21hd ));
      params( 4357 ) := "+"( Integer'Pos( a_frs1516.uded22hd ));
      params( 4358 ) := "+"( Integer'Pos( a_frs1516.uded23hd ));
      params( 4359 ) := "+"( Integer'Pos( a_frs1516.uded21sp ));
      params( 4360 ) := "+"( Integer'Pos( a_frs1516.uded22sp ));
      params( 4361 ) := "+"( Integer'Pos( a_frs1516.uded23sp ));
      params( 4362 ) := "+"( Float( a_frs1516.uded31hd ));
      params( 4363 ) := "+"( Integer'Pos( a_frs1516.uded32hd ));
      params( 4364 ) := "+"( Integer'Pos( a_frs1516.uded33hd ));
      params( 4365 ) := "+"( Integer'Pos( a_frs1516.uded31sp ));
      params( 4366 ) := "+"( Integer'Pos( a_frs1516.uded32sp ));
      params( 4367 ) := "+"( Integer'Pos( a_frs1516.uded33sp ));
      params( 4368 ) := "+"( Integer'Pos( a_frs1516.uded41hd ));
      params( 4369 ) := "+"( Integer'Pos( a_frs1516.uded42hd ));
      params( 4370 ) := "+"( Integer'Pos( a_frs1516.uded43hd ));
      params( 4371 ) := "+"( Integer'Pos( a_frs1516.uded41sp ));
      params( 4372 ) := "+"( Integer'Pos( a_frs1516.uded42sp ));
      params( 4373 ) := "+"( Integer'Pos( a_frs1516.uded43sp ));
      params( 4374 ) := "+"( Float( a_frs1516.uded51hd ));
      params( 4375 ) := "+"( Integer'Pos( a_frs1516.uded52hd ));
      params( 4376 ) := "+"( Integer'Pos( a_frs1516.uded53hd ));
      params( 4377 ) := "+"( Float( a_frs1516.uded51sp ));
      params( 4378 ) := "+"( Integer'Pos( a_frs1516.uded52sp ));
      params( 4379 ) := "+"( Integer'Pos( a_frs1516.uded53sp ));
      params( 4380 ) := "+"( Integer'Pos( a_frs1516.uded61hd ));
      params( 4381 ) := "+"( Integer'Pos( a_frs1516.uded62hd ));
      params( 4382 ) := "+"( Integer'Pos( a_frs1516.uded63hd ));
      params( 4383 ) := "+"( Integer'Pos( a_frs1516.uded61sp ));
      params( 4384 ) := "+"( Integer'Pos( a_frs1516.uded62sp ));
      params( 4385 ) := "+"( Integer'Pos( a_frs1516.uded63sp ));
      params( 4386 ) := "+"( Integer'Pos( a_frs1516.uded71hd ));
      params( 4387 ) := "+"( Integer'Pos( a_frs1516.uded72hd ));
      params( 4388 ) := "+"( Integer'Pos( a_frs1516.uded73hd ));
      params( 4389 ) := "+"( Integer'Pos( a_frs1516.uded71sp ));
      params( 4390 ) := "+"( Integer'Pos( a_frs1516.uded72sp ));
      params( 4391 ) := "+"( Integer'Pos( a_frs1516.uded73sp ));
      params( 4392 ) := "+"( Integer'Pos( a_frs1516.uded81hd ));
      params( 4393 ) := "+"( Integer'Pos( a_frs1516.uded82hd ));
      params( 4394 ) := "+"( Integer'Pos( a_frs1516.uded83hd ));
      params( 4395 ) := "+"( Integer'Pos( a_frs1516.uded81sp ));
      params( 4396 ) := "+"( Integer'Pos( a_frs1516.uded82sp ));
      params( 4397 ) := "+"( Integer'Pos( a_frs1516.uded83sp ));
      params( 4398 ) := "+"( Float( a_frs1516.uded91hd ));
      params( 4399 ) := "+"( Integer'Pos( a_frs1516.uded92hd ));
      params( 4400 ) := "+"( Integer'Pos( a_frs1516.uded93hd ));
      params( 4401 ) := "+"( Integer'Pos( a_frs1516.uded91sp ));
      params( 4402 ) := "+"( Integer'Pos( a_frs1516.uded92sp ));
      params( 4403 ) := "+"( Integer'Pos( a_frs1516.uded93sp ));
      params( 4404 ) := "+"( Float( a_frs1516.ugros1hd ));
      params( 4405 ) := "+"( Float( a_frs1516.ugros2hd ));
      params( 4406 ) := "+"( Integer'Pos( a_frs1516.ugros3hd ));
      params( 4407 ) := "+"( Float( a_frs1516.ugros1sp ));
      params( 4408 ) := "+"( Float( a_frs1516.ugros2sp ));
      params( 4409 ) := "+"( Integer'Pos( a_frs1516.ugros3sp ));
      params( 4410 ) := "+"( aliased_ugrsp1hd'Access );
      params( 4411 ) := "+"( Float( a_frs1516.ugrsp2hd ));
      params( 4412 ) := "+"( Float( a_frs1516.ugrsp3hd ));
      params( 4413 ) := "+"( Float( a_frs1516.ugrsp1sp ));
      params( 4414 ) := "+"( Float( a_frs1516.ugrsp2sp ));
      params( 4415 ) := "+"( Float( a_frs1516.ugrsp3sp ));
      params( 4416 ) := "+"( Integer'Pos( a_frs1516.uinc11hd ));
      params( 4417 ) := "+"( Integer'Pos( a_frs1516.uinc12hd ));
      params( 4418 ) := "+"( Integer'Pos( a_frs1516.uinc13hd ));
      params( 4419 ) := "+"( Integer'Pos( a_frs1516.uinc11sp ));
      params( 4420 ) := "+"( Integer'Pos( a_frs1516.uinc12sp ));
      params( 4421 ) := "+"( Integer'Pos( a_frs1516.uinc13sp ));
      params( 4422 ) := "+"( Integer'Pos( a_frs1516.uinc21hd ));
      params( 4423 ) := "+"( Integer'Pos( a_frs1516.uinc22hd ));
      params( 4424 ) := "+"( Integer'Pos( a_frs1516.uinc23hd ));
      params( 4425 ) := "+"( Integer'Pos( a_frs1516.uinc21sp ));
      params( 4426 ) := "+"( Integer'Pos( a_frs1516.uinc22sp ));
      params( 4427 ) := "+"( Integer'Pos( a_frs1516.uinc23sp ));
      params( 4428 ) := "+"( Integer'Pos( a_frs1516.uinc31hd ));
      params( 4429 ) := "+"( Integer'Pos( a_frs1516.uinc32hd ));
      params( 4430 ) := "+"( Integer'Pos( a_frs1516.uinc33hd ));
      params( 4431 ) := "+"( Integer'Pos( a_frs1516.uinc31sp ));
      params( 4432 ) := "+"( Integer'Pos( a_frs1516.uinc32sp ));
      params( 4433 ) := "+"( Integer'Pos( a_frs1516.uinc33sp ));
      params( 4434 ) := "+"( Integer'Pos( a_frs1516.uinc41hd ));
      params( 4435 ) := "+"( Integer'Pos( a_frs1516.uinc42hd ));
      params( 4436 ) := "+"( Integer'Pos( a_frs1516.uinc43hd ));
      params( 4437 ) := "+"( Integer'Pos( a_frs1516.uinc41sp ));
      params( 4438 ) := "+"( Integer'Pos( a_frs1516.uinc42sp ));
      params( 4439 ) := "+"( Integer'Pos( a_frs1516.uinc43sp ));
      params( 4440 ) := "+"( Integer'Pos( a_frs1516.uinc51hd ));
      params( 4441 ) := "+"( Integer'Pos( a_frs1516.uinc52hd ));
      params( 4442 ) := "+"( Integer'Pos( a_frs1516.uinc53hd ));
      params( 4443 ) := "+"( Integer'Pos( a_frs1516.uinc51sp ));
      params( 4444 ) := "+"( Integer'Pos( a_frs1516.uinc52sp ));
      params( 4445 ) := "+"( Integer'Pos( a_frs1516.uinc53sp ));
      params( 4446 ) := "+"( Integer'Pos( a_frs1516.uinc61hd ));
      params( 4447 ) := "+"( Integer'Pos( a_frs1516.uinc62hd ));
      params( 4448 ) := "+"( Integer'Pos( a_frs1516.uinc63hd ));
      params( 4449 ) := "+"( Integer'Pos( a_frs1516.uinc61sp ));
      params( 4450 ) := "+"( Integer'Pos( a_frs1516.uinc62sp ));
      params( 4451 ) := "+"( Integer'Pos( a_frs1516.uinc63sp ));
      params( 4452 ) := "+"( Integer'Pos( a_frs1516.uinc71hd ));
      params( 4453 ) := "+"( Integer'Pos( a_frs1516.uinc72hd ));
      params( 4454 ) := "+"( Integer'Pos( a_frs1516.uinc73hd ));
      params( 4455 ) := "+"( Integer'Pos( a_frs1516.uinc71sp ));
      params( 4456 ) := "+"( Integer'Pos( a_frs1516.uinc72sp ));
      params( 4457 ) := "+"( Integer'Pos( a_frs1516.uinc73sp ));
      params( 4458 ) := "+"( Float( a_frs1516.umile1hd ));
      params( 4459 ) := "+"( Integer'Pos( a_frs1516.umile2hd ));
      params( 4460 ) := "+"( Integer'Pos( a_frs1516.umile3hd ));
      params( 4461 ) := "+"( Float( a_frs1516.umile1sp ));
      params( 4462 ) := "+"( Integer'Pos( a_frs1516.umile2sp ));
      params( 4463 ) := "+"( Integer'Pos( a_frs1516.umile3sp ));
      params( 4464 ) := "+"( Float( a_frs1516.umot1hd ));
      params( 4465 ) := "+"( Integer'Pos( a_frs1516.umot2hd ));
      params( 4466 ) := "+"( Integer'Pos( a_frs1516.umot3hd ));
      params( 4467 ) := "+"( Float( a_frs1516.umot1sp ));
      params( 4468 ) := "+"( Integer'Pos( a_frs1516.umot2sp ));
      params( 4469 ) := "+"( Integer'Pos( a_frs1516.umot3sp ));
      params( 4470 ) := "+"( Float( a_frs1516.unett1hd ));
      params( 4471 ) := "+"( Float( a_frs1516.unett2hd ));
      params( 4472 ) := "+"( Integer'Pos( a_frs1516.unett3hd ));
      params( 4473 ) := "+"( Float( a_frs1516.unett1sp ));
      params( 4474 ) := "+"( Float( a_frs1516.unett2sp ));
      params( 4475 ) := "+"( Integer'Pos( a_frs1516.unett3sp ));
      params( 4476 ) := "+"( Integer'Pos( a_frs1516.uoth11hd ));
      params( 4477 ) := "+"( Integer'Pos( a_frs1516.uoth12hd ));
      params( 4478 ) := "+"( Integer'Pos( a_frs1516.uoth13hd ));
      params( 4479 ) := "+"( Integer'Pos( a_frs1516.uoth11sp ));
      params( 4480 ) := "+"( Integer'Pos( a_frs1516.uoth12sp ));
      params( 4481 ) := "+"( Integer'Pos( a_frs1516.uoth13sp ));
      params( 4482 ) := "+"( Integer'Pos( a_frs1516.uoth21hd ));
      params( 4483 ) := "+"( Integer'Pos( a_frs1516.uoth22hd ));
      params( 4484 ) := "+"( Integer'Pos( a_frs1516.uoth23hd ));
      params( 4485 ) := "+"( Integer'Pos( a_frs1516.uoth21sp ));
      params( 4486 ) := "+"( Integer'Pos( a_frs1516.uoth22sp ));
      params( 4487 ) := "+"( Integer'Pos( a_frs1516.uoth23sp ));
      params( 4488 ) := "+"( Integer'Pos( a_frs1516.uoth31hd ));
      params( 4489 ) := "+"( Integer'Pos( a_frs1516.uoth32hd ));
      params( 4490 ) := "+"( Integer'Pos( a_frs1516.uoth33hd ));
      params( 4491 ) := "+"( Integer'Pos( a_frs1516.uoth31sp ));
      params( 4492 ) := "+"( Integer'Pos( a_frs1516.uoth32sp ));
      params( 4493 ) := "+"( Integer'Pos( a_frs1516.uoth33sp ));
      params( 4494 ) := "+"( Integer'Pos( a_frs1516.uoth41hd ));
      params( 4495 ) := "+"( Integer'Pos( a_frs1516.uoth42hd ));
      params( 4496 ) := "+"( Integer'Pos( a_frs1516.uoth43hd ));
      params( 4497 ) := "+"( Integer'Pos( a_frs1516.uoth41sp ));
      params( 4498 ) := "+"( Integer'Pos( a_frs1516.uoth42sp ));
      params( 4499 ) := "+"( Integer'Pos( a_frs1516.uoth43sp ));
      params( 4500 ) := "+"( Integer'Pos( a_frs1516.uoth51hd ));
      params( 4501 ) := "+"( Integer'Pos( a_frs1516.uoth52hd ));
      params( 4502 ) := "+"( Integer'Pos( a_frs1516.uoth53hd ));
      params( 4503 ) := "+"( Integer'Pos( a_frs1516.uoth51sp ));
      params( 4504 ) := "+"( Integer'Pos( a_frs1516.uoth52sp ));
      params( 4505 ) := "+"( Integer'Pos( a_frs1516.uoth53sp ));
      params( 4506 ) := "+"( Integer'Pos( a_frs1516.uoth61hd ));
      params( 4507 ) := "+"( Integer'Pos( a_frs1516.uoth62hd ));
      params( 4508 ) := "+"( Integer'Pos( a_frs1516.uoth63hd ));
      params( 4509 ) := "+"( Integer'Pos( a_frs1516.uoth61sp ));
      params( 4510 ) := "+"( Integer'Pos( a_frs1516.uoth62sp ));
      params( 4511 ) := "+"( Integer'Pos( a_frs1516.uoth63sp ));
      params( 4512 ) := "+"( Integer'Pos( a_frs1516.uoth71hd ));
      params( 4513 ) := "+"( Integer'Pos( a_frs1516.uoth72hd ));
      params( 4514 ) := "+"( Integer'Pos( a_frs1516.uoth73hd ));
      params( 4515 ) := "+"( Integer'Pos( a_frs1516.uoth71sp ));
      params( 4516 ) := "+"( Integer'Pos( a_frs1516.uoth72sp ));
      params( 4517 ) := "+"( Integer'Pos( a_frs1516.uoth73sp ));
      params( 4518 ) := "+"( Integer'Pos( a_frs1516.uoth81hd ));
      params( 4519 ) := "+"( Integer'Pos( a_frs1516.uoth82hd ));
      params( 4520 ) := "+"( Integer'Pos( a_frs1516.uoth83hd ));
      params( 4521 ) := "+"( Integer'Pos( a_frs1516.uoth81sp ));
      params( 4522 ) := "+"( Integer'Pos( a_frs1516.uoth82sp ));
      params( 4523 ) := "+"( Integer'Pos( a_frs1516.uoth83sp ));
      params( 4524 ) := "+"( Integer'Pos( a_frs1516.uoth91hd ));
      params( 4525 ) := "+"( Integer'Pos( a_frs1516.uoth92hd ));
      params( 4526 ) := "+"( Integer'Pos( a_frs1516.uoth93hd ));
      params( 4527 ) := "+"( Integer'Pos( a_frs1516.uoth91sp ));
      params( 4528 ) := "+"( Integer'Pos( a_frs1516.uoth92sp ));
      params( 4529 ) := "+"( Integer'Pos( a_frs1516.uoth93sp ));
      params( 4530 ) := "+"( Integer'Pos( a_frs1516.uot101hd ));
      params( 4531 ) := "+"( Integer'Pos( a_frs1516.uot102hd ));
      params( 4532 ) := "+"( Integer'Pos( a_frs1516.uot103hd ));
      params( 4533 ) := "+"( Integer'Pos( a_frs1516.uot101sp ));
      params( 4534 ) := "+"( Integer'Pos( a_frs1516.uot102sp ));
      params( 4535 ) := "+"( Integer'Pos( a_frs1516.uot103sp ));
      params( 4536 ) := "+"( Float( a_frs1516.uotht1hd ));
      params( 4537 ) := "+"( Integer'Pos( a_frs1516.uotht2hd ));
      params( 4538 ) := "+"( Integer'Pos( a_frs1516.uotht3hd ));
      params( 4539 ) := "+"( Integer'Pos( a_frs1516.uotht1sp ));
      params( 4540 ) := "+"( Integer'Pos( a_frs1516.uotht2sp ));
      params( 4541 ) := "+"( Integer'Pos( a_frs1516.uotht3sp ));
      params( 4542 ) := "+"( Float( a_frs1516.uothr1hd ));
      params( 4543 ) := "+"( Float( a_frs1516.uothr2hd ));
      params( 4544 ) := "+"( Integer'Pos( a_frs1516.uothr3hd ));
      params( 4545 ) := "+"( Float( a_frs1516.uothr1sp ));
      params( 4546 ) := "+"( Float( a_frs1516.uothr2sp ));
      params( 4547 ) := "+"( Integer'Pos( a_frs1516.uothr3sp ));
      params( 4548 ) := "+"( Integer'Pos( a_frs1516.upay1hd ));
      params( 4549 ) := "+"( Integer'Pos( a_frs1516.upay2hd ));
      params( 4550 ) := "+"( Integer'Pos( a_frs1516.upay3hd ));
      params( 4551 ) := "+"( Integer'Pos( a_frs1516.upay1sp ));
      params( 4552 ) := "+"( Integer'Pos( a_frs1516.upay2sp ));
      params( 4553 ) := "+"( Integer'Pos( a_frs1516.upay3sp ));
      params( 4554 ) := "+"( Integer'Pos( a_frs1516.usapa1hd ));
      params( 4555 ) := "+"( Integer'Pos( a_frs1516.usapa2hd ));
      params( 4556 ) := "+"( Integer'Pos( a_frs1516.usapa3hd ));
      params( 4557 ) := "+"( Integer'Pos( a_frs1516.usapa1sp ));
      params( 4558 ) := "+"( Integer'Pos( a_frs1516.usapa2sp ));
      params( 4559 ) := "+"( Integer'Pos( a_frs1516.usapa3sp ));
      params( 4560 ) := "+"( Float( a_frs1516.uspam1hd ));
      params( 4561 ) := "+"( Integer'Pos( a_frs1516.uspam2hd ));
      params( 4562 ) := "+"( Integer'Pos( a_frs1516.uspam3hd ));
      params( 4563 ) := "+"( Float( a_frs1516.uspam1sp ));
      params( 4564 ) := "+"( Integer'Pos( a_frs1516.uspam2sp ));
      params( 4565 ) := "+"( Integer'Pos( a_frs1516.uspam3sp ));
      params( 4566 ) := "+"( Integer'Pos( a_frs1516.uspra1hd ));
      params( 4567 ) := "+"( Integer'Pos( a_frs1516.uspra2hd ));
      params( 4568 ) := "+"( Integer'Pos( a_frs1516.uspra3hd ));
      params( 4569 ) := "+"( Integer'Pos( a_frs1516.uspra1sp ));
      params( 4570 ) := "+"( Integer'Pos( a_frs1516.uspra2sp ));
      params( 4571 ) := "+"( Integer'Pos( a_frs1516.uspra3sp ));
      params( 4572 ) := "+"( Integer'Pos( a_frs1516.uppam1hd ));
      params( 4573 ) := "+"( Integer'Pos( a_frs1516.uppam2hd ));
      params( 4574 ) := "+"( Integer'Pos( a_frs1516.uppam3hd ));
      params( 4575 ) := "+"( Integer'Pos( a_frs1516.uppam1sp ));
      params( 4576 ) := "+"( Integer'Pos( a_frs1516.uppam2sp ));
      params( 4577 ) := "+"( Integer'Pos( a_frs1516.uppam3sp ));
      params( 4578 ) := "+"( Float( a_frs1516.usspa1hd ));
      params( 4579 ) := "+"( Integer'Pos( a_frs1516.usspa2hd ));
      params( 4580 ) := "+"( Integer'Pos( a_frs1516.usspa3hd ));
      params( 4581 ) := "+"( Integer'Pos( a_frs1516.usspa1sp ));
      params( 4582 ) := "+"( Integer'Pos( a_frs1516.usspa2sp ));
      params( 4583 ) := "+"( Integer'Pos( a_frs1516.usspa3sp ));
      params( 4584 ) := "+"( Float( a_frs1516.to2hr1hd ));
      params( 4585 ) := "+"( Float( a_frs1516.to2hr2hd ));
      params( 4586 ) := "+"( Integer'Pos( a_frs1516.to2hr3hd ));
      params( 4587 ) := "+"( Float( a_frs1516.to2hr1sp ));
      params( 4588 ) := "+"( Float( a_frs1516.to2hr2sp ));
      params( 4589 ) := "+"( Integer'Pos( a_frs1516.to2hr3sp ));
      params( 4590 ) := "+"( Float( a_frs1516.utaxa1hd ));
      params( 4591 ) := "+"( Integer'Pos( a_frs1516.utaxa2hd ));
      params( 4592 ) := "+"( Integer'Pos( a_frs1516.utaxa3hd ));
      params( 4593 ) := "+"( Float( a_frs1516.utaxa1sp ));
      params( 4594 ) := "+"( Integer'Pos( a_frs1516.utaxa2sp ));
      params( 4595 ) := "+"( Integer'Pos( a_frs1516.utaxa3sp ));
      params( 4596 ) := "+"( Float( a_frs1516.vcamt1hd ));
      params( 4597 ) := "+"( Integer'Pos( a_frs1516.vcamt2hd ));
      params( 4598 ) := "+"( Integer'Pos( a_frs1516.vcamt3hd ));
      params( 4599 ) := "+"( Float( a_frs1516.vcamt1sp ));
      params( 4600 ) := "+"( Integer'Pos( a_frs1516.vcamt2sp ));
      params( 4601 ) := "+"( Integer'Pos( a_frs1516.vcamt3sp ));
      params( 4602 ) := "+"( Integer'Pos( a_frs1516.vcpd1hd ));
      params( 4603 ) := "+"( Integer'Pos( a_frs1516.vcpd2hd ));
      params( 4604 ) := "+"( Integer'Pos( a_frs1516.vcpd3hd ));
      params( 4605 ) := "+"( Integer'Pos( a_frs1516.vcpd1sp ));
      params( 4606 ) := "+"( Integer'Pos( a_frs1516.vcpd2sp ));
      params( 4607 ) := "+"( Integer'Pos( a_frs1516.vcpd3sp ));
      params( 4608 ) := "+"( Integer'Pos( a_frs1516.vcsac1hd ));
      params( 4609 ) := "+"( Integer'Pos( a_frs1516.vcsac2hd ));
      params( 4610 ) := "+"( Integer'Pos( a_frs1516.vcsac3hd ));
      params( 4611 ) := "+"( Integer'Pos( a_frs1516.vcsac1sp ));
      params( 4612 ) := "+"( Integer'Pos( a_frs1516.vcsac2sp ));
      params( 4613 ) := "+"( Integer'Pos( a_frs1516.vcsac3sp ));
      params( 4614 ) := "+"( Integer'Pos( a_frs1516.vcuam1hd ));
      params( 4615 ) := "+"( Integer'Pos( a_frs1516.vcuam2hd ));
      params( 4616 ) := "+"( Integer'Pos( a_frs1516.vcuam3hd ));
      params( 4617 ) := "+"( Integer'Pos( a_frs1516.vcuam1sp ));
      params( 4618 ) := "+"( Integer'Pos( a_frs1516.vcuam2sp ));
      params( 4619 ) := "+"( Integer'Pos( a_frs1516.vcuam3sp ));
      params( 4620 ) := "+"( Integer'Pos( a_frs1516.vcupd1hd ));
      params( 4621 ) := "+"( Integer'Pos( a_frs1516.vcupd2hd ));
      params( 4622 ) := "+"( Integer'Pos( a_frs1516.vcupd3hd ));
      params( 4623 ) := "+"( Integer'Pos( a_frs1516.vcupd1sp ));
      params( 4624 ) := "+"( Integer'Pos( a_frs1516.vcupd2sp ));
      params( 4625 ) := "+"( Integer'Pos( a_frs1516.vcupd3sp ));
      params( 4626 ) := "+"( Integer'Pos( a_frs1516.vcusu1hd ));
      params( 4627 ) := "+"( Integer'Pos( a_frs1516.vcusu2hd ));
      params( 4628 ) := "+"( Integer'Pos( a_frs1516.vcusu3hd ));
      params( 4629 ) := "+"( Integer'Pos( a_frs1516.vcusu1sp ));
      params( 4630 ) := "+"( Integer'Pos( a_frs1516.vcusu2sp ));
      params( 4631 ) := "+"( Integer'Pos( a_frs1516.vcusu3sp ));
      params( 4632 ) := "+"( Integer'Pos( a_frs1516.nou011hd ));
      params( 4633 ) := "+"( Integer'Pos( a_frs1516.nou012hd ));
      params( 4634 ) := "+"( Integer'Pos( a_frs1516.nou013hd ));
      params( 4635 ) := "+"( Integer'Pos( a_frs1516.nou011sp ));
      params( 4636 ) := "+"( Integer'Pos( a_frs1516.nou012sp ));
      params( 4637 ) := "+"( Integer'Pos( a_frs1516.nou013sp ));
      params( 4638 ) := "+"( Integer'Pos( a_frs1516.nou021hd ));
      params( 4639 ) := "+"( Integer'Pos( a_frs1516.nou022hd ));
      params( 4640 ) := "+"( Integer'Pos( a_frs1516.nou023hd ));
      params( 4641 ) := "+"( Integer'Pos( a_frs1516.nou021sp ));
      params( 4642 ) := "+"( Integer'Pos( a_frs1516.nou022sp ));
      params( 4643 ) := "+"( Integer'Pos( a_frs1516.nou023sp ));
      params( 4644 ) := "+"( Integer'Pos( a_frs1516.nou031hd ));
      params( 4645 ) := "+"( Integer'Pos( a_frs1516.nou032hd ));
      params( 4646 ) := "+"( Integer'Pos( a_frs1516.nou033hd ));
      params( 4647 ) := "+"( Integer'Pos( a_frs1516.nou031sp ));
      params( 4648 ) := "+"( Integer'Pos( a_frs1516.nou032sp ));
      params( 4649 ) := "+"( Integer'Pos( a_frs1516.nou033sp ));
      params( 4650 ) := "+"( Integer'Pos( a_frs1516.nou041hd ));
      params( 4651 ) := "+"( Integer'Pos( a_frs1516.nou042hd ));
      params( 4652 ) := "+"( Integer'Pos( a_frs1516.nou043hd ));
      params( 4653 ) := "+"( Integer'Pos( a_frs1516.nou041sp ));
      params( 4654 ) := "+"( Integer'Pos( a_frs1516.nou042sp ));
      params( 4655 ) := "+"( Integer'Pos( a_frs1516.nou043sp ));
      params( 4656 ) := "+"( Integer'Pos( a_frs1516.nou051hd ));
      params( 4657 ) := "+"( Integer'Pos( a_frs1516.nou052hd ));
      params( 4658 ) := "+"( Integer'Pos( a_frs1516.nou053hd ));
      params( 4659 ) := "+"( Integer'Pos( a_frs1516.nou051sp ));
      params( 4660 ) := "+"( Integer'Pos( a_frs1516.nou052sp ));
      params( 4661 ) := "+"( Integer'Pos( a_frs1516.nou053sp ));
      params( 4662 ) := "+"( Integer'Pos( a_frs1516.nou061hd ));
      params( 4663 ) := "+"( Integer'Pos( a_frs1516.nou062hd ));
      params( 4664 ) := "+"( Integer'Pos( a_frs1516.nou063hd ));
      params( 4665 ) := "+"( Integer'Pos( a_frs1516.nou061sp ));
      params( 4666 ) := "+"( Integer'Pos( a_frs1516.nou062sp ));
      params( 4667 ) := "+"( Integer'Pos( a_frs1516.nou063sp ));
      params( 4668 ) := "+"( Integer'Pos( a_frs1516.nou071hd ));
      params( 4669 ) := "+"( Integer'Pos( a_frs1516.nou072hd ));
      params( 4670 ) := "+"( Integer'Pos( a_frs1516.nou073hd ));
      params( 4671 ) := "+"( Integer'Pos( a_frs1516.nou071sp ));
      params( 4672 ) := "+"( Integer'Pos( a_frs1516.nou072sp ));
      params( 4673 ) := "+"( Integer'Pos( a_frs1516.nou073sp ));
      params( 4674 ) := "+"( Integer'Pos( a_frs1516.nou081hd ));
      params( 4675 ) := "+"( Integer'Pos( a_frs1516.nou082hd ));
      params( 4676 ) := "+"( Integer'Pos( a_frs1516.nou083hd ));
      params( 4677 ) := "+"( Integer'Pos( a_frs1516.nou081sp ));
      params( 4678 ) := "+"( Integer'Pos( a_frs1516.nou082sp ));
      params( 4679 ) := "+"( Integer'Pos( a_frs1516.nou083sp ));
      params( 4680 ) := "+"( Integer'Pos( a_frs1516.nou091hd ));
      params( 4681 ) := "+"( Integer'Pos( a_frs1516.nou092hd ));
      params( 4682 ) := "+"( Integer'Pos( a_frs1516.nou093hd ));
      params( 4683 ) := "+"( Integer'Pos( a_frs1516.nou091sp ));
      params( 4684 ) := "+"( Integer'Pos( a_frs1516.nou092sp ));
      params( 4685 ) := "+"( Integer'Pos( a_frs1516.nou093sp ));
      params( 4686 ) := "+"( Integer'Pos( a_frs1516.nou101hd ));
      params( 4687 ) := "+"( Integer'Pos( a_frs1516.nou102hd ));
      params( 4688 ) := "+"( Integer'Pos( a_frs1516.nou103hd ));
      params( 4689 ) := "+"( Integer'Pos( a_frs1516.nou101sp ));
      params( 4690 ) := "+"( Integer'Pos( a_frs1516.nou102sp ));
      params( 4691 ) := "+"( Integer'Pos( a_frs1516.nou103sp ));
      params( 4692 ) := "+"( Integer'Pos( a_frs1516.nou111hd ));
      params( 4693 ) := "+"( Integer'Pos( a_frs1516.nou112hd ));
      params( 4694 ) := "+"( Integer'Pos( a_frs1516.nou113hd ));
      params( 4695 ) := "+"( Integer'Pos( a_frs1516.nou111sp ));
      params( 4696 ) := "+"( Integer'Pos( a_frs1516.nou112sp ));
      params( 4697 ) := "+"( Integer'Pos( a_frs1516.nou113sp ));
      params( 4698 ) := "+"( Integer'Pos( a_frs1516.nou121hd ));
      params( 4699 ) := "+"( Integer'Pos( a_frs1516.nou122hd ));
      params( 4700 ) := "+"( Integer'Pos( a_frs1516.nou123hd ));
      params( 4701 ) := "+"( Integer'Pos( a_frs1516.nou121sp ));
      params( 4702 ) := "+"( Integer'Pos( a_frs1516.nou122sp ));
      params( 4703 ) := "+"( Integer'Pos( a_frs1516.nou123sp ));
      params( 4704 ) := "+"( Integer'Pos( a_frs1516.nou131hd ));
      params( 4705 ) := "+"( Integer'Pos( a_frs1516.nou132hd ));
      params( 4706 ) := "+"( Integer'Pos( a_frs1516.nou133hd ));
      params( 4707 ) := "+"( Integer'Pos( a_frs1516.nou131sp ));
      params( 4708 ) := "+"( Integer'Pos( a_frs1516.nou132sp ));
      params( 4709 ) := "+"( Integer'Pos( a_frs1516.nou133sp ));
      params( 4710 ) := "+"( Integer'Pos( a_frs1516.nou141hd ));
      params( 4711 ) := "+"( Integer'Pos( a_frs1516.nou142hd ));
      params( 4712 ) := "+"( Integer'Pos( a_frs1516.nou143hd ));
      params( 4713 ) := "+"( Integer'Pos( a_frs1516.nou141sp ));
      params( 4714 ) := "+"( Integer'Pos( a_frs1516.nou142sp ));
      params( 4715 ) := "+"( Integer'Pos( a_frs1516.nou143sp ));
      params( 4716 ) := "+"( Integer'Pos( a_frs1516.worka1hd ));
      params( 4717 ) := "+"( Integer'Pos( a_frs1516.worka2hd ));
      params( 4718 ) := "+"( Integer'Pos( a_frs1516.worka3hd ));
      params( 4719 ) := "+"( Integer'Pos( a_frs1516.worka1sp ));
      params( 4720 ) := "+"( Integer'Pos( a_frs1516.worka2sp ));
      params( 4721 ) := "+"( Integer'Pos( a_frs1516.worka3sp ));
      params( 4722 ) := "+"( Integer'Pos( a_frs1516.workm1hd ));
      params( 4723 ) := "+"( Integer'Pos( a_frs1516.workm2hd ));
      params( 4724 ) := "+"( Integer'Pos( a_frs1516.workm3hd ));
      params( 4725 ) := "+"( Integer'Pos( a_frs1516.workm1sp ));
      params( 4726 ) := "+"( Integer'Pos( a_frs1516.workm2sp ));
      params( 4727 ) := "+"( Integer'Pos( a_frs1516.workm3sp ));
      params( 4728 ) := "+"( Integer'Pos( a_frs1516.worky1hd ));
      params( 4729 ) := "+"( Integer'Pos( a_frs1516.worky2hd ));
      params( 4730 ) := "+"( Integer'Pos( a_frs1516.worky3hd ));
      params( 4731 ) := "+"( Integer'Pos( a_frs1516.worky1sp ));
      params( 4732 ) := "+"( Integer'Pos( a_frs1516.worky2sp ));
      params( 4733 ) := "+"( Integer'Pos( a_frs1516.worky3sp ));
      params( 4734 ) := "+"( Integer'Pos( a_frs1516.yjchg1hd ));
      params( 4735 ) := "+"( Integer'Pos( a_frs1516.yjchg2hd ));
      params( 4736 ) := "+"( Integer'Pos( a_frs1516.yjchg3hd ));
      params( 4737 ) := "+"( Integer'Pos( a_frs1516.yjchg1sp ));
      params( 4738 ) := "+"( Integer'Pos( a_frs1516.yjchg2sp ));
      params( 4739 ) := "+"( Integer'Pos( a_frs1516.yjchg3sp ));
      params( 4740 ) := "+"( Float( a_frs1516.mp1hd ));
      params( 4741 ) := "+"( Float( a_frs1516.mp2hd ));
      params( 4742 ) := "+"( Float( a_frs1516.mp3hd ));
      params( 4743 ) := "+"( Float( a_frs1516.mp1sp ));
      params( 4744 ) := "+"( Float( a_frs1516.mp2sp ));
      params( 4745 ) := "+"( Integer'Pos( a_frs1516.mp3sp ));
      params( 4746 ) := "+"( Integer'Pos( a_frs1516.mrar11hd ));
      params( 4747 ) := "+"( Integer'Pos( a_frs1516.mrar12hd ));
      params( 4748 ) := "+"( Integer'Pos( a_frs1516.mrar13hd ));
      params( 4749 ) := "+"( Integer'Pos( a_frs1516.mrar11sp ));
      params( 4750 ) := "+"( Integer'Pos( a_frs1516.mrar12sp ));
      params( 4751 ) := "+"( Integer'Pos( a_frs1516.mrar13sp ));
      params( 4752 ) := "+"( Integer'Pos( a_frs1516.mrar21hd ));
      params( 4753 ) := "+"( Integer'Pos( a_frs1516.mrar22hd ));
      params( 4754 ) := "+"( Integer'Pos( a_frs1516.mrar23hd ));
      params( 4755 ) := "+"( Integer'Pos( a_frs1516.mrar21sp ));
      params( 4756 ) := "+"( Integer'Pos( a_frs1516.mrar22sp ));
      params( 4757 ) := "+"( Integer'Pos( a_frs1516.mrar23sp ));
      params( 4758 ) := "+"( Integer'Pos( a_frs1516.mrar31hd ));
      params( 4759 ) := "+"( Integer'Pos( a_frs1516.mrar32hd ));
      params( 4760 ) := "+"( Integer'Pos( a_frs1516.mrar33hd ));
      params( 4761 ) := "+"( Integer'Pos( a_frs1516.mrar31sp ));
      params( 4762 ) := "+"( Integer'Pos( a_frs1516.mrar32sp ));
      params( 4763 ) := "+"( Integer'Pos( a_frs1516.mrar33sp ));
      params( 4764 ) := "+"( Integer'Pos( a_frs1516.mrar41hd ));
      params( 4765 ) := "+"( Integer'Pos( a_frs1516.mrar42hd ));
      params( 4766 ) := "+"( Integer'Pos( a_frs1516.mrar43hd ));
      params( 4767 ) := "+"( Integer'Pos( a_frs1516.mrar41sp ));
      params( 4768 ) := "+"( Integer'Pos( a_frs1516.mrar42sp ));
      params( 4769 ) := "+"( Integer'Pos( a_frs1516.mrar43sp ));
      params( 4770 ) := "+"( Integer'Pos( a_frs1516.mrar51hd ));
      params( 4771 ) := "+"( Integer'Pos( a_frs1516.mrar52hd ));
      params( 4772 ) := "+"( Integer'Pos( a_frs1516.mrar53hd ));
      params( 4773 ) := "+"( Integer'Pos( a_frs1516.mrar51sp ));
      params( 4774 ) := "+"( Integer'Pos( a_frs1516.mrar52sp ));
      params( 4775 ) := "+"( Integer'Pos( a_frs1516.mrar53sp ));
      params( 4776 ) := "+"( Integer'Pos( a_frs1516.mpnch1hd ));
      params( 4777 ) := "+"( Integer'Pos( a_frs1516.mpnch2hd ));
      params( 4778 ) := "+"( Integer'Pos( a_frs1516.mpnch3hd ));
      params( 4779 ) := "+"( Integer'Pos( a_frs1516.mpnch1sp ));
      params( 4780 ) := "+"( Integer'Pos( a_frs1516.mpnch2sp ));
      params( 4781 ) := "+"( Integer'Pos( a_frs1516.mpnch3sp ));
      params( 4782 ) := "+"( Integer'Pos( a_frs1516.pmp1hd ));
      params( 4783 ) := "+"( Integer'Pos( a_frs1516.pmp2hd ));
      params( 4784 ) := "+"( Integer'Pos( a_frs1516.pmp3hd ));
      params( 4785 ) := "+"( Integer'Pos( a_frs1516.pmp1sp ));
      params( 4786 ) := "+"( Integer'Pos( a_frs1516.pmp2sp ));
      params( 4787 ) := "+"( Integer'Pos( a_frs1516.pmp3sp ));
      params( 4788 ) := "+"( Float( a_frs1516.ump1hd ));
      params( 4789 ) := "+"( Float( a_frs1516.ump2hd ));
      params( 4790 ) := "+"( Integer'Pos( a_frs1516.ump3hd ));
      params( 4791 ) := "+"( Float( a_frs1516.ump1sp ));
      params( 4792 ) := "+"( Integer'Pos( a_frs1516.ump2sp ));
      params( 4793 ) := "+"( Integer'Pos( a_frs1516.ump3sp ));
      params( 4794 ) := "+"( Integer'Pos( a_frs1516.pump1hd ));
      params( 4795 ) := "+"( Integer'Pos( a_frs1516.pump2hd ));
      params( 4796 ) := "+"( Integer'Pos( a_frs1516.pump3hd ));
      params( 4797 ) := "+"( Integer'Pos( a_frs1516.pump1sp ));
      params( 4798 ) := "+"( Integer'Pos( a_frs1516.pump2sp ));
      params( 4799 ) := "+"( Integer'Pos( a_frs1516.pump3sp ));
      params( 4800 ) := "+"( Integer'Pos( a_frs1516.isump1hd ));
      params( 4801 ) := "+"( Integer'Pos( a_frs1516.isump2hd ));
      params( 4802 ) := "+"( Integer'Pos( a_frs1516.isump3hd ));
      params( 4803 ) := "+"( Integer'Pos( a_frs1516.isump1sp ));
      params( 4804 ) := "+"( Integer'Pos( a_frs1516.isump2sp ));
      params( 4805 ) := "+"( Integer'Pos( a_frs1516.isump3sp ));
      params( 4806 ) := "+"( Integer'Pos( a_frs1516.jobst1hd ));
      params( 4807 ) := "+"( Integer'Pos( a_frs1516.jobst2hd ));
      params( 4808 ) := "+"( Integer'Pos( a_frs1516.jobst1sp ));
      params( 4809 ) := "+"( Integer'Pos( a_frs1516.jobst2sp ));
      params( 4810 ) := "+"( Integer'Pos( a_frs1516.oddtp1hd ));
      params( 4811 ) := "+"( Integer'Pos( a_frs1516.oddtp2hd ));
      params( 4812 ) := "+"( Integer'Pos( a_frs1516.oddtp1sp ));
      params( 4813 ) := "+"( Integer'Pos( a_frs1516.oddtp2sp ));
      params( 4814 ) := "+"( Float( a_frs1516.oddjb1hd ));
      params( 4815 ) := "+"( Float( a_frs1516.oddjb2hd ));
      params( 4816 ) := "+"( Float( a_frs1516.oddjb1sp ));
      params( 4817 ) := "+"( Integer'Pos( a_frs1516.oddjb2sp ));
      params( 4818 ) := "+"( Integer'Pos( a_frs1516.oddjn1hd ));
      params( 4819 ) := "+"( Integer'Pos( a_frs1516.oddjn2hd ));
      params( 4820 ) := "+"( Integer'Pos( a_frs1516.oddjn1sp ));
      params( 4821 ) := "+"( Integer'Pos( a_frs1516.oddjn2sp ));
      params( 4822 ) := "+"( Integer'Pos( a_frs1516.poth1hd ));
      params( 4823 ) := "+"( Integer'Pos( a_frs1516.poth2hd ));
      params( 4824 ) := "+"( Integer'Pos( a_frs1516.poth3hd ));
      params( 4825 ) := "+"( Integer'Pos( a_frs1516.poth4hd ));
      params( 4826 ) := "+"( Integer'Pos( a_frs1516.poth5hd ));
      params( 4827 ) := "+"( Integer'Pos( a_frs1516.poth6hd ));
      params( 4828 ) := "+"( Integer'Pos( a_frs1516.poth7hd ));
      params( 4829 ) := "+"( Integer'Pos( a_frs1516.poth8hd ));
      params( 4830 ) := "+"( Integer'Pos( a_frs1516.poth9hd ));
      params( 4831 ) := "+"( Integer'Pos( a_frs1516.poth10hd ));
      params( 4832 ) := "+"( Integer'Pos( a_frs1516.poth11hd ));
      params( 4833 ) := "+"( Integer'Pos( a_frs1516.poth12hd ));
      params( 4834 ) := "+"( Integer'Pos( a_frs1516.poth13hd ));
      params( 4835 ) := "+"( Integer'Pos( a_frs1516.poth14hd ));
      params( 4836 ) := "+"( Integer'Pos( a_frs1516.poth15hd ));
      params( 4837 ) := "+"( Integer'Pos( a_frs1516.poth16hd ));
      params( 4838 ) := "+"( Integer'Pos( a_frs1516.poth17hd ));
      params( 4839 ) := "+"( Integer'Pos( a_frs1516.poth18hd ));
      params( 4840 ) := "+"( Integer'Pos( a_frs1516.poth19hd ));
      params( 4841 ) := "+"( Integer'Pos( a_frs1516.poth1sp ));
      params( 4842 ) := "+"( Integer'Pos( a_frs1516.poth2sp ));
      params( 4843 ) := "+"( Integer'Pos( a_frs1516.poth3sp ));
      params( 4844 ) := "+"( Integer'Pos( a_frs1516.poth4sp ));
      params( 4845 ) := "+"( Integer'Pos( a_frs1516.poth5sp ));
      params( 4846 ) := "+"( Integer'Pos( a_frs1516.poth6sp ));
      params( 4847 ) := "+"( Integer'Pos( a_frs1516.poth7sp ));
      params( 4848 ) := "+"( Integer'Pos( a_frs1516.poth8sp ));
      params( 4849 ) := "+"( Integer'Pos( a_frs1516.poth9sp ));
      params( 4850 ) := "+"( Integer'Pos( a_frs1516.poth10sp ));
      params( 4851 ) := "+"( Integer'Pos( a_frs1516.poth11sp ));
      params( 4852 ) := "+"( Integer'Pos( a_frs1516.poth12sp ));
      params( 4853 ) := "+"( Integer'Pos( a_frs1516.poth13sp ));
      params( 4854 ) := "+"( Integer'Pos( a_frs1516.poth14sp ));
      params( 4855 ) := "+"( Integer'Pos( a_frs1516.poth15sp ));
      params( 4856 ) := "+"( Integer'Pos( a_frs1516.poth16sp ));
      params( 4857 ) := "+"( Integer'Pos( a_frs1516.poth17sp ));
      params( 4858 ) := "+"( Integer'Pos( a_frs1516.poth18sp ));
      params( 4859 ) := "+"( Integer'Pos( a_frs1516.poth19sp ));
      params( 4860 ) := "+"( Float( a_frs1516.ocpen1hd ));
      params( 4861 ) := "+"( Float( a_frs1516.ocpen2hd ));
      params( 4862 ) := "+"( Float( a_frs1516.ocpen3hd ));
      params( 4863 ) := "+"( Float( a_frs1516.ocpen4hd ));
      params( 4864 ) := "+"( Float( a_frs1516.wpen1hd ));
      params( 4865 ) := "+"( Float( a_frs1516.wpen2hd ));
      params( 4866 ) := "+"( Float( a_frs1516.wpen3hd ));
      params( 4867 ) := "+"( Float( a_frs1516.ppen1hd ));
      params( 4868 ) := "+"( Float( a_frs1516.ppen2hd ));
      params( 4869 ) := "+"( Float( a_frs1516.ppen3hd ));
      params( 4870 ) := "+"( Float( a_frs1516.tupen1hd ));
      params( 4871 ) := "+"( Integer'Pos( a_frs1516.tupen2hd ));
      params( 4872 ) := "+"( Float( a_frs1516.anpen1hd ));
      params( 4873 ) := "+"( Float( a_frs1516.anpen2hd ));
      params( 4874 ) := "+"( Integer'Pos( a_frs1516.anpen3hd ));
      params( 4875 ) := "+"( Float( a_frs1516.trust1hd ));
      params( 4876 ) := "+"( Integer'Pos( a_frs1516.trust2hd ));
      params( 4877 ) := "+"( Float( a_frs1516.expen1hd ));
      params( 4878 ) := "+"( Integer'Pos( a_frs1516.expen2hd ));
      params( 4879 ) := "+"( Float( a_frs1516.ocpen1sp ));
      params( 4880 ) := "+"( Float( a_frs1516.ocpen2sp ));
      params( 4881 ) := "+"( Float( a_frs1516.ocpen3sp ));
      params( 4882 ) := "+"( Float( a_frs1516.ocpen4sp ));
      params( 4883 ) := "+"( Float( a_frs1516.wpen1sp ));
      params( 4884 ) := "+"( Integer'Pos( a_frs1516.wpen2sp ));
      params( 4885 ) := "+"( Integer'Pos( a_frs1516.wpen3sp ));
      params( 4886 ) := "+"( Float( a_frs1516.ppen1sp ));
      params( 4887 ) := "+"( Float( a_frs1516.ppen2sp ));
      params( 4888 ) := "+"( Float( a_frs1516.ppen3sp ));
      params( 4889 ) := "+"( Float( a_frs1516.tupen1sp ));
      params( 4890 ) := "+"( Integer'Pos( a_frs1516.tupen2sp ));
      params( 4891 ) := "+"( Float( a_frs1516.anpen1sp ));
      params( 4892 ) := "+"( Float( a_frs1516.anpen2sp ));
      params( 4893 ) := "+"( Integer'Pos( a_frs1516.anpen3sp ));
      params( 4894 ) := "+"( Float( a_frs1516.trust1sp ));
      params( 4895 ) := "+"( Integer'Pos( a_frs1516.trust2sp ));
      params( 4896 ) := "+"( Float( a_frs1516.expen1sp ));
      params( 4897 ) := "+"( Integer'Pos( a_frs1516.expen2sp ));
      params( 4898 ) := "+"( Integer'Pos( a_frs1516.pcpen1hd ));
      params( 4899 ) := "+"( Integer'Pos( a_frs1516.pcpen2hd ));
      params( 4900 ) := "+"( Integer'Pos( a_frs1516.pcpen3hd ));
      params( 4901 ) := "+"( Integer'Pos( a_frs1516.pcpen4hd ));
      params( 4902 ) := "+"( Integer'Pos( a_frs1516.pwpen1hd ));
      params( 4903 ) := "+"( Integer'Pos( a_frs1516.pwpen2hd ));
      params( 4904 ) := "+"( Integer'Pos( a_frs1516.pwpen3hd ));
      params( 4905 ) := "+"( Integer'Pos( a_frs1516.pppen1hd ));
      params( 4906 ) := "+"( Integer'Pos( a_frs1516.pppen2hd ));
      params( 4907 ) := "+"( Integer'Pos( a_frs1516.pppen3hd ));
      params( 4908 ) := "+"( Integer'Pos( a_frs1516.ptupn1hd ));
      params( 4909 ) := "+"( Integer'Pos( a_frs1516.ptupn2hd ));
      params( 4910 ) := "+"( Integer'Pos( a_frs1516.panpn1hd ));
      params( 4911 ) := "+"( Integer'Pos( a_frs1516.panpn2hd ));
      params( 4912 ) := "+"( Integer'Pos( a_frs1516.panpn3hd ));
      params( 4913 ) := "+"( Integer'Pos( a_frs1516.ptrst1hd ));
      params( 4914 ) := "+"( Integer'Pos( a_frs1516.ptrst2hd ));
      params( 4915 ) := "+"( Integer'Pos( a_frs1516.pxpen1hd ));
      params( 4916 ) := "+"( Integer'Pos( a_frs1516.pxpen2hd ));
      params( 4917 ) := "+"( Integer'Pos( a_frs1516.pcpen1sp ));
      params( 4918 ) := "+"( Integer'Pos( a_frs1516.pcpen2sp ));
      params( 4919 ) := "+"( Integer'Pos( a_frs1516.pcpen3sp ));
      params( 4920 ) := "+"( Integer'Pos( a_frs1516.pcpen4sp ));
      params( 4921 ) := "+"( Integer'Pos( a_frs1516.pwpen1sp ));
      params( 4922 ) := "+"( Integer'Pos( a_frs1516.pwpen2sp ));
      params( 4923 ) := "+"( Integer'Pos( a_frs1516.pwpen3sp ));
      params( 4924 ) := "+"( Integer'Pos( a_frs1516.pppen1sp ));
      params( 4925 ) := "+"( Integer'Pos( a_frs1516.pppen2sp ));
      params( 4926 ) := "+"( Integer'Pos( a_frs1516.pppen3sp ));
      params( 4927 ) := "+"( Integer'Pos( a_frs1516.ptupn1sp ));
      params( 4928 ) := "+"( Integer'Pos( a_frs1516.ptupn2sp ));
      params( 4929 ) := "+"( Integer'Pos( a_frs1516.panpn1sp ));
      params( 4930 ) := "+"( Integer'Pos( a_frs1516.panpn2sp ));
      params( 4931 ) := "+"( Integer'Pos( a_frs1516.panpn3sp ));
      params( 4932 ) := "+"( Integer'Pos( a_frs1516.ptrst1sp ));
      params( 4933 ) := "+"( Integer'Pos( a_frs1516.ptrst2sp ));
      params( 4934 ) := "+"( Integer'Pos( a_frs1516.pxpen1sp ));
      params( 4935 ) := "+"( Integer'Pos( a_frs1516.pxpen2sp ));
      params( 4936 ) := "+"( Integer'Pos( a_frs1516.ocptd1hd ));
      params( 4937 ) := "+"( Integer'Pos( a_frs1516.ocptd2hd ));
      params( 4938 ) := "+"( Integer'Pos( a_frs1516.ocptd3hd ));
      params( 4939 ) := "+"( Integer'Pos( a_frs1516.ocptd4hd ));
      params( 4940 ) := "+"( Integer'Pos( a_frs1516.wpptd1hd ));
      params( 4941 ) := "+"( Integer'Pos( a_frs1516.wpptd2hd ));
      params( 4942 ) := "+"( Integer'Pos( a_frs1516.wpptd3hd ));
      params( 4943 ) := "+"( Integer'Pos( a_frs1516.ppetd1hd ));
      params( 4944 ) := "+"( Integer'Pos( a_frs1516.ppetd2hd ));
      params( 4945 ) := "+"( Integer'Pos( a_frs1516.ppetd3hd ));
      params( 4946 ) := "+"( Integer'Pos( a_frs1516.tuptd1hd ));
      params( 4947 ) := "+"( Integer'Pos( a_frs1516.tuptd2hd ));
      params( 4948 ) := "+"( Integer'Pos( a_frs1516.aptd1hd ));
      params( 4949 ) := "+"( Integer'Pos( a_frs1516.aptd2hd ));
      params( 4950 ) := "+"( Integer'Pos( a_frs1516.aptd3hd ));
      params( 4951 ) := "+"( Integer'Pos( a_frs1516.trutd1hd ));
      params( 4952 ) := "+"( Integer'Pos( a_frs1516.trutd2hd ));
      params( 4953 ) := "+"( Integer'Pos( a_frs1516.exptd1hd ));
      params( 4954 ) := "+"( Integer'Pos( a_frs1516.exptd2hd ));
      params( 4955 ) := "+"( Integer'Pos( a_frs1516.ocptd1sp ));
      params( 4956 ) := "+"( Integer'Pos( a_frs1516.ocptd2sp ));
      params( 4957 ) := "+"( Integer'Pos( a_frs1516.ocptd3sp ));
      params( 4958 ) := "+"( Integer'Pos( a_frs1516.ocptd4sp ));
      params( 4959 ) := "+"( Integer'Pos( a_frs1516.wpptd1sp ));
      params( 4960 ) := "+"( Integer'Pos( a_frs1516.wpptd2sp ));
      params( 4961 ) := "+"( Integer'Pos( a_frs1516.wpptd3sp ));
      params( 4962 ) := "+"( Integer'Pos( a_frs1516.ppetd1sp ));
      params( 4963 ) := "+"( Integer'Pos( a_frs1516.ppetd2sp ));
      params( 4964 ) := "+"( Integer'Pos( a_frs1516.ppetd3sp ));
      params( 4965 ) := "+"( Integer'Pos( a_frs1516.tuptd1sp ));
      params( 4966 ) := "+"( Integer'Pos( a_frs1516.tuptd2sp ));
      params( 4967 ) := "+"( Integer'Pos( a_frs1516.aptd1sp ));
      params( 4968 ) := "+"( Integer'Pos( a_frs1516.aptd2sp ));
      params( 4969 ) := "+"( Integer'Pos( a_frs1516.aptd3sp ));
      params( 4970 ) := "+"( Integer'Pos( a_frs1516.trutd1sp ));
      params( 4971 ) := "+"( Integer'Pos( a_frs1516.trutd2sp ));
      params( 4972 ) := "+"( Integer'Pos( a_frs1516.exptd1sp ));
      params( 4973 ) := "+"( Integer'Pos( a_frs1516.exptd2sp ));
      params( 4974 ) := "+"( Integer'Pos( a_frs1516.ocpid1hd ));
      params( 4975 ) := "+"( Integer'Pos( a_frs1516.ocpid2hd ));
      params( 4976 ) := "+"( Integer'Pos( a_frs1516.ocpid3hd ));
      params( 4977 ) := "+"( Integer'Pos( a_frs1516.ocpid4hd ));
      params( 4978 ) := "+"( Integer'Pos( a_frs1516.wwpid1hd ));
      params( 4979 ) := "+"( Integer'Pos( a_frs1516.wwpid2hd ));
      params( 4980 ) := "+"( Integer'Pos( a_frs1516.wwpid3hd ));
      params( 4981 ) := "+"( Integer'Pos( a_frs1516.ppeid1hd ));
      params( 4982 ) := "+"( Integer'Pos( a_frs1516.ppeid2hd ));
      params( 4983 ) := "+"( Integer'Pos( a_frs1516.ppeid3hd ));
      params( 4984 ) := "+"( Integer'Pos( a_frs1516.tupid1hd ));
      params( 4985 ) := "+"( Integer'Pos( a_frs1516.tupid2hd ));
      params( 4986 ) := "+"( Integer'Pos( a_frs1516.apid1hd ));
      params( 4987 ) := "+"( Integer'Pos( a_frs1516.apid2hd ));
      params( 4988 ) := "+"( Integer'Pos( a_frs1516.apid3hd ));
      params( 4989 ) := "+"( Integer'Pos( a_frs1516.truid1hd ));
      params( 4990 ) := "+"( Integer'Pos( a_frs1516.truid2hd ));
      params( 4991 ) := "+"( Integer'Pos( a_frs1516.expid1hd ));
      params( 4992 ) := "+"( Integer'Pos( a_frs1516.expid2hd ));
      params( 4993 ) := "+"( Integer'Pos( a_frs1516.ocpid1sp ));
      params( 4994 ) := "+"( Integer'Pos( a_frs1516.ocpid2sp ));
      params( 4995 ) := "+"( Integer'Pos( a_frs1516.ocpid3sp ));
      params( 4996 ) := "+"( Integer'Pos( a_frs1516.ocpid4sp ));
      params( 4997 ) := "+"( Integer'Pos( a_frs1516.wwpid1sp ));
      params( 4998 ) := "+"( Integer'Pos( a_frs1516.wwpid2sp ));
      params( 4999 ) := "+"( Integer'Pos( a_frs1516.wwpid3sp ));
      params( 5000 ) := "+"( Integer'Pos( a_frs1516.ppeid1sp ));
      params( 5001 ) := "+"( Integer'Pos( a_frs1516.ppeid2sp ));
      params( 5002 ) := "+"( Integer'Pos( a_frs1516.ppeid3sp ));
      params( 5003 ) := "+"( Integer'Pos( a_frs1516.tupid1sp ));
      params( 5004 ) := "+"( Integer'Pos( a_frs1516.tupid2sp ));
      params( 5005 ) := "+"( Integer'Pos( a_frs1516.apid1sp ));
      params( 5006 ) := "+"( Integer'Pos( a_frs1516.apid2sp ));
      params( 5007 ) := "+"( Integer'Pos( a_frs1516.apid3sp ));
      params( 5008 ) := "+"( Integer'Pos( a_frs1516.truid1sp ));
      params( 5009 ) := "+"( Integer'Pos( a_frs1516.truid2sp ));
      params( 5010 ) := "+"( Integer'Pos( a_frs1516.expid1sp ));
      params( 5011 ) := "+"( Integer'Pos( a_frs1516.expid2sp ));
      params( 5012 ) := "+"( Integer'Pos( a_frs1516.ocptx1hd ));
      params( 5013 ) := "+"( Integer'Pos( a_frs1516.ocptx2hd ));
      params( 5014 ) := "+"( Integer'Pos( a_frs1516.ocptx3hd ));
      params( 5015 ) := "+"( Integer'Pos( a_frs1516.ocptx4hd ));
      params( 5016 ) := "+"( Integer'Pos( a_frs1516.wptx1hd ));
      params( 5017 ) := "+"( Integer'Pos( a_frs1516.wpptx2hd ));
      params( 5018 ) := "+"( Integer'Pos( a_frs1516.wpptx3hd ));
      params( 5019 ) := "+"( Integer'Pos( a_frs1516.ppetx1hd ));
      params( 5020 ) := "+"( Integer'Pos( a_frs1516.ppetx2hd ));
      params( 5021 ) := "+"( Integer'Pos( a_frs1516.ppetx3hd ));
      params( 5022 ) := "+"( Integer'Pos( a_frs1516.tuptx1hd ));
      params( 5023 ) := "+"( Integer'Pos( a_frs1516.tuptx2hd ));
      params( 5024 ) := "+"( Integer'Pos( a_frs1516.aptx1hd ));
      params( 5025 ) := "+"( Integer'Pos( a_frs1516.aptx2hd ));
      params( 5026 ) := "+"( Integer'Pos( a_frs1516.aptx3hd ));
      params( 5027 ) := "+"( Integer'Pos( a_frs1516.ttrtx1hd ));
      params( 5028 ) := "+"( Integer'Pos( a_frs1516.ttrtx2hd ));
      params( 5029 ) := "+"( Integer'Pos( a_frs1516.exptx1hd ));
      params( 5030 ) := "+"( Integer'Pos( a_frs1516.exptx2hd ));
      params( 5031 ) := "+"( Integer'Pos( a_frs1516.ocptx1sp ));
      params( 5032 ) := "+"( Integer'Pos( a_frs1516.ocptx2sp ));
      params( 5033 ) := "+"( Integer'Pos( a_frs1516.ocptx3sp ));
      params( 5034 ) := "+"( Integer'Pos( a_frs1516.ocptx4sp ));
      params( 5035 ) := "+"( Integer'Pos( a_frs1516.wptx1sp ));
      params( 5036 ) := "+"( Integer'Pos( a_frs1516.wpptx2sp ));
      params( 5037 ) := "+"( Integer'Pos( a_frs1516.wpptx3sp ));
      params( 5038 ) := "+"( Integer'Pos( a_frs1516.ppetx1sp ));
      params( 5039 ) := "+"( Integer'Pos( a_frs1516.ppetx2sp ));
      params( 5040 ) := "+"( Integer'Pos( a_frs1516.ppetx3sp ));
      params( 5041 ) := "+"( Integer'Pos( a_frs1516.tuptx1sp ));
      params( 5042 ) := "+"( Integer'Pos( a_frs1516.tuptx2sp ));
      params( 5043 ) := "+"( Integer'Pos( a_frs1516.aptx1sp ));
      params( 5044 ) := "+"( Integer'Pos( a_frs1516.aptx2sp ));
      params( 5045 ) := "+"( Integer'Pos( a_frs1516.aptx3sp ));
      params( 5046 ) := "+"( Integer'Pos( a_frs1516.ttrtx1sp ));
      params( 5047 ) := "+"( Integer'Pos( a_frs1516.ttrtx2sp ));
      params( 5048 ) := "+"( Integer'Pos( a_frs1516.exptx1sp ));
      params( 5049 ) := "+"( Integer'Pos( a_frs1516.exptx2sp ));
      params( 5050 ) := "+"( Float( a_frs1516.ocpoa1hd ));
      params( 5051 ) := "+"( Float( a_frs1516.ocpoa2hd ));
      params( 5052 ) := "+"( Integer'Pos( a_frs1516.ocpoa3hd ));
      params( 5053 ) := "+"( Integer'Pos( a_frs1516.ocpoa4hd ));
      params( 5054 ) := "+"( Float( a_frs1516.wpoa1hd ));
      params( 5055 ) := "+"( Integer'Pos( a_frs1516.wwpoa2hd ));
      params( 5056 ) := "+"( Integer'Pos( a_frs1516.wwpoa3hd ));
      params( 5057 ) := "+"( Integer'Pos( a_frs1516.ppeoa1hd ));
      params( 5058 ) := "+"( Integer'Pos( a_frs1516.ppeoa2hd ));
      params( 5059 ) := "+"( Integer'Pos( a_frs1516.ppeoa3hd ));
      params( 5060 ) := "+"( Integer'Pos( a_frs1516.tupoa1hd ));
      params( 5061 ) := "+"( Integer'Pos( a_frs1516.tupoa2hd ));
      params( 5062 ) := "+"( Integer'Pos( a_frs1516.apoa1hd ));
      params( 5063 ) := "+"( Integer'Pos( a_frs1516.apoa2hd ));
      params( 5064 ) := "+"( Integer'Pos( a_frs1516.apoa3hd ));
      params( 5065 ) := "+"( Integer'Pos( a_frs1516.truoa1hd ));
      params( 5066 ) := "+"( Integer'Pos( a_frs1516.truoa2hd ));
      params( 5067 ) := "+"( Integer'Pos( a_frs1516.expoa1hd ));
      params( 5068 ) := "+"( Integer'Pos( a_frs1516.expoa2hd ));
      params( 5069 ) := "+"( Float( a_frs1516.ocpoa1sp ));
      params( 5070 ) := "+"( Integer'Pos( a_frs1516.ocpoa2sp ));
      params( 5071 ) := "+"( Integer'Pos( a_frs1516.ocpoa3sp ));
      params( 5072 ) := "+"( Integer'Pos( a_frs1516.ocpoa4sp ));
      params( 5073 ) := "+"( Float( a_frs1516.wpoa1sp ));
      params( 5074 ) := "+"( Integer'Pos( a_frs1516.wwpoa2sp ));
      params( 5075 ) := "+"( Integer'Pos( a_frs1516.wwpoa3sp ));
      params( 5076 ) := "+"( Integer'Pos( a_frs1516.ppeoa1sp ));
      params( 5077 ) := "+"( Integer'Pos( a_frs1516.ppeoa2sp ));
      params( 5078 ) := "+"( Integer'Pos( a_frs1516.ppeoa3sp ));
      params( 5079 ) := "+"( Integer'Pos( a_frs1516.tupoa1sp ));
      params( 5080 ) := "+"( Integer'Pos( a_frs1516.tupoa2sp ));
      params( 5081 ) := "+"( Integer'Pos( a_frs1516.apoa1sp ));
      params( 5082 ) := "+"( Integer'Pos( a_frs1516.apoa2sp ));
      params( 5083 ) := "+"( Integer'Pos( a_frs1516.apoa3sp ));
      params( 5084 ) := "+"( Integer'Pos( a_frs1516.truoa1sp ));
      params( 5085 ) := "+"( Integer'Pos( a_frs1516.truoa2sp ));
      params( 5086 ) := "+"( Integer'Pos( a_frs1516.expoa1sp ));
      params( 5087 ) := "+"( Integer'Pos( a_frs1516.expoa2sp ));
      params( 5088 ) := "+"( Integer'Pos( a_frs1516.ocpoi1hd ));
      params( 5089 ) := "+"( Integer'Pos( a_frs1516.ocpoi2hd ));
      params( 5090 ) := "+"( Integer'Pos( a_frs1516.ocpoi3hd ));
      params( 5091 ) := "+"( Integer'Pos( a_frs1516.ocpoi4hd ));
      params( 5092 ) := "+"( Integer'Pos( a_frs1516.wpoi1hd ));
      params( 5093 ) := "+"( Integer'Pos( a_frs1516.wwpoi2hd ));
      params( 5094 ) := "+"( Integer'Pos( a_frs1516.wwpoi3hd ));
      params( 5095 ) := "+"( Integer'Pos( a_frs1516.ppeoi1hd ));
      params( 5096 ) := "+"( Integer'Pos( a_frs1516.ppeoi2hd ));
      params( 5097 ) := "+"( Integer'Pos( a_frs1516.ppeoi3hd ));
      params( 5098 ) := "+"( Integer'Pos( a_frs1516.tupoi1hd ));
      params( 5099 ) := "+"( Integer'Pos( a_frs1516.tupoi2hd ));
      params( 5100 ) := "+"( Integer'Pos( a_frs1516.apoi1hd ));
      params( 5101 ) := "+"( Integer'Pos( a_frs1516.apoi2hd ));
      params( 5102 ) := "+"( Integer'Pos( a_frs1516.apoi3hd ));
      params( 5103 ) := "+"( Integer'Pos( a_frs1516.truoi1hd ));
      params( 5104 ) := "+"( Integer'Pos( a_frs1516.truoi2hd ));
      params( 5105 ) := "+"( Integer'Pos( a_frs1516.expoi1hd ));
      params( 5106 ) := "+"( Integer'Pos( a_frs1516.expoi2hd ));
      params( 5107 ) := "+"( Integer'Pos( a_frs1516.ocpoi1sp ));
      params( 5108 ) := "+"( Integer'Pos( a_frs1516.ocpoi2sp ));
      params( 5109 ) := "+"( Integer'Pos( a_frs1516.ocpoi3sp ));
      params( 5110 ) := "+"( Integer'Pos( a_frs1516.ocpoi4sp ));
      params( 5111 ) := "+"( Integer'Pos( a_frs1516.wpoi1sp ));
      params( 5112 ) := "+"( Integer'Pos( a_frs1516.wwpoi2sp ));
      params( 5113 ) := "+"( Integer'Pos( a_frs1516.wwpoi3sp ));
      params( 5114 ) := "+"( Integer'Pos( a_frs1516.ppeoi1sp ));
      params( 5115 ) := "+"( Integer'Pos( a_frs1516.ppeoi2sp ));
      params( 5116 ) := "+"( Integer'Pos( a_frs1516.ppeoi3sp ));
      params( 5117 ) := "+"( Integer'Pos( a_frs1516.tupoi1sp ));
      params( 5118 ) := "+"( Integer'Pos( a_frs1516.tupoi2sp ));
      params( 5119 ) := "+"( Integer'Pos( a_frs1516.apoi1sp ));
      params( 5120 ) := "+"( Integer'Pos( a_frs1516.apoi2sp ));
      params( 5121 ) := "+"( Integer'Pos( a_frs1516.apoi3sp ));
      params( 5122 ) := "+"( Integer'Pos( a_frs1516.truoi1sp ));
      params( 5123 ) := "+"( Integer'Pos( a_frs1516.truoi2sp ));
      params( 5124 ) := "+"( Integer'Pos( a_frs1516.expoi1sp ));
      params( 5125 ) := "+"( Integer'Pos( a_frs1516.expoi2sp ));
      params( 5126 ) := "+"( Float( a_frs1516.ocpta1hd ));
      params( 5127 ) := "+"( Float( a_frs1516.ocpta2hd ));
      params( 5128 ) := "+"( Float( a_frs1516.ocpta3hd ));
      params( 5129 ) := "+"( Float( a_frs1516.ocpta4hd ));
      params( 5130 ) := "+"( Float( a_frs1516.wpta1hd ));
      params( 5131 ) := "+"( Float( a_frs1516.wppta2hd ));
      params( 5132 ) := "+"( Float( a_frs1516.wppta3hd ));
      params( 5133 ) := "+"( Float( a_frs1516.ppeta1hd ));
      params( 5134 ) := "+"( Float( a_frs1516.ppeta2hd ));
      params( 5135 ) := "+"( Float( a_frs1516.ppeta3hd ));
      params( 5136 ) := "+"( Integer'Pos( a_frs1516.tupta1hd ));
      params( 5137 ) := "+"( Integer'Pos( a_frs1516.tupta2hd ));
      params( 5138 ) := "+"( Float( a_frs1516.apta1hd ));
      params( 5139 ) := "+"( Float( a_frs1516.apta2hd ));
      params( 5140 ) := "+"( Integer'Pos( a_frs1516.apta3hd ));
      params( 5141 ) := "+"( Float( a_frs1516.truta1hd ));
      params( 5142 ) := "+"( Integer'Pos( a_frs1516.truta2hd ));
      params( 5143 ) := "+"( Float( a_frs1516.expta1hd ));
      params( 5144 ) := "+"( Integer'Pos( a_frs1516.expta2hd ));
      params( 5145 ) := "+"( Float( a_frs1516.ocpta1sp ));
      params( 5146 ) := "+"( Float( a_frs1516.ocpta2sp ));
      params( 5147 ) := "+"( Float( a_frs1516.ocpta3sp ));
      params( 5148 ) := "+"( Integer'Pos( a_frs1516.ocpta4sp ));
      params( 5149 ) := "+"( Float( a_frs1516.wpta1sp ));
      params( 5150 ) := "+"( Integer'Pos( a_frs1516.wppta2sp ));
      params( 5151 ) := "+"( Integer'Pos( a_frs1516.wppta3sp ));
      params( 5152 ) := "+"( Float( a_frs1516.ppeta1sp ));
      params( 5153 ) := "+"( Float( a_frs1516.ppeta2sp ));
      params( 5154 ) := "+"( Float( a_frs1516.ppeta3sp ));
      params( 5155 ) := "+"( Integer'Pos( a_frs1516.tupta1sp ));
      params( 5156 ) := "+"( Integer'Pos( a_frs1516.tupta2sp ));
      params( 5157 ) := "+"( Float( a_frs1516.apta1sp ));
      params( 5158 ) := "+"( Float( a_frs1516.apta2sp ));
      params( 5159 ) := "+"( Integer'Pos( a_frs1516.apta3sp ));
      params( 5160 ) := "+"( Float( a_frs1516.truta1sp ));
      params( 5161 ) := "+"( Integer'Pos( a_frs1516.truta2sp ));
      params( 5162 ) := "+"( Float( a_frs1516.expta1sp ));
      params( 5163 ) := "+"( Integer'Pos( a_frs1516.expta2sp ));
      params( 5164 ) := "+"( Integer'Pos( a_frs1516.ocpti1hd ));
      params( 5165 ) := "+"( Integer'Pos( a_frs1516.ocpti2hd ));
      params( 5166 ) := "+"( Integer'Pos( a_frs1516.ocpti3hd ));
      params( 5167 ) := "+"( Integer'Pos( a_frs1516.ocpti4hd ));
      params( 5168 ) := "+"( Integer'Pos( a_frs1516.wpti1hd ));
      params( 5169 ) := "+"( Integer'Pos( a_frs1516.wppti2hd ));
      params( 5170 ) := "+"( Integer'Pos( a_frs1516.wppti3hd ));
      params( 5171 ) := "+"( Integer'Pos( a_frs1516.ppeti1hd ));
      params( 5172 ) := "+"( Integer'Pos( a_frs1516.ppeti2hd ));
      params( 5173 ) := "+"( Integer'Pos( a_frs1516.ppeti3hd ));
      params( 5174 ) := "+"( Integer'Pos( a_frs1516.tupti1hd ));
      params( 5175 ) := "+"( Integer'Pos( a_frs1516.tupti2hd ));
      params( 5176 ) := "+"( Integer'Pos( a_frs1516.apti1hd ));
      params( 5177 ) := "+"( Integer'Pos( a_frs1516.apti2hd ));
      params( 5178 ) := "+"( Integer'Pos( a_frs1516.apti3hd ));
      params( 5179 ) := "+"( Integer'Pos( a_frs1516.truti1hd ));
      params( 5180 ) := "+"( Integer'Pos( a_frs1516.truti2hd ));
      params( 5181 ) := "+"( Integer'Pos( a_frs1516.expti1hd ));
      params( 5182 ) := "+"( Integer'Pos( a_frs1516.expti2hd ));
      params( 5183 ) := "+"( Integer'Pos( a_frs1516.ocpti1sp ));
      params( 5184 ) := "+"( Integer'Pos( a_frs1516.ocpti2sp ));
      params( 5185 ) := "+"( Integer'Pos( a_frs1516.ocpti3sp ));
      params( 5186 ) := "+"( Integer'Pos( a_frs1516.ocpti4sp ));
      params( 5187 ) := "+"( Integer'Pos( a_frs1516.wpti1sp ));
      params( 5188 ) := "+"( Integer'Pos( a_frs1516.wppti2sp ));
      params( 5189 ) := "+"( Integer'Pos( a_frs1516.wppti3sp ));
      params( 5190 ) := "+"( Integer'Pos( a_frs1516.ppeti1sp ));
      params( 5191 ) := "+"( Integer'Pos( a_frs1516.ppeti2sp ));
      params( 5192 ) := "+"( Integer'Pos( a_frs1516.ppeti3sp ));
      params( 5193 ) := "+"( Integer'Pos( a_frs1516.tupti1sp ));
      params( 5194 ) := "+"( Integer'Pos( a_frs1516.tupti2sp ));
      params( 5195 ) := "+"( Integer'Pos( a_frs1516.apti1sp ));
      params( 5196 ) := "+"( Integer'Pos( a_frs1516.apti2sp ));
      params( 5197 ) := "+"( Integer'Pos( a_frs1516.apti3sp ));
      params( 5198 ) := "+"( Integer'Pos( a_frs1516.truti1sp ));
      params( 5199 ) := "+"( Integer'Pos( a_frs1516.truti2sp ));
      params( 5200 ) := "+"( Integer'Pos( a_frs1516.expti1sp ));
      params( 5201 ) := "+"( Integer'Pos( a_frs1516.expti2sp ));
      params( 5202 ) := "+"( Integer'Pos( a_frs1516.menpin11 ));
      params( 5203 ) := "+"( Integer'Pos( a_frs1516.menpin12 ));
      params( 5204 ) := "+"( Integer'Pos( a_frs1516.menpin13 ));
      params( 5205 ) := "+"( Integer'Pos( a_frs1516.menpin21 ));
      params( 5206 ) := "+"( Integer'Pos( a_frs1516.menpin22 ));
      params( 5207 ) := "+"( Integer'Pos( a_frs1516.menpin23 ));
      params( 5208 ) := "+"( Integer'Pos( a_frs1516.menpin31 ));
      params( 5209 ) := "+"( Integer'Pos( a_frs1516.menpin32 ));
      params( 5210 ) := "+"( Integer'Pos( a_frs1516.menpin33 ));
      params( 5211 ) := "+"( Float( a_frs1516.menpol11 ));
      params( 5212 ) := "+"( Float( a_frs1516.menpol12 ));
      params( 5213 ) := "+"( Integer'Pos( a_frs1516.menpol13 ));
      params( 5214 ) := "+"( Float( a_frs1516.menpol21 ));
      params( 5215 ) := "+"( Integer'Pos( a_frs1516.menpol22 ));
      params( 5216 ) := "+"( Integer'Pos( a_frs1516.menpol23 ));
      params( 5217 ) := "+"( Integer'Pos( a_frs1516.menpol31 ));
      params( 5218 ) := "+"( Integer'Pos( a_frs1516.menpol32 ));
      params( 5219 ) := "+"( Integer'Pos( a_frs1516.menpol33 ));
      params( 5220 ) := "+"( Integer'Pos( a_frs1516.pmenpo11 ));
      params( 5221 ) := "+"( Integer'Pos( a_frs1516.pmenpo12 ));
      params( 5222 ) := "+"( Integer'Pos( a_frs1516.pmenpo13 ));
      params( 5223 ) := "+"( Integer'Pos( a_frs1516.pmenpo21 ));
      params( 5224 ) := "+"( Integer'Pos( a_frs1516.pmenpo22 ));
      params( 5225 ) := "+"( Integer'Pos( a_frs1516.pmenpo23 ));
      params( 5226 ) := "+"( Integer'Pos( a_frs1516.pmenpo31 ));
      params( 5227 ) := "+"( Integer'Pos( a_frs1516.pmenpo32 ));
      params( 5228 ) := "+"( Integer'Pos( a_frs1516.pmenpo33 ));
      params( 5229 ) := "+"( Integer'Pos( a_frs1516.bedroom ));
      params( 5230 ) := "+"( Integer'Pos( a_frs1516.benunits ));
      params( 5231 ) := "+"( Integer'Pos( a_frs1516.billrate ));
      params( 5232 ) := "+"( Integer'Pos( a_frs1516.brma ));
      params( 5233 ) := "+"( Integer'Pos( a_frs1516.burden ));
      params( 5234 ) := "+"( Integer'Pos( a_frs1516.busroom ));
      params( 5235 ) := "+"( Integer'Pos( a_frs1516.capval ));
      params( 5236 ) := "+"( Integer'Pos( a_frs1516.charge1 ));
      params( 5237 ) := "+"( Integer'Pos( a_frs1516.charge2 ));
      params( 5238 ) := "+"( Integer'Pos( a_frs1516.charge3 ));
      params( 5239 ) := "+"( Integer'Pos( a_frs1516.charge4 ));
      params( 5240 ) := "+"( Integer'Pos( a_frs1516.charge5 ));
      params( 5241 ) := "+"( Integer'Pos( a_frs1516.charge6 ));
      params( 5242 ) := "+"( Integer'Pos( a_frs1516.charge7 ));
      params( 5243 ) := "+"( Integer'Pos( a_frs1516.charge8 ));
      params( 5244 ) := "+"( Integer'Pos( a_frs1516.charge9 ));
      params( 5245 ) := "+"( Integer'Pos( a_frs1516.chins ));
      params( 5246 ) := "+"( Integer'Pos( a_frs1516.chrgpd1 ));
      params( 5247 ) := "+"( Integer'Pos( a_frs1516.chrgpd2 ));
      params( 5248 ) := "+"( Integer'Pos( a_frs1516.chrgpd3 ));
      params( 5249 ) := "+"( Integer'Pos( a_frs1516.chrgpd4 ));
      params( 5250 ) := "+"( Integer'Pos( a_frs1516.chrgpd5 ));
      params( 5251 ) := "+"( Integer'Pos( a_frs1516.chrgpd6 ));
      params( 5252 ) := "+"( Integer'Pos( a_frs1516.chrgpd7 ));
      params( 5253 ) := "+"( Integer'Pos( a_frs1516.chrgpd8 ));
      params( 5254 ) := "+"( Integer'Pos( a_frs1516.chrgpd9 ));
      params( 5255 ) := "+"( Integer'Pos( a_frs1516.covoths ));
      params( 5256 ) := "+"( Float( a_frs1516.csewamt ));
      params( 5257 ) := "+"( Float( a_frs1516.csewamt1 ));
      params( 5258 ) := "+"( Integer'Pos( a_frs1516.ct25d50d ));
      params( 5259 ) := "+"( Integer'Pos( a_frs1516.ctamt ));
      params( 5260 ) := "+"( Integer'Pos( a_frs1516.ctannual ));
      params( 5261 ) := "+"( Integer'Pos( a_frs1516.ctband ));
      params( 5262 ) := "+"( Integer'Pos( a_frs1516.ctbwait ));
      params( 5263 ) := "+"( Integer'Pos( a_frs1516.ctcondoc ));
      params( 5264 ) := "+"( Integer'Pos( a_frs1516.ctdisc ));
      params( 5265 ) := "+"( Integer'Pos( a_frs1516.ctinstal ));
      params( 5266 ) := "+"( Integer'Pos( a_frs1516.ctlvband ));
      params( 5267 ) := "+"( Integer'Pos( a_frs1516.ctlvchk ));
      params( 5268 ) := "+"( Integer'Pos( a_frs1516.ctreb ));
      params( 5269 ) := "+"( Integer'Pos( a_frs1516.ctrebamt ));
      params( 5270 ) := "+"( Integer'Pos( a_frs1516.ctrebpd ));
      params( 5271 ) := "+"( Integer'Pos( a_frs1516.cttime ));
      params( 5272 ) := "+"( Integer'Pos( a_frs1516.cwatamt ));
      params( 5273 ) := "+"( Integer'Pos( a_frs1516.cwatamt1 ));
      params( 5274 ) := "+"( Integer'Pos( a_frs1516.entry1 ));
      params( 5275 ) := "+"( Integer'Pos( a_frs1516.entry2 ));
      params( 5276 ) := "+"( Integer'Pos( a_frs1516.entry3 ));
      params( 5277 ) := "+"( Integer'Pos( a_frs1516.entry4 ));
      params( 5278 ) := "+"( Integer'Pos( a_frs1516.gvtregn ));
      params( 5279 ) := "+"( Integer'Pos( a_frs1516.gvtregno ));
      params( 5280 ) := "+"( Integer'Pos( a_frs1516.hhldr01 ));
      params( 5281 ) := "+"( Integer'Pos( a_frs1516.hhldr02 ));
      params( 5282 ) := "+"( Integer'Pos( a_frs1516.hhldr03 ));
      params( 5283 ) := "+"( Integer'Pos( a_frs1516.hhldr04 ));
      params( 5284 ) := "+"( Integer'Pos( a_frs1516.hhldr05 ));
      params( 5285 ) := "+"( Integer'Pos( a_frs1516.hhldr06 ));
      params( 5286 ) := "+"( Integer'Pos( a_frs1516.hhldr07 ));
      params( 5287 ) := "+"( Integer'Pos( a_frs1516.hhldr08 ));
      params( 5288 ) := "+"( Integer'Pos( a_frs1516.hhldr09 ));
      params( 5289 ) := "+"( Integer'Pos( a_frs1516.hhldr10 ));
      params( 5290 ) := "+"( Integer'Pos( a_frs1516.hhldr11 ));
      params( 5291 ) := "+"( Integer'Pos( a_frs1516.hhldr12 ));
      params( 5292 ) := "+"( Integer'Pos( a_frs1516.hhldr13 ));
      params( 5293 ) := "+"( Integer'Pos( a_frs1516.hhldr14 ));
      params( 5294 ) := "+"( Integer'Pos( a_frs1516.hhldr97 ));
      params( 5295 ) := "+"( Integer'Pos( a_frs1516.hhstat ));
      params( 5296 ) := "+"( Integer'Pos( a_frs1516.hlthst ));
      params( 5297 ) := "+"( a_frs1516.intdate );
      params( 5298 ) := "+"( Integer'Pos( a_frs1516.mainacc ));
      params( 5299 ) := "+"( Integer'Pos( a_frs1516.mnthcode ));
      params( 5300 ) := "+"( Integer'Pos( a_frs1516.monlive ));
      params( 5301 ) := "+"( Integer'Pos( a_frs1516.multi ));
      params( 5302 ) := "+"( Integer'Pos( a_frs1516.nicoun ));
      params( 5303 ) := "+"( Integer'Pos( a_frs1516.nidpnd ));
      params( 5304 ) := "+"( Integer'Pos( a_frs1516.nmrmshar ));
      params( 5305 ) := "+"( Integer'Pos( a_frs1516.nopay ));
      params( 5306 ) := "+"( Integer'Pos( a_frs1516.norate ));
      params( 5307 ) := "+"( Integer'Pos( a_frs1516.onbsroom ));
      params( 5308 ) := "+"( Integer'Pos( a_frs1516.orgid ));
      params( 5309 ) := "+"( Integer'Pos( a_frs1516.payrate ));
      params( 5310 ) := "+"( Integer'Pos( a_frs1516.ptbsroom ));
      params( 5311 ) := "+"( Integer'Pos( a_frs1516.rooms ));
      params( 5312 ) := "+"( Integer'Pos( a_frs1516.roomshr ));
      params( 5313 ) := "+"( Float( a_frs1516.rt2rebam ));
      params( 5314 ) := "+"( Float( a_frs1516.rtannual ));
      params( 5315 ) := "+"( Integer'Pos( a_frs1516.rtcondoc ));
      params( 5316 ) := "+"( Integer'Pos( a_frs1516.rtdpa ));
      params( 5317 ) := "+"( Float( a_frs1516.rtdpaamt ));
      params( 5318 ) := "+"( Integer'Pos( a_frs1516.rtene ));
      params( 5319 ) := "+"( Integer'Pos( a_frs1516.rteneamt ));
      params( 5320 ) := "+"( Integer'Pos( a_frs1516.rtgen ));
      params( 5321 ) := "+"( Integer'Pos( a_frs1516.rtinstal ));
      params( 5322 ) := "+"( Integer'Pos( a_frs1516.rtlpa ));
      params( 5323 ) := "+"( Float( a_frs1516.rtlpaamt ));
      params( 5324 ) := "+"( Float( a_frs1516.rtothamt ));
      params( 5325 ) := "+"( Integer'Pos( a_frs1516.rtother ));
      params( 5326 ) := "+"( Integer'Pos( a_frs1516.rtreb ));
      params( 5327 ) := "+"( Float( a_frs1516.rtrebamt ));
      params( 5328 ) := "+"( Float( a_frs1516.rtrtramt ));
      params( 5329 ) := "+"( Integer'Pos( a_frs1516.rttimepd ));
      params( 5330 ) := "+"( Integer'Pos( a_frs1516.schbrk ));
      params( 5331 ) := "+"( Integer'Pos( a_frs1516.schfrt ));
      params( 5332 ) := "+"( Integer'Pos( a_frs1516.schmeal ));
      params( 5333 ) := "+"( Integer'Pos( a_frs1516.schmilk ));
      params( 5334 ) := "+"( Float( a_frs1516.seramt1 ));
      params( 5335 ) := "+"( Float( a_frs1516.seramt2 ));
      params( 5336 ) := "+"( Float( a_frs1516.seramt3 ));
      params( 5337 ) := "+"( Float( a_frs1516.seramt4 ));
      params( 5338 ) := "+"( Float( a_frs1516.seramt5 ));
      params( 5339 ) := "+"( Integer'Pos( a_frs1516.sercomb ));
      params( 5340 ) := "+"( Integer'Pos( a_frs1516.serpay1 ));
      params( 5341 ) := "+"( Integer'Pos( a_frs1516.serpay2 ));
      params( 5342 ) := "+"( Integer'Pos( a_frs1516.serpay3 ));
      params( 5343 ) := "+"( Integer'Pos( a_frs1516.serpay4 ));
      params( 5344 ) := "+"( Integer'Pos( a_frs1516.serpay5 ));
      params( 5345 ) := "+"( Float( a_frs1516.sewamt ));
      params( 5346 ) := "+"( Float( a_frs1516.sewanul ));
      params( 5347 ) := "+"( Integer'Pos( a_frs1516.sewerpay ));
      params( 5348 ) := "+"( Integer'Pos( a_frs1516.sewsep ));
      params( 5349 ) := "+"( Integer'Pos( a_frs1516.sewtime ));
      params( 5350 ) := "+"( Integer'Pos( a_frs1516.shelter ));
      params( 5351 ) := "+"( Integer'Pos( a_frs1516.sobuy ));
      params( 5352 ) := "+"( Float( a_frs1516.stramt1 ));
      params( 5353 ) := "+"( Float( a_frs1516.stramt2 ));
      params( 5354 ) := "+"( Integer'Pos( a_frs1516.strcov ));
      params( 5355 ) := "+"( Integer'Pos( a_frs1516.strmort ));
      params( 5356 ) := "+"( Integer'Pos( a_frs1516.stroths ));
      params( 5357 ) := "+"( Integer'Pos( a_frs1516.strpd1 ));
      params( 5358 ) := "+"( Integer'Pos( a_frs1516.strpd2 ));
      params( 5359 ) := "+"( Integer'Pos( a_frs1516.suballow ));
      params( 5360 ) := "+"( Integer'Pos( a_frs1516.sublet ));
      params( 5361 ) := "+"( Integer'Pos( a_frs1516.sublety ));
      params( 5362 ) := "+"( Float( a_frs1516.subrent ));
      params( 5363 ) := "+"( Integer'Pos( a_frs1516.tenure ));
      params( 5364 ) := "+"( Integer'Pos( a_frs1516.tvlic ));
      params( 5365 ) := "+"( Integer'Pos( a_frs1516.typeacc ));
      params( 5366 ) := "+"( Integer'Pos( a_frs1516.urb ));
      params( 5367 ) := "+"( Integer'Pos( a_frs1516.urbrur ));
      params( 5368 ) := "+"( Integer'Pos( a_frs1516.urindew ));
      params( 5369 ) := "+"( Integer'Pos( a_frs1516.urinds ));
      params( 5370 ) := "+"( Float( a_frs1516.watamt ));
      params( 5371 ) := "+"( Float( a_frs1516.watanul ));
      params( 5372 ) := "+"( Integer'Pos( a_frs1516.watermet ));
      params( 5373 ) := "+"( Integer'Pos( a_frs1516.waterpay ));
      params( 5374 ) := "+"( Integer'Pos( a_frs1516.watrb ));
      params( 5375 ) := "+"( Integer'Pos( a_frs1516.wattime ));
      params( 5376 ) := "+"( Integer'Pos( a_frs1516.whoctbot ));
      params( 5377 ) := "+"( Integer'Pos( a_frs1516.whorsp01 ));
      params( 5378 ) := "+"( Integer'Pos( a_frs1516.whorsp02 ));
      params( 5379 ) := "+"( Integer'Pos( a_frs1516.whorsp03 ));
      params( 5380 ) := "+"( Integer'Pos( a_frs1516.whorsp04 ));
      params( 5381 ) := "+"( Integer'Pos( a_frs1516.whorsp05 ));
      params( 5382 ) := "+"( Integer'Pos( a_frs1516.whorsp06 ));
      params( 5383 ) := "+"( Integer'Pos( a_frs1516.whorsp07 ));
      params( 5384 ) := "+"( Integer'Pos( a_frs1516.whorsp08 ));
      params( 5385 ) := "+"( Integer'Pos( a_frs1516.whorsp09 ));
      params( 5386 ) := "+"( Integer'Pos( a_frs1516.whorsp10 ));
      params( 5387 ) := "+"( Integer'Pos( a_frs1516.whorsp11 ));
      params( 5388 ) := "+"( Integer'Pos( a_frs1516.whorsp12 ));
      params( 5389 ) := "+"( Integer'Pos( a_frs1516.whorsp13 ));
      params( 5390 ) := "+"( Integer'Pos( a_frs1516.whorsp14 ));
      params( 5391 ) := "+"( Integer'Pos( a_frs1516.whynoct ));
      params( 5392 ) := "+"( Float( a_frs1516.wsewamt ));
      params( 5393 ) := "+"( Float( a_frs1516.wsewanul ));
      params( 5394 ) := "+"( Integer'Pos( a_frs1516.wsewtime ));
      params( 5395 ) := "+"( Integer'Pos( a_frs1516.yearlive ));
      params( 5396 ) := "+"( Integer'Pos( a_frs1516.yearwhc ));
      params( 5397 ) := "+"( Integer'Pos( a_frs1516.adulth ));
      params( 5398 ) := "+"( Integer'Pos( a_frs1516.cwatamtd ));
      params( 5399 ) := "+"( Integer'Pos( a_frs1516.depchldh ));
      params( 5400 ) := "+"( Integer'Pos( a_frs1516.dischha1 ));
      params( 5401 ) := "+"( Integer'Pos( a_frs1516.dischhc1 ));
      params( 5402 ) := "+"( Integer'Pos( a_frs1516.diswhha1 ));
      params( 5403 ) := "+"( Integer'Pos( a_frs1516.diswhhc1 ));
      params( 5404 ) := "+"( Float( a_frs1516.endowpay ));
      params( 5405 ) := "+"( Integer'Pos( a_frs1516.gbhscost ));
      params( 5406 ) := "+"( Integer'Pos( a_frs1516.grossct ));
      params( 5407 ) := "+"( Integer'Pos( a_frs1516.hbeninc ));
      params( 5408 ) := "+"( Integer'Pos( a_frs1516.hbindhh ));
      params( 5409 ) := "+"( Integer'Pos( a_frs1516.hbindhh2 ));
      params( 5410 ) := "+"( Integer'Pos( a_frs1516.hearns ));
      params( 5411 ) := "+"( Integer'Pos( a_frs1516.hhdisben ));
      params( 5412 ) := "+"( Integer'Pos( a_frs1516.hhinc ));
      params( 5413 ) := "+"( Integer'Pos( a_frs1516.hhinv ));
      params( 5414 ) := "+"( Integer'Pos( a_frs1516.hhirben ));
      params( 5415 ) := "+"( Integer'Pos( a_frs1516.hhnirben ));
      params( 5416 ) := "+"( Integer'Pos( a_frs1516.hhothben ));
      params( 5417 ) := "+"( Integer'Pos( a_frs1516.hhrent ));
      params( 5418 ) := "+"( Integer'Pos( a_frs1516.hhrinc ));
      params( 5419 ) := "+"( Integer'Pos( a_frs1516.hhrpinc ));
      params( 5420 ) := "+"( Float( a_frs1516.hhtvlic ));
      params( 5421 ) := "+"( Integer'Pos( a_frs1516.hhtxcred ));
      params( 5422 ) := "+"( Integer'Pos( a_frs1516.hothinc ));
      params( 5423 ) := "+"( Integer'Pos( a_frs1516.hpeninc ));
      params( 5424 ) := "+"( Integer'Pos( a_frs1516.hseinc ));
      params( 5425 ) := "+"( Integer'Pos( a_frs1516.london ));
      params( 5426 ) := "+"( Float( a_frs1516.mortint ));
      params( 5427 ) := "+"( Integer'Pos( a_frs1516.nihscost ));
      params( 5428 ) := "+"( Integer'Pos( a_frs1516.penage ));
      params( 5429 ) := "+"( Integer'Pos( a_frs1516.penhrp ));
      params( 5430 ) := "+"( Integer'Pos( a_frs1516.ptentyp2 ));
      params( 5431 ) := "+"( Float( a_frs1516.servpay ));
      params( 5432 ) := "+"( Float( a_frs1516.struins ));
      params( 5433 ) := "+"( Integer'Pos( a_frs1516.tentyp2 ));
      params( 5434 ) := "+"( Integer'Pos( a_frs1516.tuhhrent ));
      params( 5435 ) := "+"( Float( a_frs1516.tuwatsew ));
      params( 5436 ) := "+"( Float( a_frs1516.watsewrt ));
      params( 5437 ) := "+"( Float( a_frs1516.hcgrent ));
      params( 5438 ) := "+"( Integer'Pos( a_frs1516.hcfeudut ));
      params( 5439 ) := "+"( Float( a_frs1516.hcchrent ));
      params( 5440 ) := "+"( Float( a_frs1516.hcservch ));
      params( 5441 ) := "+"( Float( a_frs1516.hcmaint ));
      params( 5442 ) := "+"( Float( a_frs1516.hcsirent ));
      params( 5443 ) := "+"( Float( a_frs1516.hcfactor ));
      params( 5444 ) := "+"( Float( a_frs1516.hcother ));
      params( 5445 ) := "+"( Float( a_frs1516.hcpcomb ));
      params( 5446 ) := "+"( Integer'Pos( a_frs1516.gvhelp ));
      params( 5447 ) := "+"( Integer'Pos( a_frs1516.lacode ));
      params( 5448 ) := "+"( Integer'Pos( a_frs1516.lauacode ));
      params( 5449 ) := "+"( Integer'Pos( a_frs1516.llcare ));
      params( 5450 ) := "+"( Integer'Pos( a_frs1516.needcare ));
      params( 5451 ) := "+"( Integer'Pos( a_frs1516.colourtv ));
      params( 5452 ) := "+"( Integer'Pos( a_frs1516.bwtv ));
      params( 5453 ) := "+"( Integer'Pos( a_frs1516.serpd1 ));
      params( 5454 ) := "+"( Integer'Pos( a_frs1516.serpd2 ));
      params( 5455 ) := "+"( Integer'Pos( a_frs1516.serpd3 ));
      params( 5456 ) := "+"( Integer'Pos( a_frs1516.serpd4 ));
      params( 5457 ) := "+"( Integer'Pos( a_frs1516.serpd5 ));
      params( 5458 ) := "+"( Float( a_frs1516.outsam11 ));
      params( 5459 ) := "+"( Float( a_frs1516.outsam12 ));
      params( 5460 ) := "+"( Float( a_frs1516.outsam21 ));
      params( 5461 ) := "+"( Integer'Pos( a_frs1516.outsam22 ));
      params( 5462 ) := "+"( Integer'Pos( a_frs1516.outsam31 ));
      params( 5463 ) := "+"( Integer'Pos( a_frs1516.outsam32 ));
      params( 5464 ) := "+"( Integer'Pos( a_frs1516.outsin11 ));
      params( 5465 ) := "+"( Integer'Pos( a_frs1516.outsin12 ));
      params( 5466 ) := "+"( Integer'Pos( a_frs1516.outsin21 ));
      params( 5467 ) := "+"( Integer'Pos( a_frs1516.outsin22 ));
      params( 5468 ) := "+"( Integer'Pos( a_frs1516.outsin31 ));
      params( 5469 ) := "+"( Integer'Pos( a_frs1516.outsin32 ));
      params( 5470 ) := "+"( Integer'Pos( a_frs1516.outspa11 ));
      params( 5471 ) := "+"( Integer'Pos( a_frs1516.outspa12 ));
      params( 5472 ) := "+"( Integer'Pos( a_frs1516.outspa21 ));
      params( 5473 ) := "+"( Integer'Pos( a_frs1516.outspa22 ));
      params( 5474 ) := "+"( Integer'Pos( a_frs1516.outspa31 ));
      params( 5475 ) := "+"( Integer'Pos( a_frs1516.outspa32 ));
      params( 5476 ) := "+"( Integer'Pos( a_frs1516.outspd11 ));
      params( 5477 ) := "+"( Integer'Pos( a_frs1516.outspd12 ));
      params( 5478 ) := "+"( Integer'Pos( a_frs1516.outspd21 ));
      params( 5479 ) := "+"( Integer'Pos( a_frs1516.outspd22 ));
      params( 5480 ) := "+"( Integer'Pos( a_frs1516.outspd31 ));
      params( 5481 ) := "+"( Integer'Pos( a_frs1516.outspd32 ));
      params( 5482 ) := "+"( Float( a_frs1516.borramt1 ));
      params( 5483 ) := "+"( Integer'Pos( a_frs1516.borramt2 ));
      params( 5484 ) := "+"( Integer'Pos( a_frs1516.borramt3 ));
      params( 5485 ) := "+"( Integer'Pos( a_frs1516.endwp11 ));
      params( 5486 ) := "+"( Integer'Pos( a_frs1516.endwp12 ));
      params( 5487 ) := "+"( Integer'Pos( a_frs1516.endwp13 ));
      params( 5488 ) := "+"( Integer'Pos( a_frs1516.endwp21 ));
      params( 5489 ) := "+"( Integer'Pos( a_frs1516.endwp22 ));
      params( 5490 ) := "+"( Integer'Pos( a_frs1516.endwp23 ));
      params( 5491 ) := "+"( Integer'Pos( a_frs1516.endwp31 ));
      params( 5492 ) := "+"( Integer'Pos( a_frs1516.endwp32 ));
      params( 5493 ) := "+"( Integer'Pos( a_frs1516.endwp33 ));
      params( 5494 ) := "+"( Integer'Pos( a_frs1516.endwp41 ));
      params( 5495 ) := "+"( Integer'Pos( a_frs1516.endwp42 ));
      params( 5496 ) := "+"( Integer'Pos( a_frs1516.endwp43 ));
      params( 5497 ) := "+"( Integer'Pos( a_frs1516.endwp51 ));
      params( 5498 ) := "+"( Integer'Pos( a_frs1516.endwp52 ));
      params( 5499 ) := "+"( Integer'Pos( a_frs1516.endwp53 ));
      params( 5500 ) := "+"( Integer'Pos( a_frs1516.incmin11 ));
      params( 5501 ) := "+"( Integer'Pos( a_frs1516.incmin12 ));
      params( 5502 ) := "+"( Integer'Pos( a_frs1516.incmin13 ));
      params( 5503 ) := "+"( Integer'Pos( a_frs1516.incmin21 ));
      params( 5504 ) := "+"( Integer'Pos( a_frs1516.incmin22 ));
      params( 5505 ) := "+"( Integer'Pos( a_frs1516.incmin23 ));
      params( 5506 ) := "+"( Integer'Pos( a_frs1516.incmin31 ));
      params( 5507 ) := "+"( Integer'Pos( a_frs1516.incmin32 ));
      params( 5508 ) := "+"( Integer'Pos( a_frs1516.incmin33 ));
      params( 5509 ) := "+"( Integer'Pos( a_frs1516.incmp11 ));
      params( 5510 ) := "+"( Integer'Pos( a_frs1516.incmp12 ));
      params( 5511 ) := "+"( Integer'Pos( a_frs1516.incmp13 ));
      params( 5512 ) := "+"( Integer'Pos( a_frs1516.incmp21 ));
      params( 5513 ) := "+"( Integer'Pos( a_frs1516.incmp22 ));
      params( 5514 ) := "+"( Integer'Pos( a_frs1516.incmp23 ));
      params( 5515 ) := "+"( Integer'Pos( a_frs1516.incmp31 ));
      params( 5516 ) := "+"( Integer'Pos( a_frs1516.incmp32 ));
      params( 5517 ) := "+"( Integer'Pos( a_frs1516.incmp33 ));
      params( 5518 ) := "+"( Float( a_frs1516.incmpa11 ));
      params( 5519 ) := "+"( Float( a_frs1516.incmpa12 ));
      params( 5520 ) := "+"( Float( a_frs1516.incmpa13 ));
      params( 5521 ) := "+"( Float( a_frs1516.incmpa21 ));
      params( 5522 ) := "+"( Integer'Pos( a_frs1516.incmpa22 ));
      params( 5523 ) := "+"( Integer'Pos( a_frs1516.incmpa23 ));
      params( 5524 ) := "+"( Float( a_frs1516.incmpa31 ));
      params( 5525 ) := "+"( Integer'Pos( a_frs1516.incmpa32 ));
      params( 5526 ) := "+"( Integer'Pos( a_frs1516.incmpa33 ));
      params( 5527 ) := "+"( Integer'Pos( a_frs1516.pincmp11 ));
      params( 5528 ) := "+"( Integer'Pos( a_frs1516.pincmp12 ));
      params( 5529 ) := "+"( Integer'Pos( a_frs1516.pincmp13 ));
      params( 5530 ) := "+"( Integer'Pos( a_frs1516.pincmp21 ));
      params( 5531 ) := "+"( Integer'Pos( a_frs1516.pincmp22 ));
      params( 5532 ) := "+"( Integer'Pos( a_frs1516.pincmp23 ));
      params( 5533 ) := "+"( Integer'Pos( a_frs1516.pincmp31 ));
      params( 5534 ) := "+"( Integer'Pos( a_frs1516.pincmp32 ));
      params( 5535 ) := "+"( Integer'Pos( a_frs1516.pincmp33 ));
      params( 5536 ) := "+"( Float( a_frs1516.intpri1 ));
      params( 5537 ) := "+"( Float( a_frs1516.intpri2 ));
      params( 5538 ) := "+"( Float( a_frs1516.intpri3 ));
      params( 5539 ) := "+"( Integer'Pos( a_frs1516.pintrpi1 ));
      params( 5540 ) := "+"( Integer'Pos( a_frs1516.pintrpi2 ));
      params( 5541 ) := "+"( Integer'Pos( a_frs1516.pintrpi3 ));
      params( 5542 ) := "+"( Integer'Pos( a_frs1516.loanyr1 ));
      params( 5543 ) := "+"( Integer'Pos( a_frs1516.loanyr2 ));
      params( 5544 ) := "+"( Integer'Pos( a_frs1516.loanyr3 ));
      params( 5545 ) := "+"( Integer'Pos( a_frs1516.menpol1 ));
      params( 5546 ) := "+"( Integer'Pos( a_frs1516.menpol2 ));
      params( 5547 ) := "+"( Integer'Pos( a_frs1516.menpol3 ));
      params( 5548 ) := "+"( Integer'Pos( a_frs1516.morall1 ));
      params( 5549 ) := "+"( Integer'Pos( a_frs1516.morall2 ));
      params( 5550 ) := "+"( Integer'Pos( a_frs1516.morall3 ));
      params( 5551 ) := "+"( Integer'Pos( a_frs1516.morflc1 ));
      params( 5552 ) := "+"( Integer'Pos( a_frs1516.morflc2 ));
      params( 5553 ) := "+"( Integer'Pos( a_frs1516.morflc3 ));
      params( 5554 ) := "+"( Float( a_frs1516.morinp1 ));
      params( 5555 ) := "+"( Float( a_frs1516.morinp2 ));
      params( 5556 ) := "+"( Float( a_frs1516.morinp3 ));
      params( 5557 ) := "+"( Integer'Pos( a_frs1516.pmorinp1 ));
      params( 5558 ) := "+"( Integer'Pos( a_frs1516.pmorinp2 ));
      params( 5559 ) := "+"( Integer'Pos( a_frs1516.pmorinp3 ));
      params( 5560 ) := "+"( Integer'Pos( a_frs1516.morinus1 ));
      params( 5561 ) := "+"( Integer'Pos( a_frs1516.morinus2 ));
      params( 5562 ) := "+"( Integer'Pos( a_frs1516.morinus3 ));
      params( 5563 ) := "+"( Integer'Pos( a_frs1516.mortend1 ));
      params( 5564 ) := "+"( Integer'Pos( a_frs1516.mortend2 ));
      params( 5565 ) := "+"( Integer'Pos( a_frs1516.mortend3 ));
      params( 5566 ) := "+"( Float( a_frs1516.mortlef1 ));
      params( 5567 ) := "+"( Float( a_frs1516.mortlef2 ));
      params( 5568 ) := "+"( Integer'Pos( a_frs1516.mortlef3 ));
      params( 5569 ) := "+"( Integer'Pos( a_frs1516.mortpro1 ));
      params( 5570 ) := "+"( Integer'Pos( a_frs1516.mortpro2 ));
      params( 5571 ) := "+"( Integer'Pos( a_frs1516.mortpro3 ));
      params( 5572 ) := "+"( Integer'Pos( a_frs1516.morttyp1 ));
      params( 5573 ) := "+"( Integer'Pos( a_frs1516.morttyp2 ));
      params( 5574 ) := "+"( Integer'Pos( a_frs1516.morttyp3 ));
      params( 5575 ) := "+"( Integer'Pos( a_frs1516.morupd1 ));
      params( 5576 ) := "+"( Integer'Pos( a_frs1516.morupd2 ));
      params( 5577 ) := "+"( Integer'Pos( a_frs1516.morupd3 ));
      params( 5578 ) := "+"( Float( a_frs1516.morus1 ));
      params( 5579 ) := "+"( Integer'Pos( a_frs1516.morus2 ));
      params( 5580 ) := "+"( Integer'Pos( a_frs1516.morus3 ));
      params( 5581 ) := "+"( Integer'Pos( a_frs1516.mpcove11 ));
      params( 5582 ) := "+"( Integer'Pos( a_frs1516.mpcove12 ));
      params( 5583 ) := "+"( Integer'Pos( a_frs1516.mpcove13 ));
      params( 5584 ) := "+"( Integer'Pos( a_frs1516.mpcove21 ));
      params( 5585 ) := "+"( Integer'Pos( a_frs1516.mpcove22 ));
      params( 5586 ) := "+"( Integer'Pos( a_frs1516.mpcove23 ));
      params( 5587 ) := "+"( Integer'Pos( a_frs1516.mpcove31 ));
      params( 5588 ) := "+"( Integer'Pos( a_frs1516.mpcove32 ));
      params( 5589 ) := "+"( Integer'Pos( a_frs1516.mpcove33 ));
      params( 5590 ) := "+"( Integer'Pos( a_frs1516.outsmor1 ));
      params( 5591 ) := "+"( Integer'Pos( a_frs1516.outsmor2 ));
      params( 5592 ) := "+"( Integer'Pos( a_frs1516.outsmor3 ));
      params( 5593 ) := "+"( Float( a_frs1516.rmamt1 ));
      params( 5594 ) := "+"( Integer'Pos( a_frs1516.rmamt2 ));
      params( 5595 ) := "+"( Integer'Pos( a_frs1516.rmamt3 ));
      params( 5596 ) := "+"( Integer'Pos( a_frs1516.rmort1 ));
      params( 5597 ) := "+"( Integer'Pos( a_frs1516.rmort2 ));
      params( 5598 ) := "+"( Integer'Pos( a_frs1516.rmort3 ));
      params( 5599 ) := "+"( Integer'Pos( a_frs1516.rmortyr1 ));
      params( 5600 ) := "+"( Integer'Pos( a_frs1516.rmortyr2 ));
      params( 5601 ) := "+"( Integer'Pos( a_frs1516.rmortyr3 ));
      params( 5602 ) := "+"( Integer'Pos( a_frs1516.rmpur011 ));
      params( 5603 ) := "+"( Integer'Pos( a_frs1516.rmpur012 ));
      params( 5604 ) := "+"( Integer'Pos( a_frs1516.rmpur013 ));
      params( 5605 ) := "+"( Integer'Pos( a_frs1516.rmpur021 ));
      params( 5606 ) := "+"( Integer'Pos( a_frs1516.rmpur022 ));
      params( 5607 ) := "+"( Integer'Pos( a_frs1516.rmpur023 ));
      params( 5608 ) := "+"( Integer'Pos( a_frs1516.rmpur031 ));
      params( 5609 ) := "+"( Integer'Pos( a_frs1516.rmpur032 ));
      params( 5610 ) := "+"( Integer'Pos( a_frs1516.rmpur033 ));
      params( 5611 ) := "+"( Integer'Pos( a_frs1516.rmpur041 ));
      params( 5612 ) := "+"( Integer'Pos( a_frs1516.rmpur042 ));
      params( 5613 ) := "+"( Integer'Pos( a_frs1516.rmpur043 ));
      params( 5614 ) := "+"( Integer'Pos( a_frs1516.rmpur051 ));
      params( 5615 ) := "+"( Integer'Pos( a_frs1516.rmpur052 ));
      params( 5616 ) := "+"( Integer'Pos( a_frs1516.rmpur053 ));
      params( 5617 ) := "+"( Integer'Pos( a_frs1516.rmpur061 ));
      params( 5618 ) := "+"( Integer'Pos( a_frs1516.rmpur062 ));
      params( 5619 ) := "+"( Integer'Pos( a_frs1516.rmpur063 ));
      params( 5620 ) := "+"( Integer'Pos( a_frs1516.rmpur071 ));
      params( 5621 ) := "+"( Integer'Pos( a_frs1516.rmpur072 ));
      params( 5622 ) := "+"( Integer'Pos( a_frs1516.rmpur073 ));
      params( 5623 ) := "+"( Integer'Pos( a_frs1516.rmpur081 ));
      params( 5624 ) := "+"( Integer'Pos( a_frs1516.rmpur082 ));
      params( 5625 ) := "+"( Integer'Pos( a_frs1516.rmpur083 ));
      params( 5626 ) := "+"( Integer'Pos( a_frs1516.buyyear ));
      params( 5627 ) := "+"( Float( a_frs1516.purcamt ));
      params( 5628 ) := "+"( Integer'Pos( a_frs1516.purcloan ));
      params( 5629 ) := "+"( Integer'Pos( a_frs1516.secmpur3 ));
      params( 5630 ) := "+"( Integer'Pos( a_frs1516.secmpur4 ));
      params( 5631 ) := "+"( Integer'Pos( a_frs1516.secmpur1 ));
      params( 5632 ) := "+"( Integer'Pos( a_frs1516.secmpur5 ));
      params( 5633 ) := "+"( Integer'Pos( a_frs1516.secmpur6 ));
      params( 5634 ) := "+"( Integer'Pos( a_frs1516.secmpur2 ));
      params( 5635 ) := "+"( Integer'Pos( a_frs1516.secmpur7 ));
      params( 5636 ) := "+"( Float( a_frs1516.rexhham1 ));
      params( 5637 ) := "+"( Integer'Pos( a_frs1516.accchk1 ));
      params( 5638 ) := "+"( Integer'Pos( a_frs1516.rexhhwh1 ));
      params( 5639 ) := "+"( Integer'Pos( a_frs1516.prexhha1 ));
      params( 5640 ) := "+"( Integer'Pos( a_frs1516.accjbp10 ));
      params( 5641 ) := "+"( Integer'Pos( a_frs1516.accjbp11 ));
      params( 5642 ) := "+"( Integer'Pos( a_frs1516.accjbp12 ));
      params( 5643 ) := "+"( Integer'Pos( a_frs1516.accjbp13 ));
      params( 5644 ) := "+"( Integer'Pos( a_frs1516.accjbp14 ));
      params( 5645 ) := "+"( Integer'Pos( a_frs1516.accjob ));
      params( 5646 ) := "+"( Integer'Pos( a_frs1516.ctract ));
      params( 5647 ) := "+"( Float( a_frs1516.eligamt ));
      params( 5648 ) := "+"( Integer'Pos( a_frs1516.eligpd ));
      params( 5649 ) := "+"( Integer'Pos( a_frs1516.fairrent ));
      params( 5650 ) := "+"( Integer'Pos( a_frs1516.furnish ));
      params( 5651 ) := "+"( Float( a_frs1516.hbenamt ));
      params( 5652 ) := "+"( Integer'Pos( a_frs1516.hbenchk ));
      params( 5653 ) := "+"( Integer'Pos( a_frs1516.hbenefit ));
      params( 5654 ) := "+"( Integer'Pos( a_frs1516.hbenpd ));
      params( 5655 ) := "+"( Integer'Pos( a_frs1516.hbenwait ));
      params( 5656 ) := "+"( Integer'Pos( a_frs1516.hbmnth ));
      params( 5657 ) := "+"( Integer'Pos( a_frs1516.hbrecp ));
      params( 5658 ) := "+"( Integer'Pos( a_frs1516.hbweeks ));
      params( 5659 ) := "+"( Integer'Pos( a_frs1516.hbyear ));
      params( 5660 ) := "+"( Integer'Pos( a_frs1516.hbyears ));
      params( 5661 ) := "+"( Integer'Pos( a_frs1516.landlord ));
      params( 5662 ) := "+"( Integer'Pos( a_frs1516.niystart ));
      params( 5663 ) := "+"( Integer'Pos( a_frs1516.othtype ));
      params( 5664 ) := "+"( Integer'Pos( a_frs1516.rebate ));
      params( 5665 ) := "+"( Float( a_frs1516.rent ));
      params( 5666 ) := "+"( Integer'Pos( a_frs1516.rentdoc ));
      params( 5667 ) := "+"( Integer'Pos( a_frs1516.renthol ));
      params( 5668 ) := "+"( Integer'Pos( a_frs1516.rentpd ));
      params( 5669 ) := "+"( Integer'Pos( a_frs1516.rentpd1 ));
      params( 5670 ) := "+"( Integer'Pos( a_frs1516.rentpd2 ));
      params( 5671 ) := "+"( Integer'Pos( a_frs1516.resll ));
      params( 5672 ) := "+"( Integer'Pos( a_frs1516.resll2 ));
      params( 5673 ) := "+"( Integer'Pos( a_frs1516.serincam ));
      params( 5674 ) := "+"( Integer'Pos( a_frs1516.tentype ));
      params( 5675 ) := "+"( Integer'Pos( a_frs1516.weekhol ));
      params( 5676 ) := "+"( Integer'Pos( a_frs1516.wsinc ));
      params( 5677 ) := "+"( Float( a_frs1516.wsincamt ));
      params( 5678 ) := "+"( Integer'Pos( a_frs1516.ystartr ));
      params( 5679 ) := "+"( Integer'Pos( a_frs1516.accjbp1 ));
      params( 5680 ) := "+"( Integer'Pos( a_frs1516.accjbp2 ));
      params( 5681 ) := "+"( Integer'Pos( a_frs1516.accjbp3 ));
      params( 5682 ) := "+"( Integer'Pos( a_frs1516.accjbp4 ));
      params( 5683 ) := "+"( Integer'Pos( a_frs1516.accjbp5 ));
      params( 5684 ) := "+"( Integer'Pos( a_frs1516.accjbp6 ));
      params( 5685 ) := "+"( Integer'Pos( a_frs1516.accjbp7 ));
      params( 5686 ) := "+"( Integer'Pos( a_frs1516.accjbp8 ));
      params( 5687 ) := "+"( Integer'Pos( a_frs1516.accjbp9 ));
      params( 5688 ) := "+"( Integer'Pos( a_frs1516.rexhh ));
      params( 5689 ) := "+"( Float( a_frs1516.rntfull ));
      params( 5690 ) := "+"( Integer'Pos( a_frs1516.lighting ));
      params( 5691 ) := "+"( Integer'Pos( a_frs1516.heating ));
      params( 5692 ) := "+"( Integer'Pos( a_frs1516.hotwater ));
      params( 5693 ) := "+"( Integer'Pos( a_frs1516.fuelcook ));
      params( 5694 ) := "+"( Integer'Pos( a_frs1516.tvlice ));
      params( 5695 ) := "+"( Integer'Pos( a_frs1516.elec ));
      params( 5696 ) := "+"( Integer'Pos( a_frs1516.gas ));
      params( 5697 ) := "+"( Integer'Pos( a_frs1516.lsf ));
      params( 5698 ) := "+"( Integer'Pos( a_frs1516.user_id ));
      params( 5699 ) := "+"( Integer'Pos( a_frs1516.edition ));
      params( 5700 ) := "+"( Integer'Pos( a_frs1516.year ));
      params( 5701 ) := As_Bigint( a_frs1516.sernum );
      params( 5702 ) := "+"( Integer'Pos( a_frs1516.benunit ));
      
      gse.Execute( local_connection, UPDATE_PS, params );
      Check_Result( local_connection );
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
   end Update;


   --
   -- Save the compelete given record 
   -- otherwise throws DB_Exception exception. 
   --
   SAVE_PS : constant gse.Prepared_Statement := Get_Prepared_Insert_Statement;      

   procedure Save( a_frs1516 : Ukds.Frs.Frs1516; overwrite : Boolean := True; connection : Database_Connection := null ) is   
      params              : gse.SQL_Parameters := Get_Configured_Insert_Params;
      local_connection    : Database_Connection;
      is_local_connection : Boolean;
      aliased_ugrsp1hd : aliased String := To_String( a_frs1516.ugrsp1hd );
   begin
      if( connection = null )then
          local_connection := Connection_Pool.Lease;
          is_local_connection := True;
      else
          local_connection := connection;          
          is_local_connection := False;
      end if;
      if overwrite and Exists( a_frs1516.user_id, a_frs1516.edition, a_frs1516.year, a_frs1516.sernum, a_frs1516.benunit ) then
         Update( a_frs1516, local_connection );
         if( is_local_connection )then
            Connection_Pool.Return_Connection( local_connection );
         end if;
         return;
      end if;
      params( 1 ) := "+"( Integer'Pos( a_frs1516.user_id ));
      params( 2 ) := "+"( Integer'Pos( a_frs1516.edition ));
      params( 3 ) := "+"( Integer'Pos( a_frs1516.year ));
      params( 4 ) := As_Bigint( a_frs1516.sernum );
      params( 5 ) := "+"( Integer'Pos( a_frs1516.benunit ));
      params( 6 ) := "+"( Float( a_frs1516.int1hd ));
      params( 7 ) := "+"( Float( a_frs1516.int2hd ));
      params( 8 ) := "+"( Float( a_frs1516.int3hd ));
      params( 9 ) := "+"( Integer'Pos( a_frs1516.int4hd ));
      params( 10 ) := "+"( Float( a_frs1516.int5hd ));
      params( 11 ) := "+"( Float( a_frs1516.int6hd ));
      params( 12 ) := "+"( Float( a_frs1516.int7hd ));
      params( 13 ) := "+"( Float( a_frs1516.int8hd ));
      params( 14 ) := "+"( Integer'Pos( a_frs1516.int9hd ));
      params( 15 ) := "+"( Integer'Pos( a_frs1516.int10hd ));
      params( 16 ) := "+"( Integer'Pos( a_frs1516.int11hd ));
      params( 17 ) := "+"( Integer'Pos( a_frs1516.int12hd ));
      params( 18 ) := "+"( Integer'Pos( a_frs1516.int13hd ));
      params( 19 ) := "+"( Integer'Pos( a_frs1516.int14hd ));
      params( 20 ) := "+"( Integer'Pos( a_frs1516.int15hd ));
      params( 21 ) := "+"( Integer'Pos( a_frs1516.int16hd ));
      params( 22 ) := "+"( Integer'Pos( a_frs1516.int17hd ));
      params( 23 ) := "+"( Integer'Pos( a_frs1516.int18hd ));
      params( 24 ) := "+"( Integer'Pos( a_frs1516.int19hd ));
      params( 25 ) := "+"( Float( a_frs1516.int21hd ));
      params( 26 ) := "+"( Integer'Pos( a_frs1516.int22hd ));
      params( 27 ) := "+"( Integer'Pos( a_frs1516.int23hd ));
      params( 28 ) := "+"( Float( a_frs1516.int24hd ));
      params( 29 ) := "+"( Integer'Pos( a_frs1516.int25hd ));
      params( 30 ) := "+"( Integer'Pos( a_frs1516.int26hd ));
      params( 31 ) := "+"( Float( a_frs1516.int27hd ));
      params( 32 ) := "+"( Float( a_frs1516.int28hd ));
      params( 33 ) := "+"( Integer'Pos( a_frs1516.int29hd ));
      params( 34 ) := "+"( Integer'Pos( a_frs1516.int30hd ));
      params( 35 ) := "+"( Float( a_frs1516.int1sp ));
      params( 36 ) := "+"( Float( a_frs1516.int2sp ));
      params( 37 ) := "+"( Float( a_frs1516.int3sp ));
      params( 38 ) := "+"( Integer'Pos( a_frs1516.int4sp ));
      params( 39 ) := "+"( Float( a_frs1516.int5sp ));
      params( 40 ) := "+"( Float( a_frs1516.int6sp ));
      params( 41 ) := "+"( Float( a_frs1516.int7sp ));
      params( 42 ) := "+"( Float( a_frs1516.int8sp ));
      params( 43 ) := "+"( Integer'Pos( a_frs1516.int9sp ));
      params( 44 ) := "+"( Integer'Pos( a_frs1516.int10sp ));
      params( 45 ) := "+"( Integer'Pos( a_frs1516.int11sp ));
      params( 46 ) := "+"( Integer'Pos( a_frs1516.int12sp ));
      params( 47 ) := "+"( Integer'Pos( a_frs1516.int13sp ));
      params( 48 ) := "+"( Integer'Pos( a_frs1516.int14sp ));
      params( 49 ) := "+"( Integer'Pos( a_frs1516.int15sp ));
      params( 50 ) := "+"( Integer'Pos( a_frs1516.int16sp ));
      params( 51 ) := "+"( Integer'Pos( a_frs1516.int17sp ));
      params( 52 ) := "+"( Integer'Pos( a_frs1516.int18sp ));
      params( 53 ) := "+"( Integer'Pos( a_frs1516.int19sp ));
      params( 54 ) := "+"( Float( a_frs1516.int21sp ));
      params( 55 ) := "+"( Integer'Pos( a_frs1516.int22sp ));
      params( 56 ) := "+"( Integer'Pos( a_frs1516.int23sp ));
      params( 57 ) := "+"( Float( a_frs1516.int24sp ));
      params( 58 ) := "+"( Integer'Pos( a_frs1516.int25sp ));
      params( 59 ) := "+"( Integer'Pos( a_frs1516.int26sp ));
      params( 60 ) := "+"( Float( a_frs1516.int27sp ));
      params( 61 ) := "+"( Float( a_frs1516.int28sp ));
      params( 62 ) := "+"( Integer'Pos( a_frs1516.int29sp ));
      params( 63 ) := "+"( Integer'Pos( a_frs1516.int30sp ));
      params( 64 ) := "+"( Integer'Pos( a_frs1516.intx1hd ));
      params( 65 ) := "+"( Integer'Pos( a_frs1516.intx2hd ));
      params( 66 ) := "+"( Integer'Pos( a_frs1516.intx3hd ));
      params( 67 ) := "+"( Integer'Pos( a_frs1516.intx4hd ));
      params( 68 ) := "+"( Integer'Pos( a_frs1516.intx5hd ));
      params( 69 ) := "+"( Integer'Pos( a_frs1516.intx6hd ));
      params( 70 ) := "+"( Integer'Pos( a_frs1516.intx7hd ));
      params( 71 ) := "+"( Integer'Pos( a_frs1516.intx8hd ));
      params( 72 ) := "+"( Integer'Pos( a_frs1516.intx9hd ));
      params( 73 ) := "+"( Integer'Pos( a_frs1516.intx10hd ));
      params( 74 ) := "+"( Integer'Pos( a_frs1516.intx11hd ));
      params( 75 ) := "+"( Integer'Pos( a_frs1516.intx12hd ));
      params( 76 ) := "+"( Integer'Pos( a_frs1516.intx13hd ));
      params( 77 ) := "+"( Integer'Pos( a_frs1516.intx14hd ));
      params( 78 ) := "+"( Integer'Pos( a_frs1516.intx15hd ));
      params( 79 ) := "+"( Integer'Pos( a_frs1516.intx16hd ));
      params( 80 ) := "+"( Integer'Pos( a_frs1516.intx17hd ));
      params( 81 ) := "+"( Integer'Pos( a_frs1516.intx18hd ));
      params( 82 ) := "+"( Integer'Pos( a_frs1516.intx19hd ));
      params( 83 ) := "+"( Integer'Pos( a_frs1516.intx21hd ));
      params( 84 ) := "+"( Integer'Pos( a_frs1516.intx22hd ));
      params( 85 ) := "+"( Integer'Pos( a_frs1516.intx23hd ));
      params( 86 ) := "+"( Integer'Pos( a_frs1516.intx24hd ));
      params( 87 ) := "+"( Integer'Pos( a_frs1516.intx25hd ));
      params( 88 ) := "+"( Integer'Pos( a_frs1516.intx26hd ));
      params( 89 ) := "+"( Integer'Pos( a_frs1516.intx27hd ));
      params( 90 ) := "+"( Integer'Pos( a_frs1516.intx28hd ));
      params( 91 ) := "+"( Integer'Pos( a_frs1516.intx29hd ));
      params( 92 ) := "+"( Integer'Pos( a_frs1516.intx30hd ));
      params( 93 ) := "+"( Integer'Pos( a_frs1516.intx1sp ));
      params( 94 ) := "+"( Integer'Pos( a_frs1516.intx2sp ));
      params( 95 ) := "+"( Integer'Pos( a_frs1516.intx3sp ));
      params( 96 ) := "+"( Integer'Pos( a_frs1516.intx4sp ));
      params( 97 ) := "+"( Integer'Pos( a_frs1516.intx5sp ));
      params( 98 ) := "+"( Integer'Pos( a_frs1516.intx6sp ));
      params( 99 ) := "+"( Integer'Pos( a_frs1516.intx7sp ));
      params( 100 ) := "+"( Integer'Pos( a_frs1516.intx8sp ));
      params( 101 ) := "+"( Integer'Pos( a_frs1516.intx9sp ));
      params( 102 ) := "+"( Integer'Pos( a_frs1516.intx10sp ));
      params( 103 ) := "+"( Integer'Pos( a_frs1516.intx11sp ));
      params( 104 ) := "+"( Integer'Pos( a_frs1516.intx12sp ));
      params( 105 ) := "+"( Integer'Pos( a_frs1516.intx13sp ));
      params( 106 ) := "+"( Integer'Pos( a_frs1516.intx14sp ));
      params( 107 ) := "+"( Integer'Pos( a_frs1516.intx15sp ));
      params( 108 ) := "+"( Integer'Pos( a_frs1516.intx16sp ));
      params( 109 ) := "+"( Integer'Pos( a_frs1516.intx17sp ));
      params( 110 ) := "+"( Integer'Pos( a_frs1516.intx18sp ));
      params( 111 ) := "+"( Integer'Pos( a_frs1516.intx19sp ));
      params( 112 ) := "+"( Integer'Pos( a_frs1516.intx21sp ));
      params( 113 ) := "+"( Integer'Pos( a_frs1516.intx22sp ));
      params( 114 ) := "+"( Integer'Pos( a_frs1516.intx23sp ));
      params( 115 ) := "+"( Integer'Pos( a_frs1516.intx24sp ));
      params( 116 ) := "+"( Integer'Pos( a_frs1516.intx25sp ));
      params( 117 ) := "+"( Integer'Pos( a_frs1516.intx26sp ));
      params( 118 ) := "+"( Integer'Pos( a_frs1516.intx27sp ));
      params( 119 ) := "+"( Integer'Pos( a_frs1516.intx28sp ));
      params( 120 ) := "+"( Integer'Pos( a_frs1516.intx29sp ));
      params( 121 ) := "+"( Integer'Pos( a_frs1516.intx30sp ));
      params( 122 ) := "+"( Integer'Pos( a_frs1516.invt1hd ));
      params( 123 ) := "+"( Integer'Pos( a_frs1516.invt2hd ));
      params( 124 ) := "+"( Integer'Pos( a_frs1516.invt3hd ));
      params( 125 ) := "+"( Integer'Pos( a_frs1516.invt4hd ));
      params( 126 ) := "+"( Integer'Pos( a_frs1516.invt5hd ));
      params( 127 ) := "+"( Integer'Pos( a_frs1516.invt6hd ));
      params( 128 ) := "+"( Integer'Pos( a_frs1516.invt7hd ));
      params( 129 ) := "+"( Integer'Pos( a_frs1516.invt8hd ));
      params( 130 ) := "+"( Integer'Pos( a_frs1516.invt9hd ));
      params( 131 ) := "+"( Integer'Pos( a_frs1516.invt10hd ));
      params( 132 ) := "+"( Integer'Pos( a_frs1516.invt11hd ));
      params( 133 ) := "+"( Integer'Pos( a_frs1516.invt12hd ));
      params( 134 ) := "+"( Integer'Pos( a_frs1516.invt13hd ));
      params( 135 ) := "+"( Integer'Pos( a_frs1516.invt14hd ));
      params( 136 ) := "+"( Integer'Pos( a_frs1516.invt15hd ));
      params( 137 ) := "+"( Integer'Pos( a_frs1516.invt16hd ));
      params( 138 ) := "+"( Integer'Pos( a_frs1516.invt17hd ));
      params( 139 ) := "+"( Integer'Pos( a_frs1516.invt18hd ));
      params( 140 ) := "+"( Integer'Pos( a_frs1516.invt19hd ));
      params( 141 ) := "+"( Integer'Pos( a_frs1516.invt21hd ));
      params( 142 ) := "+"( Integer'Pos( a_frs1516.invt22hd ));
      params( 143 ) := "+"( Integer'Pos( a_frs1516.invt23hd ));
      params( 144 ) := "+"( Integer'Pos( a_frs1516.invt24hd ));
      params( 145 ) := "+"( Integer'Pos( a_frs1516.invt25hd ));
      params( 146 ) := "+"( Integer'Pos( a_frs1516.invt26hd ));
      params( 147 ) := "+"( Integer'Pos( a_frs1516.invt27hd ));
      params( 148 ) := "+"( Integer'Pos( a_frs1516.invt28hd ));
      params( 149 ) := "+"( Integer'Pos( a_frs1516.invt29hd ));
      params( 150 ) := "+"( Integer'Pos( a_frs1516.invt30hd ));
      params( 151 ) := "+"( Integer'Pos( a_frs1516.invt1sp ));
      params( 152 ) := "+"( Integer'Pos( a_frs1516.invt2sp ));
      params( 153 ) := "+"( Integer'Pos( a_frs1516.invt3sp ));
      params( 154 ) := "+"( Integer'Pos( a_frs1516.invt4sp ));
      params( 155 ) := "+"( Integer'Pos( a_frs1516.invt5sp ));
      params( 156 ) := "+"( Integer'Pos( a_frs1516.invt6sp ));
      params( 157 ) := "+"( Integer'Pos( a_frs1516.invt7sp ));
      params( 158 ) := "+"( Integer'Pos( a_frs1516.invt8sp ));
      params( 159 ) := "+"( Integer'Pos( a_frs1516.invt9sp ));
      params( 160 ) := "+"( Integer'Pos( a_frs1516.invt10sp ));
      params( 161 ) := "+"( Integer'Pos( a_frs1516.invt11sp ));
      params( 162 ) := "+"( Integer'Pos( a_frs1516.invt12sp ));
      params( 163 ) := "+"( Integer'Pos( a_frs1516.invt13sp ));
      params( 164 ) := "+"( Integer'Pos( a_frs1516.invt14sp ));
      params( 165 ) := "+"( Integer'Pos( a_frs1516.invt15sp ));
      params( 166 ) := "+"( Integer'Pos( a_frs1516.invt16sp ));
      params( 167 ) := "+"( Integer'Pos( a_frs1516.invt17sp ));
      params( 168 ) := "+"( Integer'Pos( a_frs1516.invt18sp ));
      params( 169 ) := "+"( Integer'Pos( a_frs1516.invt19sp ));
      params( 170 ) := "+"( Integer'Pos( a_frs1516.invt21sp ));
      params( 171 ) := "+"( Integer'Pos( a_frs1516.invt22sp ));
      params( 172 ) := "+"( Integer'Pos( a_frs1516.invt23sp ));
      params( 173 ) := "+"( Integer'Pos( a_frs1516.invt24sp ));
      params( 174 ) := "+"( Integer'Pos( a_frs1516.invt25sp ));
      params( 175 ) := "+"( Integer'Pos( a_frs1516.invt26sp ));
      params( 176 ) := "+"( Integer'Pos( a_frs1516.invt27sp ));
      params( 177 ) := "+"( Integer'Pos( a_frs1516.invt28sp ));
      params( 178 ) := "+"( Integer'Pos( a_frs1516.invt29sp ));
      params( 179 ) := "+"( Integer'Pos( a_frs1516.invt30sp ));
      params( 180 ) := "+"( Integer'Pos( a_frs1516.nsa1hd ));
      params( 181 ) := "+"( Integer'Pos( a_frs1516.nsa2hd ));
      params( 182 ) := "+"( Integer'Pos( a_frs1516.nsa3hd ));
      params( 183 ) := "+"( Integer'Pos( a_frs1516.nsa4hd ));
      params( 184 ) := "+"( Integer'Pos( a_frs1516.nsa5hd ));
      params( 185 ) := "+"( Integer'Pos( a_frs1516.nsa6hd ));
      params( 186 ) := "+"( Integer'Pos( a_frs1516.nsa7hd ));
      params( 187 ) := "+"( Integer'Pos( a_frs1516.nsa8hd ));
      params( 188 ) := "+"( Integer'Pos( a_frs1516.nsa9hd ));
      params( 189 ) := "+"( Integer'Pos( a_frs1516.nsa10hd ));
      params( 190 ) := "+"( Integer'Pos( a_frs1516.nsa11hd ));
      params( 191 ) := "+"( Integer'Pos( a_frs1516.nsa12hd ));
      params( 192 ) := "+"( Integer'Pos( a_frs1516.nsa13hd ));
      params( 193 ) := "+"( Integer'Pos( a_frs1516.nsa14hd ));
      params( 194 ) := "+"( Integer'Pos( a_frs1516.nsa15hd ));
      params( 195 ) := "+"( Integer'Pos( a_frs1516.nsa16hd ));
      params( 196 ) := "+"( Integer'Pos( a_frs1516.nsa17hd ));
      params( 197 ) := "+"( Integer'Pos( a_frs1516.nsa18hd ));
      params( 198 ) := "+"( Integer'Pos( a_frs1516.nsa19hd ));
      params( 199 ) := "+"( Integer'Pos( a_frs1516.nsa21hd ));
      params( 200 ) := "+"( Integer'Pos( a_frs1516.nsa22hd ));
      params( 201 ) := "+"( Integer'Pos( a_frs1516.nsa23hd ));
      params( 202 ) := "+"( Integer'Pos( a_frs1516.nsa24hd ));
      params( 203 ) := "+"( Integer'Pos( a_frs1516.nsa25hd ));
      params( 204 ) := "+"( Integer'Pos( a_frs1516.nsa26hd ));
      params( 205 ) := "+"( Integer'Pos( a_frs1516.nsa27hd ));
      params( 206 ) := "+"( Integer'Pos( a_frs1516.nsa28hd ));
      params( 207 ) := "+"( Integer'Pos( a_frs1516.nsa29hd ));
      params( 208 ) := "+"( Integer'Pos( a_frs1516.nsa30hd ));
      params( 209 ) := "+"( Integer'Pos( a_frs1516.nsa1sp ));
      params( 210 ) := "+"( Integer'Pos( a_frs1516.nsa2sp ));
      params( 211 ) := "+"( Integer'Pos( a_frs1516.nsa3sp ));
      params( 212 ) := "+"( Integer'Pos( a_frs1516.nsa4sp ));
      params( 213 ) := "+"( Integer'Pos( a_frs1516.nsa5sp ));
      params( 214 ) := "+"( Integer'Pos( a_frs1516.nsa6sp ));
      params( 215 ) := "+"( Integer'Pos( a_frs1516.nsa7sp ));
      params( 216 ) := "+"( Integer'Pos( a_frs1516.nsa8sp ));
      params( 217 ) := "+"( Integer'Pos( a_frs1516.nsa9sp ));
      params( 218 ) := "+"( Integer'Pos( a_frs1516.nsa10sp ));
      params( 219 ) := "+"( Integer'Pos( a_frs1516.nsa11sp ));
      params( 220 ) := "+"( Integer'Pos( a_frs1516.nsa12sp ));
      params( 221 ) := "+"( Integer'Pos( a_frs1516.nsa13sp ));
      params( 222 ) := "+"( Integer'Pos( a_frs1516.nsa14sp ));
      params( 223 ) := "+"( Integer'Pos( a_frs1516.nsa15sp ));
      params( 224 ) := "+"( Integer'Pos( a_frs1516.nsa16sp ));
      params( 225 ) := "+"( Integer'Pos( a_frs1516.nsa17sp ));
      params( 226 ) := "+"( Integer'Pos( a_frs1516.nsa18sp ));
      params( 227 ) := "+"( Integer'Pos( a_frs1516.nsa19sp ));
      params( 228 ) := "+"( Integer'Pos( a_frs1516.nsa21sp ));
      params( 229 ) := "+"( Integer'Pos( a_frs1516.nsa22sp ));
      params( 230 ) := "+"( Integer'Pos( a_frs1516.nsa23sp ));
      params( 231 ) := "+"( Integer'Pos( a_frs1516.nsa24sp ));
      params( 232 ) := "+"( Integer'Pos( a_frs1516.nsa25sp ));
      params( 233 ) := "+"( Integer'Pos( a_frs1516.nsa26sp ));
      params( 234 ) := "+"( Integer'Pos( a_frs1516.nsa27sp ));
      params( 235 ) := "+"( Integer'Pos( a_frs1516.nsa28sp ));
      params( 236 ) := "+"( Integer'Pos( a_frs1516.nsa29sp ));
      params( 237 ) := "+"( Integer'Pos( a_frs1516.nsa30sp ));
      params( 238 ) := "+"( Integer'Pos( a_frs1516.ablehd ));
      params( 239 ) := "+"( Integer'Pos( a_frs1516.ablesp ));
      params( 240 ) := "+"( Integer'Pos( a_frs1516.abs1pdhd ));
      params( 241 ) := "+"( Integer'Pos( a_frs1516.abs1pdsp ));
      params( 242 ) := "+"( Integer'Pos( a_frs1516.absparhd ));
      params( 243 ) := "+"( Integer'Pos( a_frs1516.absparsp ));
      params( 244 ) := "+"( Integer'Pos( a_frs1516.abspayhd ));
      params( 245 ) := "+"( Integer'Pos( a_frs1516.abspaysp ));
      params( 246 ) := "+"( Integer'Pos( a_frs1516.abswhyhd ));
      params( 247 ) := "+"( Integer'Pos( a_frs1516.abswhysp ));
      params( 248 ) := "+"( Integer'Pos( a_frs1516.abswkhd ));
      params( 249 ) := "+"( Integer'Pos( a_frs1516.abswksp ));
      params( 250 ) := "+"( Integer'Pos( a_frs1516.acshd ));
      params( 251 ) := "+"( Integer'Pos( a_frs1516.acssp ));
      params( 252 ) := "+"( Integer'Pos( a_frs1516.acctqhd ));
      params( 253 ) := "+"( Integer'Pos( a_frs1516.acctqsp ));
      params( 254 ) := "+"( Float( a_frs1516.acsamthd ));
      params( 255 ) := "+"( Float( a_frs1516.acsamtsp ));
      params( 256 ) := "+"( Integer'Pos( a_frs1516.acspdhd ));
      params( 257 ) := "+"( Integer'Pos( a_frs1516.acspdsp ));
      params( 258 ) := "+"( Integer'Pos( a_frs1516.actacihd ));
      params( 259 ) := "+"( Integer'Pos( a_frs1516.actacisp ));
      params( 260 ) := "+"( Integer'Pos( a_frs1516.emahd ));
      params( 261 ) := "+"( Integer'Pos( a_frs1516.emasp ));
      params( 262 ) := "+"( Float( a_frs1516.emaamthd ));
      params( 263 ) := "+"( Integer'Pos( a_frs1516.emaamtsp ));
      params( 264 ) := "+"( Integer'Pos( a_frs1516.emapdhd ));
      params( 265 ) := "+"( Integer'Pos( a_frs1516.emapdsp ));
      params( 266 ) := "+"( Integer'Pos( a_frs1516.agehd ));
      params( 267 ) := "+"( Integer'Pos( a_frs1516.agesp ));
      params( 268 ) := "+"( Integer'Pos( a_frs1516.agehqhd ));
      params( 269 ) := "+"( Integer'Pos( a_frs1516.agehqsp ));
      params( 270 ) := "+"( Float( a_frs1516.aliamthd ));
      params( 271 ) := "+"( Float( a_frs1516.aliamtsp ));
      params( 272 ) := "+"( Integer'Pos( a_frs1516.alimnyhd ));
      params( 273 ) := "+"( Integer'Pos( a_frs1516.alimnysp ));
      params( 274 ) := "+"( Integer'Pos( a_frs1516.alipdhd ));
      params( 275 ) := "+"( Integer'Pos( a_frs1516.alipdsp ));
      params( 276 ) := "+"( Integer'Pos( a_frs1516.aliushd ));
      params( 277 ) := "+"( Integer'Pos( a_frs1516.aliussp ));
      params( 278 ) := "+"( Float( a_frs1516.absallhd ));
      params( 279 ) := "+"( Float( a_frs1516.absallsp ));
      params( 280 ) := "+"( Float( a_frs1516.organhd ));
      params( 281 ) := "+"( Float( a_frs1516.organsp ));
      params( 282 ) := "+"( Float( a_frs1516.fosterhd ));
      params( 283 ) := "+"( Float( a_frs1516.fostersp ));
      params( 284 ) := "+"( Float( a_frs1516.adopthd ));
      params( 285 ) := "+"( Float( a_frs1516.adoptsp ));
      params( 286 ) := "+"( Integer'Pos( a_frs1516.pasbalhd ));
      params( 287 ) := "+"( Integer'Pos( a_frs1516.pasbalsp ));
      params( 288 ) := "+"( Integer'Pos( a_frs1516.porganhd ));
      params( 289 ) := "+"( Integer'Pos( a_frs1516.porgansp ));
      params( 290 ) := "+"( Integer'Pos( a_frs1516.pfostehd ));
      params( 291 ) := "+"( Integer'Pos( a_frs1516.pfostesp ));
      params( 292 ) := "+"( Integer'Pos( a_frs1516.padopthd ));
      params( 293 ) := "+"( Integer'Pos( a_frs1516.padoptsp ));
      params( 294 ) := "+"( Integer'Pos( a_frs1516.aluamthd ));
      params( 295 ) := "+"( Integer'Pos( a_frs1516.aluamtsp ));
      params( 296 ) := "+"( Integer'Pos( a_frs1516.alupdhd ));
      params( 297 ) := "+"( Integer'Pos( a_frs1516.alupdsp ));
      params( 298 ) := "+"( Integer'Pos( a_frs1516.anyacchd ));
      params( 299 ) := "+"( Integer'Pos( a_frs1516.anyaccsp ));
      params( 300 ) := "+"( Integer'Pos( a_frs1516.anyedhd ));
      params( 301 ) := "+"( Integer'Pos( a_frs1516.anyedsp ));
      params( 302 ) := "+"( Integer'Pos( a_frs1516.anymonhd ));
      params( 303 ) := "+"( Integer'Pos( a_frs1516.anymonsp ));
      params( 304 ) := "+"( Integer'Pos( a_frs1516.anype1hd ));
      params( 305 ) := "+"( Integer'Pos( a_frs1516.anype1sp ));
      params( 306 ) := "+"( Integer'Pos( a_frs1516.anype2hd ));
      params( 307 ) := "+"( Integer'Pos( a_frs1516.anype2sp ));
      params( 308 ) := "+"( Integer'Pos( a_frs1516.anype3hd ));
      params( 309 ) := "+"( Integer'Pos( a_frs1516.anype3sp ));
      params( 310 ) := "+"( Integer'Pos( a_frs1516.anype4hd ));
      params( 311 ) := "+"( Integer'Pos( a_frs1516.anype4sp ));
      params( 312 ) := "+"( Integer'Pos( a_frs1516.anype5hd ));
      params( 313 ) := "+"( Integer'Pos( a_frs1516.anype5sp ));
      params( 314 ) := "+"( Integer'Pos( a_frs1516.anype6hd ));
      params( 315 ) := "+"( Integer'Pos( a_frs1516.anype6sp ));
      params( 316 ) := "+"( Integer'Pos( a_frs1516.anype7hd ));
      params( 317 ) := "+"( Integer'Pos( a_frs1516.anype7sp ));
      params( 318 ) := "+"( Float( a_frs1516.abspamhd ));
      params( 319 ) := "+"( Integer'Pos( a_frs1516.abspamsp ));
      params( 320 ) := "+"( Float( a_frs1516.abspexhd ));
      params( 321 ) := "+"( Integer'Pos( a_frs1516.abspexsp ));
      params( 322 ) := "+"( Integer'Pos( a_frs1516.apdpdhd ));
      params( 323 ) := "+"( Integer'Pos( a_frs1516.apdpdsp ));
      params( 324 ) := "+"( Integer'Pos( a_frs1516.pabspahd ));
      params( 325 ) := "+"( Integer'Pos( a_frs1516.pabspasp ));
      params( 326 ) := "+"( Integer'Pos( a_frs1516.basacthd ));
      params( 327 ) := "+"( Integer'Pos( a_frs1516.basactsp ));
      params( 328 ) := "+"( Integer'Pos( a_frs1516.bfdhd ));
      params( 329 ) := "+"( Integer'Pos( a_frs1516.bfdsp ));
      params( 330 ) := "+"( Float( a_frs1516.bfdamthd ));
      params( 331 ) := "+"( Float( a_frs1516.bfdamtsp ));
      params( 332 ) := "+"( Integer'Pos( a_frs1516.pbfdhd ));
      params( 333 ) := "+"( Integer'Pos( a_frs1516.pbfdsp ));
      params( 334 ) := "+"( Integer'Pos( a_frs1516.bfdvalhd ));
      params( 335 ) := "+"( Integer'Pos( a_frs1516.bfdvalsp ));
      params( 336 ) := "+"( Integer'Pos( a_frs1516.careabhd ));
      params( 337 ) := "+"( Integer'Pos( a_frs1516.careabsp ));
      params( 338 ) := "+"( Integer'Pos( a_frs1516.careahhd ));
      params( 339 ) := "+"( Integer'Pos( a_frs1516.careahsp ));
      params( 340 ) := "+"( Integer'Pos( a_frs1516.carecbhd ));
      params( 341 ) := "+"( Integer'Pos( a_frs1516.carecbsp ));
      params( 342 ) := "+"( Integer'Pos( a_frs1516.carechhd ));
      params( 343 ) := "+"( Integer'Pos( a_frs1516.carechsp ));
      params( 344 ) := "+"( Integer'Pos( a_frs1516.careclhd ));
      params( 345 ) := "+"( Integer'Pos( a_frs1516.careclsp ));
      params( 346 ) := "+"( Integer'Pos( a_frs1516.careflhd ));
      params( 347 ) := "+"( Integer'Pos( a_frs1516.careflsp ));
      params( 348 ) := "+"( Integer'Pos( a_frs1516.carefrhd ));
      params( 349 ) := "+"( Integer'Pos( a_frs1516.carefrsp ));
      params( 350 ) := "+"( Integer'Pos( a_frs1516.careothd ));
      params( 351 ) := "+"( Integer'Pos( a_frs1516.careotsp ));
      params( 352 ) := "+"( Integer'Pos( a_frs1516.carerhd ));
      params( 353 ) := "+"( Integer'Pos( a_frs1516.carersp ));
      params( 354 ) := "+"( Integer'Pos( a_frs1516.cbaamthd ));
      params( 355 ) := "+"( Integer'Pos( a_frs1516.cbaamtsp ));
      params( 356 ) := "+"( Integer'Pos( a_frs1516.cbchkhd ));
      params( 357 ) := "+"( Integer'Pos( a_frs1516.cbchksp ));
      params( 358 ) := "+"( Integer'Pos( a_frs1516.changehd ));
      params( 359 ) := "+"( Integer'Pos( a_frs1516.changesp ));
      params( 360 ) := "+"( Integer'Pos( a_frs1516.chbflghd ));
      params( 361 ) := "+"( Integer'Pos( a_frs1516.chbflgsp ));
      params( 362 ) := "+"( Integer'Pos( a_frs1516.chknophd ));
      params( 363 ) := "+"( Integer'Pos( a_frs1516.chknopsp ));
      params( 364 ) := "+"( Integer'Pos( a_frs1516.fpchd ));
      params( 365 ) := "+"( Integer'Pos( a_frs1516.fpcsp ));
      params( 366 ) := "+"( Integer'Pos( a_frs1516.fuchd ));
      params( 367 ) := "+"( Integer'Pos( a_frs1516.fucsp ));
      params( 368 ) := "+"( Integer'Pos( a_frs1516.fhbhd ));
      params( 369 ) := "+"( Integer'Pos( a_frs1516.fhbsp ));
      params( 370 ) := "+"( Integer'Pos( a_frs1516.fwtchd ));
      params( 371 ) := "+"( Integer'Pos( a_frs1516.fwtcsp ));
      params( 372 ) := "+"( Integer'Pos( a_frs1516.fctchd ));
      params( 373 ) := "+"( Integer'Pos( a_frs1516.fctcsp ));
      params( 374 ) := "+"( Integer'Pos( a_frs1516.fishd ));
      params( 375 ) := "+"( Integer'Pos( a_frs1516.fissp ));
      params( 376 ) := "+"( Integer'Pos( a_frs1516.fjsahd ));
      params( 377 ) := "+"( Integer'Pos( a_frs1516.fjsasp ));
      params( 378 ) := "+"( Integer'Pos( a_frs1516.fesahd ));
      params( 379 ) := "+"( Integer'Pos( a_frs1516.fesasp ));
      params( 380 ) := "+"( Integer'Pos( a_frs1516.claimahd ));
      params( 381 ) := "+"( Integer'Pos( a_frs1516.claimasp ));
      params( 382 ) := "+"( Integer'Pos( a_frs1516.cohabhd ));
      params( 383 ) := "+"( Integer'Pos( a_frs1516.cohabsp ));
      params( 384 ) := "+"( Integer'Pos( a_frs1516.condithd ));
      params( 385 ) := "+"( Integer'Pos( a_frs1516.conditsp ));
      params( 386 ) := "+"( Integer'Pos( a_frs1516.blodgehd ));
      params( 387 ) := "+"( Integer'Pos( a_frs1516.blodgesp ));
      params( 388 ) := "+"( Integer'Pos( a_frs1516.ctclm1hd ));
      params( 389 ) := "+"( Integer'Pos( a_frs1516.ctclm1sp ));
      params( 390 ) := "+"( Integer'Pos( a_frs1516.ctclm2hd ));
      params( 391 ) := "+"( Integer'Pos( a_frs1516.ctclm2sp ));
      params( 392 ) := "+"( Integer'Pos( a_frs1516.cupchkhd ));
      params( 393 ) := "+"( Integer'Pos( a_frs1516.cupchksp ));
      params( 394 ) := "+"( Integer'Pos( a_frs1516.curacthd ));
      params( 395 ) := "+"( Integer'Pos( a_frs1516.curactsp ));
      params( 396 ) := "+"( Integer'Pos( a_frs1516.curqulhd ));
      params( 397 ) := "+"( Integer'Pos( a_frs1516.curqulsp ));
      params( 398 ) := "+"( Integer'Pos( a_frs1516.blheadhd ));
      params( 399 ) := "+"( Integer'Pos( a_frs1516.blheadsp ));
      params( 400 ) := "+"( Float( a_frs1516.blrenthd ));
      params( 401 ) := "+"( Float( a_frs1516.blrentsp ));
      params( 402 ) := "+"( Integer'Pos( a_frs1516.pblrenhd ));
      params( 403 ) := "+"( Integer'Pos( a_frs1516.pblrensp ));
      params( 404 ) := "+"( Integer'Pos( a_frs1516.ddaprghd ));
      params( 405 ) := "+"( Integer'Pos( a_frs1516.ddaprgsp ));
      params( 406 ) := "+"( Integer'Pos( a_frs1516.ddatrehd ));
      params( 407 ) := "+"( Integer'Pos( a_frs1516.ddatresp ));
      params( 408 ) := "+"( Integer'Pos( a_frs1516.ddatrphd ));
      params( 409 ) := "+"( Integer'Pos( a_frs1516.ddatrpsp ));
      params( 410 ) := "+"( Integer'Pos( a_frs1516.defrpnhd ));
      params( 411 ) := "+"( Integer'Pos( a_frs1516.defrpnsp ));
      params( 412 ) := "+"( Integer'Pos( a_frs1516.dependhd ));
      params( 413 ) := "+"( Integer'Pos( a_frs1516.dependsp ));
      params( 414 ) := "+"( Integer'Pos( a_frs1516.disacahd ));
      params( 415 ) := "+"( Integer'Pos( a_frs1516.disacasp ));
      params( 416 ) := "+"( Integer'Pos( a_frs1516.qpiphd ));
      params( 417 ) := "+"( Integer'Pos( a_frs1516.qpipsp ));
      params( 418 ) := "+"( Integer'Pos( a_frs1516.qdlahd ));
      params( 419 ) := "+"( Integer'Pos( a_frs1516.qdlasp ));
      params( 420 ) := "+"( Integer'Pos( a_frs1516.qaahd ));
      params( 421 ) := "+"( Integer'Pos( a_frs1516.qaasp ));
      params( 422 ) := "+"( Integer'Pos( a_frs1516.qsdahd ));
      params( 423 ) := "+"( Integer'Pos( a_frs1516.qsdasp ));
      params( 424 ) := "+"( Integer'Pos( a_frs1516.qibhd ));
      params( 425 ) := "+"( Integer'Pos( a_frs1516.qibsp ));
      params( 426 ) := "+"( Integer'Pos( a_frs1516.qiidbhd ));
      params( 427 ) := "+"( Integer'Pos( a_frs1516.qiidbsp ));
      params( 428 ) := "+"( Integer'Pos( a_frs1516.discoahd ));
      params( 429 ) := "+"( Integer'Pos( a_frs1516.discoasp ));
      params( 430 ) := "+"( Integer'Pos( a_frs1516.disd01hd ));
      params( 431 ) := "+"( Integer'Pos( a_frs1516.disd01sp ));
      params( 432 ) := "+"( Integer'Pos( a_frs1516.disd02hd ));
      params( 433 ) := "+"( Integer'Pos( a_frs1516.disd02sp ));
      params( 434 ) := "+"( Integer'Pos( a_frs1516.disd03hd ));
      params( 435 ) := "+"( Integer'Pos( a_frs1516.disd03sp ));
      params( 436 ) := "+"( Integer'Pos( a_frs1516.disd04hd ));
      params( 437 ) := "+"( Integer'Pos( a_frs1516.disd04sp ));
      params( 438 ) := "+"( Integer'Pos( a_frs1516.disd05hd ));
      params( 439 ) := "+"( Integer'Pos( a_frs1516.disd05sp ));
      params( 440 ) := "+"( Integer'Pos( a_frs1516.disd06hd ));
      params( 441 ) := "+"( Integer'Pos( a_frs1516.disd06sp ));
      params( 442 ) := "+"( Integer'Pos( a_frs1516.disd07hd ));
      params( 443 ) := "+"( Integer'Pos( a_frs1516.disd07sp ));
      params( 444 ) := "+"( Integer'Pos( a_frs1516.disd08hd ));
      params( 445 ) := "+"( Integer'Pos( a_frs1516.disd08sp ));
      params( 446 ) := "+"( Integer'Pos( a_frs1516.disd09hd ));
      params( 447 ) := "+"( Integer'Pos( a_frs1516.disd09sp ));
      params( 448 ) := "+"( Integer'Pos( a_frs1516.disd10hd ));
      params( 449 ) := "+"( Integer'Pos( a_frs1516.disd10sp ));
      params( 450 ) := "+"( Integer'Pos( a_frs1516.disdifhd ));
      params( 451 ) := "+"( Integer'Pos( a_frs1516.disdifsp ));
      params( 452 ) := "+"( Integer'Pos( a_frs1516.dlachd ));
      params( 453 ) := "+"( Integer'Pos( a_frs1516.dlacsp ));
      params( 454 ) := "+"( Integer'Pos( a_frs1516.dlamhd ));
      params( 455 ) := "+"( Integer'Pos( a_frs1516.dlamsp ));
      params( 456 ) := "+"( Integer'Pos( a_frs1516.dlshd ));
      params( 457 ) := "+"( Integer'Pos( a_frs1516.dlssp ));
      params( 458 ) := "+"( Float( a_frs1516.dlsamthd ));
      params( 459 ) := "+"( Float( a_frs1516.dlsamtsp ));
      params( 460 ) := "+"( Integer'Pos( a_frs1516.pdlshd ));
      params( 461 ) := "+"( Integer'Pos( a_frs1516.pdlssp ));
      params( 462 ) := "+"( Integer'Pos( a_frs1516.dlsvalhd ));
      params( 463 ) := "+"( Integer'Pos( a_frs1516.dlsvalsp ));
      params( 464 ) := "+"( Integer'Pos( a_frs1516.dobhd ));
      params( 465 ) := "+"( Integer'Pos( a_frs1516.dobsp ));
      params( 466 ) := "+"( Integer'Pos( a_frs1516.h3qualhd ));
      params( 467 ) := "+"( Integer'Pos( a_frs1516.h3qualsp ));
      params( 468 ) := "+"( Integer'Pos( a_frs1516.dvil3ahd ));
      params( 469 ) := "+"( Integer'Pos( a_frs1516.dvil3asp ));
      params( 470 ) := "+"( Integer'Pos( a_frs1516.dvil4ahd ));
      params( 471 ) := "+"( Integer'Pos( a_frs1516.dvil4asp ));
      params( 472 ) := "+"( Integer'Pos( a_frs1516.dvjb12hd ));
      params( 473 ) := "+"( Integer'Pos( a_frs1516.dvjb12sp ));
      params( 474 ) := "+"( Integer'Pos( a_frs1516.dvmarhd ));
      params( 475 ) := "+"( Integer'Pos( a_frs1516.dvmarsp ));
      params( 476 ) := "+"( Integer'Pos( a_frs1516.edl1ahd ));
      params( 477 ) := "+"( Integer'Pos( a_frs1516.edl1asp ));
      params( 478 ) := "+"( Integer'Pos( a_frs1516.pedl1ahd ));
      params( 479 ) := "+"( Integer'Pos( a_frs1516.pedl1asp ));
      params( 480 ) := "+"( Integer'Pos( a_frs1516.edl1obhd ));
      params( 481 ) := "+"( Integer'Pos( a_frs1516.edl1obsp ));
      params( 482 ) := "+"( Integer'Pos( a_frs1516.edl2ahd ));
      params( 483 ) := "+"( Integer'Pos( a_frs1516.edl2asp ));
      params( 484 ) := "+"( Integer'Pos( a_frs1516.pedl2ahd ));
      params( 485 ) := "+"( Integer'Pos( a_frs1516.pedl2asp ));
      params( 486 ) := "+"( Integer'Pos( a_frs1516.edl2obhd ));
      params( 487 ) := "+"( Integer'Pos( a_frs1516.edl2obsp ));
      params( 488 ) := "+"( Integer'Pos( a_frs1516.edatthd ));
      params( 489 ) := "+"( Integer'Pos( a_frs1516.edattsp ));
      params( 490 ) := "+"( Integer'Pos( a_frs1516.edhrhd ));
      params( 491 ) := "+"( Integer'Pos( a_frs1516.edhrsp ));
      params( 492 ) := "+"( Integer'Pos( a_frs1516.edtyphd ));
      params( 493 ) := "+"( Integer'Pos( a_frs1516.edtypsp ));
      params( 494 ) := "+"( Integer'Pos( a_frs1516.empconhd ));
      params( 495 ) := "+"( Integer'Pos( a_frs1516.empconsp ));
      params( 496 ) := "+"( Float( a_frs1516.empocchd ));
      params( 497 ) := "+"( Float( a_frs1516.empoccsp ));
      params( 498 ) := "+"( Integer'Pos( a_frs1516.empshd ));
      params( 499 ) := "+"( Integer'Pos( a_frs1516.empssp ));
      params( 500 ) := "+"( Integer'Pos( a_frs1516.empbhd ));
      params( 501 ) := "+"( Integer'Pos( a_frs1516.empbsp ));
      params( 502 ) := "+"( Integer'Pos( a_frs1516.empchd ));
      params( 503 ) := "+"( Integer'Pos( a_frs1516.empcsp ));
      params( 504 ) := "+"( Integer'Pos( a_frs1516.empilohd ));
      params( 505 ) := "+"( Integer'Pos( a_frs1516.empilosp ));
      params( 506 ) := "+"( Integer'Pos( a_frs1516.es2000hd ));
      params( 507 ) := "+"( Integer'Pos( a_frs1516.es2000sp ));
      params( 508 ) := "+"( Integer'Pos( a_frs1516.ethgr3hd ));
      params( 509 ) := "+"( Integer'Pos( a_frs1516.ethgr3sp ));
      params( 510 ) := "+"( Integer'Pos( a_frs1516.ethgpshd ));
      params( 511 ) := "+"( Integer'Pos( a_frs1516.ethgpssp ));
      params( 512 ) := "+"( Integer'Pos( a_frs1516.etngrphd ));
      params( 513 ) := "+"( Integer'Pos( a_frs1516.etngrpsp ));
      params( 514 ) := "+"( Float( a_frs1516.eualamhd ));
      params( 515 ) := "+"( Float( a_frs1516.eualamsp ));
      params( 516 ) := "+"( Integer'Pos( a_frs1516.eualmnhd ));
      params( 517 ) := "+"( Integer'Pos( a_frs1516.eualmnsp ));
      params( 518 ) := "+"( Integer'Pos( a_frs1516.peualihd ));
      params( 519 ) := "+"( Integer'Pos( a_frs1516.peualisp ));
      params( 520 ) := "+"( Integer'Pos( a_frs1516.euetyphd ));
      params( 521 ) := "+"( Integer'Pos( a_frs1516.euetypsp ));
      params( 522 ) := "+"( Integer'Pos( a_frs1516.everwkhd ));
      params( 523 ) := "+"( Integer'Pos( a_frs1516.everwksp ));
      params( 524 ) := "+"( Integer'Pos( a_frs1516.ehbct1hd ));
      params( 525 ) := "+"( Integer'Pos( a_frs1516.ehbct1sp ));
      params( 526 ) := "+"( Integer'Pos( a_frs1516.fllwphd ));
      params( 527 ) := "+"( Integer'Pos( a_frs1516.fllwpsp ));
      params( 528 ) := "+"( Integer'Pos( a_frs1516.ftedhd ));
      params( 529 ) := "+"( Integer'Pos( a_frs1516.ftedsp ));
      params( 530 ) := "+"( Integer'Pos( a_frs1516.ftwkyrhd ));
      params( 531 ) := "+"( Integer'Pos( a_frs1516.ftwkyrsp ));
      params( 532 ) := "+"( Integer'Pos( a_frs1516.gebacthd ));
      params( 533 ) := "+"( Integer'Pos( a_frs1516.gebactsp ));
      params( 534 ) := "+"( Integer'Pos( a_frs1516.giltcthd ));
      params( 535 ) := "+"( Integer'Pos( a_frs1516.giltctsp ));
      params( 536 ) := "+"( Integer'Pos( a_frs1516.gpispchd ));
      params( 537 ) := "+"( Integer'Pos( a_frs1516.gpispcsp ));
      params( 538 ) := "+"( Integer'Pos( a_frs1516.gpjesahd ));
      params( 539 ) := "+"( Integer'Pos( a_frs1516.gpjesasp ));
      params( 540 ) := "+"( Integer'Pos( a_frs1516.gpuchd ));
      params( 541 ) := "+"( Integer'Pos( a_frs1516.gpucsp ));
      params( 542 ) := "+"( Integer'Pos( a_frs1516.granthd ));
      params( 543 ) := "+"( Integer'Pos( a_frs1516.grantsp ));
      params( 544 ) := "+"( Integer'Pos( a_frs1516.gt1valhd ));
      params( 545 ) := "+"( Float( a_frs1516.gt1valsp ));
      params( 546 ) := "+"( Integer'Pos( a_frs1516.gt2valhd ));
      params( 547 ) := "+"( Integer'Pos( a_frs1516.gt2valsp ));
      params( 548 ) := "+"( Integer'Pos( a_frs1516.gt1dirhd ));
      params( 549 ) := "+"( Float( a_frs1516.gt1dirsp ));
      params( 550 ) := "+"( Integer'Pos( a_frs1516.gt2dirhd ));
      params( 551 ) := "+"( Integer'Pos( a_frs1516.gt2dirsp ));
      params( 552 ) := "+"( Integer'Pos( a_frs1516.grtnumhd ));
      params( 553 ) := "+"( Integer'Pos( a_frs1516.grtnumsp ));
      params( 554 ) := "+"( Integer'Pos( a_frs1516.gt1scehd ));
      params( 555 ) := "+"( Integer'Pos( a_frs1516.gt1scesp ));
      params( 556 ) := "+"( Integer'Pos( a_frs1516.gt2scehd ));
      params( 557 ) := "+"( Integer'Pos( a_frs1516.gt2scesp ));
      params( 558 ) := "+"( Integer'Pos( a_frs1516.gt1oshd ));
      params( 559 ) := "+"( Integer'Pos( a_frs1516.gt1ossp ));
      params( 560 ) := "+"( Integer'Pos( a_frs1516.gt2oshd ));
      params( 561 ) := "+"( Integer'Pos( a_frs1516.gt2ossp ));
      params( 562 ) := "+"( Integer'Pos( a_frs1516.gtahd ));
      params( 563 ) := "+"( Integer'Pos( a_frs1516.gtasp ));
      params( 564 ) := "+"( Integer'Pos( a_frs1516.healthhd ));
      params( 565 ) := "+"( Integer'Pos( a_frs1516.healthsp ));
      params( 566 ) := "+"( Float( a_frs1516.heartvhd ));
      params( 567 ) := "+"( Float( a_frs1516.heartvsp ));
      params( 568 ) := "+"( Integer'Pos( a_frs1516.heatadhd ));
      params( 569 ) := "+"( Integer'Pos( a_frs1516.heatadsp ));
      params( 570 ) := "+"( Integer'Pos( a_frs1516.hholdrhd ));
      params( 571 ) := "+"( Integer'Pos( a_frs1516.hholdrsp ));
      params( 572 ) := "+"( Integer'Pos( a_frs1516.hourabhd ));
      params( 573 ) := "+"( Integer'Pos( a_frs1516.hourabsp ));
      params( 574 ) := "+"( Integer'Pos( a_frs1516.hourahhd ));
      params( 575 ) := "+"( Integer'Pos( a_frs1516.hourahsp ));
      params( 576 ) := "+"( Float( a_frs1516.hrcarehd ));
      params( 577 ) := "+"( Float( a_frs1516.hrcaresp ));
      params( 578 ) := "+"( Integer'Pos( a_frs1516.hourcbhd ));
      params( 579 ) := "+"( Integer'Pos( a_frs1516.hourcbsp ));
      params( 580 ) := "+"( Integer'Pos( a_frs1516.hourchhd ));
      params( 581 ) := "+"( Integer'Pos( a_frs1516.hourchsp ));
      params( 582 ) := "+"( Integer'Pos( a_frs1516.hourclhd ));
      params( 583 ) := "+"( Integer'Pos( a_frs1516.hourclsp ));
      params( 584 ) := "+"( Integer'Pos( a_frs1516.hourfrhd ));
      params( 585 ) := "+"( Integer'Pos( a_frs1516.hourfrsp ));
      params( 586 ) := "+"( Integer'Pos( a_frs1516.hourothd ));
      params( 587 ) := "+"( Integer'Pos( a_frs1516.hourotsp ));
      params( 588 ) := "+"( Integer'Pos( a_frs1516.hourrehd ));
      params( 589 ) := "+"( Integer'Pos( a_frs1516.hourresp ));
      params( 590 ) := "+"( Integer'Pos( a_frs1516.hourtthd ));
      params( 591 ) := "+"( Integer'Pos( a_frs1516.hourttsp ));
      params( 592 ) := "+"( Integer'Pos( a_frs1516.hpersohd ));
      params( 593 ) := "+"( Integer'Pos( a_frs1516.hpersosp ));
      params( 594 ) := "+"( Integer'Pos( a_frs1516.hrpidhd ));
      params( 595 ) := "+"( Integer'Pos( a_frs1516.hrpidsp ));
      params( 596 ) := "+"( Integer'Pos( a_frs1516.hsvperhd ));
      params( 597 ) := "+"( Integer'Pos( a_frs1516.hsvpersp ));
      params( 598 ) := "+"( Integer'Pos( a_frs1516.agegp2hd ));
      params( 599 ) := "+"( Integer'Pos( a_frs1516.agegp2sp ));
      params( 600 ) := "+"( Integer'Pos( a_frs1516.agegphd ));
      params( 601 ) := "+"( Integer'Pos( a_frs1516.agegpsp ));
      params( 602 ) := "+"( Integer'Pos( a_frs1516.quninshd ));
      params( 603 ) := "+"( Integer'Pos( a_frs1516.quninssp ));
      params( 604 ) := "+"( Integer'Pos( a_frs1516.qtubenhd ));
      params( 605 ) := "+"( Integer'Pos( a_frs1516.qtubensp ));
      params( 606 ) := "+"( Integer'Pos( a_frs1516.qsicinhd ));
      params( 607 ) := "+"( Integer'Pos( a_frs1516.qsicinsp ));
      params( 608 ) := "+"( Integer'Pos( a_frs1516.qaccinhd ));
      params( 609 ) := "+"( Integer'Pos( a_frs1516.qaccinsp ));
      params( 610 ) := "+"( Integer'Pos( a_frs1516.qpehinhd ));
      params( 611 ) := "+"( Integer'Pos( a_frs1516.qpehinsp ));
      params( 612 ) := "+"( Integer'Pos( a_frs1516.qhosinhd ));
      params( 613 ) := "+"( Integer'Pos( a_frs1516.qhosinsp ));
      params( 614 ) := "+"( Integer'Pos( a_frs1516.qfsbenhd ));
      params( 615 ) := "+"( Integer'Pos( a_frs1516.qfsbensp ));
      params( 616 ) := "+"( Integer'Pos( a_frs1516.qcichd ));
      params( 617 ) := "+"( Integer'Pos( a_frs1516.qcicsp ));
      params( 618 ) := "+"( Integer'Pos( a_frs1516.qotbenhd ));
      params( 619 ) := "+"( Integer'Pos( a_frs1516.qotbensp ));
      params( 620 ) := "+"( Integer'Pos( a_frs1516.incdurhd ));
      params( 621 ) := "+"( Integer'Pos( a_frs1516.incdursp ));
      params( 622 ) := "+"( Integer'Pos( a_frs1516.incsehd ));
      params( 623 ) := "+"( Integer'Pos( a_frs1516.incsesp ));
      params( 624 ) := "+"( Integer'Pos( a_frs1516.indinchd ));
      params( 625 ) := "+"( Integer'Pos( a_frs1516.indincsp ));
      params( 626 ) := "+"( Integer'Pos( a_frs1516.indisbhd ));
      params( 627 ) := "+"( Integer'Pos( a_frs1516.indisbsp ));
      params( 628 ) := "+"( Integer'Pos( a_frs1516.inearnhd ));
      params( 629 ) := "+"( Integer'Pos( a_frs1516.inearnsp ));
      params( 630 ) := "+"( Integer'Pos( a_frs1516.ininvhd ));
      params( 631 ) := "+"( Integer'Pos( a_frs1516.ininvsp ));
      params( 632 ) := "+"( Integer'Pos( a_frs1516.inirbehd ));
      params( 633 ) := "+"( Integer'Pos( a_frs1516.inirbesp ));
      params( 634 ) := "+"( Integer'Pos( a_frs1516.injlonhd ));
      params( 635 ) := "+"( Integer'Pos( a_frs1516.injlonsp ));
      params( 636 ) := "+"( Integer'Pos( a_frs1516.injhrshd ));
      params( 637 ) := "+"( Integer'Pos( a_frs1516.injhrssp ));
      params( 638 ) := "+"( Integer'Pos( a_frs1516.innirbhd ));
      params( 639 ) := "+"( Integer'Pos( a_frs1516.innirbsp ));
      params( 640 ) := "+"( Integer'Pos( a_frs1516.inothbhd ));
      params( 641 ) := "+"( Integer'Pos( a_frs1516.inothbsp ));
      params( 642 ) := "+"( Integer'Pos( a_frs1516.inpenihd ));
      params( 643 ) := "+"( Integer'Pos( a_frs1516.inpenisp ));
      params( 644 ) := "+"( Integer'Pos( a_frs1516.inrinchd ));
      params( 645 ) := "+"( Integer'Pos( a_frs1516.inrincsp ));
      params( 646 ) := "+"( Integer'Pos( a_frs1516.inrpinhd ));
      params( 647 ) := "+"( Integer'Pos( a_frs1516.inrpinsp ));
      params( 648 ) := "+"( Float( a_frs1516.itvlichd ));
      params( 649 ) := "+"( Integer'Pos( a_frs1516.itvlicsp ));
      params( 650 ) := "+"( Integer'Pos( a_frs1516.intxcdhd ));
      params( 651 ) := "+"( Integer'Pos( a_frs1516.intxcdsp ));
      params( 652 ) := "+"( Integer'Pos( a_frs1516.investhd ));
      params( 653 ) := "+"( Integer'Pos( a_frs1516.investsp ));
      params( 654 ) := "+"( Integer'Pos( a_frs1516.isa1tyhd ));
      params( 655 ) := "+"( Integer'Pos( a_frs1516.isa1tysp ));
      params( 656 ) := "+"( Integer'Pos( a_frs1516.isa2tyhd ));
      params( 657 ) := "+"( Integer'Pos( a_frs1516.isa2tysp ));
      params( 658 ) := "+"( Integer'Pos( a_frs1516.isactihd ));
      params( 659 ) := "+"( Integer'Pos( a_frs1516.isactisp ));
      params( 660 ) := "+"( Integer'Pos( a_frs1516.jobawahd ));
      params( 661 ) := "+"( Integer'Pos( a_frs1516.jobawasp ));
      params( 662 ) := "+"( Integer'Pos( a_frs1516.jobbyrhd ));
      params( 663 ) := "+"( Integer'Pos( a_frs1516.jobbyrsp ));
      params( 664 ) := "+"( Integer'Pos( a_frs1516.qcbhd ));
      params( 665 ) := "+"( Integer'Pos( a_frs1516.qcbsp ));
      params( 666 ) := "+"( Integer'Pos( a_frs1516.qgahd ));
      params( 667 ) := "+"( Integer'Pos( a_frs1516.qgasp ));
      params( 668 ) := "+"( Integer'Pos( a_frs1516.qmahd ));
      params( 669 ) := "+"( Integer'Pos( a_frs1516.qmasp ));
      params( 670 ) := "+"( Integer'Pos( a_frs1516.lareghd ));
      params( 671 ) := "+"( Integer'Pos( a_frs1516.laregsp ));
      params( 672 ) := "+"( Integer'Pos( a_frs1516.likewkhd ));
      params( 673 ) := "+"( Integer'Pos( a_frs1516.likewksp ));
      params( 674 ) := "+"( Integer'Pos( a_frs1516.limitlhd ));
      params( 675 ) := "+"( Integer'Pos( a_frs1516.limitlsp ));
      params( 676 ) := "+"( Integer'Pos( a_frs1516.lktimehd ));
      params( 677 ) := "+"( Integer'Pos( a_frs1516.lktimesp ));
      params( 678 ) := "+"( Integer'Pos( a_frs1516.lktrnhd ));
      params( 679 ) := "+"( Integer'Pos( a_frs1516.lktrnsp ));
      params( 680 ) := "+"( Integer'Pos( a_frs1516.lkworkhd ));
      params( 681 ) := "+"( Integer'Pos( a_frs1516.lkworksp ));
      params( 682 ) := "+"( Integer'Pos( a_frs1516.loanhd ));
      params( 683 ) := "+"( Integer'Pos( a_frs1516.loansp ));
      params( 684 ) := "+"( Integer'Pos( a_frs1516.loannuhd ));
      params( 685 ) := "+"( Integer'Pos( a_frs1516.loannusp ));
      params( 686 ) := "+"( Integer'Pos( a_frs1516.lstwkmhd ));
      params( 687 ) := "+"( Integer'Pos( a_frs1516.lstwkmsp ));
      params( 688 ) := "+"( Integer'Pos( a_frs1516.lstwkyhd ));
      params( 689 ) := "+"( Integer'Pos( a_frs1516.lstwkysp ));
      params( 690 ) := "+"( Integer'Pos( a_frs1516.wkswkdhd ));
      params( 691 ) := "+"( Integer'Pos( a_frs1516.wkswkdsp ));
      params( 692 ) := "+"( Integer'Pos( a_frs1516.marithd ));
      params( 693 ) := "+"( Integer'Pos( a_frs1516.maritsp ));
      params( 694 ) := "+"( Float( a_frs1516.mr1hd ));
      params( 695 ) := "+"( Integer'Pos( a_frs1516.mr1sp ));
      params( 696 ) := "+"( Float( a_frs1516.mr2hd ));
      params( 697 ) := "+"( Float( a_frs1516.mr2sp ));
      params( 698 ) := "+"( Integer'Pos( a_frs1516.mntar1hd ));
      params( 699 ) := "+"( Integer'Pos( a_frs1516.mntar1sp ));
      params( 700 ) := "+"( Integer'Pos( a_frs1516.mntar2hd ));
      params( 701 ) := "+"( Integer'Pos( a_frs1516.mntar2sp ));
      params( 702 ) := "+"( Integer'Pos( a_frs1516.mntar3hd ));
      params( 703 ) := "+"( Integer'Pos( a_frs1516.mntar3sp ));
      params( 704 ) := "+"( Integer'Pos( a_frs1516.mntar4hd ));
      params( 705 ) := "+"( Integer'Pos( a_frs1516.mntar4sp ));
      params( 706 ) := "+"( Integer'Pos( a_frs1516.mntar5hd ));
      params( 707 ) := "+"( Integer'Pos( a_frs1516.mntar5sp ));
      params( 708 ) := "+"( Integer'Pos( a_frs1516.mntnc1hd ));
      params( 709 ) := "+"( Integer'Pos( a_frs1516.mntnc1sp ));
      params( 710 ) := "+"( Integer'Pos( a_frs1516.mntnc2hd ));
      params( 711 ) := "+"( Integer'Pos( a_frs1516.mntnc2sp ));
      params( 712 ) := "+"( Integer'Pos( a_frs1516.mntnc3hd ));
      params( 713 ) := "+"( Integer'Pos( a_frs1516.mntnc3sp ));
      params( 714 ) := "+"( Integer'Pos( a_frs1516.mntnc4hd ));
      params( 715 ) := "+"( Integer'Pos( a_frs1516.mntnc4sp ));
      params( 716 ) := "+"( Integer'Pos( a_frs1516.mntnc5hd ));
      params( 717 ) := "+"( Integer'Pos( a_frs1516.mntnc5sp ));
      params( 718 ) := "+"( Integer'Pos( a_frs1516.mntpayhd ));
      params( 719 ) := "+"( Integer'Pos( a_frs1516.mntpaysp ));
      params( 720 ) := "+"( Integer'Pos( a_frs1516.pmr1hd ));
      params( 721 ) := "+"( Integer'Pos( a_frs1516.pmr1sp ));
      params( 722 ) := "+"( Integer'Pos( a_frs1516.pmr2hd ));
      params( 723 ) := "+"( Integer'Pos( a_frs1516.pmr2sp ));
      params( 724 ) := "+"( Integer'Pos( a_frs1516.mntpr1hd ));
      params( 725 ) := "+"( Integer'Pos( a_frs1516.mntpr1sp ));
      params( 726 ) := "+"( Integer'Pos( a_frs1516.mntpr2hd ));
      params( 727 ) := "+"( Integer'Pos( a_frs1516.mntpr2sp ));
      params( 728 ) := "+"( Integer'Pos( a_frs1516.mntpr3hd ));
      params( 729 ) := "+"( Integer'Pos( a_frs1516.mntpr3sp ));
      params( 730 ) := "+"( Integer'Pos( a_frs1516.mr12mhd ));
      params( 731 ) := "+"( Integer'Pos( a_frs1516.mr12msp ));
      params( 732 ) := "+"( Integer'Pos( a_frs1516.mntt1hd ));
      params( 733 ) := "+"( Integer'Pos( a_frs1516.mntt1sp ));
      params( 734 ) := "+"( Integer'Pos( a_frs1516.mntt2hd ));
      params( 735 ) := "+"( Integer'Pos( a_frs1516.mntt2sp ));
      params( 736 ) := "+"( Integer'Pos( a_frs1516.mntt3hd ));
      params( 737 ) := "+"( Integer'Pos( a_frs1516.mntt3sp ));
      params( 738 ) := "+"( Integer'Pos( a_frs1516.mntus1hd ));
      params( 739 ) := "+"( Integer'Pos( a_frs1516.mntus1sp ));
      params( 740 ) := "+"( Integer'Pos( a_frs1516.mntus2hd ));
      params( 741 ) := "+"( Integer'Pos( a_frs1516.mntus2sp ));
      params( 742 ) := "+"( Float( a_frs1516.umr1hd ));
      params( 743 ) := "+"( Integer'Pos( a_frs1516.umr1sp ));
      params( 744 ) := "+"( Float( a_frs1516.umr2hd ));
      params( 745 ) := "+"( Integer'Pos( a_frs1516.umr2sp ));
      params( 746 ) := "+"( Integer'Pos( a_frs1516.pumr1hd ));
      params( 747 ) := "+"( Integer'Pos( a_frs1516.pumr1sp ));
      params( 748 ) := "+"( Integer'Pos( a_frs1516.pumr2hd ));
      params( 749 ) := "+"( Integer'Pos( a_frs1516.pumr2sp ));
      params( 750 ) := "+"( Integer'Pos( a_frs1516.mntw1hd ));
      params( 751 ) := "+"( Integer'Pos( a_frs1516.mntw1sp ));
      params( 752 ) := "+"( Integer'Pos( a_frs1516.mntw2hd ));
      params( 753 ) := "+"( Integer'Pos( a_frs1516.mntw2sp ));
      params( 754 ) := "+"( Integer'Pos( a_frs1516.mntw3hd ));
      params( 755 ) := "+"( Integer'Pos( a_frs1516.mntw3sp ));
      params( 756 ) := "+"( Integer'Pos( a_frs1516.mntw4hd ));
      params( 757 ) := "+"( Integer'Pos( a_frs1516.mntw4sp ));
      params( 758 ) := "+"( Integer'Pos( a_frs1516.mntw5hd ));
      params( 759 ) := "+"( Integer'Pos( a_frs1516.mntw5sp ));
      params( 760 ) := "+"( Integer'Pos( a_frs1516.mshd ));
      params( 761 ) := "+"( Integer'Pos( a_frs1516.mssp ));
      params( 762 ) := "+"( Integer'Pos( a_frs1516.nanid1hd ));
      params( 763 ) := "+"( Integer'Pos( a_frs1516.nanid1sp ));
      params( 764 ) := "+"( Integer'Pos( a_frs1516.nanid2hd ));
      params( 765 ) := "+"( Integer'Pos( a_frs1516.nanid2sp ));
      params( 766 ) := "+"( Integer'Pos( a_frs1516.nanid3hd ));
      params( 767 ) := "+"( Integer'Pos( a_frs1516.nanid3sp ));
      params( 768 ) := "+"( Integer'Pos( a_frs1516.nanid4hd ));
      params( 769 ) := "+"( Integer'Pos( a_frs1516.nanid4sp ));
      params( 770 ) := "+"( Integer'Pos( a_frs1516.nanid5hd ));
      params( 771 ) := "+"( Integer'Pos( a_frs1516.nanid5sp ));
      params( 772 ) := "+"( Integer'Pos( a_frs1516.nanid6hd ));
      params( 773 ) := "+"( Integer'Pos( a_frs1516.nanid6sp ));
      params( 774 ) := "+"( Integer'Pos( a_frs1516.nitrnhd ));
      params( 775 ) := "+"( Integer'Pos( a_frs1516.nitrnsp ));
      params( 776 ) := "+"( Float( a_frs1516.niamthd ));
      params( 777 ) := "+"( Float( a_frs1516.niamtsp ));
      params( 778 ) := "+"( Integer'Pos( a_frs1516.niethghd ));
      params( 779 ) := "+"( Integer'Pos( a_frs1516.niethgsp ));
      params( 780 ) := "+"( Integer'Pos( a_frs1516.nixhbbhd ));
      params( 781 ) := "+"( Integer'Pos( a_frs1516.nixhbbsp ));
      params( 782 ) := "+"( Integer'Pos( a_frs1516.ninid1hd ));
      params( 783 ) := "+"( Integer'Pos( a_frs1516.ninid1sp ));
      params( 784 ) := "+"( Integer'Pos( a_frs1516.ninid2hd ));
      params( 785 ) := "+"( Integer'Pos( a_frs1516.ninid2sp ));
      params( 786 ) := "+"( Integer'Pos( a_frs1516.ninid3hd ));
      params( 787 ) := "+"( Integer'Pos( a_frs1516.ninid3sp ));
      params( 788 ) := "+"( Integer'Pos( a_frs1516.ninid4hd ));
      params( 789 ) := "+"( Integer'Pos( a_frs1516.ninid4sp ));
      params( 790 ) := "+"( Integer'Pos( a_frs1516.ninid5hd ));
      params( 791 ) := "+"( Integer'Pos( a_frs1516.ninid5sp ));
      params( 792 ) := "+"( Integer'Pos( a_frs1516.ninid6hd ));
      params( 793 ) := "+"( Integer'Pos( a_frs1516.ninid6sp ));
      params( 794 ) := "+"( Integer'Pos( a_frs1516.ninid7hd ));
      params( 795 ) := "+"( Integer'Pos( a_frs1516.ninid7sp ));
      params( 796 ) := "+"( Integer'Pos( a_frs1516.nincs2hd ));
      params( 797 ) := "+"( Integer'Pos( a_frs1516.nincs2sp ));
      params( 798 ) := "+"( Integer'Pos( a_frs1516.nininchd ));
      params( 799 ) := "+"( Integer'Pos( a_frs1516.ninincsp ));
      params( 800 ) := "+"( Integer'Pos( a_frs1516.ninearhd ));
      params( 801 ) := "+"( Integer'Pos( a_frs1516.ninearsp ));
      params( 802 ) := "+"( Integer'Pos( a_frs1516.nininvhd ));
      params( 803 ) := "+"( Integer'Pos( a_frs1516.nininvsp ));
      params( 804 ) := "+"( Integer'Pos( a_frs1516.ninpenhd ));
      params( 805 ) := "+"( Integer'Pos( a_frs1516.ninpensp ));
      params( 806 ) := "+"( Integer'Pos( a_frs1516.ninrinhd ));
      params( 807 ) := "+"( Integer'Pos( a_frs1516.ninrinsp ));
      params( 808 ) := "+"( Integer'Pos( a_frs1516.ninseihd ));
      params( 809 ) := "+"( Integer'Pos( a_frs1516.ninseisp ));
      params( 810 ) := "+"( Integer'Pos( a_frs1516.pniamthd ));
      params( 811 ) := "+"( Integer'Pos( a_frs1516.pniamtsp ));
      params( 812 ) := "+"( Integer'Pos( a_frs1516.nireghd ));
      params( 813 ) := "+"( Integer'Pos( a_frs1516.niregsp ));
      params( 814 ) := "+"( Integer'Pos( a_frs1516.nirelghd ));
      params( 815 ) := "+"( Integer'Pos( a_frs1516.nirelgsp ));
      params( 816 ) := "+"( Integer'Pos( a_frs1516.nolk1hd ));
      params( 817 ) := "+"( Integer'Pos( a_frs1516.nolk1sp ));
      params( 818 ) := "+"( Integer'Pos( a_frs1516.nolk2hd ));
      params( 819 ) := "+"( Integer'Pos( a_frs1516.nolk2sp ));
      params( 820 ) := "+"( Integer'Pos( a_frs1516.nolk3hd ));
      params( 821 ) := "+"( Integer'Pos( a_frs1516.nolk3sp ));
      params( 822 ) := "+"( Integer'Pos( a_frs1516.nowanthd ));
      params( 823 ) := "+"( Integer'Pos( a_frs1516.nowantsp ));
      params( 824 ) := "+"( Float( a_frs1516.nssechd ));
      params( 825 ) := "+"( Float( a_frs1516.nssecsp ));
      params( 826 ) := "+"( Integer'Pos( a_frs1516.numjobhd ));
      params( 827 ) := "+"( Integer'Pos( a_frs1516.numjobsp ));
      params( 828 ) := "+"( Integer'Pos( a_frs1516.numj2hd ));
      params( 829 ) := "+"( Integer'Pos( a_frs1516.numj2sp ));
      params( 830 ) := "+"( Integer'Pos( a_frs1516.ocnumhd ));
      params( 831 ) := "+"( Integer'Pos( a_frs1516.ocnumsp ));
      params( 832 ) := "+"( Integer'Pos( a_frs1516.oddjobhd ));
      params( 833 ) := "+"( Integer'Pos( a_frs1516.oddjobsp ));
      params( 834 ) := "+"( Integer'Pos( a_frs1516.oldstdhd ));
      params( 835 ) := "+"( Integer'Pos( a_frs1516.oldstdsp ));
      params( 836 ) := "+"( Integer'Pos( a_frs1516.oabparhd ));
      params( 837 ) := "+"( Integer'Pos( a_frs1516.oabparsp ));
      params( 838 ) := "+"( Float( a_frs1516.otamthd ));
      params( 839 ) := "+"( Float( a_frs1516.otamtsp ));
      params( 840 ) := "+"( Float( a_frs1516.otpamthd ));
      params( 841 ) := "+"( Integer'Pos( a_frs1516.otpamtsp ));
      params( 842 ) := "+"( Integer'Pos( a_frs1516.otappdhd ));
      params( 843 ) := "+"( Integer'Pos( a_frs1516.otappdsp ));
      params( 844 ) := "+"( Integer'Pos( a_frs1516.qehbtbhd ));
      params( 845 ) := "+"( Integer'Pos( a_frs1516.qehbtbsp ));
      params( 846 ) := "+"( Integer'Pos( a_frs1516.qwidplhd ));
      params( 847 ) := "+"( Integer'Pos( a_frs1516.qwidplsp ));
      params( 848 ) := "+"( Integer'Pos( a_frs1516.qinwkchd ));
      params( 849 ) := "+"( Integer'Pos( a_frs1516.qinwkcsp ));
      params( 850 ) := "+"( Integer'Pos( a_frs1516.qrtwkchd ));
      params( 851 ) := "+"( Integer'Pos( a_frs1516.qrtwkcsp ));
      params( 852 ) := "+"( Integer'Pos( a_frs1516.qothbehd ));
      params( 853 ) := "+"( Integer'Pos( a_frs1516.qothbesp ));
      params( 854 ) := "+"( Integer'Pos( a_frs1516.othtaxhd ));
      params( 855 ) := "+"( Integer'Pos( a_frs1516.othtaxsp ));
      params( 856 ) := "+"( Integer'Pos( a_frs1516.otinvahd ));
      params( 857 ) := "+"( Integer'Pos( a_frs1516.otinvasp ));
      params( 858 ) := "+"( Float( a_frs1516.pareamhd ));
      params( 859 ) := "+"( Float( a_frs1516.pareamsp ));
      params( 860 ) := "+"( Integer'Pos( a_frs1516.qpchd ));
      params( 861 ) := "+"( Integer'Pos( a_frs1516.qpcsp ));
      params( 862 ) := "+"( Integer'Pos( a_frs1516.qrphd ));
      params( 863 ) := "+"( Integer'Pos( a_frs1516.qrpsp ));
      params( 864 ) := "+"( Integer'Pos( a_frs1516.qbbhd ));
      params( 865 ) := "+"( Integer'Pos( a_frs1516.qbbsp ));
      params( 866 ) := "+"( Integer'Pos( a_frs1516.qafcshd ));
      params( 867 ) := "+"( Integer'Pos( a_frs1516.qafcssp ));
      params( 868 ) := "+"( Integer'Pos( a_frs1516.qwwphd ));
      params( 869 ) := "+"( Integer'Pos( a_frs1516.qwwpsp ));
      params( 870 ) := "+"( Integer'Pos( a_frs1516.penflghd ));
      params( 871 ) := "+"( Integer'Pos( a_frs1516.penflgsp ));
      params( 872 ) := "+"( Integer'Pos( a_frs1516.penwl1hd ));
      params( 873 ) := "+"( Integer'Pos( a_frs1516.penwl1sp ));
      params( 874 ) := "+"( Integer'Pos( a_frs1516.penwl2hd ));
      params( 875 ) := "+"( Integer'Pos( a_frs1516.penwl2sp ));
      params( 876 ) := "+"( Integer'Pos( a_frs1516.penwl3hd ));
      params( 877 ) := "+"( Integer'Pos( a_frs1516.penwl3sp ));
      params( 878 ) := "+"( Integer'Pos( a_frs1516.penwl4hd ));
      params( 879 ) := "+"( Integer'Pos( a_frs1516.penwl4sp ));
      params( 880 ) := "+"( Integer'Pos( a_frs1516.penwl5hd ));
      params( 881 ) := "+"( Integer'Pos( a_frs1516.penwl5sp ));
      params( 882 ) := "+"( Integer'Pos( a_frs1516.penwl6hd ));
      params( 883 ) := "+"( Integer'Pos( a_frs1516.penwl6sp ));
      params( 884 ) := "+"( Integer'Pos( a_frs1516.pepscthd ));
      params( 885 ) := "+"( Integer'Pos( a_frs1516.pepsctsp ));
      params( 886 ) := "+"( Integer'Pos( a_frs1516.personhd ));
      params( 887 ) := "+"( Integer'Pos( a_frs1516.personsp ));
      params( 888 ) := "+"( Integer'Pos( a_frs1516.qpipdhd ));
      params( 889 ) := "+"( Integer'Pos( a_frs1516.qpipdsp ));
      params( 890 ) := "+"( Integer'Pos( a_frs1516.qpipmhd ));
      params( 891 ) := "+"( Integer'Pos( a_frs1516.qpipmsp ));
      params( 892 ) := "+"( Integer'Pos( a_frs1516.poaccthd ));
      params( 893 ) := "+"( Integer'Pos( a_frs1516.poacctsp ));
      params( 894 ) := "+"( Integer'Pos( a_frs1516.pocardhd ));
      params( 895 ) := "+"( Integer'Pos( a_frs1516.pocardsp ));
      params( 896 ) := "+"( Integer'Pos( a_frs1516.ppnumchd ));
      params( 897 ) := "+"( Integer'Pos( a_frs1516.ppnumcsp ));
      params( 898 ) := "+"( Float( a_frs1516.proptxhd ));
      params( 899 ) := "+"( Float( a_frs1516.proptxsp ));
      params( 900 ) := "+"( Integer'Pos( a_frs1516.ptwkyrhd ));
      params( 901 ) := "+"( Integer'Pos( a_frs1516.ptwkyrsp ));
      params( 902 ) := "+"( Integer'Pos( a_frs1516.relp1hd ));
      params( 903 ) := "+"( Integer'Pos( a_frs1516.relp1sp ));
      params( 904 ) := "+"( Integer'Pos( a_frs1516.relp2hd ));
      params( 905 ) := "+"( Integer'Pos( a_frs1516.relp2sp ));
      params( 906 ) := "+"( Integer'Pos( a_frs1516.relp3hd ));
      params( 907 ) := "+"( Integer'Pos( a_frs1516.relp3sp ));
      params( 908 ) := "+"( Integer'Pos( a_frs1516.relp4hd ));
      params( 909 ) := "+"( Integer'Pos( a_frs1516.relp4sp ));
      params( 910 ) := "+"( Integer'Pos( a_frs1516.relp5hd ));
      params( 911 ) := "+"( Integer'Pos( a_frs1516.relp5sp ));
      params( 912 ) := "+"( Integer'Pos( a_frs1516.relp6hd ));
      params( 913 ) := "+"( Integer'Pos( a_frs1516.relp6sp ));
      params( 914 ) := "+"( Integer'Pos( a_frs1516.relp7hd ));
      params( 915 ) := "+"( Integer'Pos( a_frs1516.relp7sp ));
      params( 916 ) := "+"( Integer'Pos( a_frs1516.relp8hd ));
      params( 917 ) := "+"( Integer'Pos( a_frs1516.relp8sp ));
      params( 918 ) := "+"( Integer'Pos( a_frs1516.relp9hd ));
      params( 919 ) := "+"( Integer'Pos( a_frs1516.relp9sp ));
      params( 920 ) := "+"( Integer'Pos( a_frs1516.relp10hd ));
      params( 921 ) := "+"( Integer'Pos( a_frs1516.relp10sp ));
      params( 922 ) := "+"( Integer'Pos( a_frs1516.relp11hd ));
      params( 923 ) := "+"( Integer'Pos( a_frs1516.relp11sp ));
      params( 924 ) := "+"( Integer'Pos( a_frs1516.relp12hd ));
      params( 925 ) := "+"( Integer'Pos( a_frs1516.relp12sp ));
      params( 926 ) := "+"( Integer'Pos( a_frs1516.relp13hd ));
      params( 927 ) := "+"( Integer'Pos( a_frs1516.relp13sp ));
      params( 928 ) := "+"( Integer'Pos( a_frs1516.relp14hd ));
      params( 929 ) := "+"( Integer'Pos( a_frs1516.relp14sp ));
      params( 930 ) := "+"( Integer'Pos( a_frs1516.reasonhd ));
      params( 931 ) := "+"( Integer'Pos( a_frs1516.reasonsp ));
      params( 932 ) := "+"( Float( a_frs1516.redamthd ));
      params( 933 ) := "+"( Float( a_frs1516.redamtsp ));
      params( 934 ) := "+"( Integer'Pos( a_frs1516.redundhd ));
      params( 935 ) := "+"( Integer'Pos( a_frs1516.redundsp ));
      params( 936 ) := "+"( Integer'Pos( a_frs1516.rednethd ));
      params( 937 ) := "+"( Integer'Pos( a_frs1516.rednetsp ));
      params( 938 ) := "+"( Integer'Pos( a_frs1516.redtaxhd ));
      params( 939 ) := "+"( Integer'Pos( a_frs1516.redtaxsp ));
      params( 940 ) := "+"( Integer'Pos( a_frs1516.relhrphd ));
      params( 941 ) := "+"( Integer'Pos( a_frs1516.relhrpsp ));
      params( 942 ) := "+"( Integer'Pos( a_frs1516.relgewhd ));
      params( 943 ) := "+"( Integer'Pos( a_frs1516.relgewsp ));
      params( 944 ) := "+"( Integer'Pos( a_frs1516.relgschd ));
      params( 945 ) := "+"( Integer'Pos( a_frs1516.relgscsp ));
      params( 946 ) := "+"( Integer'Pos( a_frs1516.rprofhd ));
      params( 947 ) := "+"( Integer'Pos( a_frs1516.rprofsp ));
      params( 948 ) := "+"( Integer'Pos( a_frs1516.retirehd ));
      params( 949 ) := "+"( Integer'Pos( a_frs1516.retiresp ));
      params( 950 ) := "+"( Integer'Pos( a_frs1516.retir1hd ));
      params( 951 ) := "+"( Integer'Pos( a_frs1516.retir1sp ));
      params( 952 ) := "+"( Integer'Pos( a_frs1516.retreshd ));
      params( 953 ) := "+"( Integer'Pos( a_frs1516.retressp ));
      params( 954 ) := "+"( Float( a_frs1516.renthd ));
      params( 955 ) := "+"( Float( a_frs1516.rentsp ));
      params( 956 ) := "+"( Float( a_frs1516.royalhd ));
      params( 957 ) := "+"( Float( a_frs1516.royalsp ));
      params( 958 ) := "+"( Float( a_frs1516.sleephd ));
      params( 959 ) := "+"( Float( a_frs1516.sleepsp ));
      params( 960 ) := "+"( Float( a_frs1516.forpenhd ));
      params( 961 ) := "+"( Float( a_frs1516.forpensp ));
      params( 962 ) := "+"( Integer'Pos( a_frs1516.restrchd ));
      params( 963 ) := "+"( Integer'Pos( a_frs1516.restrcsp ));
      params( 964 ) := "+"( Integer'Pos( a_frs1516.sapadjhd ));
      params( 965 ) := "+"( Integer'Pos( a_frs1516.sapadjsp ));
      params( 966 ) := "+"( Integer'Pos( a_frs1516.sdem01hd ));
      params( 967 ) := "+"( Integer'Pos( a_frs1516.sdem01sp ));
      params( 968 ) := "+"( Integer'Pos( a_frs1516.sdem02hd ));
      params( 969 ) := "+"( Integer'Pos( a_frs1516.sdem02sp ));
      params( 970 ) := "+"( Integer'Pos( a_frs1516.sdem03hd ));
      params( 971 ) := "+"( Integer'Pos( a_frs1516.sdem03sp ));
      params( 972 ) := "+"( Integer'Pos( a_frs1516.sdem04hd ));
      params( 973 ) := "+"( Integer'Pos( a_frs1516.sdem04sp ));
      params( 974 ) := "+"( Integer'Pos( a_frs1516.sdem05hd ));
      params( 975 ) := "+"( Integer'Pos( a_frs1516.sdem05sp ));
      params( 976 ) := "+"( Integer'Pos( a_frs1516.sdem06hd ));
      params( 977 ) := "+"( Integer'Pos( a_frs1516.sdem06sp ));
      params( 978 ) := "+"( Integer'Pos( a_frs1516.sdem07hd ));
      params( 979 ) := "+"( Integer'Pos( a_frs1516.sdem07sp ));
      params( 980 ) := "+"( Integer'Pos( a_frs1516.sdem08hd ));
      params( 981 ) := "+"( Integer'Pos( a_frs1516.sdem08sp ));
      params( 982 ) := "+"( Integer'Pos( a_frs1516.sdem09hd ));
      params( 983 ) := "+"( Integer'Pos( a_frs1516.sdem09sp ));
      params( 984 ) := "+"( Integer'Pos( a_frs1516.sdem10hd ));
      params( 985 ) := "+"( Integer'Pos( a_frs1516.sdem10sp ));
      params( 986 ) := "+"( Integer'Pos( a_frs1516.sdem11hd ));
      params( 987 ) := "+"( Integer'Pos( a_frs1516.sdem11sp ));
      params( 988 ) := "+"( Integer'Pos( a_frs1516.sdem12hd ));
      params( 989 ) := "+"( Integer'Pos( a_frs1516.sdem12sp ));
      params( 990 ) := "+"( Integer'Pos( a_frs1516.inseinhd ));
      params( 991 ) := "+"( Integer'Pos( a_frs1516.inseinsp ));
      params( 992 ) := "+"( Integer'Pos( a_frs1516.sdemphd ));
      params( 993 ) := "+"( Integer'Pos( a_frs1516.sdempsp ));
      params( 994 ) := "+"( Integer'Pos( a_frs1516.sexhd ));
      params( 995 ) := "+"( Integer'Pos( a_frs1516.sexsp ));
      params( 996 ) := "+"( Integer'Pos( a_frs1516.sichd ));
      params( 997 ) := "+"( Integer'Pos( a_frs1516.sicsp ));
      params( 998 ) := "+"( Integer'Pos( a_frs1516.sidqnhd ));
      params( 999 ) := "+"( Integer'Pos( a_frs1516.sidqnsp ));
      params( 1000 ) := "+"( Integer'Pos( a_frs1516.sloshd ));
      params( 1001 ) := "+"( Integer'Pos( a_frs1516.slossp ));
      params( 1002 ) := "+"( Float( a_frs1516.slramthd ));
      params( 1003 ) := "+"( Float( a_frs1516.slramtsp ));
      params( 1004 ) := "+"( Integer'Pos( a_frs1516.slrppdhd ));
      params( 1005 ) := "+"( Integer'Pos( a_frs1516.slrppdsp ));
      params( 1006 ) := "+"( Float( a_frs1516.smpajhd ));
      params( 1007 ) := "+"( Float( a_frs1516.smpajsp ));
      params( 1008 ) := "+"( Integer'Pos( a_frs1516.sc2010hd ));
      params( 1009 ) := "+"( Integer'Pos( a_frs1516.sc2010sp ));
      params( 1010 ) := "+"( Integer'Pos( a_frs1516.qsfgrhd ));
      params( 1011 ) := "+"( Integer'Pos( a_frs1516.qsfgrsp ));
      params( 1012 ) := "+"( Integer'Pos( a_frs1516.qssmthd ));
      params( 1013 ) := "+"( Integer'Pos( a_frs1516.qssmtsp ));
      params( 1014 ) := "+"( Integer'Pos( a_frs1516.qlgdwphd ));
      params( 1015 ) := "+"( Integer'Pos( a_frs1516.qlgdwpsp ));
      params( 1016 ) := "+"( Integer'Pos( a_frs1516.qlglahd ));
      params( 1017 ) := "+"( Integer'Pos( a_frs1516.qlglasp ));
      params( 1018 ) := "+"( Integer'Pos( a_frs1516.blindhd ));
      params( 1019 ) := "+"( Integer'Pos( a_frs1516.blindsp ));
      params( 1020 ) := "+"( Integer'Pos( a_frs1516.parsihd ));
      params( 1021 ) := "+"( Integer'Pos( a_frs1516.parsisp ));
      params( 1022 ) := "+"( Integer'Pos( a_frs1516.deafhd ));
      params( 1023 ) := "+"( Integer'Pos( a_frs1516.deafsp ));
      params( 1024 ) := "+"( Integer'Pos( a_frs1516.spouthd ));
      params( 1025 ) := "+"( Integer'Pos( a_frs1516.spoutsp ));
      params( 1026 ) := "+"( Float( a_frs1516.sppadjhd ));
      params( 1027 ) := "+"( Float( a_frs1516.sppadjsp ));
      params( 1028 ) := "+"( Integer'Pos( a_frs1516.spyrothd ));
      params( 1029 ) := "+"( Integer'Pos( a_frs1516.spyrotsp ));
      params( 1030 ) := "+"( Float( a_frs1516.srentahd ));
      params( 1031 ) := "+"( Float( a_frs1516.srentasp ));
      params( 1032 ) := "+"( Integer'Pos( a_frs1516.psrenthd ));
      params( 1033 ) := "+"( Integer'Pos( a_frs1516.psrentsp ));
      params( 1034 ) := "+"( Integer'Pos( a_frs1516.sfispchd ));
      params( 1035 ) := "+"( Integer'Pos( a_frs1516.sfispcsp ));
      params( 1036 ) := "+"( Integer'Pos( a_frs1516.sfjesahd ));
      params( 1037 ) := "+"( Integer'Pos( a_frs1516.sfjesasp ));
      params( 1038 ) := "+"( Integer'Pos( a_frs1516.sruchd ));
      params( 1039 ) := "+"( Integer'Pos( a_frs1516.srucsp ));
      params( 1040 ) := "+"( Float( a_frs1516.sspajhd ));
      params( 1041 ) := "+"( Float( a_frs1516.sspajsp ));
      params( 1042 ) := "+"( Integer'Pos( a_frs1516.gtsavahd ));
      params( 1043 ) := "+"( Integer'Pos( a_frs1516.gtsavasp ));
      params( 1044 ) := "+"( Integer'Pos( a_frs1516.stshcthd ));
      params( 1045 ) := "+"( Integer'Pos( a_frs1516.stshctsp ));
      params( 1046 ) := "+"( Integer'Pos( a_frs1516.tdaywkhd ));
      params( 1047 ) := "+"( Integer'Pos( a_frs1516.tdaywksp ));
      params( 1048 ) := "+"( Integer'Pos( a_frs1516.agefedhd ));
      params( 1049 ) := "+"( Integer'Pos( a_frs1516.agefedsp ));
      params( 1050 ) := "+"( Integer'Pos( a_frs1516.tmpjobhd ));
      params( 1051 ) := "+"( Integer'Pos( a_frs1516.tmpjobsp ));
      params( 1052 ) := "+"( Integer'Pos( a_frs1516.tesscthd ));
      params( 1053 ) := "+"( Integer'Pos( a_frs1516.tessctsp ));
      params( 1054 ) := "+"( Integer'Pos( a_frs1516.totgrahd ));
      params( 1055 ) := "+"( Float( a_frs1516.totgrasp ));
      params( 1056 ) := "+"( Float( a_frs1516.tothouhd ));
      params( 1057 ) := "+"( Float( a_frs1516.tothousp ));
      params( 1058 ) := "+"( Float( a_frs1516.totinthd ));
      params( 1059 ) := "+"( Float( a_frs1516.totintsp ));
      params( 1060 ) := "+"( Float( a_frs1516.totocchd ));
      params( 1061 ) := "+"( Float( a_frs1516.totoccsp ));
      params( 1062 ) := "+"( Integer'Pos( a_frs1516.trainhd ));
      params( 1063 ) := "+"( Integer'Pos( a_frs1516.trainsp ));
      params( 1064 ) := "+"( Integer'Pos( a_frs1516.trnallhd ));
      params( 1065 ) := "+"( Integer'Pos( a_frs1516.trnallsp ));
      params( 1066 ) := "+"( Float( a_frs1516.ttbprxhd ));
      params( 1067 ) := "+"( Float( a_frs1516.ttbprxsp ));
      params( 1068 ) := "+"( Integer'Pos( a_frs1516.tuborrhd ));
      params( 1069 ) := "+"( Integer'Pos( a_frs1516.tuborrsp ));
      params( 1070 ) := "+"( Integer'Pos( a_frs1516.typeedhd ));
      params( 1071 ) := "+"( Integer'Pos( a_frs1516.typeedsp ));
      params( 1072 ) := "+"( Integer'Pos( a_frs1516.unpd1hd ));
      params( 1073 ) := "+"( Integer'Pos( a_frs1516.unpd1sp ));
      params( 1074 ) := "+"( Integer'Pos( a_frs1516.unpd2hd ));
      params( 1075 ) := "+"( Integer'Pos( a_frs1516.unpd2sp ));
      params( 1076 ) := "+"( Integer'Pos( a_frs1516.untrcthd ));
      params( 1077 ) := "+"( Integer'Pos( a_frs1516.untrctsp ));
      params( 1078 ) := "+"( Integer'Pos( a_frs1516.upersohd ));
      params( 1079 ) := "+"( Integer'Pos( a_frs1516.upersosp ));
      params( 1080 ) := "+"( Integer'Pos( a_frs1516.agewidhd ));
      params( 1081 ) := "+"( Integer'Pos( a_frs1516.agewidsp ));
      params( 1082 ) := "+"( Integer'Pos( a_frs1516.kidwidhd ));
      params( 1083 ) := "+"( Integer'Pos( a_frs1516.kidwidsp ));
      params( 1084 ) := "+"( Integer'Pos( a_frs1516.quchd ));
      params( 1085 ) := "+"( Integer'Pos( a_frs1516.qucsp ));
      params( 1086 ) := "+"( Integer'Pos( a_frs1516.qhbhd ));
      params( 1087 ) := "+"( Integer'Pos( a_frs1516.qhbsp ));
      params( 1088 ) := "+"( Integer'Pos( a_frs1516.qwtchd ));
      params( 1089 ) := "+"( Integer'Pos( a_frs1516.qwtcsp ));
      params( 1090 ) := "+"( Integer'Pos( a_frs1516.qctchd ));
      params( 1091 ) := "+"( Integer'Pos( a_frs1516.qctcsp ));
      params( 1092 ) := "+"( Integer'Pos( a_frs1516.qishd ));
      params( 1093 ) := "+"( Integer'Pos( a_frs1516.qissp ));
      params( 1094 ) := "+"( Integer'Pos( a_frs1516.qjsahd ));
      params( 1095 ) := "+"( Integer'Pos( a_frs1516.qjsasp ));
      params( 1096 ) := "+"( Integer'Pos( a_frs1516.qesahd ));
      params( 1097 ) := "+"( Integer'Pos( a_frs1516.qesasp ));
      params( 1098 ) := "+"( Integer'Pos( a_frs1516.qcahd ));
      params( 1099 ) := "+"( Integer'Pos( a_frs1516.qcasp ));
      params( 1100 ) := "+"( Integer'Pos( a_frs1516.waithd ));
      params( 1101 ) := "+"( Integer'Pos( a_frs1516.waitsp ));
      params( 1102 ) := "+"( Integer'Pos( a_frs1516.whresphd ));
      params( 1103 ) := "+"( Integer'Pos( a_frs1516.whrespsp ));
      params( 1104 ) := "+"( Integer'Pos( a_frs1516.whoctbhd ));
      params( 1105 ) := "+"( Integer'Pos( a_frs1516.whoctbsp ));
      params( 1106 ) := "+"( Float( a_frs1516.widocchd ));
      params( 1107 ) := "+"( Float( a_frs1516.widoccsp ));
      params( 1108 ) := "+"( Integer'Pos( a_frs1516.wintflhd ));
      params( 1109 ) := "+"( Integer'Pos( a_frs1516.wintflsp ));
      params( 1110 ) := "+"( Integer'Pos( a_frs1516.workinhd ));
      params( 1111 ) := "+"( Integer'Pos( a_frs1516.workinsp ));
      params( 1112 ) := "+"( Integer'Pos( a_frs1516.wpahd ));
      params( 1113 ) := "+"( Integer'Pos( a_frs1516.wpasp ));
      params( 1114 ) := "+"( Integer'Pos( a_frs1516.wpbahd ));
      params( 1115 ) := "+"( Integer'Pos( a_frs1516.wpbasp ));
      params( 1116 ) := "+"( Integer'Pos( a_frs1516.wtclm1hd ));
      params( 1117 ) := "+"( Integer'Pos( a_frs1516.wtclm1sp ));
      params( 1118 ) := "+"( Integer'Pos( a_frs1516.wtclm2hd ));
      params( 1119 ) := "+"( Integer'Pos( a_frs1516.wtclm2sp ));
      params( 1120 ) := "+"( Integer'Pos( a_frs1516.yjblevhd ));
      params( 1121 ) := "+"( Integer'Pos( a_frs1516.yjblevsp ));
      params( 1122 ) := "+"( Integer'Pos( a_frs1516.ystwkhd ));
      params( 1123 ) := "+"( Integer'Pos( a_frs1516.ystwksp ));
      params( 1124 ) := "+"( Float( a_frs1516.as011hd ));
      params( 1125 ) := "+"( Float( a_frs1516.as012hd ));
      params( 1126 ) := "+"( Float( a_frs1516.as013hd ));
      params( 1127 ) := "+"( Integer'Pos( a_frs1516.as014hd ));
      params( 1128 ) := "+"( Float( a_frs1516.as011sp ));
      params( 1129 ) := "+"( Float( a_frs1516.as012sp ));
      params( 1130 ) := "+"( Integer'Pos( a_frs1516.as013sp ));
      params( 1131 ) := "+"( Integer'Pos( a_frs1516.as014sp ));
      params( 1132 ) := "+"( Integer'Pos( a_frs1516.as021hd ));
      params( 1133 ) := "+"( Integer'Pos( a_frs1516.as022hd ));
      params( 1134 ) := "+"( Float( a_frs1516.as021sp ));
      params( 1135 ) := "+"( Integer'Pos( a_frs1516.as022sp ));
      params( 1136 ) := "+"( Integer'Pos( a_frs1516.as031hd ));
      params( 1137 ) := "+"( Integer'Pos( a_frs1516.as031sp ));
      params( 1138 ) := "+"( Float( a_frs1516.as051hd ));
      params( 1139 ) := "+"( Float( a_frs1516.as052hd ));
      params( 1140 ) := "+"( Float( a_frs1516.as053hd ));
      params( 1141 ) := "+"( Integer'Pos( a_frs1516.as054hd ));
      params( 1142 ) := "+"( Integer'Pos( a_frs1516.as055hd ));
      params( 1143 ) := "+"( Integer'Pos( a_frs1516.as056hd ));
      params( 1144 ) := "+"( Integer'Pos( a_frs1516.as057hd ));
      params( 1145 ) := "+"( Float( a_frs1516.as051sp ));
      params( 1146 ) := "+"( Float( a_frs1516.as052sp ));
      params( 1147 ) := "+"( Float( a_frs1516.as053sp ));
      params( 1148 ) := "+"( Integer'Pos( a_frs1516.as054sp ));
      params( 1149 ) := "+"( Integer'Pos( a_frs1516.as055sp ));
      params( 1150 ) := "+"( Integer'Pos( a_frs1516.as056sp ));
      params( 1151 ) := "+"( Integer'Pos( a_frs1516.as057sp ));
      params( 1152 ) := "+"( Integer'Pos( a_frs1516.as061hd ));
      params( 1153 ) := "+"( Integer'Pos( a_frs1516.as061sp ));
      params( 1154 ) := "+"( Integer'Pos( a_frs1516.as071hd ));
      params( 1155 ) := "+"( Integer'Pos( a_frs1516.as071sp ));
      params( 1156 ) := "+"( Float( a_frs1516.as081hd ));
      params( 1157 ) := "+"( Float( a_frs1516.as082hd ));
      params( 1158 ) := "+"( Integer'Pos( a_frs1516.as083hd ));
      params( 1159 ) := "+"( Integer'Pos( a_frs1516.as084hd ));
      params( 1160 ) := "+"( Integer'Pos( a_frs1516.as085hd ));
      params( 1161 ) := "+"( Float( a_frs1516.as081sp ));
      params( 1162 ) := "+"( Float( a_frs1516.as082sp ));
      params( 1163 ) := "+"( Integer'Pos( a_frs1516.as083sp ));
      params( 1164 ) := "+"( Integer'Pos( a_frs1516.as084sp ));
      params( 1165 ) := "+"( Integer'Pos( a_frs1516.as085sp ));
      params( 1166 ) := "+"( Integer'Pos( a_frs1516.as101hd ));
      params( 1167 ) := "+"( Integer'Pos( a_frs1516.as101sp ));
      params( 1168 ) := "+"( Integer'Pos( a_frs1516.as111hd ));
      params( 1169 ) := "+"( Integer'Pos( a_frs1516.as111sp ));
      params( 1170 ) := "+"( Integer'Pos( a_frs1516.as121hd ));
      params( 1171 ) := "+"( Integer'Pos( a_frs1516.as121sp ));
      params( 1172 ) := "+"( Integer'Pos( a_frs1516.as131hd ));
      params( 1173 ) := "+"( Integer'Pos( a_frs1516.as131sp ));
      params( 1174 ) := "+"( Integer'Pos( a_frs1516.as141hd ));
      params( 1175 ) := "+"( Integer'Pos( a_frs1516.as142hd ));
      params( 1176 ) := "+"( Integer'Pos( a_frs1516.as143hd ));
      params( 1177 ) := "+"( Integer'Pos( a_frs1516.as141sp ));
      params( 1178 ) := "+"( Integer'Pos( a_frs1516.as142sp ));
      params( 1179 ) := "+"( Integer'Pos( a_frs1516.as143sp ));
      params( 1180 ) := "+"( Float( a_frs1516.as151hd ));
      params( 1181 ) := "+"( Float( a_frs1516.as151sp ));
      params( 1182 ) := "+"( Integer'Pos( a_frs1516.as161hd ));
      params( 1183 ) := "+"( Integer'Pos( a_frs1516.as161sp ));
      params( 1184 ) := "+"( Integer'Pos( a_frs1516.as191hd ));
      params( 1185 ) := "+"( Integer'Pos( a_frs1516.as191sp ));
      params( 1186 ) := "+"( Float( a_frs1516.as211hd ));
      params( 1187 ) := "+"( Integer'Pos( a_frs1516.as212hd ));
      params( 1188 ) := "+"( Integer'Pos( a_frs1516.as213hd ));
      params( 1189 ) := "+"( Integer'Pos( a_frs1516.as214hd ));
      params( 1190 ) := "+"( Float( a_frs1516.as211sp ));
      params( 1191 ) := "+"( Float( a_frs1516.as212sp ));
      params( 1192 ) := "+"( Integer'Pos( a_frs1516.as213sp ));
      params( 1193 ) := "+"( Integer'Pos( a_frs1516.as214sp ));
      params( 1194 ) := "+"( Integer'Pos( a_frs1516.as261hd ));
      params( 1195 ) := "+"( Integer'Pos( a_frs1516.as261sp ));
      params( 1196 ) := "+"( Float( a_frs1516.as271hd ));
      params( 1197 ) := "+"( Integer'Pos( a_frs1516.as272hd ));
      params( 1198 ) := "+"( Integer'Pos( a_frs1516.as271sp ));
      params( 1199 ) := "+"( Integer'Pos( a_frs1516.as272sp ));
      params( 1200 ) := "+"( Integer'Pos( a_frs1516.as281hd ));
      params( 1201 ) := "+"( Float( a_frs1516.as281sp ));
      params( 1202 ) := "+"( Integer'Pos( a_frs1516.as291hd ));
      params( 1203 ) := "+"( Integer'Pos( a_frs1516.as292hd ));
      params( 1204 ) := "+"( Integer'Pos( a_frs1516.as293hd ));
      params( 1205 ) := "+"( Integer'Pos( a_frs1516.as291sp ));
      params( 1206 ) := "+"( Integer'Pos( a_frs1516.as292sp ));
      params( 1207 ) := "+"( Integer'Pos( a_frs1516.as293sp ));
      params( 1208 ) := "+"( Integer'Pos( a_frs1516.stdlachd ));
      params( 1209 ) := "+"( Integer'Pos( a_frs1516.stdlamhd ));
      params( 1210 ) := "+"( Integer'Pos( a_frs1516.stcbhd ));
      params( 1211 ) := "+"( Integer'Pos( a_frs1516.stpenchd ));
      params( 1212 ) := "+"( Integer'Pos( a_frs1516.strphd ));
      params( 1213 ) := "+"( Integer'Pos( a_frs1516.stwphd ));
      params( 1214 ) := "+"( Integer'Pos( a_frs1516.stwdphd ));
      params( 1215 ) := "+"( Integer'Pos( a_frs1516.stwwphd ));
      params( 1216 ) := "+"( Integer'Pos( a_frs1516.stsdahd ));
      params( 1217 ) := "+"( Integer'Pos( a_frs1516.staahd ));
      params( 1218 ) := "+"( Integer'Pos( a_frs1516.sticahd ));
      params( 1219 ) := "+"( Integer'Pos( a_frs1516.stjsahd ));
      params( 1220 ) := "+"( Integer'Pos( a_frs1516.stiidbhd ));
      params( 1221 ) := "+"( Integer'Pos( a_frs1516.stesahd ));
      params( 1222 ) := "+"( Integer'Pos( a_frs1516.stibhd ));
      params( 1223 ) := "+"( Integer'Pos( a_frs1516.stishd ));
      params( 1224 ) := "+"( Integer'Pos( a_frs1516.stmahd ));
      params( 1225 ) := "+"( Integer'Pos( a_frs1516.stshhd ));
      params( 1226 ) := "+"( Integer'Pos( a_frs1516.stgahd ));
      params( 1227 ) := "+"( Integer'Pos( a_frs1516.stwtchd ));
      params( 1228 ) := "+"( Integer'Pos( a_frs1516.stctchd ));
      params( 1229 ) := "+"( Integer'Pos( a_frs1516.stwtclhd ));
      params( 1230 ) := "+"( Integer'Pos( a_frs1516.stctclhd ));
      params( 1231 ) := "+"( Integer'Pos( a_frs1516.stuchd ));
      params( 1232 ) := "+"( Integer'Pos( a_frs1516.stpipdhd ));
      params( 1233 ) := "+"( Integer'Pos( a_frs1516.stpipmhd ));
      params( 1234 ) := "+"( Integer'Pos( a_frs1516.stdlacsp ));
      params( 1235 ) := "+"( Integer'Pos( a_frs1516.stdlamsp ));
      params( 1236 ) := "+"( Integer'Pos( a_frs1516.stcbsp ));
      params( 1237 ) := "+"( Integer'Pos( a_frs1516.stpencsp ));
      params( 1238 ) := "+"( Integer'Pos( a_frs1516.strpsp ));
      params( 1239 ) := "+"( Integer'Pos( a_frs1516.stwpsp ));
      params( 1240 ) := "+"( Integer'Pos( a_frs1516.stwdpsp ));
      params( 1241 ) := "+"( Integer'Pos( a_frs1516.stwwpsp ));
      params( 1242 ) := "+"( Integer'Pos( a_frs1516.stsdasp ));
      params( 1243 ) := "+"( Integer'Pos( a_frs1516.staasp ));
      params( 1244 ) := "+"( Integer'Pos( a_frs1516.sticasp ));
      params( 1245 ) := "+"( Integer'Pos( a_frs1516.stjsasp ));
      params( 1246 ) := "+"( Integer'Pos( a_frs1516.stiidbsp ));
      params( 1247 ) := "+"( Integer'Pos( a_frs1516.stesasp ));
      params( 1248 ) := "+"( Integer'Pos( a_frs1516.stibsp ));
      params( 1249 ) := "+"( Integer'Pos( a_frs1516.stissp ));
      params( 1250 ) := "+"( Integer'Pos( a_frs1516.stmasp ));
      params( 1251 ) := "+"( Integer'Pos( a_frs1516.stshsp ));
      params( 1252 ) := "+"( Integer'Pos( a_frs1516.stgasp ));
      params( 1253 ) := "+"( Integer'Pos( a_frs1516.stwtcsp ));
      params( 1254 ) := "+"( Integer'Pos( a_frs1516.stctcsp ));
      params( 1255 ) := "+"( Integer'Pos( a_frs1516.stwtclsp ));
      params( 1256 ) := "+"( Integer'Pos( a_frs1516.stctclsp ));
      params( 1257 ) := "+"( Integer'Pos( a_frs1516.stucsp ));
      params( 1258 ) := "+"( Integer'Pos( a_frs1516.stpipdsp ));
      params( 1259 ) := "+"( Integer'Pos( a_frs1516.stpipmsp ));
      params( 1260 ) := "+"( Float( a_frs1516.dlacahd ));
      params( 1261 ) := "+"( Float( a_frs1516.dlamohd ));
      params( 1262 ) := "+"( Float( a_frs1516.cbhd ));
      params( 1263 ) := "+"( Float( a_frs1516.lpencrhd ));
      params( 1264 ) := "+"( Float( a_frs1516.rphd ));
      params( 1265 ) := "+"( Float( a_frs1516.wphd ));
      params( 1266 ) := "+"( Float( a_frs1516.wdphd ));
      params( 1267 ) := "+"( Float( a_frs1516.wwphd ));
      params( 1268 ) := "+"( Float( a_frs1516.sdahd ));
      params( 1269 ) := "+"( Float( a_frs1516.aahd ));
      params( 1270 ) := "+"( Float( a_frs1516.icahd ));
      params( 1271 ) := "+"( Float( a_frs1516.jsahd ));
      params( 1272 ) := "+"( Float( a_frs1516.iidbhd ));
      params( 1273 ) := "+"( Float( a_frs1516.esahd ));
      params( 1274 ) := "+"( Float( a_frs1516.ibhd ));
      params( 1275 ) := "+"( Float( a_frs1516.ishd ));
      params( 1276 ) := "+"( Float( a_frs1516.mahd ));
      params( 1277 ) := "+"( Integer'Pos( a_frs1516.sfmghd ));
      params( 1278 ) := "+"( Float( a_frs1516.sffghd ));
      params( 1279 ) := "+"( Float( a_frs1516.othbenhd ));
      params( 1280 ) := "+"( Float( a_frs1516.tubenhd ));
      params( 1281 ) := "+"( Float( a_frs1516.fsbenhd ));
      params( 1282 ) := "+"( Float( a_frs1516.sicinhd ));
      params( 1283 ) := "+"( Integer'Pos( a_frs1516.accinhd ));
      params( 1284 ) := "+"( Float( a_frs1516.hosinhd ));
      params( 1285 ) := "+"( Integer'Pos( a_frs1516.gtshd ));
      params( 1286 ) := "+"( Float( a_frs1516.gahd ));
      params( 1287 ) := "+"( Integer'Pos( a_frs1516.iwchd ));
      params( 1288 ) := "+"( Integer'Pos( a_frs1516.r2wchd ));
      params( 1289 ) := "+"( Integer'Pos( a_frs1516.widplhd ));
      params( 1290 ) := "+"( Float( a_frs1516.uninshd ));
      params( 1291 ) := "+"( Integer'Pos( a_frs1516.wfamthd ));
      params( 1292 ) := "+"( Float( a_frs1516.dssdpihd ));
      params( 1293 ) := "+"( Float( a_frs1516.dssdpjhd ));
      params( 1294 ) := "+"( Float( a_frs1516.sfrpaihd ));
      params( 1295 ) := "+"( Float( a_frs1516.sfrpajhd ));
      params( 1296 ) := "+"( Float( a_frs1516.exhbhd ));
      params( 1297 ) := "+"( Float( a_frs1516.perhinhd ));
      params( 1298 ) := "+"( Float( a_frs1516.otsiinhd ));
      params( 1299 ) := "+"( Float( a_frs1516.cichd ));
      params( 1300 ) := "+"( Float( a_frs1516.bowtchd ));
      params( 1301 ) := "+"( Float( a_frs1516.boctchd ));
      params( 1302 ) := "+"( Float( a_frs1516.bowtclhd ));
      params( 1303 ) := "+"( Float( a_frs1516.boctclhd ));
      params( 1304 ) := "+"( Float( a_frs1516.hbhd ));
      params( 1305 ) := "+"( Float( a_frs1516.uchd ));
      params( 1306 ) := "+"( Float( a_frs1516.pipdhd ));
      params( 1307 ) := "+"( Float( a_frs1516.pipmhd ));
      params( 1308 ) := "+"( Float( a_frs1516.lndwphd ));
      params( 1309 ) := "+"( Integer'Pos( a_frs1516.lnlahd ));
      params( 1310 ) := "+"( Float( a_frs1516.dwpauchd ));
      params( 1311 ) := "+"( Float( a_frs1516.sfrpuchd ));
      params( 1312 ) := "+"( Float( a_frs1516.dlacasp ));
      params( 1313 ) := "+"( Float( a_frs1516.dlamosp ));
      params( 1314 ) := "+"( Float( a_frs1516.cbsp ));
      params( 1315 ) := "+"( Float( a_frs1516.lpencrsp ));
      params( 1316 ) := "+"( Float( a_frs1516.rpsp ));
      params( 1317 ) := "+"( Integer'Pos( a_frs1516.wpsp ));
      params( 1318 ) := "+"( Float( a_frs1516.wdpsp ));
      params( 1319 ) := "+"( Float( a_frs1516.wwpsp ));
      params( 1320 ) := "+"( Float( a_frs1516.sdasp ));
      params( 1321 ) := "+"( Float( a_frs1516.aasp ));
      params( 1322 ) := "+"( Float( a_frs1516.icasp ));
      params( 1323 ) := "+"( Float( a_frs1516.jsasp ));
      params( 1324 ) := "+"( Float( a_frs1516.iidbsp ));
      params( 1325 ) := "+"( Float( a_frs1516.esasp ));
      params( 1326 ) := "+"( Float( a_frs1516.ibsp ));
      params( 1327 ) := "+"( Float( a_frs1516.issp ));
      params( 1328 ) := "+"( Float( a_frs1516.masp ));
      params( 1329 ) := "+"( Integer'Pos( a_frs1516.sfmgsp ));
      params( 1330 ) := "+"( Integer'Pos( a_frs1516.sffgsp ));
      params( 1331 ) := "+"( Integer'Pos( a_frs1516.othbensp ));
      params( 1332 ) := "+"( Integer'Pos( a_frs1516.tubensp ));
      params( 1333 ) := "+"( Integer'Pos( a_frs1516.fsbensp ));
      params( 1334 ) := "+"( Float( a_frs1516.sicinsp ));
      params( 1335 ) := "+"( Integer'Pos( a_frs1516.accinsp ));
      params( 1336 ) := "+"( Float( a_frs1516.hosinsp ));
      params( 1337 ) := "+"( Integer'Pos( a_frs1516.gtssp ));
      params( 1338 ) := "+"( Integer'Pos( a_frs1516.gasp ));
      params( 1339 ) := "+"( Integer'Pos( a_frs1516.iwcsp ));
      params( 1340 ) := "+"( Integer'Pos( a_frs1516.r2wcsp ));
      params( 1341 ) := "+"( Integer'Pos( a_frs1516.widplsp ));
      params( 1342 ) := "+"( Float( a_frs1516.uninssp ));
      params( 1343 ) := "+"( Integer'Pos( a_frs1516.wfamtsp ));
      params( 1344 ) := "+"( Float( a_frs1516.dssdpisp ));
      params( 1345 ) := "+"( Float( a_frs1516.dssdpjsp ));
      params( 1346 ) := "+"( Float( a_frs1516.sfrpaisp ));
      params( 1347 ) := "+"( Float( a_frs1516.sfrpajsp ));
      params( 1348 ) := "+"( Integer'Pos( a_frs1516.exhbsp ));
      params( 1349 ) := "+"( Float( a_frs1516.perhinsp ));
      params( 1350 ) := "+"( Float( a_frs1516.otsiinsp ));
      params( 1351 ) := "+"( Integer'Pos( a_frs1516.cicsp ));
      params( 1352 ) := "+"( Float( a_frs1516.bowtcsp ));
      params( 1353 ) := "+"( Float( a_frs1516.boctcsp ));
      params( 1354 ) := "+"( Integer'Pos( a_frs1516.bowtclsp ));
      params( 1355 ) := "+"( Float( a_frs1516.boctclsp ));
      params( 1356 ) := "+"( Float( a_frs1516.hbsp ));
      params( 1357 ) := "+"( Float( a_frs1516.ucsp ));
      params( 1358 ) := "+"( Float( a_frs1516.pipdsp ));
      params( 1359 ) := "+"( Float( a_frs1516.pipmsp ));
      params( 1360 ) := "+"( Integer'Pos( a_frs1516.lndwpsp ));
      params( 1361 ) := "+"( Integer'Pos( a_frs1516.lnlasp ));
      params( 1362 ) := "+"( Integer'Pos( a_frs1516.dwpaucsp ));
      params( 1363 ) := "+"( Float( a_frs1516.sfrpucsp ));
      params( 1364 ) := "+"( Integer'Pos( a_frs1516.ltdlachd ));
      params( 1365 ) := "+"( Integer'Pos( a_frs1516.ltdlamhd ));
      params( 1366 ) := "+"( Integer'Pos( a_frs1516.ltcbhd ));
      params( 1367 ) := "+"( Integer'Pos( a_frs1516.bopenchd ));
      params( 1368 ) := "+"( Integer'Pos( a_frs1516.ltrphd ));
      params( 1369 ) := "+"( Integer'Pos( a_frs1516.ltwphd ));
      params( 1370 ) := "+"( Integer'Pos( a_frs1516.ltwdphd ));
      params( 1371 ) := "+"( Integer'Pos( a_frs1516.ltwwphd ));
      params( 1372 ) := "+"( Integer'Pos( a_frs1516.ltsdahd ));
      params( 1373 ) := "+"( Integer'Pos( a_frs1516.ltaahd ));
      params( 1374 ) := "+"( Integer'Pos( a_frs1516.lticahd ));
      params( 1375 ) := "+"( Integer'Pos( a_frs1516.ltjsahd ));
      params( 1376 ) := "+"( Integer'Pos( a_frs1516.ltiidbhd ));
      params( 1377 ) := "+"( Integer'Pos( a_frs1516.ltesahd ));
      params( 1378 ) := "+"( Integer'Pos( a_frs1516.ltibhd ));
      params( 1379 ) := "+"( Integer'Pos( a_frs1516.ltishd ));
      params( 1380 ) := "+"( Integer'Pos( a_frs1516.ltmahd ));
      params( 1381 ) := "+"( Integer'Pos( a_frs1516.ltshhd ));
      params( 1382 ) := "+"( Integer'Pos( a_frs1516.ltgahd ));
      params( 1383 ) := "+"( Integer'Pos( a_frs1516.hwtchd ));
      params( 1384 ) := "+"( Integer'Pos( a_frs1516.hctchd ));
      params( 1385 ) := "+"( Integer'Pos( a_frs1516.hwtclhd ));
      params( 1386 ) := "+"( Integer'Pos( a_frs1516.hctclhd ));
      params( 1387 ) := "+"( Integer'Pos( a_frs1516.ltuchd ));
      params( 1388 ) := "+"( Integer'Pos( a_frs1516.ltpipdhd ));
      params( 1389 ) := "+"( Integer'Pos( a_frs1516.ltpipmhd ));
      params( 1390 ) := "+"( Integer'Pos( a_frs1516.ltdlacsp ));
      params( 1391 ) := "+"( Integer'Pos( a_frs1516.ltdlamsp ));
      params( 1392 ) := "+"( Integer'Pos( a_frs1516.ltcbsp ));
      params( 1393 ) := "+"( Integer'Pos( a_frs1516.bopencsp ));
      params( 1394 ) := "+"( Integer'Pos( a_frs1516.ltrpsp ));
      params( 1395 ) := "+"( Integer'Pos( a_frs1516.ltwpsp ));
      params( 1396 ) := "+"( Integer'Pos( a_frs1516.ltwdpsp ));
      params( 1397 ) := "+"( Integer'Pos( a_frs1516.ltwwpsp ));
      params( 1398 ) := "+"( Integer'Pos( a_frs1516.ltsdasp ));
      params( 1399 ) := "+"( Integer'Pos( a_frs1516.ltaasp ));
      params( 1400 ) := "+"( Integer'Pos( a_frs1516.lticasp ));
      params( 1401 ) := "+"( Integer'Pos( a_frs1516.ltjsasp ));
      params( 1402 ) := "+"( Integer'Pos( a_frs1516.ltiidbsp ));
      params( 1403 ) := "+"( Integer'Pos( a_frs1516.ltesasp ));
      params( 1404 ) := "+"( Integer'Pos( a_frs1516.ltibsp ));
      params( 1405 ) := "+"( Integer'Pos( a_frs1516.ltissp ));
      params( 1406 ) := "+"( Integer'Pos( a_frs1516.ltmasp ));
      params( 1407 ) := "+"( Integer'Pos( a_frs1516.ltshsp ));
      params( 1408 ) := "+"( Integer'Pos( a_frs1516.ltgasp ));
      params( 1409 ) := "+"( Integer'Pos( a_frs1516.hwtcsp ));
      params( 1410 ) := "+"( Integer'Pos( a_frs1516.hctcsp ));
      params( 1411 ) := "+"( Integer'Pos( a_frs1516.hwtclsp ));
      params( 1412 ) := "+"( Integer'Pos( a_frs1516.hctclsp ));
      params( 1413 ) := "+"( Integer'Pos( a_frs1516.ltucsp ));
      params( 1414 ) := "+"( Integer'Pos( a_frs1516.ltpipdsp ));
      params( 1415 ) := "+"( Integer'Pos( a_frs1516.ltpipmsp ));
      params( 1416 ) := "+"( Integer'Pos( a_frs1516.pdlacahd ));
      params( 1417 ) := "+"( Integer'Pos( a_frs1516.pdlamohd ));
      params( 1418 ) := "+"( Integer'Pos( a_frs1516.pcbhd ));
      params( 1419 ) := "+"( Integer'Pos( a_frs1516.hpenchd ));
      params( 1420 ) := "+"( Integer'Pos( a_frs1516.prphd ));
      params( 1421 ) := "+"( Integer'Pos( a_frs1516.pwphd ));
      params( 1422 ) := "+"( Integer'Pos( a_frs1516.pwdphd ));
      params( 1423 ) := "+"( Integer'Pos( a_frs1516.pwwphd ));
      params( 1424 ) := "+"( Integer'Pos( a_frs1516.psdahd ));
      params( 1425 ) := "+"( Integer'Pos( a_frs1516.paahd ));
      params( 1426 ) := "+"( Integer'Pos( a_frs1516.picahd ));
      params( 1427 ) := "+"( Integer'Pos( a_frs1516.pjsahd ));
      params( 1428 ) := "+"( Integer'Pos( a_frs1516.piidbhd ));
      params( 1429 ) := "+"( Integer'Pos( a_frs1516.pesahd ));
      params( 1430 ) := "+"( Integer'Pos( a_frs1516.pibhd ));
      params( 1431 ) := "+"( Integer'Pos( a_frs1516.pishd ));
      params( 1432 ) := "+"( Integer'Pos( a_frs1516.pmahd ));
      params( 1433 ) := "+"( Integer'Pos( a_frs1516.pothbehd ));
      params( 1434 ) := "+"( Integer'Pos( a_frs1516.ptubenhd ));
      params( 1435 ) := "+"( Integer'Pos( a_frs1516.pfsbenhd ));
      params( 1436 ) := "+"( Integer'Pos( a_frs1516.psicinhd ));
      params( 1437 ) := "+"( Integer'Pos( a_frs1516.paccinhd ));
      params( 1438 ) := "+"( Integer'Pos( a_frs1516.phosinhd ));
      params( 1439 ) := "+"( Integer'Pos( a_frs1516.pgtshd ));
      params( 1440 ) := "+"( Integer'Pos( a_frs1516.pgahd ));
      params( 1441 ) := "+"( Integer'Pos( a_frs1516.iwcpdhd ));
      params( 1442 ) := "+"( Integer'Pos( a_frs1516.r2wcpdhd ));
      params( 1443 ) := "+"( Integer'Pos( a_frs1516.puninshd ));
      params( 1444 ) := "+"( Integer'Pos( a_frs1516.pdsspihd ));
      params( 1445 ) := "+"( Integer'Pos( a_frs1516.pdsspjhd ));
      params( 1446 ) := "+"( Integer'Pos( a_frs1516.pexhbhd ));
      params( 1447 ) := "+"( Integer'Pos( a_frs1516.ppehinhd ));
      params( 1448 ) := "+"( Integer'Pos( a_frs1516.potsinhd ));
      params( 1449 ) := "+"( Integer'Pos( a_frs1516.pdcichd ));
      params( 1450 ) := "+"( Integer'Pos( a_frs1516.wwtchd ));
      params( 1451 ) := "+"( Integer'Pos( a_frs1516.wctchd ));
      params( 1452 ) := "+"( Integer'Pos( a_frs1516.wwtclhd ));
      params( 1453 ) := "+"( Integer'Pos( a_frs1516.wctclhd ));
      params( 1454 ) := "+"( Integer'Pos( a_frs1516.phbhd ));
      params( 1455 ) := "+"( Integer'Pos( a_frs1516.puchd ));
      params( 1456 ) := "+"( Integer'Pos( a_frs1516.ppipdhd ));
      params( 1457 ) := "+"( Integer'Pos( a_frs1516.ppipmhd ));
      params( 1458 ) := "+"( Integer'Pos( a_frs1516.pdwpuchd ));
      params( 1459 ) := "+"( Integer'Pos( a_frs1516.pdlacasp ));
      params( 1460 ) := "+"( Integer'Pos( a_frs1516.pdlamosp ));
      params( 1461 ) := "+"( Integer'Pos( a_frs1516.pcbsp ));
      params( 1462 ) := "+"( Integer'Pos( a_frs1516.hpencsp ));
      params( 1463 ) := "+"( Integer'Pos( a_frs1516.prpsp ));
      params( 1464 ) := "+"( Integer'Pos( a_frs1516.pwpsp ));
      params( 1465 ) := "+"( Integer'Pos( a_frs1516.pwdpsp ));
      params( 1466 ) := "+"( Integer'Pos( a_frs1516.pwwpsp ));
      params( 1467 ) := "+"( Integer'Pos( a_frs1516.psdasp ));
      params( 1468 ) := "+"( Integer'Pos( a_frs1516.paasp ));
      params( 1469 ) := "+"( Integer'Pos( a_frs1516.picasp ));
      params( 1470 ) := "+"( Integer'Pos( a_frs1516.pjsasp ));
      params( 1471 ) := "+"( Integer'Pos( a_frs1516.piidbsp ));
      params( 1472 ) := "+"( Integer'Pos( a_frs1516.pesasp ));
      params( 1473 ) := "+"( Integer'Pos( a_frs1516.pibsp ));
      params( 1474 ) := "+"( Integer'Pos( a_frs1516.pissp ));
      params( 1475 ) := "+"( Integer'Pos( a_frs1516.pmasp ));
      params( 1476 ) := "+"( Integer'Pos( a_frs1516.pothbesp ));
      params( 1477 ) := "+"( Integer'Pos( a_frs1516.ptubensp ));
      params( 1478 ) := "+"( Integer'Pos( a_frs1516.pfsbensp ));
      params( 1479 ) := "+"( Integer'Pos( a_frs1516.psicinsp ));
      params( 1480 ) := "+"( Integer'Pos( a_frs1516.paccinsp ));
      params( 1481 ) := "+"( Integer'Pos( a_frs1516.phosinsp ));
      params( 1482 ) := "+"( Integer'Pos( a_frs1516.pgtssp ));
      params( 1483 ) := "+"( Integer'Pos( a_frs1516.pgasp ));
      params( 1484 ) := "+"( Integer'Pos( a_frs1516.iwcpdsp ));
      params( 1485 ) := "+"( Integer'Pos( a_frs1516.r2wcpdsp ));
      params( 1486 ) := "+"( Integer'Pos( a_frs1516.puninssp ));
      params( 1487 ) := "+"( Integer'Pos( a_frs1516.pdsspisp ));
      params( 1488 ) := "+"( Integer'Pos( a_frs1516.pdsspjsp ));
      params( 1489 ) := "+"( Integer'Pos( a_frs1516.pexhbsp ));
      params( 1490 ) := "+"( Integer'Pos( a_frs1516.ppehinsp ));
      params( 1491 ) := "+"( Integer'Pos( a_frs1516.potsinsp ));
      params( 1492 ) := "+"( Integer'Pos( a_frs1516.pdcicsp ));
      params( 1493 ) := "+"( Integer'Pos( a_frs1516.wwtcsp ));
      params( 1494 ) := "+"( Integer'Pos( a_frs1516.wctcsp ));
      params( 1495 ) := "+"( Integer'Pos( a_frs1516.wwtclsp ));
      params( 1496 ) := "+"( Integer'Pos( a_frs1516.wctclsp ));
      params( 1497 ) := "+"( Integer'Pos( a_frs1516.phbsp ));
      params( 1498 ) := "+"( Integer'Pos( a_frs1516.pucsp ));
      params( 1499 ) := "+"( Integer'Pos( a_frs1516.ppipdsp ));
      params( 1500 ) := "+"( Integer'Pos( a_frs1516.ppipmsp ));
      params( 1501 ) := "+"( Integer'Pos( a_frs1516.pdwpucsp ));
      params( 1502 ) := "+"( Integer'Pos( a_frs1516.cbpayehd ));
      params( 1503 ) := "+"( Integer'Pos( a_frs1516.cbpayesp ));
      params( 1504 ) := "+"( Integer'Pos( a_frs1516.cbtaxhd ));
      params( 1505 ) := "+"( Integer'Pos( a_frs1516.cbtaxsp ));
      params( 1506 ) := "+"( Integer'Pos( a_frs1516.pwtchd ));
      params( 1507 ) := "+"( Integer'Pos( a_frs1516.pctchd ));
      params( 1508 ) := "+"( Integer'Pos( a_frs1516.pwtcsp ));
      params( 1509 ) := "+"( Integer'Pos( a_frs1516.pctcsp ));
      params( 1510 ) := "+"( Integer'Pos( a_frs1516.npcamthd ));
      params( 1511 ) := "+"( Float( a_frs1516.urphd ));
      params( 1512 ) := "+"( Integer'Pos( a_frs1516.uwphd ));
      params( 1513 ) := "+"( Float( a_frs1516.uesahd ));
      params( 1514 ) := "+"( Float( a_frs1516.uishd ));
      params( 1515 ) := "+"( Float( a_frs1516.uwtchd ));
      params( 1516 ) := "+"( Integer'Pos( a_frs1516.uctchd ));
      params( 1517 ) := "+"( Integer'Pos( a_frs1516.npcamtsp ));
      params( 1518 ) := "+"( Float( a_frs1516.urpsp ));
      params( 1519 ) := "+"( Integer'Pos( a_frs1516.uwpsp ));
      params( 1520 ) := "+"( Float( a_frs1516.uesasp ));
      params( 1521 ) := "+"( Integer'Pos( a_frs1516.uissp ));
      params( 1522 ) := "+"( Float( a_frs1516.uwtcsp ));
      params( 1523 ) := "+"( Integer'Pos( a_frs1516.uctcsp ));
      params( 1524 ) := "+"( Integer'Pos( a_frs1516.dmpenchd ));
      params( 1525 ) := "+"( Integer'Pos( a_frs1516.purphd ));
      params( 1526 ) := "+"( Integer'Pos( a_frs1516.puwphd ));
      params( 1527 ) := "+"( Integer'Pos( a_frs1516.nupesahd ));
      params( 1528 ) := "+"( Integer'Pos( a_frs1516.puishd ));
      params( 1529 ) := "+"( Integer'Pos( a_frs1516.dmpencsp ));
      params( 1530 ) := "+"( Integer'Pos( a_frs1516.purpsp ));
      params( 1531 ) := "+"( Integer'Pos( a_frs1516.puwpsp ));
      params( 1532 ) := "+"( Integer'Pos( a_frs1516.nupesasp ));
      params( 1533 ) := "+"( Integer'Pos( a_frs1516.puissp ));
      params( 1534 ) := "+"( Integer'Pos( a_frs1516.wjsahd ));
      params( 1535 ) := "+"( Integer'Pos( a_frs1516.wesahd ));
      params( 1536 ) := "+"( Integer'Pos( a_frs1516.wishd ));
      params( 1537 ) := "+"( Integer'Pos( a_frs1516.wothbehd ));
      params( 1538 ) := "+"( Integer'Pos( a_frs1516.wtubenhd ));
      params( 1539 ) := "+"( Integer'Pos( a_frs1516.wfsbenhd ));
      params( 1540 ) := "+"( Integer'Pos( a_frs1516.wsicinhd ));
      params( 1541 ) := "+"( Integer'Pos( a_frs1516.waccinhd ));
      params( 1542 ) := "+"( Integer'Pos( a_frs1516.whosinhd ));
      params( 1543 ) := "+"( Integer'Pos( a_frs1516.wkiwchd ));
      params( 1544 ) := "+"( Integer'Pos( a_frs1516.wkr2whd ));
      params( 1545 ) := "+"( Integer'Pos( a_frs1516.wuninshd ));
      params( 1546 ) := "+"( Integer'Pos( a_frs1516.wpehinhd ));
      params( 1547 ) := "+"( Integer'Pos( a_frs1516.wotsinhd ));
      params( 1548 ) := "+"( Integer'Pos( a_frs1516.wocichd ));
      params( 1549 ) := "+"( Integer'Pos( a_frs1516.whbhd ));
      params( 1550 ) := "+"( Integer'Pos( a_frs1516.wjsasp ));
      params( 1551 ) := "+"( Integer'Pos( a_frs1516.wesasp ));
      params( 1552 ) := "+"( Integer'Pos( a_frs1516.wissp ));
      params( 1553 ) := "+"( Integer'Pos( a_frs1516.wothbesp ));
      params( 1554 ) := "+"( Integer'Pos( a_frs1516.wtubensp ));
      params( 1555 ) := "+"( Integer'Pos( a_frs1516.wfsbensp ));
      params( 1556 ) := "+"( Integer'Pos( a_frs1516.wsicinsp ));
      params( 1557 ) := "+"( Integer'Pos( a_frs1516.waccinsp ));
      params( 1558 ) := "+"( Integer'Pos( a_frs1516.whosinsp ));
      params( 1559 ) := "+"( Integer'Pos( a_frs1516.wkiwcsp ));
      params( 1560 ) := "+"( Integer'Pos( a_frs1516.wkr2wsp ));
      params( 1561 ) := "+"( Integer'Pos( a_frs1516.wuninssp ));
      params( 1562 ) := "+"( Integer'Pos( a_frs1516.wpehinsp ));
      params( 1563 ) := "+"( Integer'Pos( a_frs1516.wotsinsp ));
      params( 1564 ) := "+"( Integer'Pos( a_frs1516.wocicsp ));
      params( 1565 ) := "+"( Integer'Pos( a_frs1516.whbsp ));
      params( 1566 ) := "+"( Integer'Pos( a_frs1516.yjsahd ));
      params( 1567 ) := "+"( Integer'Pos( a_frs1516.yesahd ));
      params( 1568 ) := "+"( Integer'Pos( a_frs1516.yishd ));
      params( 1569 ) := "+"( Integer'Pos( a_frs1516.yhbhd ));
      params( 1570 ) := "+"( Integer'Pos( a_frs1516.yjsasp ));
      params( 1571 ) := "+"( Integer'Pos( a_frs1516.yesasp ));
      params( 1572 ) := "+"( Integer'Pos( a_frs1516.yissp ));
      params( 1573 ) := "+"( Integer'Pos( a_frs1516.yhbsp ));
      params( 1574 ) := "+"( Integer'Pos( a_frs1516.prothbhd ));
      params( 1575 ) := "+"( Integer'Pos( a_frs1516.prtubehd ));
      params( 1576 ) := "+"( Integer'Pos( a_frs1516.prfsbehd ));
      params( 1577 ) := "+"( Integer'Pos( a_frs1516.prsicihd ));
      params( 1578 ) := "+"( Integer'Pos( a_frs1516.praccihd ));
      params( 1579 ) := "+"( Integer'Pos( a_frs1516.prhosihd ));
      params( 1580 ) := "+"( Integer'Pos( a_frs1516.pruninhd ));
      params( 1581 ) := "+"( Integer'Pos( a_frs1516.prphinhd ));
      params( 1582 ) := "+"( Integer'Pos( a_frs1516.prosinhd ));
      params( 1583 ) := "+"( Integer'Pos( a_frs1516.prcichd ));
      params( 1584 ) := "+"( Integer'Pos( a_frs1516.prothbsp ));
      params( 1585 ) := "+"( Integer'Pos( a_frs1516.prtubesp ));
      params( 1586 ) := "+"( Integer'Pos( a_frs1516.prfsbesp ));
      params( 1587 ) := "+"( Integer'Pos( a_frs1516.prsicisp ));
      params( 1588 ) := "+"( Integer'Pos( a_frs1516.praccisp ));
      params( 1589 ) := "+"( Integer'Pos( a_frs1516.prhosisp ));
      params( 1590 ) := "+"( Integer'Pos( a_frs1516.pruninsp ));
      params( 1591 ) := "+"( Integer'Pos( a_frs1516.prphinsp ));
      params( 1592 ) := "+"( Integer'Pos( a_frs1516.prosinsp ));
      params( 1593 ) := "+"( Integer'Pos( a_frs1516.prcicsp ));
      params( 1594 ) := "+"( Integer'Pos( a_frs1516.uspenchd ));
      params( 1595 ) := "+"( Integer'Pos( a_frs1516.usrphd ));
      params( 1596 ) := "+"( Integer'Pos( a_frs1516.uswphd ));
      params( 1597 ) := "+"( Integer'Pos( a_frs1516.usjsahd ));
      params( 1598 ) := "+"( Integer'Pos( a_frs1516.usishd ));
      params( 1599 ) := "+"( Integer'Pos( a_frs1516.uspencsp ));
      params( 1600 ) := "+"( Integer'Pos( a_frs1516.usrpsp ));
      params( 1601 ) := "+"( Integer'Pos( a_frs1516.uswpsp ));
      params( 1602 ) := "+"( Integer'Pos( a_frs1516.usjsasp ));
      params( 1603 ) := "+"( Integer'Pos( a_frs1516.usissp ));
      params( 1604 ) := "+"( Integer'Pos( a_frs1516.gicacahd ));
      params( 1605 ) := "+"( Integer'Pos( a_frs1516.pencrdhd ));
      params( 1606 ) := "+"( Integer'Pos( a_frs1516.gicaahd ));
      params( 1607 ) := "+"( Integer'Pos( a_frs1516.muibwhd ));
      params( 1608 ) := "+"( Integer'Pos( a_frs1516.wfuelhd ));
      params( 1609 ) := "+"( Integer'Pos( a_frs1516.exhbtyhd ));
      params( 1610 ) := "+"( Integer'Pos( a_frs1516.lnodwphd ));
      params( 1611 ) := "+"( Integer'Pos( a_frs1516.lnolahd ));
      params( 1612 ) := "+"( Integer'Pos( a_frs1516.gicacasp ));
      params( 1613 ) := "+"( Integer'Pos( a_frs1516.pencrdsp ));
      params( 1614 ) := "+"( Integer'Pos( a_frs1516.gicaasp ));
      params( 1615 ) := "+"( Integer'Pos( a_frs1516.muibwsp ));
      params( 1616 ) := "+"( Integer'Pos( a_frs1516.wfuelsp ));
      params( 1617 ) := "+"( Integer'Pos( a_frs1516.exhbtysp ));
      params( 1618 ) := "+"( Integer'Pos( a_frs1516.lnodwpsp ));
      params( 1619 ) := "+"( Integer'Pos( a_frs1516.lnolasp ));
      params( 1620 ) := "+"( Integer'Pos( a_frs1516.dcpayhd ));
      params( 1621 ) := "+"( Integer'Pos( a_frs1516.dmpayhd ));
      params( 1622 ) := "+"( Integer'Pos( a_frs1516.ecpenchd ));
      params( 1623 ) := "+"( Integer'Pos( a_frs1516.wporbahd ));
      params( 1624 ) := "+"( Integer'Pos( a_frs1516.aapayhd ));
      params( 1625 ) := "+"( Integer'Pos( a_frs1516.jsatyphd ));
      params( 1626 ) := "+"( Integer'Pos( a_frs1516.esatyphd ));
      params( 1627 ) := "+"( Integer'Pos( a_frs1516.mupibhd ));
      params( 1628 ) := "+"( Integer'Pos( a_frs1516.dssishd ));
      params( 1629 ) := "+"( Integer'Pos( a_frs1516.dssjsahd ));
      params( 1630 ) := "+"( Integer'Pos( a_frs1516.sfincihd ));
      params( 1631 ) := "+"( Integer'Pos( a_frs1516.sfincjhd ));
      params( 1632 ) := "+"( Integer'Pos( a_frs1516.pdlpayhd ));
      params( 1633 ) := "+"( Integer'Pos( a_frs1516.pmpayhd ));
      params( 1634 ) := "+"( Integer'Pos( a_frs1516.dwpuchd ));
      params( 1635 ) := "+"( Integer'Pos( a_frs1516.sfinuchd ));
      params( 1636 ) := "+"( Integer'Pos( a_frs1516.dcpaysp ));
      params( 1637 ) := "+"( Integer'Pos( a_frs1516.dmpaysp ));
      params( 1638 ) := "+"( Integer'Pos( a_frs1516.ecpencsp ));
      params( 1639 ) := "+"( Integer'Pos( a_frs1516.wporbasp ));
      params( 1640 ) := "+"( Integer'Pos( a_frs1516.aapaysp ));
      params( 1641 ) := "+"( Integer'Pos( a_frs1516.jsatypsp ));
      params( 1642 ) := "+"( Integer'Pos( a_frs1516.esatypsp ));
      params( 1643 ) := "+"( Integer'Pos( a_frs1516.mupibsp ));
      params( 1644 ) := "+"( Integer'Pos( a_frs1516.dssissp ));
      params( 1645 ) := "+"( Integer'Pos( a_frs1516.dssjsasp ));
      params( 1646 ) := "+"( Integer'Pos( a_frs1516.sfincisp ));
      params( 1647 ) := "+"( Integer'Pos( a_frs1516.sfincjsp ));
      params( 1648 ) := "+"( Integer'Pos( a_frs1516.pdlpaysp ));
      params( 1649 ) := "+"( Integer'Pos( a_frs1516.pmpaysp ));
      params( 1650 ) := "+"( Integer'Pos( a_frs1516.dwpucsp ));
      params( 1651 ) := "+"( Integer'Pos( a_frs1516.sfinucsp ));
      params( 1652 ) := "+"( Integer'Pos( a_frs1516.icaperhd ));
      params( 1653 ) := "+"( Integer'Pos( a_frs1516.pmuibhd ));
      params( 1654 ) := "+"( Integer'Pos( a_frs1516.pipmothd ));
      params( 1655 ) := "+"( Integer'Pos( a_frs1516.icapersp ));
      params( 1656 ) := "+"( Integer'Pos( a_frs1516.pmuibsp ));
      params( 1657 ) := "+"( Integer'Pos( a_frs1516.pipmotsp ));
      params( 1658 ) := "+"( Integer'Pos( a_frs1516.r1dlchd ));
      params( 1659 ) := "+"( Integer'Pos( a_frs1516.r1dlmhd ));
      params( 1660 ) := "+"( Integer'Pos( a_frs1516.r1aahd ));
      params( 1661 ) := "+"( Integer'Pos( a_frs1516.r1hbhd ));
      params( 1662 ) := "+"( Integer'Pos( a_frs1516.r1pipdhd ));
      params( 1663 ) := "+"( Integer'Pos( a_frs1516.r1pipmhd ));
      params( 1664 ) := "+"( Integer'Pos( a_frs1516.r1dlcsp ));
      params( 1665 ) := "+"( Integer'Pos( a_frs1516.r1dlmsp ));
      params( 1666 ) := "+"( Integer'Pos( a_frs1516.r1aasp ));
      params( 1667 ) := "+"( Integer'Pos( a_frs1516.r1hbsp ));
      params( 1668 ) := "+"( Integer'Pos( a_frs1516.r1pipdsp ));
      params( 1669 ) := "+"( Integer'Pos( a_frs1516.r1pipmsp ));
      params( 1670 ) := "+"( Integer'Pos( a_frs1516.r2dlchd ));
      params( 1671 ) := "+"( Integer'Pos( a_frs1516.r2dlmhd ));
      params( 1672 ) := "+"( Integer'Pos( a_frs1516.r2aahd ));
      params( 1673 ) := "+"( Integer'Pos( a_frs1516.r2hbhd ));
      params( 1674 ) := "+"( Integer'Pos( a_frs1516.r2pipdhd ));
      params( 1675 ) := "+"( Integer'Pos( a_frs1516.r2pipmhd ));
      params( 1676 ) := "+"( Integer'Pos( a_frs1516.r2dlcsp ));
      params( 1677 ) := "+"( Integer'Pos( a_frs1516.r2dlmsp ));
      params( 1678 ) := "+"( Integer'Pos( a_frs1516.r2aasp ));
      params( 1679 ) := "+"( Integer'Pos( a_frs1516.r2hbsp ));
      params( 1680 ) := "+"( Integer'Pos( a_frs1516.r2pipdsp ));
      params( 1681 ) := "+"( Integer'Pos( a_frs1516.r2pipmsp ));
      params( 1682 ) := "+"( Integer'Pos( a_frs1516.r3dlchd ));
      params( 1683 ) := "+"( Integer'Pos( a_frs1516.r3dlmhd ));
      params( 1684 ) := "+"( Integer'Pos( a_frs1516.r3aahd ));
      params( 1685 ) := "+"( Integer'Pos( a_frs1516.r3hbhd ));
      params( 1686 ) := "+"( Integer'Pos( a_frs1516.r3pipdhd ));
      params( 1687 ) := "+"( Integer'Pos( a_frs1516.r3pipmhd ));
      params( 1688 ) := "+"( Integer'Pos( a_frs1516.r3dlcsp ));
      params( 1689 ) := "+"( Integer'Pos( a_frs1516.r3dlmsp ));
      params( 1690 ) := "+"( Integer'Pos( a_frs1516.r3aasp ));
      params( 1691 ) := "+"( Integer'Pos( a_frs1516.r3hbsp ));
      params( 1692 ) := "+"( Integer'Pos( a_frs1516.r3pipdsp ));
      params( 1693 ) := "+"( Integer'Pos( a_frs1516.r3pipmsp ));
      params( 1694 ) := "+"( Integer'Pos( a_frs1516.r4dlchd ));
      params( 1695 ) := "+"( Integer'Pos( a_frs1516.r4dlmhd ));
      params( 1696 ) := "+"( Integer'Pos( a_frs1516.r4aahd ));
      params( 1697 ) := "+"( Integer'Pos( a_frs1516.r4hbhd ));
      params( 1698 ) := "+"( Integer'Pos( a_frs1516.r4pipdhd ));
      params( 1699 ) := "+"( Integer'Pos( a_frs1516.r4pipmhd ));
      params( 1700 ) := "+"( Integer'Pos( a_frs1516.r4dlcsp ));
      params( 1701 ) := "+"( Integer'Pos( a_frs1516.r4dlmsp ));
      params( 1702 ) := "+"( Integer'Pos( a_frs1516.r4aasp ));
      params( 1703 ) := "+"( Integer'Pos( a_frs1516.r4hbsp ));
      params( 1704 ) := "+"( Integer'Pos( a_frs1516.r4pipdsp ));
      params( 1705 ) := "+"( Integer'Pos( a_frs1516.r4pipmsp ));
      params( 1706 ) := "+"( Integer'Pos( a_frs1516.r5dlchd ));
      params( 1707 ) := "+"( Integer'Pos( a_frs1516.r5dlmhd ));
      params( 1708 ) := "+"( Integer'Pos( a_frs1516.r5aahd ));
      params( 1709 ) := "+"( Integer'Pos( a_frs1516.r5hbhd ));
      params( 1710 ) := "+"( Integer'Pos( a_frs1516.r5pipdhd ));
      params( 1711 ) := "+"( Integer'Pos( a_frs1516.r5pipmhd ));
      params( 1712 ) := "+"( Integer'Pos( a_frs1516.r5dlcsp ));
      params( 1713 ) := "+"( Integer'Pos( a_frs1516.r5dlmsp ));
      params( 1714 ) := "+"( Integer'Pos( a_frs1516.r5aasp ));
      params( 1715 ) := "+"( Integer'Pos( a_frs1516.r5hbsp ));
      params( 1716 ) := "+"( Integer'Pos( a_frs1516.r5pipdsp ));
      params( 1717 ) := "+"( Integer'Pos( a_frs1516.r5pipmsp ));
      params( 1718 ) := "+"( Integer'Pos( a_frs1516.stdlacc1 ));
      params( 1719 ) := "+"( Integer'Pos( a_frs1516.stdlamc1 ));
      params( 1720 ) := "+"( Integer'Pos( a_frs1516.stdlacc2 ));
      params( 1721 ) := "+"( Integer'Pos( a_frs1516.stdlamc2 ));
      params( 1722 ) := "+"( Integer'Pos( a_frs1516.stdlacc3 ));
      params( 1723 ) := "+"( Integer'Pos( a_frs1516.stdlamc3 ));
      params( 1724 ) := "+"( Integer'Pos( a_frs1516.stdlacc4 ));
      params( 1725 ) := "+"( Integer'Pos( a_frs1516.stdlamc4 ));
      params( 1726 ) := "+"( Integer'Pos( a_frs1516.stdlacc5 ));
      params( 1727 ) := "+"( Integer'Pos( a_frs1516.stdlamc5 ));
      params( 1728 ) := "+"( Integer'Pos( a_frs1516.stdlacc6 ));
      params( 1729 ) := "+"( Integer'Pos( a_frs1516.stdlamc6 ));
      params( 1730 ) := "+"( Integer'Pos( a_frs1516.stdlacc7 ));
      params( 1731 ) := "+"( Integer'Pos( a_frs1516.stdlamc7 ));
      params( 1732 ) := "+"( Integer'Pos( a_frs1516.stdlacc8 ));
      params( 1733 ) := "+"( Integer'Pos( a_frs1516.stdlamc8 ));
      params( 1734 ) := "+"( Integer'Pos( a_frs1516.stdlacc9 ));
      params( 1735 ) := "+"( Integer'Pos( a_frs1516.stdlamc9 ));
      params( 1736 ) := "+"( Float( a_frs1516.dlacac1 ));
      params( 1737 ) := "+"( Float( a_frs1516.dlamoc1 ));
      params( 1738 ) := "+"( Float( a_frs1516.dlacac2 ));
      params( 1739 ) := "+"( Float( a_frs1516.dlamoc2 ));
      params( 1740 ) := "+"( Integer'Pos( a_frs1516.dlacac3 ));
      params( 1741 ) := "+"( Integer'Pos( a_frs1516.dlamoc3 ));
      params( 1742 ) := "+"( Integer'Pos( a_frs1516.dlacac4 ));
      params( 1743 ) := "+"( Integer'Pos( a_frs1516.dlamoc4 ));
      params( 1744 ) := "+"( Integer'Pos( a_frs1516.dlacac5 ));
      params( 1745 ) := "+"( Integer'Pos( a_frs1516.dlamoc5 ));
      params( 1746 ) := "+"( Integer'Pos( a_frs1516.dlacac6 ));
      params( 1747 ) := "+"( Integer'Pos( a_frs1516.dlamoc6 ));
      params( 1748 ) := "+"( Integer'Pos( a_frs1516.dlacac7 ));
      params( 1749 ) := "+"( Integer'Pos( a_frs1516.dlamoc7 ));
      params( 1750 ) := "+"( Integer'Pos( a_frs1516.dlacac8 ));
      params( 1751 ) := "+"( Integer'Pos( a_frs1516.dlamoc8 ));
      params( 1752 ) := "+"( Integer'Pos( a_frs1516.dlacac9 ));
      params( 1753 ) := "+"( Integer'Pos( a_frs1516.dlamoc9 ));
      params( 1754 ) := "+"( Integer'Pos( a_frs1516.ltdlacc1 ));
      params( 1755 ) := "+"( Integer'Pos( a_frs1516.ltdlamc1 ));
      params( 1756 ) := "+"( Integer'Pos( a_frs1516.ltdlacc2 ));
      params( 1757 ) := "+"( Integer'Pos( a_frs1516.ltdlamc2 ));
      params( 1758 ) := "+"( Integer'Pos( a_frs1516.ltdlacc3 ));
      params( 1759 ) := "+"( Integer'Pos( a_frs1516.ltdlamc3 ));
      params( 1760 ) := "+"( Integer'Pos( a_frs1516.ltdlacc4 ));
      params( 1761 ) := "+"( Integer'Pos( a_frs1516.ltdlamc4 ));
      params( 1762 ) := "+"( Integer'Pos( a_frs1516.ltdlacc5 ));
      params( 1763 ) := "+"( Integer'Pos( a_frs1516.ltdlamc5 ));
      params( 1764 ) := "+"( Integer'Pos( a_frs1516.ltdlacc6 ));
      params( 1765 ) := "+"( Integer'Pos( a_frs1516.ltdlamc6 ));
      params( 1766 ) := "+"( Integer'Pos( a_frs1516.ltdlacc7 ));
      params( 1767 ) := "+"( Integer'Pos( a_frs1516.ltdlamc7 ));
      params( 1768 ) := "+"( Integer'Pos( a_frs1516.ltdlacc8 ));
      params( 1769 ) := "+"( Integer'Pos( a_frs1516.ltdlamc8 ));
      params( 1770 ) := "+"( Integer'Pos( a_frs1516.ltdlacc9 ));
      params( 1771 ) := "+"( Integer'Pos( a_frs1516.ltdlamc9 ));
      params( 1772 ) := "+"( Integer'Pos( a_frs1516.pdlacac1 ));
      params( 1773 ) := "+"( Integer'Pos( a_frs1516.pdlamoc1 ));
      params( 1774 ) := "+"( Integer'Pos( a_frs1516.pdlacac2 ));
      params( 1775 ) := "+"( Integer'Pos( a_frs1516.pdlamoc2 ));
      params( 1776 ) := "+"( Integer'Pos( a_frs1516.pdlacac3 ));
      params( 1777 ) := "+"( Integer'Pos( a_frs1516.pdlamoc3 ));
      params( 1778 ) := "+"( Integer'Pos( a_frs1516.pdlacac4 ));
      params( 1779 ) := "+"( Integer'Pos( a_frs1516.pdlamoc4 ));
      params( 1780 ) := "+"( Integer'Pos( a_frs1516.pdlacac5 ));
      params( 1781 ) := "+"( Integer'Pos( a_frs1516.pdlamoc5 ));
      params( 1782 ) := "+"( Integer'Pos( a_frs1516.pdlacac6 ));
      params( 1783 ) := "+"( Integer'Pos( a_frs1516.pdlamoc6 ));
      params( 1784 ) := "+"( Integer'Pos( a_frs1516.pdlacac7 ));
      params( 1785 ) := "+"( Integer'Pos( a_frs1516.pdlamoc7 ));
      params( 1786 ) := "+"( Integer'Pos( a_frs1516.pdlacac8 ));
      params( 1787 ) := "+"( Integer'Pos( a_frs1516.pdlamoc8 ));
      params( 1788 ) := "+"( Integer'Pos( a_frs1516.pdlacac9 ));
      params( 1789 ) := "+"( Integer'Pos( a_frs1516.pdlamoc9 ));
      params( 1790 ) := "+"( Integer'Pos( a_frs1516.dcpayc1 ));
      params( 1791 ) := "+"( Integer'Pos( a_frs1516.dmpayc1 ));
      params( 1792 ) := "+"( Integer'Pos( a_frs1516.dcpayc2 ));
      params( 1793 ) := "+"( Integer'Pos( a_frs1516.dmpayc2 ));
      params( 1794 ) := "+"( Integer'Pos( a_frs1516.dcpayc3 ));
      params( 1795 ) := "+"( Integer'Pos( a_frs1516.dmpayc3 ));
      params( 1796 ) := "+"( Integer'Pos( a_frs1516.dcpayc4 ));
      params( 1797 ) := "+"( Integer'Pos( a_frs1516.dmpayc4 ));
      params( 1798 ) := "+"( Integer'Pos( a_frs1516.dcpayc5 ));
      params( 1799 ) := "+"( Integer'Pos( a_frs1516.dmpayc5 ));
      params( 1800 ) := "+"( Integer'Pos( a_frs1516.dcpayc6 ));
      params( 1801 ) := "+"( Integer'Pos( a_frs1516.dmpayc6 ));
      params( 1802 ) := "+"( Integer'Pos( a_frs1516.dcpayc7 ));
      params( 1803 ) := "+"( Integer'Pos( a_frs1516.dmpayc7 ));
      params( 1804 ) := "+"( Integer'Pos( a_frs1516.dcpayc8 ));
      params( 1805 ) := "+"( Integer'Pos( a_frs1516.dmpayc8 ));
      params( 1806 ) := "+"( Integer'Pos( a_frs1516.dcpayc9 ));
      params( 1807 ) := "+"( Integer'Pos( a_frs1516.dmpayc9 ));
      params( 1808 ) := "+"( Integer'Pos( a_frs1516.r1dlcc1 ));
      params( 1809 ) := "+"( Integer'Pos( a_frs1516.r1dlmc1 ));
      params( 1810 ) := "+"( Integer'Pos( a_frs1516.r1dlcc2 ));
      params( 1811 ) := "+"( Integer'Pos( a_frs1516.r1dlmc2 ));
      params( 1812 ) := "+"( Integer'Pos( a_frs1516.r1dlcc3 ));
      params( 1813 ) := "+"( Integer'Pos( a_frs1516.r1dlmc3 ));
      params( 1814 ) := "+"( Integer'Pos( a_frs1516.r1dlcc4 ));
      params( 1815 ) := "+"( Integer'Pos( a_frs1516.r1dlmc4 ));
      params( 1816 ) := "+"( Integer'Pos( a_frs1516.r1dlcc5 ));
      params( 1817 ) := "+"( Integer'Pos( a_frs1516.r1dlmc5 ));
      params( 1818 ) := "+"( Integer'Pos( a_frs1516.r1dlcc6 ));
      params( 1819 ) := "+"( Integer'Pos( a_frs1516.r1dlmc6 ));
      params( 1820 ) := "+"( Integer'Pos( a_frs1516.r1dlcc7 ));
      params( 1821 ) := "+"( Integer'Pos( a_frs1516.r1dlmc7 ));
      params( 1822 ) := "+"( Integer'Pos( a_frs1516.r1dlcc8 ));
      params( 1823 ) := "+"( Integer'Pos( a_frs1516.r1dlmc8 ));
      params( 1824 ) := "+"( Integer'Pos( a_frs1516.r1dlcc9 ));
      params( 1825 ) := "+"( Integer'Pos( a_frs1516.r1dlmc9 ));
      params( 1826 ) := "+"( Integer'Pos( a_frs1516.r2dlcc1 ));
      params( 1827 ) := "+"( Integer'Pos( a_frs1516.r2dlmc1 ));
      params( 1828 ) := "+"( Integer'Pos( a_frs1516.r2dlcc2 ));
      params( 1829 ) := "+"( Integer'Pos( a_frs1516.r2dlmc2 ));
      params( 1830 ) := "+"( Integer'Pos( a_frs1516.r2dlcc3 ));
      params( 1831 ) := "+"( Integer'Pos( a_frs1516.r2dlmc3 ));
      params( 1832 ) := "+"( Integer'Pos( a_frs1516.r2dlcc4 ));
      params( 1833 ) := "+"( Integer'Pos( a_frs1516.r2dlmc4 ));
      params( 1834 ) := "+"( Integer'Pos( a_frs1516.r2dlcc5 ));
      params( 1835 ) := "+"( Integer'Pos( a_frs1516.r2dlmc5 ));
      params( 1836 ) := "+"( Integer'Pos( a_frs1516.r2dlcc6 ));
      params( 1837 ) := "+"( Integer'Pos( a_frs1516.r2dlmc6 ));
      params( 1838 ) := "+"( Integer'Pos( a_frs1516.r2dlcc7 ));
      params( 1839 ) := "+"( Integer'Pos( a_frs1516.r2dlmc7 ));
      params( 1840 ) := "+"( Integer'Pos( a_frs1516.r2dlcc8 ));
      params( 1841 ) := "+"( Integer'Pos( a_frs1516.r2dlmc8 ));
      params( 1842 ) := "+"( Integer'Pos( a_frs1516.r2dlcc9 ));
      params( 1843 ) := "+"( Integer'Pos( a_frs1516.r2dlmc9 ));
      params( 1844 ) := "+"( Integer'Pos( a_frs1516.r3dlcc1 ));
      params( 1845 ) := "+"( Integer'Pos( a_frs1516.r3dlmc1 ));
      params( 1846 ) := "+"( Integer'Pos( a_frs1516.r3dlcc2 ));
      params( 1847 ) := "+"( Integer'Pos( a_frs1516.r3dlmc2 ));
      params( 1848 ) := "+"( Integer'Pos( a_frs1516.r3dlcc3 ));
      params( 1849 ) := "+"( Integer'Pos( a_frs1516.r3dlmc3 ));
      params( 1850 ) := "+"( Integer'Pos( a_frs1516.r3dlcc4 ));
      params( 1851 ) := "+"( Integer'Pos( a_frs1516.r3dlmc4 ));
      params( 1852 ) := "+"( Integer'Pos( a_frs1516.r3dlcc5 ));
      params( 1853 ) := "+"( Integer'Pos( a_frs1516.r3dlmc5 ));
      params( 1854 ) := "+"( Integer'Pos( a_frs1516.r3dlcc6 ));
      params( 1855 ) := "+"( Integer'Pos( a_frs1516.r3dlmc6 ));
      params( 1856 ) := "+"( Integer'Pos( a_frs1516.r3dlcc7 ));
      params( 1857 ) := "+"( Integer'Pos( a_frs1516.r3dlmc7 ));
      params( 1858 ) := "+"( Integer'Pos( a_frs1516.r3dlcc8 ));
      params( 1859 ) := "+"( Integer'Pos( a_frs1516.r3dlmc8 ));
      params( 1860 ) := "+"( Integer'Pos( a_frs1516.r3dlcc9 ));
      params( 1861 ) := "+"( Integer'Pos( a_frs1516.r3dlmc9 ));
      params( 1862 ) := "+"( Integer'Pos( a_frs1516.r4dlcc1 ));
      params( 1863 ) := "+"( Integer'Pos( a_frs1516.r4dlmc1 ));
      params( 1864 ) := "+"( Integer'Pos( a_frs1516.r4dlcc2 ));
      params( 1865 ) := "+"( Integer'Pos( a_frs1516.r4dlmc2 ));
      params( 1866 ) := "+"( Integer'Pos( a_frs1516.r4dlcc3 ));
      params( 1867 ) := "+"( Integer'Pos( a_frs1516.r4dlmc3 ));
      params( 1868 ) := "+"( Integer'Pos( a_frs1516.r4dlcc4 ));
      params( 1869 ) := "+"( Integer'Pos( a_frs1516.r4dlmc4 ));
      params( 1870 ) := "+"( Integer'Pos( a_frs1516.r4dlcc5 ));
      params( 1871 ) := "+"( Integer'Pos( a_frs1516.r4dlmc5 ));
      params( 1872 ) := "+"( Integer'Pos( a_frs1516.r4dlcc6 ));
      params( 1873 ) := "+"( Integer'Pos( a_frs1516.r4dlmc6 ));
      params( 1874 ) := "+"( Integer'Pos( a_frs1516.r4dlcc7 ));
      params( 1875 ) := "+"( Integer'Pos( a_frs1516.r4dlmc7 ));
      params( 1876 ) := "+"( Integer'Pos( a_frs1516.r4dlcc8 ));
      params( 1877 ) := "+"( Integer'Pos( a_frs1516.r4dlmc8 ));
      params( 1878 ) := "+"( Integer'Pos( a_frs1516.r4dlcc9 ));
      params( 1879 ) := "+"( Integer'Pos( a_frs1516.r4dlmc9 ));
      params( 1880 ) := "+"( Integer'Pos( a_frs1516.r5dlcc1 ));
      params( 1881 ) := "+"( Integer'Pos( a_frs1516.r5dlmc1 ));
      params( 1882 ) := "+"( Integer'Pos( a_frs1516.r5dlcc2 ));
      params( 1883 ) := "+"( Integer'Pos( a_frs1516.r5dlmc2 ));
      params( 1884 ) := "+"( Integer'Pos( a_frs1516.r5dlcc3 ));
      params( 1885 ) := "+"( Integer'Pos( a_frs1516.r5dlmc3 ));
      params( 1886 ) := "+"( Integer'Pos( a_frs1516.r5dlcc4 ));
      params( 1887 ) := "+"( Integer'Pos( a_frs1516.r5dlmc4 ));
      params( 1888 ) := "+"( Integer'Pos( a_frs1516.r5dlcc5 ));
      params( 1889 ) := "+"( Integer'Pos( a_frs1516.r5dlmc5 ));
      params( 1890 ) := "+"( Integer'Pos( a_frs1516.r5dlcc6 ));
      params( 1891 ) := "+"( Integer'Pos( a_frs1516.r5dlmc6 ));
      params( 1892 ) := "+"( Integer'Pos( a_frs1516.r5dlcc7 ));
      params( 1893 ) := "+"( Integer'Pos( a_frs1516.r5dlmc7 ));
      params( 1894 ) := "+"( Integer'Pos( a_frs1516.r5dlcc8 ));
      params( 1895 ) := "+"( Integer'Pos( a_frs1516.r5dlmc8 ));
      params( 1896 ) := "+"( Integer'Pos( a_frs1516.r5dlcc9 ));
      params( 1897 ) := "+"( Integer'Pos( a_frs1516.r5dlmc9 ));
      params( 1898 ) := "+"( Integer'Pos( a_frs1516.adbtbl ));
      params( 1899 ) := "+"( Integer'Pos( a_frs1516.adddec ));
      params( 1900 ) := "+"( Integer'Pos( a_frs1516.addhol ));
      params( 1901 ) := "+"( Integer'Pos( a_frs1516.addholr ));
      params( 1902 ) := "+"( Integer'Pos( a_frs1516.addins ));
      params( 1903 ) := "+"( Integer'Pos( a_frs1516.addmon ));
      params( 1904 ) := "+"( Integer'Pos( a_frs1516.adepfur ));
      params( 1905 ) := "+"( Integer'Pos( a_frs1516.adles ));
      params( 1906 ) := "+"( Integer'Pos( a_frs1516.adlesoa ));
      params( 1907 ) := "+"( Integer'Pos( a_frs1516.af1 ));
      params( 1908 ) := "+"( Integer'Pos( a_frs1516.afdep2 ));
      params( 1909 ) := "+"( Integer'Pos( a_frs1516.cdelply ));
      params( 1910 ) := "+"( Integer'Pos( a_frs1516.cdepact ));
      params( 1911 ) := "+"( Integer'Pos( a_frs1516.cdepbed ));
      params( 1912 ) := "+"( Integer'Pos( a_frs1516.cdepcel ));
      params( 1913 ) := "+"( Integer'Pos( a_frs1516.cdepeqp ));
      params( 1914 ) := "+"( Integer'Pos( a_frs1516.cdephol ));
      params( 1915 ) := "+"( Integer'Pos( a_frs1516.cdeples ));
      params( 1916 ) := "+"( Integer'Pos( a_frs1516.cdeptea ));
      params( 1917 ) := "+"( Integer'Pos( a_frs1516.cdeptrp ));
      params( 1918 ) := "+"( Integer'Pos( a_frs1516.cdepveg ));
      params( 1919 ) := "+"( Integer'Pos( a_frs1516.cdpcoat ));
      params( 1920 ) := "+"( Integer'Pos( a_frs1516.clothes ));
      params( 1921 ) := "+"( Integer'Pos( a_frs1516.cplay ));
      params( 1922 ) := "+"( Integer'Pos( a_frs1516.debt10 ));
      params( 1923 ) := "+"( Integer'Pos( a_frs1516.debt11 ));
      params( 1924 ) := "+"( Integer'Pos( a_frs1516.debt12 ));
      params( 1925 ) := "+"( Integer'Pos( a_frs1516.debt13 ));
      params( 1926 ) := "+"( Integer'Pos( a_frs1516.debtar01 ));
      params( 1927 ) := "+"( Integer'Pos( a_frs1516.debtar02 ));
      params( 1928 ) := "+"( Integer'Pos( a_frs1516.debtar03 ));
      params( 1929 ) := "+"( Integer'Pos( a_frs1516.debtar04 ));
      params( 1930 ) := "+"( Integer'Pos( a_frs1516.debtar05 ));
      params( 1931 ) := "+"( Integer'Pos( a_frs1516.debtar06 ));
      params( 1932 ) := "+"( Integer'Pos( a_frs1516.debtar07 ));
      params( 1933 ) := "+"( Integer'Pos( a_frs1516.debtar08 ));
      params( 1934 ) := "+"( Integer'Pos( a_frs1516.debtar09 ));
      params( 1935 ) := "+"( Integer'Pos( a_frs1516.debtar10 ));
      params( 1936 ) := "+"( Integer'Pos( a_frs1516.debtar11 ));
      params( 1937 ) := "+"( Integer'Pos( a_frs1516.debtar12 ));
      params( 1938 ) := "+"( Integer'Pos( a_frs1516.debtar13 ));
      params( 1939 ) := "+"( Integer'Pos( a_frs1516.debtfre1 ));
      params( 1940 ) := "+"( Integer'Pos( a_frs1516.debtfre2 ));
      params( 1941 ) := "+"( Integer'Pos( a_frs1516.debtfre3 ));
      params( 1942 ) := "+"( Integer'Pos( a_frs1516.hbolng ));
      params( 1943 ) := "+"( Integer'Pos( a_frs1516.houshe1 ));
      params( 1944 ) := "+"( Integer'Pos( a_frs1516.kidinc ));
      params( 1945 ) := "+"( Integer'Pos( a_frs1516.meal ));
      params( 1946 ) := "+"( Integer'Pos( a_frs1516.nhhchild ));
      params( 1947 ) := "+"( Integer'Pos( a_frs1516.oafur ));
      params( 1948 ) := "+"( Integer'Pos( a_frs1516.oapre ));
      params( 1949 ) := "+"( Integer'Pos( a_frs1516.outpay ));
      params( 1950 ) := "+"( Float( a_frs1516.outpyamt ));
      params( 1951 ) := "+"( Float( a_frs1516.regpamt ));
      params( 1952 ) := "+"( Integer'Pos( a_frs1516.regularp ));
      params( 1953 ) := "+"( Integer'Pos( a_frs1516.shoeoa ));
      params( 1954 ) := "+"( Integer'Pos( a_frs1516.totsav ));
      params( 1955 ) := "+"( Integer'Pos( a_frs1516.adultb ));
      params( 1956 ) := "+"( Float( a_frs1516.boarder ));
      params( 1957 ) := "+"( Integer'Pos( a_frs1516.bpeninc ));
      params( 1958 ) := "+"( Integer'Pos( a_frs1516.bseinc ));
      params( 1959 ) := "+"( Integer'Pos( a_frs1516.budisben ));
      params( 1960 ) := "+"( Integer'Pos( a_frs1516.buearns ));
      params( 1961 ) := "+"( Integer'Pos( a_frs1516.buethgr3 ));
      params( 1962 ) := "+"( Integer'Pos( a_frs1516.buinc ));
      params( 1963 ) := "+"( Integer'Pos( a_frs1516.buinv ));
      params( 1964 ) := "+"( Integer'Pos( a_frs1516.buirben ));
      params( 1965 ) := "+"( Integer'Pos( a_frs1516.bukids ));
      params( 1966 ) := "+"( Integer'Pos( a_frs1516.bunirben ));
      params( 1967 ) := "+"( Integer'Pos( a_frs1516.buothben ));
      params( 1968 ) := "+"( Integer'Pos( a_frs1516.burent ));
      params( 1969 ) := "+"( Integer'Pos( a_frs1516.burinc ));
      params( 1970 ) := "+"( Integer'Pos( a_frs1516.burpinc ));
      params( 1971 ) := "+"( Float( a_frs1516.butvlic ));
      params( 1972 ) := "+"( Integer'Pos( a_frs1516.butxcred ));
      params( 1973 ) := "+"( Integer'Pos( a_frs1516.depchldb ));
      params( 1974 ) := "+"( Integer'Pos( a_frs1516.diswbua1 ));
      params( 1975 ) := "+"( Integer'Pos( a_frs1516.diswbuc1 ));
      params( 1976 ) := "+"( Integer'Pos( a_frs1516.ecstatbu ));
      params( 1977 ) := "+"( Integer'Pos( a_frs1516.famtypb2 ));
      params( 1978 ) := "+"( Integer'Pos( a_frs1516.famtypbs ));
      params( 1979 ) := "+"( Integer'Pos( a_frs1516.famtypbu ));
      params( 1980 ) := "+"( Float( a_frs1516.fsfvbu ));
      params( 1981 ) := "+"( Float( a_frs1516.fsmbu ));
      params( 1982 ) := "+"( Float( a_frs1516.fsmlkbu ));
      params( 1983 ) := "+"( Integer'Pos( a_frs1516.gross4 ));
      params( 1984 ) := "+"( Integer'Pos( a_frs1516.hbindbu ));
      params( 1985 ) := "+"( Integer'Pos( a_frs1516.hbindbu2 ));
      params( 1986 ) := "+"( Float( a_frs1516.heartbu ));
      params( 1987 ) := "+"( Integer'Pos( a_frs1516.kid04 ));
      params( 1988 ) := "+"( Integer'Pos( a_frs1516.kid1115 ));
      params( 1989 ) := "+"( Integer'Pos( a_frs1516.kid1619 ));
      params( 1990 ) := "+"( Integer'Pos( a_frs1516.kid510 ));
      params( 1991 ) := "+"( Float( a_frs1516.lodger ));
      params( 1992 ) := "+"( Float( a_frs1516.subltamt ));
      params( 1993 ) := "+"( Float( a_frs1516.totcapb3 ));
      params( 1994 ) := "+"( Integer'Pos( a_frs1516.totsavbu ));
      params( 1995 ) := "+"( Integer'Pos( a_frs1516.tuburent ));
      params( 1996 ) := "+"( Integer'Pos( a_frs1516.youngch ));
      params( 1997 ) := "+"( Integer'Pos( a_frs1516.clthsoa ));
      params( 1998 ) := "+"( Integer'Pos( a_frs1516.debt1 ));
      params( 1999 ) := "+"( Integer'Pos( a_frs1516.debt2 ));
      params( 2000 ) := "+"( Integer'Pos( a_frs1516.debt3 ));
      params( 2001 ) := "+"( Integer'Pos( a_frs1516.debt4 ));
      params( 2002 ) := "+"( Integer'Pos( a_frs1516.debt5 ));
      params( 2003 ) := "+"( Integer'Pos( a_frs1516.debt6 ));
      params( 2004 ) := "+"( Integer'Pos( a_frs1516.debt7 ));
      params( 2005 ) := "+"( Integer'Pos( a_frs1516.debt8 ));
      params( 2006 ) := "+"( Integer'Pos( a_frs1516.debt9 ));
      params( 2007 ) := "+"( Integer'Pos( a_frs1516.discbua ));
      params( 2008 ) := "+"( Integer'Pos( a_frs1516.discbuc ));
      params( 2009 ) := "+"( Float( a_frs1516.hbtham ));
      params( 2010 ) := "+"( Integer'Pos( a_frs1516.hbthbu ));
      params( 2011 ) := "+"( Integer'Pos( a_frs1516.hbthmn ));
      params( 2012 ) := "+"( Integer'Pos( a_frs1516.hbthpd ));
      params( 2013 ) := "+"( Integer'Pos( a_frs1516.hbthwk ));
      params( 2014 ) := "+"( Integer'Pos( a_frs1516.hbthyr ));
      params( 2015 ) := "+"( Integer'Pos( a_frs1516.hbwait ));
      params( 2016 ) := "+"( Integer'Pos( a_frs1516.intrnt ));
      params( 2017 ) := "+"( Integer'Pos( a_frs1516.oadep ));
      params( 2018 ) := "+"( Integer'Pos( a_frs1516.oanet ));
      params( 2019 ) := "+"( Integer'Pos( a_frs1516.dynhthd ));
      params( 2020 ) := "+"( Integer'Pos( a_frs1516.dynhtsp ));
      params( 2021 ) := "+"( Integer'Pos( a_frs1516.freqhd ));
      params( 2022 ) := "+"( Integer'Pos( a_frs1516.freqsp ));
      params( 2023 ) := "+"( Integer'Pos( a_frs1516.hur01hd ));
      params( 2024 ) := "+"( Integer'Pos( a_frs1516.hur01sp ));
      params( 2025 ) := "+"( Integer'Pos( a_frs1516.hur02hd ));
      params( 2026 ) := "+"( Integer'Pos( a_frs1516.hur02sp ));
      params( 2027 ) := "+"( Integer'Pos( a_frs1516.hur03hd ));
      params( 2028 ) := "+"( Integer'Pos( a_frs1516.hur03sp ));
      params( 2029 ) := "+"( Integer'Pos( a_frs1516.hur04hd ));
      params( 2030 ) := "+"( Integer'Pos( a_frs1516.hur04sp ));
      params( 2031 ) := "+"( Integer'Pos( a_frs1516.hur05hd ));
      params( 2032 ) := "+"( Integer'Pos( a_frs1516.hur05sp ));
      params( 2033 ) := "+"( Integer'Pos( a_frs1516.hur06hd ));
      params( 2034 ) := "+"( Integer'Pos( a_frs1516.hur06sp ));
      params( 2035 ) := "+"( Integer'Pos( a_frs1516.hur07hd ));
      params( 2036 ) := "+"( Integer'Pos( a_frs1516.hur07sp ));
      params( 2037 ) := "+"( Integer'Pos( a_frs1516.hur08hd ));
      params( 2038 ) := "+"( Integer'Pos( a_frs1516.hur08sp ));
      params( 2039 ) := "+"( Integer'Pos( a_frs1516.hur09hd ));
      params( 2040 ) := "+"( Integer'Pos( a_frs1516.hur09sp ));
      params( 2041 ) := "+"( Integer'Pos( a_frs1516.hur10hd ));
      params( 2042 ) := "+"( Integer'Pos( a_frs1516.hur10sp ));
      params( 2043 ) := "+"( Integer'Pos( a_frs1516.hur11hd ));
      params( 2044 ) := "+"( Integer'Pos( a_frs1516.hur11sp ));
      params( 2045 ) := "+"( Integer'Pos( a_frs1516.hur12hd ));
      params( 2046 ) := "+"( Integer'Pos( a_frs1516.hur12sp ));
      params( 2047 ) := "+"( Integer'Pos( a_frs1516.hur13hd ));
      params( 2048 ) := "+"( Integer'Pos( a_frs1516.hur13sp ));
      params( 2049 ) := "+"( Integer'Pos( a_frs1516.hur14hd ));
      params( 2050 ) := "+"( Integer'Pos( a_frs1516.hur14sp ));
      params( 2051 ) := "+"( Integer'Pos( a_frs1516.hur15hd ));
      params( 2052 ) := "+"( Integer'Pos( a_frs1516.hur15sp ));
      params( 2053 ) := "+"( Integer'Pos( a_frs1516.hur16hd ));
      params( 2054 ) := "+"( Integer'Pos( a_frs1516.hur16sp ));
      params( 2055 ) := "+"( Integer'Pos( a_frs1516.hur17hd ));
      params( 2056 ) := "+"( Integer'Pos( a_frs1516.hur17sp ));
      params( 2057 ) := "+"( Integer'Pos( a_frs1516.hur18hd ));
      params( 2058 ) := "+"( Integer'Pos( a_frs1516.hur18sp ));
      params( 2059 ) := "+"( Integer'Pos( a_frs1516.hur19hd ));
      params( 2060 ) := "+"( Integer'Pos( a_frs1516.hur19sp ));
      params( 2061 ) := "+"( Integer'Pos( a_frs1516.hur20hd ));
      params( 2062 ) := "+"( Integer'Pos( a_frs1516.hur20sp ));
      params( 2063 ) := "+"( Integer'Pos( a_frs1516.whl01hd ));
      params( 2064 ) := "+"( Integer'Pos( a_frs1516.whl01sp ));
      params( 2065 ) := "+"( Integer'Pos( a_frs1516.whl02hd ));
      params( 2066 ) := "+"( Integer'Pos( a_frs1516.whl02sp ));
      params( 2067 ) := "+"( Integer'Pos( a_frs1516.whl03hd ));
      params( 2068 ) := "+"( Integer'Pos( a_frs1516.whl03sp ));
      params( 2069 ) := "+"( Integer'Pos( a_frs1516.whl04hd ));
      params( 2070 ) := "+"( Integer'Pos( a_frs1516.whl04sp ));
      params( 2071 ) := "+"( Integer'Pos( a_frs1516.whl05hd ));
      params( 2072 ) := "+"( Integer'Pos( a_frs1516.whl05sp ));
      params( 2073 ) := "+"( Integer'Pos( a_frs1516.whl06hd ));
      params( 2074 ) := "+"( Integer'Pos( a_frs1516.whl06sp ));
      params( 2075 ) := "+"( Integer'Pos( a_frs1516.whl07hd ));
      params( 2076 ) := "+"( Integer'Pos( a_frs1516.whl07sp ));
      params( 2077 ) := "+"( Integer'Pos( a_frs1516.whl08hd ));
      params( 2078 ) := "+"( Integer'Pos( a_frs1516.whl08sp ));
      params( 2079 ) := "+"( Integer'Pos( a_frs1516.whl09hd ));
      params( 2080 ) := "+"( Integer'Pos( a_frs1516.whl09sp ));
      params( 2081 ) := "+"( Integer'Pos( a_frs1516.whl10hd ));
      params( 2082 ) := "+"( Integer'Pos( a_frs1516.whl10sp ));
      params( 2083 ) := "+"( Integer'Pos( a_frs1516.whl11hd ));
      params( 2084 ) := "+"( Integer'Pos( a_frs1516.whl11sp ));
      params( 2085 ) := "+"( Integer'Pos( a_frs1516.whl12hd ));
      params( 2086 ) := "+"( Integer'Pos( a_frs1516.whl12sp ));
      params( 2087 ) := "+"( Integer'Pos( a_frs1516.whl13hd ));
      params( 2088 ) := "+"( Integer'Pos( a_frs1516.whl13sp ));
      params( 2089 ) := "+"( Integer'Pos( a_frs1516.whl14hd ));
      params( 2090 ) := "+"( Integer'Pos( a_frs1516.whl14sp ));
      params( 2091 ) := "+"( Integer'Pos( a_frs1516.whl15hd ));
      params( 2092 ) := "+"( Integer'Pos( a_frs1516.whl15sp ));
      params( 2093 ) := "+"( Integer'Pos( a_frs1516.whl16hd ));
      params( 2094 ) := "+"( Integer'Pos( a_frs1516.whl16sp ));
      params( 2095 ) := "+"( Integer'Pos( a_frs1516.whl17hd ));
      params( 2096 ) := "+"( Integer'Pos( a_frs1516.whl17sp ));
      params( 2097 ) := "+"( Integer'Pos( a_frs1516.whl18hd ));
      params( 2098 ) := "+"( Integer'Pos( a_frs1516.whl18sp ));
      params( 2099 ) := "+"( Integer'Pos( a_frs1516.whl19hd ));
      params( 2100 ) := "+"( Integer'Pos( a_frs1516.whl19sp ));
      params( 2101 ) := "+"( Integer'Pos( a_frs1516.whl20hd ));
      params( 2102 ) := "+"( Integer'Pos( a_frs1516.whl20sp ));
      params( 2103 ) := "+"( Integer'Pos( a_frs1516.dynhtc1 ));
      params( 2104 ) := "+"( Integer'Pos( a_frs1516.dynhtc2 ));
      params( 2105 ) := "+"( Integer'Pos( a_frs1516.dynhtc3 ));
      params( 2106 ) := "+"( Integer'Pos( a_frs1516.dynhtc4 ));
      params( 2107 ) := "+"( Integer'Pos( a_frs1516.dynhtc5 ));
      params( 2108 ) := "+"( Integer'Pos( a_frs1516.dynhtc6 ));
      params( 2109 ) := "+"( Integer'Pos( a_frs1516.dynhtc7 ));
      params( 2110 ) := "+"( Integer'Pos( a_frs1516.dynhtc8 ));
      params( 2111 ) := "+"( Integer'Pos( a_frs1516.dynhtc9 ));
      params( 2112 ) := "+"( Integer'Pos( a_frs1516.freqc1 ));
      params( 2113 ) := "+"( Integer'Pos( a_frs1516.freqc2 ));
      params( 2114 ) := "+"( Integer'Pos( a_frs1516.freqc3 ));
      params( 2115 ) := "+"( Integer'Pos( a_frs1516.freqc4 ));
      params( 2116 ) := "+"( Integer'Pos( a_frs1516.freqc5 ));
      params( 2117 ) := "+"( Integer'Pos( a_frs1516.freqc6 ));
      params( 2118 ) := "+"( Integer'Pos( a_frs1516.freqc7 ));
      params( 2119 ) := "+"( Integer'Pos( a_frs1516.freqc8 ));
      params( 2120 ) := "+"( Integer'Pos( a_frs1516.freqc9 ));
      params( 2121 ) := "+"( Integer'Pos( a_frs1516.hur01c1 ));
      params( 2122 ) := "+"( Integer'Pos( a_frs1516.hur01c2 ));
      params( 2123 ) := "+"( Integer'Pos( a_frs1516.hur01c3 ));
      params( 2124 ) := "+"( Integer'Pos( a_frs1516.hur01c4 ));
      params( 2125 ) := "+"( Integer'Pos( a_frs1516.hur01c5 ));
      params( 2126 ) := "+"( Integer'Pos( a_frs1516.hur01c6 ));
      params( 2127 ) := "+"( Integer'Pos( a_frs1516.hur01c7 ));
      params( 2128 ) := "+"( Integer'Pos( a_frs1516.hur01c8 ));
      params( 2129 ) := "+"( Integer'Pos( a_frs1516.hur01c9 ));
      params( 2130 ) := "+"( Integer'Pos( a_frs1516.hur02c1 ));
      params( 2131 ) := "+"( Integer'Pos( a_frs1516.hur02c2 ));
      params( 2132 ) := "+"( Integer'Pos( a_frs1516.hur02c3 ));
      params( 2133 ) := "+"( Integer'Pos( a_frs1516.hur02c4 ));
      params( 2134 ) := "+"( Integer'Pos( a_frs1516.hur02c5 ));
      params( 2135 ) := "+"( Integer'Pos( a_frs1516.hur02c6 ));
      params( 2136 ) := "+"( Integer'Pos( a_frs1516.hur02c7 ));
      params( 2137 ) := "+"( Integer'Pos( a_frs1516.hur02c8 ));
      params( 2138 ) := "+"( Integer'Pos( a_frs1516.hur02c9 ));
      params( 2139 ) := "+"( Integer'Pos( a_frs1516.hur03c1 ));
      params( 2140 ) := "+"( Integer'Pos( a_frs1516.hur03c2 ));
      params( 2141 ) := "+"( Integer'Pos( a_frs1516.hur03c3 ));
      params( 2142 ) := "+"( Integer'Pos( a_frs1516.hur03c4 ));
      params( 2143 ) := "+"( Integer'Pos( a_frs1516.hur03c5 ));
      params( 2144 ) := "+"( Integer'Pos( a_frs1516.hur03c6 ));
      params( 2145 ) := "+"( Integer'Pos( a_frs1516.hur03c7 ));
      params( 2146 ) := "+"( Integer'Pos( a_frs1516.hur03c8 ));
      params( 2147 ) := "+"( Integer'Pos( a_frs1516.hur03c9 ));
      params( 2148 ) := "+"( Integer'Pos( a_frs1516.hur04c1 ));
      params( 2149 ) := "+"( Integer'Pos( a_frs1516.hur04c2 ));
      params( 2150 ) := "+"( Integer'Pos( a_frs1516.hur04c3 ));
      params( 2151 ) := "+"( Integer'Pos( a_frs1516.hur04c4 ));
      params( 2152 ) := "+"( Integer'Pos( a_frs1516.hur04c5 ));
      params( 2153 ) := "+"( Integer'Pos( a_frs1516.hur04c6 ));
      params( 2154 ) := "+"( Integer'Pos( a_frs1516.hur04c7 ));
      params( 2155 ) := "+"( Integer'Pos( a_frs1516.hur04c8 ));
      params( 2156 ) := "+"( Integer'Pos( a_frs1516.hur04c9 ));
      params( 2157 ) := "+"( Integer'Pos( a_frs1516.hur05c1 ));
      params( 2158 ) := "+"( Integer'Pos( a_frs1516.hur05c2 ));
      params( 2159 ) := "+"( Integer'Pos( a_frs1516.hur05c3 ));
      params( 2160 ) := "+"( Integer'Pos( a_frs1516.hur05c4 ));
      params( 2161 ) := "+"( Integer'Pos( a_frs1516.hur05c5 ));
      params( 2162 ) := "+"( Integer'Pos( a_frs1516.hur05c6 ));
      params( 2163 ) := "+"( Integer'Pos( a_frs1516.hur05c7 ));
      params( 2164 ) := "+"( Integer'Pos( a_frs1516.hur05c8 ));
      params( 2165 ) := "+"( Integer'Pos( a_frs1516.hur05c9 ));
      params( 2166 ) := "+"( Integer'Pos( a_frs1516.hur06c1 ));
      params( 2167 ) := "+"( Integer'Pos( a_frs1516.hur06c2 ));
      params( 2168 ) := "+"( Integer'Pos( a_frs1516.hur06c3 ));
      params( 2169 ) := "+"( Integer'Pos( a_frs1516.hur06c4 ));
      params( 2170 ) := "+"( Integer'Pos( a_frs1516.hur06c5 ));
      params( 2171 ) := "+"( Integer'Pos( a_frs1516.hur06c6 ));
      params( 2172 ) := "+"( Integer'Pos( a_frs1516.hur06c7 ));
      params( 2173 ) := "+"( Integer'Pos( a_frs1516.hur06c8 ));
      params( 2174 ) := "+"( Integer'Pos( a_frs1516.hur06c9 ));
      params( 2175 ) := "+"( Integer'Pos( a_frs1516.hur07c1 ));
      params( 2176 ) := "+"( Integer'Pos( a_frs1516.hur07c2 ));
      params( 2177 ) := "+"( Integer'Pos( a_frs1516.hur07c3 ));
      params( 2178 ) := "+"( Integer'Pos( a_frs1516.hur07c4 ));
      params( 2179 ) := "+"( Integer'Pos( a_frs1516.hur07c5 ));
      params( 2180 ) := "+"( Integer'Pos( a_frs1516.hur07c6 ));
      params( 2181 ) := "+"( Integer'Pos( a_frs1516.hur07c7 ));
      params( 2182 ) := "+"( Integer'Pos( a_frs1516.hur07c8 ));
      params( 2183 ) := "+"( Integer'Pos( a_frs1516.hur07c9 ));
      params( 2184 ) := "+"( Integer'Pos( a_frs1516.hur08c1 ));
      params( 2185 ) := "+"( Integer'Pos( a_frs1516.hur08c2 ));
      params( 2186 ) := "+"( Integer'Pos( a_frs1516.hur08c3 ));
      params( 2187 ) := "+"( Integer'Pos( a_frs1516.hur08c4 ));
      params( 2188 ) := "+"( Integer'Pos( a_frs1516.hur08c5 ));
      params( 2189 ) := "+"( Integer'Pos( a_frs1516.hur08c6 ));
      params( 2190 ) := "+"( Integer'Pos( a_frs1516.hur08c7 ));
      params( 2191 ) := "+"( Integer'Pos( a_frs1516.hur08c8 ));
      params( 2192 ) := "+"( Integer'Pos( a_frs1516.hur08c9 ));
      params( 2193 ) := "+"( Integer'Pos( a_frs1516.hur09c1 ));
      params( 2194 ) := "+"( Integer'Pos( a_frs1516.hur09c2 ));
      params( 2195 ) := "+"( Integer'Pos( a_frs1516.hur09c3 ));
      params( 2196 ) := "+"( Integer'Pos( a_frs1516.hur09c4 ));
      params( 2197 ) := "+"( Integer'Pos( a_frs1516.hur09c5 ));
      params( 2198 ) := "+"( Integer'Pos( a_frs1516.hur09c6 ));
      params( 2199 ) := "+"( Integer'Pos( a_frs1516.hur09c7 ));
      params( 2200 ) := "+"( Integer'Pos( a_frs1516.hur09c8 ));
      params( 2201 ) := "+"( Integer'Pos( a_frs1516.hur09c9 ));
      params( 2202 ) := "+"( Integer'Pos( a_frs1516.hur10c1 ));
      params( 2203 ) := "+"( Integer'Pos( a_frs1516.hur10c2 ));
      params( 2204 ) := "+"( Integer'Pos( a_frs1516.hur10c3 ));
      params( 2205 ) := "+"( Integer'Pos( a_frs1516.hur10c4 ));
      params( 2206 ) := "+"( Integer'Pos( a_frs1516.hur10c5 ));
      params( 2207 ) := "+"( Integer'Pos( a_frs1516.hur10c6 ));
      params( 2208 ) := "+"( Integer'Pos( a_frs1516.hur10c7 ));
      params( 2209 ) := "+"( Integer'Pos( a_frs1516.hur10c8 ));
      params( 2210 ) := "+"( Integer'Pos( a_frs1516.hur10c9 ));
      params( 2211 ) := "+"( Integer'Pos( a_frs1516.hur11c1 ));
      params( 2212 ) := "+"( Integer'Pos( a_frs1516.hur11c2 ));
      params( 2213 ) := "+"( Integer'Pos( a_frs1516.hur11c3 ));
      params( 2214 ) := "+"( Integer'Pos( a_frs1516.hur11c4 ));
      params( 2215 ) := "+"( Integer'Pos( a_frs1516.hur11c5 ));
      params( 2216 ) := "+"( Integer'Pos( a_frs1516.hur11c6 ));
      params( 2217 ) := "+"( Integer'Pos( a_frs1516.hur11c7 ));
      params( 2218 ) := "+"( Integer'Pos( a_frs1516.hur11c8 ));
      params( 2219 ) := "+"( Integer'Pos( a_frs1516.hur11c9 ));
      params( 2220 ) := "+"( Integer'Pos( a_frs1516.hur12c1 ));
      params( 2221 ) := "+"( Integer'Pos( a_frs1516.hur12c2 ));
      params( 2222 ) := "+"( Integer'Pos( a_frs1516.hur12c3 ));
      params( 2223 ) := "+"( Integer'Pos( a_frs1516.hur12c4 ));
      params( 2224 ) := "+"( Integer'Pos( a_frs1516.hur12c5 ));
      params( 2225 ) := "+"( Integer'Pos( a_frs1516.hur12c6 ));
      params( 2226 ) := "+"( Integer'Pos( a_frs1516.hur12c7 ));
      params( 2227 ) := "+"( Integer'Pos( a_frs1516.hur12c8 ));
      params( 2228 ) := "+"( Integer'Pos( a_frs1516.hur12c9 ));
      params( 2229 ) := "+"( Integer'Pos( a_frs1516.hur13c1 ));
      params( 2230 ) := "+"( Integer'Pos( a_frs1516.hur13c2 ));
      params( 2231 ) := "+"( Integer'Pos( a_frs1516.hur13c3 ));
      params( 2232 ) := "+"( Integer'Pos( a_frs1516.hur13c4 ));
      params( 2233 ) := "+"( Integer'Pos( a_frs1516.hur13c5 ));
      params( 2234 ) := "+"( Integer'Pos( a_frs1516.hur13c6 ));
      params( 2235 ) := "+"( Integer'Pos( a_frs1516.hur13c7 ));
      params( 2236 ) := "+"( Integer'Pos( a_frs1516.hur13c8 ));
      params( 2237 ) := "+"( Integer'Pos( a_frs1516.hur13c9 ));
      params( 2238 ) := "+"( Integer'Pos( a_frs1516.hur14c1 ));
      params( 2239 ) := "+"( Integer'Pos( a_frs1516.hur14c2 ));
      params( 2240 ) := "+"( Integer'Pos( a_frs1516.hur14c3 ));
      params( 2241 ) := "+"( Integer'Pos( a_frs1516.hur14c4 ));
      params( 2242 ) := "+"( Integer'Pos( a_frs1516.hur14c5 ));
      params( 2243 ) := "+"( Integer'Pos( a_frs1516.hur14c6 ));
      params( 2244 ) := "+"( Integer'Pos( a_frs1516.hur14c7 ));
      params( 2245 ) := "+"( Integer'Pos( a_frs1516.hur14c8 ));
      params( 2246 ) := "+"( Integer'Pos( a_frs1516.hur14c9 ));
      params( 2247 ) := "+"( Integer'Pos( a_frs1516.hur15c1 ));
      params( 2248 ) := "+"( Integer'Pos( a_frs1516.hur15c2 ));
      params( 2249 ) := "+"( Integer'Pos( a_frs1516.hur15c3 ));
      params( 2250 ) := "+"( Integer'Pos( a_frs1516.hur15c4 ));
      params( 2251 ) := "+"( Integer'Pos( a_frs1516.hur15c5 ));
      params( 2252 ) := "+"( Integer'Pos( a_frs1516.hur15c6 ));
      params( 2253 ) := "+"( Integer'Pos( a_frs1516.hur15c7 ));
      params( 2254 ) := "+"( Integer'Pos( a_frs1516.hur15c8 ));
      params( 2255 ) := "+"( Integer'Pos( a_frs1516.hur15c9 ));
      params( 2256 ) := "+"( Integer'Pos( a_frs1516.hur16c1 ));
      params( 2257 ) := "+"( Integer'Pos( a_frs1516.hur16c2 ));
      params( 2258 ) := "+"( Integer'Pos( a_frs1516.hur16c3 ));
      params( 2259 ) := "+"( Integer'Pos( a_frs1516.hur16c4 ));
      params( 2260 ) := "+"( Integer'Pos( a_frs1516.hur16c5 ));
      params( 2261 ) := "+"( Integer'Pos( a_frs1516.hur16c6 ));
      params( 2262 ) := "+"( Integer'Pos( a_frs1516.hur16c7 ));
      params( 2263 ) := "+"( Integer'Pos( a_frs1516.hur16c8 ));
      params( 2264 ) := "+"( Integer'Pos( a_frs1516.hur16c9 ));
      params( 2265 ) := "+"( Integer'Pos( a_frs1516.hur17c1 ));
      params( 2266 ) := "+"( Integer'Pos( a_frs1516.hur17c2 ));
      params( 2267 ) := "+"( Integer'Pos( a_frs1516.hur17c3 ));
      params( 2268 ) := "+"( Integer'Pos( a_frs1516.hur17c4 ));
      params( 2269 ) := "+"( Integer'Pos( a_frs1516.hur17c5 ));
      params( 2270 ) := "+"( Integer'Pos( a_frs1516.hur17c6 ));
      params( 2271 ) := "+"( Integer'Pos( a_frs1516.hur17c7 ));
      params( 2272 ) := "+"( Integer'Pos( a_frs1516.hur17c8 ));
      params( 2273 ) := "+"( Integer'Pos( a_frs1516.hur17c9 ));
      params( 2274 ) := "+"( Integer'Pos( a_frs1516.hur18c1 ));
      params( 2275 ) := "+"( Integer'Pos( a_frs1516.hur18c2 ));
      params( 2276 ) := "+"( Integer'Pos( a_frs1516.hur18c3 ));
      params( 2277 ) := "+"( Integer'Pos( a_frs1516.hur18c4 ));
      params( 2278 ) := "+"( Integer'Pos( a_frs1516.hur18c5 ));
      params( 2279 ) := "+"( Integer'Pos( a_frs1516.hur18c6 ));
      params( 2280 ) := "+"( Integer'Pos( a_frs1516.hur18c7 ));
      params( 2281 ) := "+"( Integer'Pos( a_frs1516.hur18c8 ));
      params( 2282 ) := "+"( Integer'Pos( a_frs1516.hur18c9 ));
      params( 2283 ) := "+"( Integer'Pos( a_frs1516.hur19c1 ));
      params( 2284 ) := "+"( Integer'Pos( a_frs1516.hur19c2 ));
      params( 2285 ) := "+"( Integer'Pos( a_frs1516.hur19c3 ));
      params( 2286 ) := "+"( Integer'Pos( a_frs1516.hur19c4 ));
      params( 2287 ) := "+"( Integer'Pos( a_frs1516.hur19c5 ));
      params( 2288 ) := "+"( Integer'Pos( a_frs1516.hur19c6 ));
      params( 2289 ) := "+"( Integer'Pos( a_frs1516.hur19c7 ));
      params( 2290 ) := "+"( Integer'Pos( a_frs1516.hur19c8 ));
      params( 2291 ) := "+"( Integer'Pos( a_frs1516.hur19c9 ));
      params( 2292 ) := "+"( Integer'Pos( a_frs1516.hur20c1 ));
      params( 2293 ) := "+"( Integer'Pos( a_frs1516.hur20c2 ));
      params( 2294 ) := "+"( Integer'Pos( a_frs1516.hur20c3 ));
      params( 2295 ) := "+"( Integer'Pos( a_frs1516.hur20c4 ));
      params( 2296 ) := "+"( Integer'Pos( a_frs1516.hur20c5 ));
      params( 2297 ) := "+"( Integer'Pos( a_frs1516.hur20c6 ));
      params( 2298 ) := "+"( Integer'Pos( a_frs1516.hur20c7 ));
      params( 2299 ) := "+"( Integer'Pos( a_frs1516.hur20c8 ));
      params( 2300 ) := "+"( Integer'Pos( a_frs1516.hur20c9 ));
      params( 2301 ) := "+"( Integer'Pos( a_frs1516.whl01c1 ));
      params( 2302 ) := "+"( Integer'Pos( a_frs1516.whl01c2 ));
      params( 2303 ) := "+"( Integer'Pos( a_frs1516.whl01c3 ));
      params( 2304 ) := "+"( Integer'Pos( a_frs1516.whl01c4 ));
      params( 2305 ) := "+"( Integer'Pos( a_frs1516.whl01c5 ));
      params( 2306 ) := "+"( Integer'Pos( a_frs1516.whl01c6 ));
      params( 2307 ) := "+"( Integer'Pos( a_frs1516.whl01c7 ));
      params( 2308 ) := "+"( Integer'Pos( a_frs1516.whl01c8 ));
      params( 2309 ) := "+"( Integer'Pos( a_frs1516.whl01c9 ));
      params( 2310 ) := "+"( Integer'Pos( a_frs1516.whl02c1 ));
      params( 2311 ) := "+"( Integer'Pos( a_frs1516.whl02c2 ));
      params( 2312 ) := "+"( Integer'Pos( a_frs1516.whl02c3 ));
      params( 2313 ) := "+"( Integer'Pos( a_frs1516.whl02c4 ));
      params( 2314 ) := "+"( Integer'Pos( a_frs1516.whl02c5 ));
      params( 2315 ) := "+"( Integer'Pos( a_frs1516.whl02c6 ));
      params( 2316 ) := "+"( Integer'Pos( a_frs1516.whl02c7 ));
      params( 2317 ) := "+"( Integer'Pos( a_frs1516.whl02c8 ));
      params( 2318 ) := "+"( Integer'Pos( a_frs1516.whl02c9 ));
      params( 2319 ) := "+"( Integer'Pos( a_frs1516.whl03c1 ));
      params( 2320 ) := "+"( Integer'Pos( a_frs1516.whl03c2 ));
      params( 2321 ) := "+"( Integer'Pos( a_frs1516.whl03c3 ));
      params( 2322 ) := "+"( Integer'Pos( a_frs1516.whl03c4 ));
      params( 2323 ) := "+"( Integer'Pos( a_frs1516.whl03c5 ));
      params( 2324 ) := "+"( Integer'Pos( a_frs1516.whl03c6 ));
      params( 2325 ) := "+"( Integer'Pos( a_frs1516.whl03c7 ));
      params( 2326 ) := "+"( Integer'Pos( a_frs1516.whl03c8 ));
      params( 2327 ) := "+"( Integer'Pos( a_frs1516.whl03c9 ));
      params( 2328 ) := "+"( Integer'Pos( a_frs1516.whl04c1 ));
      params( 2329 ) := "+"( Integer'Pos( a_frs1516.whl04c2 ));
      params( 2330 ) := "+"( Integer'Pos( a_frs1516.whl04c3 ));
      params( 2331 ) := "+"( Integer'Pos( a_frs1516.whl04c4 ));
      params( 2332 ) := "+"( Integer'Pos( a_frs1516.whl04c5 ));
      params( 2333 ) := "+"( Integer'Pos( a_frs1516.whl04c6 ));
      params( 2334 ) := "+"( Integer'Pos( a_frs1516.whl04c7 ));
      params( 2335 ) := "+"( Integer'Pos( a_frs1516.whl04c8 ));
      params( 2336 ) := "+"( Integer'Pos( a_frs1516.whl04c9 ));
      params( 2337 ) := "+"( Integer'Pos( a_frs1516.whl05c1 ));
      params( 2338 ) := "+"( Integer'Pos( a_frs1516.whl05c2 ));
      params( 2339 ) := "+"( Integer'Pos( a_frs1516.whl05c3 ));
      params( 2340 ) := "+"( Integer'Pos( a_frs1516.whl05c4 ));
      params( 2341 ) := "+"( Integer'Pos( a_frs1516.whl05c5 ));
      params( 2342 ) := "+"( Integer'Pos( a_frs1516.whl05c6 ));
      params( 2343 ) := "+"( Integer'Pos( a_frs1516.whl05c7 ));
      params( 2344 ) := "+"( Integer'Pos( a_frs1516.whl05c8 ));
      params( 2345 ) := "+"( Integer'Pos( a_frs1516.whl05c9 ));
      params( 2346 ) := "+"( Integer'Pos( a_frs1516.whl06c1 ));
      params( 2347 ) := "+"( Integer'Pos( a_frs1516.whl06c2 ));
      params( 2348 ) := "+"( Integer'Pos( a_frs1516.whl06c3 ));
      params( 2349 ) := "+"( Integer'Pos( a_frs1516.whl06c4 ));
      params( 2350 ) := "+"( Integer'Pos( a_frs1516.whl06c5 ));
      params( 2351 ) := "+"( Integer'Pos( a_frs1516.whl06c6 ));
      params( 2352 ) := "+"( Integer'Pos( a_frs1516.whl06c7 ));
      params( 2353 ) := "+"( Integer'Pos( a_frs1516.whl06c8 ));
      params( 2354 ) := "+"( Integer'Pos( a_frs1516.whl06c9 ));
      params( 2355 ) := "+"( Integer'Pos( a_frs1516.whl07c1 ));
      params( 2356 ) := "+"( Integer'Pos( a_frs1516.whl07c2 ));
      params( 2357 ) := "+"( Integer'Pos( a_frs1516.whl07c3 ));
      params( 2358 ) := "+"( Integer'Pos( a_frs1516.whl07c4 ));
      params( 2359 ) := "+"( Integer'Pos( a_frs1516.whl07c5 ));
      params( 2360 ) := "+"( Integer'Pos( a_frs1516.whl07c6 ));
      params( 2361 ) := "+"( Integer'Pos( a_frs1516.whl07c7 ));
      params( 2362 ) := "+"( Integer'Pos( a_frs1516.whl07c8 ));
      params( 2363 ) := "+"( Integer'Pos( a_frs1516.whl07c9 ));
      params( 2364 ) := "+"( Integer'Pos( a_frs1516.whl08c1 ));
      params( 2365 ) := "+"( Integer'Pos( a_frs1516.whl08c2 ));
      params( 2366 ) := "+"( Integer'Pos( a_frs1516.whl08c3 ));
      params( 2367 ) := "+"( Integer'Pos( a_frs1516.whl08c4 ));
      params( 2368 ) := "+"( Integer'Pos( a_frs1516.whl08c5 ));
      params( 2369 ) := "+"( Integer'Pos( a_frs1516.whl08c6 ));
      params( 2370 ) := "+"( Integer'Pos( a_frs1516.whl08c7 ));
      params( 2371 ) := "+"( Integer'Pos( a_frs1516.whl08c8 ));
      params( 2372 ) := "+"( Integer'Pos( a_frs1516.whl08c9 ));
      params( 2373 ) := "+"( Integer'Pos( a_frs1516.whl09c1 ));
      params( 2374 ) := "+"( Integer'Pos( a_frs1516.whl09c2 ));
      params( 2375 ) := "+"( Integer'Pos( a_frs1516.whl09c3 ));
      params( 2376 ) := "+"( Integer'Pos( a_frs1516.whl09c4 ));
      params( 2377 ) := "+"( Integer'Pos( a_frs1516.whl09c5 ));
      params( 2378 ) := "+"( Integer'Pos( a_frs1516.whl09c6 ));
      params( 2379 ) := "+"( Integer'Pos( a_frs1516.whl09c7 ));
      params( 2380 ) := "+"( Integer'Pos( a_frs1516.whl09c8 ));
      params( 2381 ) := "+"( Integer'Pos( a_frs1516.whl09c9 ));
      params( 2382 ) := "+"( Integer'Pos( a_frs1516.whl10c1 ));
      params( 2383 ) := "+"( Integer'Pos( a_frs1516.whl10c2 ));
      params( 2384 ) := "+"( Integer'Pos( a_frs1516.whl10c3 ));
      params( 2385 ) := "+"( Integer'Pos( a_frs1516.whl10c4 ));
      params( 2386 ) := "+"( Integer'Pos( a_frs1516.whl10c5 ));
      params( 2387 ) := "+"( Integer'Pos( a_frs1516.whl10c6 ));
      params( 2388 ) := "+"( Integer'Pos( a_frs1516.whl10c7 ));
      params( 2389 ) := "+"( Integer'Pos( a_frs1516.whl10c8 ));
      params( 2390 ) := "+"( Integer'Pos( a_frs1516.whl10c9 ));
      params( 2391 ) := "+"( Integer'Pos( a_frs1516.whl11c1 ));
      params( 2392 ) := "+"( Integer'Pos( a_frs1516.whl11c2 ));
      params( 2393 ) := "+"( Integer'Pos( a_frs1516.whl11c3 ));
      params( 2394 ) := "+"( Integer'Pos( a_frs1516.whl11c4 ));
      params( 2395 ) := "+"( Integer'Pos( a_frs1516.whl11c5 ));
      params( 2396 ) := "+"( Integer'Pos( a_frs1516.whl11c6 ));
      params( 2397 ) := "+"( Integer'Pos( a_frs1516.whl11c7 ));
      params( 2398 ) := "+"( Integer'Pos( a_frs1516.whl11c8 ));
      params( 2399 ) := "+"( Integer'Pos( a_frs1516.whl11c9 ));
      params( 2400 ) := "+"( Integer'Pos( a_frs1516.whl12c1 ));
      params( 2401 ) := "+"( Integer'Pos( a_frs1516.whl12c2 ));
      params( 2402 ) := "+"( Integer'Pos( a_frs1516.whl12c3 ));
      params( 2403 ) := "+"( Integer'Pos( a_frs1516.whl12c4 ));
      params( 2404 ) := "+"( Integer'Pos( a_frs1516.whl12c5 ));
      params( 2405 ) := "+"( Integer'Pos( a_frs1516.whl12c6 ));
      params( 2406 ) := "+"( Integer'Pos( a_frs1516.whl12c7 ));
      params( 2407 ) := "+"( Integer'Pos( a_frs1516.whl12c8 ));
      params( 2408 ) := "+"( Integer'Pos( a_frs1516.whl12c9 ));
      params( 2409 ) := "+"( Integer'Pos( a_frs1516.whl13c1 ));
      params( 2410 ) := "+"( Integer'Pos( a_frs1516.whl13c2 ));
      params( 2411 ) := "+"( Integer'Pos( a_frs1516.whl13c3 ));
      params( 2412 ) := "+"( Integer'Pos( a_frs1516.whl13c4 ));
      params( 2413 ) := "+"( Integer'Pos( a_frs1516.whl13c5 ));
      params( 2414 ) := "+"( Integer'Pos( a_frs1516.whl13c6 ));
      params( 2415 ) := "+"( Integer'Pos( a_frs1516.whl13c7 ));
      params( 2416 ) := "+"( Integer'Pos( a_frs1516.whl13c8 ));
      params( 2417 ) := "+"( Integer'Pos( a_frs1516.whl13c9 ));
      params( 2418 ) := "+"( Integer'Pos( a_frs1516.whl14c1 ));
      params( 2419 ) := "+"( Integer'Pos( a_frs1516.whl14c2 ));
      params( 2420 ) := "+"( Integer'Pos( a_frs1516.whl14c3 ));
      params( 2421 ) := "+"( Integer'Pos( a_frs1516.whl14c4 ));
      params( 2422 ) := "+"( Integer'Pos( a_frs1516.whl14c5 ));
      params( 2423 ) := "+"( Integer'Pos( a_frs1516.whl14c6 ));
      params( 2424 ) := "+"( Integer'Pos( a_frs1516.whl14c7 ));
      params( 2425 ) := "+"( Integer'Pos( a_frs1516.whl14c8 ));
      params( 2426 ) := "+"( Integer'Pos( a_frs1516.whl14c9 ));
      params( 2427 ) := "+"( Integer'Pos( a_frs1516.whl15c1 ));
      params( 2428 ) := "+"( Integer'Pos( a_frs1516.whl15c2 ));
      params( 2429 ) := "+"( Integer'Pos( a_frs1516.whl15c3 ));
      params( 2430 ) := "+"( Integer'Pos( a_frs1516.whl15c4 ));
      params( 2431 ) := "+"( Integer'Pos( a_frs1516.whl15c5 ));
      params( 2432 ) := "+"( Integer'Pos( a_frs1516.whl15c6 ));
      params( 2433 ) := "+"( Integer'Pos( a_frs1516.whl15c7 ));
      params( 2434 ) := "+"( Integer'Pos( a_frs1516.whl15c8 ));
      params( 2435 ) := "+"( Integer'Pos( a_frs1516.whl15c9 ));
      params( 2436 ) := "+"( Integer'Pos( a_frs1516.whl16c1 ));
      params( 2437 ) := "+"( Integer'Pos( a_frs1516.whl16c2 ));
      params( 2438 ) := "+"( Integer'Pos( a_frs1516.whl16c3 ));
      params( 2439 ) := "+"( Integer'Pos( a_frs1516.whl16c4 ));
      params( 2440 ) := "+"( Integer'Pos( a_frs1516.whl16c5 ));
      params( 2441 ) := "+"( Integer'Pos( a_frs1516.whl16c6 ));
      params( 2442 ) := "+"( Integer'Pos( a_frs1516.whl16c7 ));
      params( 2443 ) := "+"( Integer'Pos( a_frs1516.whl16c8 ));
      params( 2444 ) := "+"( Integer'Pos( a_frs1516.whl16c9 ));
      params( 2445 ) := "+"( Integer'Pos( a_frs1516.whl17c1 ));
      params( 2446 ) := "+"( Integer'Pos( a_frs1516.whl17c2 ));
      params( 2447 ) := "+"( Integer'Pos( a_frs1516.whl17c3 ));
      params( 2448 ) := "+"( Integer'Pos( a_frs1516.whl17c4 ));
      params( 2449 ) := "+"( Integer'Pos( a_frs1516.whl17c5 ));
      params( 2450 ) := "+"( Integer'Pos( a_frs1516.whl17c6 ));
      params( 2451 ) := "+"( Integer'Pos( a_frs1516.whl17c7 ));
      params( 2452 ) := "+"( Integer'Pos( a_frs1516.whl17c8 ));
      params( 2453 ) := "+"( Integer'Pos( a_frs1516.whl17c9 ));
      params( 2454 ) := "+"( Integer'Pos( a_frs1516.whl18c1 ));
      params( 2455 ) := "+"( Integer'Pos( a_frs1516.whl18c2 ));
      params( 2456 ) := "+"( Integer'Pos( a_frs1516.whl18c3 ));
      params( 2457 ) := "+"( Integer'Pos( a_frs1516.whl18c4 ));
      params( 2458 ) := "+"( Integer'Pos( a_frs1516.whl18c5 ));
      params( 2459 ) := "+"( Integer'Pos( a_frs1516.whl18c6 ));
      params( 2460 ) := "+"( Integer'Pos( a_frs1516.whl18c7 ));
      params( 2461 ) := "+"( Integer'Pos( a_frs1516.whl18c8 ));
      params( 2462 ) := "+"( Integer'Pos( a_frs1516.whl18c9 ));
      params( 2463 ) := "+"( Integer'Pos( a_frs1516.whl19c1 ));
      params( 2464 ) := "+"( Integer'Pos( a_frs1516.whl19c2 ));
      params( 2465 ) := "+"( Integer'Pos( a_frs1516.whl19c3 ));
      params( 2466 ) := "+"( Integer'Pos( a_frs1516.whl19c4 ));
      params( 2467 ) := "+"( Integer'Pos( a_frs1516.whl19c5 ));
      params( 2468 ) := "+"( Integer'Pos( a_frs1516.whl19c6 ));
      params( 2469 ) := "+"( Integer'Pos( a_frs1516.whl19c7 ));
      params( 2470 ) := "+"( Integer'Pos( a_frs1516.whl19c8 ));
      params( 2471 ) := "+"( Integer'Pos( a_frs1516.whl19c9 ));
      params( 2472 ) := "+"( Integer'Pos( a_frs1516.whl20c1 ));
      params( 2473 ) := "+"( Integer'Pos( a_frs1516.whl20c2 ));
      params( 2474 ) := "+"( Integer'Pos( a_frs1516.whl20c3 ));
      params( 2475 ) := "+"( Integer'Pos( a_frs1516.whl20c4 ));
      params( 2476 ) := "+"( Integer'Pos( a_frs1516.whl20c5 ));
      params( 2477 ) := "+"( Integer'Pos( a_frs1516.whl20c6 ));
      params( 2478 ) := "+"( Integer'Pos( a_frs1516.whl20c7 ));
      params( 2479 ) := "+"( Integer'Pos( a_frs1516.whl20c8 ));
      params( 2480 ) := "+"( Integer'Pos( a_frs1516.whl20c9 ));
      params( 2481 ) := "+"( Integer'Pos( a_frs1516.agec1 ));
      params( 2482 ) := "+"( Integer'Pos( a_frs1516.agec2 ));
      params( 2483 ) := "+"( Integer'Pos( a_frs1516.agec3 ));
      params( 2484 ) := "+"( Integer'Pos( a_frs1516.agec4 ));
      params( 2485 ) := "+"( Integer'Pos( a_frs1516.agec5 ));
      params( 2486 ) := "+"( Integer'Pos( a_frs1516.agec6 ));
      params( 2487 ) := "+"( Integer'Pos( a_frs1516.agec7 ));
      params( 2488 ) := "+"( Integer'Pos( a_frs1516.agec8 ));
      params( 2489 ) := "+"( Integer'Pos( a_frs1516.cameyrc1 ));
      params( 2490 ) := "+"( Integer'Pos( a_frs1516.cameyrc2 ));
      params( 2491 ) := "+"( Integer'Pos( a_frs1516.cameyrc3 ));
      params( 2492 ) := "+"( Integer'Pos( a_frs1516.cameyrc4 ));
      params( 2493 ) := "+"( Integer'Pos( a_frs1516.cameyrc5 ));
      params( 2494 ) := "+"( Integer'Pos( a_frs1516.cameyrc6 ));
      params( 2495 ) := "+"( Integer'Pos( a_frs1516.cameyrc7 ));
      params( 2496 ) := "+"( Integer'Pos( a_frs1516.cameyrc8 ));
      params( 2497 ) := "+"( Integer'Pos( a_frs1516.chcrec1 ));
      params( 2498 ) := "+"( Integer'Pos( a_frs1516.chcrec2 ));
      params( 2499 ) := "+"( Integer'Pos( a_frs1516.chcrec3 ));
      params( 2500 ) := "+"( Integer'Pos( a_frs1516.chcrec4 ));
      params( 2501 ) := "+"( Integer'Pos( a_frs1516.chcrec5 ));
      params( 2502 ) := "+"( Integer'Pos( a_frs1516.chcrec6 ));
      params( 2503 ) := "+"( Integer'Pos( a_frs1516.chcrec7 ));
      params( 2504 ) := "+"( Integer'Pos( a_frs1516.chcrec8 ));
      params( 2505 ) := "+"( Integer'Pos( a_frs1516.creabc1 ));
      params( 2506 ) := "+"( Integer'Pos( a_frs1516.creabc2 ));
      params( 2507 ) := "+"( Integer'Pos( a_frs1516.creabc3 ));
      params( 2508 ) := "+"( Integer'Pos( a_frs1516.creabc4 ));
      params( 2509 ) := "+"( Integer'Pos( a_frs1516.creabc5 ));
      params( 2510 ) := "+"( Integer'Pos( a_frs1516.creabc6 ));
      params( 2511 ) := "+"( Integer'Pos( a_frs1516.creabc7 ));
      params( 2512 ) := "+"( Integer'Pos( a_frs1516.creabc8 ));
      params( 2513 ) := "+"( Integer'Pos( a_frs1516.creahc1 ));
      params( 2514 ) := "+"( Integer'Pos( a_frs1516.creahc2 ));
      params( 2515 ) := "+"( Integer'Pos( a_frs1516.creahc3 ));
      params( 2516 ) := "+"( Integer'Pos( a_frs1516.creahc4 ));
      params( 2517 ) := "+"( Integer'Pos( a_frs1516.creahc5 ));
      params( 2518 ) := "+"( Integer'Pos( a_frs1516.creahc6 ));
      params( 2519 ) := "+"( Integer'Pos( a_frs1516.creahc7 ));
      params( 2520 ) := "+"( Integer'Pos( a_frs1516.creahc8 ));
      params( 2521 ) := "+"( Integer'Pos( a_frs1516.crecbc1 ));
      params( 2522 ) := "+"( Integer'Pos( a_frs1516.crecbc2 ));
      params( 2523 ) := "+"( Integer'Pos( a_frs1516.crecbc3 ));
      params( 2524 ) := "+"( Integer'Pos( a_frs1516.crecbc4 ));
      params( 2525 ) := "+"( Integer'Pos( a_frs1516.crecbc5 ));
      params( 2526 ) := "+"( Integer'Pos( a_frs1516.crecbc6 ));
      params( 2527 ) := "+"( Integer'Pos( a_frs1516.crecbc7 ));
      params( 2528 ) := "+"( Integer'Pos( a_frs1516.crecbc8 ));
      params( 2529 ) := "+"( Integer'Pos( a_frs1516.crechc1 ));
      params( 2530 ) := "+"( Integer'Pos( a_frs1516.crechc2 ));
      params( 2531 ) := "+"( Integer'Pos( a_frs1516.crechc3 ));
      params( 2532 ) := "+"( Integer'Pos( a_frs1516.crechc4 ));
      params( 2533 ) := "+"( Integer'Pos( a_frs1516.crechc5 ));
      params( 2534 ) := "+"( Integer'Pos( a_frs1516.crechc6 ));
      params( 2535 ) := "+"( Integer'Pos( a_frs1516.crechc7 ));
      params( 2536 ) := "+"( Integer'Pos( a_frs1516.crechc8 ));
      params( 2537 ) := "+"( Integer'Pos( a_frs1516.creclc1 ));
      params( 2538 ) := "+"( Integer'Pos( a_frs1516.creclc2 ));
      params( 2539 ) := "+"( Integer'Pos( a_frs1516.creclc3 ));
      params( 2540 ) := "+"( Integer'Pos( a_frs1516.creclc4 ));
      params( 2541 ) := "+"( Integer'Pos( a_frs1516.creclc5 ));
      params( 2542 ) := "+"( Integer'Pos( a_frs1516.creclc6 ));
      params( 2543 ) := "+"( Integer'Pos( a_frs1516.creclc7 ));
      params( 2544 ) := "+"( Integer'Pos( a_frs1516.creclc8 ));
      params( 2545 ) := "+"( Integer'Pos( a_frs1516.crefrc1 ));
      params( 2546 ) := "+"( Integer'Pos( a_frs1516.crefrc2 ));
      params( 2547 ) := "+"( Integer'Pos( a_frs1516.crefrc3 ));
      params( 2548 ) := "+"( Integer'Pos( a_frs1516.crefrc4 ));
      params( 2549 ) := "+"( Integer'Pos( a_frs1516.crefrc5 ));
      params( 2550 ) := "+"( Integer'Pos( a_frs1516.crefrc6 ));
      params( 2551 ) := "+"( Integer'Pos( a_frs1516.crefrc7 ));
      params( 2552 ) := "+"( Integer'Pos( a_frs1516.crefrc8 ));
      params( 2553 ) := "+"( Integer'Pos( a_frs1516.creotc1 ));
      params( 2554 ) := "+"( Integer'Pos( a_frs1516.creotc2 ));
      params( 2555 ) := "+"( Integer'Pos( a_frs1516.creotc3 ));
      params( 2556 ) := "+"( Integer'Pos( a_frs1516.creotc4 ));
      params( 2557 ) := "+"( Integer'Pos( a_frs1516.creotc5 ));
      params( 2558 ) := "+"( Integer'Pos( a_frs1516.creotc6 ));
      params( 2559 ) := "+"( Integer'Pos( a_frs1516.creotc7 ));
      params( 2560 ) := "+"( Integer'Pos( a_frs1516.creotc8 ));
      params( 2561 ) := "+"( Integer'Pos( a_frs1516.carerc1 ));
      params( 2562 ) := "+"( Integer'Pos( a_frs1516.carerc2 ));
      params( 2563 ) := "+"( Integer'Pos( a_frs1516.carerc3 ));
      params( 2564 ) := "+"( Integer'Pos( a_frs1516.carerc4 ));
      params( 2565 ) := "+"( Integer'Pos( a_frs1516.carerc5 ));
      params( 2566 ) := "+"( Integer'Pos( a_frs1516.carerc6 ));
      params( 2567 ) := "+"( Integer'Pos( a_frs1516.carerc7 ));
      params( 2568 ) := "+"( Integer'Pos( a_frs1516.carerc8 ));
      params( 2569 ) := "+"( Integer'Pos( a_frs1516.cdatrec1 ));
      params( 2570 ) := "+"( Integer'Pos( a_frs1516.cdatrec2 ));
      params( 2571 ) := "+"( Integer'Pos( a_frs1516.cdatrec3 ));
      params( 2572 ) := "+"( Integer'Pos( a_frs1516.cdatrec4 ));
      params( 2573 ) := "+"( Integer'Pos( a_frs1516.cdatrec5 ));
      params( 2574 ) := "+"( Integer'Pos( a_frs1516.cdatrec6 ));
      params( 2575 ) := "+"( Integer'Pos( a_frs1516.cdatrec7 ));
      params( 2576 ) := "+"( Integer'Pos( a_frs1516.cdatrec8 ));
      params( 2577 ) := "+"( Integer'Pos( a_frs1516.cdtrepc1 ));
      params( 2578 ) := "+"( Integer'Pos( a_frs1516.cdtrepc2 ));
      params( 2579 ) := "+"( Integer'Pos( a_frs1516.cdtrepc3 ));
      params( 2580 ) := "+"( Integer'Pos( a_frs1516.cdtrepc4 ));
      params( 2581 ) := "+"( Integer'Pos( a_frs1516.cdtrepc5 ));
      params( 2582 ) := "+"( Integer'Pos( a_frs1516.cdtrepc6 ));
      params( 2583 ) := "+"( Integer'Pos( a_frs1516.cdtrepc7 ));
      params( 2584 ) := "+"( Integer'Pos( a_frs1516.cdtrepc8 ));
      params( 2585 ) := "+"( Integer'Pos( a_frs1516.cdis1c1 ));
      params( 2586 ) := "+"( Integer'Pos( a_frs1516.cdis1c2 ));
      params( 2587 ) := "+"( Integer'Pos( a_frs1516.cdis1c3 ));
      params( 2588 ) := "+"( Integer'Pos( a_frs1516.cdis1c4 ));
      params( 2589 ) := "+"( Integer'Pos( a_frs1516.cdis1c5 ));
      params( 2590 ) := "+"( Integer'Pos( a_frs1516.cdis1c6 ));
      params( 2591 ) := "+"( Integer'Pos( a_frs1516.cdis1c7 ));
      params( 2592 ) := "+"( Integer'Pos( a_frs1516.cdis1c8 ));
      params( 2593 ) := "+"( Integer'Pos( a_frs1516.cdis2c1 ));
      params( 2594 ) := "+"( Integer'Pos( a_frs1516.cdis2c2 ));
      params( 2595 ) := "+"( Integer'Pos( a_frs1516.cdis2c3 ));
      params( 2596 ) := "+"( Integer'Pos( a_frs1516.cdis2c4 ));
      params( 2597 ) := "+"( Integer'Pos( a_frs1516.cdis2c5 ));
      params( 2598 ) := "+"( Integer'Pos( a_frs1516.cdis2c6 ));
      params( 2599 ) := "+"( Integer'Pos( a_frs1516.cdis2c7 ));
      params( 2600 ) := "+"( Integer'Pos( a_frs1516.cdis2c8 ));
      params( 2601 ) := "+"( Integer'Pos( a_frs1516.cdis3c1 ));
      params( 2602 ) := "+"( Integer'Pos( a_frs1516.cdis3c2 ));
      params( 2603 ) := "+"( Integer'Pos( a_frs1516.cdis3c3 ));
      params( 2604 ) := "+"( Integer'Pos( a_frs1516.cdis3c4 ));
      params( 2605 ) := "+"( Integer'Pos( a_frs1516.cdis3c5 ));
      params( 2606 ) := "+"( Integer'Pos( a_frs1516.cdis3c6 ));
      params( 2607 ) := "+"( Integer'Pos( a_frs1516.cdis3c7 ));
      params( 2608 ) := "+"( Integer'Pos( a_frs1516.cdis3c8 ));
      params( 2609 ) := "+"( Integer'Pos( a_frs1516.cdis4c1 ));
      params( 2610 ) := "+"( Integer'Pos( a_frs1516.cdis4c2 ));
      params( 2611 ) := "+"( Integer'Pos( a_frs1516.cdis4c3 ));
      params( 2612 ) := "+"( Integer'Pos( a_frs1516.cdis4c4 ));
      params( 2613 ) := "+"( Integer'Pos( a_frs1516.cdis4c5 ));
      params( 2614 ) := "+"( Integer'Pos( a_frs1516.cdis4c6 ));
      params( 2615 ) := "+"( Integer'Pos( a_frs1516.cdis4c7 ));
      params( 2616 ) := "+"( Integer'Pos( a_frs1516.cdis4c8 ));
      params( 2617 ) := "+"( Integer'Pos( a_frs1516.cdis5c1 ));
      params( 2618 ) := "+"( Integer'Pos( a_frs1516.cdis5c2 ));
      params( 2619 ) := "+"( Integer'Pos( a_frs1516.cdis5c3 ));
      params( 2620 ) := "+"( Integer'Pos( a_frs1516.cdis5c4 ));
      params( 2621 ) := "+"( Integer'Pos( a_frs1516.cdis5c5 ));
      params( 2622 ) := "+"( Integer'Pos( a_frs1516.cdis5c6 ));
      params( 2623 ) := "+"( Integer'Pos( a_frs1516.cdis5c7 ));
      params( 2624 ) := "+"( Integer'Pos( a_frs1516.cdis5c8 ));
      params( 2625 ) := "+"( Integer'Pos( a_frs1516.cdis6c1 ));
      params( 2626 ) := "+"( Integer'Pos( a_frs1516.cdis6c2 ));
      params( 2627 ) := "+"( Integer'Pos( a_frs1516.cdis6c3 ));
      params( 2628 ) := "+"( Integer'Pos( a_frs1516.cdis6c4 ));
      params( 2629 ) := "+"( Integer'Pos( a_frs1516.cdis6c5 ));
      params( 2630 ) := "+"( Integer'Pos( a_frs1516.cdis6c6 ));
      params( 2631 ) := "+"( Integer'Pos( a_frs1516.cdis6c7 ));
      params( 2632 ) := "+"( Integer'Pos( a_frs1516.cdis6c8 ));
      params( 2633 ) := "+"( Integer'Pos( a_frs1516.cdis7c1 ));
      params( 2634 ) := "+"( Integer'Pos( a_frs1516.cdis7c2 ));
      params( 2635 ) := "+"( Integer'Pos( a_frs1516.cdis7c3 ));
      params( 2636 ) := "+"( Integer'Pos( a_frs1516.cdis7c4 ));
      params( 2637 ) := "+"( Integer'Pos( a_frs1516.cdis7c5 ));
      params( 2638 ) := "+"( Integer'Pos( a_frs1516.cdis7c6 ));
      params( 2639 ) := "+"( Integer'Pos( a_frs1516.cdis7c7 ));
      params( 2640 ) := "+"( Integer'Pos( a_frs1516.cdis7c8 ));
      params( 2641 ) := "+"( Integer'Pos( a_frs1516.cdis8c1 ));
      params( 2642 ) := "+"( Integer'Pos( a_frs1516.cdis8c2 ));
      params( 2643 ) := "+"( Integer'Pos( a_frs1516.cdis8c3 ));
      params( 2644 ) := "+"( Integer'Pos( a_frs1516.cdis8c4 ));
      params( 2645 ) := "+"( Integer'Pos( a_frs1516.cdis8c5 ));
      params( 2646 ) := "+"( Integer'Pos( a_frs1516.cdis8c6 ));
      params( 2647 ) := "+"( Integer'Pos( a_frs1516.cdis8c7 ));
      params( 2648 ) := "+"( Integer'Pos( a_frs1516.cdis8c8 ));
      params( 2649 ) := "+"( Integer'Pos( a_frs1516.cdis9c1 ));
      params( 2650 ) := "+"( Integer'Pos( a_frs1516.cdis9c2 ));
      params( 2651 ) := "+"( Integer'Pos( a_frs1516.cdis9c3 ));
      params( 2652 ) := "+"( Integer'Pos( a_frs1516.cdis9c4 ));
      params( 2653 ) := "+"( Integer'Pos( a_frs1516.cdis9c5 ));
      params( 2654 ) := "+"( Integer'Pos( a_frs1516.cdis9c6 ));
      params( 2655 ) := "+"( Integer'Pos( a_frs1516.cdis9c7 ));
      params( 2656 ) := "+"( Integer'Pos( a_frs1516.cdis9c8 ));
      params( 2657 ) := "+"( Integer'Pos( a_frs1516.cdis10c1 ));
      params( 2658 ) := "+"( Integer'Pos( a_frs1516.cdis10c2 ));
      params( 2659 ) := "+"( Integer'Pos( a_frs1516.cdis10c3 ));
      params( 2660 ) := "+"( Integer'Pos( a_frs1516.cdis10c4 ));
      params( 2661 ) := "+"( Integer'Pos( a_frs1516.cdis10c5 ));
      params( 2662 ) := "+"( Integer'Pos( a_frs1516.cdis10c6 ));
      params( 2663 ) := "+"( Integer'Pos( a_frs1516.cdis10c7 ));
      params( 2664 ) := "+"( Integer'Pos( a_frs1516.cdis10c8 ));
      params( 2665 ) := "+"( Integer'Pos( a_frs1516.cdifc1 ));
      params( 2666 ) := "+"( Integer'Pos( a_frs1516.cdifc2 ));
      params( 2667 ) := "+"( Integer'Pos( a_frs1516.cdifc3 ));
      params( 2668 ) := "+"( Integer'Pos( a_frs1516.cdifc4 ));
      params( 2669 ) := "+"( Integer'Pos( a_frs1516.cdifc5 ));
      params( 2670 ) := "+"( Integer'Pos( a_frs1516.cdifc6 ));
      params( 2671 ) := "+"( Integer'Pos( a_frs1516.cdifc7 ));
      params( 2672 ) := "+"( Integer'Pos( a_frs1516.cdifc8 ));
      params( 2673 ) := "+"( Float( a_frs1516.ernamc1 ));
      params( 2674 ) := "+"( Float( a_frs1516.ernamc2 ));
      params( 2675 ) := "+"( Float( a_frs1516.ernamc3 ));
      params( 2676 ) := "+"( Integer'Pos( a_frs1516.ernamc4 ));
      params( 2677 ) := "+"( Integer'Pos( a_frs1516.ernamc5 ));
      params( 2678 ) := "+"( Integer'Pos( a_frs1516.ernamc6 ));
      params( 2679 ) := "+"( Integer'Pos( a_frs1516.ernamc7 ));
      params( 2680 ) := "+"( Integer'Pos( a_frs1516.ernamc8 ));
      params( 2681 ) := "+"( Float( a_frs1516.trustc1 ));
      params( 2682 ) := "+"( Float( a_frs1516.trustc2 ));
      params( 2683 ) := "+"( Float( a_frs1516.trustc3 ));
      params( 2684 ) := "+"( Integer'Pos( a_frs1516.trustc4 ));
      params( 2685 ) := "+"( Integer'Pos( a_frs1516.trustc5 ));
      params( 2686 ) := "+"( Integer'Pos( a_frs1516.trustc6 ));
      params( 2687 ) := "+"( Integer'Pos( a_frs1516.trustc7 ));
      params( 2688 ) := "+"( Integer'Pos( a_frs1516.trustc8 ));
      params( 2689 ) := "+"( Integer'Pos( a_frs1516.chbfdc1 ));
      params( 2690 ) := "+"( Integer'Pos( a_frs1516.chbfdc2 ));
      params( 2691 ) := "+"( Integer'Pos( a_frs1516.chbfdc3 ));
      params( 2692 ) := "+"( Integer'Pos( a_frs1516.chbfdc4 ));
      params( 2693 ) := "+"( Integer'Pos( a_frs1516.chbfdc5 ));
      params( 2694 ) := "+"( Integer'Pos( a_frs1516.chbfdc6 ));
      params( 2695 ) := "+"( Integer'Pos( a_frs1516.chbfdc7 ));
      params( 2696 ) := "+"( Integer'Pos( a_frs1516.chbfdc8 ));
      params( 2697 ) := "+"( Float( a_frs1516.cbfamtc1 ));
      params( 2698 ) := "+"( Float( a_frs1516.cbfamtc2 ));
      params( 2699 ) := "+"( Integer'Pos( a_frs1516.cbfamtc3 ));
      params( 2700 ) := "+"( Integer'Pos( a_frs1516.cbfamtc4 ));
      params( 2701 ) := "+"( Integer'Pos( a_frs1516.cbfamtc5 ));
      params( 2702 ) := "+"( Integer'Pos( a_frs1516.cbfamtc6 ));
      params( 2703 ) := "+"( Integer'Pos( a_frs1516.cbfamtc7 ));
      params( 2704 ) := "+"( Integer'Pos( a_frs1516.cbfamtc8 ));
      params( 2705 ) := "+"( Integer'Pos( a_frs1516.pbfamtc1 ));
      params( 2706 ) := "+"( Integer'Pos( a_frs1516.pbfamtc2 ));
      params( 2707 ) := "+"( Integer'Pos( a_frs1516.pbfamtc3 ));
      params( 2708 ) := "+"( Integer'Pos( a_frs1516.pbfamtc4 ));
      params( 2709 ) := "+"( Integer'Pos( a_frs1516.pbfamtc5 ));
      params( 2710 ) := "+"( Integer'Pos( a_frs1516.pbfamtc6 ));
      params( 2711 ) := "+"( Integer'Pos( a_frs1516.pbfamtc7 ));
      params( 2712 ) := "+"( Integer'Pos( a_frs1516.pbfamtc8 ));
      params( 2713 ) := "+"( Integer'Pos( a_frs1516.cbfvalc1 ));
      params( 2714 ) := "+"( Integer'Pos( a_frs1516.cbfvalc2 ));
      params( 2715 ) := "+"( Integer'Pos( a_frs1516.cbfvalc3 ));
      params( 2716 ) := "+"( Integer'Pos( a_frs1516.cbfvalc4 ));
      params( 2717 ) := "+"( Integer'Pos( a_frs1516.cbfvalc5 ));
      params( 2718 ) := "+"( Integer'Pos( a_frs1516.cbfvalc6 ));
      params( 2719 ) := "+"( Integer'Pos( a_frs1516.cbfvalc7 ));
      params( 2720 ) := "+"( Integer'Pos( a_frs1516.cbfvalc8 ));
      params( 2721 ) := "+"( Integer'Pos( a_frs1516.chcondc1 ));
      params( 2722 ) := "+"( Integer'Pos( a_frs1516.chcondc2 ));
      params( 2723 ) := "+"( Integer'Pos( a_frs1516.chcondc3 ));
      params( 2724 ) := "+"( Integer'Pos( a_frs1516.chcondc4 ));
      params( 2725 ) := "+"( Integer'Pos( a_frs1516.chcondc5 ));
      params( 2726 ) := "+"( Integer'Pos( a_frs1516.chcondc6 ));
      params( 2727 ) := "+"( Integer'Pos( a_frs1516.chcondc7 ));
      params( 2728 ) := "+"( Integer'Pos( a_frs1516.chcondc8 ));
      params( 2729 ) := "+"( Integer'Pos( a_frs1516.cdla1c1 ));
      params( 2730 ) := "+"( Integer'Pos( a_frs1516.cdla1c2 ));
      params( 2731 ) := "+"( Integer'Pos( a_frs1516.cdla1c3 ));
      params( 2732 ) := "+"( Integer'Pos( a_frs1516.cdla1c4 ));
      params( 2733 ) := "+"( Integer'Pos( a_frs1516.cdla1c5 ));
      params( 2734 ) := "+"( Integer'Pos( a_frs1516.cdla1c6 ));
      params( 2735 ) := "+"( Integer'Pos( a_frs1516.cdla1c7 ));
      params( 2736 ) := "+"( Integer'Pos( a_frs1516.cdla1c8 ));
      params( 2737 ) := "+"( Integer'Pos( a_frs1516.cdla2c1 ));
      params( 2738 ) := "+"( Integer'Pos( a_frs1516.cdla2c2 ));
      params( 2739 ) := "+"( Integer'Pos( a_frs1516.cdla2c3 ));
      params( 2740 ) := "+"( Integer'Pos( a_frs1516.cdla2c4 ));
      params( 2741 ) := "+"( Integer'Pos( a_frs1516.cdla2c5 ));
      params( 2742 ) := "+"( Integer'Pos( a_frs1516.cdla2c6 ));
      params( 2743 ) := "+"( Integer'Pos( a_frs1516.cdla2c7 ));
      params( 2744 ) := "+"( Integer'Pos( a_frs1516.cdla2c8 ));
      params( 2745 ) := "+"( Integer'Pos( a_frs1516.chelfc1 ));
      params( 2746 ) := "+"( Integer'Pos( a_frs1516.chelfc2 ));
      params( 2747 ) := "+"( Integer'Pos( a_frs1516.chelfc3 ));
      params( 2748 ) := "+"( Integer'Pos( a_frs1516.chelfc4 ));
      params( 2749 ) := "+"( Integer'Pos( a_frs1516.chelfc5 ));
      params( 2750 ) := "+"( Integer'Pos( a_frs1516.chelfc6 ));
      params( 2751 ) := "+"( Integer'Pos( a_frs1516.chelfc7 ));
      params( 2752 ) := "+"( Integer'Pos( a_frs1516.chelfc8 ));
      params( 2753 ) := "+"( Float( a_frs1516.chernc1 ));
      params( 2754 ) := "+"( Float( a_frs1516.chernc2 ));
      params( 2755 ) := "+"( Float( a_frs1516.chernc3 ));
      params( 2756 ) := "+"( Integer'Pos( a_frs1516.chernc4 ));
      params( 2757 ) := "+"( Integer'Pos( a_frs1516.chernc5 ));
      params( 2758 ) := "+"( Integer'Pos( a_frs1516.chernc6 ));
      params( 2759 ) := "+"( Integer'Pos( a_frs1516.chernc7 ));
      params( 2760 ) := "+"( Integer'Pos( a_frs1516.chernc8 ));
      params( 2761 ) := "+"( Integer'Pos( a_frs1516.crns1c1 ));
      params( 2762 ) := "+"( Integer'Pos( a_frs1516.crns1c2 ));
      params( 2763 ) := "+"( Integer'Pos( a_frs1516.crns1c3 ));
      params( 2764 ) := "+"( Integer'Pos( a_frs1516.crns1c4 ));
      params( 2765 ) := "+"( Integer'Pos( a_frs1516.crns1c5 ));
      params( 2766 ) := "+"( Integer'Pos( a_frs1516.crns1c6 ));
      params( 2767 ) := "+"( Integer'Pos( a_frs1516.crns1c7 ));
      params( 2768 ) := "+"( Integer'Pos( a_frs1516.crns1c8 ));
      params( 2769 ) := "+"( Integer'Pos( a_frs1516.crns2c1 ));
      params( 2770 ) := "+"( Integer'Pos( a_frs1516.crns2c2 ));
      params( 2771 ) := "+"( Integer'Pos( a_frs1516.crns2c3 ));
      params( 2772 ) := "+"( Integer'Pos( a_frs1516.crns2c4 ));
      params( 2773 ) := "+"( Integer'Pos( a_frs1516.crns2c5 ));
      params( 2774 ) := "+"( Integer'Pos( a_frs1516.crns2c6 ));
      params( 2775 ) := "+"( Integer'Pos( a_frs1516.crns2c7 ));
      params( 2776 ) := "+"( Integer'Pos( a_frs1516.crns2c8 ));
      params( 2777 ) := "+"( Integer'Pos( a_frs1516.crns3c1 ));
      params( 2778 ) := "+"( Integer'Pos( a_frs1516.crns3c2 ));
      params( 2779 ) := "+"( Integer'Pos( a_frs1516.crns3c3 ));
      params( 2780 ) := "+"( Integer'Pos( a_frs1516.crns3c4 ));
      params( 2781 ) := "+"( Integer'Pos( a_frs1516.crns3c5 ));
      params( 2782 ) := "+"( Integer'Pos( a_frs1516.crns3c6 ));
      params( 2783 ) := "+"( Integer'Pos( a_frs1516.crns3c7 ));
      params( 2784 ) := "+"( Integer'Pos( a_frs1516.crns3c8 ));
      params( 2785 ) := "+"( Integer'Pos( a_frs1516.chemac1 ));
      params( 2786 ) := "+"( Integer'Pos( a_frs1516.chemac2 ));
      params( 2787 ) := "+"( Integer'Pos( a_frs1516.chemac3 ));
      params( 2788 ) := "+"( Integer'Pos( a_frs1516.chemac4 ));
      params( 2789 ) := "+"( Integer'Pos( a_frs1516.chemac5 ));
      params( 2790 ) := "+"( Integer'Pos( a_frs1516.chemac6 ));
      params( 2791 ) := "+"( Integer'Pos( a_frs1516.chemac7 ));
      params( 2792 ) := "+"( Integer'Pos( a_frs1516.chemac8 ));
      params( 2793 ) := "+"( Float( a_frs1516.emamtc1 ));
      params( 2794 ) := "+"( Float( a_frs1516.emamtc2 ));
      params( 2795 ) := "+"( Integer'Pos( a_frs1516.emamtc3 ));
      params( 2796 ) := "+"( Integer'Pos( a_frs1516.emamtc4 ));
      params( 2797 ) := "+"( Integer'Pos( a_frs1516.emamtc5 ));
      params( 2798 ) := "+"( Integer'Pos( a_frs1516.emamtc6 ));
      params( 2799 ) := "+"( Integer'Pos( a_frs1516.emamtc7 ));
      params( 2800 ) := "+"( Integer'Pos( a_frs1516.emamtc8 ));
      params( 2801 ) := "+"( Integer'Pos( a_frs1516.emapdc1 ));
      params( 2802 ) := "+"( Integer'Pos( a_frs1516.emapdc2 ));
      params( 2803 ) := "+"( Integer'Pos( a_frs1516.emapdc3 ));
      params( 2804 ) := "+"( Integer'Pos( a_frs1516.emapdc4 ));
      params( 2805 ) := "+"( Integer'Pos( a_frs1516.emapdc5 ));
      params( 2806 ) := "+"( Integer'Pos( a_frs1516.emapdc6 ));
      params( 2807 ) := "+"( Integer'Pos( a_frs1516.emapdc7 ));
      params( 2808 ) := "+"( Integer'Pos( a_frs1516.emapdc8 ));
      params( 2809 ) := "+"( Float( a_frs1516.chidvc1 ));
      params( 2810 ) := "+"( Float( a_frs1516.chidvc2 ));
      params( 2811 ) := "+"( Float( a_frs1516.chidvc3 ));
      params( 2812 ) := "+"( Integer'Pos( a_frs1516.chidvc4 ));
      params( 2813 ) := "+"( Integer'Pos( a_frs1516.chidvc5 ));
      params( 2814 ) := "+"( Integer'Pos( a_frs1516.chidvc6 ));
      params( 2815 ) := "+"( Integer'Pos( a_frs1516.chidvc7 ));
      params( 2816 ) := "+"( Integer'Pos( a_frs1516.chidvc8 ));
      params( 2817 ) := "+"( Integer'Pos( a_frs1516.climitc1 ));
      params( 2818 ) := "+"( Integer'Pos( a_frs1516.climitc2 ));
      params( 2819 ) := "+"( Integer'Pos( a_frs1516.climitc3 ));
      params( 2820 ) := "+"( Integer'Pos( a_frs1516.climitc4 ));
      params( 2821 ) := "+"( Integer'Pos( a_frs1516.climitc5 ));
      params( 2822 ) := "+"( Integer'Pos( a_frs1516.climitc6 ));
      params( 2823 ) := "+"( Integer'Pos( a_frs1516.climitc7 ));
      params( 2824 ) := "+"( Integer'Pos( a_frs1516.climitc8 ));
      params( 2825 ) := "+"( Integer'Pos( a_frs1516.pearnc1 ));
      params( 2826 ) := "+"( Integer'Pos( a_frs1516.pearnc2 ));
      params( 2827 ) := "+"( Integer'Pos( a_frs1516.pearnc3 ));
      params( 2828 ) := "+"( Integer'Pos( a_frs1516.pearnc4 ));
      params( 2829 ) := "+"( Integer'Pos( a_frs1516.pearnc5 ));
      params( 2830 ) := "+"( Integer'Pos( a_frs1516.pearnc6 ));
      params( 2831 ) := "+"( Integer'Pos( a_frs1516.pearnc7 ));
      params( 2832 ) := "+"( Integer'Pos( a_frs1516.pearnc8 ));
      params( 2833 ) := "+"( Integer'Pos( a_frs1516.ptrusc1 ));
      params( 2834 ) := "+"( Integer'Pos( a_frs1516.ptrusc2 ));
      params( 2835 ) := "+"( Integer'Pos( a_frs1516.ptrusc3 ));
      params( 2836 ) := "+"( Integer'Pos( a_frs1516.ptrusc4 ));
      params( 2837 ) := "+"( Integer'Pos( a_frs1516.ptrusc5 ));
      params( 2838 ) := "+"( Integer'Pos( a_frs1516.ptrusc6 ));
      params( 2839 ) := "+"( Integer'Pos( a_frs1516.ptrusc7 ));
      params( 2840 ) := "+"( Integer'Pos( a_frs1516.ptrusc8 ));
      params( 2841 ) := "+"( Float( a_frs1516.chrinc1 ));
      params( 2842 ) := "+"( Float( a_frs1516.chrinc2 ));
      params( 2843 ) := "+"( Float( a_frs1516.chrinc3 ));
      params( 2844 ) := "+"( Integer'Pos( a_frs1516.chrinc4 ));
      params( 2845 ) := "+"( Integer'Pos( a_frs1516.chrinc5 ));
      params( 2846 ) := "+"( Integer'Pos( a_frs1516.chrinc6 ));
      params( 2847 ) := "+"( Integer'Pos( a_frs1516.chrinc7 ));
      params( 2848 ) := "+"( Integer'Pos( a_frs1516.chrinc8 ));
      params( 2849 ) := "+"( Integer'Pos( a_frs1516.csavec1 ));
      params( 2850 ) := "+"( Integer'Pos( a_frs1516.csavec2 ));
      params( 2851 ) := "+"( Integer'Pos( a_frs1516.csavec3 ));
      params( 2852 ) := "+"( Integer'Pos( a_frs1516.csavec4 ));
      params( 2853 ) := "+"( Integer'Pos( a_frs1516.csavec5 ));
      params( 2854 ) := "+"( Integer'Pos( a_frs1516.csavec6 ));
      params( 2855 ) := "+"( Integer'Pos( a_frs1516.csavec7 ));
      params( 2856 ) := "+"( Integer'Pos( a_frs1516.csavec8 ));
      params( 2857 ) := "+"( Float( a_frs1516.tramtc1 ));
      params( 2858 ) := "+"( Float( a_frs1516.tramtc2 ));
      params( 2859 ) := "+"( Integer'Pos( a_frs1516.tramtc3 ));
      params( 2860 ) := "+"( Integer'Pos( a_frs1516.tramtc4 ));
      params( 2861 ) := "+"( Integer'Pos( a_frs1516.tramtc5 ));
      params( 2862 ) := "+"( Integer'Pos( a_frs1516.tramtc6 ));
      params( 2863 ) := "+"( Integer'Pos( a_frs1516.tramtc7 ));
      params( 2864 ) := "+"( Integer'Pos( a_frs1516.tramtc8 ));
      params( 2865 ) := "+"( Integer'Pos( a_frs1516.trnpdc1 ));
      params( 2866 ) := "+"( Integer'Pos( a_frs1516.trnpdc2 ));
      params( 2867 ) := "+"( Integer'Pos( a_frs1516.trnpdc3 ));
      params( 2868 ) := "+"( Integer'Pos( a_frs1516.trnpdc4 ));
      params( 2869 ) := "+"( Integer'Pos( a_frs1516.trnpdc5 ));
      params( 2870 ) := "+"( Integer'Pos( a_frs1516.trnpdc6 ));
      params( 2871 ) := "+"( Integer'Pos( a_frs1516.trnpdc7 ));
      params( 2872 ) := "+"( Integer'Pos( a_frs1516.trnpdc8 ));
      params( 2873 ) := "+"( Integer'Pos( a_frs1516.cohabc1 ));
      params( 2874 ) := "+"( Integer'Pos( a_frs1516.cohabc2 ));
      params( 2875 ) := "+"( Integer'Pos( a_frs1516.cohabc3 ));
      params( 2876 ) := "+"( Integer'Pos( a_frs1516.cohabc4 ));
      params( 2877 ) := "+"( Integer'Pos( a_frs1516.cohabc5 ));
      params( 2878 ) := "+"( Integer'Pos( a_frs1516.cohabc6 ));
      params( 2879 ) := "+"( Integer'Pos( a_frs1516.cohabc7 ));
      params( 2880 ) := "+"( Integer'Pos( a_frs1516.cohabc8 ));
      params( 2881 ) := "+"( Integer'Pos( a_frs1516.curqulc1 ));
      params( 2882 ) := "+"( Integer'Pos( a_frs1516.curqulc2 ));
      params( 2883 ) := "+"( Integer'Pos( a_frs1516.curqulc3 ));
      params( 2884 ) := "+"( Integer'Pos( a_frs1516.curqulc4 ));
      params( 2885 ) := "+"( Integer'Pos( a_frs1516.curqulc5 ));
      params( 2886 ) := "+"( Integer'Pos( a_frs1516.curqulc6 ));
      params( 2887 ) := "+"( Integer'Pos( a_frs1516.curqulc7 ));
      params( 2888 ) := "+"( Integer'Pos( a_frs1516.curqulc8 ));
      params( 2889 ) := "+"( Integer'Pos( a_frs1516.disacc1 ));
      params( 2890 ) := "+"( Integer'Pos( a_frs1516.disacc2 ));
      params( 2891 ) := "+"( Integer'Pos( a_frs1516.disacc3 ));
      params( 2892 ) := "+"( Integer'Pos( a_frs1516.disacc4 ));
      params( 2893 ) := "+"( Integer'Pos( a_frs1516.disacc5 ));
      params( 2894 ) := "+"( Integer'Pos( a_frs1516.disacc6 ));
      params( 2895 ) := "+"( Integer'Pos( a_frs1516.disacc7 ));
      params( 2896 ) := "+"( Integer'Pos( a_frs1516.disacc8 ));
      params( 2897 ) := "+"( Integer'Pos( a_frs1516.discoc1 ));
      params( 2898 ) := "+"( Integer'Pos( a_frs1516.discoc2 ));
      params( 2899 ) := "+"( Integer'Pos( a_frs1516.discoc3 ));
      params( 2900 ) := "+"( Integer'Pos( a_frs1516.discoc4 ));
      params( 2901 ) := "+"( Integer'Pos( a_frs1516.discoc5 ));
      params( 2902 ) := "+"( Integer'Pos( a_frs1516.discoc6 ));
      params( 2903 ) := "+"( Integer'Pos( a_frs1516.discoc7 ));
      params( 2904 ) := "+"( Integer'Pos( a_frs1516.discoc8 ));
      params( 2905 ) := "+"( Integer'Pos( a_frs1516.dobc1 ));
      params( 2906 ) := "+"( Integer'Pos( a_frs1516.dobc2 ));
      params( 2907 ) := "+"( Integer'Pos( a_frs1516.dobc3 ));
      params( 2908 ) := "+"( Integer'Pos( a_frs1516.dobc4 ));
      params( 2909 ) := "+"( Integer'Pos( a_frs1516.dobc5 ));
      params( 2910 ) := "+"( Integer'Pos( a_frs1516.dobc6 ));
      params( 2911 ) := "+"( Integer'Pos( a_frs1516.dobc7 ));
      params( 2912 ) := "+"( Integer'Pos( a_frs1516.dobc8 ));
      params( 2913 ) := "+"( Integer'Pos( a_frs1516.dvmarc1 ));
      params( 2914 ) := "+"( Integer'Pos( a_frs1516.dvmarc2 ));
      params( 2915 ) := "+"( Integer'Pos( a_frs1516.dvmarc3 ));
      params( 2916 ) := "+"( Integer'Pos( a_frs1516.dvmarc4 ));
      params( 2917 ) := "+"( Integer'Pos( a_frs1516.dvmarc5 ));
      params( 2918 ) := "+"( Integer'Pos( a_frs1516.dvmarc6 ));
      params( 2919 ) := "+"( Integer'Pos( a_frs1516.dvmarc7 ));
      params( 2920 ) := "+"( Integer'Pos( a_frs1516.dvmarc8 ));
      params( 2921 ) := "+"( Float( a_frs1516.fsvvlc1 ));
      params( 2922 ) := "+"( Float( a_frs1516.fsvvlc2 ));
      params( 2923 ) := "+"( Float( a_frs1516.fsvvlc3 ));
      params( 2924 ) := "+"( Float( a_frs1516.fsvvlc4 ));
      params( 2925 ) := "+"( Float( a_frs1516.fsvvlc5 ));
      params( 2926 ) := "+"( Float( a_frs1516.fsvvlc6 ));
      params( 2927 ) := "+"( Integer'Pos( a_frs1516.fsvvlc7 ));
      params( 2928 ) := "+"( Integer'Pos( a_frs1516.fsvvlc8 ));
      params( 2929 ) := "+"( Float( a_frs1516.fsmkvc1 ));
      params( 2930 ) := "+"( Float( a_frs1516.fsmkvc2 ));
      params( 2931 ) := "+"( Float( a_frs1516.fsmkvc3 ));
      params( 2932 ) := "+"( Float( a_frs1516.fsmkvc4 ));
      params( 2933 ) := "+"( Float( a_frs1516.fsmkvc5 ));
      params( 2934 ) := "+"( Integer'Pos( a_frs1516.fsmkvc6 ));
      params( 2935 ) := "+"( Integer'Pos( a_frs1516.fsmkvc7 ));
      params( 2936 ) := "+"( Integer'Pos( a_frs1516.fsmkvc8 ));
      params( 2937 ) := "+"( Float( a_frs1516.fsmlvc1 ));
      params( 2938 ) := "+"( Float( a_frs1516.fsmlvc2 ));
      params( 2939 ) := "+"( Float( a_frs1516.fsmlvc3 ));
      params( 2940 ) := "+"( Float( a_frs1516.fsmlvc4 ));
      params( 2941 ) := "+"( Float( a_frs1516.fsmlvc5 ));
      params( 2942 ) := "+"( Float( a_frs1516.fsmlvc6 ));
      params( 2943 ) := "+"( Integer'Pos( a_frs1516.fsmlvc7 ));
      params( 2944 ) := "+"( Integer'Pos( a_frs1516.fsmlvc8 ));
      params( 2945 ) := "+"( Integer'Pos( a_frs1516.ftedc1 ));
      params( 2946 ) := "+"( Integer'Pos( a_frs1516.ftedc2 ));
      params( 2947 ) := "+"( Integer'Pos( a_frs1516.ftedc3 ));
      params( 2948 ) := "+"( Integer'Pos( a_frs1516.ftedc4 ));
      params( 2949 ) := "+"( Integer'Pos( a_frs1516.ftedc5 ));
      params( 2950 ) := "+"( Integer'Pos( a_frs1516.ftedc6 ));
      params( 2951 ) := "+"( Integer'Pos( a_frs1516.ftedc7 ));
      params( 2952 ) := "+"( Integer'Pos( a_frs1516.ftedc8 ));
      params( 2953 ) := "+"( Integer'Pos( a_frs1516.g1valc1 ));
      params( 2954 ) := "+"( Integer'Pos( a_frs1516.g1valc2 ));
      params( 2955 ) := "+"( Integer'Pos( a_frs1516.g1valc3 ));
      params( 2956 ) := "+"( Integer'Pos( a_frs1516.g1valc4 ));
      params( 2957 ) := "+"( Integer'Pos( a_frs1516.g1valc5 ));
      params( 2958 ) := "+"( Integer'Pos( a_frs1516.g1valc6 ));
      params( 2959 ) := "+"( Integer'Pos( a_frs1516.g1valc7 ));
      params( 2960 ) := "+"( Integer'Pos( a_frs1516.g1valc8 ));
      params( 2961 ) := "+"( Integer'Pos( a_frs1516.g2valc1 ));
      params( 2962 ) := "+"( Integer'Pos( a_frs1516.g2valc2 ));
      params( 2963 ) := "+"( Integer'Pos( a_frs1516.g2valc3 ));
      params( 2964 ) := "+"( Integer'Pos( a_frs1516.g2valc4 ));
      params( 2965 ) := "+"( Integer'Pos( a_frs1516.g2valc5 ));
      params( 2966 ) := "+"( Integer'Pos( a_frs1516.g2valc6 ));
      params( 2967 ) := "+"( Integer'Pos( a_frs1516.g2valc7 ));
      params( 2968 ) := "+"( Integer'Pos( a_frs1516.g2valc8 ));
      params( 2969 ) := "+"( Integer'Pos( a_frs1516.g1dirc1 ));
      params( 2970 ) := "+"( Integer'Pos( a_frs1516.g1dirc2 ));
      params( 2971 ) := "+"( Integer'Pos( a_frs1516.g1dirc3 ));
      params( 2972 ) := "+"( Integer'Pos( a_frs1516.g1dirc4 ));
      params( 2973 ) := "+"( Integer'Pos( a_frs1516.g1dirc5 ));
      params( 2974 ) := "+"( Integer'Pos( a_frs1516.g1dirc6 ));
      params( 2975 ) := "+"( Integer'Pos( a_frs1516.g1dirc7 ));
      params( 2976 ) := "+"( Integer'Pos( a_frs1516.g1dirc8 ));
      params( 2977 ) := "+"( Integer'Pos( a_frs1516.g2dirc1 ));
      params( 2978 ) := "+"( Integer'Pos( a_frs1516.g2dirc2 ));
      params( 2979 ) := "+"( Integer'Pos( a_frs1516.g2dirc3 ));
      params( 2980 ) := "+"( Integer'Pos( a_frs1516.g2dirc4 ));
      params( 2981 ) := "+"( Integer'Pos( a_frs1516.g2dirc5 ));
      params( 2982 ) := "+"( Integer'Pos( a_frs1516.g2dirc6 ));
      params( 2983 ) := "+"( Integer'Pos( a_frs1516.g2dirc7 ));
      params( 2984 ) := "+"( Integer'Pos( a_frs1516.g2dirc8 ));
      params( 2985 ) := "+"( Integer'Pos( a_frs1516.gtnumc1 ));
      params( 2986 ) := "+"( Integer'Pos( a_frs1516.gtnumc2 ));
      params( 2987 ) := "+"( Integer'Pos( a_frs1516.gtnumc3 ));
      params( 2988 ) := "+"( Integer'Pos( a_frs1516.gtnumc4 ));
      params( 2989 ) := "+"( Integer'Pos( a_frs1516.gtnumc5 ));
      params( 2990 ) := "+"( Integer'Pos( a_frs1516.gtnumc6 ));
      params( 2991 ) := "+"( Integer'Pos( a_frs1516.gtnumc7 ));
      params( 2992 ) := "+"( Integer'Pos( a_frs1516.gtnumc8 ));
      params( 2993 ) := "+"( Integer'Pos( a_frs1516.gt1scc1 ));
      params( 2994 ) := "+"( Integer'Pos( a_frs1516.gt1scc2 ));
      params( 2995 ) := "+"( Integer'Pos( a_frs1516.gt1scc3 ));
      params( 2996 ) := "+"( Integer'Pos( a_frs1516.gt1scc4 ));
      params( 2997 ) := "+"( Integer'Pos( a_frs1516.gt1scc5 ));
      params( 2998 ) := "+"( Integer'Pos( a_frs1516.gt1scc6 ));
      params( 2999 ) := "+"( Integer'Pos( a_frs1516.gt1scc7 ));
      params( 3000 ) := "+"( Integer'Pos( a_frs1516.gt1scc8 ));
      params( 3001 ) := "+"( Integer'Pos( a_frs1516.gt2scc1 ));
      params( 3002 ) := "+"( Integer'Pos( a_frs1516.gt2scc2 ));
      params( 3003 ) := "+"( Integer'Pos( a_frs1516.gt2scc3 ));
      params( 3004 ) := "+"( Integer'Pos( a_frs1516.gt2scc4 ));
      params( 3005 ) := "+"( Integer'Pos( a_frs1516.gt2scc5 ));
      params( 3006 ) := "+"( Integer'Pos( a_frs1516.gt2scc6 ));
      params( 3007 ) := "+"( Integer'Pos( a_frs1516.gt2scc7 ));
      params( 3008 ) := "+"( Integer'Pos( a_frs1516.gt2scc8 ));
      params( 3009 ) := "+"( Float( a_frs1516.gt10sc1 ));
      params( 3010 ) := "+"( Integer'Pos( a_frs1516.gt10sc2 ));
      params( 3011 ) := "+"( Integer'Pos( a_frs1516.gt10sc3 ));
      params( 3012 ) := "+"( Integer'Pos( a_frs1516.gt10sc4 ));
      params( 3013 ) := "+"( Integer'Pos( a_frs1516.gt10sc5 ));
      params( 3014 ) := "+"( Integer'Pos( a_frs1516.gt10sc6 ));
      params( 3015 ) := "+"( Integer'Pos( a_frs1516.gt10sc7 ));
      params( 3016 ) := "+"( Integer'Pos( a_frs1516.gt10sc8 ));
      params( 3017 ) := "+"( Integer'Pos( a_frs1516.gt20sc1 ));
      params( 3018 ) := "+"( Integer'Pos( a_frs1516.gt20sc2 ));
      params( 3019 ) := "+"( Integer'Pos( a_frs1516.gt20sc3 ));
      params( 3020 ) := "+"( Integer'Pos( a_frs1516.gt20sc4 ));
      params( 3021 ) := "+"( Integer'Pos( a_frs1516.gt20sc5 ));
      params( 3022 ) := "+"( Integer'Pos( a_frs1516.gt20sc6 ));
      params( 3023 ) := "+"( Integer'Pos( a_frs1516.gt20sc7 ));
      params( 3024 ) := "+"( Integer'Pos( a_frs1516.gt20sc8 ));
      params( 3025 ) := "+"( Integer'Pos( a_frs1516.hartvc1 ));
      params( 3026 ) := "+"( Integer'Pos( a_frs1516.hartvc2 ));
      params( 3027 ) := "+"( Integer'Pos( a_frs1516.hartvc3 ));
      params( 3028 ) := "+"( Integer'Pos( a_frs1516.hartvc4 ));
      params( 3029 ) := "+"( Integer'Pos( a_frs1516.hartvc5 ));
      params( 3030 ) := "+"( Integer'Pos( a_frs1516.hartvc6 ));
      params( 3031 ) := "+"( Integer'Pos( a_frs1516.hartvc7 ));
      params( 3032 ) := "+"( Integer'Pos( a_frs1516.hartvc8 ));
      params( 3033 ) := "+"( Integer'Pos( a_frs1516.heatchc1 ));
      params( 3034 ) := "+"( Integer'Pos( a_frs1516.heatchc2 ));
      params( 3035 ) := "+"( Integer'Pos( a_frs1516.heatchc3 ));
      params( 3036 ) := "+"( Integer'Pos( a_frs1516.heatchc4 ));
      params( 3037 ) := "+"( Integer'Pos( a_frs1516.heatchc5 ));
      params( 3038 ) := "+"( Integer'Pos( a_frs1516.heatchc6 ));
      params( 3039 ) := "+"( Integer'Pos( a_frs1516.heatchc7 ));
      params( 3040 ) := "+"( Integer'Pos( a_frs1516.heatchc8 ));
      params( 3041 ) := "+"( Integer'Pos( a_frs1516.hhldrc1 ));
      params( 3042 ) := "+"( Integer'Pos( a_frs1516.hhldrc2 ));
      params( 3043 ) := "+"( Integer'Pos( a_frs1516.hhldrc3 ));
      params( 3044 ) := "+"( Integer'Pos( a_frs1516.hhldrc4 ));
      params( 3045 ) := "+"( Integer'Pos( a_frs1516.hhldrc5 ));
      params( 3046 ) := "+"( Integer'Pos( a_frs1516.hhldrc6 ));
      params( 3047 ) := "+"( Integer'Pos( a_frs1516.hhldrc7 ));
      params( 3048 ) := "+"( Integer'Pos( a_frs1516.hhldrc8 ));
      params( 3049 ) := "+"( Integer'Pos( a_frs1516.hurabc1 ));
      params( 3050 ) := "+"( Integer'Pos( a_frs1516.hurabc2 ));
      params( 3051 ) := "+"( Integer'Pos( a_frs1516.hurabc3 ));
      params( 3052 ) := "+"( Integer'Pos( a_frs1516.hurabc4 ));
      params( 3053 ) := "+"( Integer'Pos( a_frs1516.hurabc5 ));
      params( 3054 ) := "+"( Integer'Pos( a_frs1516.hurabc6 ));
      params( 3055 ) := "+"( Integer'Pos( a_frs1516.hurabc7 ));
      params( 3056 ) := "+"( Integer'Pos( a_frs1516.hurabc8 ));
      params( 3057 ) := "+"( Integer'Pos( a_frs1516.hurahc1 ));
      params( 3058 ) := "+"( Integer'Pos( a_frs1516.hurahc2 ));
      params( 3059 ) := "+"( Integer'Pos( a_frs1516.hurahc3 ));
      params( 3060 ) := "+"( Integer'Pos( a_frs1516.hurahc4 ));
      params( 3061 ) := "+"( Integer'Pos( a_frs1516.hurahc5 ));
      params( 3062 ) := "+"( Integer'Pos( a_frs1516.hurahc6 ));
      params( 3063 ) := "+"( Integer'Pos( a_frs1516.hurahc7 ));
      params( 3064 ) := "+"( Integer'Pos( a_frs1516.hurahc8 ));
      params( 3065 ) := "+"( Integer'Pos( a_frs1516.hurcbc1 ));
      params( 3066 ) := "+"( Integer'Pos( a_frs1516.hurcbc2 ));
      params( 3067 ) := "+"( Integer'Pos( a_frs1516.hurcbc3 ));
      params( 3068 ) := "+"( Integer'Pos( a_frs1516.hurcbc4 ));
      params( 3069 ) := "+"( Integer'Pos( a_frs1516.hurcbc5 ));
      params( 3070 ) := "+"( Integer'Pos( a_frs1516.hurcbc6 ));
      params( 3071 ) := "+"( Integer'Pos( a_frs1516.hurcbc7 ));
      params( 3072 ) := "+"( Integer'Pos( a_frs1516.hurcbc8 ));
      params( 3073 ) := "+"( Integer'Pos( a_frs1516.hurchc1 ));
      params( 3074 ) := "+"( Integer'Pos( a_frs1516.hurchc2 ));
      params( 3075 ) := "+"( Integer'Pos( a_frs1516.hurchc3 ));
      params( 3076 ) := "+"( Integer'Pos( a_frs1516.hurchc4 ));
      params( 3077 ) := "+"( Integer'Pos( a_frs1516.hurchc5 ));
      params( 3078 ) := "+"( Integer'Pos( a_frs1516.hurchc6 ));
      params( 3079 ) := "+"( Integer'Pos( a_frs1516.hurchc7 ));
      params( 3080 ) := "+"( Integer'Pos( a_frs1516.hurchc8 ));
      params( 3081 ) := "+"( Integer'Pos( a_frs1516.hurclc1 ));
      params( 3082 ) := "+"( Integer'Pos( a_frs1516.hurclc2 ));
      params( 3083 ) := "+"( Integer'Pos( a_frs1516.hurclc3 ));
      params( 3084 ) := "+"( Integer'Pos( a_frs1516.hurclc4 ));
      params( 3085 ) := "+"( Integer'Pos( a_frs1516.hurclc5 ));
      params( 3086 ) := "+"( Integer'Pos( a_frs1516.hurclc6 ));
      params( 3087 ) := "+"( Integer'Pos( a_frs1516.hurclc7 ));
      params( 3088 ) := "+"( Integer'Pos( a_frs1516.hurclc8 ));
      params( 3089 ) := "+"( Integer'Pos( a_frs1516.hurfrc1 ));
      params( 3090 ) := "+"( Integer'Pos( a_frs1516.hurfrc2 ));
      params( 3091 ) := "+"( Integer'Pos( a_frs1516.hurfrc3 ));
      params( 3092 ) := "+"( Integer'Pos( a_frs1516.hurfrc4 ));
      params( 3093 ) := "+"( Integer'Pos( a_frs1516.hurfrc5 ));
      params( 3094 ) := "+"( Integer'Pos( a_frs1516.hurfrc6 ));
      params( 3095 ) := "+"( Integer'Pos( a_frs1516.hurfrc7 ));
      params( 3096 ) := "+"( Integer'Pos( a_frs1516.hurfrc8 ));
      params( 3097 ) := "+"( Integer'Pos( a_frs1516.hurotc1 ));
      params( 3098 ) := "+"( Integer'Pos( a_frs1516.hurotc2 ));
      params( 3099 ) := "+"( Integer'Pos( a_frs1516.hurotc3 ));
      params( 3100 ) := "+"( Integer'Pos( a_frs1516.hurotc4 ));
      params( 3101 ) := "+"( Integer'Pos( a_frs1516.hurotc5 ));
      params( 3102 ) := "+"( Integer'Pos( a_frs1516.hurotc6 ));
      params( 3103 ) := "+"( Integer'Pos( a_frs1516.hurotc7 ));
      params( 3104 ) := "+"( Integer'Pos( a_frs1516.hurotc8 ));
      params( 3105 ) := "+"( Integer'Pos( a_frs1516.hurrec1 ));
      params( 3106 ) := "+"( Integer'Pos( a_frs1516.hurrec2 ));
      params( 3107 ) := "+"( Integer'Pos( a_frs1516.hurrec3 ));
      params( 3108 ) := "+"( Integer'Pos( a_frs1516.hurrec4 ));
      params( 3109 ) := "+"( Integer'Pos( a_frs1516.hurrec5 ));
      params( 3110 ) := "+"( Integer'Pos( a_frs1516.hurrec6 ));
      params( 3111 ) := "+"( Integer'Pos( a_frs1516.hurrec7 ));
      params( 3112 ) := "+"( Integer'Pos( a_frs1516.hurrec8 ));
      params( 3113 ) := "+"( Integer'Pos( a_frs1516.hpersc1 ));
      params( 3114 ) := "+"( Integer'Pos( a_frs1516.hpersc2 ));
      params( 3115 ) := "+"( Integer'Pos( a_frs1516.hpersc3 ));
      params( 3116 ) := "+"( Integer'Pos( a_frs1516.hpersc4 ));
      params( 3117 ) := "+"( Integer'Pos( a_frs1516.hpersc5 ));
      params( 3118 ) := "+"( Integer'Pos( a_frs1516.hpersc6 ));
      params( 3119 ) := "+"( Integer'Pos( a_frs1516.hpersc7 ));
      params( 3120 ) := "+"( Integer'Pos( a_frs1516.hpersc8 ));
      params( 3121 ) := "+"( Integer'Pos( a_frs1516.hrsedc1 ));
      params( 3122 ) := "+"( Integer'Pos( a_frs1516.hrsedc2 ));
      params( 3123 ) := "+"( Integer'Pos( a_frs1516.hrsedc3 ));
      params( 3124 ) := "+"( Integer'Pos( a_frs1516.hrsedc4 ));
      params( 3125 ) := "+"( Integer'Pos( a_frs1516.hrsedc5 ));
      params( 3126 ) := "+"( Integer'Pos( a_frs1516.hrsedc6 ));
      params( 3127 ) := "+"( Integer'Pos( a_frs1516.hrsedc7 ));
      params( 3128 ) := "+"( Integer'Pos( a_frs1516.hrsedc8 ));
      params( 3129 ) := "+"( Integer'Pos( a_frs1516.hsvprc1 ));
      params( 3130 ) := "+"( Integer'Pos( a_frs1516.hsvprc2 ));
      params( 3131 ) := "+"( Integer'Pos( a_frs1516.hsvprc3 ));
      params( 3132 ) := "+"( Integer'Pos( a_frs1516.hsvprc4 ));
      params( 3133 ) := "+"( Integer'Pos( a_frs1516.hsvprc5 ));
      params( 3134 ) := "+"( Integer'Pos( a_frs1516.hsvprc6 ));
      params( 3135 ) := "+"( Integer'Pos( a_frs1516.hsvprc7 ));
      params( 3136 ) := "+"( Integer'Pos( a_frs1516.hsvprc8 ));
      params( 3137 ) := "+"( Integer'Pos( a_frs1516.laregc1 ));
      params( 3138 ) := "+"( Integer'Pos( a_frs1516.laregc2 ));
      params( 3139 ) := "+"( Integer'Pos( a_frs1516.laregc3 ));
      params( 3140 ) := "+"( Integer'Pos( a_frs1516.laregc4 ));
      params( 3141 ) := "+"( Integer'Pos( a_frs1516.laregc5 ));
      params( 3142 ) := "+"( Integer'Pos( a_frs1516.laregc6 ));
      params( 3143 ) := "+"( Integer'Pos( a_frs1516.laregc7 ));
      params( 3144 ) := "+"( Integer'Pos( a_frs1516.laregc8 ));
      params( 3145 ) := "+"( Integer'Pos( a_frs1516.msc1 ));
      params( 3146 ) := "+"( Integer'Pos( a_frs1516.msc2 ));
      params( 3147 ) := "+"( Integer'Pos( a_frs1516.msc3 ));
      params( 3148 ) := "+"( Integer'Pos( a_frs1516.msc4 ));
      params( 3149 ) := "+"( Integer'Pos( a_frs1516.msc5 ));
      params( 3150 ) := "+"( Integer'Pos( a_frs1516.msc6 ));
      params( 3151 ) := "+"( Integer'Pos( a_frs1516.msc7 ));
      params( 3152 ) := "+"( Integer'Pos( a_frs1516.msc8 ));
      params( 3153 ) := "+"( Integer'Pos( a_frs1516.prsonc1 ));
      params( 3154 ) := "+"( Integer'Pos( a_frs1516.prsonc2 ));
      params( 3155 ) := "+"( Integer'Pos( a_frs1516.prsonc3 ));
      params( 3156 ) := "+"( Integer'Pos( a_frs1516.prsonc4 ));
      params( 3157 ) := "+"( Integer'Pos( a_frs1516.prsonc5 ));
      params( 3158 ) := "+"( Integer'Pos( a_frs1516.prsonc6 ));
      params( 3159 ) := "+"( Integer'Pos( a_frs1516.prsonc7 ));
      params( 3160 ) := "+"( Integer'Pos( a_frs1516.prsonc8 ));
      params( 3161 ) := "+"( Integer'Pos( a_frs1516.rlp1c1 ));
      params( 3162 ) := "+"( Integer'Pos( a_frs1516.rlp1c2 ));
      params( 3163 ) := "+"( Integer'Pos( a_frs1516.rlp1c3 ));
      params( 3164 ) := "+"( Integer'Pos( a_frs1516.rlp1c4 ));
      params( 3165 ) := "+"( Integer'Pos( a_frs1516.rlp1c5 ));
      params( 3166 ) := "+"( Integer'Pos( a_frs1516.rlp1c6 ));
      params( 3167 ) := "+"( Integer'Pos( a_frs1516.rlp1c7 ));
      params( 3168 ) := "+"( Integer'Pos( a_frs1516.rlp1c8 ));
      params( 3169 ) := "+"( Integer'Pos( a_frs1516.rlp2c1 ));
      params( 3170 ) := "+"( Integer'Pos( a_frs1516.rlp2c2 ));
      params( 3171 ) := "+"( Integer'Pos( a_frs1516.rlp2c3 ));
      params( 3172 ) := "+"( Integer'Pos( a_frs1516.rlp2c4 ));
      params( 3173 ) := "+"( Integer'Pos( a_frs1516.rlp2c5 ));
      params( 3174 ) := "+"( Integer'Pos( a_frs1516.rlp2c6 ));
      params( 3175 ) := "+"( Integer'Pos( a_frs1516.rlp2c7 ));
      params( 3176 ) := "+"( Integer'Pos( a_frs1516.rlp2c8 ));
      params( 3177 ) := "+"( Integer'Pos( a_frs1516.rlp3c1 ));
      params( 3178 ) := "+"( Integer'Pos( a_frs1516.rlp3c2 ));
      params( 3179 ) := "+"( Integer'Pos( a_frs1516.rlp3c3 ));
      params( 3180 ) := "+"( Integer'Pos( a_frs1516.rlp3c4 ));
      params( 3181 ) := "+"( Integer'Pos( a_frs1516.rlp3c5 ));
      params( 3182 ) := "+"( Integer'Pos( a_frs1516.rlp3c6 ));
      params( 3183 ) := "+"( Integer'Pos( a_frs1516.rlp3c7 ));
      params( 3184 ) := "+"( Integer'Pos( a_frs1516.rlp3c8 ));
      params( 3185 ) := "+"( Integer'Pos( a_frs1516.rlp4c1 ));
      params( 3186 ) := "+"( Integer'Pos( a_frs1516.rlp4c2 ));
      params( 3187 ) := "+"( Integer'Pos( a_frs1516.rlp4c3 ));
      params( 3188 ) := "+"( Integer'Pos( a_frs1516.rlp4c4 ));
      params( 3189 ) := "+"( Integer'Pos( a_frs1516.rlp4c5 ));
      params( 3190 ) := "+"( Integer'Pos( a_frs1516.rlp4c6 ));
      params( 3191 ) := "+"( Integer'Pos( a_frs1516.rlp4c7 ));
      params( 3192 ) := "+"( Integer'Pos( a_frs1516.rlp4c8 ));
      params( 3193 ) := "+"( Integer'Pos( a_frs1516.rlp5c1 ));
      params( 3194 ) := "+"( Integer'Pos( a_frs1516.rlp5c2 ));
      params( 3195 ) := "+"( Integer'Pos( a_frs1516.rlp5c3 ));
      params( 3196 ) := "+"( Integer'Pos( a_frs1516.rlp5c4 ));
      params( 3197 ) := "+"( Integer'Pos( a_frs1516.rlp5c5 ));
      params( 3198 ) := "+"( Integer'Pos( a_frs1516.rlp5c6 ));
      params( 3199 ) := "+"( Integer'Pos( a_frs1516.rlp5c7 ));
      params( 3200 ) := "+"( Integer'Pos( a_frs1516.rlp5c8 ));
      params( 3201 ) := "+"( Integer'Pos( a_frs1516.rlp6c1 ));
      params( 3202 ) := "+"( Integer'Pos( a_frs1516.rlp6c2 ));
      params( 3203 ) := "+"( Integer'Pos( a_frs1516.rlp6c3 ));
      params( 3204 ) := "+"( Integer'Pos( a_frs1516.rlp6c4 ));
      params( 3205 ) := "+"( Integer'Pos( a_frs1516.rlp6c5 ));
      params( 3206 ) := "+"( Integer'Pos( a_frs1516.rlp6c6 ));
      params( 3207 ) := "+"( Integer'Pos( a_frs1516.rlp6c7 ));
      params( 3208 ) := "+"( Integer'Pos( a_frs1516.rlp6c8 ));
      params( 3209 ) := "+"( Integer'Pos( a_frs1516.rlp7c1 ));
      params( 3210 ) := "+"( Integer'Pos( a_frs1516.rlp7c2 ));
      params( 3211 ) := "+"( Integer'Pos( a_frs1516.rlp7c3 ));
      params( 3212 ) := "+"( Integer'Pos( a_frs1516.rlp7c4 ));
      params( 3213 ) := "+"( Integer'Pos( a_frs1516.rlp7c5 ));
      params( 3214 ) := "+"( Integer'Pos( a_frs1516.rlp7c6 ));
      params( 3215 ) := "+"( Integer'Pos( a_frs1516.rlp7c7 ));
      params( 3216 ) := "+"( Integer'Pos( a_frs1516.rlp7c8 ));
      params( 3217 ) := "+"( Integer'Pos( a_frs1516.rlp8c1 ));
      params( 3218 ) := "+"( Integer'Pos( a_frs1516.rlp8c2 ));
      params( 3219 ) := "+"( Integer'Pos( a_frs1516.rlp8c3 ));
      params( 3220 ) := "+"( Integer'Pos( a_frs1516.rlp8c4 ));
      params( 3221 ) := "+"( Integer'Pos( a_frs1516.rlp8c5 ));
      params( 3222 ) := "+"( Integer'Pos( a_frs1516.rlp8c6 ));
      params( 3223 ) := "+"( Integer'Pos( a_frs1516.rlp8c7 ));
      params( 3224 ) := "+"( Integer'Pos( a_frs1516.rlp8c8 ));
      params( 3225 ) := "+"( Integer'Pos( a_frs1516.rlp9c1 ));
      params( 3226 ) := "+"( Integer'Pos( a_frs1516.rlp9c2 ));
      params( 3227 ) := "+"( Integer'Pos( a_frs1516.rlp9c3 ));
      params( 3228 ) := "+"( Integer'Pos( a_frs1516.rlp9c4 ));
      params( 3229 ) := "+"( Integer'Pos( a_frs1516.rlp9c5 ));
      params( 3230 ) := "+"( Integer'Pos( a_frs1516.rlp9c6 ));
      params( 3231 ) := "+"( Integer'Pos( a_frs1516.rlp9c7 ));
      params( 3232 ) := "+"( Integer'Pos( a_frs1516.rlp9c8 ));
      params( 3233 ) := "+"( Integer'Pos( a_frs1516.rlp10c1 ));
      params( 3234 ) := "+"( Integer'Pos( a_frs1516.rlp10c2 ));
      params( 3235 ) := "+"( Integer'Pos( a_frs1516.rlp10c3 ));
      params( 3236 ) := "+"( Integer'Pos( a_frs1516.rlp10c4 ));
      params( 3237 ) := "+"( Integer'Pos( a_frs1516.rlp10c5 ));
      params( 3238 ) := "+"( Integer'Pos( a_frs1516.rlp10c6 ));
      params( 3239 ) := "+"( Integer'Pos( a_frs1516.rlp10c7 ));
      params( 3240 ) := "+"( Integer'Pos( a_frs1516.rlp10c8 ));
      params( 3241 ) := "+"( Integer'Pos( a_frs1516.rlp11c1 ));
      params( 3242 ) := "+"( Integer'Pos( a_frs1516.rlp11c2 ));
      params( 3243 ) := "+"( Integer'Pos( a_frs1516.rlp11c3 ));
      params( 3244 ) := "+"( Integer'Pos( a_frs1516.rlp11c4 ));
      params( 3245 ) := "+"( Integer'Pos( a_frs1516.rlp11c5 ));
      params( 3246 ) := "+"( Integer'Pos( a_frs1516.rlp11c6 ));
      params( 3247 ) := "+"( Integer'Pos( a_frs1516.rlp11c7 ));
      params( 3248 ) := "+"( Integer'Pos( a_frs1516.rlp11c8 ));
      params( 3249 ) := "+"( Integer'Pos( a_frs1516.rlp12c1 ));
      params( 3250 ) := "+"( Integer'Pos( a_frs1516.rlp12c2 ));
      params( 3251 ) := "+"( Integer'Pos( a_frs1516.rlp12c3 ));
      params( 3252 ) := "+"( Integer'Pos( a_frs1516.rlp12c4 ));
      params( 3253 ) := "+"( Integer'Pos( a_frs1516.rlp12c5 ));
      params( 3254 ) := "+"( Integer'Pos( a_frs1516.rlp12c6 ));
      params( 3255 ) := "+"( Integer'Pos( a_frs1516.rlp12c7 ));
      params( 3256 ) := "+"( Integer'Pos( a_frs1516.rlp12c8 ));
      params( 3257 ) := "+"( Integer'Pos( a_frs1516.rlp13c1 ));
      params( 3258 ) := "+"( Integer'Pos( a_frs1516.rlp13c2 ));
      params( 3259 ) := "+"( Integer'Pos( a_frs1516.rlp13c3 ));
      params( 3260 ) := "+"( Integer'Pos( a_frs1516.rlp13c4 ));
      params( 3261 ) := "+"( Integer'Pos( a_frs1516.rlp13c5 ));
      params( 3262 ) := "+"( Integer'Pos( a_frs1516.rlp13c6 ));
      params( 3263 ) := "+"( Integer'Pos( a_frs1516.rlp13c7 ));
      params( 3264 ) := "+"( Integer'Pos( a_frs1516.rlp13c8 ));
      params( 3265 ) := "+"( Integer'Pos( a_frs1516.rlp14c1 ));
      params( 3266 ) := "+"( Integer'Pos( a_frs1516.rlp14c2 ));
      params( 3267 ) := "+"( Integer'Pos( a_frs1516.rlp14c3 ));
      params( 3268 ) := "+"( Integer'Pos( a_frs1516.rlp14c4 ));
      params( 3269 ) := "+"( Integer'Pos( a_frs1516.rlp14c5 ));
      params( 3270 ) := "+"( Integer'Pos( a_frs1516.rlp14c6 ));
      params( 3271 ) := "+"( Integer'Pos( a_frs1516.rlp14c7 ));
      params( 3272 ) := "+"( Integer'Pos( a_frs1516.rlp14c8 ));
      params( 3273 ) := "+"( Integer'Pos( a_frs1516.rhrpcc1 ));
      params( 3274 ) := "+"( Integer'Pos( a_frs1516.rhrpcc2 ));
      params( 3275 ) := "+"( Integer'Pos( a_frs1516.rhrpcc3 ));
      params( 3276 ) := "+"( Integer'Pos( a_frs1516.rhrpcc4 ));
      params( 3277 ) := "+"( Integer'Pos( a_frs1516.rhrpcc5 ));
      params( 3278 ) := "+"( Integer'Pos( a_frs1516.rhrpcc6 ));
      params( 3279 ) := "+"( Integer'Pos( a_frs1516.rhrpcc7 ));
      params( 3280 ) := "+"( Integer'Pos( a_frs1516.rhrpcc8 ));
      params( 3281 ) := "+"( Integer'Pos( a_frs1516.sbkitc1 ));
      params( 3282 ) := "+"( Integer'Pos( a_frs1516.sbkitc2 ));
      params( 3283 ) := "+"( Integer'Pos( a_frs1516.sbkitc3 ));
      params( 3284 ) := "+"( Integer'Pos( a_frs1516.sbkitc4 ));
      params( 3285 ) := "+"( Integer'Pos( a_frs1516.sbkitc5 ));
      params( 3286 ) := "+"( Integer'Pos( a_frs1516.sbkitc6 ));
      params( 3287 ) := "+"( Integer'Pos( a_frs1516.sbkitc7 ));
      params( 3288 ) := "+"( Integer'Pos( a_frs1516.sbkitc8 ));
      params( 3289 ) := "+"( Integer'Pos( a_frs1516.sexc1 ));
      params( 3290 ) := "+"( Integer'Pos( a_frs1516.sexc2 ));
      params( 3291 ) := "+"( Integer'Pos( a_frs1516.sexc3 ));
      params( 3292 ) := "+"( Integer'Pos( a_frs1516.sexc4 ));
      params( 3293 ) := "+"( Integer'Pos( a_frs1516.sexc5 ));
      params( 3294 ) := "+"( Integer'Pos( a_frs1516.sexc6 ));
      params( 3295 ) := "+"( Integer'Pos( a_frs1516.sexc7 ));
      params( 3296 ) := "+"( Integer'Pos( a_frs1516.sexc8 ));
      params( 3297 ) := "+"( Integer'Pos( a_frs1516.sfvitc1 ));
      params( 3298 ) := "+"( Integer'Pos( a_frs1516.sfvitc2 ));
      params( 3299 ) := "+"( Integer'Pos( a_frs1516.sfvitc3 ));
      params( 3300 ) := "+"( Integer'Pos( a_frs1516.sfvitc4 ));
      params( 3301 ) := "+"( Integer'Pos( a_frs1516.sfvitc5 ));
      params( 3302 ) := "+"( Integer'Pos( a_frs1516.sfvitc6 ));
      params( 3303 ) := "+"( Integer'Pos( a_frs1516.sfvitc7 ));
      params( 3304 ) := "+"( Integer'Pos( a_frs1516.sfvitc8 ));
      params( 3305 ) := "+"( Integer'Pos( a_frs1516.fmctsc1 ));
      params( 3306 ) := "+"( Integer'Pos( a_frs1516.fmctsc2 ));
      params( 3307 ) := "+"( Integer'Pos( a_frs1516.fmctsc3 ));
      params( 3308 ) := "+"( Integer'Pos( a_frs1516.fmctsc4 ));
      params( 3309 ) := "+"( Integer'Pos( a_frs1516.fmctsc5 ));
      params( 3310 ) := "+"( Integer'Pos( a_frs1516.fmctsc6 ));
      params( 3311 ) := "+"( Integer'Pos( a_frs1516.fmctsc7 ));
      params( 3312 ) := "+"( Integer'Pos( a_frs1516.fmctsc8 ));
      params( 3313 ) := "+"( Integer'Pos( a_frs1516.fmealc1 ));
      params( 3314 ) := "+"( Integer'Pos( a_frs1516.fmealc2 ));
      params( 3315 ) := "+"( Integer'Pos( a_frs1516.fmealc3 ));
      params( 3316 ) := "+"( Integer'Pos( a_frs1516.fmealc4 ));
      params( 3317 ) := "+"( Integer'Pos( a_frs1516.fmealc5 ));
      params( 3318 ) := "+"( Integer'Pos( a_frs1516.fmealc6 ));
      params( 3319 ) := "+"( Integer'Pos( a_frs1516.fmealc7 ));
      params( 3320 ) := "+"( Integer'Pos( a_frs1516.fmealc8 ));
      params( 3321 ) := "+"( Integer'Pos( a_frs1516.cblndc1 ));
      params( 3322 ) := "+"( Integer'Pos( a_frs1516.cblndc2 ));
      params( 3323 ) := "+"( Integer'Pos( a_frs1516.cblndc3 ));
      params( 3324 ) := "+"( Integer'Pos( a_frs1516.cblndc4 ));
      params( 3325 ) := "+"( Integer'Pos( a_frs1516.cblndc5 ));
      params( 3326 ) := "+"( Integer'Pos( a_frs1516.cblndc6 ));
      params( 3327 ) := "+"( Integer'Pos( a_frs1516.cblndc7 ));
      params( 3328 ) := "+"( Integer'Pos( a_frs1516.cblndc8 ));
      params( 3329 ) := "+"( Integer'Pos( a_frs1516.cparsc1 ));
      params( 3330 ) := "+"( Integer'Pos( a_frs1516.cparsc2 ));
      params( 3331 ) := "+"( Integer'Pos( a_frs1516.cparsc3 ));
      params( 3332 ) := "+"( Integer'Pos( a_frs1516.cparsc4 ));
      params( 3333 ) := "+"( Integer'Pos( a_frs1516.cparsc5 ));
      params( 3334 ) := "+"( Integer'Pos( a_frs1516.cparsc6 ));
      params( 3335 ) := "+"( Integer'Pos( a_frs1516.cparsc7 ));
      params( 3336 ) := "+"( Integer'Pos( a_frs1516.cparsc8 ));
      params( 3337 ) := "+"( Integer'Pos( a_frs1516.cdeafc1 ));
      params( 3338 ) := "+"( Integer'Pos( a_frs1516.cdeafc2 ));
      params( 3339 ) := "+"( Integer'Pos( a_frs1516.cdeafc3 ));
      params( 3340 ) := "+"( Integer'Pos( a_frs1516.cdeafc4 ));
      params( 3341 ) := "+"( Integer'Pos( a_frs1516.cdeafc5 ));
      params( 3342 ) := "+"( Integer'Pos( a_frs1516.cdeafc6 ));
      params( 3343 ) := "+"( Integer'Pos( a_frs1516.cdeafc7 ));
      params( 3344 ) := "+"( Integer'Pos( a_frs1516.cdeafc8 ));
      params( 3345 ) := "+"( Integer'Pos( a_frs1516.totgtc1 ));
      params( 3346 ) := "+"( Integer'Pos( a_frs1516.totgtc2 ));
      params( 3347 ) := "+"( Integer'Pos( a_frs1516.totgtc3 ));
      params( 3348 ) := "+"( Integer'Pos( a_frs1516.totgtc4 ));
      params( 3349 ) := "+"( Integer'Pos( a_frs1516.totgtc5 ));
      params( 3350 ) := "+"( Integer'Pos( a_frs1516.totgtc6 ));
      params( 3351 ) := "+"( Integer'Pos( a_frs1516.totgtc7 ));
      params( 3352 ) := "+"( Integer'Pos( a_frs1516.totgtc8 ));
      params( 3353 ) := "+"( Integer'Pos( a_frs1516.totsvc1 ));
      params( 3354 ) := "+"( Integer'Pos( a_frs1516.totsvc2 ));
      params( 3355 ) := "+"( Integer'Pos( a_frs1516.totsvc3 ));
      params( 3356 ) := "+"( Integer'Pos( a_frs1516.totsvc4 ));
      params( 3357 ) := "+"( Integer'Pos( a_frs1516.totsvc5 ));
      params( 3358 ) := "+"( Integer'Pos( a_frs1516.totsvc6 ));
      params( 3359 ) := "+"( Integer'Pos( a_frs1516.totsvc7 ));
      params( 3360 ) := "+"( Integer'Pos( a_frs1516.totsvc8 ));
      params( 3361 ) := "+"( Float( a_frs1516.tacamc1 ));
      params( 3362 ) := "+"( Float( a_frs1516.tacamc2 ));
      params( 3363 ) := "+"( Float( a_frs1516.tacamc3 ));
      params( 3364 ) := "+"( Float( a_frs1516.tacamc4 ));
      params( 3365 ) := "+"( Float( a_frs1516.tacamc5 ));
      params( 3366 ) := "+"( Float( a_frs1516.tacamc6 ));
      params( 3367 ) := "+"( Integer'Pos( a_frs1516.tacamc7 ));
      params( 3368 ) := "+"( Integer'Pos( a_frs1516.tacamc8 ));
      params( 3369 ) := "+"( Integer'Pos( a_frs1516.tpeedc1 ));
      params( 3370 ) := "+"( Integer'Pos( a_frs1516.tpeedc2 ));
      params( 3371 ) := "+"( Integer'Pos( a_frs1516.tpeedc3 ));
      params( 3372 ) := "+"( Integer'Pos( a_frs1516.tpeedc4 ));
      params( 3373 ) := "+"( Integer'Pos( a_frs1516.tpeedc5 ));
      params( 3374 ) := "+"( Integer'Pos( a_frs1516.tpeedc6 ));
      params( 3375 ) := "+"( Integer'Pos( a_frs1516.tpeedc7 ));
      params( 3376 ) := "+"( Integer'Pos( a_frs1516.tpeedc8 ));
      params( 3377 ) := "+"( Integer'Pos( a_frs1516.uprsoc1 ));
      params( 3378 ) := "+"( Integer'Pos( a_frs1516.uprsoc2 ));
      params( 3379 ) := "+"( Integer'Pos( a_frs1516.uprsoc3 ));
      params( 3380 ) := "+"( Integer'Pos( a_frs1516.uprsoc4 ));
      params( 3381 ) := "+"( Integer'Pos( a_frs1516.uprsoc5 ));
      params( 3382 ) := "+"( Integer'Pos( a_frs1516.uprsoc6 ));
      params( 3383 ) := "+"( Integer'Pos( a_frs1516.uprsoc7 ));
      params( 3384 ) := "+"( Integer'Pos( a_frs1516.uprsoc8 ));
      params( 3385 ) := "+"( Integer'Pos( a_frs1516.govpy1hd ));
      params( 3386 ) := "+"( Integer'Pos( a_frs1516.govpy2hd ));
      params( 3387 ) := "+"( Integer'Pos( a_frs1516.govpy3hd ));
      params( 3388 ) := "+"( Integer'Pos( a_frs1516.govpy4hd ));
      params( 3389 ) := "+"( Integer'Pos( a_frs1516.govpy5hd ));
      params( 3390 ) := "+"( Integer'Pos( a_frs1516.govpy6hd ));
      params( 3391 ) := "+"( Integer'Pos( a_frs1516.govpy7hd ));
      params( 3392 ) := "+"( Integer'Pos( a_frs1516.govpy8hd ));
      params( 3393 ) := "+"( Integer'Pos( a_frs1516.govpy9hd ));
      params( 3394 ) := "+"( Integer'Pos( a_frs1516.gvpy10hd ));
      params( 3395 ) := "+"( Integer'Pos( a_frs1516.gvpy11hd ));
      params( 3396 ) := "+"( Integer'Pos( a_frs1516.govpy1sp ));
      params( 3397 ) := "+"( Integer'Pos( a_frs1516.govpy2sp ));
      params( 3398 ) := "+"( Integer'Pos( a_frs1516.govpy3sp ));
      params( 3399 ) := "+"( Integer'Pos( a_frs1516.govpy4sp ));
      params( 3400 ) := "+"( Integer'Pos( a_frs1516.govpy5sp ));
      params( 3401 ) := "+"( Integer'Pos( a_frs1516.govpy6sp ));
      params( 3402 ) := "+"( Integer'Pos( a_frs1516.govpy7sp ));
      params( 3403 ) := "+"( Integer'Pos( a_frs1516.govpy8sp ));
      params( 3404 ) := "+"( Integer'Pos( a_frs1516.govpy9sp ));
      params( 3405 ) := "+"( Integer'Pos( a_frs1516.gvpy10sp ));
      params( 3406 ) := "+"( Integer'Pos( a_frs1516.gvpy11sp ));
      params( 3407 ) := "+"( Float( a_frs1516.nhhamt1 ));
      params( 3408 ) := "+"( Float( a_frs1516.nhhamt2 ));
      params( 3409 ) := "+"( Float( a_frs1516.nhhamt3 ));
      params( 3410 ) := "+"( Float( a_frs1516.nhhamt4 ));
      params( 3411 ) := "+"( Integer'Pos( a_frs1516.nhhfee1 ));
      params( 3412 ) := "+"( Integer'Pos( a_frs1516.nhhfee2 ));
      params( 3413 ) := "+"( Integer'Pos( a_frs1516.nhhfee3 ));
      params( 3414 ) := "+"( Integer'Pos( a_frs1516.nhhfee4 ));
      params( 3415 ) := "+"( Integer'Pos( a_frs1516.pnhhamt1 ));
      params( 3416 ) := "+"( Integer'Pos( a_frs1516.pnhhamt2 ));
      params( 3417 ) := "+"( Integer'Pos( a_frs1516.pnhhamt3 ));
      params( 3418 ) := "+"( Integer'Pos( a_frs1516.pnhhamt4 ));
      params( 3419 ) := "+"( Float( a_frs1516.bona11hd ));
      params( 3420 ) := "+"( Integer'Pos( a_frs1516.bona12hd ));
      params( 3421 ) := "+"( Integer'Pos( a_frs1516.bona13hd ));
      params( 3422 ) := "+"( Float( a_frs1516.bona11sp ));
      params( 3423 ) := "+"( Integer'Pos( a_frs1516.bona12sp ));
      params( 3424 ) := "+"( Integer'Pos( a_frs1516.bona13sp ));
      params( 3425 ) := "+"( Float( a_frs1516.bona21hd ));
      params( 3426 ) := "+"( Integer'Pos( a_frs1516.bona22hd ));
      params( 3427 ) := "+"( Integer'Pos( a_frs1516.bona23hd ));
      params( 3428 ) := "+"( Integer'Pos( a_frs1516.bona21sp ));
      params( 3429 ) := "+"( Integer'Pos( a_frs1516.bona22sp ));
      params( 3430 ) := "+"( Integer'Pos( a_frs1516.bona23sp ));
      params( 3431 ) := "+"( Float( a_frs1516.bona31hd ));
      params( 3432 ) := "+"( Integer'Pos( a_frs1516.bona32hd ));
      params( 3433 ) := "+"( Integer'Pos( a_frs1516.bona33hd ));
      params( 3434 ) := "+"( Integer'Pos( a_frs1516.bona31sp ));
      params( 3435 ) := "+"( Integer'Pos( a_frs1516.bona32sp ));
      params( 3436 ) := "+"( Integer'Pos( a_frs1516.bona33sp ));
      params( 3437 ) := "+"( Float( a_frs1516.bona41hd ));
      params( 3438 ) := "+"( Integer'Pos( a_frs1516.bona42hd ));
      params( 3439 ) := "+"( Integer'Pos( a_frs1516.bona43hd ));
      params( 3440 ) := "+"( Integer'Pos( a_frs1516.bona41sp ));
      params( 3441 ) := "+"( Integer'Pos( a_frs1516.bona42sp ));
      params( 3442 ) := "+"( Integer'Pos( a_frs1516.bona43sp ));
      params( 3443 ) := "+"( Float( a_frs1516.bona51hd ));
      params( 3444 ) := "+"( Integer'Pos( a_frs1516.bona52hd ));
      params( 3445 ) := "+"( Integer'Pos( a_frs1516.bona53hd ));
      params( 3446 ) := "+"( Integer'Pos( a_frs1516.bona51sp ));
      params( 3447 ) := "+"( Integer'Pos( a_frs1516.bona52sp ));
      params( 3448 ) := "+"( Integer'Pos( a_frs1516.bona53sp ));
      params( 3449 ) := "+"( Float( a_frs1516.bona61hd ));
      params( 3450 ) := "+"( Integer'Pos( a_frs1516.bona62hd ));
      params( 3451 ) := "+"( Integer'Pos( a_frs1516.bona63hd ));
      params( 3452 ) := "+"( Integer'Pos( a_frs1516.bona61sp ));
      params( 3453 ) := "+"( Integer'Pos( a_frs1516.bona62sp ));
      params( 3454 ) := "+"( Integer'Pos( a_frs1516.bona63sp ));
      params( 3455 ) := "+"( Integer'Pos( a_frs1516.bont11hd ));
      params( 3456 ) := "+"( Integer'Pos( a_frs1516.bont12hd ));
      params( 3457 ) := "+"( Integer'Pos( a_frs1516.bont13hd ));
      params( 3458 ) := "+"( Integer'Pos( a_frs1516.bont11sp ));
      params( 3459 ) := "+"( Integer'Pos( a_frs1516.bont12sp ));
      params( 3460 ) := "+"( Integer'Pos( a_frs1516.bont13sp ));
      params( 3461 ) := "+"( Integer'Pos( a_frs1516.bont21hd ));
      params( 3462 ) := "+"( Integer'Pos( a_frs1516.bont22hd ));
      params( 3463 ) := "+"( Integer'Pos( a_frs1516.bont23hd ));
      params( 3464 ) := "+"( Integer'Pos( a_frs1516.bont21sp ));
      params( 3465 ) := "+"( Integer'Pos( a_frs1516.bont22sp ));
      params( 3466 ) := "+"( Integer'Pos( a_frs1516.bont23sp ));
      params( 3467 ) := "+"( Integer'Pos( a_frs1516.bont31hd ));
      params( 3468 ) := "+"( Integer'Pos( a_frs1516.bont32hd ));
      params( 3469 ) := "+"( Integer'Pos( a_frs1516.bont33hd ));
      params( 3470 ) := "+"( Integer'Pos( a_frs1516.bont31sp ));
      params( 3471 ) := "+"( Integer'Pos( a_frs1516.bont32sp ));
      params( 3472 ) := "+"( Integer'Pos( a_frs1516.bont33sp ));
      params( 3473 ) := "+"( Integer'Pos( a_frs1516.bont41hd ));
      params( 3474 ) := "+"( Integer'Pos( a_frs1516.bont42hd ));
      params( 3475 ) := "+"( Integer'Pos( a_frs1516.bont43hd ));
      params( 3476 ) := "+"( Integer'Pos( a_frs1516.bont41sp ));
      params( 3477 ) := "+"( Integer'Pos( a_frs1516.bont42sp ));
      params( 3478 ) := "+"( Integer'Pos( a_frs1516.bont43sp ));
      params( 3479 ) := "+"( Integer'Pos( a_frs1516.bont51hd ));
      params( 3480 ) := "+"( Integer'Pos( a_frs1516.bont52hd ));
      params( 3481 ) := "+"( Integer'Pos( a_frs1516.bont53hd ));
      params( 3482 ) := "+"( Integer'Pos( a_frs1516.bont51sp ));
      params( 3483 ) := "+"( Integer'Pos( a_frs1516.bont52sp ));
      params( 3484 ) := "+"( Integer'Pos( a_frs1516.bont53sp ));
      params( 3485 ) := "+"( Integer'Pos( a_frs1516.bont61hd ));
      params( 3486 ) := "+"( Integer'Pos( a_frs1516.bont62hd ));
      params( 3487 ) := "+"( Integer'Pos( a_frs1516.bont63hd ));
      params( 3488 ) := "+"( Integer'Pos( a_frs1516.bont61sp ));
      params( 3489 ) := "+"( Integer'Pos( a_frs1516.bont62sp ));
      params( 3490 ) := "+"( Integer'Pos( a_frs1516.bont63sp ));
      params( 3491 ) := "+"( Float( a_frs1516.btax11hd ));
      params( 3492 ) := "+"( Float( a_frs1516.btax12hd ));
      params( 3493 ) := "+"( Integer'Pos( a_frs1516.btax13hd ));
      params( 3494 ) := "+"( Float( a_frs1516.btax11sp ));
      params( 3495 ) := "+"( Integer'Pos( a_frs1516.btax12sp ));
      params( 3496 ) := "+"( Integer'Pos( a_frs1516.btax13sp ));
      params( 3497 ) := "+"( Float( a_frs1516.btax21hd ));
      params( 3498 ) := "+"( Integer'Pos( a_frs1516.btax22hd ));
      params( 3499 ) := "+"( Integer'Pos( a_frs1516.btax23hd ));
      params( 3500 ) := "+"( Float( a_frs1516.btax21sp ));
      params( 3501 ) := "+"( Integer'Pos( a_frs1516.btax22sp ));
      params( 3502 ) := "+"( Integer'Pos( a_frs1516.btax23sp ));
      params( 3503 ) := "+"( Float( a_frs1516.btax31hd ));
      params( 3504 ) := "+"( Integer'Pos( a_frs1516.btax32hd ));
      params( 3505 ) := "+"( Integer'Pos( a_frs1516.btax33hd ));
      params( 3506 ) := "+"( Float( a_frs1516.btax31sp ));
      params( 3507 ) := "+"( Integer'Pos( a_frs1516.btax32sp ));
      params( 3508 ) := "+"( Integer'Pos( a_frs1516.btax33sp ));
      params( 3509 ) := "+"( Float( a_frs1516.btax41hd ));
      params( 3510 ) := "+"( Integer'Pos( a_frs1516.btax42hd ));
      params( 3511 ) := "+"( Integer'Pos( a_frs1516.btax43hd ));
      params( 3512 ) := "+"( Float( a_frs1516.btax41sp ));
      params( 3513 ) := "+"( Integer'Pos( a_frs1516.btax42sp ));
      params( 3514 ) := "+"( Integer'Pos( a_frs1516.btax43sp ));
      params( 3515 ) := "+"( Float( a_frs1516.btax51hd ));
      params( 3516 ) := "+"( Integer'Pos( a_frs1516.btax52hd ));
      params( 3517 ) := "+"( Integer'Pos( a_frs1516.btax53hd ));
      params( 3518 ) := "+"( Float( a_frs1516.btax51sp ));
      params( 3519 ) := "+"( Integer'Pos( a_frs1516.btax52sp ));
      params( 3520 ) := "+"( Integer'Pos( a_frs1516.btax53sp ));
      params( 3521 ) := "+"( Float( a_frs1516.btax61hd ));
      params( 3522 ) := "+"( Integer'Pos( a_frs1516.btax62hd ));
      params( 3523 ) := "+"( Integer'Pos( a_frs1516.btax63hd ));
      params( 3524 ) := "+"( Integer'Pos( a_frs1516.btax61sp ));
      params( 3525 ) := "+"( Integer'Pos( a_frs1516.btax62sp ));
      params( 3526 ) := "+"( Integer'Pos( a_frs1516.btax63sp ));
      params( 3527 ) := "+"( Integer'Pos( a_frs1516.busac1hd ));
      params( 3528 ) := "+"( Integer'Pos( a_frs1516.busac2hd ));
      params( 3529 ) := "+"( Integer'Pos( a_frs1516.busac3hd ));
      params( 3530 ) := "+"( Integer'Pos( a_frs1516.busac1sp ));
      params( 3531 ) := "+"( Integer'Pos( a_frs1516.busac2sp ));
      params( 3532 ) := "+"( Integer'Pos( a_frs1516.busac3sp ));
      params( 3533 ) := "+"( Float( a_frs1516.caram1hd ));
      params( 3534 ) := "+"( Integer'Pos( a_frs1516.caram2hd ));
      params( 3535 ) := "+"( Integer'Pos( a_frs1516.caram3hd ));
      params( 3536 ) := "+"( Float( a_frs1516.caram1sp ));
      params( 3537 ) := "+"( Integer'Pos( a_frs1516.caram2sp ));
      params( 3538 ) := "+"( Integer'Pos( a_frs1516.caram3sp ));
      params( 3539 ) := "+"( Integer'Pos( a_frs1516.carcn1hd ));
      params( 3540 ) := "+"( Integer'Pos( a_frs1516.carcn2hd ));
      params( 3541 ) := "+"( Integer'Pos( a_frs1516.carcn3hd ));
      params( 3542 ) := "+"( Integer'Pos( a_frs1516.carcn1sp ));
      params( 3543 ) := "+"( Integer'Pos( a_frs1516.carcn2sp ));
      params( 3544 ) := "+"( Integer'Pos( a_frs1516.carcn3sp ));
      params( 3545 ) := "+"( Integer'Pos( a_frs1516.carvl1hd ));
      params( 3546 ) := "+"( Integer'Pos( a_frs1516.carvl2hd ));
      params( 3547 ) := "+"( Integer'Pos( a_frs1516.carvl3hd ));
      params( 3548 ) := "+"( Integer'Pos( a_frs1516.carvl1sp ));
      params( 3549 ) := "+"( Integer'Pos( a_frs1516.carvl2sp ));
      params( 3550 ) := "+"( Integer'Pos( a_frs1516.carvl3sp ));
      params( 3551 ) := "+"( Integer'Pos( a_frs1516.chktx1hd ));
      params( 3552 ) := "+"( Integer'Pos( a_frs1516.chktx2hd ));
      params( 3553 ) := "+"( Integer'Pos( a_frs1516.chktx3hd ));
      params( 3554 ) := "+"( Integer'Pos( a_frs1516.chktx1sp ));
      params( 3555 ) := "+"( Integer'Pos( a_frs1516.chktx2sp ));
      params( 3556 ) := "+"( Integer'Pos( a_frs1516.chktx3sp ));
      params( 3557 ) := "+"( Integer'Pos( a_frs1516.chcom1hd ));
      params( 3558 ) := "+"( Integer'Pos( a_frs1516.chcom2hd ));
      params( 3559 ) := "+"( Integer'Pos( a_frs1516.chcom3hd ));
      params( 3560 ) := "+"( Integer'Pos( a_frs1516.chcom1sp ));
      params( 3561 ) := "+"( Integer'Pos( a_frs1516.chcom2sp ));
      params( 3562 ) := "+"( Integer'Pos( a_frs1516.chcom3sp ));
      params( 3563 ) := "+"( Float( a_frs1516.chvam1hd ));
      params( 3564 ) := "+"( Integer'Pos( a_frs1516.chvam2hd ));
      params( 3565 ) := "+"( Integer'Pos( a_frs1516.chvam3hd ));
      params( 3566 ) := "+"( Float( a_frs1516.chvam1sp ));
      params( 3567 ) := "+"( Float( a_frs1516.chvam2sp ));
      params( 3568 ) := "+"( Integer'Pos( a_frs1516.chvam3sp ));
      params( 3569 ) := "+"( Integer'Pos( a_frs1516.chvpd1hd ));
      params( 3570 ) := "+"( Integer'Pos( a_frs1516.chvpd2hd ));
      params( 3571 ) := "+"( Integer'Pos( a_frs1516.chvpd3hd ));
      params( 3572 ) := "+"( Integer'Pos( a_frs1516.chvpd1sp ));
      params( 3573 ) := "+"( Integer'Pos( a_frs1516.chvpd2sp ));
      params( 3574 ) := "+"( Integer'Pos( a_frs1516.chvpd3sp ));
      params( 3575 ) := "+"( Integer'Pos( a_frs1516.chsac1hd ));
      params( 3576 ) := "+"( Integer'Pos( a_frs1516.chsac2hd ));
      params( 3577 ) := "+"( Integer'Pos( a_frs1516.chsac3hd ));
      params( 3578 ) := "+"( Integer'Pos( a_frs1516.chsac1sp ));
      params( 3579 ) := "+"( Integer'Pos( a_frs1516.chsac2sp ));
      params( 3580 ) := "+"( Integer'Pos( a_frs1516.chsac3sp ));
      params( 3581 ) := "+"( Integer'Pos( a_frs1516.chuam1hd ));
      params( 3582 ) := "+"( Integer'Pos( a_frs1516.chuam2hd ));
      params( 3583 ) := "+"( Integer'Pos( a_frs1516.chuam3hd ));
      params( 3584 ) := "+"( Integer'Pos( a_frs1516.chuam1sp ));
      params( 3585 ) := "+"( Integer'Pos( a_frs1516.chuam2sp ));
      params( 3586 ) := "+"( Integer'Pos( a_frs1516.chuam3sp ));
      params( 3587 ) := "+"( Integer'Pos( a_frs1516.chupd1hd ));
      params( 3588 ) := "+"( Integer'Pos( a_frs1516.chupd2hd ));
      params( 3589 ) := "+"( Integer'Pos( a_frs1516.chupd3hd ));
      params( 3590 ) := "+"( Integer'Pos( a_frs1516.chupd1sp ));
      params( 3591 ) := "+"( Integer'Pos( a_frs1516.chupd2sp ));
      params( 3592 ) := "+"( Integer'Pos( a_frs1516.chupd3sp ));
      params( 3593 ) := "+"( Integer'Pos( a_frs1516.chusu1hd ));
      params( 3594 ) := "+"( Integer'Pos( a_frs1516.chusu2hd ));
      params( 3595 ) := "+"( Integer'Pos( a_frs1516.chusu3hd ));
      params( 3596 ) := "+"( Integer'Pos( a_frs1516.chusu1sp ));
      params( 3597 ) := "+"( Integer'Pos( a_frs1516.chusu2sp ));
      params( 3598 ) := "+"( Integer'Pos( a_frs1516.chusu3sp ));
      params( 3599 ) := "+"( Float( a_frs1516.doth1hd ));
      params( 3600 ) := "+"( Float( a_frs1516.doth2hd ));
      params( 3601 ) := "+"( Integer'Pos( a_frs1516.doth3hd ));
      params( 3602 ) := "+"( Float( a_frs1516.doth1sp ));
      params( 3603 ) := "+"( Integer'Pos( a_frs1516.doth2sp ));
      params( 3604 ) := "+"( Integer'Pos( a_frs1516.doth3sp ));
      params( 3605 ) := "+"( Float( a_frs1516.dpen1hd ));
      params( 3606 ) := "+"( Float( a_frs1516.dpen2hd ));
      params( 3607 ) := "+"( Integer'Pos( a_frs1516.dpen3hd ));
      params( 3608 ) := "+"( Float( a_frs1516.dpen1sp ));
      params( 3609 ) := "+"( Float( a_frs1516.dpen2sp ));
      params( 3610 ) := "+"( Integer'Pos( a_frs1516.dpen3sp ));
      params( 3611 ) := "+"( Float( a_frs1516.davc1hd ));
      params( 3612 ) := "+"( Integer'Pos( a_frs1516.davc2hd ));
      params( 3613 ) := "+"( Integer'Pos( a_frs1516.davc3hd ));
      params( 3614 ) := "+"( Float( a_frs1516.davc1sp ));
      params( 3615 ) := "+"( Integer'Pos( a_frs1516.davc2sp ));
      params( 3616 ) := "+"( Integer'Pos( a_frs1516.davc3sp ));
      params( 3617 ) := "+"( Float( a_frs1516.dtuf1hd ));
      params( 3618 ) := "+"( Float( a_frs1516.dtuf2hd ));
      params( 3619 ) := "+"( Integer'Pos( a_frs1516.dtuf3hd ));
      params( 3620 ) := "+"( Float( a_frs1516.dtuf1sp ));
      params( 3621 ) := "+"( Float( a_frs1516.dtuf2sp ));
      params( 3622 ) := "+"( Integer'Pos( a_frs1516.dtuf3sp ));
      params( 3623 ) := "+"( Float( a_frs1516.dfrso1hd ));
      params( 3624 ) := "+"( Integer'Pos( a_frs1516.dfrso2hd ));
      params( 3625 ) := "+"( Integer'Pos( a_frs1516.dfrso3hd ));
      params( 3626 ) := "+"( Float( a_frs1516.dfrso1sp ));
      params( 3627 ) := "+"( Integer'Pos( a_frs1516.dfrso2sp ));
      params( 3628 ) := "+"( Integer'Pos( a_frs1516.dfrso3sp ));
      params( 3629 ) := "+"( Float( a_frs1516.dspor1hd ));
      params( 3630 ) := "+"( Integer'Pos( a_frs1516.dspor2hd ));
      params( 3631 ) := "+"( Integer'Pos( a_frs1516.dspor3hd ));
      params( 3632 ) := "+"( Float( a_frs1516.dspor1sp ));
      params( 3633 ) := "+"( Integer'Pos( a_frs1516.dspor2sp ));
      params( 3634 ) := "+"( Integer'Pos( a_frs1516.dspor3sp ));
      params( 3635 ) := "+"( Float( a_frs1516.drepl1hd ));
      params( 3636 ) := "+"( Integer'Pos( a_frs1516.drepl2hd ));
      params( 3637 ) := "+"( Integer'Pos( a_frs1516.drepl3hd ));
      params( 3638 ) := "+"( Float( a_frs1516.drepl1sp ));
      params( 3639 ) := "+"( Integer'Pos( a_frs1516.drepl2sp ));
      params( 3640 ) := "+"( Integer'Pos( a_frs1516.drepl3sp ));
      params( 3641 ) := "+"( Float( a_frs1516.dmed1hd ));
      params( 3642 ) := "+"( Integer'Pos( a_frs1516.dmed2hd ));
      params( 3643 ) := "+"( Integer'Pos( a_frs1516.dmed3hd ));
      params( 3644 ) := "+"( Float( a_frs1516.dmed1sp ));
      params( 3645 ) := "+"( Integer'Pos( a_frs1516.dmed2sp ));
      params( 3646 ) := "+"( Integer'Pos( a_frs1516.dmed3sp ));
      params( 3647 ) := "+"( Float( a_frs1516.dchar1hd ));
      params( 3648 ) := "+"( Float( a_frs1516.dchar2hd ));
      params( 3649 ) := "+"( Integer'Pos( a_frs1516.dchar3hd ));
      params( 3650 ) := "+"( Float( a_frs1516.dchar1sp ));
      params( 3651 ) := "+"( Integer'Pos( a_frs1516.dchar2sp ));
      params( 3652 ) := "+"( Integer'Pos( a_frs1516.dchar3sp ));
      params( 3653 ) := "+"( Float( a_frs1516.dslrp1hd ));
      params( 3654 ) := "+"( Integer'Pos( a_frs1516.dslrp2hd ));
      params( 3655 ) := "+"( Integer'Pos( a_frs1516.dslrp3hd ));
      params( 3656 ) := "+"( Float( a_frs1516.dslrp1sp ));
      params( 3657 ) := "+"( Integer'Pos( a_frs1516.dslrp2sp ));
      params( 3658 ) := "+"( Integer'Pos( a_frs1516.dslrp3sp ));
      params( 3659 ) := "+"( Integer'Pos( a_frs1516.dirni1hd ));
      params( 3660 ) := "+"( Integer'Pos( a_frs1516.dirni2hd ));
      params( 3661 ) := "+"( Integer'Pos( a_frs1516.dirni3hd ));
      params( 3662 ) := "+"( Integer'Pos( a_frs1516.dirni1sp ));
      params( 3663 ) := "+"( Integer'Pos( a_frs1516.dirni2sp ));
      params( 3664 ) := "+"( Integer'Pos( a_frs1516.dirni3sp ));
      params( 3665 ) := "+"( Integer'Pos( a_frs1516.totov1hd ));
      params( 3666 ) := "+"( Integer'Pos( a_frs1516.totov2hd ));
      params( 3667 ) := "+"( Integer'Pos( a_frs1516.totov3hd ));
      params( 3668 ) := "+"( Integer'Pos( a_frs1516.totov1sp ));
      params( 3669 ) := "+"( Integer'Pos( a_frs1516.totov2sp ));
      params( 3670 ) := "+"( Integer'Pos( a_frs1516.totov3sp ));
      params( 3671 ) := "+"( Float( a_frs1516.dvuhr1hd ));
      params( 3672 ) := "+"( Float( a_frs1516.dvuhr2hd ));
      params( 3673 ) := "+"( Float( a_frs1516.dvuhr3hd ));
      params( 3674 ) := "+"( Float( a_frs1516.dvuhr1sp ));
      params( 3675 ) := "+"( Float( a_frs1516.dvuhr2sp ));
      params( 3676 ) := "+"( Integer'Pos( a_frs1516.dvuhr3sp ));
      params( 3677 ) := "+"( Integer'Pos( a_frs1516.empan1hd ));
      params( 3678 ) := "+"( Integer'Pos( a_frs1516.empan2hd ));
      params( 3679 ) := "+"( Integer'Pos( a_frs1516.empan3hd ));
      params( 3680 ) := "+"( Integer'Pos( a_frs1516.empan1sp ));
      params( 3681 ) := "+"( Integer'Pos( a_frs1516.empan2sp ));
      params( 3682 ) := "+"( Integer'Pos( a_frs1516.empan3sp ));
      params( 3683 ) := "+"( Integer'Pos( a_frs1516.empen1hd ));
      params( 3684 ) := "+"( Integer'Pos( a_frs1516.empen2hd ));
      params( 3685 ) := "+"( Integer'Pos( a_frs1516.empen3hd ));
      params( 3686 ) := "+"( Integer'Pos( a_frs1516.empen1sp ));
      params( 3687 ) := "+"( Integer'Pos( a_frs1516.empen2sp ));
      params( 3688 ) := "+"( Integer'Pos( a_frs1516.empen3sp ));
      params( 3689 ) := "+"( Integer'Pos( a_frs1516.etype1hd ));
      params( 3690 ) := "+"( Integer'Pos( a_frs1516.etype2hd ));
      params( 3691 ) := "+"( Integer'Pos( a_frs1516.etype3hd ));
      params( 3692 ) := "+"( Integer'Pos( a_frs1516.etype1sp ));
      params( 3693 ) := "+"( Integer'Pos( a_frs1516.etype2sp ));
      params( 3694 ) := "+"( Integer'Pos( a_frs1516.etype3sp ));
      params( 3695 ) := "+"( Integer'Pos( a_frs1516.evrot1hd ));
      params( 3696 ) := "+"( Integer'Pos( a_frs1516.evrot2hd ));
      params( 3697 ) := "+"( Integer'Pos( a_frs1516.evrot3hd ));
      params( 3698 ) := "+"( Integer'Pos( a_frs1516.evrot1sp ));
      params( 3699 ) := "+"( Integer'Pos( a_frs1516.evrot2sp ));
      params( 3700 ) := "+"( Integer'Pos( a_frs1516.evrot3sp ));
      params( 3701 ) := "+"( Integer'Pos( a_frs1516.exb011hd ));
      params( 3702 ) := "+"( Integer'Pos( a_frs1516.exb012hd ));
      params( 3703 ) := "+"( Integer'Pos( a_frs1516.exb013hd ));
      params( 3704 ) := "+"( Integer'Pos( a_frs1516.exb011sp ));
      params( 3705 ) := "+"( Integer'Pos( a_frs1516.exb012sp ));
      params( 3706 ) := "+"( Integer'Pos( a_frs1516.exb013sp ));
      params( 3707 ) := "+"( Integer'Pos( a_frs1516.exb021hd ));
      params( 3708 ) := "+"( Integer'Pos( a_frs1516.exb022hd ));
      params( 3709 ) := "+"( Integer'Pos( a_frs1516.exb023hd ));
      params( 3710 ) := "+"( Integer'Pos( a_frs1516.exb021sp ));
      params( 3711 ) := "+"( Integer'Pos( a_frs1516.exb022sp ));
      params( 3712 ) := "+"( Integer'Pos( a_frs1516.exb023sp ));
      params( 3713 ) := "+"( Integer'Pos( a_frs1516.exb031hd ));
      params( 3714 ) := "+"( Integer'Pos( a_frs1516.exb032hd ));
      params( 3715 ) := "+"( Integer'Pos( a_frs1516.exb033hd ));
      params( 3716 ) := "+"( Integer'Pos( a_frs1516.exb031sp ));
      params( 3717 ) := "+"( Integer'Pos( a_frs1516.exb032sp ));
      params( 3718 ) := "+"( Integer'Pos( a_frs1516.exb033sp ));
      params( 3719 ) := "+"( Integer'Pos( a_frs1516.exb041hd ));
      params( 3720 ) := "+"( Integer'Pos( a_frs1516.exb042hd ));
      params( 3721 ) := "+"( Integer'Pos( a_frs1516.exb043hd ));
      params( 3722 ) := "+"( Integer'Pos( a_frs1516.exb041sp ));
      params( 3723 ) := "+"( Integer'Pos( a_frs1516.exb042sp ));
      params( 3724 ) := "+"( Integer'Pos( a_frs1516.exb043sp ));
      params( 3725 ) := "+"( Integer'Pos( a_frs1516.exb051hd ));
      params( 3726 ) := "+"( Integer'Pos( a_frs1516.exb052hd ));
      params( 3727 ) := "+"( Integer'Pos( a_frs1516.exb053hd ));
      params( 3728 ) := "+"( Integer'Pos( a_frs1516.exb051sp ));
      params( 3729 ) := "+"( Integer'Pos( a_frs1516.exb052sp ));
      params( 3730 ) := "+"( Integer'Pos( a_frs1516.exb053sp ));
      params( 3731 ) := "+"( Integer'Pos( a_frs1516.exb061hd ));
      params( 3732 ) := "+"( Integer'Pos( a_frs1516.exb062hd ));
      params( 3733 ) := "+"( Integer'Pos( a_frs1516.exb063hd ));
      params( 3734 ) := "+"( Integer'Pos( a_frs1516.exb061sp ));
      params( 3735 ) := "+"( Integer'Pos( a_frs1516.exb062sp ));
      params( 3736 ) := "+"( Integer'Pos( a_frs1516.exb063sp ));
      params( 3737 ) := "+"( Integer'Pos( a_frs1516.exb071hd ));
      params( 3738 ) := "+"( Integer'Pos( a_frs1516.exb072hd ));
      params( 3739 ) := "+"( Integer'Pos( a_frs1516.exb073hd ));
      params( 3740 ) := "+"( Integer'Pos( a_frs1516.exb071sp ));
      params( 3741 ) := "+"( Integer'Pos( a_frs1516.exb072sp ));
      params( 3742 ) := "+"( Integer'Pos( a_frs1516.exb073sp ));
      params( 3743 ) := "+"( Integer'Pos( a_frs1516.exb081hd ));
      params( 3744 ) := "+"( Integer'Pos( a_frs1516.exb082hd ));
      params( 3745 ) := "+"( Integer'Pos( a_frs1516.exb083hd ));
      params( 3746 ) := "+"( Integer'Pos( a_frs1516.exb081sp ));
      params( 3747 ) := "+"( Integer'Pos( a_frs1516.exb082sp ));
      params( 3748 ) := "+"( Integer'Pos( a_frs1516.exb083sp ));
      params( 3749 ) := "+"( Integer'Pos( a_frs1516.exb091hd ));
      params( 3750 ) := "+"( Integer'Pos( a_frs1516.exb092hd ));
      params( 3751 ) := "+"( Integer'Pos( a_frs1516.exb093hd ));
      params( 3752 ) := "+"( Integer'Pos( a_frs1516.exb091sp ));
      params( 3753 ) := "+"( Integer'Pos( a_frs1516.exb092sp ));
      params( 3754 ) := "+"( Integer'Pos( a_frs1516.exb093sp ));
      params( 3755 ) := "+"( Integer'Pos( a_frs1516.exb101hd ));
      params( 3756 ) := "+"( Integer'Pos( a_frs1516.exb102hd ));
      params( 3757 ) := "+"( Integer'Pos( a_frs1516.exb103hd ));
      params( 3758 ) := "+"( Integer'Pos( a_frs1516.exb101sp ));
      params( 3759 ) := "+"( Integer'Pos( a_frs1516.exb102sp ));
      params( 3760 ) := "+"( Integer'Pos( a_frs1516.exb103sp ));
      params( 3761 ) := "+"( Integer'Pos( a_frs1516.exb111hd ));
      params( 3762 ) := "+"( Integer'Pos( a_frs1516.exb112hd ));
      params( 3763 ) := "+"( Integer'Pos( a_frs1516.exb113hd ));
      params( 3764 ) := "+"( Integer'Pos( a_frs1516.exb111sp ));
      params( 3765 ) := "+"( Integer'Pos( a_frs1516.exb112sp ));
      params( 3766 ) := "+"( Integer'Pos( a_frs1516.exb113sp ));
      params( 3767 ) := "+"( Integer'Pos( a_frs1516.exb121hd ));
      params( 3768 ) := "+"( Integer'Pos( a_frs1516.exb122hd ));
      params( 3769 ) := "+"( Integer'Pos( a_frs1516.exb123hd ));
      params( 3770 ) := "+"( Integer'Pos( a_frs1516.exb121sp ));
      params( 3771 ) := "+"( Integer'Pos( a_frs1516.exb122sp ));
      params( 3772 ) := "+"( Integer'Pos( a_frs1516.exb123sp ));
      params( 3773 ) := "+"( Integer'Pos( a_frs1516.ftpt1hd ));
      params( 3774 ) := "+"( Integer'Pos( a_frs1516.ftpt2hd ));
      params( 3775 ) := "+"( Integer'Pos( a_frs1516.ftpt3hd ));
      params( 3776 ) := "+"( Integer'Pos( a_frs1516.ftpt1sp ));
      params( 3777 ) := "+"( Integer'Pos( a_frs1516.ftpt2sp ));
      params( 3778 ) := "+"( Integer'Pos( a_frs1516.ftpt3sp ));
      params( 3779 ) := "+"( Float( a_frs1516.fulam1hd ));
      params( 3780 ) := "+"( Integer'Pos( a_frs1516.fulam2hd ));
      params( 3781 ) := "+"( Integer'Pos( a_frs1516.fulam3hd ));
      params( 3782 ) := "+"( Float( a_frs1516.fulam1sp ));
      params( 3783 ) := "+"( Integer'Pos( a_frs1516.fulam2sp ));
      params( 3784 ) := "+"( Integer'Pos( a_frs1516.fulam3sp ));
      params( 3785 ) := "+"( Integer'Pos( a_frs1516.fulbn1hd ));
      params( 3786 ) := "+"( Integer'Pos( a_frs1516.fulbn2hd ));
      params( 3787 ) := "+"( Integer'Pos( a_frs1516.fulbn3hd ));
      params( 3788 ) := "+"( Integer'Pos( a_frs1516.fulbn1sp ));
      params( 3789 ) := "+"( Integer'Pos( a_frs1516.fulbn2sp ));
      params( 3790 ) := "+"( Integer'Pos( a_frs1516.fulbn3sp ));
      params( 3791 ) := "+"( Integer'Pos( a_frs1516.fulpd1hd ));
      params( 3792 ) := "+"( Integer'Pos( a_frs1516.fulpd2hd ));
      params( 3793 ) := "+"( Integer'Pos( a_frs1516.fulpd3hd ));
      params( 3794 ) := "+"( Integer'Pos( a_frs1516.fulpd1sp ));
      params( 3795 ) := "+"( Integer'Pos( a_frs1516.fulpd2sp ));
      params( 3796 ) := "+"( Integer'Pos( a_frs1516.fulpd3sp ));
      params( 3797 ) := "+"( Integer'Pos( a_frs1516.fulty1hd ));
      params( 3798 ) := "+"( Integer'Pos( a_frs1516.fulty2hd ));
      params( 3799 ) := "+"( Integer'Pos( a_frs1516.fulty3hd ));
      params( 3800 ) := "+"( Integer'Pos( a_frs1516.fulty1sp ));
      params( 3801 ) := "+"( Integer'Pos( a_frs1516.fulty2sp ));
      params( 3802 ) := "+"( Integer'Pos( a_frs1516.fulty3sp ));
      params( 3803 ) := "+"( Integer'Pos( a_frs1516.fluam1hd ));
      params( 3804 ) := "+"( Integer'Pos( a_frs1516.fluam2hd ));
      params( 3805 ) := "+"( Integer'Pos( a_frs1516.fluam3hd ));
      params( 3806 ) := "+"( Integer'Pos( a_frs1516.fluam1sp ));
      params( 3807 ) := "+"( Integer'Pos( a_frs1516.fluam2sp ));
      params( 3808 ) := "+"( Integer'Pos( a_frs1516.fluam3sp ));
      params( 3809 ) := "+"( Integer'Pos( a_frs1516.flupd1hd ));
      params( 3810 ) := "+"( Integer'Pos( a_frs1516.flupd2hd ));
      params( 3811 ) := "+"( Integer'Pos( a_frs1516.flupd3hd ));
      params( 3812 ) := "+"( Integer'Pos( a_frs1516.flupd1sp ));
      params( 3813 ) := "+"( Integer'Pos( a_frs1516.flupd2sp ));
      params( 3814 ) := "+"( Integer'Pos( a_frs1516.flupd3sp ));
      params( 3815 ) := "+"( Integer'Pos( a_frs1516.flusu1hd ));
      params( 3816 ) := "+"( Integer'Pos( a_frs1516.flusu2hd ));
      params( 3817 ) := "+"( Integer'Pos( a_frs1516.flusu3hd ));
      params( 3818 ) := "+"( Integer'Pos( a_frs1516.flusu1sp ));
      params( 3819 ) := "+"( Integer'Pos( a_frs1516.flusu2sp ));
      params( 3820 ) := "+"( Integer'Pos( a_frs1516.flusu3sp ));
      params( 3821 ) := "+"( Float( a_frs1516.grwag1hd ));
      params( 3822 ) := "+"( Float( a_frs1516.grwag2hd ));
      params( 3823 ) := "+"( Float( a_frs1516.grwag3hd ));
      params( 3824 ) := "+"( Float( a_frs1516.grwag1sp ));
      params( 3825 ) := "+"( Float( a_frs1516.grwag2sp ));
      params( 3826 ) := "+"( Float( a_frs1516.grwag3sp ));
      params( 3827 ) := "+"( Integer'Pos( a_frs1516.grwap1hd ));
      params( 3828 ) := "+"( Integer'Pos( a_frs1516.grwap2hd ));
      params( 3829 ) := "+"( Integer'Pos( a_frs1516.grwap3hd ));
      params( 3830 ) := "+"( Integer'Pos( a_frs1516.grwap1sp ));
      params( 3831 ) := "+"( Integer'Pos( a_frs1516.grwap2sp ));
      params( 3832 ) := "+"( Integer'Pos( a_frs1516.grwap3sp ));
      params( 3833 ) := "+"( Float( a_frs1516.hha11hd ));
      params( 3834 ) := "+"( Integer'Pos( a_frs1516.hha12hd ));
      params( 3835 ) := "+"( Float( a_frs1516.hha13hd ));
      params( 3836 ) := "+"( Float( a_frs1516.hha11sp ));
      params( 3837 ) := "+"( Integer'Pos( a_frs1516.hha12sp ));
      params( 3838 ) := "+"( Integer'Pos( a_frs1516.hha13sp ));
      params( 3839 ) := "+"( Float( a_frs1516.hha21hd ));
      params( 3840 ) := "+"( Integer'Pos( a_frs1516.hha22hd ));
      params( 3841 ) := "+"( Float( a_frs1516.hha23hd ));
      params( 3842 ) := "+"( Float( a_frs1516.hha21sp ));
      params( 3843 ) := "+"( Integer'Pos( a_frs1516.hha22sp ));
      params( 3844 ) := "+"( Integer'Pos( a_frs1516.hha23sp ));
      params( 3845 ) := "+"( Integer'Pos( a_frs1516.hha31hd ));
      params( 3846 ) := "+"( Integer'Pos( a_frs1516.hha32hd ));
      params( 3847 ) := "+"( Integer'Pos( a_frs1516.hha33hd ));
      params( 3848 ) := "+"( Integer'Pos( a_frs1516.hha31sp ));
      params( 3849 ) := "+"( Integer'Pos( a_frs1516.hha32sp ));
      params( 3850 ) := "+"( Integer'Pos( a_frs1516.hha33sp ));
      params( 3851 ) := "+"( Integer'Pos( a_frs1516.hour1hd ));
      params( 3852 ) := "+"( Integer'Pos( a_frs1516.hour2hd ));
      params( 3853 ) := "+"( Integer'Pos( a_frs1516.hour3hd ));
      params( 3854 ) := "+"( Integer'Pos( a_frs1516.hour1sp ));
      params( 3855 ) := "+"( Integer'Pos( a_frs1516.hour2sp ));
      params( 3856 ) := "+"( Integer'Pos( a_frs1516.hour3sp ));
      params( 3857 ) := "+"( Float( a_frs1516.hrrte1hd ));
      params( 3858 ) := "+"( Float( a_frs1516.hrrte2hd ));
      params( 3859 ) := "+"( Float( a_frs1516.hrrte3hd ));
      params( 3860 ) := "+"( Float( a_frs1516.hrrte1sp ));
      params( 3861 ) := "+"( Float( a_frs1516.hrrte2sp ));
      params( 3862 ) := "+"( Float( a_frs1516.hrrte3sp ));
      params( 3863 ) := "+"( Integer'Pos( a_frs1516.ipay11hd ));
      params( 3864 ) := "+"( Integer'Pos( a_frs1516.ipay12hd ));
      params( 3865 ) := "+"( Integer'Pos( a_frs1516.ipay13hd ));
      params( 3866 ) := "+"( Integer'Pos( a_frs1516.ipay11sp ));
      params( 3867 ) := "+"( Integer'Pos( a_frs1516.ipay12sp ));
      params( 3868 ) := "+"( Integer'Pos( a_frs1516.ipay13sp ));
      params( 3869 ) := "+"( Integer'Pos( a_frs1516.ipay21hd ));
      params( 3870 ) := "+"( Integer'Pos( a_frs1516.ipay22hd ));
      params( 3871 ) := "+"( Integer'Pos( a_frs1516.ipay23hd ));
      params( 3872 ) := "+"( Integer'Pos( a_frs1516.ipay21sp ));
      params( 3873 ) := "+"( Integer'Pos( a_frs1516.ipay22sp ));
      params( 3874 ) := "+"( Integer'Pos( a_frs1516.ipay23sp ));
      params( 3875 ) := "+"( Integer'Pos( a_frs1516.ipay31hd ));
      params( 3876 ) := "+"( Integer'Pos( a_frs1516.ipay32hd ));
      params( 3877 ) := "+"( Integer'Pos( a_frs1516.ipay33hd ));
      params( 3878 ) := "+"( Integer'Pos( a_frs1516.ipay31sp ));
      params( 3879 ) := "+"( Integer'Pos( a_frs1516.ipay32sp ));
      params( 3880 ) := "+"( Integer'Pos( a_frs1516.ipay33sp ));
      params( 3881 ) := "+"( Integer'Pos( a_frs1516.ipay41hd ));
      params( 3882 ) := "+"( Integer'Pos( a_frs1516.ipay42hd ));
      params( 3883 ) := "+"( Integer'Pos( a_frs1516.ipay43hd ));
      params( 3884 ) := "+"( Integer'Pos( a_frs1516.ipay41sp ));
      params( 3885 ) := "+"( Integer'Pos( a_frs1516.ipay42sp ));
      params( 3886 ) := "+"( Integer'Pos( a_frs1516.ipay43sp ));
      params( 3887 ) := "+"( Integer'Pos( a_frs1516.ipay51hd ));
      params( 3888 ) := "+"( Integer'Pos( a_frs1516.ipay52hd ));
      params( 3889 ) := "+"( Integer'Pos( a_frs1516.ipay53hd ));
      params( 3890 ) := "+"( Integer'Pos( a_frs1516.ipay51sp ));
      params( 3891 ) := "+"( Integer'Pos( a_frs1516.ipay52sp ));
      params( 3892 ) := "+"( Integer'Pos( a_frs1516.ipay53sp ));
      params( 3893 ) := "+"( Integer'Pos( a_frs1516.ipay61hd ));
      params( 3894 ) := "+"( Integer'Pos( a_frs1516.ipay62hd ));
      params( 3895 ) := "+"( Integer'Pos( a_frs1516.ipay63hd ));
      params( 3896 ) := "+"( Integer'Pos( a_frs1516.ipay61sp ));
      params( 3897 ) := "+"( Integer'Pos( a_frs1516.ipay62sp ));
      params( 3898 ) := "+"( Integer'Pos( a_frs1516.ipay63sp ));
      params( 3899 ) := "+"( Integer'Pos( a_frs1516.ipay71hd ));
      params( 3900 ) := "+"( Integer'Pos( a_frs1516.ipay72hd ));
      params( 3901 ) := "+"( Integer'Pos( a_frs1516.ipay73hd ));
      params( 3902 ) := "+"( Integer'Pos( a_frs1516.ipay71sp ));
      params( 3903 ) := "+"( Integer'Pos( a_frs1516.ipay72sp ));
      params( 3904 ) := "+"( Integer'Pos( a_frs1516.ipay73sp ));
      params( 3905 ) := "+"( Integer'Pos( a_frs1516.jbchg1hd ));
      params( 3906 ) := "+"( Integer'Pos( a_frs1516.jbchg2hd ));
      params( 3907 ) := "+"( Integer'Pos( a_frs1516.jbchg3hd ));
      params( 3908 ) := "+"( Integer'Pos( a_frs1516.jbchg1sp ));
      params( 3909 ) := "+"( Integer'Pos( a_frs1516.jbchg2sp ));
      params( 3910 ) := "+"( Integer'Pos( a_frs1516.jbchg3sp ));
      params( 3911 ) := "+"( Integer'Pos( a_frs1516.jobus1hd ));
      params( 3912 ) := "+"( Integer'Pos( a_frs1516.jobus2hd ));
      params( 3913 ) := "+"( Integer'Pos( a_frs1516.jobus3hd ));
      params( 3914 ) := "+"( Integer'Pos( a_frs1516.jobus1sp ));
      params( 3915 ) := "+"( Integer'Pos( a_frs1516.jobus2sp ));
      params( 3916 ) := "+"( Integer'Pos( a_frs1516.jobus3sp ));
      params( 3917 ) := "+"( Float( a_frs1516.jbhrs1hd ));
      params( 3918 ) := "+"( Float( a_frs1516.jbhrs2hd ));
      params( 3919 ) := "+"( Float( a_frs1516.jbhrs3hd ));
      params( 3920 ) := "+"( Float( a_frs1516.jbhrs1sp ));
      params( 3921 ) := "+"( Float( a_frs1516.jbhrs2sp ));
      params( 3922 ) := "+"( Integer'Pos( a_frs1516.jbhrs3sp ));
      params( 3923 ) := "+"( Integer'Pos( a_frs1516.lt301hd ));
      params( 3924 ) := "+"( Integer'Pos( a_frs1516.lt302hd ));
      params( 3925 ) := "+"( Integer'Pos( a_frs1516.lt303hd ));
      params( 3926 ) := "+"( Integer'Pos( a_frs1516.lt301sp ));
      params( 3927 ) := "+"( Integer'Pos( a_frs1516.lt302sp ));
      params( 3928 ) := "+"( Integer'Pos( a_frs1516.lt303sp ));
      params( 3929 ) := "+"( Integer'Pos( a_frs1516.madem1hd ));
      params( 3930 ) := "+"( Integer'Pos( a_frs1516.madem2hd ));
      params( 3931 ) := "+"( Integer'Pos( a_frs1516.madem3hd ));
      params( 3932 ) := "+"( Integer'Pos( a_frs1516.madem1sp ));
      params( 3933 ) := "+"( Integer'Pos( a_frs1516.madem2sp ));
      params( 3934 ) := "+"( Integer'Pos( a_frs1516.madem3sp ));
      params( 3935 ) := "+"( Float( a_frs1516.mile1hd ));
      params( 3936 ) := "+"( Float( a_frs1516.mile2hd ));
      params( 3937 ) := "+"( Integer'Pos( a_frs1516.mile3hd ));
      params( 3938 ) := "+"( Float( a_frs1516.mile1sp ));
      params( 3939 ) := "+"( Float( a_frs1516.mile2sp ));
      params( 3940 ) := "+"( Integer'Pos( a_frs1516.mile3sp ));
      params( 3941 ) := "+"( Float( a_frs1516.moref1hd ));
      params( 3942 ) := "+"( Integer'Pos( a_frs1516.moref2hd ));
      params( 3943 ) := "+"( Integer'Pos( a_frs1516.moref3hd ));
      params( 3944 ) := "+"( Float( a_frs1516.moref1sp ));
      params( 3945 ) := "+"( Float( a_frs1516.moref2sp ));
      params( 3946 ) := "+"( Integer'Pos( a_frs1516.moref3sp ));
      params( 3947 ) := "+"( Float( a_frs1516.nic1hd ));
      params( 3948 ) := "+"( Float( a_frs1516.nic2hd ));
      params( 3949 ) := "+"( Float( a_frs1516.nic3hd ));
      params( 3950 ) := "+"( Float( a_frs1516.nic1sp ));
      params( 3951 ) := "+"( Float( a_frs1516.nic2sp ));
      params( 3952 ) := "+"( Integer'Pos( a_frs1516.nic3sp ));
      params( 3953 ) := "+"( Float( a_frs1516.nidam1hd ));
      params( 3954 ) := "+"( Integer'Pos( a_frs1516.nidam2hd ));
      params( 3955 ) := "+"( Integer'Pos( a_frs1516.nidam3hd ));
      params( 3956 ) := "+"( Float( a_frs1516.nidam1sp ));
      params( 3957 ) := "+"( Float( a_frs1516.nidam2sp ));
      params( 3958 ) := "+"( Integer'Pos( a_frs1516.nidam3sp ));
      params( 3959 ) := "+"( Integer'Pos( a_frs1516.nipd1hd ));
      params( 3960 ) := "+"( Integer'Pos( a_frs1516.nipd2hd ));
      params( 3961 ) := "+"( Integer'Pos( a_frs1516.nipd3hd ));
      params( 3962 ) := "+"( Integer'Pos( a_frs1516.nipd1sp ));
      params( 3963 ) := "+"( Integer'Pos( a_frs1516.nipd2sp ));
      params( 3964 ) := "+"( Integer'Pos( a_frs1516.nipd3sp ));
      params( 3965 ) := "+"( Integer'Pos( a_frs1516.noemp1hd ));
      params( 3966 ) := "+"( Integer'Pos( a_frs1516.noemp2hd ));
      params( 3967 ) := "+"( Integer'Pos( a_frs1516.noemp3hd ));
      params( 3968 ) := "+"( Integer'Pos( a_frs1516.noemp1sp ));
      params( 3969 ) := "+"( Integer'Pos( a_frs1516.noemp2sp ));
      params( 3970 ) := "+"( Integer'Pos( a_frs1516.noemp3sp ));
      params( 3971 ) := "+"( Integer'Pos( a_frs1516.oremp1hd ));
      params( 3972 ) := "+"( Integer'Pos( a_frs1516.oremp2hd ));
      params( 3973 ) := "+"( Integer'Pos( a_frs1516.oremp3hd ));
      params( 3974 ) := "+"( Integer'Pos( a_frs1516.oremp1sp ));
      params( 3975 ) := "+"( Integer'Pos( a_frs1516.oremp2sp ));
      params( 3976 ) := "+"( Integer'Pos( a_frs1516.oremp3sp ));
      params( 3977 ) := "+"( Integer'Pos( a_frs1516.othd11hd ));
      params( 3978 ) := "+"( Integer'Pos( a_frs1516.othd12hd ));
      params( 3979 ) := "+"( Integer'Pos( a_frs1516.othd13hd ));
      params( 3980 ) := "+"( Integer'Pos( a_frs1516.othd11sp ));
      params( 3981 ) := "+"( Integer'Pos( a_frs1516.othd12sp ));
      params( 3982 ) := "+"( Integer'Pos( a_frs1516.othd13sp ));
      params( 3983 ) := "+"( Integer'Pos( a_frs1516.othd21hd ));
      params( 3984 ) := "+"( Integer'Pos( a_frs1516.othd22hd ));
      params( 3985 ) := "+"( Integer'Pos( a_frs1516.othd23hd ));
      params( 3986 ) := "+"( Integer'Pos( a_frs1516.othd21sp ));
      params( 3987 ) := "+"( Integer'Pos( a_frs1516.othd22sp ));
      params( 3988 ) := "+"( Integer'Pos( a_frs1516.othd23sp ));
      params( 3989 ) := "+"( Integer'Pos( a_frs1516.othd31hd ));
      params( 3990 ) := "+"( Integer'Pos( a_frs1516.othd32hd ));
      params( 3991 ) := "+"( Integer'Pos( a_frs1516.othd33hd ));
      params( 3992 ) := "+"( Integer'Pos( a_frs1516.othd31sp ));
      params( 3993 ) := "+"( Integer'Pos( a_frs1516.othd32sp ));
      params( 3994 ) := "+"( Integer'Pos( a_frs1516.othd33sp ));
      params( 3995 ) := "+"( Integer'Pos( a_frs1516.othd41hd ));
      params( 3996 ) := "+"( Integer'Pos( a_frs1516.othd42hd ));
      params( 3997 ) := "+"( Integer'Pos( a_frs1516.othd43hd ));
      params( 3998 ) := "+"( Integer'Pos( a_frs1516.othd41sp ));
      params( 3999 ) := "+"( Integer'Pos( a_frs1516.othd42sp ));
      params( 4000 ) := "+"( Integer'Pos( a_frs1516.othd43sp ));
      params( 4001 ) := "+"( Integer'Pos( a_frs1516.othd51hd ));
      params( 4002 ) := "+"( Integer'Pos( a_frs1516.othd52hd ));
      params( 4003 ) := "+"( Integer'Pos( a_frs1516.othd53hd ));
      params( 4004 ) := "+"( Integer'Pos( a_frs1516.othd51sp ));
      params( 4005 ) := "+"( Integer'Pos( a_frs1516.othd52sp ));
      params( 4006 ) := "+"( Integer'Pos( a_frs1516.othd53sp ));
      params( 4007 ) := "+"( Integer'Pos( a_frs1516.othd61hd ));
      params( 4008 ) := "+"( Integer'Pos( a_frs1516.othd62hd ));
      params( 4009 ) := "+"( Integer'Pos( a_frs1516.othd63hd ));
      params( 4010 ) := "+"( Integer'Pos( a_frs1516.othd61sp ));
      params( 4011 ) := "+"( Integer'Pos( a_frs1516.othd62sp ));
      params( 4012 ) := "+"( Integer'Pos( a_frs1516.othd63sp ));
      params( 4013 ) := "+"( Integer'Pos( a_frs1516.othd71hd ));
      params( 4014 ) := "+"( Integer'Pos( a_frs1516.othd72hd ));
      params( 4015 ) := "+"( Integer'Pos( a_frs1516.othd73hd ));
      params( 4016 ) := "+"( Integer'Pos( a_frs1516.othd71sp ));
      params( 4017 ) := "+"( Integer'Pos( a_frs1516.othd72sp ));
      params( 4018 ) := "+"( Integer'Pos( a_frs1516.othd73sp ));
      params( 4019 ) := "+"( Integer'Pos( a_frs1516.othd81hd ));
      params( 4020 ) := "+"( Integer'Pos( a_frs1516.othd82hd ));
      params( 4021 ) := "+"( Integer'Pos( a_frs1516.othd83hd ));
      params( 4022 ) := "+"( Integer'Pos( a_frs1516.othd81sp ));
      params( 4023 ) := "+"( Integer'Pos( a_frs1516.othd82sp ));
      params( 4024 ) := "+"( Integer'Pos( a_frs1516.othd83sp ));
      params( 4025 ) := "+"( Integer'Pos( a_frs1516.othd91hd ));
      params( 4026 ) := "+"( Integer'Pos( a_frs1516.othd92hd ));
      params( 4027 ) := "+"( Integer'Pos( a_frs1516.othd93hd ));
      params( 4028 ) := "+"( Integer'Pos( a_frs1516.othd91sp ));
      params( 4029 ) := "+"( Integer'Pos( a_frs1516.othd92sp ));
      params( 4030 ) := "+"( Integer'Pos( a_frs1516.othd93sp ));
      params( 4031 ) := "+"( Integer'Pos( a_frs1516.otd101hd ));
      params( 4032 ) := "+"( Integer'Pos( a_frs1516.otd102hd ));
      params( 4033 ) := "+"( Integer'Pos( a_frs1516.otd103hd ));
      params( 4034 ) := "+"( Integer'Pos( a_frs1516.otd101sp ));
      params( 4035 ) := "+"( Integer'Pos( a_frs1516.otd102sp ));
      params( 4036 ) := "+"( Integer'Pos( a_frs1516.otd103sp ));
      params( 4037 ) := "+"( Float( a_frs1516.ownam1hd ));
      params( 4038 ) := "+"( Float( a_frs1516.ownam2hd ));
      params( 4039 ) := "+"( Integer'Pos( a_frs1516.ownam3hd ));
      params( 4040 ) := "+"( Float( a_frs1516.ownam1sp ));
      params( 4041 ) := "+"( Float( a_frs1516.ownam2sp ));
      params( 4042 ) := "+"( Float( a_frs1516.ownam3sp ));
      params( 4043 ) := "+"( Float( a_frs1516.ownoa1hd ));
      params( 4044 ) := "+"( Float( a_frs1516.ownoa2hd ));
      params( 4045 ) := "+"( Integer'Pos( a_frs1516.ownoa3hd ));
      params( 4046 ) := "+"( Float( a_frs1516.ownoa1sp ));
      params( 4047 ) := "+"( Integer'Pos( a_frs1516.ownoa2sp ));
      params( 4048 ) := "+"( Integer'Pos( a_frs1516.ownoa3sp ));
      params( 4049 ) := "+"( Integer'Pos( a_frs1516.ownot1hd ));
      params( 4050 ) := "+"( Integer'Pos( a_frs1516.ownot2hd ));
      params( 4051 ) := "+"( Integer'Pos( a_frs1516.ownot3hd ));
      params( 4052 ) := "+"( Integer'Pos( a_frs1516.ownot1sp ));
      params( 4053 ) := "+"( Integer'Pos( a_frs1516.ownot2sp ));
      params( 4054 ) := "+"( Integer'Pos( a_frs1516.ownot3sp ));
      params( 4055 ) := "+"( Integer'Pos( a_frs1516.ownsm1hd ));
      params( 4056 ) := "+"( Integer'Pos( a_frs1516.ownsm2hd ));
      params( 4057 ) := "+"( Integer'Pos( a_frs1516.ownsm3hd ));
      params( 4058 ) := "+"( Integer'Pos( a_frs1516.ownsm1sp ));
      params( 4059 ) := "+"( Integer'Pos( a_frs1516.ownsm2sp ));
      params( 4060 ) := "+"( Integer'Pos( a_frs1516.ownsm3sp ));
      params( 4061 ) := "+"( Integer'Pos( a_frs1516.pappd1hd ));
      params( 4062 ) := "+"( Integer'Pos( a_frs1516.pappd2hd ));
      params( 4063 ) := "+"( Integer'Pos( a_frs1516.pappd3hd ));
      params( 4064 ) := "+"( Integer'Pos( a_frs1516.pappd1sp ));
      params( 4065 ) := "+"( Integer'Pos( a_frs1516.pappd2sp ));
      params( 4066 ) := "+"( Integer'Pos( a_frs1516.pappd3sp ));
      params( 4067 ) := "+"( Float( a_frs1516.payam1hd ));
      params( 4068 ) := "+"( Float( a_frs1516.payam2hd ));
      params( 4069 ) := "+"( Float( a_frs1516.payam3hd ));
      params( 4070 ) := "+"( Float( a_frs1516.payam1sp ));
      params( 4071 ) := "+"( Float( a_frs1516.payam2sp ));
      params( 4072 ) := "+"( Float( a_frs1516.payam3sp ));
      params( 4073 ) := "+"( Integer'Pos( a_frs1516.pdate1hd ));
      params( 4074 ) := "+"( Integer'Pos( a_frs1516.pdate2hd ));
      params( 4075 ) := "+"( Integer'Pos( a_frs1516.pdate3hd ));
      params( 4076 ) := "+"( Integer'Pos( a_frs1516.pdate1sp ));
      params( 4077 ) := "+"( Integer'Pos( a_frs1516.pdate2sp ));
      params( 4078 ) := "+"( Integer'Pos( a_frs1516.pdate3sp ));
      params( 4079 ) := "+"( Float( a_frs1516.paye1hd ));
      params( 4080 ) := "+"( Float( a_frs1516.paye2hd ));
      params( 4081 ) := "+"( Float( a_frs1516.paye3hd ));
      params( 4082 ) := "+"( Float( a_frs1516.paye1sp ));
      params( 4083 ) := "+"( Float( a_frs1516.paye2sp ));
      params( 4084 ) := "+"( Float( a_frs1516.paye3sp ));
      params( 4085 ) := "+"( Integer'Pos( a_frs1516.paype1hd ));
      params( 4086 ) := "+"( Integer'Pos( a_frs1516.paype2hd ));
      params( 4087 ) := "+"( Integer'Pos( a_frs1516.paype3hd ));
      params( 4088 ) := "+"( Integer'Pos( a_frs1516.paype1sp ));
      params( 4089 ) := "+"( Integer'Pos( a_frs1516.paype2sp ));
      params( 4090 ) := "+"( Integer'Pos( a_frs1516.paype3sp ));
      params( 4091 ) := "+"( Integer'Pos( a_frs1516.paysl1hd ));
      params( 4092 ) := "+"( Integer'Pos( a_frs1516.paysl2hd ));
      params( 4093 ) := "+"( Integer'Pos( a_frs1516.paysl3hd ));
      params( 4094 ) := "+"( Integer'Pos( a_frs1516.paysl1sp ));
      params( 4095 ) := "+"( Integer'Pos( a_frs1516.paysl2sp ));
      params( 4096 ) := "+"( Integer'Pos( a_frs1516.paysl3sp ));
      params( 4097 ) := "+"( Integer'Pos( a_frs1516.payus1hd ));
      params( 4098 ) := "+"( Integer'Pos( a_frs1516.payus2hd ));
      params( 4099 ) := "+"( Integer'Pos( a_frs1516.payus3hd ));
      params( 4100 ) := "+"( Integer'Pos( a_frs1516.payus1sp ));
      params( 4101 ) := "+"( Integer'Pos( a_frs1516.payus2sp ));
      params( 4102 ) := "+"( Integer'Pos( a_frs1516.payus3sp ));
      params( 4103 ) := "+"( Float( a_frs1516.pothr1hd ));
      params( 4104 ) := "+"( Integer'Pos( a_frs1516.pothr2hd ));
      params( 4105 ) := "+"( Integer'Pos( a_frs1516.pothr3hd ));
      params( 4106 ) := "+"( Float( a_frs1516.pothr1sp ));
      params( 4107 ) := "+"( Integer'Pos( a_frs1516.pothr2sp ));
      params( 4108 ) := "+"( Integer'Pos( a_frs1516.pothr3sp ));
      params( 4109 ) := "+"( Integer'Pos( a_frs1516.ppppd1hd ));
      params( 4110 ) := "+"( Integer'Pos( a_frs1516.ppppd2hd ));
      params( 4111 ) := "+"( Integer'Pos( a_frs1516.ppppd3hd ));
      params( 4112 ) := "+"( Integer'Pos( a_frs1516.ppppd1sp ));
      params( 4113 ) := "+"( Integer'Pos( a_frs1516.ppppd2sp ));
      params( 4114 ) := "+"( Integer'Pos( a_frs1516.ppppd3sp ));
      params( 4115 ) := "+"( Float( a_frs1516.prbef1hd ));
      params( 4116 ) := "+"( Float( a_frs1516.prbef2hd ));
      params( 4117 ) := "+"( Float( a_frs1516.prbef3hd ));
      params( 4118 ) := "+"( Float( a_frs1516.prbef1sp ));
      params( 4119 ) := "+"( Float( a_frs1516.prbef2sp ));
      params( 4120 ) := "+"( Float( a_frs1516.prbef3sp ));
      params( 4121 ) := "+"( Integer'Pos( a_frs1516.prdoc1hd ));
      params( 4122 ) := "+"( Integer'Pos( a_frs1516.prdoc2hd ));
      params( 4123 ) := "+"( Integer'Pos( a_frs1516.prdoc3hd ));
      params( 4124 ) := "+"( Integer'Pos( a_frs1516.prdoc1sp ));
      params( 4125 ) := "+"( Integer'Pos( a_frs1516.prdoc2sp ));
      params( 4126 ) := "+"( Integer'Pos( a_frs1516.prdoc3sp ));
      params( 4127 ) := "+"( Float( a_frs1516.sepro1hd ));
      params( 4128 ) := "+"( Float( a_frs1516.sepro2hd ));
      params( 4129 ) := "+"( Float( a_frs1516.sepro3hd ));
      params( 4130 ) := "+"( Float( a_frs1516.sepro1sp ));
      params( 4131 ) := "+"( Float( a_frs1516.sepro2sp ));
      params( 4132 ) := "+"( Float( a_frs1516.sepro3sp ));
      params( 4133 ) := "+"( Integer'Pos( a_frs1516.prolo1hd ));
      params( 4134 ) := "+"( Integer'Pos( a_frs1516.prolo2hd ));
      params( 4135 ) := "+"( Integer'Pos( a_frs1516.prolo3hd ));
      params( 4136 ) := "+"( Integer'Pos( a_frs1516.prolo1sp ));
      params( 4137 ) := "+"( Integer'Pos( a_frs1516.prolo2sp ));
      params( 4138 ) := "+"( Integer'Pos( a_frs1516.prolo3sp ));
      params( 4139 ) := "+"( Integer'Pos( a_frs1516.profn1hd ));
      params( 4140 ) := "+"( Integer'Pos( a_frs1516.profn2hd ));
      params( 4141 ) := "+"( Integer'Pos( a_frs1516.profn3hd ));
      params( 4142 ) := "+"( Integer'Pos( a_frs1516.profn1sp ));
      params( 4143 ) := "+"( Integer'Pos( a_frs1516.profn2sp ));
      params( 4144 ) := "+"( Integer'Pos( a_frs1516.profn3sp ));
      params( 4145 ) := "+"( Integer'Pos( a_frs1516.protx1hd ));
      params( 4146 ) := "+"( Integer'Pos( a_frs1516.protx2hd ));
      params( 4147 ) := "+"( Integer'Pos( a_frs1516.protx3hd ));
      params( 4148 ) := "+"( Integer'Pos( a_frs1516.protx1sp ));
      params( 4149 ) := "+"( Integer'Pos( a_frs1516.protx2sp ));
      params( 4150 ) := "+"( Integer'Pos( a_frs1516.protx3sp ));
      params( 4151 ) := "+"( Integer'Pos( a_frs1516.rspvr1hd ));
      params( 4152 ) := "+"( Integer'Pos( a_frs1516.rspvr2hd ));
      params( 4153 ) := "+"( Integer'Pos( a_frs1516.rspvr3hd ));
      params( 4154 ) := "+"( Integer'Pos( a_frs1516.rspvr1sp ));
      params( 4155 ) := "+"( Integer'Pos( a_frs1516.rspvr2sp ));
      params( 4156 ) := "+"( Integer'Pos( a_frs1516.rspvr3sp ));
      params( 4157 ) := "+"( Integer'Pos( a_frs1516.apamt1hd ));
      params( 4158 ) := "+"( Integer'Pos( a_frs1516.apamt2hd ));
      params( 4159 ) := "+"( Integer'Pos( a_frs1516.apamt3hd ));
      params( 4160 ) := "+"( Integer'Pos( a_frs1516.apamt1sp ));
      params( 4161 ) := "+"( Integer'Pos( a_frs1516.apamt2sp ));
      params( 4162 ) := "+"( Integer'Pos( a_frs1516.apamt3sp ));
      params( 4163 ) := "+"( Integer'Pos( a_frs1516.sebeg1hd ));
      params( 4164 ) := "+"( Integer'Pos( a_frs1516.sebeg2hd ));
      params( 4165 ) := "+"( Integer'Pos( a_frs1516.sebeg3hd ));
      params( 4166 ) := "+"( Integer'Pos( a_frs1516.sebeg1sp ));
      params( 4167 ) := "+"( Integer'Pos( a_frs1516.sebeg2sp ));
      params( 4168 ) := "+"( Integer'Pos( a_frs1516.sebeg3sp ));
      params( 4169 ) := "+"( Integer'Pos( a_frs1516.seend1hd ));
      params( 4170 ) := "+"( Integer'Pos( a_frs1516.seend2hd ));
      params( 4171 ) := "+"( Integer'Pos( a_frs1516.seend3hd ));
      params( 4172 ) := "+"( Integer'Pos( a_frs1516.seend1sp ));
      params( 4173 ) := "+"( Integer'Pos( a_frs1516.seend2sp ));
      params( 4174 ) := "+"( Integer'Pos( a_frs1516.seend3sp ));
      params( 4175 ) := "+"( Integer'Pos( a_frs1516.sectr1hd ));
      params( 4176 ) := "+"( Integer'Pos( a_frs1516.sectr2hd ));
      params( 4177 ) := "+"( Integer'Pos( a_frs1516.sectr3hd ));
      params( 4178 ) := "+"( Integer'Pos( a_frs1516.sectr1sp ));
      params( 4179 ) := "+"( Integer'Pos( a_frs1516.sectr2sp ));
      params( 4180 ) := "+"( Integer'Pos( a_frs1516.sectr3sp ));
      params( 4181 ) := "+"( Integer'Pos( a_frs1516.sectt1hd ));
      params( 4182 ) := "+"( Integer'Pos( a_frs1516.sectt2hd ));
      params( 4183 ) := "+"( Integer'Pos( a_frs1516.sectt3hd ));
      params( 4184 ) := "+"( Integer'Pos( a_frs1516.sectt1sp ));
      params( 4185 ) := "+"( Integer'Pos( a_frs1516.sectt2sp ));
      params( 4186 ) := "+"( Integer'Pos( a_frs1516.sectt3sp ));
      params( 4187 ) := "+"( Integer'Pos( a_frs1516.sefin1hd ));
      params( 4188 ) := "+"( Integer'Pos( a_frs1516.sefin2hd ));
      params( 4189 ) := "+"( Integer'Pos( a_frs1516.sefin3hd ));
      params( 4190 ) := "+"( Integer'Pos( a_frs1516.sefin1sp ));
      params( 4191 ) := "+"( Integer'Pos( a_frs1516.sefin2sp ));
      params( 4192 ) := "+"( Integer'Pos( a_frs1516.sefin3sp ));
      params( 4193 ) := "+"( Float( a_frs1516.secam1hd ));
      params( 4194 ) := "+"( Float( a_frs1516.secam2hd ));
      params( 4195 ) := "+"( Float( a_frs1516.secam3hd ));
      params( 4196 ) := "+"( Float( a_frs1516.secam1sp ));
      params( 4197 ) := "+"( Float( a_frs1516.secam2sp ));
      params( 4198 ) := "+"( Float( a_frs1516.secam3sp ));
      params( 4199 ) := "+"( Integer'Pos( a_frs1516.seciw1hd ));
      params( 4200 ) := "+"( Integer'Pos( a_frs1516.seciw2hd ));
      params( 4201 ) := "+"( Integer'Pos( a_frs1516.seciw3hd ));
      params( 4202 ) := "+"( Integer'Pos( a_frs1516.seciw1sp ));
      params( 4203 ) := "+"( Integer'Pos( a_frs1516.seciw2sp ));
      params( 4204 ) := "+"( Integer'Pos( a_frs1516.seciw3sp ));
      params( 4205 ) := "+"( Integer'Pos( a_frs1516.sewks1hd ));
      params( 4206 ) := "+"( Integer'Pos( a_frs1516.sewks2hd ));
      params( 4207 ) := "+"( Integer'Pos( a_frs1516.sewks3hd ));
      params( 4208 ) := "+"( Integer'Pos( a_frs1516.sewks1sp ));
      params( 4209 ) := "+"( Integer'Pos( a_frs1516.sewks2sp ));
      params( 4210 ) := "+"( Integer'Pos( a_frs1516.sewks3sp ));
      params( 4211 ) := "+"( Float( a_frs1516.senam1hd ));
      params( 4212 ) := "+"( Float( a_frs1516.senam2hd ));
      params( 4213 ) := "+"( Integer'Pos( a_frs1516.senam3hd ));
      params( 4214 ) := "+"( Float( a_frs1516.senam1sp ));
      params( 4215 ) := "+"( Float( a_frs1516.senam2sp ));
      params( 4216 ) := "+"( Integer'Pos( a_frs1516.senam3sp ));
      params( 4217 ) := "+"( Integer'Pos( a_frs1516.seiin1hd ));
      params( 4218 ) := "+"( Integer'Pos( a_frs1516.seiin2hd ));
      params( 4219 ) := "+"( Integer'Pos( a_frs1516.seiin3hd ));
      params( 4220 ) := "+"( Integer'Pos( a_frs1516.seiin1sp ));
      params( 4221 ) := "+"( Integer'Pos( a_frs1516.seiin2sp ));
      params( 4222 ) := "+"( Integer'Pos( a_frs1516.seiin3sp ));
      params( 4223 ) := "+"( Float( a_frs1516.senil1hd ));
      params( 4224 ) := "+"( Float( a_frs1516.senil2hd ));
      params( 4225 ) := "+"( Integer'Pos( a_frs1516.senil3hd ));
      params( 4226 ) := "+"( Float( a_frs1516.senil1sp ));
      params( 4227 ) := "+"( Float( a_frs1516.senil2sp ));
      params( 4228 ) := "+"( Integer'Pos( a_frs1516.senil3sp ));
      params( 4229 ) := "+"( Float( a_frs1516.senir1hd ));
      params( 4230 ) := "+"( Float( a_frs1516.senir2hd ));
      params( 4231 ) := "+"( Float( a_frs1516.senir3hd ));
      params( 4232 ) := "+"( Float( a_frs1516.senir1sp ));
      params( 4233 ) := "+"( Float( a_frs1516.senir2sp ));
      params( 4234 ) := "+"( Float( a_frs1516.senir3sp ));
      params( 4235 ) := "+"( Integer'Pos( a_frs1516.psenr1hd ));
      params( 4236 ) := "+"( Integer'Pos( a_frs1516.psenr2hd ));
      params( 4237 ) := "+"( Integer'Pos( a_frs1516.psenr3hd ));
      params( 4238 ) := "+"( Integer'Pos( a_frs1516.psenr1sp ));
      params( 4239 ) := "+"( Integer'Pos( a_frs1516.psenr2sp ));
      params( 4240 ) := "+"( Integer'Pos( a_frs1516.psenr3sp ));
      params( 4241 ) := "+"( Float( a_frs1516.setax1hd ));
      params( 4242 ) := "+"( Float( a_frs1516.setax2hd ));
      params( 4243 ) := "+"( Float( a_frs1516.setax3hd ));
      params( 4244 ) := "+"( Float( a_frs1516.setax1sp ));
      params( 4245 ) := "+"( Float( a_frs1516.setax2sp ));
      params( 4246 ) := "+"( Float( a_frs1516.setax3sp ));
      params( 4247 ) := "+"( Float( a_frs1516.smpam1hd ));
      params( 4248 ) := "+"( Integer'Pos( a_frs1516.smpam2hd ));
      params( 4249 ) := "+"( Integer'Pos( a_frs1516.smpam3hd ));
      params( 4250 ) := "+"( Float( a_frs1516.smpam1sp ));
      params( 4251 ) := "+"( Float( a_frs1516.smpam2sp ));
      params( 4252 ) := "+"( Integer'Pos( a_frs1516.smpam3sp ));
      params( 4253 ) := "+"( Integer'Pos( a_frs1516.smprt1hd ));
      params( 4254 ) := "+"( Integer'Pos( a_frs1516.smprt2hd ));
      params( 4255 ) := "+"( Integer'Pos( a_frs1516.smprt3hd ));
      params( 4256 ) := "+"( Integer'Pos( a_frs1516.smprt1sp ));
      params( 4257 ) := "+"( Integer'Pos( a_frs1516.smprt2sp ));
      params( 4258 ) := "+"( Integer'Pos( a_frs1516.smprt3sp ));
      params( 4259 ) := "+"( Integer'Pos( a_frs1516.sole1hd ));
      params( 4260 ) := "+"( Integer'Pos( a_frs1516.sole2hd ));
      params( 4261 ) := "+"( Integer'Pos( a_frs1516.sole3hd ));
      params( 4262 ) := "+"( Integer'Pos( a_frs1516.sole1sp ));
      params( 4263 ) := "+"( Integer'Pos( a_frs1516.sole2sp ));
      params( 4264 ) := "+"( Integer'Pos( a_frs1516.sole3sp ));
      params( 4265 ) := "+"( Float( a_frs1516.spamt1hd ));
      params( 4266 ) := "+"( Integer'Pos( a_frs1516.spamt2hd ));
      params( 4267 ) := "+"( Integer'Pos( a_frs1516.spamt3hd ));
      params( 4268 ) := "+"( Float( a_frs1516.spamt1sp ));
      params( 4269 ) := "+"( Integer'Pos( a_frs1516.spamt2sp ));
      params( 4270 ) := "+"( Integer'Pos( a_frs1516.spamt3sp ));
      params( 4271 ) := "+"( Integer'Pos( a_frs1516.sppd1hd ));
      params( 4272 ) := "+"( Integer'Pos( a_frs1516.sppd2hd ));
      params( 4273 ) := "+"( Integer'Pos( a_frs1516.sppd3hd ));
      params( 4274 ) := "+"( Integer'Pos( a_frs1516.sppd1sp ));
      params( 4275 ) := "+"( Integer'Pos( a_frs1516.sppd2sp ));
      params( 4276 ) := "+"( Integer'Pos( a_frs1516.sppd3sp ));
      params( 4277 ) := "+"( Integer'Pos( a_frs1516.spsac1hd ));
      params( 4278 ) := "+"( Integer'Pos( a_frs1516.spsac2hd ));
      params( 4279 ) := "+"( Integer'Pos( a_frs1516.spsac3hd ));
      params( 4280 ) := "+"( Integer'Pos( a_frs1516.spsac1sp ));
      params( 4281 ) := "+"( Integer'Pos( a_frs1516.spsac2sp ));
      params( 4282 ) := "+"( Integer'Pos( a_frs1516.spsac3sp ));
      params( 4283 ) := "+"( Float( a_frs1516.spuam1hd ));
      params( 4284 ) := "+"( Integer'Pos( a_frs1516.spuam2hd ));
      params( 4285 ) := "+"( Integer'Pos( a_frs1516.spuam3hd ));
      params( 4286 ) := "+"( Integer'Pos( a_frs1516.spuam1sp ));
      params( 4287 ) := "+"( Integer'Pos( a_frs1516.spuam2sp ));
      params( 4288 ) := "+"( Integer'Pos( a_frs1516.spuam3sp ));
      params( 4289 ) := "+"( Integer'Pos( a_frs1516.spupd1hd ));
      params( 4290 ) := "+"( Integer'Pos( a_frs1516.spupd2hd ));
      params( 4291 ) := "+"( Integer'Pos( a_frs1516.spupd3hd ));
      params( 4292 ) := "+"( Integer'Pos( a_frs1516.spupd1sp ));
      params( 4293 ) := "+"( Integer'Pos( a_frs1516.spupd2sp ));
      params( 4294 ) := "+"( Integer'Pos( a_frs1516.spupd3sp ));
      params( 4295 ) := "+"( Integer'Pos( a_frs1516.spusu1hd ));
      params( 4296 ) := "+"( Integer'Pos( a_frs1516.spusu2hd ));
      params( 4297 ) := "+"( Integer'Pos( a_frs1516.spusu3hd ));
      params( 4298 ) := "+"( Integer'Pos( a_frs1516.spusu1sp ));
      params( 4299 ) := "+"( Integer'Pos( a_frs1516.spusu2sp ));
      params( 4300 ) := "+"( Integer'Pos( a_frs1516.spusu3sp ));
      params( 4301 ) := "+"( Float( a_frs1516.ppamt1hd ));
      params( 4302 ) := "+"( Integer'Pos( a_frs1516.ppamt2hd ));
      params( 4303 ) := "+"( Integer'Pos( a_frs1516.ppamt3hd ));
      params( 4304 ) := "+"( Float( a_frs1516.ppamt1sp ));
      params( 4305 ) := "+"( Integer'Pos( a_frs1516.ppamt2sp ));
      params( 4306 ) := "+"( Integer'Pos( a_frs1516.ppamt3sp ));
      params( 4307 ) := "+"( Float( a_frs1516.sspam1hd ));
      params( 4308 ) := "+"( Float( a_frs1516.sspam2hd ));
      params( 4309 ) := "+"( Integer'Pos( a_frs1516.sspam3hd ));
      params( 4310 ) := "+"( Float( a_frs1516.sspam1sp ));
      params( 4311 ) := "+"( Integer'Pos( a_frs1516.sspam2sp ));
      params( 4312 ) := "+"( Integer'Pos( a_frs1516.sspam3sp ));
      params( 4313 ) := "+"( Integer'Pos( a_frs1516.spsmp1hd ));
      params( 4314 ) := "+"( Integer'Pos( a_frs1516.spsmp2hd ));
      params( 4315 ) := "+"( Integer'Pos( a_frs1516.spsmp3hd ));
      params( 4316 ) := "+"( Integer'Pos( a_frs1516.spsmp1sp ));
      params( 4317 ) := "+"( Integer'Pos( a_frs1516.spsmp2sp ));
      params( 4318 ) := "+"( Integer'Pos( a_frs1516.spsmp3sp ));
      params( 4319 ) := "+"( Float( a_frs1516.taxam1hd ));
      params( 4320 ) := "+"( Float( a_frs1516.taxam2hd ));
      params( 4321 ) := "+"( Integer'Pos( a_frs1516.taxam3hd ));
      params( 4322 ) := "+"( Float( a_frs1516.taxam1sp ));
      params( 4323 ) := "+"( Integer'Pos( a_frs1516.taxam2sp ));
      params( 4324 ) := "+"( Integer'Pos( a_frs1516.taxam3sp ));
      params( 4325 ) := "+"( Float( a_frs1516.taxda1hd ));
      params( 4326 ) := "+"( Float( a_frs1516.taxda2hd ));
      params( 4327 ) := "+"( Float( a_frs1516.taxda3hd ));
      params( 4328 ) := "+"( Float( a_frs1516.taxda1sp ));
      params( 4329 ) := "+"( Float( a_frs1516.taxda2sp ));
      params( 4330 ) := "+"( Integer'Pos( a_frs1516.taxda3sp ));
      params( 4331 ) := "+"( Integer'Pos( a_frs1516.taxpd1hd ));
      params( 4332 ) := "+"( Integer'Pos( a_frs1516.taxpd2hd ));
      params( 4333 ) := "+"( Integer'Pos( a_frs1516.taxpd3hd ));
      params( 4334 ) := "+"( Integer'Pos( a_frs1516.taxpd1sp ));
      params( 4335 ) := "+"( Integer'Pos( a_frs1516.taxpd2sp ));
      params( 4336 ) := "+"( Integer'Pos( a_frs1516.taxpd3sp ));
      params( 4337 ) := "+"( Float( a_frs1516.to1hr1hd ));
      params( 4338 ) := "+"( Float( a_frs1516.to1hr2hd ));
      params( 4339 ) := "+"( Float( a_frs1516.to1hr3hd ));
      params( 4340 ) := "+"( Float( a_frs1516.to1hr1sp ));
      params( 4341 ) := "+"( Float( a_frs1516.to1hr2sp ));
      params( 4342 ) := "+"( Integer'Pos( a_frs1516.to1hr3sp ));
      params( 4343 ) := "+"( Float( a_frs1516.boinu1hd ));
      params( 4344 ) := "+"( Integer'Pos( a_frs1516.boinu2hd ));
      params( 4345 ) := "+"( Integer'Pos( a_frs1516.boinu3hd ));
      params( 4346 ) := "+"( Float( a_frs1516.boinu1sp ));
      params( 4347 ) := "+"( Integer'Pos( a_frs1516.boinu2sp ));
      params( 4348 ) := "+"( Integer'Pos( a_frs1516.boinu3sp ));
      params( 4349 ) := "+"( Integer'Pos( a_frs1516.uincb1hd ));
      params( 4350 ) := "+"( Integer'Pos( a_frs1516.uincb2hd ));
      params( 4351 ) := "+"( Integer'Pos( a_frs1516.uincb3hd ));
      params( 4352 ) := "+"( Integer'Pos( a_frs1516.uincb1sp ));
      params( 4353 ) := "+"( Integer'Pos( a_frs1516.uincb2sp ));
      params( 4354 ) := "+"( Integer'Pos( a_frs1516.uincb3sp ));
      params( 4355 ) := "+"( Float( a_frs1516.uded11hd ));
      params( 4356 ) := "+"( Integer'Pos( a_frs1516.uded12hd ));
      params( 4357 ) := "+"( Integer'Pos( a_frs1516.uded13hd ));
      params( 4358 ) := "+"( Float( a_frs1516.uded11sp ));
      params( 4359 ) := "+"( Integer'Pos( a_frs1516.uded12sp ));
      params( 4360 ) := "+"( Integer'Pos( a_frs1516.uded13sp ));
      params( 4361 ) := "+"( Integer'Pos( a_frs1516.uded21hd ));
      params( 4362 ) := "+"( Integer'Pos( a_frs1516.uded22hd ));
      params( 4363 ) := "+"( Integer'Pos( a_frs1516.uded23hd ));
      params( 4364 ) := "+"( Integer'Pos( a_frs1516.uded21sp ));
      params( 4365 ) := "+"( Integer'Pos( a_frs1516.uded22sp ));
      params( 4366 ) := "+"( Integer'Pos( a_frs1516.uded23sp ));
      params( 4367 ) := "+"( Float( a_frs1516.uded31hd ));
      params( 4368 ) := "+"( Integer'Pos( a_frs1516.uded32hd ));
      params( 4369 ) := "+"( Integer'Pos( a_frs1516.uded33hd ));
      params( 4370 ) := "+"( Integer'Pos( a_frs1516.uded31sp ));
      params( 4371 ) := "+"( Integer'Pos( a_frs1516.uded32sp ));
      params( 4372 ) := "+"( Integer'Pos( a_frs1516.uded33sp ));
      params( 4373 ) := "+"( Integer'Pos( a_frs1516.uded41hd ));
      params( 4374 ) := "+"( Integer'Pos( a_frs1516.uded42hd ));
      params( 4375 ) := "+"( Integer'Pos( a_frs1516.uded43hd ));
      params( 4376 ) := "+"( Integer'Pos( a_frs1516.uded41sp ));
      params( 4377 ) := "+"( Integer'Pos( a_frs1516.uded42sp ));
      params( 4378 ) := "+"( Integer'Pos( a_frs1516.uded43sp ));
      params( 4379 ) := "+"( Float( a_frs1516.uded51hd ));
      params( 4380 ) := "+"( Integer'Pos( a_frs1516.uded52hd ));
      params( 4381 ) := "+"( Integer'Pos( a_frs1516.uded53hd ));
      params( 4382 ) := "+"( Float( a_frs1516.uded51sp ));
      params( 4383 ) := "+"( Integer'Pos( a_frs1516.uded52sp ));
      params( 4384 ) := "+"( Integer'Pos( a_frs1516.uded53sp ));
      params( 4385 ) := "+"( Integer'Pos( a_frs1516.uded61hd ));
      params( 4386 ) := "+"( Integer'Pos( a_frs1516.uded62hd ));
      params( 4387 ) := "+"( Integer'Pos( a_frs1516.uded63hd ));
      params( 4388 ) := "+"( Integer'Pos( a_frs1516.uded61sp ));
      params( 4389 ) := "+"( Integer'Pos( a_frs1516.uded62sp ));
      params( 4390 ) := "+"( Integer'Pos( a_frs1516.uded63sp ));
      params( 4391 ) := "+"( Integer'Pos( a_frs1516.uded71hd ));
      params( 4392 ) := "+"( Integer'Pos( a_frs1516.uded72hd ));
      params( 4393 ) := "+"( Integer'Pos( a_frs1516.uded73hd ));
      params( 4394 ) := "+"( Integer'Pos( a_frs1516.uded71sp ));
      params( 4395 ) := "+"( Integer'Pos( a_frs1516.uded72sp ));
      params( 4396 ) := "+"( Integer'Pos( a_frs1516.uded73sp ));
      params( 4397 ) := "+"( Integer'Pos( a_frs1516.uded81hd ));
      params( 4398 ) := "+"( Integer'Pos( a_frs1516.uded82hd ));
      params( 4399 ) := "+"( Integer'Pos( a_frs1516.uded83hd ));
      params( 4400 ) := "+"( Integer'Pos( a_frs1516.uded81sp ));
      params( 4401 ) := "+"( Integer'Pos( a_frs1516.uded82sp ));
      params( 4402 ) := "+"( Integer'Pos( a_frs1516.uded83sp ));
      params( 4403 ) := "+"( Float( a_frs1516.uded91hd ));
      params( 4404 ) := "+"( Integer'Pos( a_frs1516.uded92hd ));
      params( 4405 ) := "+"( Integer'Pos( a_frs1516.uded93hd ));
      params( 4406 ) := "+"( Integer'Pos( a_frs1516.uded91sp ));
      params( 4407 ) := "+"( Integer'Pos( a_frs1516.uded92sp ));
      params( 4408 ) := "+"( Integer'Pos( a_frs1516.uded93sp ));
      params( 4409 ) := "+"( Float( a_frs1516.ugros1hd ));
      params( 4410 ) := "+"( Float( a_frs1516.ugros2hd ));
      params( 4411 ) := "+"( Integer'Pos( a_frs1516.ugros3hd ));
      params( 4412 ) := "+"( Float( a_frs1516.ugros1sp ));
      params( 4413 ) := "+"( Float( a_frs1516.ugros2sp ));
      params( 4414 ) := "+"( Integer'Pos( a_frs1516.ugros3sp ));
      params( 4415 ) := "+"( aliased_ugrsp1hd'Access );
      params( 4416 ) := "+"( Float( a_frs1516.ugrsp2hd ));
      params( 4417 ) := "+"( Float( a_frs1516.ugrsp3hd ));
      params( 4418 ) := "+"( Float( a_frs1516.ugrsp1sp ));
      params( 4419 ) := "+"( Float( a_frs1516.ugrsp2sp ));
      params( 4420 ) := "+"( Float( a_frs1516.ugrsp3sp ));
      params( 4421 ) := "+"( Integer'Pos( a_frs1516.uinc11hd ));
      params( 4422 ) := "+"( Integer'Pos( a_frs1516.uinc12hd ));
      params( 4423 ) := "+"( Integer'Pos( a_frs1516.uinc13hd ));
      params( 4424 ) := "+"( Integer'Pos( a_frs1516.uinc11sp ));
      params( 4425 ) := "+"( Integer'Pos( a_frs1516.uinc12sp ));
      params( 4426 ) := "+"( Integer'Pos( a_frs1516.uinc13sp ));
      params( 4427 ) := "+"( Integer'Pos( a_frs1516.uinc21hd ));
      params( 4428 ) := "+"( Integer'Pos( a_frs1516.uinc22hd ));
      params( 4429 ) := "+"( Integer'Pos( a_frs1516.uinc23hd ));
      params( 4430 ) := "+"( Integer'Pos( a_frs1516.uinc21sp ));
      params( 4431 ) := "+"( Integer'Pos( a_frs1516.uinc22sp ));
      params( 4432 ) := "+"( Integer'Pos( a_frs1516.uinc23sp ));
      params( 4433 ) := "+"( Integer'Pos( a_frs1516.uinc31hd ));
      params( 4434 ) := "+"( Integer'Pos( a_frs1516.uinc32hd ));
      params( 4435 ) := "+"( Integer'Pos( a_frs1516.uinc33hd ));
      params( 4436 ) := "+"( Integer'Pos( a_frs1516.uinc31sp ));
      params( 4437 ) := "+"( Integer'Pos( a_frs1516.uinc32sp ));
      params( 4438 ) := "+"( Integer'Pos( a_frs1516.uinc33sp ));
      params( 4439 ) := "+"( Integer'Pos( a_frs1516.uinc41hd ));
      params( 4440 ) := "+"( Integer'Pos( a_frs1516.uinc42hd ));
      params( 4441 ) := "+"( Integer'Pos( a_frs1516.uinc43hd ));
      params( 4442 ) := "+"( Integer'Pos( a_frs1516.uinc41sp ));
      params( 4443 ) := "+"( Integer'Pos( a_frs1516.uinc42sp ));
      params( 4444 ) := "+"( Integer'Pos( a_frs1516.uinc43sp ));
      params( 4445 ) := "+"( Integer'Pos( a_frs1516.uinc51hd ));
      params( 4446 ) := "+"( Integer'Pos( a_frs1516.uinc52hd ));
      params( 4447 ) := "+"( Integer'Pos( a_frs1516.uinc53hd ));
      params( 4448 ) := "+"( Integer'Pos( a_frs1516.uinc51sp ));
      params( 4449 ) := "+"( Integer'Pos( a_frs1516.uinc52sp ));
      params( 4450 ) := "+"( Integer'Pos( a_frs1516.uinc53sp ));
      params( 4451 ) := "+"( Integer'Pos( a_frs1516.uinc61hd ));
      params( 4452 ) := "+"( Integer'Pos( a_frs1516.uinc62hd ));
      params( 4453 ) := "+"( Integer'Pos( a_frs1516.uinc63hd ));
      params( 4454 ) := "+"( Integer'Pos( a_frs1516.uinc61sp ));
      params( 4455 ) := "+"( Integer'Pos( a_frs1516.uinc62sp ));
      params( 4456 ) := "+"( Integer'Pos( a_frs1516.uinc63sp ));
      params( 4457 ) := "+"( Integer'Pos( a_frs1516.uinc71hd ));
      params( 4458 ) := "+"( Integer'Pos( a_frs1516.uinc72hd ));
      params( 4459 ) := "+"( Integer'Pos( a_frs1516.uinc73hd ));
      params( 4460 ) := "+"( Integer'Pos( a_frs1516.uinc71sp ));
      params( 4461 ) := "+"( Integer'Pos( a_frs1516.uinc72sp ));
      params( 4462 ) := "+"( Integer'Pos( a_frs1516.uinc73sp ));
      params( 4463 ) := "+"( Float( a_frs1516.umile1hd ));
      params( 4464 ) := "+"( Integer'Pos( a_frs1516.umile2hd ));
      params( 4465 ) := "+"( Integer'Pos( a_frs1516.umile3hd ));
      params( 4466 ) := "+"( Float( a_frs1516.umile1sp ));
      params( 4467 ) := "+"( Integer'Pos( a_frs1516.umile2sp ));
      params( 4468 ) := "+"( Integer'Pos( a_frs1516.umile3sp ));
      params( 4469 ) := "+"( Float( a_frs1516.umot1hd ));
      params( 4470 ) := "+"( Integer'Pos( a_frs1516.umot2hd ));
      params( 4471 ) := "+"( Integer'Pos( a_frs1516.umot3hd ));
      params( 4472 ) := "+"( Float( a_frs1516.umot1sp ));
      params( 4473 ) := "+"( Integer'Pos( a_frs1516.umot2sp ));
      params( 4474 ) := "+"( Integer'Pos( a_frs1516.umot3sp ));
      params( 4475 ) := "+"( Float( a_frs1516.unett1hd ));
      params( 4476 ) := "+"( Float( a_frs1516.unett2hd ));
      params( 4477 ) := "+"( Integer'Pos( a_frs1516.unett3hd ));
      params( 4478 ) := "+"( Float( a_frs1516.unett1sp ));
      params( 4479 ) := "+"( Float( a_frs1516.unett2sp ));
      params( 4480 ) := "+"( Integer'Pos( a_frs1516.unett3sp ));
      params( 4481 ) := "+"( Integer'Pos( a_frs1516.uoth11hd ));
      params( 4482 ) := "+"( Integer'Pos( a_frs1516.uoth12hd ));
      params( 4483 ) := "+"( Integer'Pos( a_frs1516.uoth13hd ));
      params( 4484 ) := "+"( Integer'Pos( a_frs1516.uoth11sp ));
      params( 4485 ) := "+"( Integer'Pos( a_frs1516.uoth12sp ));
      params( 4486 ) := "+"( Integer'Pos( a_frs1516.uoth13sp ));
      params( 4487 ) := "+"( Integer'Pos( a_frs1516.uoth21hd ));
      params( 4488 ) := "+"( Integer'Pos( a_frs1516.uoth22hd ));
      params( 4489 ) := "+"( Integer'Pos( a_frs1516.uoth23hd ));
      params( 4490 ) := "+"( Integer'Pos( a_frs1516.uoth21sp ));
      params( 4491 ) := "+"( Integer'Pos( a_frs1516.uoth22sp ));
      params( 4492 ) := "+"( Integer'Pos( a_frs1516.uoth23sp ));
      params( 4493 ) := "+"( Integer'Pos( a_frs1516.uoth31hd ));
      params( 4494 ) := "+"( Integer'Pos( a_frs1516.uoth32hd ));
      params( 4495 ) := "+"( Integer'Pos( a_frs1516.uoth33hd ));
      params( 4496 ) := "+"( Integer'Pos( a_frs1516.uoth31sp ));
      params( 4497 ) := "+"( Integer'Pos( a_frs1516.uoth32sp ));
      params( 4498 ) := "+"( Integer'Pos( a_frs1516.uoth33sp ));
      params( 4499 ) := "+"( Integer'Pos( a_frs1516.uoth41hd ));
      params( 4500 ) := "+"( Integer'Pos( a_frs1516.uoth42hd ));
      params( 4501 ) := "+"( Integer'Pos( a_frs1516.uoth43hd ));
      params( 4502 ) := "+"( Integer'Pos( a_frs1516.uoth41sp ));
      params( 4503 ) := "+"( Integer'Pos( a_frs1516.uoth42sp ));
      params( 4504 ) := "+"( Integer'Pos( a_frs1516.uoth43sp ));
      params( 4505 ) := "+"( Integer'Pos( a_frs1516.uoth51hd ));
      params( 4506 ) := "+"( Integer'Pos( a_frs1516.uoth52hd ));
      params( 4507 ) := "+"( Integer'Pos( a_frs1516.uoth53hd ));
      params( 4508 ) := "+"( Integer'Pos( a_frs1516.uoth51sp ));
      params( 4509 ) := "+"( Integer'Pos( a_frs1516.uoth52sp ));
      params( 4510 ) := "+"( Integer'Pos( a_frs1516.uoth53sp ));
      params( 4511 ) := "+"( Integer'Pos( a_frs1516.uoth61hd ));
      params( 4512 ) := "+"( Integer'Pos( a_frs1516.uoth62hd ));
      params( 4513 ) := "+"( Integer'Pos( a_frs1516.uoth63hd ));
      params( 4514 ) := "+"( Integer'Pos( a_frs1516.uoth61sp ));
      params( 4515 ) := "+"( Integer'Pos( a_frs1516.uoth62sp ));
      params( 4516 ) := "+"( Integer'Pos( a_frs1516.uoth63sp ));
      params( 4517 ) := "+"( Integer'Pos( a_frs1516.uoth71hd ));
      params( 4518 ) := "+"( Integer'Pos( a_frs1516.uoth72hd ));
      params( 4519 ) := "+"( Integer'Pos( a_frs1516.uoth73hd ));
      params( 4520 ) := "+"( Integer'Pos( a_frs1516.uoth71sp ));
      params( 4521 ) := "+"( Integer'Pos( a_frs1516.uoth72sp ));
      params( 4522 ) := "+"( Integer'Pos( a_frs1516.uoth73sp ));
      params( 4523 ) := "+"( Integer'Pos( a_frs1516.uoth81hd ));
      params( 4524 ) := "+"( Integer'Pos( a_frs1516.uoth82hd ));
      params( 4525 ) := "+"( Integer'Pos( a_frs1516.uoth83hd ));
      params( 4526 ) := "+"( Integer'Pos( a_frs1516.uoth81sp ));
      params( 4527 ) := "+"( Integer'Pos( a_frs1516.uoth82sp ));
      params( 4528 ) := "+"( Integer'Pos( a_frs1516.uoth83sp ));
      params( 4529 ) := "+"( Integer'Pos( a_frs1516.uoth91hd ));
      params( 4530 ) := "+"( Integer'Pos( a_frs1516.uoth92hd ));
      params( 4531 ) := "+"( Integer'Pos( a_frs1516.uoth93hd ));
      params( 4532 ) := "+"( Integer'Pos( a_frs1516.uoth91sp ));
      params( 4533 ) := "+"( Integer'Pos( a_frs1516.uoth92sp ));
      params( 4534 ) := "+"( Integer'Pos( a_frs1516.uoth93sp ));
      params( 4535 ) := "+"( Integer'Pos( a_frs1516.uot101hd ));
      params( 4536 ) := "+"( Integer'Pos( a_frs1516.uot102hd ));
      params( 4537 ) := "+"( Integer'Pos( a_frs1516.uot103hd ));
      params( 4538 ) := "+"( Integer'Pos( a_frs1516.uot101sp ));
      params( 4539 ) := "+"( Integer'Pos( a_frs1516.uot102sp ));
      params( 4540 ) := "+"( Integer'Pos( a_frs1516.uot103sp ));
      params( 4541 ) := "+"( Float( a_frs1516.uotht1hd ));
      params( 4542 ) := "+"( Integer'Pos( a_frs1516.uotht2hd ));
      params( 4543 ) := "+"( Integer'Pos( a_frs1516.uotht3hd ));
      params( 4544 ) := "+"( Integer'Pos( a_frs1516.uotht1sp ));
      params( 4545 ) := "+"( Integer'Pos( a_frs1516.uotht2sp ));
      params( 4546 ) := "+"( Integer'Pos( a_frs1516.uotht3sp ));
      params( 4547 ) := "+"( Float( a_frs1516.uothr1hd ));
      params( 4548 ) := "+"( Float( a_frs1516.uothr2hd ));
      params( 4549 ) := "+"( Integer'Pos( a_frs1516.uothr3hd ));
      params( 4550 ) := "+"( Float( a_frs1516.uothr1sp ));
      params( 4551 ) := "+"( Float( a_frs1516.uothr2sp ));
      params( 4552 ) := "+"( Integer'Pos( a_frs1516.uothr3sp ));
      params( 4553 ) := "+"( Integer'Pos( a_frs1516.upay1hd ));
      params( 4554 ) := "+"( Integer'Pos( a_frs1516.upay2hd ));
      params( 4555 ) := "+"( Integer'Pos( a_frs1516.upay3hd ));
      params( 4556 ) := "+"( Integer'Pos( a_frs1516.upay1sp ));
      params( 4557 ) := "+"( Integer'Pos( a_frs1516.upay2sp ));
      params( 4558 ) := "+"( Integer'Pos( a_frs1516.upay3sp ));
      params( 4559 ) := "+"( Integer'Pos( a_frs1516.usapa1hd ));
      params( 4560 ) := "+"( Integer'Pos( a_frs1516.usapa2hd ));
      params( 4561 ) := "+"( Integer'Pos( a_frs1516.usapa3hd ));
      params( 4562 ) := "+"( Integer'Pos( a_frs1516.usapa1sp ));
      params( 4563 ) := "+"( Integer'Pos( a_frs1516.usapa2sp ));
      params( 4564 ) := "+"( Integer'Pos( a_frs1516.usapa3sp ));
      params( 4565 ) := "+"( Float( a_frs1516.uspam1hd ));
      params( 4566 ) := "+"( Integer'Pos( a_frs1516.uspam2hd ));
      params( 4567 ) := "+"( Integer'Pos( a_frs1516.uspam3hd ));
      params( 4568 ) := "+"( Float( a_frs1516.uspam1sp ));
      params( 4569 ) := "+"( Integer'Pos( a_frs1516.uspam2sp ));
      params( 4570 ) := "+"( Integer'Pos( a_frs1516.uspam3sp ));
      params( 4571 ) := "+"( Integer'Pos( a_frs1516.uspra1hd ));
      params( 4572 ) := "+"( Integer'Pos( a_frs1516.uspra2hd ));
      params( 4573 ) := "+"( Integer'Pos( a_frs1516.uspra3hd ));
      params( 4574 ) := "+"( Integer'Pos( a_frs1516.uspra1sp ));
      params( 4575 ) := "+"( Integer'Pos( a_frs1516.uspra2sp ));
      params( 4576 ) := "+"( Integer'Pos( a_frs1516.uspra3sp ));
      params( 4577 ) := "+"( Integer'Pos( a_frs1516.uppam1hd ));
      params( 4578 ) := "+"( Integer'Pos( a_frs1516.uppam2hd ));
      params( 4579 ) := "+"( Integer'Pos( a_frs1516.uppam3hd ));
      params( 4580 ) := "+"( Integer'Pos( a_frs1516.uppam1sp ));
      params( 4581 ) := "+"( Integer'Pos( a_frs1516.uppam2sp ));
      params( 4582 ) := "+"( Integer'Pos( a_frs1516.uppam3sp ));
      params( 4583 ) := "+"( Float( a_frs1516.usspa1hd ));
      params( 4584 ) := "+"( Integer'Pos( a_frs1516.usspa2hd ));
      params( 4585 ) := "+"( Integer'Pos( a_frs1516.usspa3hd ));
      params( 4586 ) := "+"( Integer'Pos( a_frs1516.usspa1sp ));
      params( 4587 ) := "+"( Integer'Pos( a_frs1516.usspa2sp ));
      params( 4588 ) := "+"( Integer'Pos( a_frs1516.usspa3sp ));
      params( 4589 ) := "+"( Float( a_frs1516.to2hr1hd ));
      params( 4590 ) := "+"( Float( a_frs1516.to2hr2hd ));
      params( 4591 ) := "+"( Integer'Pos( a_frs1516.to2hr3hd ));
      params( 4592 ) := "+"( Float( a_frs1516.to2hr1sp ));
      params( 4593 ) := "+"( Float( a_frs1516.to2hr2sp ));
      params( 4594 ) := "+"( Integer'Pos( a_frs1516.to2hr3sp ));
      params( 4595 ) := "+"( Float( a_frs1516.utaxa1hd ));
      params( 4596 ) := "+"( Integer'Pos( a_frs1516.utaxa2hd ));
      params( 4597 ) := "+"( Integer'Pos( a_frs1516.utaxa3hd ));
      params( 4598 ) := "+"( Float( a_frs1516.utaxa1sp ));
      params( 4599 ) := "+"( Integer'Pos( a_frs1516.utaxa2sp ));
      params( 4600 ) := "+"( Integer'Pos( a_frs1516.utaxa3sp ));
      params( 4601 ) := "+"( Float( a_frs1516.vcamt1hd ));
      params( 4602 ) := "+"( Integer'Pos( a_frs1516.vcamt2hd ));
      params( 4603 ) := "+"( Integer'Pos( a_frs1516.vcamt3hd ));
      params( 4604 ) := "+"( Float( a_frs1516.vcamt1sp ));
      params( 4605 ) := "+"( Integer'Pos( a_frs1516.vcamt2sp ));
      params( 4606 ) := "+"( Integer'Pos( a_frs1516.vcamt3sp ));
      params( 4607 ) := "+"( Integer'Pos( a_frs1516.vcpd1hd ));
      params( 4608 ) := "+"( Integer'Pos( a_frs1516.vcpd2hd ));
      params( 4609 ) := "+"( Integer'Pos( a_frs1516.vcpd3hd ));
      params( 4610 ) := "+"( Integer'Pos( a_frs1516.vcpd1sp ));
      params( 4611 ) := "+"( Integer'Pos( a_frs1516.vcpd2sp ));
      params( 4612 ) := "+"( Integer'Pos( a_frs1516.vcpd3sp ));
      params( 4613 ) := "+"( Integer'Pos( a_frs1516.vcsac1hd ));
      params( 4614 ) := "+"( Integer'Pos( a_frs1516.vcsac2hd ));
      params( 4615 ) := "+"( Integer'Pos( a_frs1516.vcsac3hd ));
      params( 4616 ) := "+"( Integer'Pos( a_frs1516.vcsac1sp ));
      params( 4617 ) := "+"( Integer'Pos( a_frs1516.vcsac2sp ));
      params( 4618 ) := "+"( Integer'Pos( a_frs1516.vcsac3sp ));
      params( 4619 ) := "+"( Integer'Pos( a_frs1516.vcuam1hd ));
      params( 4620 ) := "+"( Integer'Pos( a_frs1516.vcuam2hd ));
      params( 4621 ) := "+"( Integer'Pos( a_frs1516.vcuam3hd ));
      params( 4622 ) := "+"( Integer'Pos( a_frs1516.vcuam1sp ));
      params( 4623 ) := "+"( Integer'Pos( a_frs1516.vcuam2sp ));
      params( 4624 ) := "+"( Integer'Pos( a_frs1516.vcuam3sp ));
      params( 4625 ) := "+"( Integer'Pos( a_frs1516.vcupd1hd ));
      params( 4626 ) := "+"( Integer'Pos( a_frs1516.vcupd2hd ));
      params( 4627 ) := "+"( Integer'Pos( a_frs1516.vcupd3hd ));
      params( 4628 ) := "+"( Integer'Pos( a_frs1516.vcupd1sp ));
      params( 4629 ) := "+"( Integer'Pos( a_frs1516.vcupd2sp ));
      params( 4630 ) := "+"( Integer'Pos( a_frs1516.vcupd3sp ));
      params( 4631 ) := "+"( Integer'Pos( a_frs1516.vcusu1hd ));
      params( 4632 ) := "+"( Integer'Pos( a_frs1516.vcusu2hd ));
      params( 4633 ) := "+"( Integer'Pos( a_frs1516.vcusu3hd ));
      params( 4634 ) := "+"( Integer'Pos( a_frs1516.vcusu1sp ));
      params( 4635 ) := "+"( Integer'Pos( a_frs1516.vcusu2sp ));
      params( 4636 ) := "+"( Integer'Pos( a_frs1516.vcusu3sp ));
      params( 4637 ) := "+"( Integer'Pos( a_frs1516.nou011hd ));
      params( 4638 ) := "+"( Integer'Pos( a_frs1516.nou012hd ));
      params( 4639 ) := "+"( Integer'Pos( a_frs1516.nou013hd ));
      params( 4640 ) := "+"( Integer'Pos( a_frs1516.nou011sp ));
      params( 4641 ) := "+"( Integer'Pos( a_frs1516.nou012sp ));
      params( 4642 ) := "+"( Integer'Pos( a_frs1516.nou013sp ));
      params( 4643 ) := "+"( Integer'Pos( a_frs1516.nou021hd ));
      params( 4644 ) := "+"( Integer'Pos( a_frs1516.nou022hd ));
      params( 4645 ) := "+"( Integer'Pos( a_frs1516.nou023hd ));
      params( 4646 ) := "+"( Integer'Pos( a_frs1516.nou021sp ));
      params( 4647 ) := "+"( Integer'Pos( a_frs1516.nou022sp ));
      params( 4648 ) := "+"( Integer'Pos( a_frs1516.nou023sp ));
      params( 4649 ) := "+"( Integer'Pos( a_frs1516.nou031hd ));
      params( 4650 ) := "+"( Integer'Pos( a_frs1516.nou032hd ));
      params( 4651 ) := "+"( Integer'Pos( a_frs1516.nou033hd ));
      params( 4652 ) := "+"( Integer'Pos( a_frs1516.nou031sp ));
      params( 4653 ) := "+"( Integer'Pos( a_frs1516.nou032sp ));
      params( 4654 ) := "+"( Integer'Pos( a_frs1516.nou033sp ));
      params( 4655 ) := "+"( Integer'Pos( a_frs1516.nou041hd ));
      params( 4656 ) := "+"( Integer'Pos( a_frs1516.nou042hd ));
      params( 4657 ) := "+"( Integer'Pos( a_frs1516.nou043hd ));
      params( 4658 ) := "+"( Integer'Pos( a_frs1516.nou041sp ));
      params( 4659 ) := "+"( Integer'Pos( a_frs1516.nou042sp ));
      params( 4660 ) := "+"( Integer'Pos( a_frs1516.nou043sp ));
      params( 4661 ) := "+"( Integer'Pos( a_frs1516.nou051hd ));
      params( 4662 ) := "+"( Integer'Pos( a_frs1516.nou052hd ));
      params( 4663 ) := "+"( Integer'Pos( a_frs1516.nou053hd ));
      params( 4664 ) := "+"( Integer'Pos( a_frs1516.nou051sp ));
      params( 4665 ) := "+"( Integer'Pos( a_frs1516.nou052sp ));
      params( 4666 ) := "+"( Integer'Pos( a_frs1516.nou053sp ));
      params( 4667 ) := "+"( Integer'Pos( a_frs1516.nou061hd ));
      params( 4668 ) := "+"( Integer'Pos( a_frs1516.nou062hd ));
      params( 4669 ) := "+"( Integer'Pos( a_frs1516.nou063hd ));
      params( 4670 ) := "+"( Integer'Pos( a_frs1516.nou061sp ));
      params( 4671 ) := "+"( Integer'Pos( a_frs1516.nou062sp ));
      params( 4672 ) := "+"( Integer'Pos( a_frs1516.nou063sp ));
      params( 4673 ) := "+"( Integer'Pos( a_frs1516.nou071hd ));
      params( 4674 ) := "+"( Integer'Pos( a_frs1516.nou072hd ));
      params( 4675 ) := "+"( Integer'Pos( a_frs1516.nou073hd ));
      params( 4676 ) := "+"( Integer'Pos( a_frs1516.nou071sp ));
      params( 4677 ) := "+"( Integer'Pos( a_frs1516.nou072sp ));
      params( 4678 ) := "+"( Integer'Pos( a_frs1516.nou073sp ));
      params( 4679 ) := "+"( Integer'Pos( a_frs1516.nou081hd ));
      params( 4680 ) := "+"( Integer'Pos( a_frs1516.nou082hd ));
      params( 4681 ) := "+"( Integer'Pos( a_frs1516.nou083hd ));
      params( 4682 ) := "+"( Integer'Pos( a_frs1516.nou081sp ));
      params( 4683 ) := "+"( Integer'Pos( a_frs1516.nou082sp ));
      params( 4684 ) := "+"( Integer'Pos( a_frs1516.nou083sp ));
      params( 4685 ) := "+"( Integer'Pos( a_frs1516.nou091hd ));
      params( 4686 ) := "+"( Integer'Pos( a_frs1516.nou092hd ));
      params( 4687 ) := "+"( Integer'Pos( a_frs1516.nou093hd ));
      params( 4688 ) := "+"( Integer'Pos( a_frs1516.nou091sp ));
      params( 4689 ) := "+"( Integer'Pos( a_frs1516.nou092sp ));
      params( 4690 ) := "+"( Integer'Pos( a_frs1516.nou093sp ));
      params( 4691 ) := "+"( Integer'Pos( a_frs1516.nou101hd ));
      params( 4692 ) := "+"( Integer'Pos( a_frs1516.nou102hd ));
      params( 4693 ) := "+"( Integer'Pos( a_frs1516.nou103hd ));
      params( 4694 ) := "+"( Integer'Pos( a_frs1516.nou101sp ));
      params( 4695 ) := "+"( Integer'Pos( a_frs1516.nou102sp ));
      params( 4696 ) := "+"( Integer'Pos( a_frs1516.nou103sp ));
      params( 4697 ) := "+"( Integer'Pos( a_frs1516.nou111hd ));
      params( 4698 ) := "+"( Integer'Pos( a_frs1516.nou112hd ));
      params( 4699 ) := "+"( Integer'Pos( a_frs1516.nou113hd ));
      params( 4700 ) := "+"( Integer'Pos( a_frs1516.nou111sp ));
      params( 4701 ) := "+"( Integer'Pos( a_frs1516.nou112sp ));
      params( 4702 ) := "+"( Integer'Pos( a_frs1516.nou113sp ));
      params( 4703 ) := "+"( Integer'Pos( a_frs1516.nou121hd ));
      params( 4704 ) := "+"( Integer'Pos( a_frs1516.nou122hd ));
      params( 4705 ) := "+"( Integer'Pos( a_frs1516.nou123hd ));
      params( 4706 ) := "+"( Integer'Pos( a_frs1516.nou121sp ));
      params( 4707 ) := "+"( Integer'Pos( a_frs1516.nou122sp ));
      params( 4708 ) := "+"( Integer'Pos( a_frs1516.nou123sp ));
      params( 4709 ) := "+"( Integer'Pos( a_frs1516.nou131hd ));
      params( 4710 ) := "+"( Integer'Pos( a_frs1516.nou132hd ));
      params( 4711 ) := "+"( Integer'Pos( a_frs1516.nou133hd ));
      params( 4712 ) := "+"( Integer'Pos( a_frs1516.nou131sp ));
      params( 4713 ) := "+"( Integer'Pos( a_frs1516.nou132sp ));
      params( 4714 ) := "+"( Integer'Pos( a_frs1516.nou133sp ));
      params( 4715 ) := "+"( Integer'Pos( a_frs1516.nou141hd ));
      params( 4716 ) := "+"( Integer'Pos( a_frs1516.nou142hd ));
      params( 4717 ) := "+"( Integer'Pos( a_frs1516.nou143hd ));
      params( 4718 ) := "+"( Integer'Pos( a_frs1516.nou141sp ));
      params( 4719 ) := "+"( Integer'Pos( a_frs1516.nou142sp ));
      params( 4720 ) := "+"( Integer'Pos( a_frs1516.nou143sp ));
      params( 4721 ) := "+"( Integer'Pos( a_frs1516.worka1hd ));
      params( 4722 ) := "+"( Integer'Pos( a_frs1516.worka2hd ));
      params( 4723 ) := "+"( Integer'Pos( a_frs1516.worka3hd ));
      params( 4724 ) := "+"( Integer'Pos( a_frs1516.worka1sp ));
      params( 4725 ) := "+"( Integer'Pos( a_frs1516.worka2sp ));
      params( 4726 ) := "+"( Integer'Pos( a_frs1516.worka3sp ));
      params( 4727 ) := "+"( Integer'Pos( a_frs1516.workm1hd ));
      params( 4728 ) := "+"( Integer'Pos( a_frs1516.workm2hd ));
      params( 4729 ) := "+"( Integer'Pos( a_frs1516.workm3hd ));
      params( 4730 ) := "+"( Integer'Pos( a_frs1516.workm1sp ));
      params( 4731 ) := "+"( Integer'Pos( a_frs1516.workm2sp ));
      params( 4732 ) := "+"( Integer'Pos( a_frs1516.workm3sp ));
      params( 4733 ) := "+"( Integer'Pos( a_frs1516.worky1hd ));
      params( 4734 ) := "+"( Integer'Pos( a_frs1516.worky2hd ));
      params( 4735 ) := "+"( Integer'Pos( a_frs1516.worky3hd ));
      params( 4736 ) := "+"( Integer'Pos( a_frs1516.worky1sp ));
      params( 4737 ) := "+"( Integer'Pos( a_frs1516.worky2sp ));
      params( 4738 ) := "+"( Integer'Pos( a_frs1516.worky3sp ));
      params( 4739 ) := "+"( Integer'Pos( a_frs1516.yjchg1hd ));
      params( 4740 ) := "+"( Integer'Pos( a_frs1516.yjchg2hd ));
      params( 4741 ) := "+"( Integer'Pos( a_frs1516.yjchg3hd ));
      params( 4742 ) := "+"( Integer'Pos( a_frs1516.yjchg1sp ));
      params( 4743 ) := "+"( Integer'Pos( a_frs1516.yjchg2sp ));
      params( 4744 ) := "+"( Integer'Pos( a_frs1516.yjchg3sp ));
      params( 4745 ) := "+"( Float( a_frs1516.mp1hd ));
      params( 4746 ) := "+"( Float( a_frs1516.mp2hd ));
      params( 4747 ) := "+"( Float( a_frs1516.mp3hd ));
      params( 4748 ) := "+"( Float( a_frs1516.mp1sp ));
      params( 4749 ) := "+"( Float( a_frs1516.mp2sp ));
      params( 4750 ) := "+"( Integer'Pos( a_frs1516.mp3sp ));
      params( 4751 ) := "+"( Integer'Pos( a_frs1516.mrar11hd ));
      params( 4752 ) := "+"( Integer'Pos( a_frs1516.mrar12hd ));
      params( 4753 ) := "+"( Integer'Pos( a_frs1516.mrar13hd ));
      params( 4754 ) := "+"( Integer'Pos( a_frs1516.mrar11sp ));
      params( 4755 ) := "+"( Integer'Pos( a_frs1516.mrar12sp ));
      params( 4756 ) := "+"( Integer'Pos( a_frs1516.mrar13sp ));
      params( 4757 ) := "+"( Integer'Pos( a_frs1516.mrar21hd ));
      params( 4758 ) := "+"( Integer'Pos( a_frs1516.mrar22hd ));
      params( 4759 ) := "+"( Integer'Pos( a_frs1516.mrar23hd ));
      params( 4760 ) := "+"( Integer'Pos( a_frs1516.mrar21sp ));
      params( 4761 ) := "+"( Integer'Pos( a_frs1516.mrar22sp ));
      params( 4762 ) := "+"( Integer'Pos( a_frs1516.mrar23sp ));
      params( 4763 ) := "+"( Integer'Pos( a_frs1516.mrar31hd ));
      params( 4764 ) := "+"( Integer'Pos( a_frs1516.mrar32hd ));
      params( 4765 ) := "+"( Integer'Pos( a_frs1516.mrar33hd ));
      params( 4766 ) := "+"( Integer'Pos( a_frs1516.mrar31sp ));
      params( 4767 ) := "+"( Integer'Pos( a_frs1516.mrar32sp ));
      params( 4768 ) := "+"( Integer'Pos( a_frs1516.mrar33sp ));
      params( 4769 ) := "+"( Integer'Pos( a_frs1516.mrar41hd ));
      params( 4770 ) := "+"( Integer'Pos( a_frs1516.mrar42hd ));
      params( 4771 ) := "+"( Integer'Pos( a_frs1516.mrar43hd ));
      params( 4772 ) := "+"( Integer'Pos( a_frs1516.mrar41sp ));
      params( 4773 ) := "+"( Integer'Pos( a_frs1516.mrar42sp ));
      params( 4774 ) := "+"( Integer'Pos( a_frs1516.mrar43sp ));
      params( 4775 ) := "+"( Integer'Pos( a_frs1516.mrar51hd ));
      params( 4776 ) := "+"( Integer'Pos( a_frs1516.mrar52hd ));
      params( 4777 ) := "+"( Integer'Pos( a_frs1516.mrar53hd ));
      params( 4778 ) := "+"( Integer'Pos( a_frs1516.mrar51sp ));
      params( 4779 ) := "+"( Integer'Pos( a_frs1516.mrar52sp ));
      params( 4780 ) := "+"( Integer'Pos( a_frs1516.mrar53sp ));
      params( 4781 ) := "+"( Integer'Pos( a_frs1516.mpnch1hd ));
      params( 4782 ) := "+"( Integer'Pos( a_frs1516.mpnch2hd ));
      params( 4783 ) := "+"( Integer'Pos( a_frs1516.mpnch3hd ));
      params( 4784 ) := "+"( Integer'Pos( a_frs1516.mpnch1sp ));
      params( 4785 ) := "+"( Integer'Pos( a_frs1516.mpnch2sp ));
      params( 4786 ) := "+"( Integer'Pos( a_frs1516.mpnch3sp ));
      params( 4787 ) := "+"( Integer'Pos( a_frs1516.pmp1hd ));
      params( 4788 ) := "+"( Integer'Pos( a_frs1516.pmp2hd ));
      params( 4789 ) := "+"( Integer'Pos( a_frs1516.pmp3hd ));
      params( 4790 ) := "+"( Integer'Pos( a_frs1516.pmp1sp ));
      params( 4791 ) := "+"( Integer'Pos( a_frs1516.pmp2sp ));
      params( 4792 ) := "+"( Integer'Pos( a_frs1516.pmp3sp ));
      params( 4793 ) := "+"( Float( a_frs1516.ump1hd ));
      params( 4794 ) := "+"( Float( a_frs1516.ump2hd ));
      params( 4795 ) := "+"( Integer'Pos( a_frs1516.ump3hd ));
      params( 4796 ) := "+"( Float( a_frs1516.ump1sp ));
      params( 4797 ) := "+"( Integer'Pos( a_frs1516.ump2sp ));
      params( 4798 ) := "+"( Integer'Pos( a_frs1516.ump3sp ));
      params( 4799 ) := "+"( Integer'Pos( a_frs1516.pump1hd ));
      params( 4800 ) := "+"( Integer'Pos( a_frs1516.pump2hd ));
      params( 4801 ) := "+"( Integer'Pos( a_frs1516.pump3hd ));
      params( 4802 ) := "+"( Integer'Pos( a_frs1516.pump1sp ));
      params( 4803 ) := "+"( Integer'Pos( a_frs1516.pump2sp ));
      params( 4804 ) := "+"( Integer'Pos( a_frs1516.pump3sp ));
      params( 4805 ) := "+"( Integer'Pos( a_frs1516.isump1hd ));
      params( 4806 ) := "+"( Integer'Pos( a_frs1516.isump2hd ));
      params( 4807 ) := "+"( Integer'Pos( a_frs1516.isump3hd ));
      params( 4808 ) := "+"( Integer'Pos( a_frs1516.isump1sp ));
      params( 4809 ) := "+"( Integer'Pos( a_frs1516.isump2sp ));
      params( 4810 ) := "+"( Integer'Pos( a_frs1516.isump3sp ));
      params( 4811 ) := "+"( Integer'Pos( a_frs1516.jobst1hd ));
      params( 4812 ) := "+"( Integer'Pos( a_frs1516.jobst2hd ));
      params( 4813 ) := "+"( Integer'Pos( a_frs1516.jobst1sp ));
      params( 4814 ) := "+"( Integer'Pos( a_frs1516.jobst2sp ));
      params( 4815 ) := "+"( Integer'Pos( a_frs1516.oddtp1hd ));
      params( 4816 ) := "+"( Integer'Pos( a_frs1516.oddtp2hd ));
      params( 4817 ) := "+"( Integer'Pos( a_frs1516.oddtp1sp ));
      params( 4818 ) := "+"( Integer'Pos( a_frs1516.oddtp2sp ));
      params( 4819 ) := "+"( Float( a_frs1516.oddjb1hd ));
      params( 4820 ) := "+"( Float( a_frs1516.oddjb2hd ));
      params( 4821 ) := "+"( Float( a_frs1516.oddjb1sp ));
      params( 4822 ) := "+"( Integer'Pos( a_frs1516.oddjb2sp ));
      params( 4823 ) := "+"( Integer'Pos( a_frs1516.oddjn1hd ));
      params( 4824 ) := "+"( Integer'Pos( a_frs1516.oddjn2hd ));
      params( 4825 ) := "+"( Integer'Pos( a_frs1516.oddjn1sp ));
      params( 4826 ) := "+"( Integer'Pos( a_frs1516.oddjn2sp ));
      params( 4827 ) := "+"( Integer'Pos( a_frs1516.poth1hd ));
      params( 4828 ) := "+"( Integer'Pos( a_frs1516.poth2hd ));
      params( 4829 ) := "+"( Integer'Pos( a_frs1516.poth3hd ));
      params( 4830 ) := "+"( Integer'Pos( a_frs1516.poth4hd ));
      params( 4831 ) := "+"( Integer'Pos( a_frs1516.poth5hd ));
      params( 4832 ) := "+"( Integer'Pos( a_frs1516.poth6hd ));
      params( 4833 ) := "+"( Integer'Pos( a_frs1516.poth7hd ));
      params( 4834 ) := "+"( Integer'Pos( a_frs1516.poth8hd ));
      params( 4835 ) := "+"( Integer'Pos( a_frs1516.poth9hd ));
      params( 4836 ) := "+"( Integer'Pos( a_frs1516.poth10hd ));
      params( 4837 ) := "+"( Integer'Pos( a_frs1516.poth11hd ));
      params( 4838 ) := "+"( Integer'Pos( a_frs1516.poth12hd ));
      params( 4839 ) := "+"( Integer'Pos( a_frs1516.poth13hd ));
      params( 4840 ) := "+"( Integer'Pos( a_frs1516.poth14hd ));
      params( 4841 ) := "+"( Integer'Pos( a_frs1516.poth15hd ));
      params( 4842 ) := "+"( Integer'Pos( a_frs1516.poth16hd ));
      params( 4843 ) := "+"( Integer'Pos( a_frs1516.poth17hd ));
      params( 4844 ) := "+"( Integer'Pos( a_frs1516.poth18hd ));
      params( 4845 ) := "+"( Integer'Pos( a_frs1516.poth19hd ));
      params( 4846 ) := "+"( Integer'Pos( a_frs1516.poth1sp ));
      params( 4847 ) := "+"( Integer'Pos( a_frs1516.poth2sp ));
      params( 4848 ) := "+"( Integer'Pos( a_frs1516.poth3sp ));
      params( 4849 ) := "+"( Integer'Pos( a_frs1516.poth4sp ));
      params( 4850 ) := "+"( Integer'Pos( a_frs1516.poth5sp ));
      params( 4851 ) := "+"( Integer'Pos( a_frs1516.poth6sp ));
      params( 4852 ) := "+"( Integer'Pos( a_frs1516.poth7sp ));
      params( 4853 ) := "+"( Integer'Pos( a_frs1516.poth8sp ));
      params( 4854 ) := "+"( Integer'Pos( a_frs1516.poth9sp ));
      params( 4855 ) := "+"( Integer'Pos( a_frs1516.poth10sp ));
      params( 4856 ) := "+"( Integer'Pos( a_frs1516.poth11sp ));
      params( 4857 ) := "+"( Integer'Pos( a_frs1516.poth12sp ));
      params( 4858 ) := "+"( Integer'Pos( a_frs1516.poth13sp ));
      params( 4859 ) := "+"( Integer'Pos( a_frs1516.poth14sp ));
      params( 4860 ) := "+"( Integer'Pos( a_frs1516.poth15sp ));
      params( 4861 ) := "+"( Integer'Pos( a_frs1516.poth16sp ));
      params( 4862 ) := "+"( Integer'Pos( a_frs1516.poth17sp ));
      params( 4863 ) := "+"( Integer'Pos( a_frs1516.poth18sp ));
      params( 4864 ) := "+"( Integer'Pos( a_frs1516.poth19sp ));
      params( 4865 ) := "+"( Float( a_frs1516.ocpen1hd ));
      params( 4866 ) := "+"( Float( a_frs1516.ocpen2hd ));
      params( 4867 ) := "+"( Float( a_frs1516.ocpen3hd ));
      params( 4868 ) := "+"( Float( a_frs1516.ocpen4hd ));
      params( 4869 ) := "+"( Float( a_frs1516.wpen1hd ));
      params( 4870 ) := "+"( Float( a_frs1516.wpen2hd ));
      params( 4871 ) := "+"( Float( a_frs1516.wpen3hd ));
      params( 4872 ) := "+"( Float( a_frs1516.ppen1hd ));
      params( 4873 ) := "+"( Float( a_frs1516.ppen2hd ));
      params( 4874 ) := "+"( Float( a_frs1516.ppen3hd ));
      params( 4875 ) := "+"( Float( a_frs1516.tupen1hd ));
      params( 4876 ) := "+"( Integer'Pos( a_frs1516.tupen2hd ));
      params( 4877 ) := "+"( Float( a_frs1516.anpen1hd ));
      params( 4878 ) := "+"( Float( a_frs1516.anpen2hd ));
      params( 4879 ) := "+"( Integer'Pos( a_frs1516.anpen3hd ));
      params( 4880 ) := "+"( Float( a_frs1516.trust1hd ));
      params( 4881 ) := "+"( Integer'Pos( a_frs1516.trust2hd ));
      params( 4882 ) := "+"( Float( a_frs1516.expen1hd ));
      params( 4883 ) := "+"( Integer'Pos( a_frs1516.expen2hd ));
      params( 4884 ) := "+"( Float( a_frs1516.ocpen1sp ));
      params( 4885 ) := "+"( Float( a_frs1516.ocpen2sp ));
      params( 4886 ) := "+"( Float( a_frs1516.ocpen3sp ));
      params( 4887 ) := "+"( Float( a_frs1516.ocpen4sp ));
      params( 4888 ) := "+"( Float( a_frs1516.wpen1sp ));
      params( 4889 ) := "+"( Integer'Pos( a_frs1516.wpen2sp ));
      params( 4890 ) := "+"( Integer'Pos( a_frs1516.wpen3sp ));
      params( 4891 ) := "+"( Float( a_frs1516.ppen1sp ));
      params( 4892 ) := "+"( Float( a_frs1516.ppen2sp ));
      params( 4893 ) := "+"( Float( a_frs1516.ppen3sp ));
      params( 4894 ) := "+"( Float( a_frs1516.tupen1sp ));
      params( 4895 ) := "+"( Integer'Pos( a_frs1516.tupen2sp ));
      params( 4896 ) := "+"( Float( a_frs1516.anpen1sp ));
      params( 4897 ) := "+"( Float( a_frs1516.anpen2sp ));
      params( 4898 ) := "+"( Integer'Pos( a_frs1516.anpen3sp ));
      params( 4899 ) := "+"( Float( a_frs1516.trust1sp ));
      params( 4900 ) := "+"( Integer'Pos( a_frs1516.trust2sp ));
      params( 4901 ) := "+"( Float( a_frs1516.expen1sp ));
      params( 4902 ) := "+"( Integer'Pos( a_frs1516.expen2sp ));
      params( 4903 ) := "+"( Integer'Pos( a_frs1516.pcpen1hd ));
      params( 4904 ) := "+"( Integer'Pos( a_frs1516.pcpen2hd ));
      params( 4905 ) := "+"( Integer'Pos( a_frs1516.pcpen3hd ));
      params( 4906 ) := "+"( Integer'Pos( a_frs1516.pcpen4hd ));
      params( 4907 ) := "+"( Integer'Pos( a_frs1516.pwpen1hd ));
      params( 4908 ) := "+"( Integer'Pos( a_frs1516.pwpen2hd ));
      params( 4909 ) := "+"( Integer'Pos( a_frs1516.pwpen3hd ));
      params( 4910 ) := "+"( Integer'Pos( a_frs1516.pppen1hd ));
      params( 4911 ) := "+"( Integer'Pos( a_frs1516.pppen2hd ));
      params( 4912 ) := "+"( Integer'Pos( a_frs1516.pppen3hd ));
      params( 4913 ) := "+"( Integer'Pos( a_frs1516.ptupn1hd ));
      params( 4914 ) := "+"( Integer'Pos( a_frs1516.ptupn2hd ));
      params( 4915 ) := "+"( Integer'Pos( a_frs1516.panpn1hd ));
      params( 4916 ) := "+"( Integer'Pos( a_frs1516.panpn2hd ));
      params( 4917 ) := "+"( Integer'Pos( a_frs1516.panpn3hd ));
      params( 4918 ) := "+"( Integer'Pos( a_frs1516.ptrst1hd ));
      params( 4919 ) := "+"( Integer'Pos( a_frs1516.ptrst2hd ));
      params( 4920 ) := "+"( Integer'Pos( a_frs1516.pxpen1hd ));
      params( 4921 ) := "+"( Integer'Pos( a_frs1516.pxpen2hd ));
      params( 4922 ) := "+"( Integer'Pos( a_frs1516.pcpen1sp ));
      params( 4923 ) := "+"( Integer'Pos( a_frs1516.pcpen2sp ));
      params( 4924 ) := "+"( Integer'Pos( a_frs1516.pcpen3sp ));
      params( 4925 ) := "+"( Integer'Pos( a_frs1516.pcpen4sp ));
      params( 4926 ) := "+"( Integer'Pos( a_frs1516.pwpen1sp ));
      params( 4927 ) := "+"( Integer'Pos( a_frs1516.pwpen2sp ));
      params( 4928 ) := "+"( Integer'Pos( a_frs1516.pwpen3sp ));
      params( 4929 ) := "+"( Integer'Pos( a_frs1516.pppen1sp ));
      params( 4930 ) := "+"( Integer'Pos( a_frs1516.pppen2sp ));
      params( 4931 ) := "+"( Integer'Pos( a_frs1516.pppen3sp ));
      params( 4932 ) := "+"( Integer'Pos( a_frs1516.ptupn1sp ));
      params( 4933 ) := "+"( Integer'Pos( a_frs1516.ptupn2sp ));
      params( 4934 ) := "+"( Integer'Pos( a_frs1516.panpn1sp ));
      params( 4935 ) := "+"( Integer'Pos( a_frs1516.panpn2sp ));
      params( 4936 ) := "+"( Integer'Pos( a_frs1516.panpn3sp ));
      params( 4937 ) := "+"( Integer'Pos( a_frs1516.ptrst1sp ));
      params( 4938 ) := "+"( Integer'Pos( a_frs1516.ptrst2sp ));
      params( 4939 ) := "+"( Integer'Pos( a_frs1516.pxpen1sp ));
      params( 4940 ) := "+"( Integer'Pos( a_frs1516.pxpen2sp ));
      params( 4941 ) := "+"( Integer'Pos( a_frs1516.ocptd1hd ));
      params( 4942 ) := "+"( Integer'Pos( a_frs1516.ocptd2hd ));
      params( 4943 ) := "+"( Integer'Pos( a_frs1516.ocptd3hd ));
      params( 4944 ) := "+"( Integer'Pos( a_frs1516.ocptd4hd ));
      params( 4945 ) := "+"( Integer'Pos( a_frs1516.wpptd1hd ));
      params( 4946 ) := "+"( Integer'Pos( a_frs1516.wpptd2hd ));
      params( 4947 ) := "+"( Integer'Pos( a_frs1516.wpptd3hd ));
      params( 4948 ) := "+"( Integer'Pos( a_frs1516.ppetd1hd ));
      params( 4949 ) := "+"( Integer'Pos( a_frs1516.ppetd2hd ));
      params( 4950 ) := "+"( Integer'Pos( a_frs1516.ppetd3hd ));
      params( 4951 ) := "+"( Integer'Pos( a_frs1516.tuptd1hd ));
      params( 4952 ) := "+"( Integer'Pos( a_frs1516.tuptd2hd ));
      params( 4953 ) := "+"( Integer'Pos( a_frs1516.aptd1hd ));
      params( 4954 ) := "+"( Integer'Pos( a_frs1516.aptd2hd ));
      params( 4955 ) := "+"( Integer'Pos( a_frs1516.aptd3hd ));
      params( 4956 ) := "+"( Integer'Pos( a_frs1516.trutd1hd ));
      params( 4957 ) := "+"( Integer'Pos( a_frs1516.trutd2hd ));
      params( 4958 ) := "+"( Integer'Pos( a_frs1516.exptd1hd ));
      params( 4959 ) := "+"( Integer'Pos( a_frs1516.exptd2hd ));
      params( 4960 ) := "+"( Integer'Pos( a_frs1516.ocptd1sp ));
      params( 4961 ) := "+"( Integer'Pos( a_frs1516.ocptd2sp ));
      params( 4962 ) := "+"( Integer'Pos( a_frs1516.ocptd3sp ));
      params( 4963 ) := "+"( Integer'Pos( a_frs1516.ocptd4sp ));
      params( 4964 ) := "+"( Integer'Pos( a_frs1516.wpptd1sp ));
      params( 4965 ) := "+"( Integer'Pos( a_frs1516.wpptd2sp ));
      params( 4966 ) := "+"( Integer'Pos( a_frs1516.wpptd3sp ));
      params( 4967 ) := "+"( Integer'Pos( a_frs1516.ppetd1sp ));
      params( 4968 ) := "+"( Integer'Pos( a_frs1516.ppetd2sp ));
      params( 4969 ) := "+"( Integer'Pos( a_frs1516.ppetd3sp ));
      params( 4970 ) := "+"( Integer'Pos( a_frs1516.tuptd1sp ));
      params( 4971 ) := "+"( Integer'Pos( a_frs1516.tuptd2sp ));
      params( 4972 ) := "+"( Integer'Pos( a_frs1516.aptd1sp ));
      params( 4973 ) := "+"( Integer'Pos( a_frs1516.aptd2sp ));
      params( 4974 ) := "+"( Integer'Pos( a_frs1516.aptd3sp ));
      params( 4975 ) := "+"( Integer'Pos( a_frs1516.trutd1sp ));
      params( 4976 ) := "+"( Integer'Pos( a_frs1516.trutd2sp ));
      params( 4977 ) := "+"( Integer'Pos( a_frs1516.exptd1sp ));
      params( 4978 ) := "+"( Integer'Pos( a_frs1516.exptd2sp ));
      params( 4979 ) := "+"( Integer'Pos( a_frs1516.ocpid1hd ));
      params( 4980 ) := "+"( Integer'Pos( a_frs1516.ocpid2hd ));
      params( 4981 ) := "+"( Integer'Pos( a_frs1516.ocpid3hd ));
      params( 4982 ) := "+"( Integer'Pos( a_frs1516.ocpid4hd ));
      params( 4983 ) := "+"( Integer'Pos( a_frs1516.wwpid1hd ));
      params( 4984 ) := "+"( Integer'Pos( a_frs1516.wwpid2hd ));
      params( 4985 ) := "+"( Integer'Pos( a_frs1516.wwpid3hd ));
      params( 4986 ) := "+"( Integer'Pos( a_frs1516.ppeid1hd ));
      params( 4987 ) := "+"( Integer'Pos( a_frs1516.ppeid2hd ));
      params( 4988 ) := "+"( Integer'Pos( a_frs1516.ppeid3hd ));
      params( 4989 ) := "+"( Integer'Pos( a_frs1516.tupid1hd ));
      params( 4990 ) := "+"( Integer'Pos( a_frs1516.tupid2hd ));
      params( 4991 ) := "+"( Integer'Pos( a_frs1516.apid1hd ));
      params( 4992 ) := "+"( Integer'Pos( a_frs1516.apid2hd ));
      params( 4993 ) := "+"( Integer'Pos( a_frs1516.apid3hd ));
      params( 4994 ) := "+"( Integer'Pos( a_frs1516.truid1hd ));
      params( 4995 ) := "+"( Integer'Pos( a_frs1516.truid2hd ));
      params( 4996 ) := "+"( Integer'Pos( a_frs1516.expid1hd ));
      params( 4997 ) := "+"( Integer'Pos( a_frs1516.expid2hd ));
      params( 4998 ) := "+"( Integer'Pos( a_frs1516.ocpid1sp ));
      params( 4999 ) := "+"( Integer'Pos( a_frs1516.ocpid2sp ));
      params( 5000 ) := "+"( Integer'Pos( a_frs1516.ocpid3sp ));
      params( 5001 ) := "+"( Integer'Pos( a_frs1516.ocpid4sp ));
      params( 5002 ) := "+"( Integer'Pos( a_frs1516.wwpid1sp ));
      params( 5003 ) := "+"( Integer'Pos( a_frs1516.wwpid2sp ));
      params( 5004 ) := "+"( Integer'Pos( a_frs1516.wwpid3sp ));
      params( 5005 ) := "+"( Integer'Pos( a_frs1516.ppeid1sp ));
      params( 5006 ) := "+"( Integer'Pos( a_frs1516.ppeid2sp ));
      params( 5007 ) := "+"( Integer'Pos( a_frs1516.ppeid3sp ));
      params( 5008 ) := "+"( Integer'Pos( a_frs1516.tupid1sp ));
      params( 5009 ) := "+"( Integer'Pos( a_frs1516.tupid2sp ));
      params( 5010 ) := "+"( Integer'Pos( a_frs1516.apid1sp ));
      params( 5011 ) := "+"( Integer'Pos( a_frs1516.apid2sp ));
      params( 5012 ) := "+"( Integer'Pos( a_frs1516.apid3sp ));
      params( 5013 ) := "+"( Integer'Pos( a_frs1516.truid1sp ));
      params( 5014 ) := "+"( Integer'Pos( a_frs1516.truid2sp ));
      params( 5015 ) := "+"( Integer'Pos( a_frs1516.expid1sp ));
      params( 5016 ) := "+"( Integer'Pos( a_frs1516.expid2sp ));
      params( 5017 ) := "+"( Integer'Pos( a_frs1516.ocptx1hd ));
      params( 5018 ) := "+"( Integer'Pos( a_frs1516.ocptx2hd ));
      params( 5019 ) := "+"( Integer'Pos( a_frs1516.ocptx3hd ));
      params( 5020 ) := "+"( Integer'Pos( a_frs1516.ocptx4hd ));
      params( 5021 ) := "+"( Integer'Pos( a_frs1516.wptx1hd ));
      params( 5022 ) := "+"( Integer'Pos( a_frs1516.wpptx2hd ));
      params( 5023 ) := "+"( Integer'Pos( a_frs1516.wpptx3hd ));
      params( 5024 ) := "+"( Integer'Pos( a_frs1516.ppetx1hd ));
      params( 5025 ) := "+"( Integer'Pos( a_frs1516.ppetx2hd ));
      params( 5026 ) := "+"( Integer'Pos( a_frs1516.ppetx3hd ));
      params( 5027 ) := "+"( Integer'Pos( a_frs1516.tuptx1hd ));
      params( 5028 ) := "+"( Integer'Pos( a_frs1516.tuptx2hd ));
      params( 5029 ) := "+"( Integer'Pos( a_frs1516.aptx1hd ));
      params( 5030 ) := "+"( Integer'Pos( a_frs1516.aptx2hd ));
      params( 5031 ) := "+"( Integer'Pos( a_frs1516.aptx3hd ));
      params( 5032 ) := "+"( Integer'Pos( a_frs1516.ttrtx1hd ));
      params( 5033 ) := "+"( Integer'Pos( a_frs1516.ttrtx2hd ));
      params( 5034 ) := "+"( Integer'Pos( a_frs1516.exptx1hd ));
      params( 5035 ) := "+"( Integer'Pos( a_frs1516.exptx2hd ));
      params( 5036 ) := "+"( Integer'Pos( a_frs1516.ocptx1sp ));
      params( 5037 ) := "+"( Integer'Pos( a_frs1516.ocptx2sp ));
      params( 5038 ) := "+"( Integer'Pos( a_frs1516.ocptx3sp ));
      params( 5039 ) := "+"( Integer'Pos( a_frs1516.ocptx4sp ));
      params( 5040 ) := "+"( Integer'Pos( a_frs1516.wptx1sp ));
      params( 5041 ) := "+"( Integer'Pos( a_frs1516.wpptx2sp ));
      params( 5042 ) := "+"( Integer'Pos( a_frs1516.wpptx3sp ));
      params( 5043 ) := "+"( Integer'Pos( a_frs1516.ppetx1sp ));
      params( 5044 ) := "+"( Integer'Pos( a_frs1516.ppetx2sp ));
      params( 5045 ) := "+"( Integer'Pos( a_frs1516.ppetx3sp ));
      params( 5046 ) := "+"( Integer'Pos( a_frs1516.tuptx1sp ));
      params( 5047 ) := "+"( Integer'Pos( a_frs1516.tuptx2sp ));
      params( 5048 ) := "+"( Integer'Pos( a_frs1516.aptx1sp ));
      params( 5049 ) := "+"( Integer'Pos( a_frs1516.aptx2sp ));
      params( 5050 ) := "+"( Integer'Pos( a_frs1516.aptx3sp ));
      params( 5051 ) := "+"( Integer'Pos( a_frs1516.ttrtx1sp ));
      params( 5052 ) := "+"( Integer'Pos( a_frs1516.ttrtx2sp ));
      params( 5053 ) := "+"( Integer'Pos( a_frs1516.exptx1sp ));
      params( 5054 ) := "+"( Integer'Pos( a_frs1516.exptx2sp ));
      params( 5055 ) := "+"( Float( a_frs1516.ocpoa1hd ));
      params( 5056 ) := "+"( Float( a_frs1516.ocpoa2hd ));
      params( 5057 ) := "+"( Integer'Pos( a_frs1516.ocpoa3hd ));
      params( 5058 ) := "+"( Integer'Pos( a_frs1516.ocpoa4hd ));
      params( 5059 ) := "+"( Float( a_frs1516.wpoa1hd ));
      params( 5060 ) := "+"( Integer'Pos( a_frs1516.wwpoa2hd ));
      params( 5061 ) := "+"( Integer'Pos( a_frs1516.wwpoa3hd ));
      params( 5062 ) := "+"( Integer'Pos( a_frs1516.ppeoa1hd ));
      params( 5063 ) := "+"( Integer'Pos( a_frs1516.ppeoa2hd ));
      params( 5064 ) := "+"( Integer'Pos( a_frs1516.ppeoa3hd ));
      params( 5065 ) := "+"( Integer'Pos( a_frs1516.tupoa1hd ));
      params( 5066 ) := "+"( Integer'Pos( a_frs1516.tupoa2hd ));
      params( 5067 ) := "+"( Integer'Pos( a_frs1516.apoa1hd ));
      params( 5068 ) := "+"( Integer'Pos( a_frs1516.apoa2hd ));
      params( 5069 ) := "+"( Integer'Pos( a_frs1516.apoa3hd ));
      params( 5070 ) := "+"( Integer'Pos( a_frs1516.truoa1hd ));
      params( 5071 ) := "+"( Integer'Pos( a_frs1516.truoa2hd ));
      params( 5072 ) := "+"( Integer'Pos( a_frs1516.expoa1hd ));
      params( 5073 ) := "+"( Integer'Pos( a_frs1516.expoa2hd ));
      params( 5074 ) := "+"( Float( a_frs1516.ocpoa1sp ));
      params( 5075 ) := "+"( Integer'Pos( a_frs1516.ocpoa2sp ));
      params( 5076 ) := "+"( Integer'Pos( a_frs1516.ocpoa3sp ));
      params( 5077 ) := "+"( Integer'Pos( a_frs1516.ocpoa4sp ));
      params( 5078 ) := "+"( Float( a_frs1516.wpoa1sp ));
      params( 5079 ) := "+"( Integer'Pos( a_frs1516.wwpoa2sp ));
      params( 5080 ) := "+"( Integer'Pos( a_frs1516.wwpoa3sp ));
      params( 5081 ) := "+"( Integer'Pos( a_frs1516.ppeoa1sp ));
      params( 5082 ) := "+"( Integer'Pos( a_frs1516.ppeoa2sp ));
      params( 5083 ) := "+"( Integer'Pos( a_frs1516.ppeoa3sp ));
      params( 5084 ) := "+"( Integer'Pos( a_frs1516.tupoa1sp ));
      params( 5085 ) := "+"( Integer'Pos( a_frs1516.tupoa2sp ));
      params( 5086 ) := "+"( Integer'Pos( a_frs1516.apoa1sp ));
      params( 5087 ) := "+"( Integer'Pos( a_frs1516.apoa2sp ));
      params( 5088 ) := "+"( Integer'Pos( a_frs1516.apoa3sp ));
      params( 5089 ) := "+"( Integer'Pos( a_frs1516.truoa1sp ));
      params( 5090 ) := "+"( Integer'Pos( a_frs1516.truoa2sp ));
      params( 5091 ) := "+"( Integer'Pos( a_frs1516.expoa1sp ));
      params( 5092 ) := "+"( Integer'Pos( a_frs1516.expoa2sp ));
      params( 5093 ) := "+"( Integer'Pos( a_frs1516.ocpoi1hd ));
      params( 5094 ) := "+"( Integer'Pos( a_frs1516.ocpoi2hd ));
      params( 5095 ) := "+"( Integer'Pos( a_frs1516.ocpoi3hd ));
      params( 5096 ) := "+"( Integer'Pos( a_frs1516.ocpoi4hd ));
      params( 5097 ) := "+"( Integer'Pos( a_frs1516.wpoi1hd ));
      params( 5098 ) := "+"( Integer'Pos( a_frs1516.wwpoi2hd ));
      params( 5099 ) := "+"( Integer'Pos( a_frs1516.wwpoi3hd ));
      params( 5100 ) := "+"( Integer'Pos( a_frs1516.ppeoi1hd ));
      params( 5101 ) := "+"( Integer'Pos( a_frs1516.ppeoi2hd ));
      params( 5102 ) := "+"( Integer'Pos( a_frs1516.ppeoi3hd ));
      params( 5103 ) := "+"( Integer'Pos( a_frs1516.tupoi1hd ));
      params( 5104 ) := "+"( Integer'Pos( a_frs1516.tupoi2hd ));
      params( 5105 ) := "+"( Integer'Pos( a_frs1516.apoi1hd ));
      params( 5106 ) := "+"( Integer'Pos( a_frs1516.apoi2hd ));
      params( 5107 ) := "+"( Integer'Pos( a_frs1516.apoi3hd ));
      params( 5108 ) := "+"( Integer'Pos( a_frs1516.truoi1hd ));
      params( 5109 ) := "+"( Integer'Pos( a_frs1516.truoi2hd ));
      params( 5110 ) := "+"( Integer'Pos( a_frs1516.expoi1hd ));
      params( 5111 ) := "+"( Integer'Pos( a_frs1516.expoi2hd ));
      params( 5112 ) := "+"( Integer'Pos( a_frs1516.ocpoi1sp ));
      params( 5113 ) := "+"( Integer'Pos( a_frs1516.ocpoi2sp ));
      params( 5114 ) := "+"( Integer'Pos( a_frs1516.ocpoi3sp ));
      params( 5115 ) := "+"( Integer'Pos( a_frs1516.ocpoi4sp ));
      params( 5116 ) := "+"( Integer'Pos( a_frs1516.wpoi1sp ));
      params( 5117 ) := "+"( Integer'Pos( a_frs1516.wwpoi2sp ));
      params( 5118 ) := "+"( Integer'Pos( a_frs1516.wwpoi3sp ));
      params( 5119 ) := "+"( Integer'Pos( a_frs1516.ppeoi1sp ));
      params( 5120 ) := "+"( Integer'Pos( a_frs1516.ppeoi2sp ));
      params( 5121 ) := "+"( Integer'Pos( a_frs1516.ppeoi3sp ));
      params( 5122 ) := "+"( Integer'Pos( a_frs1516.tupoi1sp ));
      params( 5123 ) := "+"( Integer'Pos( a_frs1516.tupoi2sp ));
      params( 5124 ) := "+"( Integer'Pos( a_frs1516.apoi1sp ));
      params( 5125 ) := "+"( Integer'Pos( a_frs1516.apoi2sp ));
      params( 5126 ) := "+"( Integer'Pos( a_frs1516.apoi3sp ));
      params( 5127 ) := "+"( Integer'Pos( a_frs1516.truoi1sp ));
      params( 5128 ) := "+"( Integer'Pos( a_frs1516.truoi2sp ));
      params( 5129 ) := "+"( Integer'Pos( a_frs1516.expoi1sp ));
      params( 5130 ) := "+"( Integer'Pos( a_frs1516.expoi2sp ));
      params( 5131 ) := "+"( Float( a_frs1516.ocpta1hd ));
      params( 5132 ) := "+"( Float( a_frs1516.ocpta2hd ));
      params( 5133 ) := "+"( Float( a_frs1516.ocpta3hd ));
      params( 5134 ) := "+"( Float( a_frs1516.ocpta4hd ));
      params( 5135 ) := "+"( Float( a_frs1516.wpta1hd ));
      params( 5136 ) := "+"( Float( a_frs1516.wppta2hd ));
      params( 5137 ) := "+"( Float( a_frs1516.wppta3hd ));
      params( 5138 ) := "+"( Float( a_frs1516.ppeta1hd ));
      params( 5139 ) := "+"( Float( a_frs1516.ppeta2hd ));
      params( 5140 ) := "+"( Float( a_frs1516.ppeta3hd ));
      params( 5141 ) := "+"( Integer'Pos( a_frs1516.tupta1hd ));
      params( 5142 ) := "+"( Integer'Pos( a_frs1516.tupta2hd ));
      params( 5143 ) := "+"( Float( a_frs1516.apta1hd ));
      params( 5144 ) := "+"( Float( a_frs1516.apta2hd ));
      params( 5145 ) := "+"( Integer'Pos( a_frs1516.apta3hd ));
      params( 5146 ) := "+"( Float( a_frs1516.truta1hd ));
      params( 5147 ) := "+"( Integer'Pos( a_frs1516.truta2hd ));
      params( 5148 ) := "+"( Float( a_frs1516.expta1hd ));
      params( 5149 ) := "+"( Integer'Pos( a_frs1516.expta2hd ));
      params( 5150 ) := "+"( Float( a_frs1516.ocpta1sp ));
      params( 5151 ) := "+"( Float( a_frs1516.ocpta2sp ));
      params( 5152 ) := "+"( Float( a_frs1516.ocpta3sp ));
      params( 5153 ) := "+"( Integer'Pos( a_frs1516.ocpta4sp ));
      params( 5154 ) := "+"( Float( a_frs1516.wpta1sp ));
      params( 5155 ) := "+"( Integer'Pos( a_frs1516.wppta2sp ));
      params( 5156 ) := "+"( Integer'Pos( a_frs1516.wppta3sp ));
      params( 5157 ) := "+"( Float( a_frs1516.ppeta1sp ));
      params( 5158 ) := "+"( Float( a_frs1516.ppeta2sp ));
      params( 5159 ) := "+"( Float( a_frs1516.ppeta3sp ));
      params( 5160 ) := "+"( Integer'Pos( a_frs1516.tupta1sp ));
      params( 5161 ) := "+"( Integer'Pos( a_frs1516.tupta2sp ));
      params( 5162 ) := "+"( Float( a_frs1516.apta1sp ));
      params( 5163 ) := "+"( Float( a_frs1516.apta2sp ));
      params( 5164 ) := "+"( Integer'Pos( a_frs1516.apta3sp ));
      params( 5165 ) := "+"( Float( a_frs1516.truta1sp ));
      params( 5166 ) := "+"( Integer'Pos( a_frs1516.truta2sp ));
      params( 5167 ) := "+"( Float( a_frs1516.expta1sp ));
      params( 5168 ) := "+"( Integer'Pos( a_frs1516.expta2sp ));
      params( 5169 ) := "+"( Integer'Pos( a_frs1516.ocpti1hd ));
      params( 5170 ) := "+"( Integer'Pos( a_frs1516.ocpti2hd ));
      params( 5171 ) := "+"( Integer'Pos( a_frs1516.ocpti3hd ));
      params( 5172 ) := "+"( Integer'Pos( a_frs1516.ocpti4hd ));
      params( 5173 ) := "+"( Integer'Pos( a_frs1516.wpti1hd ));
      params( 5174 ) := "+"( Integer'Pos( a_frs1516.wppti2hd ));
      params( 5175 ) := "+"( Integer'Pos( a_frs1516.wppti3hd ));
      params( 5176 ) := "+"( Integer'Pos( a_frs1516.ppeti1hd ));
      params( 5177 ) := "+"( Integer'Pos( a_frs1516.ppeti2hd ));
      params( 5178 ) := "+"( Integer'Pos( a_frs1516.ppeti3hd ));
      params( 5179 ) := "+"( Integer'Pos( a_frs1516.tupti1hd ));
      params( 5180 ) := "+"( Integer'Pos( a_frs1516.tupti2hd ));
      params( 5181 ) := "+"( Integer'Pos( a_frs1516.apti1hd ));
      params( 5182 ) := "+"( Integer'Pos( a_frs1516.apti2hd ));
      params( 5183 ) := "+"( Integer'Pos( a_frs1516.apti3hd ));
      params( 5184 ) := "+"( Integer'Pos( a_frs1516.truti1hd ));
      params( 5185 ) := "+"( Integer'Pos( a_frs1516.truti2hd ));
      params( 5186 ) := "+"( Integer'Pos( a_frs1516.expti1hd ));
      params( 5187 ) := "+"( Integer'Pos( a_frs1516.expti2hd ));
      params( 5188 ) := "+"( Integer'Pos( a_frs1516.ocpti1sp ));
      params( 5189 ) := "+"( Integer'Pos( a_frs1516.ocpti2sp ));
      params( 5190 ) := "+"( Integer'Pos( a_frs1516.ocpti3sp ));
      params( 5191 ) := "+"( Integer'Pos( a_frs1516.ocpti4sp ));
      params( 5192 ) := "+"( Integer'Pos( a_frs1516.wpti1sp ));
      params( 5193 ) := "+"( Integer'Pos( a_frs1516.wppti2sp ));
      params( 5194 ) := "+"( Integer'Pos( a_frs1516.wppti3sp ));
      params( 5195 ) := "+"( Integer'Pos( a_frs1516.ppeti1sp ));
      params( 5196 ) := "+"( Integer'Pos( a_frs1516.ppeti2sp ));
      params( 5197 ) := "+"( Integer'Pos( a_frs1516.ppeti3sp ));
      params( 5198 ) := "+"( Integer'Pos( a_frs1516.tupti1sp ));
      params( 5199 ) := "+"( Integer'Pos( a_frs1516.tupti2sp ));
      params( 5200 ) := "+"( Integer'Pos( a_frs1516.apti1sp ));
      params( 5201 ) := "+"( Integer'Pos( a_frs1516.apti2sp ));
      params( 5202 ) := "+"( Integer'Pos( a_frs1516.apti3sp ));
      params( 5203 ) := "+"( Integer'Pos( a_frs1516.truti1sp ));
      params( 5204 ) := "+"( Integer'Pos( a_frs1516.truti2sp ));
      params( 5205 ) := "+"( Integer'Pos( a_frs1516.expti1sp ));
      params( 5206 ) := "+"( Integer'Pos( a_frs1516.expti2sp ));
      params( 5207 ) := "+"( Integer'Pos( a_frs1516.menpin11 ));
      params( 5208 ) := "+"( Integer'Pos( a_frs1516.menpin12 ));
      params( 5209 ) := "+"( Integer'Pos( a_frs1516.menpin13 ));
      params( 5210 ) := "+"( Integer'Pos( a_frs1516.menpin21 ));
      params( 5211 ) := "+"( Integer'Pos( a_frs1516.menpin22 ));
      params( 5212 ) := "+"( Integer'Pos( a_frs1516.menpin23 ));
      params( 5213 ) := "+"( Integer'Pos( a_frs1516.menpin31 ));
      params( 5214 ) := "+"( Integer'Pos( a_frs1516.menpin32 ));
      params( 5215 ) := "+"( Integer'Pos( a_frs1516.menpin33 ));
      params( 5216 ) := "+"( Float( a_frs1516.menpol11 ));
      params( 5217 ) := "+"( Float( a_frs1516.menpol12 ));
      params( 5218 ) := "+"( Integer'Pos( a_frs1516.menpol13 ));
      params( 5219 ) := "+"( Float( a_frs1516.menpol21 ));
      params( 5220 ) := "+"( Integer'Pos( a_frs1516.menpol22 ));
      params( 5221 ) := "+"( Integer'Pos( a_frs1516.menpol23 ));
      params( 5222 ) := "+"( Integer'Pos( a_frs1516.menpol31 ));
      params( 5223 ) := "+"( Integer'Pos( a_frs1516.menpol32 ));
      params( 5224 ) := "+"( Integer'Pos( a_frs1516.menpol33 ));
      params( 5225 ) := "+"( Integer'Pos( a_frs1516.pmenpo11 ));
      params( 5226 ) := "+"( Integer'Pos( a_frs1516.pmenpo12 ));
      params( 5227 ) := "+"( Integer'Pos( a_frs1516.pmenpo13 ));
      params( 5228 ) := "+"( Integer'Pos( a_frs1516.pmenpo21 ));
      params( 5229 ) := "+"( Integer'Pos( a_frs1516.pmenpo22 ));
      params( 5230 ) := "+"( Integer'Pos( a_frs1516.pmenpo23 ));
      params( 5231 ) := "+"( Integer'Pos( a_frs1516.pmenpo31 ));
      params( 5232 ) := "+"( Integer'Pos( a_frs1516.pmenpo32 ));
      params( 5233 ) := "+"( Integer'Pos( a_frs1516.pmenpo33 ));
      params( 5234 ) := "+"( Integer'Pos( a_frs1516.bedroom ));
      params( 5235 ) := "+"( Integer'Pos( a_frs1516.benunits ));
      params( 5236 ) := "+"( Integer'Pos( a_frs1516.billrate ));
      params( 5237 ) := "+"( Integer'Pos( a_frs1516.brma ));
      params( 5238 ) := "+"( Integer'Pos( a_frs1516.burden ));
      params( 5239 ) := "+"( Integer'Pos( a_frs1516.busroom ));
      params( 5240 ) := "+"( Integer'Pos( a_frs1516.capval ));
      params( 5241 ) := "+"( Integer'Pos( a_frs1516.charge1 ));
      params( 5242 ) := "+"( Integer'Pos( a_frs1516.charge2 ));
      params( 5243 ) := "+"( Integer'Pos( a_frs1516.charge3 ));
      params( 5244 ) := "+"( Integer'Pos( a_frs1516.charge4 ));
      params( 5245 ) := "+"( Integer'Pos( a_frs1516.charge5 ));
      params( 5246 ) := "+"( Integer'Pos( a_frs1516.charge6 ));
      params( 5247 ) := "+"( Integer'Pos( a_frs1516.charge7 ));
      params( 5248 ) := "+"( Integer'Pos( a_frs1516.charge8 ));
      params( 5249 ) := "+"( Integer'Pos( a_frs1516.charge9 ));
      params( 5250 ) := "+"( Integer'Pos( a_frs1516.chins ));
      params( 5251 ) := "+"( Integer'Pos( a_frs1516.chrgpd1 ));
      params( 5252 ) := "+"( Integer'Pos( a_frs1516.chrgpd2 ));
      params( 5253 ) := "+"( Integer'Pos( a_frs1516.chrgpd3 ));
      params( 5254 ) := "+"( Integer'Pos( a_frs1516.chrgpd4 ));
      params( 5255 ) := "+"( Integer'Pos( a_frs1516.chrgpd5 ));
      params( 5256 ) := "+"( Integer'Pos( a_frs1516.chrgpd6 ));
      params( 5257 ) := "+"( Integer'Pos( a_frs1516.chrgpd7 ));
      params( 5258 ) := "+"( Integer'Pos( a_frs1516.chrgpd8 ));
      params( 5259 ) := "+"( Integer'Pos( a_frs1516.chrgpd9 ));
      params( 5260 ) := "+"( Integer'Pos( a_frs1516.covoths ));
      params( 5261 ) := "+"( Float( a_frs1516.csewamt ));
      params( 5262 ) := "+"( Float( a_frs1516.csewamt1 ));
      params( 5263 ) := "+"( Integer'Pos( a_frs1516.ct25d50d ));
      params( 5264 ) := "+"( Integer'Pos( a_frs1516.ctamt ));
      params( 5265 ) := "+"( Integer'Pos( a_frs1516.ctannual ));
      params( 5266 ) := "+"( Integer'Pos( a_frs1516.ctband ));
      params( 5267 ) := "+"( Integer'Pos( a_frs1516.ctbwait ));
      params( 5268 ) := "+"( Integer'Pos( a_frs1516.ctcondoc ));
      params( 5269 ) := "+"( Integer'Pos( a_frs1516.ctdisc ));
      params( 5270 ) := "+"( Integer'Pos( a_frs1516.ctinstal ));
      params( 5271 ) := "+"( Integer'Pos( a_frs1516.ctlvband ));
      params( 5272 ) := "+"( Integer'Pos( a_frs1516.ctlvchk ));
      params( 5273 ) := "+"( Integer'Pos( a_frs1516.ctreb ));
      params( 5274 ) := "+"( Integer'Pos( a_frs1516.ctrebamt ));
      params( 5275 ) := "+"( Integer'Pos( a_frs1516.ctrebpd ));
      params( 5276 ) := "+"( Integer'Pos( a_frs1516.cttime ));
      params( 5277 ) := "+"( Integer'Pos( a_frs1516.cwatamt ));
      params( 5278 ) := "+"( Integer'Pos( a_frs1516.cwatamt1 ));
      params( 5279 ) := "+"( Integer'Pos( a_frs1516.entry1 ));
      params( 5280 ) := "+"( Integer'Pos( a_frs1516.entry2 ));
      params( 5281 ) := "+"( Integer'Pos( a_frs1516.entry3 ));
      params( 5282 ) := "+"( Integer'Pos( a_frs1516.entry4 ));
      params( 5283 ) := "+"( Integer'Pos( a_frs1516.gvtregn ));
      params( 5284 ) := "+"( Integer'Pos( a_frs1516.gvtregno ));
      params( 5285 ) := "+"( Integer'Pos( a_frs1516.hhldr01 ));
      params( 5286 ) := "+"( Integer'Pos( a_frs1516.hhldr02 ));
      params( 5287 ) := "+"( Integer'Pos( a_frs1516.hhldr03 ));
      params( 5288 ) := "+"( Integer'Pos( a_frs1516.hhldr04 ));
      params( 5289 ) := "+"( Integer'Pos( a_frs1516.hhldr05 ));
      params( 5290 ) := "+"( Integer'Pos( a_frs1516.hhldr06 ));
      params( 5291 ) := "+"( Integer'Pos( a_frs1516.hhldr07 ));
      params( 5292 ) := "+"( Integer'Pos( a_frs1516.hhldr08 ));
      params( 5293 ) := "+"( Integer'Pos( a_frs1516.hhldr09 ));
      params( 5294 ) := "+"( Integer'Pos( a_frs1516.hhldr10 ));
      params( 5295 ) := "+"( Integer'Pos( a_frs1516.hhldr11 ));
      params( 5296 ) := "+"( Integer'Pos( a_frs1516.hhldr12 ));
      params( 5297 ) := "+"( Integer'Pos( a_frs1516.hhldr13 ));
      params( 5298 ) := "+"( Integer'Pos( a_frs1516.hhldr14 ));
      params( 5299 ) := "+"( Integer'Pos( a_frs1516.hhldr97 ));
      params( 5300 ) := "+"( Integer'Pos( a_frs1516.hhstat ));
      params( 5301 ) := "+"( Integer'Pos( a_frs1516.hlthst ));
      params( 5302 ) := "+"( a_frs1516.intdate );
      params( 5303 ) := "+"( Integer'Pos( a_frs1516.mainacc ));
      params( 5304 ) := "+"( Integer'Pos( a_frs1516.mnthcode ));
      params( 5305 ) := "+"( Integer'Pos( a_frs1516.monlive ));
      params( 5306 ) := "+"( Integer'Pos( a_frs1516.multi ));
      params( 5307 ) := "+"( Integer'Pos( a_frs1516.nicoun ));
      params( 5308 ) := "+"( Integer'Pos( a_frs1516.nidpnd ));
      params( 5309 ) := "+"( Integer'Pos( a_frs1516.nmrmshar ));
      params( 5310 ) := "+"( Integer'Pos( a_frs1516.nopay ));
      params( 5311 ) := "+"( Integer'Pos( a_frs1516.norate ));
      params( 5312 ) := "+"( Integer'Pos( a_frs1516.onbsroom ));
      params( 5313 ) := "+"( Integer'Pos( a_frs1516.orgid ));
      params( 5314 ) := "+"( Integer'Pos( a_frs1516.payrate ));
      params( 5315 ) := "+"( Integer'Pos( a_frs1516.ptbsroom ));
      params( 5316 ) := "+"( Integer'Pos( a_frs1516.rooms ));
      params( 5317 ) := "+"( Integer'Pos( a_frs1516.roomshr ));
      params( 5318 ) := "+"( Float( a_frs1516.rt2rebam ));
      params( 5319 ) := "+"( Float( a_frs1516.rtannual ));
      params( 5320 ) := "+"( Integer'Pos( a_frs1516.rtcondoc ));
      params( 5321 ) := "+"( Integer'Pos( a_frs1516.rtdpa ));
      params( 5322 ) := "+"( Float( a_frs1516.rtdpaamt ));
      params( 5323 ) := "+"( Integer'Pos( a_frs1516.rtene ));
      params( 5324 ) := "+"( Integer'Pos( a_frs1516.rteneamt ));
      params( 5325 ) := "+"( Integer'Pos( a_frs1516.rtgen ));
      params( 5326 ) := "+"( Integer'Pos( a_frs1516.rtinstal ));
      params( 5327 ) := "+"( Integer'Pos( a_frs1516.rtlpa ));
      params( 5328 ) := "+"( Float( a_frs1516.rtlpaamt ));
      params( 5329 ) := "+"( Float( a_frs1516.rtothamt ));
      params( 5330 ) := "+"( Integer'Pos( a_frs1516.rtother ));
      params( 5331 ) := "+"( Integer'Pos( a_frs1516.rtreb ));
      params( 5332 ) := "+"( Float( a_frs1516.rtrebamt ));
      params( 5333 ) := "+"( Float( a_frs1516.rtrtramt ));
      params( 5334 ) := "+"( Integer'Pos( a_frs1516.rttimepd ));
      params( 5335 ) := "+"( Integer'Pos( a_frs1516.schbrk ));
      params( 5336 ) := "+"( Integer'Pos( a_frs1516.schfrt ));
      params( 5337 ) := "+"( Integer'Pos( a_frs1516.schmeal ));
      params( 5338 ) := "+"( Integer'Pos( a_frs1516.schmilk ));
      params( 5339 ) := "+"( Float( a_frs1516.seramt1 ));
      params( 5340 ) := "+"( Float( a_frs1516.seramt2 ));
      params( 5341 ) := "+"( Float( a_frs1516.seramt3 ));
      params( 5342 ) := "+"( Float( a_frs1516.seramt4 ));
      params( 5343 ) := "+"( Float( a_frs1516.seramt5 ));
      params( 5344 ) := "+"( Integer'Pos( a_frs1516.sercomb ));
      params( 5345 ) := "+"( Integer'Pos( a_frs1516.serpay1 ));
      params( 5346 ) := "+"( Integer'Pos( a_frs1516.serpay2 ));
      params( 5347 ) := "+"( Integer'Pos( a_frs1516.serpay3 ));
      params( 5348 ) := "+"( Integer'Pos( a_frs1516.serpay4 ));
      params( 5349 ) := "+"( Integer'Pos( a_frs1516.serpay5 ));
      params( 5350 ) := "+"( Float( a_frs1516.sewamt ));
      params( 5351 ) := "+"( Float( a_frs1516.sewanul ));
      params( 5352 ) := "+"( Integer'Pos( a_frs1516.sewerpay ));
      params( 5353 ) := "+"( Integer'Pos( a_frs1516.sewsep ));
      params( 5354 ) := "+"( Integer'Pos( a_frs1516.sewtime ));
      params( 5355 ) := "+"( Integer'Pos( a_frs1516.shelter ));
      params( 5356 ) := "+"( Integer'Pos( a_frs1516.sobuy ));
      params( 5357 ) := "+"( Float( a_frs1516.stramt1 ));
      params( 5358 ) := "+"( Float( a_frs1516.stramt2 ));
      params( 5359 ) := "+"( Integer'Pos( a_frs1516.strcov ));
      params( 5360 ) := "+"( Integer'Pos( a_frs1516.strmort ));
      params( 5361 ) := "+"( Integer'Pos( a_frs1516.stroths ));
      params( 5362 ) := "+"( Integer'Pos( a_frs1516.strpd1 ));
      params( 5363 ) := "+"( Integer'Pos( a_frs1516.strpd2 ));
      params( 5364 ) := "+"( Integer'Pos( a_frs1516.suballow ));
      params( 5365 ) := "+"( Integer'Pos( a_frs1516.sublet ));
      params( 5366 ) := "+"( Integer'Pos( a_frs1516.sublety ));
      params( 5367 ) := "+"( Float( a_frs1516.subrent ));
      params( 5368 ) := "+"( Integer'Pos( a_frs1516.tenure ));
      params( 5369 ) := "+"( Integer'Pos( a_frs1516.tvlic ));
      params( 5370 ) := "+"( Integer'Pos( a_frs1516.typeacc ));
      params( 5371 ) := "+"( Integer'Pos( a_frs1516.urb ));
      params( 5372 ) := "+"( Integer'Pos( a_frs1516.urbrur ));
      params( 5373 ) := "+"( Integer'Pos( a_frs1516.urindew ));
      params( 5374 ) := "+"( Integer'Pos( a_frs1516.urinds ));
      params( 5375 ) := "+"( Float( a_frs1516.watamt ));
      params( 5376 ) := "+"( Float( a_frs1516.watanul ));
      params( 5377 ) := "+"( Integer'Pos( a_frs1516.watermet ));
      params( 5378 ) := "+"( Integer'Pos( a_frs1516.waterpay ));
      params( 5379 ) := "+"( Integer'Pos( a_frs1516.watrb ));
      params( 5380 ) := "+"( Integer'Pos( a_frs1516.wattime ));
      params( 5381 ) := "+"( Integer'Pos( a_frs1516.whoctbot ));
      params( 5382 ) := "+"( Integer'Pos( a_frs1516.whorsp01 ));
      params( 5383 ) := "+"( Integer'Pos( a_frs1516.whorsp02 ));
      params( 5384 ) := "+"( Integer'Pos( a_frs1516.whorsp03 ));
      params( 5385 ) := "+"( Integer'Pos( a_frs1516.whorsp04 ));
      params( 5386 ) := "+"( Integer'Pos( a_frs1516.whorsp05 ));
      params( 5387 ) := "+"( Integer'Pos( a_frs1516.whorsp06 ));
      params( 5388 ) := "+"( Integer'Pos( a_frs1516.whorsp07 ));
      params( 5389 ) := "+"( Integer'Pos( a_frs1516.whorsp08 ));
      params( 5390 ) := "+"( Integer'Pos( a_frs1516.whorsp09 ));
      params( 5391 ) := "+"( Integer'Pos( a_frs1516.whorsp10 ));
      params( 5392 ) := "+"( Integer'Pos( a_frs1516.whorsp11 ));
      params( 5393 ) := "+"( Integer'Pos( a_frs1516.whorsp12 ));
      params( 5394 ) := "+"( Integer'Pos( a_frs1516.whorsp13 ));
      params( 5395 ) := "+"( Integer'Pos( a_frs1516.whorsp14 ));
      params( 5396 ) := "+"( Integer'Pos( a_frs1516.whynoct ));
      params( 5397 ) := "+"( Float( a_frs1516.wsewamt ));
      params( 5398 ) := "+"( Float( a_frs1516.wsewanul ));
      params( 5399 ) := "+"( Integer'Pos( a_frs1516.wsewtime ));
      params( 5400 ) := "+"( Integer'Pos( a_frs1516.yearlive ));
      params( 5401 ) := "+"( Integer'Pos( a_frs1516.yearwhc ));
      params( 5402 ) := "+"( Integer'Pos( a_frs1516.adulth ));
      params( 5403 ) := "+"( Integer'Pos( a_frs1516.cwatamtd ));
      params( 5404 ) := "+"( Integer'Pos( a_frs1516.depchldh ));
      params( 5405 ) := "+"( Integer'Pos( a_frs1516.dischha1 ));
      params( 5406 ) := "+"( Integer'Pos( a_frs1516.dischhc1 ));
      params( 5407 ) := "+"( Integer'Pos( a_frs1516.diswhha1 ));
      params( 5408 ) := "+"( Integer'Pos( a_frs1516.diswhhc1 ));
      params( 5409 ) := "+"( Float( a_frs1516.endowpay ));
      params( 5410 ) := "+"( Integer'Pos( a_frs1516.gbhscost ));
      params( 5411 ) := "+"( Integer'Pos( a_frs1516.grossct ));
      params( 5412 ) := "+"( Integer'Pos( a_frs1516.hbeninc ));
      params( 5413 ) := "+"( Integer'Pos( a_frs1516.hbindhh ));
      params( 5414 ) := "+"( Integer'Pos( a_frs1516.hbindhh2 ));
      params( 5415 ) := "+"( Integer'Pos( a_frs1516.hearns ));
      params( 5416 ) := "+"( Integer'Pos( a_frs1516.hhdisben ));
      params( 5417 ) := "+"( Integer'Pos( a_frs1516.hhinc ));
      params( 5418 ) := "+"( Integer'Pos( a_frs1516.hhinv ));
      params( 5419 ) := "+"( Integer'Pos( a_frs1516.hhirben ));
      params( 5420 ) := "+"( Integer'Pos( a_frs1516.hhnirben ));
      params( 5421 ) := "+"( Integer'Pos( a_frs1516.hhothben ));
      params( 5422 ) := "+"( Integer'Pos( a_frs1516.hhrent ));
      params( 5423 ) := "+"( Integer'Pos( a_frs1516.hhrinc ));
      params( 5424 ) := "+"( Integer'Pos( a_frs1516.hhrpinc ));
      params( 5425 ) := "+"( Float( a_frs1516.hhtvlic ));
      params( 5426 ) := "+"( Integer'Pos( a_frs1516.hhtxcred ));
      params( 5427 ) := "+"( Integer'Pos( a_frs1516.hothinc ));
      params( 5428 ) := "+"( Integer'Pos( a_frs1516.hpeninc ));
      params( 5429 ) := "+"( Integer'Pos( a_frs1516.hseinc ));
      params( 5430 ) := "+"( Integer'Pos( a_frs1516.london ));
      params( 5431 ) := "+"( Float( a_frs1516.mortint ));
      params( 5432 ) := "+"( Integer'Pos( a_frs1516.nihscost ));
      params( 5433 ) := "+"( Integer'Pos( a_frs1516.penage ));
      params( 5434 ) := "+"( Integer'Pos( a_frs1516.penhrp ));
      params( 5435 ) := "+"( Integer'Pos( a_frs1516.ptentyp2 ));
      params( 5436 ) := "+"( Float( a_frs1516.servpay ));
      params( 5437 ) := "+"( Float( a_frs1516.struins ));
      params( 5438 ) := "+"( Integer'Pos( a_frs1516.tentyp2 ));
      params( 5439 ) := "+"( Integer'Pos( a_frs1516.tuhhrent ));
      params( 5440 ) := "+"( Float( a_frs1516.tuwatsew ));
      params( 5441 ) := "+"( Float( a_frs1516.watsewrt ));
      params( 5442 ) := "+"( Float( a_frs1516.hcgrent ));
      params( 5443 ) := "+"( Integer'Pos( a_frs1516.hcfeudut ));
      params( 5444 ) := "+"( Float( a_frs1516.hcchrent ));
      params( 5445 ) := "+"( Float( a_frs1516.hcservch ));
      params( 5446 ) := "+"( Float( a_frs1516.hcmaint ));
      params( 5447 ) := "+"( Float( a_frs1516.hcsirent ));
      params( 5448 ) := "+"( Float( a_frs1516.hcfactor ));
      params( 5449 ) := "+"( Float( a_frs1516.hcother ));
      params( 5450 ) := "+"( Float( a_frs1516.hcpcomb ));
      params( 5451 ) := "+"( Integer'Pos( a_frs1516.gvhelp ));
      params( 5452 ) := "+"( Integer'Pos( a_frs1516.lacode ));
      params( 5453 ) := "+"( Integer'Pos( a_frs1516.lauacode ));
      params( 5454 ) := "+"( Integer'Pos( a_frs1516.llcare ));
      params( 5455 ) := "+"( Integer'Pos( a_frs1516.needcare ));
      params( 5456 ) := "+"( Integer'Pos( a_frs1516.colourtv ));
      params( 5457 ) := "+"( Integer'Pos( a_frs1516.bwtv ));
      params( 5458 ) := "+"( Integer'Pos( a_frs1516.serpd1 ));
      params( 5459 ) := "+"( Integer'Pos( a_frs1516.serpd2 ));
      params( 5460 ) := "+"( Integer'Pos( a_frs1516.serpd3 ));
      params( 5461 ) := "+"( Integer'Pos( a_frs1516.serpd4 ));
      params( 5462 ) := "+"( Integer'Pos( a_frs1516.serpd5 ));
      params( 5463 ) := "+"( Float( a_frs1516.outsam11 ));
      params( 5464 ) := "+"( Float( a_frs1516.outsam12 ));
      params( 5465 ) := "+"( Float( a_frs1516.outsam21 ));
      params( 5466 ) := "+"( Integer'Pos( a_frs1516.outsam22 ));
      params( 5467 ) := "+"( Integer'Pos( a_frs1516.outsam31 ));
      params( 5468 ) := "+"( Integer'Pos( a_frs1516.outsam32 ));
      params( 5469 ) := "+"( Integer'Pos( a_frs1516.outsin11 ));
      params( 5470 ) := "+"( Integer'Pos( a_frs1516.outsin12 ));
      params( 5471 ) := "+"( Integer'Pos( a_frs1516.outsin21 ));
      params( 5472 ) := "+"( Integer'Pos( a_frs1516.outsin22 ));
      params( 5473 ) := "+"( Integer'Pos( a_frs1516.outsin31 ));
      params( 5474 ) := "+"( Integer'Pos( a_frs1516.outsin32 ));
      params( 5475 ) := "+"( Integer'Pos( a_frs1516.outspa11 ));
      params( 5476 ) := "+"( Integer'Pos( a_frs1516.outspa12 ));
      params( 5477 ) := "+"( Integer'Pos( a_frs1516.outspa21 ));
      params( 5478 ) := "+"( Integer'Pos( a_frs1516.outspa22 ));
      params( 5479 ) := "+"( Integer'Pos( a_frs1516.outspa31 ));
      params( 5480 ) := "+"( Integer'Pos( a_frs1516.outspa32 ));
      params( 5481 ) := "+"( Integer'Pos( a_frs1516.outspd11 ));
      params( 5482 ) := "+"( Integer'Pos( a_frs1516.outspd12 ));
      params( 5483 ) := "+"( Integer'Pos( a_frs1516.outspd21 ));
      params( 5484 ) := "+"( Integer'Pos( a_frs1516.outspd22 ));
      params( 5485 ) := "+"( Integer'Pos( a_frs1516.outspd31 ));
      params( 5486 ) := "+"( Integer'Pos( a_frs1516.outspd32 ));
      params( 5487 ) := "+"( Float( a_frs1516.borramt1 ));
      params( 5488 ) := "+"( Integer'Pos( a_frs1516.borramt2 ));
      params( 5489 ) := "+"( Integer'Pos( a_frs1516.borramt3 ));
      params( 5490 ) := "+"( Integer'Pos( a_frs1516.endwp11 ));
      params( 5491 ) := "+"( Integer'Pos( a_frs1516.endwp12 ));
      params( 5492 ) := "+"( Integer'Pos( a_frs1516.endwp13 ));
      params( 5493 ) := "+"( Integer'Pos( a_frs1516.endwp21 ));
      params( 5494 ) := "+"( Integer'Pos( a_frs1516.endwp22 ));
      params( 5495 ) := "+"( Integer'Pos( a_frs1516.endwp23 ));
      params( 5496 ) := "+"( Integer'Pos( a_frs1516.endwp31 ));
      params( 5497 ) := "+"( Integer'Pos( a_frs1516.endwp32 ));
      params( 5498 ) := "+"( Integer'Pos( a_frs1516.endwp33 ));
      params( 5499 ) := "+"( Integer'Pos( a_frs1516.endwp41 ));
      params( 5500 ) := "+"( Integer'Pos( a_frs1516.endwp42 ));
      params( 5501 ) := "+"( Integer'Pos( a_frs1516.endwp43 ));
      params( 5502 ) := "+"( Integer'Pos( a_frs1516.endwp51 ));
      params( 5503 ) := "+"( Integer'Pos( a_frs1516.endwp52 ));
      params( 5504 ) := "+"( Integer'Pos( a_frs1516.endwp53 ));
      params( 5505 ) := "+"( Integer'Pos( a_frs1516.incmin11 ));
      params( 5506 ) := "+"( Integer'Pos( a_frs1516.incmin12 ));
      params( 5507 ) := "+"( Integer'Pos( a_frs1516.incmin13 ));
      params( 5508 ) := "+"( Integer'Pos( a_frs1516.incmin21 ));
      params( 5509 ) := "+"( Integer'Pos( a_frs1516.incmin22 ));
      params( 5510 ) := "+"( Integer'Pos( a_frs1516.incmin23 ));
      params( 5511 ) := "+"( Integer'Pos( a_frs1516.incmin31 ));
      params( 5512 ) := "+"( Integer'Pos( a_frs1516.incmin32 ));
      params( 5513 ) := "+"( Integer'Pos( a_frs1516.incmin33 ));
      params( 5514 ) := "+"( Integer'Pos( a_frs1516.incmp11 ));
      params( 5515 ) := "+"( Integer'Pos( a_frs1516.incmp12 ));
      params( 5516 ) := "+"( Integer'Pos( a_frs1516.incmp13 ));
      params( 5517 ) := "+"( Integer'Pos( a_frs1516.incmp21 ));
      params( 5518 ) := "+"( Integer'Pos( a_frs1516.incmp22 ));
      params( 5519 ) := "+"( Integer'Pos( a_frs1516.incmp23 ));
      params( 5520 ) := "+"( Integer'Pos( a_frs1516.incmp31 ));
      params( 5521 ) := "+"( Integer'Pos( a_frs1516.incmp32 ));
      params( 5522 ) := "+"( Integer'Pos( a_frs1516.incmp33 ));
      params( 5523 ) := "+"( Float( a_frs1516.incmpa11 ));
      params( 5524 ) := "+"( Float( a_frs1516.incmpa12 ));
      params( 5525 ) := "+"( Float( a_frs1516.incmpa13 ));
      params( 5526 ) := "+"( Float( a_frs1516.incmpa21 ));
      params( 5527 ) := "+"( Integer'Pos( a_frs1516.incmpa22 ));
      params( 5528 ) := "+"( Integer'Pos( a_frs1516.incmpa23 ));
      params( 5529 ) := "+"( Float( a_frs1516.incmpa31 ));
      params( 5530 ) := "+"( Integer'Pos( a_frs1516.incmpa32 ));
      params( 5531 ) := "+"( Integer'Pos( a_frs1516.incmpa33 ));
      params( 5532 ) := "+"( Integer'Pos( a_frs1516.pincmp11 ));
      params( 5533 ) := "+"( Integer'Pos( a_frs1516.pincmp12 ));
      params( 5534 ) := "+"( Integer'Pos( a_frs1516.pincmp13 ));
      params( 5535 ) := "+"( Integer'Pos( a_frs1516.pincmp21 ));
      params( 5536 ) := "+"( Integer'Pos( a_frs1516.pincmp22 ));
      params( 5537 ) := "+"( Integer'Pos( a_frs1516.pincmp23 ));
      params( 5538 ) := "+"( Integer'Pos( a_frs1516.pincmp31 ));
      params( 5539 ) := "+"( Integer'Pos( a_frs1516.pincmp32 ));
      params( 5540 ) := "+"( Integer'Pos( a_frs1516.pincmp33 ));
      params( 5541 ) := "+"( Float( a_frs1516.intpri1 ));
      params( 5542 ) := "+"( Float( a_frs1516.intpri2 ));
      params( 5543 ) := "+"( Float( a_frs1516.intpri3 ));
      params( 5544 ) := "+"( Integer'Pos( a_frs1516.pintrpi1 ));
      params( 5545 ) := "+"( Integer'Pos( a_frs1516.pintrpi2 ));
      params( 5546 ) := "+"( Integer'Pos( a_frs1516.pintrpi3 ));
      params( 5547 ) := "+"( Integer'Pos( a_frs1516.loanyr1 ));
      params( 5548 ) := "+"( Integer'Pos( a_frs1516.loanyr2 ));
      params( 5549 ) := "+"( Integer'Pos( a_frs1516.loanyr3 ));
      params( 5550 ) := "+"( Integer'Pos( a_frs1516.menpol1 ));
      params( 5551 ) := "+"( Integer'Pos( a_frs1516.menpol2 ));
      params( 5552 ) := "+"( Integer'Pos( a_frs1516.menpol3 ));
      params( 5553 ) := "+"( Integer'Pos( a_frs1516.morall1 ));
      params( 5554 ) := "+"( Integer'Pos( a_frs1516.morall2 ));
      params( 5555 ) := "+"( Integer'Pos( a_frs1516.morall3 ));
      params( 5556 ) := "+"( Integer'Pos( a_frs1516.morflc1 ));
      params( 5557 ) := "+"( Integer'Pos( a_frs1516.morflc2 ));
      params( 5558 ) := "+"( Integer'Pos( a_frs1516.morflc3 ));
      params( 5559 ) := "+"( Float( a_frs1516.morinp1 ));
      params( 5560 ) := "+"( Float( a_frs1516.morinp2 ));
      params( 5561 ) := "+"( Float( a_frs1516.morinp3 ));
      params( 5562 ) := "+"( Integer'Pos( a_frs1516.pmorinp1 ));
      params( 5563 ) := "+"( Integer'Pos( a_frs1516.pmorinp2 ));
      params( 5564 ) := "+"( Integer'Pos( a_frs1516.pmorinp3 ));
      params( 5565 ) := "+"( Integer'Pos( a_frs1516.morinus1 ));
      params( 5566 ) := "+"( Integer'Pos( a_frs1516.morinus2 ));
      params( 5567 ) := "+"( Integer'Pos( a_frs1516.morinus3 ));
      params( 5568 ) := "+"( Integer'Pos( a_frs1516.mortend1 ));
      params( 5569 ) := "+"( Integer'Pos( a_frs1516.mortend2 ));
      params( 5570 ) := "+"( Integer'Pos( a_frs1516.mortend3 ));
      params( 5571 ) := "+"( Float( a_frs1516.mortlef1 ));
      params( 5572 ) := "+"( Float( a_frs1516.mortlef2 ));
      params( 5573 ) := "+"( Integer'Pos( a_frs1516.mortlef3 ));
      params( 5574 ) := "+"( Integer'Pos( a_frs1516.mortpro1 ));
      params( 5575 ) := "+"( Integer'Pos( a_frs1516.mortpro2 ));
      params( 5576 ) := "+"( Integer'Pos( a_frs1516.mortpro3 ));
      params( 5577 ) := "+"( Integer'Pos( a_frs1516.morttyp1 ));
      params( 5578 ) := "+"( Integer'Pos( a_frs1516.morttyp2 ));
      params( 5579 ) := "+"( Integer'Pos( a_frs1516.morttyp3 ));
      params( 5580 ) := "+"( Integer'Pos( a_frs1516.morupd1 ));
      params( 5581 ) := "+"( Integer'Pos( a_frs1516.morupd2 ));
      params( 5582 ) := "+"( Integer'Pos( a_frs1516.morupd3 ));
      params( 5583 ) := "+"( Float( a_frs1516.morus1 ));
      params( 5584 ) := "+"( Integer'Pos( a_frs1516.morus2 ));
      params( 5585 ) := "+"( Integer'Pos( a_frs1516.morus3 ));
      params( 5586 ) := "+"( Integer'Pos( a_frs1516.mpcove11 ));
      params( 5587 ) := "+"( Integer'Pos( a_frs1516.mpcove12 ));
      params( 5588 ) := "+"( Integer'Pos( a_frs1516.mpcove13 ));
      params( 5589 ) := "+"( Integer'Pos( a_frs1516.mpcove21 ));
      params( 5590 ) := "+"( Integer'Pos( a_frs1516.mpcove22 ));
      params( 5591 ) := "+"( Integer'Pos( a_frs1516.mpcove23 ));
      params( 5592 ) := "+"( Integer'Pos( a_frs1516.mpcove31 ));
      params( 5593 ) := "+"( Integer'Pos( a_frs1516.mpcove32 ));
      params( 5594 ) := "+"( Integer'Pos( a_frs1516.mpcove33 ));
      params( 5595 ) := "+"( Integer'Pos( a_frs1516.outsmor1 ));
      params( 5596 ) := "+"( Integer'Pos( a_frs1516.outsmor2 ));
      params( 5597 ) := "+"( Integer'Pos( a_frs1516.outsmor3 ));
      params( 5598 ) := "+"( Float( a_frs1516.rmamt1 ));
      params( 5599 ) := "+"( Integer'Pos( a_frs1516.rmamt2 ));
      params( 5600 ) := "+"( Integer'Pos( a_frs1516.rmamt3 ));
      params( 5601 ) := "+"( Integer'Pos( a_frs1516.rmort1 ));
      params( 5602 ) := "+"( Integer'Pos( a_frs1516.rmort2 ));
      params( 5603 ) := "+"( Integer'Pos( a_frs1516.rmort3 ));
      params( 5604 ) := "+"( Integer'Pos( a_frs1516.rmortyr1 ));
      params( 5605 ) := "+"( Integer'Pos( a_frs1516.rmortyr2 ));
      params( 5606 ) := "+"( Integer'Pos( a_frs1516.rmortyr3 ));
      params( 5607 ) := "+"( Integer'Pos( a_frs1516.rmpur011 ));
      params( 5608 ) := "+"( Integer'Pos( a_frs1516.rmpur012 ));
      params( 5609 ) := "+"( Integer'Pos( a_frs1516.rmpur013 ));
      params( 5610 ) := "+"( Integer'Pos( a_frs1516.rmpur021 ));
      params( 5611 ) := "+"( Integer'Pos( a_frs1516.rmpur022 ));
      params( 5612 ) := "+"( Integer'Pos( a_frs1516.rmpur023 ));
      params( 5613 ) := "+"( Integer'Pos( a_frs1516.rmpur031 ));
      params( 5614 ) := "+"( Integer'Pos( a_frs1516.rmpur032 ));
      params( 5615 ) := "+"( Integer'Pos( a_frs1516.rmpur033 ));
      params( 5616 ) := "+"( Integer'Pos( a_frs1516.rmpur041 ));
      params( 5617 ) := "+"( Integer'Pos( a_frs1516.rmpur042 ));
      params( 5618 ) := "+"( Integer'Pos( a_frs1516.rmpur043 ));
      params( 5619 ) := "+"( Integer'Pos( a_frs1516.rmpur051 ));
      params( 5620 ) := "+"( Integer'Pos( a_frs1516.rmpur052 ));
      params( 5621 ) := "+"( Integer'Pos( a_frs1516.rmpur053 ));
      params( 5622 ) := "+"( Integer'Pos( a_frs1516.rmpur061 ));
      params( 5623 ) := "+"( Integer'Pos( a_frs1516.rmpur062 ));
      params( 5624 ) := "+"( Integer'Pos( a_frs1516.rmpur063 ));
      params( 5625 ) := "+"( Integer'Pos( a_frs1516.rmpur071 ));
      params( 5626 ) := "+"( Integer'Pos( a_frs1516.rmpur072 ));
      params( 5627 ) := "+"( Integer'Pos( a_frs1516.rmpur073 ));
      params( 5628 ) := "+"( Integer'Pos( a_frs1516.rmpur081 ));
      params( 5629 ) := "+"( Integer'Pos( a_frs1516.rmpur082 ));
      params( 5630 ) := "+"( Integer'Pos( a_frs1516.rmpur083 ));
      params( 5631 ) := "+"( Integer'Pos( a_frs1516.buyyear ));
      params( 5632 ) := "+"( Float( a_frs1516.purcamt ));
      params( 5633 ) := "+"( Integer'Pos( a_frs1516.purcloan ));
      params( 5634 ) := "+"( Integer'Pos( a_frs1516.secmpur3 ));
      params( 5635 ) := "+"( Integer'Pos( a_frs1516.secmpur4 ));
      params( 5636 ) := "+"( Integer'Pos( a_frs1516.secmpur1 ));
      params( 5637 ) := "+"( Integer'Pos( a_frs1516.secmpur5 ));
      params( 5638 ) := "+"( Integer'Pos( a_frs1516.secmpur6 ));
      params( 5639 ) := "+"( Integer'Pos( a_frs1516.secmpur2 ));
      params( 5640 ) := "+"( Integer'Pos( a_frs1516.secmpur7 ));
      params( 5641 ) := "+"( Float( a_frs1516.rexhham1 ));
      params( 5642 ) := "+"( Integer'Pos( a_frs1516.accchk1 ));
      params( 5643 ) := "+"( Integer'Pos( a_frs1516.rexhhwh1 ));
      params( 5644 ) := "+"( Integer'Pos( a_frs1516.prexhha1 ));
      params( 5645 ) := "+"( Integer'Pos( a_frs1516.accjbp10 ));
      params( 5646 ) := "+"( Integer'Pos( a_frs1516.accjbp11 ));
      params( 5647 ) := "+"( Integer'Pos( a_frs1516.accjbp12 ));
      params( 5648 ) := "+"( Integer'Pos( a_frs1516.accjbp13 ));
      params( 5649 ) := "+"( Integer'Pos( a_frs1516.accjbp14 ));
      params( 5650 ) := "+"( Integer'Pos( a_frs1516.accjob ));
      params( 5651 ) := "+"( Integer'Pos( a_frs1516.ctract ));
      params( 5652 ) := "+"( Float( a_frs1516.eligamt ));
      params( 5653 ) := "+"( Integer'Pos( a_frs1516.eligpd ));
      params( 5654 ) := "+"( Integer'Pos( a_frs1516.fairrent ));
      params( 5655 ) := "+"( Integer'Pos( a_frs1516.furnish ));
      params( 5656 ) := "+"( Float( a_frs1516.hbenamt ));
      params( 5657 ) := "+"( Integer'Pos( a_frs1516.hbenchk ));
      params( 5658 ) := "+"( Integer'Pos( a_frs1516.hbenefit ));
      params( 5659 ) := "+"( Integer'Pos( a_frs1516.hbenpd ));
      params( 5660 ) := "+"( Integer'Pos( a_frs1516.hbenwait ));
      params( 5661 ) := "+"( Integer'Pos( a_frs1516.hbmnth ));
      params( 5662 ) := "+"( Integer'Pos( a_frs1516.hbrecp ));
      params( 5663 ) := "+"( Integer'Pos( a_frs1516.hbweeks ));
      params( 5664 ) := "+"( Integer'Pos( a_frs1516.hbyear ));
      params( 5665 ) := "+"( Integer'Pos( a_frs1516.hbyears ));
      params( 5666 ) := "+"( Integer'Pos( a_frs1516.landlord ));
      params( 5667 ) := "+"( Integer'Pos( a_frs1516.niystart ));
      params( 5668 ) := "+"( Integer'Pos( a_frs1516.othtype ));
      params( 5669 ) := "+"( Integer'Pos( a_frs1516.rebate ));
      params( 5670 ) := "+"( Float( a_frs1516.rent ));
      params( 5671 ) := "+"( Integer'Pos( a_frs1516.rentdoc ));
      params( 5672 ) := "+"( Integer'Pos( a_frs1516.renthol ));
      params( 5673 ) := "+"( Integer'Pos( a_frs1516.rentpd ));
      params( 5674 ) := "+"( Integer'Pos( a_frs1516.rentpd1 ));
      params( 5675 ) := "+"( Integer'Pos( a_frs1516.rentpd2 ));
      params( 5676 ) := "+"( Integer'Pos( a_frs1516.resll ));
      params( 5677 ) := "+"( Integer'Pos( a_frs1516.resll2 ));
      params( 5678 ) := "+"( Integer'Pos( a_frs1516.serincam ));
      params( 5679 ) := "+"( Integer'Pos( a_frs1516.tentype ));
      params( 5680 ) := "+"( Integer'Pos( a_frs1516.weekhol ));
      params( 5681 ) := "+"( Integer'Pos( a_frs1516.wsinc ));
      params( 5682 ) := "+"( Float( a_frs1516.wsincamt ));
      params( 5683 ) := "+"( Integer'Pos( a_frs1516.ystartr ));
      params( 5684 ) := "+"( Integer'Pos( a_frs1516.accjbp1 ));
      params( 5685 ) := "+"( Integer'Pos( a_frs1516.accjbp2 ));
      params( 5686 ) := "+"( Integer'Pos( a_frs1516.accjbp3 ));
      params( 5687 ) := "+"( Integer'Pos( a_frs1516.accjbp4 ));
      params( 5688 ) := "+"( Integer'Pos( a_frs1516.accjbp5 ));
      params( 5689 ) := "+"( Integer'Pos( a_frs1516.accjbp6 ));
      params( 5690 ) := "+"( Integer'Pos( a_frs1516.accjbp7 ));
      params( 5691 ) := "+"( Integer'Pos( a_frs1516.accjbp8 ));
      params( 5692 ) := "+"( Integer'Pos( a_frs1516.accjbp9 ));
      params( 5693 ) := "+"( Integer'Pos( a_frs1516.rexhh ));
      params( 5694 ) := "+"( Float( a_frs1516.rntfull ));
      params( 5695 ) := "+"( Integer'Pos( a_frs1516.lighting ));
      params( 5696 ) := "+"( Integer'Pos( a_frs1516.heating ));
      params( 5697 ) := "+"( Integer'Pos( a_frs1516.hotwater ));
      params( 5698 ) := "+"( Integer'Pos( a_frs1516.fuelcook ));
      params( 5699 ) := "+"( Integer'Pos( a_frs1516.tvlice ));
      params( 5700 ) := "+"( Integer'Pos( a_frs1516.elec ));
      params( 5701 ) := "+"( Integer'Pos( a_frs1516.gas ));
      params( 5702 ) := "+"( Integer'Pos( a_frs1516.lsf ));
      gse.Execute( local_connection, SAVE_PS, params );  
      Check_Result( local_connection );
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
   end Save;

   
   --
   -- Delete the given record. Throws DB_Exception exception. Sets value to Ukds.Frs.Null_Frs1516
   --

   procedure Delete( a_frs1516 : in out Ukds.Frs.Frs1516; connection : Database_Connection := null ) is
         c : d.Criteria;
   begin  
      Add_user_id( c, a_frs1516.user_id );
      Add_edition( c, a_frs1516.edition );
      Add_year( c, a_frs1516.year );
      Add_sernum( c, a_frs1516.sernum );
      Add_benunit( c, a_frs1516.benunit );
      Delete( c, connection );
      a_frs1516 := Ukds.Frs.Null_Frs1516;
      Log( "delete record; execute query OK" );
   end Delete;


   --
   -- delete the records indentified by the criteria
   --
   procedure Delete( c : d.Criteria; connection : Database_Connection := null ) is
   begin      
      delete( d.to_string( c ), connection );
      Log( "delete criteria; execute query OK" );
   end Delete;
   
   procedure Delete( where_clause : String; connection : gse.Database_Connection := null ) is
      local_connection : gse.Database_Connection;     
      is_local_connection : Boolean;
      query : constant String := DB_Commons.Add_Schema_To_Query( DELETE_PART, SCHEMA_NAME ) & where_clause;
   begin
      if( connection = null )then
          local_connection := Connection_Pool.Lease;
          is_local_connection := True;
      else
          local_connection := connection;          
          is_local_connection := False;
      end if;
      Log( "delete; executing query" & query );
      gse.Execute( local_connection, query );
      Check_Result( local_connection );
      Log( "delete; execute query OK" );
      if( is_local_connection )then
         Connection_Pool.Return_Connection( local_connection );
      end if;
   end Delete;


   --
   -- functions to retrieve records from tables with foreign keys
   -- referencing the table modelled by this package
   --

   --
   -- functions to add something to a criteria
   --
   procedure Add_user_id( c : in out d.Criteria; user_id : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "user_id", op, join, user_id );
   begin
      d.add_to_criteria( c, elem );
   end Add_user_id;


   procedure Add_edition( c : in out d.Criteria; edition : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edition", op, join, edition );
   begin
      d.add_to_criteria( c, elem );
   end Add_edition;


   procedure Add_year( c : in out d.Criteria; year : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "year", op, join, year );
   begin
      d.add_to_criteria( c, elem );
   end Add_year;


   procedure Add_sernum( c : in out d.Criteria; sernum : Sernum_Value; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sernum", op, join, Big_Int( sernum ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sernum;


   procedure Add_benunit( c : in out d.Criteria; benunit : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "benunit", op, join, benunit );
   begin
      d.add_to_criteria( c, elem );
   end Add_benunit;


   procedure Add_int1hd( c : in out d.Criteria; int1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int1hd", op, join, Long_Float( int1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int1hd;


   procedure Add_int2hd( c : in out d.Criteria; int2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int2hd", op, join, Long_Float( int2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int2hd;


   procedure Add_int3hd( c : in out d.Criteria; int3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int3hd", op, join, Long_Float( int3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int3hd;


   procedure Add_int4hd( c : in out d.Criteria; int4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int4hd", op, join, int4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int4hd;


   procedure Add_int5hd( c : in out d.Criteria; int5hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int5hd", op, join, Long_Float( int5hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int5hd;


   procedure Add_int6hd( c : in out d.Criteria; int6hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int6hd", op, join, Long_Float( int6hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int6hd;


   procedure Add_int7hd( c : in out d.Criteria; int7hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int7hd", op, join, Long_Float( int7hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int7hd;


   procedure Add_int8hd( c : in out d.Criteria; int8hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int8hd", op, join, Long_Float( int8hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int8hd;


   procedure Add_int9hd( c : in out d.Criteria; int9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int9hd", op, join, int9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int9hd;


   procedure Add_int10hd( c : in out d.Criteria; int10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int10hd", op, join, int10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int10hd;


   procedure Add_int11hd( c : in out d.Criteria; int11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int11hd", op, join, int11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int11hd;


   procedure Add_int12hd( c : in out d.Criteria; int12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int12hd", op, join, int12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int12hd;


   procedure Add_int13hd( c : in out d.Criteria; int13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int13hd", op, join, int13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int13hd;


   procedure Add_int14hd( c : in out d.Criteria; int14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int14hd", op, join, int14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int14hd;


   procedure Add_int15hd( c : in out d.Criteria; int15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int15hd", op, join, int15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int15hd;


   procedure Add_int16hd( c : in out d.Criteria; int16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int16hd", op, join, int16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int16hd;


   procedure Add_int17hd( c : in out d.Criteria; int17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int17hd", op, join, int17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int17hd;


   procedure Add_int18hd( c : in out d.Criteria; int18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int18hd", op, join, int18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int18hd;


   procedure Add_int19hd( c : in out d.Criteria; int19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int19hd", op, join, int19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int19hd;


   procedure Add_int21hd( c : in out d.Criteria; int21hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int21hd", op, join, Long_Float( int21hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int21hd;


   procedure Add_int22hd( c : in out d.Criteria; int22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int22hd", op, join, int22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int22hd;


   procedure Add_int23hd( c : in out d.Criteria; int23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int23hd", op, join, int23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int23hd;


   procedure Add_int24hd( c : in out d.Criteria; int24hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int24hd", op, join, Long_Float( int24hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int24hd;


   procedure Add_int25hd( c : in out d.Criteria; int25hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int25hd", op, join, int25hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int25hd;


   procedure Add_int26hd( c : in out d.Criteria; int26hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int26hd", op, join, int26hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int26hd;


   procedure Add_int27hd( c : in out d.Criteria; int27hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int27hd", op, join, Long_Float( int27hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int27hd;


   procedure Add_int28hd( c : in out d.Criteria; int28hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int28hd", op, join, Long_Float( int28hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int28hd;


   procedure Add_int29hd( c : in out d.Criteria; int29hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int29hd", op, join, int29hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int29hd;


   procedure Add_int30hd( c : in out d.Criteria; int30hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int30hd", op, join, int30hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_int30hd;


   procedure Add_int1sp( c : in out d.Criteria; int1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int1sp", op, join, Long_Float( int1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int1sp;


   procedure Add_int2sp( c : in out d.Criteria; int2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int2sp", op, join, Long_Float( int2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int2sp;


   procedure Add_int3sp( c : in out d.Criteria; int3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int3sp", op, join, Long_Float( int3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int3sp;


   procedure Add_int4sp( c : in out d.Criteria; int4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int4sp", op, join, int4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int4sp;


   procedure Add_int5sp( c : in out d.Criteria; int5sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int5sp", op, join, Long_Float( int5sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int5sp;


   procedure Add_int6sp( c : in out d.Criteria; int6sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int6sp", op, join, Long_Float( int6sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int6sp;


   procedure Add_int7sp( c : in out d.Criteria; int7sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int7sp", op, join, Long_Float( int7sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int7sp;


   procedure Add_int8sp( c : in out d.Criteria; int8sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int8sp", op, join, Long_Float( int8sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int8sp;


   procedure Add_int9sp( c : in out d.Criteria; int9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int9sp", op, join, int9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int9sp;


   procedure Add_int10sp( c : in out d.Criteria; int10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int10sp", op, join, int10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int10sp;


   procedure Add_int11sp( c : in out d.Criteria; int11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int11sp", op, join, int11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int11sp;


   procedure Add_int12sp( c : in out d.Criteria; int12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int12sp", op, join, int12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int12sp;


   procedure Add_int13sp( c : in out d.Criteria; int13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int13sp", op, join, int13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int13sp;


   procedure Add_int14sp( c : in out d.Criteria; int14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int14sp", op, join, int14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int14sp;


   procedure Add_int15sp( c : in out d.Criteria; int15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int15sp", op, join, int15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int15sp;


   procedure Add_int16sp( c : in out d.Criteria; int16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int16sp", op, join, int16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int16sp;


   procedure Add_int17sp( c : in out d.Criteria; int17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int17sp", op, join, int17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int17sp;


   procedure Add_int18sp( c : in out d.Criteria; int18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int18sp", op, join, int18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int18sp;


   procedure Add_int19sp( c : in out d.Criteria; int19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int19sp", op, join, int19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int19sp;


   procedure Add_int21sp( c : in out d.Criteria; int21sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int21sp", op, join, Long_Float( int21sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int21sp;


   procedure Add_int22sp( c : in out d.Criteria; int22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int22sp", op, join, int22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int22sp;


   procedure Add_int23sp( c : in out d.Criteria; int23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int23sp", op, join, int23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int23sp;


   procedure Add_int24sp( c : in out d.Criteria; int24sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int24sp", op, join, Long_Float( int24sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int24sp;


   procedure Add_int25sp( c : in out d.Criteria; int25sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int25sp", op, join, int25sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int25sp;


   procedure Add_int26sp( c : in out d.Criteria; int26sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int26sp", op, join, int26sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int26sp;


   procedure Add_int27sp( c : in out d.Criteria; int27sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int27sp", op, join, Long_Float( int27sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int27sp;


   procedure Add_int28sp( c : in out d.Criteria; int28sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int28sp", op, join, Long_Float( int28sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_int28sp;


   procedure Add_int29sp( c : in out d.Criteria; int29sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int29sp", op, join, int29sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int29sp;


   procedure Add_int30sp( c : in out d.Criteria; int30sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "int30sp", op, join, int30sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_int30sp;


   procedure Add_intx1hd( c : in out d.Criteria; intx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx1hd", op, join, intx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx1hd;


   procedure Add_intx2hd( c : in out d.Criteria; intx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx2hd", op, join, intx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx2hd;


   procedure Add_intx3hd( c : in out d.Criteria; intx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx3hd", op, join, intx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx3hd;


   procedure Add_intx4hd( c : in out d.Criteria; intx4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx4hd", op, join, intx4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx4hd;


   procedure Add_intx5hd( c : in out d.Criteria; intx5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx5hd", op, join, intx5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx5hd;


   procedure Add_intx6hd( c : in out d.Criteria; intx6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx6hd", op, join, intx6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx6hd;


   procedure Add_intx7hd( c : in out d.Criteria; intx7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx7hd", op, join, intx7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx7hd;


   procedure Add_intx8hd( c : in out d.Criteria; intx8hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx8hd", op, join, intx8hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx8hd;


   procedure Add_intx9hd( c : in out d.Criteria; intx9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx9hd", op, join, intx9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx9hd;


   procedure Add_intx10hd( c : in out d.Criteria; intx10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx10hd", op, join, intx10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx10hd;


   procedure Add_intx11hd( c : in out d.Criteria; intx11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx11hd", op, join, intx11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx11hd;


   procedure Add_intx12hd( c : in out d.Criteria; intx12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx12hd", op, join, intx12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx12hd;


   procedure Add_intx13hd( c : in out d.Criteria; intx13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx13hd", op, join, intx13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx13hd;


   procedure Add_intx14hd( c : in out d.Criteria; intx14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx14hd", op, join, intx14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx14hd;


   procedure Add_intx15hd( c : in out d.Criteria; intx15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx15hd", op, join, intx15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx15hd;


   procedure Add_intx16hd( c : in out d.Criteria; intx16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx16hd", op, join, intx16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx16hd;


   procedure Add_intx17hd( c : in out d.Criteria; intx17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx17hd", op, join, intx17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx17hd;


   procedure Add_intx18hd( c : in out d.Criteria; intx18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx18hd", op, join, intx18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx18hd;


   procedure Add_intx19hd( c : in out d.Criteria; intx19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx19hd", op, join, intx19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx19hd;


   procedure Add_intx21hd( c : in out d.Criteria; intx21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx21hd", op, join, intx21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx21hd;


   procedure Add_intx22hd( c : in out d.Criteria; intx22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx22hd", op, join, intx22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx22hd;


   procedure Add_intx23hd( c : in out d.Criteria; intx23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx23hd", op, join, intx23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx23hd;


   procedure Add_intx24hd( c : in out d.Criteria; intx24hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx24hd", op, join, intx24hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx24hd;


   procedure Add_intx25hd( c : in out d.Criteria; intx25hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx25hd", op, join, intx25hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx25hd;


   procedure Add_intx26hd( c : in out d.Criteria; intx26hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx26hd", op, join, intx26hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx26hd;


   procedure Add_intx27hd( c : in out d.Criteria; intx27hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx27hd", op, join, intx27hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx27hd;


   procedure Add_intx28hd( c : in out d.Criteria; intx28hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx28hd", op, join, intx28hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx28hd;


   procedure Add_intx29hd( c : in out d.Criteria; intx29hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx29hd", op, join, intx29hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx29hd;


   procedure Add_intx30hd( c : in out d.Criteria; intx30hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx30hd", op, join, intx30hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx30hd;


   procedure Add_intx1sp( c : in out d.Criteria; intx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx1sp", op, join, intx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx1sp;


   procedure Add_intx2sp( c : in out d.Criteria; intx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx2sp", op, join, intx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx2sp;


   procedure Add_intx3sp( c : in out d.Criteria; intx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx3sp", op, join, intx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx3sp;


   procedure Add_intx4sp( c : in out d.Criteria; intx4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx4sp", op, join, intx4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx4sp;


   procedure Add_intx5sp( c : in out d.Criteria; intx5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx5sp", op, join, intx5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx5sp;


   procedure Add_intx6sp( c : in out d.Criteria; intx6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx6sp", op, join, intx6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx6sp;


   procedure Add_intx7sp( c : in out d.Criteria; intx7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx7sp", op, join, intx7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx7sp;


   procedure Add_intx8sp( c : in out d.Criteria; intx8sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx8sp", op, join, intx8sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx8sp;


   procedure Add_intx9sp( c : in out d.Criteria; intx9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx9sp", op, join, intx9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx9sp;


   procedure Add_intx10sp( c : in out d.Criteria; intx10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx10sp", op, join, intx10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx10sp;


   procedure Add_intx11sp( c : in out d.Criteria; intx11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx11sp", op, join, intx11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx11sp;


   procedure Add_intx12sp( c : in out d.Criteria; intx12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx12sp", op, join, intx12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx12sp;


   procedure Add_intx13sp( c : in out d.Criteria; intx13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx13sp", op, join, intx13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx13sp;


   procedure Add_intx14sp( c : in out d.Criteria; intx14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx14sp", op, join, intx14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx14sp;


   procedure Add_intx15sp( c : in out d.Criteria; intx15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx15sp", op, join, intx15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx15sp;


   procedure Add_intx16sp( c : in out d.Criteria; intx16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx16sp", op, join, intx16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx16sp;


   procedure Add_intx17sp( c : in out d.Criteria; intx17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx17sp", op, join, intx17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx17sp;


   procedure Add_intx18sp( c : in out d.Criteria; intx18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx18sp", op, join, intx18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx18sp;


   procedure Add_intx19sp( c : in out d.Criteria; intx19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx19sp", op, join, intx19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx19sp;


   procedure Add_intx21sp( c : in out d.Criteria; intx21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx21sp", op, join, intx21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx21sp;


   procedure Add_intx22sp( c : in out d.Criteria; intx22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx22sp", op, join, intx22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx22sp;


   procedure Add_intx23sp( c : in out d.Criteria; intx23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx23sp", op, join, intx23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx23sp;


   procedure Add_intx24sp( c : in out d.Criteria; intx24sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx24sp", op, join, intx24sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx24sp;


   procedure Add_intx25sp( c : in out d.Criteria; intx25sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx25sp", op, join, intx25sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx25sp;


   procedure Add_intx26sp( c : in out d.Criteria; intx26sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx26sp", op, join, intx26sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx26sp;


   procedure Add_intx27sp( c : in out d.Criteria; intx27sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx27sp", op, join, intx27sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx27sp;


   procedure Add_intx28sp( c : in out d.Criteria; intx28sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx28sp", op, join, intx28sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx28sp;


   procedure Add_intx29sp( c : in out d.Criteria; intx29sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx29sp", op, join, intx29sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx29sp;


   procedure Add_intx30sp( c : in out d.Criteria; intx30sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intx30sp", op, join, intx30sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx30sp;


   procedure Add_invt1hd( c : in out d.Criteria; invt1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt1hd", op, join, invt1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt1hd;


   procedure Add_invt2hd( c : in out d.Criteria; invt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt2hd", op, join, invt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt2hd;


   procedure Add_invt3hd( c : in out d.Criteria; invt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt3hd", op, join, invt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt3hd;


   procedure Add_invt4hd( c : in out d.Criteria; invt4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt4hd", op, join, invt4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt4hd;


   procedure Add_invt5hd( c : in out d.Criteria; invt5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt5hd", op, join, invt5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt5hd;


   procedure Add_invt6hd( c : in out d.Criteria; invt6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt6hd", op, join, invt6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt6hd;


   procedure Add_invt7hd( c : in out d.Criteria; invt7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt7hd", op, join, invt7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt7hd;


   procedure Add_invt8hd( c : in out d.Criteria; invt8hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt8hd", op, join, invt8hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt8hd;


   procedure Add_invt9hd( c : in out d.Criteria; invt9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt9hd", op, join, invt9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt9hd;


   procedure Add_invt10hd( c : in out d.Criteria; invt10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt10hd", op, join, invt10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt10hd;


   procedure Add_invt11hd( c : in out d.Criteria; invt11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt11hd", op, join, invt11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt11hd;


   procedure Add_invt12hd( c : in out d.Criteria; invt12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt12hd", op, join, invt12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt12hd;


   procedure Add_invt13hd( c : in out d.Criteria; invt13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt13hd", op, join, invt13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt13hd;


   procedure Add_invt14hd( c : in out d.Criteria; invt14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt14hd", op, join, invt14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt14hd;


   procedure Add_invt15hd( c : in out d.Criteria; invt15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt15hd", op, join, invt15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt15hd;


   procedure Add_invt16hd( c : in out d.Criteria; invt16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt16hd", op, join, invt16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt16hd;


   procedure Add_invt17hd( c : in out d.Criteria; invt17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt17hd", op, join, invt17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt17hd;


   procedure Add_invt18hd( c : in out d.Criteria; invt18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt18hd", op, join, invt18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt18hd;


   procedure Add_invt19hd( c : in out d.Criteria; invt19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt19hd", op, join, invt19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt19hd;


   procedure Add_invt21hd( c : in out d.Criteria; invt21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt21hd", op, join, invt21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt21hd;


   procedure Add_invt22hd( c : in out d.Criteria; invt22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt22hd", op, join, invt22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt22hd;


   procedure Add_invt23hd( c : in out d.Criteria; invt23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt23hd", op, join, invt23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt23hd;


   procedure Add_invt24hd( c : in out d.Criteria; invt24hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt24hd", op, join, invt24hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt24hd;


   procedure Add_invt25hd( c : in out d.Criteria; invt25hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt25hd", op, join, invt25hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt25hd;


   procedure Add_invt26hd( c : in out d.Criteria; invt26hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt26hd", op, join, invt26hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt26hd;


   procedure Add_invt27hd( c : in out d.Criteria; invt27hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt27hd", op, join, invt27hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt27hd;


   procedure Add_invt28hd( c : in out d.Criteria; invt28hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt28hd", op, join, invt28hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt28hd;


   procedure Add_invt29hd( c : in out d.Criteria; invt29hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt29hd", op, join, invt29hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt29hd;


   procedure Add_invt30hd( c : in out d.Criteria; invt30hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt30hd", op, join, invt30hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt30hd;


   procedure Add_invt1sp( c : in out d.Criteria; invt1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt1sp", op, join, invt1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt1sp;


   procedure Add_invt2sp( c : in out d.Criteria; invt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt2sp", op, join, invt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt2sp;


   procedure Add_invt3sp( c : in out d.Criteria; invt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt3sp", op, join, invt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt3sp;


   procedure Add_invt4sp( c : in out d.Criteria; invt4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt4sp", op, join, invt4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt4sp;


   procedure Add_invt5sp( c : in out d.Criteria; invt5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt5sp", op, join, invt5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt5sp;


   procedure Add_invt6sp( c : in out d.Criteria; invt6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt6sp", op, join, invt6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt6sp;


   procedure Add_invt7sp( c : in out d.Criteria; invt7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt7sp", op, join, invt7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt7sp;


   procedure Add_invt8sp( c : in out d.Criteria; invt8sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt8sp", op, join, invt8sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt8sp;


   procedure Add_invt9sp( c : in out d.Criteria; invt9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt9sp", op, join, invt9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt9sp;


   procedure Add_invt10sp( c : in out d.Criteria; invt10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt10sp", op, join, invt10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt10sp;


   procedure Add_invt11sp( c : in out d.Criteria; invt11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt11sp", op, join, invt11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt11sp;


   procedure Add_invt12sp( c : in out d.Criteria; invt12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt12sp", op, join, invt12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt12sp;


   procedure Add_invt13sp( c : in out d.Criteria; invt13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt13sp", op, join, invt13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt13sp;


   procedure Add_invt14sp( c : in out d.Criteria; invt14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt14sp", op, join, invt14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt14sp;


   procedure Add_invt15sp( c : in out d.Criteria; invt15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt15sp", op, join, invt15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt15sp;


   procedure Add_invt16sp( c : in out d.Criteria; invt16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt16sp", op, join, invt16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt16sp;


   procedure Add_invt17sp( c : in out d.Criteria; invt17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt17sp", op, join, invt17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt17sp;


   procedure Add_invt18sp( c : in out d.Criteria; invt18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt18sp", op, join, invt18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt18sp;


   procedure Add_invt19sp( c : in out d.Criteria; invt19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt19sp", op, join, invt19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt19sp;


   procedure Add_invt21sp( c : in out d.Criteria; invt21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt21sp", op, join, invt21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt21sp;


   procedure Add_invt22sp( c : in out d.Criteria; invt22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt22sp", op, join, invt22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt22sp;


   procedure Add_invt23sp( c : in out d.Criteria; invt23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt23sp", op, join, invt23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt23sp;


   procedure Add_invt24sp( c : in out d.Criteria; invt24sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt24sp", op, join, invt24sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt24sp;


   procedure Add_invt25sp( c : in out d.Criteria; invt25sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt25sp", op, join, invt25sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt25sp;


   procedure Add_invt26sp( c : in out d.Criteria; invt26sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt26sp", op, join, invt26sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt26sp;


   procedure Add_invt27sp( c : in out d.Criteria; invt27sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt27sp", op, join, invt27sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt27sp;


   procedure Add_invt28sp( c : in out d.Criteria; invt28sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt28sp", op, join, invt28sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt28sp;


   procedure Add_invt29sp( c : in out d.Criteria; invt29sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt29sp", op, join, invt29sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt29sp;


   procedure Add_invt30sp( c : in out d.Criteria; invt30sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "invt30sp", op, join, invt30sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt30sp;


   procedure Add_nsa1hd( c : in out d.Criteria; nsa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa1hd", op, join, nsa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa1hd;


   procedure Add_nsa2hd( c : in out d.Criteria; nsa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa2hd", op, join, nsa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa2hd;


   procedure Add_nsa3hd( c : in out d.Criteria; nsa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa3hd", op, join, nsa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa3hd;


   procedure Add_nsa4hd( c : in out d.Criteria; nsa4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa4hd", op, join, nsa4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa4hd;


   procedure Add_nsa5hd( c : in out d.Criteria; nsa5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa5hd", op, join, nsa5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa5hd;


   procedure Add_nsa6hd( c : in out d.Criteria; nsa6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa6hd", op, join, nsa6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa6hd;


   procedure Add_nsa7hd( c : in out d.Criteria; nsa7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa7hd", op, join, nsa7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa7hd;


   procedure Add_nsa8hd( c : in out d.Criteria; nsa8hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa8hd", op, join, nsa8hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa8hd;


   procedure Add_nsa9hd( c : in out d.Criteria; nsa9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa9hd", op, join, nsa9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa9hd;


   procedure Add_nsa10hd( c : in out d.Criteria; nsa10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa10hd", op, join, nsa10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa10hd;


   procedure Add_nsa11hd( c : in out d.Criteria; nsa11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa11hd", op, join, nsa11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa11hd;


   procedure Add_nsa12hd( c : in out d.Criteria; nsa12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa12hd", op, join, nsa12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa12hd;


   procedure Add_nsa13hd( c : in out d.Criteria; nsa13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa13hd", op, join, nsa13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa13hd;


   procedure Add_nsa14hd( c : in out d.Criteria; nsa14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa14hd", op, join, nsa14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa14hd;


   procedure Add_nsa15hd( c : in out d.Criteria; nsa15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa15hd", op, join, nsa15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa15hd;


   procedure Add_nsa16hd( c : in out d.Criteria; nsa16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa16hd", op, join, nsa16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa16hd;


   procedure Add_nsa17hd( c : in out d.Criteria; nsa17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa17hd", op, join, nsa17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa17hd;


   procedure Add_nsa18hd( c : in out d.Criteria; nsa18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa18hd", op, join, nsa18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa18hd;


   procedure Add_nsa19hd( c : in out d.Criteria; nsa19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa19hd", op, join, nsa19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa19hd;


   procedure Add_nsa21hd( c : in out d.Criteria; nsa21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa21hd", op, join, nsa21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa21hd;


   procedure Add_nsa22hd( c : in out d.Criteria; nsa22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa22hd", op, join, nsa22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa22hd;


   procedure Add_nsa23hd( c : in out d.Criteria; nsa23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa23hd", op, join, nsa23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa23hd;


   procedure Add_nsa24hd( c : in out d.Criteria; nsa24hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa24hd", op, join, nsa24hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa24hd;


   procedure Add_nsa25hd( c : in out d.Criteria; nsa25hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa25hd", op, join, nsa25hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa25hd;


   procedure Add_nsa26hd( c : in out d.Criteria; nsa26hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa26hd", op, join, nsa26hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa26hd;


   procedure Add_nsa27hd( c : in out d.Criteria; nsa27hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa27hd", op, join, nsa27hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa27hd;


   procedure Add_nsa28hd( c : in out d.Criteria; nsa28hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa28hd", op, join, nsa28hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa28hd;


   procedure Add_nsa29hd( c : in out d.Criteria; nsa29hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa29hd", op, join, nsa29hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa29hd;


   procedure Add_nsa30hd( c : in out d.Criteria; nsa30hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa30hd", op, join, nsa30hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa30hd;


   procedure Add_nsa1sp( c : in out d.Criteria; nsa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa1sp", op, join, nsa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa1sp;


   procedure Add_nsa2sp( c : in out d.Criteria; nsa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa2sp", op, join, nsa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa2sp;


   procedure Add_nsa3sp( c : in out d.Criteria; nsa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa3sp", op, join, nsa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa3sp;


   procedure Add_nsa4sp( c : in out d.Criteria; nsa4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa4sp", op, join, nsa4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa4sp;


   procedure Add_nsa5sp( c : in out d.Criteria; nsa5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa5sp", op, join, nsa5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa5sp;


   procedure Add_nsa6sp( c : in out d.Criteria; nsa6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa6sp", op, join, nsa6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa6sp;


   procedure Add_nsa7sp( c : in out d.Criteria; nsa7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa7sp", op, join, nsa7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa7sp;


   procedure Add_nsa8sp( c : in out d.Criteria; nsa8sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa8sp", op, join, nsa8sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa8sp;


   procedure Add_nsa9sp( c : in out d.Criteria; nsa9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa9sp", op, join, nsa9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa9sp;


   procedure Add_nsa10sp( c : in out d.Criteria; nsa10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa10sp", op, join, nsa10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa10sp;


   procedure Add_nsa11sp( c : in out d.Criteria; nsa11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa11sp", op, join, nsa11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa11sp;


   procedure Add_nsa12sp( c : in out d.Criteria; nsa12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa12sp", op, join, nsa12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa12sp;


   procedure Add_nsa13sp( c : in out d.Criteria; nsa13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa13sp", op, join, nsa13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa13sp;


   procedure Add_nsa14sp( c : in out d.Criteria; nsa14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa14sp", op, join, nsa14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa14sp;


   procedure Add_nsa15sp( c : in out d.Criteria; nsa15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa15sp", op, join, nsa15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa15sp;


   procedure Add_nsa16sp( c : in out d.Criteria; nsa16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa16sp", op, join, nsa16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa16sp;


   procedure Add_nsa17sp( c : in out d.Criteria; nsa17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa17sp", op, join, nsa17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa17sp;


   procedure Add_nsa18sp( c : in out d.Criteria; nsa18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa18sp", op, join, nsa18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa18sp;


   procedure Add_nsa19sp( c : in out d.Criteria; nsa19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa19sp", op, join, nsa19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa19sp;


   procedure Add_nsa21sp( c : in out d.Criteria; nsa21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa21sp", op, join, nsa21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa21sp;


   procedure Add_nsa22sp( c : in out d.Criteria; nsa22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa22sp", op, join, nsa22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa22sp;


   procedure Add_nsa23sp( c : in out d.Criteria; nsa23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa23sp", op, join, nsa23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa23sp;


   procedure Add_nsa24sp( c : in out d.Criteria; nsa24sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa24sp", op, join, nsa24sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa24sp;


   procedure Add_nsa25sp( c : in out d.Criteria; nsa25sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa25sp", op, join, nsa25sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa25sp;


   procedure Add_nsa26sp( c : in out d.Criteria; nsa26sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa26sp", op, join, nsa26sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa26sp;


   procedure Add_nsa27sp( c : in out d.Criteria; nsa27sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa27sp", op, join, nsa27sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa27sp;


   procedure Add_nsa28sp( c : in out d.Criteria; nsa28sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa28sp", op, join, nsa28sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa28sp;


   procedure Add_nsa29sp( c : in out d.Criteria; nsa29sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa29sp", op, join, nsa29sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa29sp;


   procedure Add_nsa30sp( c : in out d.Criteria; nsa30sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nsa30sp", op, join, nsa30sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa30sp;


   procedure Add_ablehd( c : in out d.Criteria; ablehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ablehd", op, join, ablehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ablehd;


   procedure Add_ablesp( c : in out d.Criteria; ablesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ablesp", op, join, ablesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ablesp;


   procedure Add_abs1pdhd( c : in out d.Criteria; abs1pdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abs1pdhd", op, join, abs1pdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_abs1pdhd;


   procedure Add_abs1pdsp( c : in out d.Criteria; abs1pdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abs1pdsp", op, join, abs1pdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_abs1pdsp;


   procedure Add_absparhd( c : in out d.Criteria; absparhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "absparhd", op, join, absparhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_absparhd;


   procedure Add_absparsp( c : in out d.Criteria; absparsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "absparsp", op, join, absparsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_absparsp;


   procedure Add_abspayhd( c : in out d.Criteria; abspayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abspayhd", op, join, abspayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspayhd;


   procedure Add_abspaysp( c : in out d.Criteria; abspaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abspaysp", op, join, abspaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspaysp;


   procedure Add_abswhyhd( c : in out d.Criteria; abswhyhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abswhyhd", op, join, abswhyhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswhyhd;


   procedure Add_abswhysp( c : in out d.Criteria; abswhysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abswhysp", op, join, abswhysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswhysp;


   procedure Add_abswkhd( c : in out d.Criteria; abswkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abswkhd", op, join, abswkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswkhd;


   procedure Add_abswksp( c : in out d.Criteria; abswksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abswksp", op, join, abswksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswksp;


   procedure Add_acshd( c : in out d.Criteria; acshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acshd", op, join, acshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_acshd;


   procedure Add_acssp( c : in out d.Criteria; acssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acssp", op, join, acssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_acssp;


   procedure Add_acctqhd( c : in out d.Criteria; acctqhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acctqhd", op, join, acctqhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_acctqhd;


   procedure Add_acctqsp( c : in out d.Criteria; acctqsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acctqsp", op, join, acctqsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_acctqsp;


   procedure Add_acsamthd( c : in out d.Criteria; acsamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acsamthd", op, join, Long_Float( acsamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_acsamthd;


   procedure Add_acsamtsp( c : in out d.Criteria; acsamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acsamtsp", op, join, Long_Float( acsamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_acsamtsp;


   procedure Add_acspdhd( c : in out d.Criteria; acspdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acspdhd", op, join, acspdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_acspdhd;


   procedure Add_acspdsp( c : in out d.Criteria; acspdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "acspdsp", op, join, acspdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_acspdsp;


   procedure Add_actacihd( c : in out d.Criteria; actacihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "actacihd", op, join, actacihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_actacihd;


   procedure Add_actacisp( c : in out d.Criteria; actacisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "actacisp", op, join, actacisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_actacisp;


   procedure Add_emahd( c : in out d.Criteria; emahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emahd", op, join, emahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_emahd;


   procedure Add_emasp( c : in out d.Criteria; emasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emasp", op, join, emasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_emasp;


   procedure Add_emaamthd( c : in out d.Criteria; emaamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emaamthd", op, join, Long_Float( emaamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_emaamthd;


   procedure Add_emaamtsp( c : in out d.Criteria; emaamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emaamtsp", op, join, emaamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_emaamtsp;


   procedure Add_emapdhd( c : in out d.Criteria; emapdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdhd", op, join, emapdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdhd;


   procedure Add_emapdsp( c : in out d.Criteria; emapdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdsp", op, join, emapdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdsp;


   procedure Add_agehd( c : in out d.Criteria; agehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agehd", op, join, agehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_agehd;


   procedure Add_agesp( c : in out d.Criteria; agesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agesp", op, join, agesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_agesp;


   procedure Add_agehqhd( c : in out d.Criteria; agehqhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agehqhd", op, join, agehqhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_agehqhd;


   procedure Add_agehqsp( c : in out d.Criteria; agehqsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agehqsp", op, join, agehqsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_agehqsp;


   procedure Add_aliamthd( c : in out d.Criteria; aliamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aliamthd", op, join, Long_Float( aliamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliamthd;


   procedure Add_aliamtsp( c : in out d.Criteria; aliamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aliamtsp", op, join, Long_Float( aliamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliamtsp;


   procedure Add_alimnyhd( c : in out d.Criteria; alimnyhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "alimnyhd", op, join, alimnyhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_alimnyhd;


   procedure Add_alimnysp( c : in out d.Criteria; alimnysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "alimnysp", op, join, alimnysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_alimnysp;


   procedure Add_alipdhd( c : in out d.Criteria; alipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "alipdhd", op, join, alipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_alipdhd;


   procedure Add_alipdsp( c : in out d.Criteria; alipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "alipdsp", op, join, alipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_alipdsp;


   procedure Add_aliushd( c : in out d.Criteria; aliushd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aliushd", op, join, aliushd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliushd;


   procedure Add_aliussp( c : in out d.Criteria; aliussp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aliussp", op, join, aliussp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliussp;


   procedure Add_absallhd( c : in out d.Criteria; absallhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "absallhd", op, join, Long_Float( absallhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_absallhd;


   procedure Add_absallsp( c : in out d.Criteria; absallsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "absallsp", op, join, Long_Float( absallsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_absallsp;


   procedure Add_organhd( c : in out d.Criteria; organhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "organhd", op, join, Long_Float( organhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_organhd;


   procedure Add_organsp( c : in out d.Criteria; organsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "organsp", op, join, Long_Float( organsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_organsp;


   procedure Add_fosterhd( c : in out d.Criteria; fosterhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fosterhd", op, join, Long_Float( fosterhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fosterhd;


   procedure Add_fostersp( c : in out d.Criteria; fostersp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fostersp", op, join, Long_Float( fostersp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fostersp;


   procedure Add_adopthd( c : in out d.Criteria; adopthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adopthd", op, join, Long_Float( adopthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_adopthd;


   procedure Add_adoptsp( c : in out d.Criteria; adoptsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adoptsp", op, join, Long_Float( adoptsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_adoptsp;


   procedure Add_pasbalhd( c : in out d.Criteria; pasbalhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pasbalhd", op, join, pasbalhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pasbalhd;


   procedure Add_pasbalsp( c : in out d.Criteria; pasbalsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pasbalsp", op, join, pasbalsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pasbalsp;


   procedure Add_porganhd( c : in out d.Criteria; porganhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "porganhd", op, join, porganhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_porganhd;


   procedure Add_porgansp( c : in out d.Criteria; porgansp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "porgansp", op, join, porgansp );
   begin
      d.add_to_criteria( c, elem );
   end Add_porgansp;


   procedure Add_pfostehd( c : in out d.Criteria; pfostehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pfostehd", op, join, pfostehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfostehd;


   procedure Add_pfostesp( c : in out d.Criteria; pfostesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pfostesp", op, join, pfostesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfostesp;


   procedure Add_padopthd( c : in out d.Criteria; padopthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "padopthd", op, join, padopthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_padopthd;


   procedure Add_padoptsp( c : in out d.Criteria; padoptsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "padoptsp", op, join, padoptsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_padoptsp;


   procedure Add_aluamthd( c : in out d.Criteria; aluamthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aluamthd", op, join, aluamthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aluamthd;


   procedure Add_aluamtsp( c : in out d.Criteria; aluamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aluamtsp", op, join, aluamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aluamtsp;


   procedure Add_alupdhd( c : in out d.Criteria; alupdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "alupdhd", op, join, alupdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_alupdhd;


   procedure Add_alupdsp( c : in out d.Criteria; alupdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "alupdsp", op, join, alupdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_alupdsp;


   procedure Add_anyacchd( c : in out d.Criteria; anyacchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anyacchd", op, join, anyacchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyacchd;


   procedure Add_anyaccsp( c : in out d.Criteria; anyaccsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anyaccsp", op, join, anyaccsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyaccsp;


   procedure Add_anyedhd( c : in out d.Criteria; anyedhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anyedhd", op, join, anyedhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyedhd;


   procedure Add_anyedsp( c : in out d.Criteria; anyedsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anyedsp", op, join, anyedsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyedsp;


   procedure Add_anymonhd( c : in out d.Criteria; anymonhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anymonhd", op, join, anymonhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anymonhd;


   procedure Add_anymonsp( c : in out d.Criteria; anymonsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anymonsp", op, join, anymonsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anymonsp;


   procedure Add_anype1hd( c : in out d.Criteria; anype1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype1hd", op, join, anype1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype1hd;


   procedure Add_anype1sp( c : in out d.Criteria; anype1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype1sp", op, join, anype1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype1sp;


   procedure Add_anype2hd( c : in out d.Criteria; anype2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype2hd", op, join, anype2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype2hd;


   procedure Add_anype2sp( c : in out d.Criteria; anype2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype2sp", op, join, anype2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype2sp;


   procedure Add_anype3hd( c : in out d.Criteria; anype3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype3hd", op, join, anype3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype3hd;


   procedure Add_anype3sp( c : in out d.Criteria; anype3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype3sp", op, join, anype3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype3sp;


   procedure Add_anype4hd( c : in out d.Criteria; anype4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype4hd", op, join, anype4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype4hd;


   procedure Add_anype4sp( c : in out d.Criteria; anype4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype4sp", op, join, anype4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype4sp;


   procedure Add_anype5hd( c : in out d.Criteria; anype5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype5hd", op, join, anype5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype5hd;


   procedure Add_anype5sp( c : in out d.Criteria; anype5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype5sp", op, join, anype5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype5sp;


   procedure Add_anype6hd( c : in out d.Criteria; anype6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype6hd", op, join, anype6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype6hd;


   procedure Add_anype6sp( c : in out d.Criteria; anype6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype6sp", op, join, anype6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype6sp;


   procedure Add_anype7hd( c : in out d.Criteria; anype7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype7hd", op, join, anype7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype7hd;


   procedure Add_anype7sp( c : in out d.Criteria; anype7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anype7sp", op, join, anype7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype7sp;


   procedure Add_abspamhd( c : in out d.Criteria; abspamhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abspamhd", op, join, Long_Float( abspamhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspamhd;


   procedure Add_abspamsp( c : in out d.Criteria; abspamsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abspamsp", op, join, abspamsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspamsp;


   procedure Add_abspexhd( c : in out d.Criteria; abspexhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abspexhd", op, join, Long_Float( abspexhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspexhd;


   procedure Add_abspexsp( c : in out d.Criteria; abspexsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "abspexsp", op, join, abspexsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspexsp;


   procedure Add_apdpdhd( c : in out d.Criteria; apdpdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apdpdhd", op, join, apdpdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apdpdhd;


   procedure Add_apdpdsp( c : in out d.Criteria; apdpdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apdpdsp", op, join, apdpdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apdpdsp;


   procedure Add_pabspahd( c : in out d.Criteria; pabspahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pabspahd", op, join, pabspahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pabspahd;


   procedure Add_pabspasp( c : in out d.Criteria; pabspasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pabspasp", op, join, pabspasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pabspasp;


   procedure Add_basacthd( c : in out d.Criteria; basacthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "basacthd", op, join, basacthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_basacthd;


   procedure Add_basactsp( c : in out d.Criteria; basactsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "basactsp", op, join, basactsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_basactsp;


   procedure Add_bfdhd( c : in out d.Criteria; bfdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bfdhd", op, join, bfdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdhd;


   procedure Add_bfdsp( c : in out d.Criteria; bfdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bfdsp", op, join, bfdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdsp;


   procedure Add_bfdamthd( c : in out d.Criteria; bfdamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bfdamthd", op, join, Long_Float( bfdamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdamthd;


   procedure Add_bfdamtsp( c : in out d.Criteria; bfdamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bfdamtsp", op, join, Long_Float( bfdamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdamtsp;


   procedure Add_pbfdhd( c : in out d.Criteria; pbfdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfdhd", op, join, pbfdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfdhd;


   procedure Add_pbfdsp( c : in out d.Criteria; pbfdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfdsp", op, join, pbfdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfdsp;


   procedure Add_bfdvalhd( c : in out d.Criteria; bfdvalhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bfdvalhd", op, join, bfdvalhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdvalhd;


   procedure Add_bfdvalsp( c : in out d.Criteria; bfdvalsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bfdvalsp", op, join, bfdvalsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdvalsp;


   procedure Add_careabhd( c : in out d.Criteria; careabhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careabhd", op, join, careabhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_careabhd;


   procedure Add_careabsp( c : in out d.Criteria; careabsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careabsp", op, join, careabsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_careabsp;


   procedure Add_careahhd( c : in out d.Criteria; careahhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careahhd", op, join, careahhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_careahhd;


   procedure Add_careahsp( c : in out d.Criteria; careahsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careahsp", op, join, careahsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_careahsp;


   procedure Add_carecbhd( c : in out d.Criteria; carecbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carecbhd", op, join, carecbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carecbhd;


   procedure Add_carecbsp( c : in out d.Criteria; carecbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carecbsp", op, join, carecbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carecbsp;


   procedure Add_carechhd( c : in out d.Criteria; carechhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carechhd", op, join, carechhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carechhd;


   procedure Add_carechsp( c : in out d.Criteria; carechsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carechsp", op, join, carechsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carechsp;


   procedure Add_careclhd( c : in out d.Criteria; careclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careclhd", op, join, careclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_careclhd;


   procedure Add_careclsp( c : in out d.Criteria; careclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careclsp", op, join, careclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_careclsp;


   procedure Add_careflhd( c : in out d.Criteria; careflhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careflhd", op, join, careflhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_careflhd;


   procedure Add_careflsp( c : in out d.Criteria; careflsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careflsp", op, join, careflsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_careflsp;


   procedure Add_carefrhd( c : in out d.Criteria; carefrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carefrhd", op, join, carefrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carefrhd;


   procedure Add_carefrsp( c : in out d.Criteria; carefrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carefrsp", op, join, carefrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carefrsp;


   procedure Add_careothd( c : in out d.Criteria; careothd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careothd", op, join, careothd );
   begin
      d.add_to_criteria( c, elem );
   end Add_careothd;


   procedure Add_careotsp( c : in out d.Criteria; careotsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "careotsp", op, join, careotsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_careotsp;


   procedure Add_carerhd( c : in out d.Criteria; carerhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerhd", op, join, carerhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerhd;


   procedure Add_carersp( c : in out d.Criteria; carersp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carersp", op, join, carersp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carersp;


   procedure Add_cbaamthd( c : in out d.Criteria; cbaamthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbaamthd", op, join, cbaamthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbaamthd;


   procedure Add_cbaamtsp( c : in out d.Criteria; cbaamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbaamtsp", op, join, cbaamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbaamtsp;


   procedure Add_cbchkhd( c : in out d.Criteria; cbchkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbchkhd", op, join, cbchkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbchkhd;


   procedure Add_cbchksp( c : in out d.Criteria; cbchksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbchksp", op, join, cbchksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbchksp;


   procedure Add_changehd( c : in out d.Criteria; changehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "changehd", op, join, changehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_changehd;


   procedure Add_changesp( c : in out d.Criteria; changesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "changesp", op, join, changesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_changesp;


   procedure Add_chbflghd( c : in out d.Criteria; chbflghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbflghd", op, join, chbflghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbflghd;


   procedure Add_chbflgsp( c : in out d.Criteria; chbflgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbflgsp", op, join, chbflgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbflgsp;


   procedure Add_chknophd( c : in out d.Criteria; chknophd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chknophd", op, join, chknophd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chknophd;


   procedure Add_chknopsp( c : in out d.Criteria; chknopsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chknopsp", op, join, chknopsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chknopsp;


   procedure Add_fpchd( c : in out d.Criteria; fpchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fpchd", op, join, fpchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fpchd;


   procedure Add_fpcsp( c : in out d.Criteria; fpcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fpcsp", op, join, fpcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fpcsp;


   procedure Add_fuchd( c : in out d.Criteria; fuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fuchd", op, join, fuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fuchd;


   procedure Add_fucsp( c : in out d.Criteria; fucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fucsp", op, join, fucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fucsp;


   procedure Add_fhbhd( c : in out d.Criteria; fhbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fhbhd", op, join, fhbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fhbhd;


   procedure Add_fhbsp( c : in out d.Criteria; fhbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fhbsp", op, join, fhbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fhbsp;


   procedure Add_fwtchd( c : in out d.Criteria; fwtchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fwtchd", op, join, fwtchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fwtchd;


   procedure Add_fwtcsp( c : in out d.Criteria; fwtcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fwtcsp", op, join, fwtcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fwtcsp;


   procedure Add_fctchd( c : in out d.Criteria; fctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fctchd", op, join, fctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fctchd;


   procedure Add_fctcsp( c : in out d.Criteria; fctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fctcsp", op, join, fctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fctcsp;


   procedure Add_fishd( c : in out d.Criteria; fishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fishd", op, join, fishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fishd;


   procedure Add_fissp( c : in out d.Criteria; fissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fissp", op, join, fissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fissp;


   procedure Add_fjsahd( c : in out d.Criteria; fjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fjsahd", op, join, fjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fjsahd;


   procedure Add_fjsasp( c : in out d.Criteria; fjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fjsasp", op, join, fjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fjsasp;


   procedure Add_fesahd( c : in out d.Criteria; fesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fesahd", op, join, fesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fesahd;


   procedure Add_fesasp( c : in out d.Criteria; fesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fesasp", op, join, fesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fesasp;


   procedure Add_claimahd( c : in out d.Criteria; claimahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "claimahd", op, join, claimahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_claimahd;


   procedure Add_claimasp( c : in out d.Criteria; claimasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "claimasp", op, join, claimasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_claimasp;


   procedure Add_cohabhd( c : in out d.Criteria; cohabhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabhd", op, join, cohabhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabhd;


   procedure Add_cohabsp( c : in out d.Criteria; cohabsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabsp", op, join, cohabsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabsp;


   procedure Add_condithd( c : in out d.Criteria; condithd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "condithd", op, join, condithd );
   begin
      d.add_to_criteria( c, elem );
   end Add_condithd;


   procedure Add_conditsp( c : in out d.Criteria; conditsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "conditsp", op, join, conditsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_conditsp;


   procedure Add_blodgehd( c : in out d.Criteria; blodgehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blodgehd", op, join, blodgehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_blodgehd;


   procedure Add_blodgesp( c : in out d.Criteria; blodgesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blodgesp", op, join, blodgesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_blodgesp;


   procedure Add_ctclm1hd( c : in out d.Criteria; ctclm1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctclm1hd", op, join, ctclm1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm1hd;


   procedure Add_ctclm1sp( c : in out d.Criteria; ctclm1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctclm1sp", op, join, ctclm1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm1sp;


   procedure Add_ctclm2hd( c : in out d.Criteria; ctclm2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctclm2hd", op, join, ctclm2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm2hd;


   procedure Add_ctclm2sp( c : in out d.Criteria; ctclm2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctclm2sp", op, join, ctclm2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm2sp;


   procedure Add_cupchkhd( c : in out d.Criteria; cupchkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cupchkhd", op, join, cupchkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cupchkhd;


   procedure Add_cupchksp( c : in out d.Criteria; cupchksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cupchksp", op, join, cupchksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cupchksp;


   procedure Add_curacthd( c : in out d.Criteria; curacthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curacthd", op, join, curacthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_curacthd;


   procedure Add_curactsp( c : in out d.Criteria; curactsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curactsp", op, join, curactsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_curactsp;


   procedure Add_curqulhd( c : in out d.Criteria; curqulhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulhd", op, join, curqulhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulhd;


   procedure Add_curqulsp( c : in out d.Criteria; curqulsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulsp", op, join, curqulsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulsp;


   procedure Add_blheadhd( c : in out d.Criteria; blheadhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blheadhd", op, join, blheadhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_blheadhd;


   procedure Add_blheadsp( c : in out d.Criteria; blheadsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blheadsp", op, join, blheadsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_blheadsp;


   procedure Add_blrenthd( c : in out d.Criteria; blrenthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blrenthd", op, join, Long_Float( blrenthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_blrenthd;


   procedure Add_blrentsp( c : in out d.Criteria; blrentsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blrentsp", op, join, Long_Float( blrentsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_blrentsp;


   procedure Add_pblrenhd( c : in out d.Criteria; pblrenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pblrenhd", op, join, pblrenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pblrenhd;


   procedure Add_pblrensp( c : in out d.Criteria; pblrensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pblrensp", op, join, pblrensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pblrensp;


   procedure Add_ddaprghd( c : in out d.Criteria; ddaprghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ddaprghd", op, join, ddaprghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddaprghd;


   procedure Add_ddaprgsp( c : in out d.Criteria; ddaprgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ddaprgsp", op, join, ddaprgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddaprgsp;


   procedure Add_ddatrehd( c : in out d.Criteria; ddatrehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ddatrehd", op, join, ddatrehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatrehd;


   procedure Add_ddatresp( c : in out d.Criteria; ddatresp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ddatresp", op, join, ddatresp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatresp;


   procedure Add_ddatrphd( c : in out d.Criteria; ddatrphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ddatrphd", op, join, ddatrphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatrphd;


   procedure Add_ddatrpsp( c : in out d.Criteria; ddatrpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ddatrpsp", op, join, ddatrpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatrpsp;


   procedure Add_defrpnhd( c : in out d.Criteria; defrpnhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "defrpnhd", op, join, defrpnhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_defrpnhd;


   procedure Add_defrpnsp( c : in out d.Criteria; defrpnsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "defrpnsp", op, join, defrpnsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_defrpnsp;


   procedure Add_dependhd( c : in out d.Criteria; dependhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dependhd", op, join, dependhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dependhd;


   procedure Add_dependsp( c : in out d.Criteria; dependsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dependsp", op, join, dependsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dependsp;


   procedure Add_disacahd( c : in out d.Criteria; disacahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacahd", op, join, disacahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacahd;


   procedure Add_disacasp( c : in out d.Criteria; disacasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacasp", op, join, disacasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacasp;


   procedure Add_qpiphd( c : in out d.Criteria; qpiphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpiphd", op, join, qpiphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpiphd;


   procedure Add_qpipsp( c : in out d.Criteria; qpipsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpipsp", op, join, qpipsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipsp;


   procedure Add_qdlahd( c : in out d.Criteria; qdlahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qdlahd", op, join, qdlahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qdlahd;


   procedure Add_qdlasp( c : in out d.Criteria; qdlasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qdlasp", op, join, qdlasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qdlasp;


   procedure Add_qaahd( c : in out d.Criteria; qaahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qaahd", op, join, qaahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaahd;


   procedure Add_qaasp( c : in out d.Criteria; qaasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qaasp", op, join, qaasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaasp;


   procedure Add_qsdahd( c : in out d.Criteria; qsdahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qsdahd", op, join, qsdahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsdahd;


   procedure Add_qsdasp( c : in out d.Criteria; qsdasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qsdasp", op, join, qsdasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsdasp;


   procedure Add_qibhd( c : in out d.Criteria; qibhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qibhd", op, join, qibhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qibhd;


   procedure Add_qibsp( c : in out d.Criteria; qibsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qibsp", op, join, qibsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qibsp;


   procedure Add_qiidbhd( c : in out d.Criteria; qiidbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qiidbhd", op, join, qiidbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qiidbhd;


   procedure Add_qiidbsp( c : in out d.Criteria; qiidbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qiidbsp", op, join, qiidbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qiidbsp;


   procedure Add_discoahd( c : in out d.Criteria; discoahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoahd", op, join, discoahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoahd;


   procedure Add_discoasp( c : in out d.Criteria; discoasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoasp", op, join, discoasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoasp;


   procedure Add_disd01hd( c : in out d.Criteria; disd01hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd01hd", op, join, disd01hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd01hd;


   procedure Add_disd01sp( c : in out d.Criteria; disd01sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd01sp", op, join, disd01sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd01sp;


   procedure Add_disd02hd( c : in out d.Criteria; disd02hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd02hd", op, join, disd02hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd02hd;


   procedure Add_disd02sp( c : in out d.Criteria; disd02sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd02sp", op, join, disd02sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd02sp;


   procedure Add_disd03hd( c : in out d.Criteria; disd03hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd03hd", op, join, disd03hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd03hd;


   procedure Add_disd03sp( c : in out d.Criteria; disd03sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd03sp", op, join, disd03sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd03sp;


   procedure Add_disd04hd( c : in out d.Criteria; disd04hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd04hd", op, join, disd04hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd04hd;


   procedure Add_disd04sp( c : in out d.Criteria; disd04sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd04sp", op, join, disd04sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd04sp;


   procedure Add_disd05hd( c : in out d.Criteria; disd05hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd05hd", op, join, disd05hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd05hd;


   procedure Add_disd05sp( c : in out d.Criteria; disd05sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd05sp", op, join, disd05sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd05sp;


   procedure Add_disd06hd( c : in out d.Criteria; disd06hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd06hd", op, join, disd06hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd06hd;


   procedure Add_disd06sp( c : in out d.Criteria; disd06sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd06sp", op, join, disd06sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd06sp;


   procedure Add_disd07hd( c : in out d.Criteria; disd07hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd07hd", op, join, disd07hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd07hd;


   procedure Add_disd07sp( c : in out d.Criteria; disd07sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd07sp", op, join, disd07sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd07sp;


   procedure Add_disd08hd( c : in out d.Criteria; disd08hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd08hd", op, join, disd08hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd08hd;


   procedure Add_disd08sp( c : in out d.Criteria; disd08sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd08sp", op, join, disd08sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd08sp;


   procedure Add_disd09hd( c : in out d.Criteria; disd09hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd09hd", op, join, disd09hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd09hd;


   procedure Add_disd09sp( c : in out d.Criteria; disd09sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd09sp", op, join, disd09sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd09sp;


   procedure Add_disd10hd( c : in out d.Criteria; disd10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd10hd", op, join, disd10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd10hd;


   procedure Add_disd10sp( c : in out d.Criteria; disd10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disd10sp", op, join, disd10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd10sp;


   procedure Add_disdifhd( c : in out d.Criteria; disdifhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disdifhd", op, join, disdifhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_disdifhd;


   procedure Add_disdifsp( c : in out d.Criteria; disdifsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disdifsp", op, join, disdifsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_disdifsp;


   procedure Add_dlachd( c : in out d.Criteria; dlachd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlachd", op, join, dlachd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlachd;


   procedure Add_dlacsp( c : in out d.Criteria; dlacsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacsp", op, join, dlacsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacsp;


   procedure Add_dlamhd( c : in out d.Criteria; dlamhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamhd", op, join, dlamhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamhd;


   procedure Add_dlamsp( c : in out d.Criteria; dlamsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamsp", op, join, dlamsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamsp;


   procedure Add_dlshd( c : in out d.Criteria; dlshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlshd", op, join, dlshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlshd;


   procedure Add_dlssp( c : in out d.Criteria; dlssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlssp", op, join, dlssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlssp;


   procedure Add_dlsamthd( c : in out d.Criteria; dlsamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlsamthd", op, join, Long_Float( dlsamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsamthd;


   procedure Add_dlsamtsp( c : in out d.Criteria; dlsamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlsamtsp", op, join, Long_Float( dlsamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsamtsp;


   procedure Add_pdlshd( c : in out d.Criteria; pdlshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlshd", op, join, pdlshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlshd;


   procedure Add_pdlssp( c : in out d.Criteria; pdlssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlssp", op, join, pdlssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlssp;


   procedure Add_dlsvalhd( c : in out d.Criteria; dlsvalhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlsvalhd", op, join, dlsvalhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsvalhd;


   procedure Add_dlsvalsp( c : in out d.Criteria; dlsvalsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlsvalsp", op, join, dlsvalsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsvalsp;


   procedure Add_dobhd( c : in out d.Criteria; dobhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobhd", op, join, dobhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobhd;


   procedure Add_dobsp( c : in out d.Criteria; dobsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobsp", op, join, dobsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobsp;


   procedure Add_h3qualhd( c : in out d.Criteria; h3qualhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "h3qualhd", op, join, h3qualhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_h3qualhd;


   procedure Add_h3qualsp( c : in out d.Criteria; h3qualsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "h3qualsp", op, join, h3qualsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_h3qualsp;


   procedure Add_dvil3ahd( c : in out d.Criteria; dvil3ahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvil3ahd", op, join, dvil3ahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil3ahd;


   procedure Add_dvil3asp( c : in out d.Criteria; dvil3asp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvil3asp", op, join, dvil3asp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil3asp;


   procedure Add_dvil4ahd( c : in out d.Criteria; dvil4ahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvil4ahd", op, join, dvil4ahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil4ahd;


   procedure Add_dvil4asp( c : in out d.Criteria; dvil4asp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvil4asp", op, join, dvil4asp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil4asp;


   procedure Add_dvjb12hd( c : in out d.Criteria; dvjb12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvjb12hd", op, join, dvjb12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvjb12hd;


   procedure Add_dvjb12sp( c : in out d.Criteria; dvjb12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvjb12sp", op, join, dvjb12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvjb12sp;


   procedure Add_dvmarhd( c : in out d.Criteria; dvmarhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarhd", op, join, dvmarhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarhd;


   procedure Add_dvmarsp( c : in out d.Criteria; dvmarsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarsp", op, join, dvmarsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarsp;


   procedure Add_edl1ahd( c : in out d.Criteria; edl1ahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl1ahd", op, join, edl1ahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1ahd;


   procedure Add_edl1asp( c : in out d.Criteria; edl1asp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl1asp", op, join, edl1asp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1asp;


   procedure Add_pedl1ahd( c : in out d.Criteria; pedl1ahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pedl1ahd", op, join, pedl1ahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl1ahd;


   procedure Add_pedl1asp( c : in out d.Criteria; pedl1asp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pedl1asp", op, join, pedl1asp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl1asp;


   procedure Add_edl1obhd( c : in out d.Criteria; edl1obhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl1obhd", op, join, edl1obhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1obhd;


   procedure Add_edl1obsp( c : in out d.Criteria; edl1obsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl1obsp", op, join, edl1obsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1obsp;


   procedure Add_edl2ahd( c : in out d.Criteria; edl2ahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl2ahd", op, join, edl2ahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2ahd;


   procedure Add_edl2asp( c : in out d.Criteria; edl2asp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl2asp", op, join, edl2asp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2asp;


   procedure Add_pedl2ahd( c : in out d.Criteria; pedl2ahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pedl2ahd", op, join, pedl2ahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl2ahd;


   procedure Add_pedl2asp( c : in out d.Criteria; pedl2asp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pedl2asp", op, join, pedl2asp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl2asp;


   procedure Add_edl2obhd( c : in out d.Criteria; edl2obhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl2obhd", op, join, edl2obhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2obhd;


   procedure Add_edl2obsp( c : in out d.Criteria; edl2obsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edl2obsp", op, join, edl2obsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2obsp;


   procedure Add_edatthd( c : in out d.Criteria; edatthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edatthd", op, join, edatthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edatthd;


   procedure Add_edattsp( c : in out d.Criteria; edattsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edattsp", op, join, edattsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edattsp;


   procedure Add_edhrhd( c : in out d.Criteria; edhrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edhrhd", op, join, edhrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edhrhd;


   procedure Add_edhrsp( c : in out d.Criteria; edhrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edhrsp", op, join, edhrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edhrsp;


   procedure Add_edtyphd( c : in out d.Criteria; edtyphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edtyphd", op, join, edtyphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_edtyphd;


   procedure Add_edtypsp( c : in out d.Criteria; edtypsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "edtypsp", op, join, edtypsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_edtypsp;


   procedure Add_empconhd( c : in out d.Criteria; empconhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empconhd", op, join, empconhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empconhd;


   procedure Add_empconsp( c : in out d.Criteria; empconsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empconsp", op, join, empconsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empconsp;


   procedure Add_empocchd( c : in out d.Criteria; empocchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empocchd", op, join, Long_Float( empocchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_empocchd;


   procedure Add_empoccsp( c : in out d.Criteria; empoccsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empoccsp", op, join, Long_Float( empoccsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_empoccsp;


   procedure Add_empshd( c : in out d.Criteria; empshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empshd", op, join, empshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empshd;


   procedure Add_empssp( c : in out d.Criteria; empssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empssp", op, join, empssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empssp;


   procedure Add_empbhd( c : in out d.Criteria; empbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empbhd", op, join, empbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empbhd;


   procedure Add_empbsp( c : in out d.Criteria; empbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empbsp", op, join, empbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empbsp;


   procedure Add_empchd( c : in out d.Criteria; empchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empchd", op, join, empchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empchd;


   procedure Add_empcsp( c : in out d.Criteria; empcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empcsp", op, join, empcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empcsp;


   procedure Add_empilohd( c : in out d.Criteria; empilohd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empilohd", op, join, empilohd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empilohd;


   procedure Add_empilosp( c : in out d.Criteria; empilosp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empilosp", op, join, empilosp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empilosp;


   procedure Add_es2000hd( c : in out d.Criteria; es2000hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "es2000hd", op, join, es2000hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_es2000hd;


   procedure Add_es2000sp( c : in out d.Criteria; es2000sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "es2000sp", op, join, es2000sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_es2000sp;


   procedure Add_ethgr3hd( c : in out d.Criteria; ethgr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ethgr3hd", op, join, ethgr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgr3hd;


   procedure Add_ethgr3sp( c : in out d.Criteria; ethgr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ethgr3sp", op, join, ethgr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgr3sp;


   procedure Add_ethgpshd( c : in out d.Criteria; ethgpshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ethgpshd", op, join, ethgpshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgpshd;


   procedure Add_ethgpssp( c : in out d.Criteria; ethgpssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ethgpssp", op, join, ethgpssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgpssp;


   procedure Add_etngrphd( c : in out d.Criteria; etngrphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etngrphd", op, join, etngrphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_etngrphd;


   procedure Add_etngrpsp( c : in out d.Criteria; etngrpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etngrpsp", op, join, etngrpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_etngrpsp;


   procedure Add_eualamhd( c : in out d.Criteria; eualamhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "eualamhd", op, join, Long_Float( eualamhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualamhd;


   procedure Add_eualamsp( c : in out d.Criteria; eualamsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "eualamsp", op, join, Long_Float( eualamsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualamsp;


   procedure Add_eualmnhd( c : in out d.Criteria; eualmnhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "eualmnhd", op, join, eualmnhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualmnhd;


   procedure Add_eualmnsp( c : in out d.Criteria; eualmnsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "eualmnsp", op, join, eualmnsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualmnsp;


   procedure Add_peualihd( c : in out d.Criteria; peualihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "peualihd", op, join, peualihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_peualihd;


   procedure Add_peualisp( c : in out d.Criteria; peualisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "peualisp", op, join, peualisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_peualisp;


   procedure Add_euetyphd( c : in out d.Criteria; euetyphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "euetyphd", op, join, euetyphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_euetyphd;


   procedure Add_euetypsp( c : in out d.Criteria; euetypsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "euetypsp", op, join, euetypsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_euetypsp;


   procedure Add_everwkhd( c : in out d.Criteria; everwkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "everwkhd", op, join, everwkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_everwkhd;


   procedure Add_everwksp( c : in out d.Criteria; everwksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "everwksp", op, join, everwksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_everwksp;


   procedure Add_ehbct1hd( c : in out d.Criteria; ehbct1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ehbct1hd", op, join, ehbct1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ehbct1hd;


   procedure Add_ehbct1sp( c : in out d.Criteria; ehbct1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ehbct1sp", op, join, ehbct1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ehbct1sp;


   procedure Add_fllwphd( c : in out d.Criteria; fllwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fllwphd", op, join, fllwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fllwphd;


   procedure Add_fllwpsp( c : in out d.Criteria; fllwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fllwpsp", op, join, fllwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fllwpsp;


   procedure Add_ftedhd( c : in out d.Criteria; ftedhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedhd", op, join, ftedhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedhd;


   procedure Add_ftedsp( c : in out d.Criteria; ftedsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedsp", op, join, ftedsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedsp;


   procedure Add_ftwkyrhd( c : in out d.Criteria; ftwkyrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftwkyrhd", op, join, ftwkyrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftwkyrhd;


   procedure Add_ftwkyrsp( c : in out d.Criteria; ftwkyrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftwkyrsp", op, join, ftwkyrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftwkyrsp;


   procedure Add_gebacthd( c : in out d.Criteria; gebacthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gebacthd", op, join, gebacthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gebacthd;


   procedure Add_gebactsp( c : in out d.Criteria; gebactsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gebactsp", op, join, gebactsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gebactsp;


   procedure Add_giltcthd( c : in out d.Criteria; giltcthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "giltcthd", op, join, giltcthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_giltcthd;


   procedure Add_giltctsp( c : in out d.Criteria; giltctsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "giltctsp", op, join, giltctsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_giltctsp;


   procedure Add_gpispchd( c : in out d.Criteria; gpispchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gpispchd", op, join, gpispchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpispchd;


   procedure Add_gpispcsp( c : in out d.Criteria; gpispcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gpispcsp", op, join, gpispcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpispcsp;


   procedure Add_gpjesahd( c : in out d.Criteria; gpjesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gpjesahd", op, join, gpjesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpjesahd;


   procedure Add_gpjesasp( c : in out d.Criteria; gpjesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gpjesasp", op, join, gpjesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpjesasp;


   procedure Add_gpuchd( c : in out d.Criteria; gpuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gpuchd", op, join, gpuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpuchd;


   procedure Add_gpucsp( c : in out d.Criteria; gpucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gpucsp", op, join, gpucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpucsp;


   procedure Add_granthd( c : in out d.Criteria; granthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "granthd", op, join, granthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_granthd;


   procedure Add_grantsp( c : in out d.Criteria; grantsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grantsp", op, join, grantsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_grantsp;


   procedure Add_gt1valhd( c : in out d.Criteria; gt1valhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1valhd", op, join, gt1valhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1valhd;


   procedure Add_gt1valsp( c : in out d.Criteria; gt1valsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1valsp", op, join, Long_Float( gt1valsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1valsp;


   procedure Add_gt2valhd( c : in out d.Criteria; gt2valhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2valhd", op, join, gt2valhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2valhd;


   procedure Add_gt2valsp( c : in out d.Criteria; gt2valsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2valsp", op, join, gt2valsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2valsp;


   procedure Add_gt1dirhd( c : in out d.Criteria; gt1dirhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1dirhd", op, join, gt1dirhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1dirhd;


   procedure Add_gt1dirsp( c : in out d.Criteria; gt1dirsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1dirsp", op, join, Long_Float( gt1dirsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1dirsp;


   procedure Add_gt2dirhd( c : in out d.Criteria; gt2dirhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2dirhd", op, join, gt2dirhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2dirhd;


   procedure Add_gt2dirsp( c : in out d.Criteria; gt2dirsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2dirsp", op, join, gt2dirsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2dirsp;


   procedure Add_grtnumhd( c : in out d.Criteria; grtnumhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grtnumhd", op, join, grtnumhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_grtnumhd;


   procedure Add_grtnumsp( c : in out d.Criteria; grtnumsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grtnumsp", op, join, grtnumsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_grtnumsp;


   procedure Add_gt1scehd( c : in out d.Criteria; gt1scehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scehd", op, join, gt1scehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scehd;


   procedure Add_gt1scesp( c : in out d.Criteria; gt1scesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scesp", op, join, gt1scesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scesp;


   procedure Add_gt2scehd( c : in out d.Criteria; gt2scehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scehd", op, join, gt2scehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scehd;


   procedure Add_gt2scesp( c : in out d.Criteria; gt2scesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scesp", op, join, gt2scesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scesp;


   procedure Add_gt1oshd( c : in out d.Criteria; gt1oshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1oshd", op, join, gt1oshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1oshd;


   procedure Add_gt1ossp( c : in out d.Criteria; gt1ossp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1ossp", op, join, gt1ossp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1ossp;


   procedure Add_gt2oshd( c : in out d.Criteria; gt2oshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2oshd", op, join, gt2oshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2oshd;


   procedure Add_gt2ossp( c : in out d.Criteria; gt2ossp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2ossp", op, join, gt2ossp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2ossp;


   procedure Add_gtahd( c : in out d.Criteria; gtahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtahd", op, join, gtahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtahd;


   procedure Add_gtasp( c : in out d.Criteria; gtasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtasp", op, join, gtasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtasp;


   procedure Add_healthhd( c : in out d.Criteria; healthhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "healthhd", op, join, healthhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_healthhd;


   procedure Add_healthsp( c : in out d.Criteria; healthsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "healthsp", op, join, healthsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_healthsp;


   procedure Add_heartvhd( c : in out d.Criteria; heartvhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heartvhd", op, join, Long_Float( heartvhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_heartvhd;


   procedure Add_heartvsp( c : in out d.Criteria; heartvsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heartvsp", op, join, Long_Float( heartvsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_heartvsp;


   procedure Add_heatadhd( c : in out d.Criteria; heatadhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatadhd", op, join, heatadhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatadhd;


   procedure Add_heatadsp( c : in out d.Criteria; heatadsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatadsp", op, join, heatadsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatadsp;


   procedure Add_hholdrhd( c : in out d.Criteria; hholdrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hholdrhd", op, join, hholdrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hholdrhd;


   procedure Add_hholdrsp( c : in out d.Criteria; hholdrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hholdrsp", op, join, hholdrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hholdrsp;


   procedure Add_hourabhd( c : in out d.Criteria; hourabhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourabhd", op, join, hourabhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourabhd;


   procedure Add_hourabsp( c : in out d.Criteria; hourabsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourabsp", op, join, hourabsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourabsp;


   procedure Add_hourahhd( c : in out d.Criteria; hourahhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourahhd", op, join, hourahhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourahhd;


   procedure Add_hourahsp( c : in out d.Criteria; hourahsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourahsp", op, join, hourahsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourahsp;


   procedure Add_hrcarehd( c : in out d.Criteria; hrcarehd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrcarehd", op, join, Long_Float( hrcarehd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrcarehd;


   procedure Add_hrcaresp( c : in out d.Criteria; hrcaresp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrcaresp", op, join, Long_Float( hrcaresp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrcaresp;


   procedure Add_hourcbhd( c : in out d.Criteria; hourcbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourcbhd", op, join, hourcbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourcbhd;


   procedure Add_hourcbsp( c : in out d.Criteria; hourcbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourcbsp", op, join, hourcbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourcbsp;


   procedure Add_hourchhd( c : in out d.Criteria; hourchhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourchhd", op, join, hourchhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourchhd;


   procedure Add_hourchsp( c : in out d.Criteria; hourchsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourchsp", op, join, hourchsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourchsp;


   procedure Add_hourclhd( c : in out d.Criteria; hourclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourclhd", op, join, hourclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourclhd;


   procedure Add_hourclsp( c : in out d.Criteria; hourclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourclsp", op, join, hourclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourclsp;


   procedure Add_hourfrhd( c : in out d.Criteria; hourfrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourfrhd", op, join, hourfrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourfrhd;


   procedure Add_hourfrsp( c : in out d.Criteria; hourfrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourfrsp", op, join, hourfrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourfrsp;


   procedure Add_hourothd( c : in out d.Criteria; hourothd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourothd", op, join, hourothd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourothd;


   procedure Add_hourotsp( c : in out d.Criteria; hourotsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourotsp", op, join, hourotsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourotsp;


   procedure Add_hourrehd( c : in out d.Criteria; hourrehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourrehd", op, join, hourrehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourrehd;


   procedure Add_hourresp( c : in out d.Criteria; hourresp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourresp", op, join, hourresp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourresp;


   procedure Add_hourtthd( c : in out d.Criteria; hourtthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourtthd", op, join, hourtthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourtthd;


   procedure Add_hourttsp( c : in out d.Criteria; hourttsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hourttsp", op, join, hourttsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourttsp;


   procedure Add_hpersohd( c : in out d.Criteria; hpersohd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersohd", op, join, hpersohd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersohd;


   procedure Add_hpersosp( c : in out d.Criteria; hpersosp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersosp", op, join, hpersosp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersosp;


   procedure Add_hrpidhd( c : in out d.Criteria; hrpidhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrpidhd", op, join, hrpidhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrpidhd;


   procedure Add_hrpidsp( c : in out d.Criteria; hrpidsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrpidsp", op, join, hrpidsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrpidsp;


   procedure Add_hsvperhd( c : in out d.Criteria; hsvperhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvperhd", op, join, hsvperhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvperhd;


   procedure Add_hsvpersp( c : in out d.Criteria; hsvpersp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvpersp", op, join, hsvpersp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvpersp;


   procedure Add_agegp2hd( c : in out d.Criteria; agegp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agegp2hd", op, join, agegp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegp2hd;


   procedure Add_agegp2sp( c : in out d.Criteria; agegp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agegp2sp", op, join, agegp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegp2sp;


   procedure Add_agegphd( c : in out d.Criteria; agegphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agegphd", op, join, agegphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegphd;


   procedure Add_agegpsp( c : in out d.Criteria; agegpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agegpsp", op, join, agegpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegpsp;


   procedure Add_quninshd( c : in out d.Criteria; quninshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "quninshd", op, join, quninshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_quninshd;


   procedure Add_quninssp( c : in out d.Criteria; quninssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "quninssp", op, join, quninssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_quninssp;


   procedure Add_qtubenhd( c : in out d.Criteria; qtubenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qtubenhd", op, join, qtubenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qtubenhd;


   procedure Add_qtubensp( c : in out d.Criteria; qtubensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qtubensp", op, join, qtubensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qtubensp;


   procedure Add_qsicinhd( c : in out d.Criteria; qsicinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qsicinhd", op, join, qsicinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsicinhd;


   procedure Add_qsicinsp( c : in out d.Criteria; qsicinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qsicinsp", op, join, qsicinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsicinsp;


   procedure Add_qaccinhd( c : in out d.Criteria; qaccinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qaccinhd", op, join, qaccinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaccinhd;


   procedure Add_qaccinsp( c : in out d.Criteria; qaccinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qaccinsp", op, join, qaccinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaccinsp;


   procedure Add_qpehinhd( c : in out d.Criteria; qpehinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpehinhd", op, join, qpehinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpehinhd;


   procedure Add_qpehinsp( c : in out d.Criteria; qpehinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpehinsp", op, join, qpehinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpehinsp;


   procedure Add_qhosinhd( c : in out d.Criteria; qhosinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qhosinhd", op, join, qhosinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhosinhd;


   procedure Add_qhosinsp( c : in out d.Criteria; qhosinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qhosinsp", op, join, qhosinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhosinsp;


   procedure Add_qfsbenhd( c : in out d.Criteria; qfsbenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qfsbenhd", op, join, qfsbenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qfsbenhd;


   procedure Add_qfsbensp( c : in out d.Criteria; qfsbensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qfsbensp", op, join, qfsbensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qfsbensp;


   procedure Add_qcichd( c : in out d.Criteria; qcichd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qcichd", op, join, qcichd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcichd;


   procedure Add_qcicsp( c : in out d.Criteria; qcicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qcicsp", op, join, qcicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcicsp;


   procedure Add_qotbenhd( c : in out d.Criteria; qotbenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qotbenhd", op, join, qotbenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qotbenhd;


   procedure Add_qotbensp( c : in out d.Criteria; qotbensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qotbensp", op, join, qotbensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qotbensp;


   procedure Add_incdurhd( c : in out d.Criteria; incdurhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incdurhd", op, join, incdurhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_incdurhd;


   procedure Add_incdursp( c : in out d.Criteria; incdursp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incdursp", op, join, incdursp );
   begin
      d.add_to_criteria( c, elem );
   end Add_incdursp;


   procedure Add_incsehd( c : in out d.Criteria; incsehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incsehd", op, join, incsehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_incsehd;


   procedure Add_incsesp( c : in out d.Criteria; incsesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incsesp", op, join, incsesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_incsesp;


   procedure Add_indinchd( c : in out d.Criteria; indinchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "indinchd", op, join, indinchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_indinchd;


   procedure Add_indincsp( c : in out d.Criteria; indincsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "indincsp", op, join, indincsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_indincsp;


   procedure Add_indisbhd( c : in out d.Criteria; indisbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "indisbhd", op, join, indisbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_indisbhd;


   procedure Add_indisbsp( c : in out d.Criteria; indisbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "indisbsp", op, join, indisbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_indisbsp;


   procedure Add_inearnhd( c : in out d.Criteria; inearnhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inearnhd", op, join, inearnhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inearnhd;


   procedure Add_inearnsp( c : in out d.Criteria; inearnsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inearnsp", op, join, inearnsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inearnsp;


   procedure Add_ininvhd( c : in out d.Criteria; ininvhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ininvhd", op, join, ininvhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ininvhd;


   procedure Add_ininvsp( c : in out d.Criteria; ininvsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ininvsp", op, join, ininvsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ininvsp;


   procedure Add_inirbehd( c : in out d.Criteria; inirbehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inirbehd", op, join, inirbehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inirbehd;


   procedure Add_inirbesp( c : in out d.Criteria; inirbesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inirbesp", op, join, inirbesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inirbesp;


   procedure Add_injlonhd( c : in out d.Criteria; injlonhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "injlonhd", op, join, injlonhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_injlonhd;


   procedure Add_injlonsp( c : in out d.Criteria; injlonsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "injlonsp", op, join, injlonsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_injlonsp;


   procedure Add_injhrshd( c : in out d.Criteria; injhrshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "injhrshd", op, join, injhrshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_injhrshd;


   procedure Add_injhrssp( c : in out d.Criteria; injhrssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "injhrssp", op, join, injhrssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_injhrssp;


   procedure Add_innirbhd( c : in out d.Criteria; innirbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "innirbhd", op, join, innirbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_innirbhd;


   procedure Add_innirbsp( c : in out d.Criteria; innirbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "innirbsp", op, join, innirbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_innirbsp;


   procedure Add_inothbhd( c : in out d.Criteria; inothbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inothbhd", op, join, inothbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inothbhd;


   procedure Add_inothbsp( c : in out d.Criteria; inothbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inothbsp", op, join, inothbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inothbsp;


   procedure Add_inpenihd( c : in out d.Criteria; inpenihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inpenihd", op, join, inpenihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inpenihd;


   procedure Add_inpenisp( c : in out d.Criteria; inpenisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inpenisp", op, join, inpenisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inpenisp;


   procedure Add_inrinchd( c : in out d.Criteria; inrinchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inrinchd", op, join, inrinchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrinchd;


   procedure Add_inrincsp( c : in out d.Criteria; inrincsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inrincsp", op, join, inrincsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrincsp;


   procedure Add_inrpinhd( c : in out d.Criteria; inrpinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inrpinhd", op, join, inrpinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrpinhd;


   procedure Add_inrpinsp( c : in out d.Criteria; inrpinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inrpinsp", op, join, inrpinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrpinsp;


   procedure Add_itvlichd( c : in out d.Criteria; itvlichd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "itvlichd", op, join, Long_Float( itvlichd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_itvlichd;


   procedure Add_itvlicsp( c : in out d.Criteria; itvlicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "itvlicsp", op, join, itvlicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_itvlicsp;


   procedure Add_intxcdhd( c : in out d.Criteria; intxcdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intxcdhd", op, join, intxcdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_intxcdhd;


   procedure Add_intxcdsp( c : in out d.Criteria; intxcdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intxcdsp", op, join, intxcdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_intxcdsp;


   procedure Add_investhd( c : in out d.Criteria; investhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "investhd", op, join, investhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_investhd;


   procedure Add_investsp( c : in out d.Criteria; investsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "investsp", op, join, investsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_investsp;


   procedure Add_isa1tyhd( c : in out d.Criteria; isa1tyhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isa1tyhd", op, join, isa1tyhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa1tyhd;


   procedure Add_isa1tysp( c : in out d.Criteria; isa1tysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isa1tysp", op, join, isa1tysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa1tysp;


   procedure Add_isa2tyhd( c : in out d.Criteria; isa2tyhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isa2tyhd", op, join, isa2tyhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa2tyhd;


   procedure Add_isa2tysp( c : in out d.Criteria; isa2tysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isa2tysp", op, join, isa2tysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa2tysp;


   procedure Add_isactihd( c : in out d.Criteria; isactihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isactihd", op, join, isactihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_isactihd;


   procedure Add_isactisp( c : in out d.Criteria; isactisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isactisp", op, join, isactisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_isactisp;


   procedure Add_jobawahd( c : in out d.Criteria; jobawahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobawahd", op, join, jobawahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobawahd;


   procedure Add_jobawasp( c : in out d.Criteria; jobawasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobawasp", op, join, jobawasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobawasp;


   procedure Add_jobbyrhd( c : in out d.Criteria; jobbyrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobbyrhd", op, join, jobbyrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobbyrhd;


   procedure Add_jobbyrsp( c : in out d.Criteria; jobbyrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobbyrsp", op, join, jobbyrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobbyrsp;


   procedure Add_qcbhd( c : in out d.Criteria; qcbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qcbhd", op, join, qcbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcbhd;


   procedure Add_qcbsp( c : in out d.Criteria; qcbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qcbsp", op, join, qcbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcbsp;


   procedure Add_qgahd( c : in out d.Criteria; qgahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qgahd", op, join, qgahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qgahd;


   procedure Add_qgasp( c : in out d.Criteria; qgasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qgasp", op, join, qgasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qgasp;


   procedure Add_qmahd( c : in out d.Criteria; qmahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qmahd", op, join, qmahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qmahd;


   procedure Add_qmasp( c : in out d.Criteria; qmasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qmasp", op, join, qmasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qmasp;


   procedure Add_lareghd( c : in out d.Criteria; lareghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lareghd", op, join, lareghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lareghd;


   procedure Add_laregsp( c : in out d.Criteria; laregsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregsp", op, join, laregsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregsp;


   procedure Add_likewkhd( c : in out d.Criteria; likewkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "likewkhd", op, join, likewkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_likewkhd;


   procedure Add_likewksp( c : in out d.Criteria; likewksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "likewksp", op, join, likewksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_likewksp;


   procedure Add_limitlhd( c : in out d.Criteria; limitlhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "limitlhd", op, join, limitlhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_limitlhd;


   procedure Add_limitlsp( c : in out d.Criteria; limitlsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "limitlsp", op, join, limitlsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_limitlsp;


   procedure Add_lktimehd( c : in out d.Criteria; lktimehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lktimehd", op, join, lktimehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktimehd;


   procedure Add_lktimesp( c : in out d.Criteria; lktimesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lktimesp", op, join, lktimesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktimesp;


   procedure Add_lktrnhd( c : in out d.Criteria; lktrnhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lktrnhd", op, join, lktrnhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktrnhd;


   procedure Add_lktrnsp( c : in out d.Criteria; lktrnsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lktrnsp", op, join, lktrnsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktrnsp;


   procedure Add_lkworkhd( c : in out d.Criteria; lkworkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lkworkhd", op, join, lkworkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lkworkhd;


   procedure Add_lkworksp( c : in out d.Criteria; lkworksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lkworksp", op, join, lkworksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lkworksp;


   procedure Add_loanhd( c : in out d.Criteria; loanhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loanhd", op, join, loanhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanhd;


   procedure Add_loansp( c : in out d.Criteria; loansp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loansp", op, join, loansp );
   begin
      d.add_to_criteria( c, elem );
   end Add_loansp;


   procedure Add_loannuhd( c : in out d.Criteria; loannuhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loannuhd", op, join, loannuhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_loannuhd;


   procedure Add_loannusp( c : in out d.Criteria; loannusp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loannusp", op, join, loannusp );
   begin
      d.add_to_criteria( c, elem );
   end Add_loannusp;


   procedure Add_lstwkmhd( c : in out d.Criteria; lstwkmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lstwkmhd", op, join, lstwkmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkmhd;


   procedure Add_lstwkmsp( c : in out d.Criteria; lstwkmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lstwkmsp", op, join, lstwkmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkmsp;


   procedure Add_lstwkyhd( c : in out d.Criteria; lstwkyhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lstwkyhd", op, join, lstwkyhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkyhd;


   procedure Add_lstwkysp( c : in out d.Criteria; lstwkysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lstwkysp", op, join, lstwkysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkysp;


   procedure Add_wkswkdhd( c : in out d.Criteria; wkswkdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wkswkdhd", op, join, wkswkdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkswkdhd;


   procedure Add_wkswkdsp( c : in out d.Criteria; wkswkdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wkswkdsp", op, join, wkswkdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkswkdsp;


   procedure Add_marithd( c : in out d.Criteria; marithd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "marithd", op, join, marithd );
   begin
      d.add_to_criteria( c, elem );
   end Add_marithd;


   procedure Add_maritsp( c : in out d.Criteria; maritsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "maritsp", op, join, maritsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_maritsp;


   procedure Add_mr1hd( c : in out d.Criteria; mr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mr1hd", op, join, Long_Float( mr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr1hd;


   procedure Add_mr1sp( c : in out d.Criteria; mr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mr1sp", op, join, mr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr1sp;


   procedure Add_mr2hd( c : in out d.Criteria; mr2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mr2hd", op, join, Long_Float( mr2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr2hd;


   procedure Add_mr2sp( c : in out d.Criteria; mr2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mr2sp", op, join, Long_Float( mr2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr2sp;


   procedure Add_mntar1hd( c : in out d.Criteria; mntar1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar1hd", op, join, mntar1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar1hd;


   procedure Add_mntar1sp( c : in out d.Criteria; mntar1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar1sp", op, join, mntar1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar1sp;


   procedure Add_mntar2hd( c : in out d.Criteria; mntar2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar2hd", op, join, mntar2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar2hd;


   procedure Add_mntar2sp( c : in out d.Criteria; mntar2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar2sp", op, join, mntar2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar2sp;


   procedure Add_mntar3hd( c : in out d.Criteria; mntar3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar3hd", op, join, mntar3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar3hd;


   procedure Add_mntar3sp( c : in out d.Criteria; mntar3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar3sp", op, join, mntar3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar3sp;


   procedure Add_mntar4hd( c : in out d.Criteria; mntar4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar4hd", op, join, mntar4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar4hd;


   procedure Add_mntar4sp( c : in out d.Criteria; mntar4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar4sp", op, join, mntar4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar4sp;


   procedure Add_mntar5hd( c : in out d.Criteria; mntar5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar5hd", op, join, mntar5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar5hd;


   procedure Add_mntar5sp( c : in out d.Criteria; mntar5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntar5sp", op, join, mntar5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar5sp;


   procedure Add_mntnc1hd( c : in out d.Criteria; mntnc1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc1hd", op, join, mntnc1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc1hd;


   procedure Add_mntnc1sp( c : in out d.Criteria; mntnc1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc1sp", op, join, mntnc1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc1sp;


   procedure Add_mntnc2hd( c : in out d.Criteria; mntnc2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc2hd", op, join, mntnc2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc2hd;


   procedure Add_mntnc2sp( c : in out d.Criteria; mntnc2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc2sp", op, join, mntnc2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc2sp;


   procedure Add_mntnc3hd( c : in out d.Criteria; mntnc3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc3hd", op, join, mntnc3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc3hd;


   procedure Add_mntnc3sp( c : in out d.Criteria; mntnc3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc3sp", op, join, mntnc3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc3sp;


   procedure Add_mntnc4hd( c : in out d.Criteria; mntnc4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc4hd", op, join, mntnc4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc4hd;


   procedure Add_mntnc4sp( c : in out d.Criteria; mntnc4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc4sp", op, join, mntnc4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc4sp;


   procedure Add_mntnc5hd( c : in out d.Criteria; mntnc5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc5hd", op, join, mntnc5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc5hd;


   procedure Add_mntnc5sp( c : in out d.Criteria; mntnc5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntnc5sp", op, join, mntnc5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc5sp;


   procedure Add_mntpayhd( c : in out d.Criteria; mntpayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpayhd", op, join, mntpayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpayhd;


   procedure Add_mntpaysp( c : in out d.Criteria; mntpaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpaysp", op, join, mntpaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpaysp;


   procedure Add_pmr1hd( c : in out d.Criteria; pmr1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmr1hd", op, join, pmr1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr1hd;


   procedure Add_pmr1sp( c : in out d.Criteria; pmr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmr1sp", op, join, pmr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr1sp;


   procedure Add_pmr2hd( c : in out d.Criteria; pmr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmr2hd", op, join, pmr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr2hd;


   procedure Add_pmr2sp( c : in out d.Criteria; pmr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmr2sp", op, join, pmr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr2sp;


   procedure Add_mntpr1hd( c : in out d.Criteria; mntpr1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpr1hd", op, join, mntpr1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr1hd;


   procedure Add_mntpr1sp( c : in out d.Criteria; mntpr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpr1sp", op, join, mntpr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr1sp;


   procedure Add_mntpr2hd( c : in out d.Criteria; mntpr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpr2hd", op, join, mntpr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr2hd;


   procedure Add_mntpr2sp( c : in out d.Criteria; mntpr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpr2sp", op, join, mntpr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr2sp;


   procedure Add_mntpr3hd( c : in out d.Criteria; mntpr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpr3hd", op, join, mntpr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr3hd;


   procedure Add_mntpr3sp( c : in out d.Criteria; mntpr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntpr3sp", op, join, mntpr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr3sp;


   procedure Add_mr12mhd( c : in out d.Criteria; mr12mhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mr12mhd", op, join, mr12mhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr12mhd;


   procedure Add_mr12msp( c : in out d.Criteria; mr12msp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mr12msp", op, join, mr12msp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr12msp;


   procedure Add_mntt1hd( c : in out d.Criteria; mntt1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntt1hd", op, join, mntt1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt1hd;


   procedure Add_mntt1sp( c : in out d.Criteria; mntt1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntt1sp", op, join, mntt1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt1sp;


   procedure Add_mntt2hd( c : in out d.Criteria; mntt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntt2hd", op, join, mntt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt2hd;


   procedure Add_mntt2sp( c : in out d.Criteria; mntt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntt2sp", op, join, mntt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt2sp;


   procedure Add_mntt3hd( c : in out d.Criteria; mntt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntt3hd", op, join, mntt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt3hd;


   procedure Add_mntt3sp( c : in out d.Criteria; mntt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntt3sp", op, join, mntt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt3sp;


   procedure Add_mntus1hd( c : in out d.Criteria; mntus1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntus1hd", op, join, mntus1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus1hd;


   procedure Add_mntus1sp( c : in out d.Criteria; mntus1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntus1sp", op, join, mntus1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus1sp;


   procedure Add_mntus2hd( c : in out d.Criteria; mntus2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntus2hd", op, join, mntus2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus2hd;


   procedure Add_mntus2sp( c : in out d.Criteria; mntus2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntus2sp", op, join, mntus2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus2sp;


   procedure Add_umr1hd( c : in out d.Criteria; umr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umr1hd", op, join, Long_Float( umr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr1hd;


   procedure Add_umr1sp( c : in out d.Criteria; umr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umr1sp", op, join, umr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr1sp;


   procedure Add_umr2hd( c : in out d.Criteria; umr2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umr2hd", op, join, Long_Float( umr2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr2hd;


   procedure Add_umr2sp( c : in out d.Criteria; umr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umr2sp", op, join, umr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr2sp;


   procedure Add_pumr1hd( c : in out d.Criteria; pumr1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pumr1hd", op, join, pumr1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr1hd;


   procedure Add_pumr1sp( c : in out d.Criteria; pumr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pumr1sp", op, join, pumr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr1sp;


   procedure Add_pumr2hd( c : in out d.Criteria; pumr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pumr2hd", op, join, pumr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr2hd;


   procedure Add_pumr2sp( c : in out d.Criteria; pumr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pumr2sp", op, join, pumr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr2sp;


   procedure Add_mntw1hd( c : in out d.Criteria; mntw1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw1hd", op, join, mntw1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw1hd;


   procedure Add_mntw1sp( c : in out d.Criteria; mntw1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw1sp", op, join, mntw1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw1sp;


   procedure Add_mntw2hd( c : in out d.Criteria; mntw2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw2hd", op, join, mntw2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw2hd;


   procedure Add_mntw2sp( c : in out d.Criteria; mntw2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw2sp", op, join, mntw2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw2sp;


   procedure Add_mntw3hd( c : in out d.Criteria; mntw3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw3hd", op, join, mntw3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw3hd;


   procedure Add_mntw3sp( c : in out d.Criteria; mntw3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw3sp", op, join, mntw3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw3sp;


   procedure Add_mntw4hd( c : in out d.Criteria; mntw4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw4hd", op, join, mntw4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw4hd;


   procedure Add_mntw4sp( c : in out d.Criteria; mntw4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw4sp", op, join, mntw4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw4sp;


   procedure Add_mntw5hd( c : in out d.Criteria; mntw5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw5hd", op, join, mntw5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw5hd;


   procedure Add_mntw5sp( c : in out d.Criteria; mntw5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mntw5sp", op, join, mntw5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw5sp;


   procedure Add_mshd( c : in out d.Criteria; mshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mshd", op, join, mshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mshd;


   procedure Add_mssp( c : in out d.Criteria; mssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mssp", op, join, mssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mssp;


   procedure Add_nanid1hd( c : in out d.Criteria; nanid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid1hd", op, join, nanid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid1hd;


   procedure Add_nanid1sp( c : in out d.Criteria; nanid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid1sp", op, join, nanid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid1sp;


   procedure Add_nanid2hd( c : in out d.Criteria; nanid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid2hd", op, join, nanid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid2hd;


   procedure Add_nanid2sp( c : in out d.Criteria; nanid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid2sp", op, join, nanid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid2sp;


   procedure Add_nanid3hd( c : in out d.Criteria; nanid3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid3hd", op, join, nanid3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid3hd;


   procedure Add_nanid3sp( c : in out d.Criteria; nanid3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid3sp", op, join, nanid3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid3sp;


   procedure Add_nanid4hd( c : in out d.Criteria; nanid4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid4hd", op, join, nanid4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid4hd;


   procedure Add_nanid4sp( c : in out d.Criteria; nanid4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid4sp", op, join, nanid4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid4sp;


   procedure Add_nanid5hd( c : in out d.Criteria; nanid5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid5hd", op, join, nanid5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid5hd;


   procedure Add_nanid5sp( c : in out d.Criteria; nanid5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid5sp", op, join, nanid5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid5sp;


   procedure Add_nanid6hd( c : in out d.Criteria; nanid6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid6hd", op, join, nanid6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid6hd;


   procedure Add_nanid6sp( c : in out d.Criteria; nanid6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nanid6sp", op, join, nanid6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid6sp;


   procedure Add_nitrnhd( c : in out d.Criteria; nitrnhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nitrnhd", op, join, nitrnhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nitrnhd;


   procedure Add_nitrnsp( c : in out d.Criteria; nitrnsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nitrnsp", op, join, nitrnsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nitrnsp;


   procedure Add_niamthd( c : in out d.Criteria; niamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "niamthd", op, join, Long_Float( niamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_niamthd;


   procedure Add_niamtsp( c : in out d.Criteria; niamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "niamtsp", op, join, Long_Float( niamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_niamtsp;


   procedure Add_niethghd( c : in out d.Criteria; niethghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "niethghd", op, join, niethghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_niethghd;


   procedure Add_niethgsp( c : in out d.Criteria; niethgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "niethgsp", op, join, niethgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_niethgsp;


   procedure Add_nixhbbhd( c : in out d.Criteria; nixhbbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nixhbbhd", op, join, nixhbbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nixhbbhd;


   procedure Add_nixhbbsp( c : in out d.Criteria; nixhbbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nixhbbsp", op, join, nixhbbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nixhbbsp;


   procedure Add_ninid1hd( c : in out d.Criteria; ninid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid1hd", op, join, ninid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid1hd;


   procedure Add_ninid1sp( c : in out d.Criteria; ninid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid1sp", op, join, ninid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid1sp;


   procedure Add_ninid2hd( c : in out d.Criteria; ninid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid2hd", op, join, ninid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid2hd;


   procedure Add_ninid2sp( c : in out d.Criteria; ninid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid2sp", op, join, ninid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid2sp;


   procedure Add_ninid3hd( c : in out d.Criteria; ninid3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid3hd", op, join, ninid3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid3hd;


   procedure Add_ninid3sp( c : in out d.Criteria; ninid3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid3sp", op, join, ninid3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid3sp;


   procedure Add_ninid4hd( c : in out d.Criteria; ninid4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid4hd", op, join, ninid4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid4hd;


   procedure Add_ninid4sp( c : in out d.Criteria; ninid4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid4sp", op, join, ninid4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid4sp;


   procedure Add_ninid5hd( c : in out d.Criteria; ninid5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid5hd", op, join, ninid5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid5hd;


   procedure Add_ninid5sp( c : in out d.Criteria; ninid5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid5sp", op, join, ninid5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid5sp;


   procedure Add_ninid6hd( c : in out d.Criteria; ninid6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid6hd", op, join, ninid6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid6hd;


   procedure Add_ninid6sp( c : in out d.Criteria; ninid6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid6sp", op, join, ninid6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid6sp;


   procedure Add_ninid7hd( c : in out d.Criteria; ninid7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid7hd", op, join, ninid7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid7hd;


   procedure Add_ninid7sp( c : in out d.Criteria; ninid7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninid7sp", op, join, ninid7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid7sp;


   procedure Add_nincs2hd( c : in out d.Criteria; nincs2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nincs2hd", op, join, nincs2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nincs2hd;


   procedure Add_nincs2sp( c : in out d.Criteria; nincs2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nincs2sp", op, join, nincs2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nincs2sp;


   procedure Add_nininchd( c : in out d.Criteria; nininchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nininchd", op, join, nininchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nininchd;


   procedure Add_ninincsp( c : in out d.Criteria; ninincsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninincsp", op, join, ninincsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninincsp;


   procedure Add_ninearhd( c : in out d.Criteria; ninearhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninearhd", op, join, ninearhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninearhd;


   procedure Add_ninearsp( c : in out d.Criteria; ninearsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninearsp", op, join, ninearsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninearsp;


   procedure Add_nininvhd( c : in out d.Criteria; nininvhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nininvhd", op, join, nininvhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nininvhd;


   procedure Add_nininvsp( c : in out d.Criteria; nininvsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nininvsp", op, join, nininvsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nininvsp;


   procedure Add_ninpenhd( c : in out d.Criteria; ninpenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninpenhd", op, join, ninpenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninpenhd;


   procedure Add_ninpensp( c : in out d.Criteria; ninpensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninpensp", op, join, ninpensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninpensp;


   procedure Add_ninrinhd( c : in out d.Criteria; ninrinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninrinhd", op, join, ninrinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninrinhd;


   procedure Add_ninrinsp( c : in out d.Criteria; ninrinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninrinsp", op, join, ninrinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninrinsp;


   procedure Add_ninseihd( c : in out d.Criteria; ninseihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninseihd", op, join, ninseihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninseihd;


   procedure Add_ninseisp( c : in out d.Criteria; ninseisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ninseisp", op, join, ninseisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninseisp;


   procedure Add_pniamthd( c : in out d.Criteria; pniamthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pniamthd", op, join, pniamthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pniamthd;


   procedure Add_pniamtsp( c : in out d.Criteria; pniamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pniamtsp", op, join, pniamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pniamtsp;


   procedure Add_nireghd( c : in out d.Criteria; nireghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nireghd", op, join, nireghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nireghd;


   procedure Add_niregsp( c : in out d.Criteria; niregsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "niregsp", op, join, niregsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_niregsp;


   procedure Add_nirelghd( c : in out d.Criteria; nirelghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nirelghd", op, join, nirelghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nirelghd;


   procedure Add_nirelgsp( c : in out d.Criteria; nirelgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nirelgsp", op, join, nirelgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nirelgsp;


   procedure Add_nolk1hd( c : in out d.Criteria; nolk1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nolk1hd", op, join, nolk1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk1hd;


   procedure Add_nolk1sp( c : in out d.Criteria; nolk1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nolk1sp", op, join, nolk1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk1sp;


   procedure Add_nolk2hd( c : in out d.Criteria; nolk2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nolk2hd", op, join, nolk2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk2hd;


   procedure Add_nolk2sp( c : in out d.Criteria; nolk2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nolk2sp", op, join, nolk2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk2sp;


   procedure Add_nolk3hd( c : in out d.Criteria; nolk3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nolk3hd", op, join, nolk3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk3hd;


   procedure Add_nolk3sp( c : in out d.Criteria; nolk3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nolk3sp", op, join, nolk3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk3sp;


   procedure Add_nowanthd( c : in out d.Criteria; nowanthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nowanthd", op, join, nowanthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nowanthd;


   procedure Add_nowantsp( c : in out d.Criteria; nowantsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nowantsp", op, join, nowantsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nowantsp;


   procedure Add_nssechd( c : in out d.Criteria; nssechd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nssechd", op, join, Long_Float( nssechd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nssechd;


   procedure Add_nssecsp( c : in out d.Criteria; nssecsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nssecsp", op, join, Long_Float( nssecsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nssecsp;


   procedure Add_numjobhd( c : in out d.Criteria; numjobhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "numjobhd", op, join, numjobhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_numjobhd;


   procedure Add_numjobsp( c : in out d.Criteria; numjobsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "numjobsp", op, join, numjobsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_numjobsp;


   procedure Add_numj2hd( c : in out d.Criteria; numj2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "numj2hd", op, join, numj2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_numj2hd;


   procedure Add_numj2sp( c : in out d.Criteria; numj2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "numj2sp", op, join, numj2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_numj2sp;


   procedure Add_ocnumhd( c : in out d.Criteria; ocnumhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocnumhd", op, join, ocnumhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocnumhd;


   procedure Add_ocnumsp( c : in out d.Criteria; ocnumsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocnumsp", op, join, ocnumsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocnumsp;


   procedure Add_oddjobhd( c : in out d.Criteria; oddjobhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjobhd", op, join, oddjobhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjobhd;


   procedure Add_oddjobsp( c : in out d.Criteria; oddjobsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjobsp", op, join, oddjobsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjobsp;


   procedure Add_oldstdhd( c : in out d.Criteria; oldstdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oldstdhd", op, join, oldstdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oldstdhd;


   procedure Add_oldstdsp( c : in out d.Criteria; oldstdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oldstdsp", op, join, oldstdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oldstdsp;


   procedure Add_oabparhd( c : in out d.Criteria; oabparhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oabparhd", op, join, oabparhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oabparhd;


   procedure Add_oabparsp( c : in out d.Criteria; oabparsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oabparsp", op, join, oabparsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oabparsp;


   procedure Add_otamthd( c : in out d.Criteria; otamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otamthd", op, join, Long_Float( otamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_otamthd;


   procedure Add_otamtsp( c : in out d.Criteria; otamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otamtsp", op, join, Long_Float( otamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_otamtsp;


   procedure Add_otpamthd( c : in out d.Criteria; otpamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otpamthd", op, join, Long_Float( otpamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_otpamthd;


   procedure Add_otpamtsp( c : in out d.Criteria; otpamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otpamtsp", op, join, otpamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_otpamtsp;


   procedure Add_otappdhd( c : in out d.Criteria; otappdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otappdhd", op, join, otappdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_otappdhd;


   procedure Add_otappdsp( c : in out d.Criteria; otappdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otappdsp", op, join, otappdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_otappdsp;


   procedure Add_qehbtbhd( c : in out d.Criteria; qehbtbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qehbtbhd", op, join, qehbtbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qehbtbhd;


   procedure Add_qehbtbsp( c : in out d.Criteria; qehbtbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qehbtbsp", op, join, qehbtbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qehbtbsp;


   procedure Add_qwidplhd( c : in out d.Criteria; qwidplhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qwidplhd", op, join, qwidplhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwidplhd;


   procedure Add_qwidplsp( c : in out d.Criteria; qwidplsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qwidplsp", op, join, qwidplsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwidplsp;


   procedure Add_qinwkchd( c : in out d.Criteria; qinwkchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qinwkchd", op, join, qinwkchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qinwkchd;


   procedure Add_qinwkcsp( c : in out d.Criteria; qinwkcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qinwkcsp", op, join, qinwkcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qinwkcsp;


   procedure Add_qrtwkchd( c : in out d.Criteria; qrtwkchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qrtwkchd", op, join, qrtwkchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrtwkchd;


   procedure Add_qrtwkcsp( c : in out d.Criteria; qrtwkcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qrtwkcsp", op, join, qrtwkcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrtwkcsp;


   procedure Add_qothbehd( c : in out d.Criteria; qothbehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qothbehd", op, join, qothbehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qothbehd;


   procedure Add_qothbesp( c : in out d.Criteria; qothbesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qothbesp", op, join, qothbesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qothbesp;


   procedure Add_othtaxhd( c : in out d.Criteria; othtaxhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othtaxhd", op, join, othtaxhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othtaxhd;


   procedure Add_othtaxsp( c : in out d.Criteria; othtaxsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othtaxsp", op, join, othtaxsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othtaxsp;


   procedure Add_otinvahd( c : in out d.Criteria; otinvahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otinvahd", op, join, otinvahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_otinvahd;


   procedure Add_otinvasp( c : in out d.Criteria; otinvasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otinvasp", op, join, otinvasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_otinvasp;


   procedure Add_pareamhd( c : in out d.Criteria; pareamhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pareamhd", op, join, Long_Float( pareamhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pareamhd;


   procedure Add_pareamsp( c : in out d.Criteria; pareamsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pareamsp", op, join, Long_Float( pareamsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pareamsp;


   procedure Add_qpchd( c : in out d.Criteria; qpchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpchd", op, join, qpchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpchd;


   procedure Add_qpcsp( c : in out d.Criteria; qpcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpcsp", op, join, qpcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpcsp;


   procedure Add_qrphd( c : in out d.Criteria; qrphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qrphd", op, join, qrphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrphd;


   procedure Add_qrpsp( c : in out d.Criteria; qrpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qrpsp", op, join, qrpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrpsp;


   procedure Add_qbbhd( c : in out d.Criteria; qbbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qbbhd", op, join, qbbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qbbhd;


   procedure Add_qbbsp( c : in out d.Criteria; qbbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qbbsp", op, join, qbbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qbbsp;


   procedure Add_qafcshd( c : in out d.Criteria; qafcshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qafcshd", op, join, qafcshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qafcshd;


   procedure Add_qafcssp( c : in out d.Criteria; qafcssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qafcssp", op, join, qafcssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qafcssp;


   procedure Add_qwwphd( c : in out d.Criteria; qwwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qwwphd", op, join, qwwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwwphd;


   procedure Add_qwwpsp( c : in out d.Criteria; qwwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qwwpsp", op, join, qwwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwwpsp;


   procedure Add_penflghd( c : in out d.Criteria; penflghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penflghd", op, join, penflghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penflghd;


   procedure Add_penflgsp( c : in out d.Criteria; penflgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penflgsp", op, join, penflgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penflgsp;


   procedure Add_penwl1hd( c : in out d.Criteria; penwl1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl1hd", op, join, penwl1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl1hd;


   procedure Add_penwl1sp( c : in out d.Criteria; penwl1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl1sp", op, join, penwl1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl1sp;


   procedure Add_penwl2hd( c : in out d.Criteria; penwl2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl2hd", op, join, penwl2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl2hd;


   procedure Add_penwl2sp( c : in out d.Criteria; penwl2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl2sp", op, join, penwl2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl2sp;


   procedure Add_penwl3hd( c : in out d.Criteria; penwl3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl3hd", op, join, penwl3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl3hd;


   procedure Add_penwl3sp( c : in out d.Criteria; penwl3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl3sp", op, join, penwl3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl3sp;


   procedure Add_penwl4hd( c : in out d.Criteria; penwl4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl4hd", op, join, penwl4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl4hd;


   procedure Add_penwl4sp( c : in out d.Criteria; penwl4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl4sp", op, join, penwl4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl4sp;


   procedure Add_penwl5hd( c : in out d.Criteria; penwl5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl5hd", op, join, penwl5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl5hd;


   procedure Add_penwl5sp( c : in out d.Criteria; penwl5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl5sp", op, join, penwl5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl5sp;


   procedure Add_penwl6hd( c : in out d.Criteria; penwl6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl6hd", op, join, penwl6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl6hd;


   procedure Add_penwl6sp( c : in out d.Criteria; penwl6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penwl6sp", op, join, penwl6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl6sp;


   procedure Add_pepscthd( c : in out d.Criteria; pepscthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pepscthd", op, join, pepscthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pepscthd;


   procedure Add_pepsctsp( c : in out d.Criteria; pepsctsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pepsctsp", op, join, pepsctsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pepsctsp;


   procedure Add_personhd( c : in out d.Criteria; personhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "personhd", op, join, personhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_personhd;


   procedure Add_personsp( c : in out d.Criteria; personsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "personsp", op, join, personsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_personsp;


   procedure Add_qpipdhd( c : in out d.Criteria; qpipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpipdhd", op, join, qpipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipdhd;


   procedure Add_qpipdsp( c : in out d.Criteria; qpipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpipdsp", op, join, qpipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipdsp;


   procedure Add_qpipmhd( c : in out d.Criteria; qpipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpipmhd", op, join, qpipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipmhd;


   procedure Add_qpipmsp( c : in out d.Criteria; qpipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qpipmsp", op, join, qpipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipmsp;


   procedure Add_poaccthd( c : in out d.Criteria; poaccthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poaccthd", op, join, poaccthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poaccthd;


   procedure Add_poacctsp( c : in out d.Criteria; poacctsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poacctsp", op, join, poacctsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poacctsp;


   procedure Add_pocardhd( c : in out d.Criteria; pocardhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pocardhd", op, join, pocardhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pocardhd;


   procedure Add_pocardsp( c : in out d.Criteria; pocardsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pocardsp", op, join, pocardsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pocardsp;


   procedure Add_ppnumchd( c : in out d.Criteria; ppnumchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppnumchd", op, join, ppnumchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppnumchd;


   procedure Add_ppnumcsp( c : in out d.Criteria; ppnumcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppnumcsp", op, join, ppnumcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppnumcsp;


   procedure Add_proptxhd( c : in out d.Criteria; proptxhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "proptxhd", op, join, Long_Float( proptxhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_proptxhd;


   procedure Add_proptxsp( c : in out d.Criteria; proptxsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "proptxsp", op, join, Long_Float( proptxsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_proptxsp;


   procedure Add_ptwkyrhd( c : in out d.Criteria; ptwkyrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptwkyrhd", op, join, ptwkyrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptwkyrhd;


   procedure Add_ptwkyrsp( c : in out d.Criteria; ptwkyrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptwkyrsp", op, join, ptwkyrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptwkyrsp;


   procedure Add_relp1hd( c : in out d.Criteria; relp1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp1hd", op, join, relp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp1hd;


   procedure Add_relp1sp( c : in out d.Criteria; relp1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp1sp", op, join, relp1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp1sp;


   procedure Add_relp2hd( c : in out d.Criteria; relp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp2hd", op, join, relp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp2hd;


   procedure Add_relp2sp( c : in out d.Criteria; relp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp2sp", op, join, relp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp2sp;


   procedure Add_relp3hd( c : in out d.Criteria; relp3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp3hd", op, join, relp3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp3hd;


   procedure Add_relp3sp( c : in out d.Criteria; relp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp3sp", op, join, relp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp3sp;


   procedure Add_relp4hd( c : in out d.Criteria; relp4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp4hd", op, join, relp4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp4hd;


   procedure Add_relp4sp( c : in out d.Criteria; relp4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp4sp", op, join, relp4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp4sp;


   procedure Add_relp5hd( c : in out d.Criteria; relp5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp5hd", op, join, relp5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp5hd;


   procedure Add_relp5sp( c : in out d.Criteria; relp5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp5sp", op, join, relp5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp5sp;


   procedure Add_relp6hd( c : in out d.Criteria; relp6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp6hd", op, join, relp6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp6hd;


   procedure Add_relp6sp( c : in out d.Criteria; relp6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp6sp", op, join, relp6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp6sp;


   procedure Add_relp7hd( c : in out d.Criteria; relp7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp7hd", op, join, relp7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp7hd;


   procedure Add_relp7sp( c : in out d.Criteria; relp7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp7sp", op, join, relp7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp7sp;


   procedure Add_relp8hd( c : in out d.Criteria; relp8hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp8hd", op, join, relp8hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp8hd;


   procedure Add_relp8sp( c : in out d.Criteria; relp8sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp8sp", op, join, relp8sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp8sp;


   procedure Add_relp9hd( c : in out d.Criteria; relp9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp9hd", op, join, relp9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp9hd;


   procedure Add_relp9sp( c : in out d.Criteria; relp9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp9sp", op, join, relp9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp9sp;


   procedure Add_relp10hd( c : in out d.Criteria; relp10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp10hd", op, join, relp10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp10hd;


   procedure Add_relp10sp( c : in out d.Criteria; relp10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp10sp", op, join, relp10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp10sp;


   procedure Add_relp11hd( c : in out d.Criteria; relp11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp11hd", op, join, relp11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp11hd;


   procedure Add_relp11sp( c : in out d.Criteria; relp11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp11sp", op, join, relp11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp11sp;


   procedure Add_relp12hd( c : in out d.Criteria; relp12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp12hd", op, join, relp12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp12hd;


   procedure Add_relp12sp( c : in out d.Criteria; relp12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp12sp", op, join, relp12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp12sp;


   procedure Add_relp13hd( c : in out d.Criteria; relp13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp13hd", op, join, relp13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp13hd;


   procedure Add_relp13sp( c : in out d.Criteria; relp13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp13sp", op, join, relp13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp13sp;


   procedure Add_relp14hd( c : in out d.Criteria; relp14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp14hd", op, join, relp14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp14hd;


   procedure Add_relp14sp( c : in out d.Criteria; relp14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relp14sp", op, join, relp14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp14sp;


   procedure Add_reasonhd( c : in out d.Criteria; reasonhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "reasonhd", op, join, reasonhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_reasonhd;


   procedure Add_reasonsp( c : in out d.Criteria; reasonsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "reasonsp", op, join, reasonsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_reasonsp;


   procedure Add_redamthd( c : in out d.Criteria; redamthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "redamthd", op, join, Long_Float( redamthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_redamthd;


   procedure Add_redamtsp( c : in out d.Criteria; redamtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "redamtsp", op, join, Long_Float( redamtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_redamtsp;


   procedure Add_redundhd( c : in out d.Criteria; redundhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "redundhd", op, join, redundhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_redundhd;


   procedure Add_redundsp( c : in out d.Criteria; redundsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "redundsp", op, join, redundsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_redundsp;


   procedure Add_rednethd( c : in out d.Criteria; rednethd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rednethd", op, join, rednethd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rednethd;


   procedure Add_rednetsp( c : in out d.Criteria; rednetsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rednetsp", op, join, rednetsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_rednetsp;


   procedure Add_redtaxhd( c : in out d.Criteria; redtaxhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "redtaxhd", op, join, redtaxhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_redtaxhd;


   procedure Add_redtaxsp( c : in out d.Criteria; redtaxsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "redtaxsp", op, join, redtaxsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_redtaxsp;


   procedure Add_relhrphd( c : in out d.Criteria; relhrphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relhrphd", op, join, relhrphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relhrphd;


   procedure Add_relhrpsp( c : in out d.Criteria; relhrpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relhrpsp", op, join, relhrpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relhrpsp;


   procedure Add_relgewhd( c : in out d.Criteria; relgewhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relgewhd", op, join, relgewhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgewhd;


   procedure Add_relgewsp( c : in out d.Criteria; relgewsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relgewsp", op, join, relgewsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgewsp;


   procedure Add_relgschd( c : in out d.Criteria; relgschd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relgschd", op, join, relgschd );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgschd;


   procedure Add_relgscsp( c : in out d.Criteria; relgscsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "relgscsp", op, join, relgscsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgscsp;


   procedure Add_rprofhd( c : in out d.Criteria; rprofhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rprofhd", op, join, rprofhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rprofhd;


   procedure Add_rprofsp( c : in out d.Criteria; rprofsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rprofsp", op, join, rprofsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_rprofsp;


   procedure Add_retirehd( c : in out d.Criteria; retirehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "retirehd", op, join, retirehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_retirehd;


   procedure Add_retiresp( c : in out d.Criteria; retiresp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "retiresp", op, join, retiresp );
   begin
      d.add_to_criteria( c, elem );
   end Add_retiresp;


   procedure Add_retir1hd( c : in out d.Criteria; retir1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "retir1hd", op, join, retir1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_retir1hd;


   procedure Add_retir1sp( c : in out d.Criteria; retir1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "retir1sp", op, join, retir1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_retir1sp;


   procedure Add_retreshd( c : in out d.Criteria; retreshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "retreshd", op, join, retreshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_retreshd;


   procedure Add_retressp( c : in out d.Criteria; retressp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "retressp", op, join, retressp );
   begin
      d.add_to_criteria( c, elem );
   end Add_retressp;


   procedure Add_renthd( c : in out d.Criteria; renthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "renthd", op, join, Long_Float( renthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_renthd;


   procedure Add_rentsp( c : in out d.Criteria; rentsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rentsp", op, join, Long_Float( rentsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentsp;


   procedure Add_royalhd( c : in out d.Criteria; royalhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "royalhd", op, join, Long_Float( royalhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_royalhd;


   procedure Add_royalsp( c : in out d.Criteria; royalsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "royalsp", op, join, Long_Float( royalsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_royalsp;


   procedure Add_sleephd( c : in out d.Criteria; sleephd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sleephd", op, join, Long_Float( sleephd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sleephd;


   procedure Add_sleepsp( c : in out d.Criteria; sleepsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sleepsp", op, join, Long_Float( sleepsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sleepsp;


   procedure Add_forpenhd( c : in out d.Criteria; forpenhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "forpenhd", op, join, Long_Float( forpenhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_forpenhd;


   procedure Add_forpensp( c : in out d.Criteria; forpensp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "forpensp", op, join, Long_Float( forpensp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_forpensp;


   procedure Add_restrchd( c : in out d.Criteria; restrchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "restrchd", op, join, restrchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_restrchd;


   procedure Add_restrcsp( c : in out d.Criteria; restrcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "restrcsp", op, join, restrcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_restrcsp;


   procedure Add_sapadjhd( c : in out d.Criteria; sapadjhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sapadjhd", op, join, sapadjhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sapadjhd;


   procedure Add_sapadjsp( c : in out d.Criteria; sapadjsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sapadjsp", op, join, sapadjsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sapadjsp;


   procedure Add_sdem01hd( c : in out d.Criteria; sdem01hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem01hd", op, join, sdem01hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem01hd;


   procedure Add_sdem01sp( c : in out d.Criteria; sdem01sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem01sp", op, join, sdem01sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem01sp;


   procedure Add_sdem02hd( c : in out d.Criteria; sdem02hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem02hd", op, join, sdem02hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem02hd;


   procedure Add_sdem02sp( c : in out d.Criteria; sdem02sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem02sp", op, join, sdem02sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem02sp;


   procedure Add_sdem03hd( c : in out d.Criteria; sdem03hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem03hd", op, join, sdem03hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem03hd;


   procedure Add_sdem03sp( c : in out d.Criteria; sdem03sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem03sp", op, join, sdem03sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem03sp;


   procedure Add_sdem04hd( c : in out d.Criteria; sdem04hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem04hd", op, join, sdem04hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem04hd;


   procedure Add_sdem04sp( c : in out d.Criteria; sdem04sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem04sp", op, join, sdem04sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem04sp;


   procedure Add_sdem05hd( c : in out d.Criteria; sdem05hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem05hd", op, join, sdem05hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem05hd;


   procedure Add_sdem05sp( c : in out d.Criteria; sdem05sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem05sp", op, join, sdem05sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem05sp;


   procedure Add_sdem06hd( c : in out d.Criteria; sdem06hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem06hd", op, join, sdem06hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem06hd;


   procedure Add_sdem06sp( c : in out d.Criteria; sdem06sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem06sp", op, join, sdem06sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem06sp;


   procedure Add_sdem07hd( c : in out d.Criteria; sdem07hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem07hd", op, join, sdem07hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem07hd;


   procedure Add_sdem07sp( c : in out d.Criteria; sdem07sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem07sp", op, join, sdem07sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem07sp;


   procedure Add_sdem08hd( c : in out d.Criteria; sdem08hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem08hd", op, join, sdem08hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem08hd;


   procedure Add_sdem08sp( c : in out d.Criteria; sdem08sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem08sp", op, join, sdem08sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem08sp;


   procedure Add_sdem09hd( c : in out d.Criteria; sdem09hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem09hd", op, join, sdem09hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem09hd;


   procedure Add_sdem09sp( c : in out d.Criteria; sdem09sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem09sp", op, join, sdem09sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem09sp;


   procedure Add_sdem10hd( c : in out d.Criteria; sdem10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem10hd", op, join, sdem10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem10hd;


   procedure Add_sdem10sp( c : in out d.Criteria; sdem10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem10sp", op, join, sdem10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem10sp;


   procedure Add_sdem11hd( c : in out d.Criteria; sdem11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem11hd", op, join, sdem11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem11hd;


   procedure Add_sdem11sp( c : in out d.Criteria; sdem11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem11sp", op, join, sdem11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem11sp;


   procedure Add_sdem12hd( c : in out d.Criteria; sdem12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem12hd", op, join, sdem12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem12hd;


   procedure Add_sdem12sp( c : in out d.Criteria; sdem12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdem12sp", op, join, sdem12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem12sp;


   procedure Add_inseinhd( c : in out d.Criteria; inseinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inseinhd", op, join, inseinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_inseinhd;


   procedure Add_inseinsp( c : in out d.Criteria; inseinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "inseinsp", op, join, inseinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_inseinsp;


   procedure Add_sdemphd( c : in out d.Criteria; sdemphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdemphd", op, join, sdemphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdemphd;


   procedure Add_sdempsp( c : in out d.Criteria; sdempsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdempsp", op, join, sdempsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdempsp;


   procedure Add_sexhd( c : in out d.Criteria; sexhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexhd", op, join, sexhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexhd;


   procedure Add_sexsp( c : in out d.Criteria; sexsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexsp", op, join, sexsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexsp;


   procedure Add_sichd( c : in out d.Criteria; sichd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sichd", op, join, sichd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sichd;


   procedure Add_sicsp( c : in out d.Criteria; sicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sicsp", op, join, sicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sicsp;


   procedure Add_sidqnhd( c : in out d.Criteria; sidqnhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sidqnhd", op, join, sidqnhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sidqnhd;


   procedure Add_sidqnsp( c : in out d.Criteria; sidqnsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sidqnsp", op, join, sidqnsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sidqnsp;


   procedure Add_sloshd( c : in out d.Criteria; sloshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sloshd", op, join, sloshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sloshd;


   procedure Add_slossp( c : in out d.Criteria; slossp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "slossp", op, join, slossp );
   begin
      d.add_to_criteria( c, elem );
   end Add_slossp;


   procedure Add_slramthd( c : in out d.Criteria; slramthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "slramthd", op, join, Long_Float( slramthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_slramthd;


   procedure Add_slramtsp( c : in out d.Criteria; slramtsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "slramtsp", op, join, Long_Float( slramtsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_slramtsp;


   procedure Add_slrppdhd( c : in out d.Criteria; slrppdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "slrppdhd", op, join, slrppdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_slrppdhd;


   procedure Add_slrppdsp( c : in out d.Criteria; slrppdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "slrppdsp", op, join, slrppdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_slrppdsp;


   procedure Add_smpajhd( c : in out d.Criteria; smpajhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpajhd", op, join, Long_Float( smpajhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpajhd;


   procedure Add_smpajsp( c : in out d.Criteria; smpajsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpajsp", op, join, Long_Float( smpajsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpajsp;


   procedure Add_sc2010hd( c : in out d.Criteria; sc2010hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sc2010hd", op, join, sc2010hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sc2010hd;


   procedure Add_sc2010sp( c : in out d.Criteria; sc2010sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sc2010sp", op, join, sc2010sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sc2010sp;


   procedure Add_qsfgrhd( c : in out d.Criteria; qsfgrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qsfgrhd", op, join, qsfgrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsfgrhd;


   procedure Add_qsfgrsp( c : in out d.Criteria; qsfgrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qsfgrsp", op, join, qsfgrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsfgrsp;


   procedure Add_qssmthd( c : in out d.Criteria; qssmthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qssmthd", op, join, qssmthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qssmthd;


   procedure Add_qssmtsp( c : in out d.Criteria; qssmtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qssmtsp", op, join, qssmtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qssmtsp;


   procedure Add_qlgdwphd( c : in out d.Criteria; qlgdwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qlgdwphd", op, join, qlgdwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlgdwphd;


   procedure Add_qlgdwpsp( c : in out d.Criteria; qlgdwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qlgdwpsp", op, join, qlgdwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlgdwpsp;


   procedure Add_qlglahd( c : in out d.Criteria; qlglahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qlglahd", op, join, qlglahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlglahd;


   procedure Add_qlglasp( c : in out d.Criteria; qlglasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qlglasp", op, join, qlglasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlglasp;


   procedure Add_blindhd( c : in out d.Criteria; blindhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blindhd", op, join, blindhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_blindhd;


   procedure Add_blindsp( c : in out d.Criteria; blindsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "blindsp", op, join, blindsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_blindsp;


   procedure Add_parsihd( c : in out d.Criteria; parsihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "parsihd", op, join, parsihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_parsihd;


   procedure Add_parsisp( c : in out d.Criteria; parsisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "parsisp", op, join, parsisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_parsisp;


   procedure Add_deafhd( c : in out d.Criteria; deafhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "deafhd", op, join, deafhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_deafhd;


   procedure Add_deafsp( c : in out d.Criteria; deafsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "deafsp", op, join, deafsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_deafsp;


   procedure Add_spouthd( c : in out d.Criteria; spouthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spouthd", op, join, spouthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spouthd;


   procedure Add_spoutsp( c : in out d.Criteria; spoutsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spoutsp", op, join, spoutsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spoutsp;


   procedure Add_sppadjhd( c : in out d.Criteria; sppadjhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppadjhd", op, join, Long_Float( sppadjhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppadjhd;


   procedure Add_sppadjsp( c : in out d.Criteria; sppadjsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppadjsp", op, join, Long_Float( sppadjsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppadjsp;


   procedure Add_spyrothd( c : in out d.Criteria; spyrothd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spyrothd", op, join, spyrothd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spyrothd;


   procedure Add_spyrotsp( c : in out d.Criteria; spyrotsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spyrotsp", op, join, spyrotsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spyrotsp;


   procedure Add_srentahd( c : in out d.Criteria; srentahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "srentahd", op, join, Long_Float( srentahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_srentahd;


   procedure Add_srentasp( c : in out d.Criteria; srentasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "srentasp", op, join, Long_Float( srentasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_srentasp;


   procedure Add_psrenthd( c : in out d.Criteria; psrenthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psrenthd", op, join, psrenthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_psrenthd;


   procedure Add_psrentsp( c : in out d.Criteria; psrentsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psrentsp", op, join, psrentsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_psrentsp;


   procedure Add_sfispchd( c : in out d.Criteria; sfispchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfispchd", op, join, sfispchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfispchd;


   procedure Add_sfispcsp( c : in out d.Criteria; sfispcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfispcsp", op, join, sfispcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfispcsp;


   procedure Add_sfjesahd( c : in out d.Criteria; sfjesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfjesahd", op, join, sfjesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfjesahd;


   procedure Add_sfjesasp( c : in out d.Criteria; sfjesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfjesasp", op, join, sfjesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfjesasp;


   procedure Add_sruchd( c : in out d.Criteria; sruchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sruchd", op, join, sruchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sruchd;


   procedure Add_srucsp( c : in out d.Criteria; srucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "srucsp", op, join, srucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_srucsp;


   procedure Add_sspajhd( c : in out d.Criteria; sspajhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspajhd", op, join, Long_Float( sspajhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspajhd;


   procedure Add_sspajsp( c : in out d.Criteria; sspajsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspajsp", op, join, Long_Float( sspajsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspajsp;


   procedure Add_gtsavahd( c : in out d.Criteria; gtsavahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtsavahd", op, join, gtsavahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtsavahd;


   procedure Add_gtsavasp( c : in out d.Criteria; gtsavasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtsavasp", op, join, gtsavasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtsavasp;


   procedure Add_stshcthd( c : in out d.Criteria; stshcthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stshcthd", op, join, stshcthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshcthd;


   procedure Add_stshctsp( c : in out d.Criteria; stshctsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stshctsp", op, join, stshctsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshctsp;


   procedure Add_tdaywkhd( c : in out d.Criteria; tdaywkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tdaywkhd", op, join, tdaywkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tdaywkhd;


   procedure Add_tdaywksp( c : in out d.Criteria; tdaywksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tdaywksp", op, join, tdaywksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tdaywksp;


   procedure Add_agefedhd( c : in out d.Criteria; agefedhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agefedhd", op, join, agefedhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_agefedhd;


   procedure Add_agefedsp( c : in out d.Criteria; agefedsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agefedsp", op, join, agefedsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_agefedsp;


   procedure Add_tmpjobhd( c : in out d.Criteria; tmpjobhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tmpjobhd", op, join, tmpjobhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tmpjobhd;


   procedure Add_tmpjobsp( c : in out d.Criteria; tmpjobsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tmpjobsp", op, join, tmpjobsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tmpjobsp;


   procedure Add_tesscthd( c : in out d.Criteria; tesscthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tesscthd", op, join, tesscthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tesscthd;


   procedure Add_tessctsp( c : in out d.Criteria; tessctsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tessctsp", op, join, tessctsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tessctsp;


   procedure Add_totgrahd( c : in out d.Criteria; totgrahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgrahd", op, join, totgrahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgrahd;


   procedure Add_totgrasp( c : in out d.Criteria; totgrasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgrasp", op, join, Long_Float( totgrasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgrasp;


   procedure Add_tothouhd( c : in out d.Criteria; tothouhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tothouhd", op, join, Long_Float( tothouhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tothouhd;


   procedure Add_tothousp( c : in out d.Criteria; tothousp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tothousp", op, join, Long_Float( tothousp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tothousp;


   procedure Add_totinthd( c : in out d.Criteria; totinthd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totinthd", op, join, Long_Float( totinthd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_totinthd;


   procedure Add_totintsp( c : in out d.Criteria; totintsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totintsp", op, join, Long_Float( totintsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_totintsp;


   procedure Add_totocchd( c : in out d.Criteria; totocchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totocchd", op, join, Long_Float( totocchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_totocchd;


   procedure Add_totoccsp( c : in out d.Criteria; totoccsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totoccsp", op, join, Long_Float( totoccsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_totoccsp;


   procedure Add_trainhd( c : in out d.Criteria; trainhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trainhd", op, join, trainhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_trainhd;


   procedure Add_trainsp( c : in out d.Criteria; trainsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trainsp", op, join, trainsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_trainsp;


   procedure Add_trnallhd( c : in out d.Criteria; trnallhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnallhd", op, join, trnallhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnallhd;


   procedure Add_trnallsp( c : in out d.Criteria; trnallsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnallsp", op, join, trnallsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnallsp;


   procedure Add_ttbprxhd( c : in out d.Criteria; ttbprxhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ttbprxhd", op, join, Long_Float( ttbprxhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttbprxhd;


   procedure Add_ttbprxsp( c : in out d.Criteria; ttbprxsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ttbprxsp", op, join, Long_Float( ttbprxsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttbprxsp;


   procedure Add_tuborrhd( c : in out d.Criteria; tuborrhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuborrhd", op, join, tuborrhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuborrhd;


   procedure Add_tuborrsp( c : in out d.Criteria; tuborrsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuborrsp", op, join, tuborrsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuborrsp;


   procedure Add_typeedhd( c : in out d.Criteria; typeedhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "typeedhd", op, join, typeedhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_typeedhd;


   procedure Add_typeedsp( c : in out d.Criteria; typeedsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "typeedsp", op, join, typeedsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_typeedsp;


   procedure Add_unpd1hd( c : in out d.Criteria; unpd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unpd1hd", op, join, unpd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd1hd;


   procedure Add_unpd1sp( c : in out d.Criteria; unpd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unpd1sp", op, join, unpd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd1sp;


   procedure Add_unpd2hd( c : in out d.Criteria; unpd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unpd2hd", op, join, unpd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd2hd;


   procedure Add_unpd2sp( c : in out d.Criteria; unpd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unpd2sp", op, join, unpd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd2sp;


   procedure Add_untrcthd( c : in out d.Criteria; untrcthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "untrcthd", op, join, untrcthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_untrcthd;


   procedure Add_untrctsp( c : in out d.Criteria; untrctsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "untrctsp", op, join, untrctsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_untrctsp;


   procedure Add_upersohd( c : in out d.Criteria; upersohd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upersohd", op, join, upersohd );
   begin
      d.add_to_criteria( c, elem );
   end Add_upersohd;


   procedure Add_upersosp( c : in out d.Criteria; upersosp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upersosp", op, join, upersosp );
   begin
      d.add_to_criteria( c, elem );
   end Add_upersosp;


   procedure Add_agewidhd( c : in out d.Criteria; agewidhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agewidhd", op, join, agewidhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_agewidhd;


   procedure Add_agewidsp( c : in out d.Criteria; agewidsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agewidsp", op, join, agewidsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_agewidsp;


   procedure Add_kidwidhd( c : in out d.Criteria; kidwidhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kidwidhd", op, join, kidwidhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_kidwidhd;


   procedure Add_kidwidsp( c : in out d.Criteria; kidwidsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kidwidsp", op, join, kidwidsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_kidwidsp;


   procedure Add_quchd( c : in out d.Criteria; quchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "quchd", op, join, quchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_quchd;


   procedure Add_qucsp( c : in out d.Criteria; qucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qucsp", op, join, qucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qucsp;


   procedure Add_qhbhd( c : in out d.Criteria; qhbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qhbhd", op, join, qhbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhbhd;


   procedure Add_qhbsp( c : in out d.Criteria; qhbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qhbsp", op, join, qhbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhbsp;


   procedure Add_qwtchd( c : in out d.Criteria; qwtchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qwtchd", op, join, qwtchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwtchd;


   procedure Add_qwtcsp( c : in out d.Criteria; qwtcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qwtcsp", op, join, qwtcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwtcsp;


   procedure Add_qctchd( c : in out d.Criteria; qctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qctchd", op, join, qctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qctchd;


   procedure Add_qctcsp( c : in out d.Criteria; qctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qctcsp", op, join, qctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qctcsp;


   procedure Add_qishd( c : in out d.Criteria; qishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qishd", op, join, qishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qishd;


   procedure Add_qissp( c : in out d.Criteria; qissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qissp", op, join, qissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qissp;


   procedure Add_qjsahd( c : in out d.Criteria; qjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qjsahd", op, join, qjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qjsahd;


   procedure Add_qjsasp( c : in out d.Criteria; qjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qjsasp", op, join, qjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qjsasp;


   procedure Add_qesahd( c : in out d.Criteria; qesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qesahd", op, join, qesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qesahd;


   procedure Add_qesasp( c : in out d.Criteria; qesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qesasp", op, join, qesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qesasp;


   procedure Add_qcahd( c : in out d.Criteria; qcahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qcahd", op, join, qcahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcahd;


   procedure Add_qcasp( c : in out d.Criteria; qcasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "qcasp", op, join, qcasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcasp;


   procedure Add_waithd( c : in out d.Criteria; waithd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "waithd", op, join, waithd );
   begin
      d.add_to_criteria( c, elem );
   end Add_waithd;


   procedure Add_waitsp( c : in out d.Criteria; waitsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "waitsp", op, join, waitsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_waitsp;


   procedure Add_whresphd( c : in out d.Criteria; whresphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whresphd", op, join, whresphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whresphd;


   procedure Add_whrespsp( c : in out d.Criteria; whrespsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whrespsp", op, join, whrespsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whrespsp;


   procedure Add_whoctbhd( c : in out d.Criteria; whoctbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whoctbhd", op, join, whoctbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whoctbhd;


   procedure Add_whoctbsp( c : in out d.Criteria; whoctbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whoctbsp", op, join, whoctbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whoctbsp;


   procedure Add_widocchd( c : in out d.Criteria; widocchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "widocchd", op, join, Long_Float( widocchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_widocchd;


   procedure Add_widoccsp( c : in out d.Criteria; widoccsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "widoccsp", op, join, Long_Float( widoccsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_widoccsp;


   procedure Add_wintflhd( c : in out d.Criteria; wintflhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wintflhd", op, join, wintflhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wintflhd;


   procedure Add_wintflsp( c : in out d.Criteria; wintflsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wintflsp", op, join, wintflsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wintflsp;


   procedure Add_workinhd( c : in out d.Criteria; workinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workinhd", op, join, workinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_workinhd;


   procedure Add_workinsp( c : in out d.Criteria; workinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workinsp", op, join, workinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_workinsp;


   procedure Add_wpahd( c : in out d.Criteria; wpahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpahd", op, join, wpahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpahd;


   procedure Add_wpasp( c : in out d.Criteria; wpasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpasp", op, join, wpasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpasp;


   procedure Add_wpbahd( c : in out d.Criteria; wpbahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpbahd", op, join, wpbahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpbahd;


   procedure Add_wpbasp( c : in out d.Criteria; wpbasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpbasp", op, join, wpbasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpbasp;


   procedure Add_wtclm1hd( c : in out d.Criteria; wtclm1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wtclm1hd", op, join, wtclm1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm1hd;


   procedure Add_wtclm1sp( c : in out d.Criteria; wtclm1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wtclm1sp", op, join, wtclm1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm1sp;


   procedure Add_wtclm2hd( c : in out d.Criteria; wtclm2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wtclm2hd", op, join, wtclm2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm2hd;


   procedure Add_wtclm2sp( c : in out d.Criteria; wtclm2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wtclm2sp", op, join, wtclm2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm2sp;


   procedure Add_yjblevhd( c : in out d.Criteria; yjblevhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjblevhd", op, join, yjblevhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjblevhd;


   procedure Add_yjblevsp( c : in out d.Criteria; yjblevsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjblevsp", op, join, yjblevsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjblevsp;


   procedure Add_ystwkhd( c : in out d.Criteria; ystwkhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ystwkhd", op, join, ystwkhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ystwkhd;


   procedure Add_ystwksp( c : in out d.Criteria; ystwksp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ystwksp", op, join, ystwksp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ystwksp;


   procedure Add_as011hd( c : in out d.Criteria; as011hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as011hd", op, join, Long_Float( as011hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as011hd;


   procedure Add_as012hd( c : in out d.Criteria; as012hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as012hd", op, join, Long_Float( as012hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as012hd;


   procedure Add_as013hd( c : in out d.Criteria; as013hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as013hd", op, join, Long_Float( as013hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as013hd;


   procedure Add_as014hd( c : in out d.Criteria; as014hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as014hd", op, join, as014hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as014hd;


   procedure Add_as011sp( c : in out d.Criteria; as011sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as011sp", op, join, Long_Float( as011sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as011sp;


   procedure Add_as012sp( c : in out d.Criteria; as012sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as012sp", op, join, Long_Float( as012sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as012sp;


   procedure Add_as013sp( c : in out d.Criteria; as013sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as013sp", op, join, as013sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as013sp;


   procedure Add_as014sp( c : in out d.Criteria; as014sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as014sp", op, join, as014sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as014sp;


   procedure Add_as021hd( c : in out d.Criteria; as021hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as021hd", op, join, as021hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as021hd;


   procedure Add_as022hd( c : in out d.Criteria; as022hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as022hd", op, join, as022hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as022hd;


   procedure Add_as021sp( c : in out d.Criteria; as021sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as021sp", op, join, Long_Float( as021sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as021sp;


   procedure Add_as022sp( c : in out d.Criteria; as022sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as022sp", op, join, as022sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as022sp;


   procedure Add_as031hd( c : in out d.Criteria; as031hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as031hd", op, join, as031hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as031hd;


   procedure Add_as031sp( c : in out d.Criteria; as031sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as031sp", op, join, as031sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as031sp;


   procedure Add_as051hd( c : in out d.Criteria; as051hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as051hd", op, join, Long_Float( as051hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as051hd;


   procedure Add_as052hd( c : in out d.Criteria; as052hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as052hd", op, join, Long_Float( as052hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as052hd;


   procedure Add_as053hd( c : in out d.Criteria; as053hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as053hd", op, join, Long_Float( as053hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as053hd;


   procedure Add_as054hd( c : in out d.Criteria; as054hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as054hd", op, join, as054hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as054hd;


   procedure Add_as055hd( c : in out d.Criteria; as055hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as055hd", op, join, as055hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as055hd;


   procedure Add_as056hd( c : in out d.Criteria; as056hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as056hd", op, join, as056hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as056hd;


   procedure Add_as057hd( c : in out d.Criteria; as057hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as057hd", op, join, as057hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as057hd;


   procedure Add_as051sp( c : in out d.Criteria; as051sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as051sp", op, join, Long_Float( as051sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as051sp;


   procedure Add_as052sp( c : in out d.Criteria; as052sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as052sp", op, join, Long_Float( as052sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as052sp;


   procedure Add_as053sp( c : in out d.Criteria; as053sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as053sp", op, join, Long_Float( as053sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as053sp;


   procedure Add_as054sp( c : in out d.Criteria; as054sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as054sp", op, join, as054sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as054sp;


   procedure Add_as055sp( c : in out d.Criteria; as055sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as055sp", op, join, as055sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as055sp;


   procedure Add_as056sp( c : in out d.Criteria; as056sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as056sp", op, join, as056sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as056sp;


   procedure Add_as057sp( c : in out d.Criteria; as057sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as057sp", op, join, as057sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as057sp;


   procedure Add_as061hd( c : in out d.Criteria; as061hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as061hd", op, join, as061hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as061hd;


   procedure Add_as061sp( c : in out d.Criteria; as061sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as061sp", op, join, as061sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as061sp;


   procedure Add_as071hd( c : in out d.Criteria; as071hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as071hd", op, join, as071hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as071hd;


   procedure Add_as071sp( c : in out d.Criteria; as071sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as071sp", op, join, as071sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as071sp;


   procedure Add_as081hd( c : in out d.Criteria; as081hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as081hd", op, join, Long_Float( as081hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as081hd;


   procedure Add_as082hd( c : in out d.Criteria; as082hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as082hd", op, join, Long_Float( as082hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as082hd;


   procedure Add_as083hd( c : in out d.Criteria; as083hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as083hd", op, join, as083hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as083hd;


   procedure Add_as084hd( c : in out d.Criteria; as084hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as084hd", op, join, as084hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as084hd;


   procedure Add_as085hd( c : in out d.Criteria; as085hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as085hd", op, join, as085hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as085hd;


   procedure Add_as081sp( c : in out d.Criteria; as081sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as081sp", op, join, Long_Float( as081sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as081sp;


   procedure Add_as082sp( c : in out d.Criteria; as082sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as082sp", op, join, Long_Float( as082sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as082sp;


   procedure Add_as083sp( c : in out d.Criteria; as083sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as083sp", op, join, as083sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as083sp;


   procedure Add_as084sp( c : in out d.Criteria; as084sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as084sp", op, join, as084sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as084sp;


   procedure Add_as085sp( c : in out d.Criteria; as085sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as085sp", op, join, as085sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as085sp;


   procedure Add_as101hd( c : in out d.Criteria; as101hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as101hd", op, join, as101hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as101hd;


   procedure Add_as101sp( c : in out d.Criteria; as101sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as101sp", op, join, as101sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as101sp;


   procedure Add_as111hd( c : in out d.Criteria; as111hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as111hd", op, join, as111hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as111hd;


   procedure Add_as111sp( c : in out d.Criteria; as111sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as111sp", op, join, as111sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as111sp;


   procedure Add_as121hd( c : in out d.Criteria; as121hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as121hd", op, join, as121hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as121hd;


   procedure Add_as121sp( c : in out d.Criteria; as121sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as121sp", op, join, as121sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as121sp;


   procedure Add_as131hd( c : in out d.Criteria; as131hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as131hd", op, join, as131hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as131hd;


   procedure Add_as131sp( c : in out d.Criteria; as131sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as131sp", op, join, as131sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as131sp;


   procedure Add_as141hd( c : in out d.Criteria; as141hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as141hd", op, join, as141hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as141hd;


   procedure Add_as142hd( c : in out d.Criteria; as142hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as142hd", op, join, as142hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as142hd;


   procedure Add_as143hd( c : in out d.Criteria; as143hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as143hd", op, join, as143hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as143hd;


   procedure Add_as141sp( c : in out d.Criteria; as141sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as141sp", op, join, as141sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as141sp;


   procedure Add_as142sp( c : in out d.Criteria; as142sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as142sp", op, join, as142sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as142sp;


   procedure Add_as143sp( c : in out d.Criteria; as143sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as143sp", op, join, as143sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as143sp;


   procedure Add_as151hd( c : in out d.Criteria; as151hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as151hd", op, join, Long_Float( as151hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as151hd;


   procedure Add_as151sp( c : in out d.Criteria; as151sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as151sp", op, join, Long_Float( as151sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as151sp;


   procedure Add_as161hd( c : in out d.Criteria; as161hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as161hd", op, join, as161hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as161hd;


   procedure Add_as161sp( c : in out d.Criteria; as161sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as161sp", op, join, as161sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as161sp;


   procedure Add_as191hd( c : in out d.Criteria; as191hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as191hd", op, join, as191hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as191hd;


   procedure Add_as191sp( c : in out d.Criteria; as191sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as191sp", op, join, as191sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as191sp;


   procedure Add_as211hd( c : in out d.Criteria; as211hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as211hd", op, join, Long_Float( as211hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as211hd;


   procedure Add_as212hd( c : in out d.Criteria; as212hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as212hd", op, join, as212hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as212hd;


   procedure Add_as213hd( c : in out d.Criteria; as213hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as213hd", op, join, as213hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as213hd;


   procedure Add_as214hd( c : in out d.Criteria; as214hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as214hd", op, join, as214hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as214hd;


   procedure Add_as211sp( c : in out d.Criteria; as211sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as211sp", op, join, Long_Float( as211sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as211sp;


   procedure Add_as212sp( c : in out d.Criteria; as212sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as212sp", op, join, Long_Float( as212sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as212sp;


   procedure Add_as213sp( c : in out d.Criteria; as213sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as213sp", op, join, as213sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as213sp;


   procedure Add_as214sp( c : in out d.Criteria; as214sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as214sp", op, join, as214sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as214sp;


   procedure Add_as261hd( c : in out d.Criteria; as261hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as261hd", op, join, as261hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as261hd;


   procedure Add_as261sp( c : in out d.Criteria; as261sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as261sp", op, join, as261sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as261sp;


   procedure Add_as271hd( c : in out d.Criteria; as271hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as271hd", op, join, Long_Float( as271hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as271hd;


   procedure Add_as272hd( c : in out d.Criteria; as272hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as272hd", op, join, as272hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as272hd;


   procedure Add_as271sp( c : in out d.Criteria; as271sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as271sp", op, join, as271sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as271sp;


   procedure Add_as272sp( c : in out d.Criteria; as272sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as272sp", op, join, as272sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as272sp;


   procedure Add_as281hd( c : in out d.Criteria; as281hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as281hd", op, join, as281hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as281hd;


   procedure Add_as281sp( c : in out d.Criteria; as281sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as281sp", op, join, Long_Float( as281sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_as281sp;


   procedure Add_as291hd( c : in out d.Criteria; as291hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as291hd", op, join, as291hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as291hd;


   procedure Add_as292hd( c : in out d.Criteria; as292hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as292hd", op, join, as292hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as292hd;


   procedure Add_as293hd( c : in out d.Criteria; as293hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as293hd", op, join, as293hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_as293hd;


   procedure Add_as291sp( c : in out d.Criteria; as291sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as291sp", op, join, as291sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as291sp;


   procedure Add_as292sp( c : in out d.Criteria; as292sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as292sp", op, join, as292sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as292sp;


   procedure Add_as293sp( c : in out d.Criteria; as293sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "as293sp", op, join, as293sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_as293sp;


   procedure Add_stdlachd( c : in out d.Criteria; stdlachd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlachd", op, join, stdlachd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlachd;


   procedure Add_stdlamhd( c : in out d.Criteria; stdlamhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamhd", op, join, stdlamhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamhd;


   procedure Add_stcbhd( c : in out d.Criteria; stcbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stcbhd", op, join, stcbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stcbhd;


   procedure Add_stpenchd( c : in out d.Criteria; stpenchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stpenchd", op, join, stpenchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpenchd;


   procedure Add_strphd( c : in out d.Criteria; strphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "strphd", op, join, strphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_strphd;


   procedure Add_stwphd( c : in out d.Criteria; stwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwphd", op, join, stwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwphd;


   procedure Add_stwdphd( c : in out d.Criteria; stwdphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwdphd", op, join, stwdphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwdphd;


   procedure Add_stwwphd( c : in out d.Criteria; stwwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwwphd", op, join, stwwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwwphd;


   procedure Add_stsdahd( c : in out d.Criteria; stsdahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stsdahd", op, join, stsdahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stsdahd;


   procedure Add_staahd( c : in out d.Criteria; staahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "staahd", op, join, staahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_staahd;


   procedure Add_sticahd( c : in out d.Criteria; sticahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sticahd", op, join, sticahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sticahd;


   procedure Add_stjsahd( c : in out d.Criteria; stjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stjsahd", op, join, stjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stjsahd;


   procedure Add_stiidbhd( c : in out d.Criteria; stiidbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stiidbhd", op, join, stiidbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stiidbhd;


   procedure Add_stesahd( c : in out d.Criteria; stesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stesahd", op, join, stesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stesahd;


   procedure Add_stibhd( c : in out d.Criteria; stibhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stibhd", op, join, stibhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stibhd;


   procedure Add_stishd( c : in out d.Criteria; stishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stishd", op, join, stishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stishd;


   procedure Add_stmahd( c : in out d.Criteria; stmahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stmahd", op, join, stmahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stmahd;


   procedure Add_stshhd( c : in out d.Criteria; stshhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stshhd", op, join, stshhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshhd;


   procedure Add_stgahd( c : in out d.Criteria; stgahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stgahd", op, join, stgahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stgahd;


   procedure Add_stwtchd( c : in out d.Criteria; stwtchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwtchd", op, join, stwtchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtchd;


   procedure Add_stctchd( c : in out d.Criteria; stctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stctchd", op, join, stctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctchd;


   procedure Add_stwtclhd( c : in out d.Criteria; stwtclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwtclhd", op, join, stwtclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtclhd;


   procedure Add_stctclhd( c : in out d.Criteria; stctclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stctclhd", op, join, stctclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctclhd;


   procedure Add_stuchd( c : in out d.Criteria; stuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stuchd", op, join, stuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stuchd;


   procedure Add_stpipdhd( c : in out d.Criteria; stpipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stpipdhd", op, join, stpipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipdhd;


   procedure Add_stpipmhd( c : in out d.Criteria; stpipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stpipmhd", op, join, stpipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipmhd;


   procedure Add_stdlacsp( c : in out d.Criteria; stdlacsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacsp", op, join, stdlacsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacsp;


   procedure Add_stdlamsp( c : in out d.Criteria; stdlamsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamsp", op, join, stdlamsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamsp;


   procedure Add_stcbsp( c : in out d.Criteria; stcbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stcbsp", op, join, stcbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stcbsp;


   procedure Add_stpencsp( c : in out d.Criteria; stpencsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stpencsp", op, join, stpencsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpencsp;


   procedure Add_strpsp( c : in out d.Criteria; strpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "strpsp", op, join, strpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_strpsp;


   procedure Add_stwpsp( c : in out d.Criteria; stwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwpsp", op, join, stwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwpsp;


   procedure Add_stwdpsp( c : in out d.Criteria; stwdpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwdpsp", op, join, stwdpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwdpsp;


   procedure Add_stwwpsp( c : in out d.Criteria; stwwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwwpsp", op, join, stwwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwwpsp;


   procedure Add_stsdasp( c : in out d.Criteria; stsdasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stsdasp", op, join, stsdasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stsdasp;


   procedure Add_staasp( c : in out d.Criteria; staasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "staasp", op, join, staasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_staasp;


   procedure Add_sticasp( c : in out d.Criteria; sticasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sticasp", op, join, sticasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sticasp;


   procedure Add_stjsasp( c : in out d.Criteria; stjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stjsasp", op, join, stjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stjsasp;


   procedure Add_stiidbsp( c : in out d.Criteria; stiidbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stiidbsp", op, join, stiidbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stiidbsp;


   procedure Add_stesasp( c : in out d.Criteria; stesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stesasp", op, join, stesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stesasp;


   procedure Add_stibsp( c : in out d.Criteria; stibsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stibsp", op, join, stibsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stibsp;


   procedure Add_stissp( c : in out d.Criteria; stissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stissp", op, join, stissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stissp;


   procedure Add_stmasp( c : in out d.Criteria; stmasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stmasp", op, join, stmasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stmasp;


   procedure Add_stshsp( c : in out d.Criteria; stshsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stshsp", op, join, stshsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshsp;


   procedure Add_stgasp( c : in out d.Criteria; stgasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stgasp", op, join, stgasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stgasp;


   procedure Add_stwtcsp( c : in out d.Criteria; stwtcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwtcsp", op, join, stwtcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtcsp;


   procedure Add_stctcsp( c : in out d.Criteria; stctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stctcsp", op, join, stctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctcsp;


   procedure Add_stwtclsp( c : in out d.Criteria; stwtclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stwtclsp", op, join, stwtclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtclsp;


   procedure Add_stctclsp( c : in out d.Criteria; stctclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stctclsp", op, join, stctclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctclsp;


   procedure Add_stucsp( c : in out d.Criteria; stucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stucsp", op, join, stucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stucsp;


   procedure Add_stpipdsp( c : in out d.Criteria; stpipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stpipdsp", op, join, stpipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipdsp;


   procedure Add_stpipmsp( c : in out d.Criteria; stpipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stpipmsp", op, join, stpipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipmsp;


   procedure Add_dlacahd( c : in out d.Criteria; dlacahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacahd", op, join, Long_Float( dlacahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacahd;


   procedure Add_dlamohd( c : in out d.Criteria; dlamohd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamohd", op, join, Long_Float( dlamohd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamohd;


   procedure Add_cbhd( c : in out d.Criteria; cbhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbhd", op, join, Long_Float( cbhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbhd;


   procedure Add_lpencrhd( c : in out d.Criteria; lpencrhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lpencrhd", op, join, Long_Float( lpencrhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_lpencrhd;


   procedure Add_rphd( c : in out d.Criteria; rphd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rphd", op, join, Long_Float( rphd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rphd;


   procedure Add_wphd( c : in out d.Criteria; wphd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wphd", op, join, Long_Float( wphd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wphd;


   procedure Add_wdphd( c : in out d.Criteria; wdphd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wdphd", op, join, Long_Float( wdphd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wdphd;


   procedure Add_wwphd( c : in out d.Criteria; wwphd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwphd", op, join, Long_Float( wwphd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwphd;


   procedure Add_sdahd( c : in out d.Criteria; sdahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdahd", op, join, Long_Float( sdahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdahd;


   procedure Add_aahd( c : in out d.Criteria; aahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aahd", op, join, Long_Float( aahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_aahd;


   procedure Add_icahd( c : in out d.Criteria; icahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "icahd", op, join, Long_Float( icahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_icahd;


   procedure Add_jsahd( c : in out d.Criteria; jsahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jsahd", op, join, Long_Float( jsahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsahd;


   procedure Add_iidbhd( c : in out d.Criteria; iidbhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "iidbhd", op, join, Long_Float( iidbhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_iidbhd;


   procedure Add_esahd( c : in out d.Criteria; esahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "esahd", op, join, Long_Float( esahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_esahd;


   procedure Add_ibhd( c : in out d.Criteria; ibhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ibhd", op, join, Long_Float( ibhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ibhd;


   procedure Add_ishd( c : in out d.Criteria; ishd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ishd", op, join, Long_Float( ishd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ishd;


   procedure Add_mahd( c : in out d.Criteria; mahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mahd", op, join, Long_Float( mahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mahd;


   procedure Add_sfmghd( c : in out d.Criteria; sfmghd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfmghd", op, join, sfmghd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfmghd;


   procedure Add_sffghd( c : in out d.Criteria; sffghd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sffghd", op, join, Long_Float( sffghd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sffghd;


   procedure Add_othbenhd( c : in out d.Criteria; othbenhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othbenhd", op, join, Long_Float( othbenhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_othbenhd;


   procedure Add_tubenhd( c : in out d.Criteria; tubenhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tubenhd", op, join, Long_Float( tubenhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tubenhd;


   procedure Add_fsbenhd( c : in out d.Criteria; fsbenhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsbenhd", op, join, Long_Float( fsbenhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsbenhd;


   procedure Add_sicinhd( c : in out d.Criteria; sicinhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sicinhd", op, join, Long_Float( sicinhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sicinhd;


   procedure Add_accinhd( c : in out d.Criteria; accinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accinhd", op, join, accinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_accinhd;


   procedure Add_hosinhd( c : in out d.Criteria; hosinhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hosinhd", op, join, Long_Float( hosinhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hosinhd;


   procedure Add_gtshd( c : in out d.Criteria; gtshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtshd", op, join, gtshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtshd;


   procedure Add_gahd( c : in out d.Criteria; gahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gahd", op, join, Long_Float( gahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_gahd;


   procedure Add_iwchd( c : in out d.Criteria; iwchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "iwchd", op, join, iwchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwchd;


   procedure Add_r2wchd( c : in out d.Criteria; r2wchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2wchd", op, join, r2wchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wchd;


   procedure Add_widplhd( c : in out d.Criteria; widplhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "widplhd", op, join, widplhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_widplhd;


   procedure Add_uninshd( c : in out d.Criteria; uninshd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uninshd", op, join, Long_Float( uninshd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uninshd;


   procedure Add_wfamthd( c : in out d.Criteria; wfamthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wfamthd", op, join, wfamthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfamthd;


   procedure Add_dssdpihd( c : in out d.Criteria; dssdpihd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssdpihd", op, join, Long_Float( dssdpihd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpihd;


   procedure Add_dssdpjhd( c : in out d.Criteria; dssdpjhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssdpjhd", op, join, Long_Float( dssdpjhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpjhd;


   procedure Add_sfrpaihd( c : in out d.Criteria; sfrpaihd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfrpaihd", op, join, Long_Float( sfrpaihd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpaihd;


   procedure Add_sfrpajhd( c : in out d.Criteria; sfrpajhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfrpajhd", op, join, Long_Float( sfrpajhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpajhd;


   procedure Add_exhbhd( c : in out d.Criteria; exhbhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exhbhd", op, join, Long_Float( exhbhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbhd;


   procedure Add_perhinhd( c : in out d.Criteria; perhinhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "perhinhd", op, join, Long_Float( perhinhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_perhinhd;


   procedure Add_otsiinhd( c : in out d.Criteria; otsiinhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otsiinhd", op, join, Long_Float( otsiinhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_otsiinhd;


   procedure Add_cichd( c : in out d.Criteria; cichd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cichd", op, join, Long_Float( cichd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_cichd;


   procedure Add_bowtchd( c : in out d.Criteria; bowtchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bowtchd", op, join, Long_Float( bowtchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtchd;


   procedure Add_boctchd( c : in out d.Criteria; boctchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boctchd", op, join, Long_Float( boctchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctchd;


   procedure Add_bowtclhd( c : in out d.Criteria; bowtclhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bowtclhd", op, join, Long_Float( bowtclhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtclhd;


   procedure Add_boctclhd( c : in out d.Criteria; boctclhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boctclhd", op, join, Long_Float( boctclhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctclhd;


   procedure Add_hbhd( c : in out d.Criteria; hbhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbhd", op, join, Long_Float( hbhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbhd;


   procedure Add_uchd( c : in out d.Criteria; uchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uchd", op, join, Long_Float( uchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uchd;


   procedure Add_pipdhd( c : in out d.Criteria; pipdhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pipdhd", op, join, Long_Float( pipdhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipdhd;


   procedure Add_pipmhd( c : in out d.Criteria; pipmhd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pipmhd", op, join, Long_Float( pipmhd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmhd;


   procedure Add_lndwphd( c : in out d.Criteria; lndwphd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lndwphd", op, join, Long_Float( lndwphd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_lndwphd;


   procedure Add_lnlahd( c : in out d.Criteria; lnlahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lnlahd", op, join, lnlahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnlahd;


   procedure Add_dwpauchd( c : in out d.Criteria; dwpauchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dwpauchd", op, join, Long_Float( dwpauchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpauchd;


   procedure Add_sfrpuchd( c : in out d.Criteria; sfrpuchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfrpuchd", op, join, Long_Float( sfrpuchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpuchd;


   procedure Add_dlacasp( c : in out d.Criteria; dlacasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacasp", op, join, Long_Float( dlacasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacasp;


   procedure Add_dlamosp( c : in out d.Criteria; dlamosp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamosp", op, join, Long_Float( dlamosp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamosp;


   procedure Add_cbsp( c : in out d.Criteria; cbsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbsp", op, join, Long_Float( cbsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbsp;


   procedure Add_lpencrsp( c : in out d.Criteria; lpencrsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lpencrsp", op, join, Long_Float( lpencrsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_lpencrsp;


   procedure Add_rpsp( c : in out d.Criteria; rpsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rpsp", op, join, Long_Float( rpsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rpsp;


   procedure Add_wpsp( c : in out d.Criteria; wpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpsp", op, join, wpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpsp;


   procedure Add_wdpsp( c : in out d.Criteria; wdpsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wdpsp", op, join, Long_Float( wdpsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wdpsp;


   procedure Add_wwpsp( c : in out d.Criteria; wwpsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpsp", op, join, Long_Float( wwpsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpsp;


   procedure Add_sdasp( c : in out d.Criteria; sdasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sdasp", op, join, Long_Float( sdasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdasp;


   procedure Add_aasp( c : in out d.Criteria; aasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aasp", op, join, Long_Float( aasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_aasp;


   procedure Add_icasp( c : in out d.Criteria; icasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "icasp", op, join, Long_Float( icasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_icasp;


   procedure Add_jsasp( c : in out d.Criteria; jsasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jsasp", op, join, Long_Float( jsasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsasp;


   procedure Add_iidbsp( c : in out d.Criteria; iidbsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "iidbsp", op, join, Long_Float( iidbsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_iidbsp;


   procedure Add_esasp( c : in out d.Criteria; esasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "esasp", op, join, Long_Float( esasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_esasp;


   procedure Add_ibsp( c : in out d.Criteria; ibsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ibsp", op, join, Long_Float( ibsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ibsp;


   procedure Add_issp( c : in out d.Criteria; issp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "issp", op, join, Long_Float( issp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_issp;


   procedure Add_masp( c : in out d.Criteria; masp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "masp", op, join, Long_Float( masp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_masp;


   procedure Add_sfmgsp( c : in out d.Criteria; sfmgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfmgsp", op, join, sfmgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfmgsp;


   procedure Add_sffgsp( c : in out d.Criteria; sffgsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sffgsp", op, join, sffgsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sffgsp;


   procedure Add_othbensp( c : in out d.Criteria; othbensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othbensp", op, join, othbensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othbensp;


   procedure Add_tubensp( c : in out d.Criteria; tubensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tubensp", op, join, tubensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tubensp;


   procedure Add_fsbensp( c : in out d.Criteria; fsbensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsbensp", op, join, fsbensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsbensp;


   procedure Add_sicinsp( c : in out d.Criteria; sicinsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sicinsp", op, join, Long_Float( sicinsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sicinsp;


   procedure Add_accinsp( c : in out d.Criteria; accinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accinsp", op, join, accinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_accinsp;


   procedure Add_hosinsp( c : in out d.Criteria; hosinsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hosinsp", op, join, Long_Float( hosinsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hosinsp;


   procedure Add_gtssp( c : in out d.Criteria; gtssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtssp", op, join, gtssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtssp;


   procedure Add_gasp( c : in out d.Criteria; gasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gasp", op, join, gasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gasp;


   procedure Add_iwcsp( c : in out d.Criteria; iwcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "iwcsp", op, join, iwcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwcsp;


   procedure Add_r2wcsp( c : in out d.Criteria; r2wcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2wcsp", op, join, r2wcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wcsp;


   procedure Add_widplsp( c : in out d.Criteria; widplsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "widplsp", op, join, widplsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_widplsp;


   procedure Add_uninssp( c : in out d.Criteria; uninssp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uninssp", op, join, Long_Float( uninssp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uninssp;


   procedure Add_wfamtsp( c : in out d.Criteria; wfamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wfamtsp", op, join, wfamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfamtsp;


   procedure Add_dssdpisp( c : in out d.Criteria; dssdpisp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssdpisp", op, join, Long_Float( dssdpisp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpisp;


   procedure Add_dssdpjsp( c : in out d.Criteria; dssdpjsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssdpjsp", op, join, Long_Float( dssdpjsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpjsp;


   procedure Add_sfrpaisp( c : in out d.Criteria; sfrpaisp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfrpaisp", op, join, Long_Float( sfrpaisp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpaisp;


   procedure Add_sfrpajsp( c : in out d.Criteria; sfrpajsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfrpajsp", op, join, Long_Float( sfrpajsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpajsp;


   procedure Add_exhbsp( c : in out d.Criteria; exhbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exhbsp", op, join, exhbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbsp;


   procedure Add_perhinsp( c : in out d.Criteria; perhinsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "perhinsp", op, join, Long_Float( perhinsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_perhinsp;


   procedure Add_otsiinsp( c : in out d.Criteria; otsiinsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otsiinsp", op, join, Long_Float( otsiinsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_otsiinsp;


   procedure Add_cicsp( c : in out d.Criteria; cicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cicsp", op, join, cicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cicsp;


   procedure Add_bowtcsp( c : in out d.Criteria; bowtcsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bowtcsp", op, join, Long_Float( bowtcsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtcsp;


   procedure Add_boctcsp( c : in out d.Criteria; boctcsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boctcsp", op, join, Long_Float( boctcsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctcsp;


   procedure Add_bowtclsp( c : in out d.Criteria; bowtclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bowtclsp", op, join, bowtclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtclsp;


   procedure Add_boctclsp( c : in out d.Criteria; boctclsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boctclsp", op, join, Long_Float( boctclsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctclsp;


   procedure Add_hbsp( c : in out d.Criteria; hbsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbsp", op, join, Long_Float( hbsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbsp;


   procedure Add_ucsp( c : in out d.Criteria; ucsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ucsp", op, join, Long_Float( ucsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ucsp;


   procedure Add_pipdsp( c : in out d.Criteria; pipdsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pipdsp", op, join, Long_Float( pipdsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipdsp;


   procedure Add_pipmsp( c : in out d.Criteria; pipmsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pipmsp", op, join, Long_Float( pipmsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmsp;


   procedure Add_lndwpsp( c : in out d.Criteria; lndwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lndwpsp", op, join, lndwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lndwpsp;


   procedure Add_lnlasp( c : in out d.Criteria; lnlasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lnlasp", op, join, lnlasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnlasp;


   procedure Add_dwpaucsp( c : in out d.Criteria; dwpaucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dwpaucsp", op, join, dwpaucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpaucsp;


   procedure Add_sfrpucsp( c : in out d.Criteria; sfrpucsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfrpucsp", op, join, Long_Float( sfrpucsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpucsp;


   procedure Add_ltdlachd( c : in out d.Criteria; ltdlachd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlachd", op, join, ltdlachd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlachd;


   procedure Add_ltdlamhd( c : in out d.Criteria; ltdlamhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamhd", op, join, ltdlamhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamhd;


   procedure Add_ltcbhd( c : in out d.Criteria; ltcbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltcbhd", op, join, ltcbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltcbhd;


   procedure Add_bopenchd( c : in out d.Criteria; bopenchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bopenchd", op, join, bopenchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bopenchd;


   procedure Add_ltrphd( c : in out d.Criteria; ltrphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltrphd", op, join, ltrphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltrphd;


   procedure Add_ltwphd( c : in out d.Criteria; ltwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltwphd", op, join, ltwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwphd;


   procedure Add_ltwdphd( c : in out d.Criteria; ltwdphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltwdphd", op, join, ltwdphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwdphd;


   procedure Add_ltwwphd( c : in out d.Criteria; ltwwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltwwphd", op, join, ltwwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwwphd;


   procedure Add_ltsdahd( c : in out d.Criteria; ltsdahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltsdahd", op, join, ltsdahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltsdahd;


   procedure Add_ltaahd( c : in out d.Criteria; ltaahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltaahd", op, join, ltaahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltaahd;


   procedure Add_lticahd( c : in out d.Criteria; lticahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lticahd", op, join, lticahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lticahd;


   procedure Add_ltjsahd( c : in out d.Criteria; ltjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltjsahd", op, join, ltjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltjsahd;


   procedure Add_ltiidbhd( c : in out d.Criteria; ltiidbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltiidbhd", op, join, ltiidbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltiidbhd;


   procedure Add_ltesahd( c : in out d.Criteria; ltesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltesahd", op, join, ltesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltesahd;


   procedure Add_ltibhd( c : in out d.Criteria; ltibhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltibhd", op, join, ltibhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltibhd;


   procedure Add_ltishd( c : in out d.Criteria; ltishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltishd", op, join, ltishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltishd;


   procedure Add_ltmahd( c : in out d.Criteria; ltmahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltmahd", op, join, ltmahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltmahd;


   procedure Add_ltshhd( c : in out d.Criteria; ltshhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltshhd", op, join, ltshhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltshhd;


   procedure Add_ltgahd( c : in out d.Criteria; ltgahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltgahd", op, join, ltgahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltgahd;


   procedure Add_hwtchd( c : in out d.Criteria; hwtchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hwtchd", op, join, hwtchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtchd;


   procedure Add_hctchd( c : in out d.Criteria; hctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hctchd", op, join, hctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctchd;


   procedure Add_hwtclhd( c : in out d.Criteria; hwtclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hwtclhd", op, join, hwtclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtclhd;


   procedure Add_hctclhd( c : in out d.Criteria; hctclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hctclhd", op, join, hctclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctclhd;


   procedure Add_ltuchd( c : in out d.Criteria; ltuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltuchd", op, join, ltuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltuchd;


   procedure Add_ltpipdhd( c : in out d.Criteria; ltpipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltpipdhd", op, join, ltpipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipdhd;


   procedure Add_ltpipmhd( c : in out d.Criteria; ltpipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltpipmhd", op, join, ltpipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipmhd;


   procedure Add_ltdlacsp( c : in out d.Criteria; ltdlacsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacsp", op, join, ltdlacsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacsp;


   procedure Add_ltdlamsp( c : in out d.Criteria; ltdlamsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamsp", op, join, ltdlamsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamsp;


   procedure Add_ltcbsp( c : in out d.Criteria; ltcbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltcbsp", op, join, ltcbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltcbsp;


   procedure Add_bopencsp( c : in out d.Criteria; bopencsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bopencsp", op, join, bopencsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bopencsp;


   procedure Add_ltrpsp( c : in out d.Criteria; ltrpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltrpsp", op, join, ltrpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltrpsp;


   procedure Add_ltwpsp( c : in out d.Criteria; ltwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltwpsp", op, join, ltwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwpsp;


   procedure Add_ltwdpsp( c : in out d.Criteria; ltwdpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltwdpsp", op, join, ltwdpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwdpsp;


   procedure Add_ltwwpsp( c : in out d.Criteria; ltwwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltwwpsp", op, join, ltwwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwwpsp;


   procedure Add_ltsdasp( c : in out d.Criteria; ltsdasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltsdasp", op, join, ltsdasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltsdasp;


   procedure Add_ltaasp( c : in out d.Criteria; ltaasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltaasp", op, join, ltaasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltaasp;


   procedure Add_lticasp( c : in out d.Criteria; lticasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lticasp", op, join, lticasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lticasp;


   procedure Add_ltjsasp( c : in out d.Criteria; ltjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltjsasp", op, join, ltjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltjsasp;


   procedure Add_ltiidbsp( c : in out d.Criteria; ltiidbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltiidbsp", op, join, ltiidbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltiidbsp;


   procedure Add_ltesasp( c : in out d.Criteria; ltesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltesasp", op, join, ltesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltesasp;


   procedure Add_ltibsp( c : in out d.Criteria; ltibsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltibsp", op, join, ltibsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltibsp;


   procedure Add_ltissp( c : in out d.Criteria; ltissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltissp", op, join, ltissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltissp;


   procedure Add_ltmasp( c : in out d.Criteria; ltmasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltmasp", op, join, ltmasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltmasp;


   procedure Add_ltshsp( c : in out d.Criteria; ltshsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltshsp", op, join, ltshsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltshsp;


   procedure Add_ltgasp( c : in out d.Criteria; ltgasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltgasp", op, join, ltgasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltgasp;


   procedure Add_hwtcsp( c : in out d.Criteria; hwtcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hwtcsp", op, join, hwtcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtcsp;


   procedure Add_hctcsp( c : in out d.Criteria; hctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hctcsp", op, join, hctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctcsp;


   procedure Add_hwtclsp( c : in out d.Criteria; hwtclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hwtclsp", op, join, hwtclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtclsp;


   procedure Add_hctclsp( c : in out d.Criteria; hctclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hctclsp", op, join, hctclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctclsp;


   procedure Add_ltucsp( c : in out d.Criteria; ltucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltucsp", op, join, ltucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltucsp;


   procedure Add_ltpipdsp( c : in out d.Criteria; ltpipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltpipdsp", op, join, ltpipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipdsp;


   procedure Add_ltpipmsp( c : in out d.Criteria; ltpipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltpipmsp", op, join, ltpipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipmsp;


   procedure Add_pdlacahd( c : in out d.Criteria; pdlacahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacahd", op, join, pdlacahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacahd;


   procedure Add_pdlamohd( c : in out d.Criteria; pdlamohd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamohd", op, join, pdlamohd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamohd;


   procedure Add_pcbhd( c : in out d.Criteria; pcbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcbhd", op, join, pcbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcbhd;


   procedure Add_hpenchd( c : in out d.Criteria; hpenchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpenchd", op, join, hpenchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpenchd;


   procedure Add_prphd( c : in out d.Criteria; prphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prphd", op, join, prphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prphd;


   procedure Add_pwphd( c : in out d.Criteria; pwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwphd", op, join, pwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwphd;


   procedure Add_pwdphd( c : in out d.Criteria; pwdphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwdphd", op, join, pwdphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwdphd;


   procedure Add_pwwphd( c : in out d.Criteria; pwwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwwphd", op, join, pwwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwwphd;


   procedure Add_psdahd( c : in out d.Criteria; psdahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psdahd", op, join, psdahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_psdahd;


   procedure Add_paahd( c : in out d.Criteria; paahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paahd", op, join, paahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paahd;


   procedure Add_picahd( c : in out d.Criteria; picahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "picahd", op, join, picahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_picahd;


   procedure Add_pjsahd( c : in out d.Criteria; pjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pjsahd", op, join, pjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pjsahd;


   procedure Add_piidbhd( c : in out d.Criteria; piidbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "piidbhd", op, join, piidbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_piidbhd;


   procedure Add_pesahd( c : in out d.Criteria; pesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pesahd", op, join, pesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pesahd;


   procedure Add_pibhd( c : in out d.Criteria; pibhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pibhd", op, join, pibhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pibhd;


   procedure Add_pishd( c : in out d.Criteria; pishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pishd", op, join, pishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pishd;


   procedure Add_pmahd( c : in out d.Criteria; pmahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmahd", op, join, pmahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmahd;


   procedure Add_pothbehd( c : in out d.Criteria; pothbehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothbehd", op, join, pothbehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothbehd;


   procedure Add_ptubenhd( c : in out d.Criteria; ptubenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptubenhd", op, join, ptubenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptubenhd;


   procedure Add_pfsbenhd( c : in out d.Criteria; pfsbenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pfsbenhd", op, join, pfsbenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfsbenhd;


   procedure Add_psicinhd( c : in out d.Criteria; psicinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psicinhd", op, join, psicinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_psicinhd;


   procedure Add_paccinhd( c : in out d.Criteria; paccinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paccinhd", op, join, paccinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paccinhd;


   procedure Add_phosinhd( c : in out d.Criteria; phosinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "phosinhd", op, join, phosinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_phosinhd;


   procedure Add_pgtshd( c : in out d.Criteria; pgtshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pgtshd", op, join, pgtshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgtshd;


   procedure Add_pgahd( c : in out d.Criteria; pgahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pgahd", op, join, pgahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgahd;


   procedure Add_iwcpdhd( c : in out d.Criteria; iwcpdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "iwcpdhd", op, join, iwcpdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwcpdhd;


   procedure Add_r2wcpdhd( c : in out d.Criteria; r2wcpdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2wcpdhd", op, join, r2wcpdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wcpdhd;


   procedure Add_puninshd( c : in out d.Criteria; puninshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puninshd", op, join, puninshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_puninshd;


   procedure Add_pdsspihd( c : in out d.Criteria; pdsspihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdsspihd", op, join, pdsspihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspihd;


   procedure Add_pdsspjhd( c : in out d.Criteria; pdsspjhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdsspjhd", op, join, pdsspjhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspjhd;


   procedure Add_pexhbhd( c : in out d.Criteria; pexhbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pexhbhd", op, join, pexhbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pexhbhd;


   procedure Add_ppehinhd( c : in out d.Criteria; ppehinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppehinhd", op, join, ppehinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppehinhd;


   procedure Add_potsinhd( c : in out d.Criteria; potsinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "potsinhd", op, join, potsinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_potsinhd;


   procedure Add_pdcichd( c : in out d.Criteria; pdcichd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdcichd", op, join, pdcichd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdcichd;


   procedure Add_wwtchd( c : in out d.Criteria; wwtchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwtchd", op, join, wwtchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtchd;


   procedure Add_wctchd( c : in out d.Criteria; wctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wctchd", op, join, wctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctchd;


   procedure Add_wwtclhd( c : in out d.Criteria; wwtclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwtclhd", op, join, wwtclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtclhd;


   procedure Add_wctclhd( c : in out d.Criteria; wctclhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wctclhd", op, join, wctclhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctclhd;


   procedure Add_phbhd( c : in out d.Criteria; phbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "phbhd", op, join, phbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_phbhd;


   procedure Add_puchd( c : in out d.Criteria; puchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puchd", op, join, puchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_puchd;


   procedure Add_ppipdhd( c : in out d.Criteria; ppipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppipdhd", op, join, ppipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipdhd;


   procedure Add_ppipmhd( c : in out d.Criteria; ppipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppipmhd", op, join, ppipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipmhd;


   procedure Add_pdwpuchd( c : in out d.Criteria; pdwpuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdwpuchd", op, join, pdwpuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdwpuchd;


   procedure Add_pdlacasp( c : in out d.Criteria; pdlacasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacasp", op, join, pdlacasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacasp;


   procedure Add_pdlamosp( c : in out d.Criteria; pdlamosp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamosp", op, join, pdlamosp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamosp;


   procedure Add_pcbsp( c : in out d.Criteria; pcbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcbsp", op, join, pcbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcbsp;


   procedure Add_hpencsp( c : in out d.Criteria; hpencsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpencsp", op, join, hpencsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpencsp;


   procedure Add_prpsp( c : in out d.Criteria; prpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prpsp", op, join, prpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prpsp;


   procedure Add_pwpsp( c : in out d.Criteria; pwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpsp", op, join, pwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpsp;


   procedure Add_pwdpsp( c : in out d.Criteria; pwdpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwdpsp", op, join, pwdpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwdpsp;


   procedure Add_pwwpsp( c : in out d.Criteria; pwwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwwpsp", op, join, pwwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwwpsp;


   procedure Add_psdasp( c : in out d.Criteria; psdasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psdasp", op, join, psdasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_psdasp;


   procedure Add_paasp( c : in out d.Criteria; paasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paasp", op, join, paasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paasp;


   procedure Add_picasp( c : in out d.Criteria; picasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "picasp", op, join, picasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_picasp;


   procedure Add_pjsasp( c : in out d.Criteria; pjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pjsasp", op, join, pjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pjsasp;


   procedure Add_piidbsp( c : in out d.Criteria; piidbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "piidbsp", op, join, piidbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_piidbsp;


   procedure Add_pesasp( c : in out d.Criteria; pesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pesasp", op, join, pesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pesasp;


   procedure Add_pibsp( c : in out d.Criteria; pibsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pibsp", op, join, pibsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pibsp;


   procedure Add_pissp( c : in out d.Criteria; pissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pissp", op, join, pissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pissp;


   procedure Add_pmasp( c : in out d.Criteria; pmasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmasp", op, join, pmasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmasp;


   procedure Add_pothbesp( c : in out d.Criteria; pothbesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothbesp", op, join, pothbesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothbesp;


   procedure Add_ptubensp( c : in out d.Criteria; ptubensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptubensp", op, join, ptubensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptubensp;


   procedure Add_pfsbensp( c : in out d.Criteria; pfsbensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pfsbensp", op, join, pfsbensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfsbensp;


   procedure Add_psicinsp( c : in out d.Criteria; psicinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psicinsp", op, join, psicinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_psicinsp;


   procedure Add_paccinsp( c : in out d.Criteria; paccinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paccinsp", op, join, paccinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paccinsp;


   procedure Add_phosinsp( c : in out d.Criteria; phosinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "phosinsp", op, join, phosinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_phosinsp;


   procedure Add_pgtssp( c : in out d.Criteria; pgtssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pgtssp", op, join, pgtssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgtssp;


   procedure Add_pgasp( c : in out d.Criteria; pgasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pgasp", op, join, pgasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgasp;


   procedure Add_iwcpdsp( c : in out d.Criteria; iwcpdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "iwcpdsp", op, join, iwcpdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwcpdsp;


   procedure Add_r2wcpdsp( c : in out d.Criteria; r2wcpdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2wcpdsp", op, join, r2wcpdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wcpdsp;


   procedure Add_puninssp( c : in out d.Criteria; puninssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puninssp", op, join, puninssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_puninssp;


   procedure Add_pdsspisp( c : in out d.Criteria; pdsspisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdsspisp", op, join, pdsspisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspisp;


   procedure Add_pdsspjsp( c : in out d.Criteria; pdsspjsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdsspjsp", op, join, pdsspjsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspjsp;


   procedure Add_pexhbsp( c : in out d.Criteria; pexhbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pexhbsp", op, join, pexhbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pexhbsp;


   procedure Add_ppehinsp( c : in out d.Criteria; ppehinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppehinsp", op, join, ppehinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppehinsp;


   procedure Add_potsinsp( c : in out d.Criteria; potsinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "potsinsp", op, join, potsinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_potsinsp;


   procedure Add_pdcicsp( c : in out d.Criteria; pdcicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdcicsp", op, join, pdcicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdcicsp;


   procedure Add_wwtcsp( c : in out d.Criteria; wwtcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwtcsp", op, join, wwtcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtcsp;


   procedure Add_wctcsp( c : in out d.Criteria; wctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wctcsp", op, join, wctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctcsp;


   procedure Add_wwtclsp( c : in out d.Criteria; wwtclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwtclsp", op, join, wwtclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtclsp;


   procedure Add_wctclsp( c : in out d.Criteria; wctclsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wctclsp", op, join, wctclsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctclsp;


   procedure Add_phbsp( c : in out d.Criteria; phbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "phbsp", op, join, phbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_phbsp;


   procedure Add_pucsp( c : in out d.Criteria; pucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pucsp", op, join, pucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pucsp;


   procedure Add_ppipdsp( c : in out d.Criteria; ppipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppipdsp", op, join, ppipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipdsp;


   procedure Add_ppipmsp( c : in out d.Criteria; ppipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppipmsp", op, join, ppipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipmsp;


   procedure Add_pdwpucsp( c : in out d.Criteria; pdwpucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdwpucsp", op, join, pdwpucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdwpucsp;


   procedure Add_cbpayehd( c : in out d.Criteria; cbpayehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbpayehd", op, join, cbpayehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbpayehd;


   procedure Add_cbpayesp( c : in out d.Criteria; cbpayesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbpayesp", op, join, cbpayesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbpayesp;


   procedure Add_cbtaxhd( c : in out d.Criteria; cbtaxhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbtaxhd", op, join, cbtaxhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbtaxhd;


   procedure Add_cbtaxsp( c : in out d.Criteria; cbtaxsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbtaxsp", op, join, cbtaxsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbtaxsp;


   procedure Add_pwtchd( c : in out d.Criteria; pwtchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwtchd", op, join, pwtchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwtchd;


   procedure Add_pctchd( c : in out d.Criteria; pctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pctchd", op, join, pctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pctchd;


   procedure Add_pwtcsp( c : in out d.Criteria; pwtcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwtcsp", op, join, pwtcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwtcsp;


   procedure Add_pctcsp( c : in out d.Criteria; pctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pctcsp", op, join, pctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pctcsp;


   procedure Add_npcamthd( c : in out d.Criteria; npcamthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "npcamthd", op, join, npcamthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_npcamthd;


   procedure Add_urphd( c : in out d.Criteria; urphd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "urphd", op, join, Long_Float( urphd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_urphd;


   procedure Add_uwphd( c : in out d.Criteria; uwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uwphd", op, join, uwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwphd;


   procedure Add_uesahd( c : in out d.Criteria; uesahd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uesahd", op, join, Long_Float( uesahd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uesahd;


   procedure Add_uishd( c : in out d.Criteria; uishd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uishd", op, join, Long_Float( uishd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uishd;


   procedure Add_uwtchd( c : in out d.Criteria; uwtchd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uwtchd", op, join, Long_Float( uwtchd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwtchd;


   procedure Add_uctchd( c : in out d.Criteria; uctchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uctchd", op, join, uctchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uctchd;


   procedure Add_npcamtsp( c : in out d.Criteria; npcamtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "npcamtsp", op, join, npcamtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_npcamtsp;


   procedure Add_urpsp( c : in out d.Criteria; urpsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "urpsp", op, join, Long_Float( urpsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_urpsp;


   procedure Add_uwpsp( c : in out d.Criteria; uwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uwpsp", op, join, uwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwpsp;


   procedure Add_uesasp( c : in out d.Criteria; uesasp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uesasp", op, join, Long_Float( uesasp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uesasp;


   procedure Add_uissp( c : in out d.Criteria; uissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uissp", op, join, uissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uissp;


   procedure Add_uwtcsp( c : in out d.Criteria; uwtcsp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uwtcsp", op, join, Long_Float( uwtcsp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwtcsp;


   procedure Add_uctcsp( c : in out d.Criteria; uctcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uctcsp", op, join, uctcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uctcsp;


   procedure Add_dmpenchd( c : in out d.Criteria; dmpenchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpenchd", op, join, dmpenchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpenchd;


   procedure Add_purphd( c : in out d.Criteria; purphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "purphd", op, join, purphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_purphd;


   procedure Add_puwphd( c : in out d.Criteria; puwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puwphd", op, join, puwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_puwphd;


   procedure Add_nupesahd( c : in out d.Criteria; nupesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nupesahd", op, join, nupesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nupesahd;


   procedure Add_puishd( c : in out d.Criteria; puishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puishd", op, join, puishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_puishd;


   procedure Add_dmpencsp( c : in out d.Criteria; dmpencsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpencsp", op, join, dmpencsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpencsp;


   procedure Add_purpsp( c : in out d.Criteria; purpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "purpsp", op, join, purpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_purpsp;


   procedure Add_puwpsp( c : in out d.Criteria; puwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puwpsp", op, join, puwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_puwpsp;


   procedure Add_nupesasp( c : in out d.Criteria; nupesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nupesasp", op, join, nupesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nupesasp;


   procedure Add_puissp( c : in out d.Criteria; puissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "puissp", op, join, puissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_puissp;


   procedure Add_wjsahd( c : in out d.Criteria; wjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wjsahd", op, join, wjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wjsahd;


   procedure Add_wesahd( c : in out d.Criteria; wesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wesahd", op, join, wesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wesahd;


   procedure Add_wishd( c : in out d.Criteria; wishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wishd", op, join, wishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wishd;


   procedure Add_wothbehd( c : in out d.Criteria; wothbehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wothbehd", op, join, wothbehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wothbehd;


   procedure Add_wtubenhd( c : in out d.Criteria; wtubenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wtubenhd", op, join, wtubenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtubenhd;


   procedure Add_wfsbenhd( c : in out d.Criteria; wfsbenhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wfsbenhd", op, join, wfsbenhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfsbenhd;


   procedure Add_wsicinhd( c : in out d.Criteria; wsicinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsicinhd", op, join, wsicinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsicinhd;


   procedure Add_waccinhd( c : in out d.Criteria; waccinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "waccinhd", op, join, waccinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_waccinhd;


   procedure Add_whosinhd( c : in out d.Criteria; whosinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whosinhd", op, join, whosinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whosinhd;


   procedure Add_wkiwchd( c : in out d.Criteria; wkiwchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wkiwchd", op, join, wkiwchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkiwchd;


   procedure Add_wkr2whd( c : in out d.Criteria; wkr2whd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wkr2whd", op, join, wkr2whd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkr2whd;


   procedure Add_wuninshd( c : in out d.Criteria; wuninshd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wuninshd", op, join, wuninshd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wuninshd;


   procedure Add_wpehinhd( c : in out d.Criteria; wpehinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpehinhd", op, join, wpehinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpehinhd;


   procedure Add_wotsinhd( c : in out d.Criteria; wotsinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wotsinhd", op, join, wotsinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wotsinhd;


   procedure Add_wocichd( c : in out d.Criteria; wocichd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wocichd", op, join, wocichd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wocichd;


   procedure Add_whbhd( c : in out d.Criteria; whbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whbhd", op, join, whbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whbhd;


   procedure Add_wjsasp( c : in out d.Criteria; wjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wjsasp", op, join, wjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wjsasp;


   procedure Add_wesasp( c : in out d.Criteria; wesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wesasp", op, join, wesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wesasp;


   procedure Add_wissp( c : in out d.Criteria; wissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wissp", op, join, wissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wissp;


   procedure Add_wothbesp( c : in out d.Criteria; wothbesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wothbesp", op, join, wothbesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wothbesp;


   procedure Add_wtubensp( c : in out d.Criteria; wtubensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wtubensp", op, join, wtubensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtubensp;


   procedure Add_wfsbensp( c : in out d.Criteria; wfsbensp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wfsbensp", op, join, wfsbensp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfsbensp;


   procedure Add_wsicinsp( c : in out d.Criteria; wsicinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsicinsp", op, join, wsicinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsicinsp;


   procedure Add_waccinsp( c : in out d.Criteria; waccinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "waccinsp", op, join, waccinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_waccinsp;


   procedure Add_whosinsp( c : in out d.Criteria; whosinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whosinsp", op, join, whosinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whosinsp;


   procedure Add_wkiwcsp( c : in out d.Criteria; wkiwcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wkiwcsp", op, join, wkiwcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkiwcsp;


   procedure Add_wkr2wsp( c : in out d.Criteria; wkr2wsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wkr2wsp", op, join, wkr2wsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkr2wsp;


   procedure Add_wuninssp( c : in out d.Criteria; wuninssp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wuninssp", op, join, wuninssp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wuninssp;


   procedure Add_wpehinsp( c : in out d.Criteria; wpehinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpehinsp", op, join, wpehinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpehinsp;


   procedure Add_wotsinsp( c : in out d.Criteria; wotsinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wotsinsp", op, join, wotsinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wotsinsp;


   procedure Add_wocicsp( c : in out d.Criteria; wocicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wocicsp", op, join, wocicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wocicsp;


   procedure Add_whbsp( c : in out d.Criteria; whbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whbsp", op, join, whbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whbsp;


   procedure Add_yjsahd( c : in out d.Criteria; yjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjsahd", op, join, yjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjsahd;


   procedure Add_yesahd( c : in out d.Criteria; yesahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yesahd", op, join, yesahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yesahd;


   procedure Add_yishd( c : in out d.Criteria; yishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yishd", op, join, yishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yishd;


   procedure Add_yhbhd( c : in out d.Criteria; yhbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yhbhd", op, join, yhbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yhbhd;


   procedure Add_yjsasp( c : in out d.Criteria; yjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjsasp", op, join, yjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjsasp;


   procedure Add_yesasp( c : in out d.Criteria; yesasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yesasp", op, join, yesasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yesasp;


   procedure Add_yissp( c : in out d.Criteria; yissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yissp", op, join, yissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yissp;


   procedure Add_yhbsp( c : in out d.Criteria; yhbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yhbsp", op, join, yhbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yhbsp;


   procedure Add_prothbhd( c : in out d.Criteria; prothbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prothbhd", op, join, prothbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prothbhd;


   procedure Add_prtubehd( c : in out d.Criteria; prtubehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prtubehd", op, join, prtubehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prtubehd;


   procedure Add_prfsbehd( c : in out d.Criteria; prfsbehd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prfsbehd", op, join, prfsbehd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prfsbehd;


   procedure Add_prsicihd( c : in out d.Criteria; prsicihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsicihd", op, join, prsicihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsicihd;


   procedure Add_praccihd( c : in out d.Criteria; praccihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "praccihd", op, join, praccihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_praccihd;


   procedure Add_prhosihd( c : in out d.Criteria; prhosihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prhosihd", op, join, prhosihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prhosihd;


   procedure Add_pruninhd( c : in out d.Criteria; pruninhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pruninhd", op, join, pruninhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pruninhd;


   procedure Add_prphinhd( c : in out d.Criteria; prphinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prphinhd", op, join, prphinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prphinhd;


   procedure Add_prosinhd( c : in out d.Criteria; prosinhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prosinhd", op, join, prosinhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prosinhd;


   procedure Add_prcichd( c : in out d.Criteria; prcichd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prcichd", op, join, prcichd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prcichd;


   procedure Add_prothbsp( c : in out d.Criteria; prothbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prothbsp", op, join, prothbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prothbsp;


   procedure Add_prtubesp( c : in out d.Criteria; prtubesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prtubesp", op, join, prtubesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prtubesp;


   procedure Add_prfsbesp( c : in out d.Criteria; prfsbesp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prfsbesp", op, join, prfsbesp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prfsbesp;


   procedure Add_prsicisp( c : in out d.Criteria; prsicisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsicisp", op, join, prsicisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsicisp;


   procedure Add_praccisp( c : in out d.Criteria; praccisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "praccisp", op, join, praccisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_praccisp;


   procedure Add_prhosisp( c : in out d.Criteria; prhosisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prhosisp", op, join, prhosisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prhosisp;


   procedure Add_pruninsp( c : in out d.Criteria; pruninsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pruninsp", op, join, pruninsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pruninsp;


   procedure Add_prphinsp( c : in out d.Criteria; prphinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prphinsp", op, join, prphinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prphinsp;


   procedure Add_prosinsp( c : in out d.Criteria; prosinsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prosinsp", op, join, prosinsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prosinsp;


   procedure Add_prcicsp( c : in out d.Criteria; prcicsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prcicsp", op, join, prcicsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prcicsp;


   procedure Add_uspenchd( c : in out d.Criteria; uspenchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspenchd", op, join, uspenchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspenchd;


   procedure Add_usrphd( c : in out d.Criteria; usrphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usrphd", op, join, usrphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usrphd;


   procedure Add_uswphd( c : in out d.Criteria; uswphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uswphd", op, join, uswphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uswphd;


   procedure Add_usjsahd( c : in out d.Criteria; usjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usjsahd", op, join, usjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usjsahd;


   procedure Add_usishd( c : in out d.Criteria; usishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usishd", op, join, usishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usishd;


   procedure Add_uspencsp( c : in out d.Criteria; uspencsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspencsp", op, join, uspencsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspencsp;


   procedure Add_usrpsp( c : in out d.Criteria; usrpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usrpsp", op, join, usrpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usrpsp;


   procedure Add_uswpsp( c : in out d.Criteria; uswpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uswpsp", op, join, uswpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uswpsp;


   procedure Add_usjsasp( c : in out d.Criteria; usjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usjsasp", op, join, usjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usjsasp;


   procedure Add_usissp( c : in out d.Criteria; usissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usissp", op, join, usissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usissp;


   procedure Add_gicacahd( c : in out d.Criteria; gicacahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gicacahd", op, join, gicacahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicacahd;


   procedure Add_pencrdhd( c : in out d.Criteria; pencrdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pencrdhd", op, join, pencrdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pencrdhd;


   procedure Add_gicaahd( c : in out d.Criteria; gicaahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gicaahd", op, join, gicaahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicaahd;


   procedure Add_muibwhd( c : in out d.Criteria; muibwhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "muibwhd", op, join, muibwhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_muibwhd;


   procedure Add_wfuelhd( c : in out d.Criteria; wfuelhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wfuelhd", op, join, wfuelhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfuelhd;


   procedure Add_exhbtyhd( c : in out d.Criteria; exhbtyhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exhbtyhd", op, join, exhbtyhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbtyhd;


   procedure Add_lnodwphd( c : in out d.Criteria; lnodwphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lnodwphd", op, join, lnodwphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnodwphd;


   procedure Add_lnolahd( c : in out d.Criteria; lnolahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lnolahd", op, join, lnolahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnolahd;


   procedure Add_gicacasp( c : in out d.Criteria; gicacasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gicacasp", op, join, gicacasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicacasp;


   procedure Add_pencrdsp( c : in out d.Criteria; pencrdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pencrdsp", op, join, pencrdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pencrdsp;


   procedure Add_gicaasp( c : in out d.Criteria; gicaasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gicaasp", op, join, gicaasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicaasp;


   procedure Add_muibwsp( c : in out d.Criteria; muibwsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "muibwsp", op, join, muibwsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_muibwsp;


   procedure Add_wfuelsp( c : in out d.Criteria; wfuelsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wfuelsp", op, join, wfuelsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfuelsp;


   procedure Add_exhbtysp( c : in out d.Criteria; exhbtysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exhbtysp", op, join, exhbtysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbtysp;


   procedure Add_lnodwpsp( c : in out d.Criteria; lnodwpsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lnodwpsp", op, join, lnodwpsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnodwpsp;


   procedure Add_lnolasp( c : in out d.Criteria; lnolasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lnolasp", op, join, lnolasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnolasp;


   procedure Add_dcpayhd( c : in out d.Criteria; dcpayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayhd", op, join, dcpayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayhd;


   procedure Add_dmpayhd( c : in out d.Criteria; dmpayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayhd", op, join, dmpayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayhd;


   procedure Add_ecpenchd( c : in out d.Criteria; ecpenchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ecpenchd", op, join, ecpenchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ecpenchd;


   procedure Add_wporbahd( c : in out d.Criteria; wporbahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wporbahd", op, join, wporbahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wporbahd;


   procedure Add_aapayhd( c : in out d.Criteria; aapayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aapayhd", op, join, aapayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aapayhd;


   procedure Add_jsatyphd( c : in out d.Criteria; jsatyphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jsatyphd", op, join, jsatyphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsatyphd;


   procedure Add_esatyphd( c : in out d.Criteria; esatyphd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "esatyphd", op, join, esatyphd );
   begin
      d.add_to_criteria( c, elem );
   end Add_esatyphd;


   procedure Add_mupibhd( c : in out d.Criteria; mupibhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mupibhd", op, join, mupibhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mupibhd;


   procedure Add_dssishd( c : in out d.Criteria; dssishd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssishd", op, join, dssishd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssishd;


   procedure Add_dssjsahd( c : in out d.Criteria; dssjsahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssjsahd", op, join, dssjsahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssjsahd;


   procedure Add_sfincihd( c : in out d.Criteria; sfincihd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfincihd", op, join, sfincihd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincihd;


   procedure Add_sfincjhd( c : in out d.Criteria; sfincjhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfincjhd", op, join, sfincjhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincjhd;


   procedure Add_pdlpayhd( c : in out d.Criteria; pdlpayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlpayhd", op, join, pdlpayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlpayhd;


   procedure Add_pmpayhd( c : in out d.Criteria; pmpayhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmpayhd", op, join, pmpayhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmpayhd;


   procedure Add_dwpuchd( c : in out d.Criteria; dwpuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dwpuchd", op, join, dwpuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpuchd;


   procedure Add_sfinuchd( c : in out d.Criteria; sfinuchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfinuchd", op, join, sfinuchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfinuchd;


   procedure Add_dcpaysp( c : in out d.Criteria; dcpaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpaysp", op, join, dcpaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpaysp;


   procedure Add_dmpaysp( c : in out d.Criteria; dmpaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpaysp", op, join, dmpaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpaysp;


   procedure Add_ecpencsp( c : in out d.Criteria; ecpencsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ecpencsp", op, join, ecpencsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ecpencsp;


   procedure Add_wporbasp( c : in out d.Criteria; wporbasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wporbasp", op, join, wporbasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wporbasp;


   procedure Add_aapaysp( c : in out d.Criteria; aapaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aapaysp", op, join, aapaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aapaysp;


   procedure Add_jsatypsp( c : in out d.Criteria; jsatypsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jsatypsp", op, join, jsatypsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsatypsp;


   procedure Add_esatypsp( c : in out d.Criteria; esatypsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "esatypsp", op, join, esatypsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_esatypsp;


   procedure Add_mupibsp( c : in out d.Criteria; mupibsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mupibsp", op, join, mupibsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mupibsp;


   procedure Add_dssissp( c : in out d.Criteria; dssissp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssissp", op, join, dssissp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssissp;


   procedure Add_dssjsasp( c : in out d.Criteria; dssjsasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dssjsasp", op, join, dssjsasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssjsasp;


   procedure Add_sfincisp( c : in out d.Criteria; sfincisp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfincisp", op, join, sfincisp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincisp;


   procedure Add_sfincjsp( c : in out d.Criteria; sfincjsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfincjsp", op, join, sfincjsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincjsp;


   procedure Add_pdlpaysp( c : in out d.Criteria; pdlpaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlpaysp", op, join, pdlpaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlpaysp;


   procedure Add_pmpaysp( c : in out d.Criteria; pmpaysp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmpaysp", op, join, pmpaysp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmpaysp;


   procedure Add_dwpucsp( c : in out d.Criteria; dwpucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dwpucsp", op, join, dwpucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpucsp;


   procedure Add_sfinucsp( c : in out d.Criteria; sfinucsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfinucsp", op, join, sfinucsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfinucsp;


   procedure Add_icaperhd( c : in out d.Criteria; icaperhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "icaperhd", op, join, icaperhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_icaperhd;


   procedure Add_pmuibhd( c : in out d.Criteria; pmuibhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmuibhd", op, join, pmuibhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmuibhd;


   procedure Add_pipmothd( c : in out d.Criteria; pipmothd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pipmothd", op, join, pipmothd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmothd;


   procedure Add_icapersp( c : in out d.Criteria; icapersp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "icapersp", op, join, icapersp );
   begin
      d.add_to_criteria( c, elem );
   end Add_icapersp;


   procedure Add_pmuibsp( c : in out d.Criteria; pmuibsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmuibsp", op, join, pmuibsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmuibsp;


   procedure Add_pipmotsp( c : in out d.Criteria; pipmotsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pipmotsp", op, join, pipmotsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmotsp;


   procedure Add_r1dlchd( c : in out d.Criteria; r1dlchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlchd", op, join, r1dlchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlchd;


   procedure Add_r1dlmhd( c : in out d.Criteria; r1dlmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmhd", op, join, r1dlmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmhd;


   procedure Add_r1aahd( c : in out d.Criteria; r1aahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1aahd", op, join, r1aahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1aahd;


   procedure Add_r1hbhd( c : in out d.Criteria; r1hbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1hbhd", op, join, r1hbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1hbhd;


   procedure Add_r1pipdhd( c : in out d.Criteria; r1pipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1pipdhd", op, join, r1pipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipdhd;


   procedure Add_r1pipmhd( c : in out d.Criteria; r1pipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1pipmhd", op, join, r1pipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipmhd;


   procedure Add_r1dlcsp( c : in out d.Criteria; r1dlcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcsp", op, join, r1dlcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcsp;


   procedure Add_r1dlmsp( c : in out d.Criteria; r1dlmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmsp", op, join, r1dlmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmsp;


   procedure Add_r1aasp( c : in out d.Criteria; r1aasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1aasp", op, join, r1aasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1aasp;


   procedure Add_r1hbsp( c : in out d.Criteria; r1hbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1hbsp", op, join, r1hbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1hbsp;


   procedure Add_r1pipdsp( c : in out d.Criteria; r1pipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1pipdsp", op, join, r1pipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipdsp;


   procedure Add_r1pipmsp( c : in out d.Criteria; r1pipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1pipmsp", op, join, r1pipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipmsp;


   procedure Add_r2dlchd( c : in out d.Criteria; r2dlchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlchd", op, join, r2dlchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlchd;


   procedure Add_r2dlmhd( c : in out d.Criteria; r2dlmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmhd", op, join, r2dlmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmhd;


   procedure Add_r2aahd( c : in out d.Criteria; r2aahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2aahd", op, join, r2aahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2aahd;


   procedure Add_r2hbhd( c : in out d.Criteria; r2hbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2hbhd", op, join, r2hbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2hbhd;


   procedure Add_r2pipdhd( c : in out d.Criteria; r2pipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2pipdhd", op, join, r2pipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipdhd;


   procedure Add_r2pipmhd( c : in out d.Criteria; r2pipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2pipmhd", op, join, r2pipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipmhd;


   procedure Add_r2dlcsp( c : in out d.Criteria; r2dlcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcsp", op, join, r2dlcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcsp;


   procedure Add_r2dlmsp( c : in out d.Criteria; r2dlmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmsp", op, join, r2dlmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmsp;


   procedure Add_r2aasp( c : in out d.Criteria; r2aasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2aasp", op, join, r2aasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2aasp;


   procedure Add_r2hbsp( c : in out d.Criteria; r2hbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2hbsp", op, join, r2hbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2hbsp;


   procedure Add_r2pipdsp( c : in out d.Criteria; r2pipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2pipdsp", op, join, r2pipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipdsp;


   procedure Add_r2pipmsp( c : in out d.Criteria; r2pipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2pipmsp", op, join, r2pipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipmsp;


   procedure Add_r3dlchd( c : in out d.Criteria; r3dlchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlchd", op, join, r3dlchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlchd;


   procedure Add_r3dlmhd( c : in out d.Criteria; r3dlmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmhd", op, join, r3dlmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmhd;


   procedure Add_r3aahd( c : in out d.Criteria; r3aahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3aahd", op, join, r3aahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3aahd;


   procedure Add_r3hbhd( c : in out d.Criteria; r3hbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3hbhd", op, join, r3hbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3hbhd;


   procedure Add_r3pipdhd( c : in out d.Criteria; r3pipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3pipdhd", op, join, r3pipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipdhd;


   procedure Add_r3pipmhd( c : in out d.Criteria; r3pipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3pipmhd", op, join, r3pipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipmhd;


   procedure Add_r3dlcsp( c : in out d.Criteria; r3dlcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcsp", op, join, r3dlcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcsp;


   procedure Add_r3dlmsp( c : in out d.Criteria; r3dlmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmsp", op, join, r3dlmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmsp;


   procedure Add_r3aasp( c : in out d.Criteria; r3aasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3aasp", op, join, r3aasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3aasp;


   procedure Add_r3hbsp( c : in out d.Criteria; r3hbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3hbsp", op, join, r3hbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3hbsp;


   procedure Add_r3pipdsp( c : in out d.Criteria; r3pipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3pipdsp", op, join, r3pipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipdsp;


   procedure Add_r3pipmsp( c : in out d.Criteria; r3pipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3pipmsp", op, join, r3pipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipmsp;


   procedure Add_r4dlchd( c : in out d.Criteria; r4dlchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlchd", op, join, r4dlchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlchd;


   procedure Add_r4dlmhd( c : in out d.Criteria; r4dlmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmhd", op, join, r4dlmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmhd;


   procedure Add_r4aahd( c : in out d.Criteria; r4aahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4aahd", op, join, r4aahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4aahd;


   procedure Add_r4hbhd( c : in out d.Criteria; r4hbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4hbhd", op, join, r4hbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4hbhd;


   procedure Add_r4pipdhd( c : in out d.Criteria; r4pipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4pipdhd", op, join, r4pipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipdhd;


   procedure Add_r4pipmhd( c : in out d.Criteria; r4pipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4pipmhd", op, join, r4pipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipmhd;


   procedure Add_r4dlcsp( c : in out d.Criteria; r4dlcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcsp", op, join, r4dlcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcsp;


   procedure Add_r4dlmsp( c : in out d.Criteria; r4dlmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmsp", op, join, r4dlmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmsp;


   procedure Add_r4aasp( c : in out d.Criteria; r4aasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4aasp", op, join, r4aasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4aasp;


   procedure Add_r4hbsp( c : in out d.Criteria; r4hbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4hbsp", op, join, r4hbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4hbsp;


   procedure Add_r4pipdsp( c : in out d.Criteria; r4pipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4pipdsp", op, join, r4pipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipdsp;


   procedure Add_r4pipmsp( c : in out d.Criteria; r4pipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4pipmsp", op, join, r4pipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipmsp;


   procedure Add_r5dlchd( c : in out d.Criteria; r5dlchd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlchd", op, join, r5dlchd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlchd;


   procedure Add_r5dlmhd( c : in out d.Criteria; r5dlmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmhd", op, join, r5dlmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmhd;


   procedure Add_r5aahd( c : in out d.Criteria; r5aahd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5aahd", op, join, r5aahd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5aahd;


   procedure Add_r5hbhd( c : in out d.Criteria; r5hbhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5hbhd", op, join, r5hbhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5hbhd;


   procedure Add_r5pipdhd( c : in out d.Criteria; r5pipdhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5pipdhd", op, join, r5pipdhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipdhd;


   procedure Add_r5pipmhd( c : in out d.Criteria; r5pipmhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5pipmhd", op, join, r5pipmhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipmhd;


   procedure Add_r5dlcsp( c : in out d.Criteria; r5dlcsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcsp", op, join, r5dlcsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcsp;


   procedure Add_r5dlmsp( c : in out d.Criteria; r5dlmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmsp", op, join, r5dlmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmsp;


   procedure Add_r5aasp( c : in out d.Criteria; r5aasp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5aasp", op, join, r5aasp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5aasp;


   procedure Add_r5hbsp( c : in out d.Criteria; r5hbsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5hbsp", op, join, r5hbsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5hbsp;


   procedure Add_r5pipdsp( c : in out d.Criteria; r5pipdsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5pipdsp", op, join, r5pipdsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipdsp;


   procedure Add_r5pipmsp( c : in out d.Criteria; r5pipmsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5pipmsp", op, join, r5pipmsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipmsp;


   procedure Add_stdlacc1( c : in out d.Criteria; stdlacc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc1", op, join, stdlacc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc1;


   procedure Add_stdlamc1( c : in out d.Criteria; stdlamc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc1", op, join, stdlamc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc1;


   procedure Add_stdlacc2( c : in out d.Criteria; stdlacc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc2", op, join, stdlacc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc2;


   procedure Add_stdlamc2( c : in out d.Criteria; stdlamc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc2", op, join, stdlamc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc2;


   procedure Add_stdlacc3( c : in out d.Criteria; stdlacc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc3", op, join, stdlacc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc3;


   procedure Add_stdlamc3( c : in out d.Criteria; stdlamc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc3", op, join, stdlamc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc3;


   procedure Add_stdlacc4( c : in out d.Criteria; stdlacc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc4", op, join, stdlacc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc4;


   procedure Add_stdlamc4( c : in out d.Criteria; stdlamc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc4", op, join, stdlamc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc4;


   procedure Add_stdlacc5( c : in out d.Criteria; stdlacc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc5", op, join, stdlacc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc5;


   procedure Add_stdlamc5( c : in out d.Criteria; stdlamc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc5", op, join, stdlamc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc5;


   procedure Add_stdlacc6( c : in out d.Criteria; stdlacc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc6", op, join, stdlacc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc6;


   procedure Add_stdlamc6( c : in out d.Criteria; stdlamc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc6", op, join, stdlamc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc6;


   procedure Add_stdlacc7( c : in out d.Criteria; stdlacc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc7", op, join, stdlacc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc7;


   procedure Add_stdlamc7( c : in out d.Criteria; stdlamc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc7", op, join, stdlamc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc7;


   procedure Add_stdlacc8( c : in out d.Criteria; stdlacc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc8", op, join, stdlacc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc8;


   procedure Add_stdlamc8( c : in out d.Criteria; stdlamc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc8", op, join, stdlamc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc8;


   procedure Add_stdlacc9( c : in out d.Criteria; stdlacc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlacc9", op, join, stdlacc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc9;


   procedure Add_stdlamc9( c : in out d.Criteria; stdlamc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stdlamc9", op, join, stdlamc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc9;


   procedure Add_dlacac1( c : in out d.Criteria; dlacac1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac1", op, join, Long_Float( dlacac1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac1;


   procedure Add_dlamoc1( c : in out d.Criteria; dlamoc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc1", op, join, Long_Float( dlamoc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc1;


   procedure Add_dlacac2( c : in out d.Criteria; dlacac2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac2", op, join, Long_Float( dlacac2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac2;


   procedure Add_dlamoc2( c : in out d.Criteria; dlamoc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc2", op, join, Long_Float( dlamoc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc2;


   procedure Add_dlacac3( c : in out d.Criteria; dlacac3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac3", op, join, dlacac3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac3;


   procedure Add_dlamoc3( c : in out d.Criteria; dlamoc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc3", op, join, dlamoc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc3;


   procedure Add_dlacac4( c : in out d.Criteria; dlacac4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac4", op, join, dlacac4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac4;


   procedure Add_dlamoc4( c : in out d.Criteria; dlamoc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc4", op, join, dlamoc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc4;


   procedure Add_dlacac5( c : in out d.Criteria; dlacac5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac5", op, join, dlacac5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac5;


   procedure Add_dlamoc5( c : in out d.Criteria; dlamoc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc5", op, join, dlamoc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc5;


   procedure Add_dlacac6( c : in out d.Criteria; dlacac6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac6", op, join, dlacac6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac6;


   procedure Add_dlamoc6( c : in out d.Criteria; dlamoc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc6", op, join, dlamoc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc6;


   procedure Add_dlacac7( c : in out d.Criteria; dlacac7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac7", op, join, dlacac7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac7;


   procedure Add_dlamoc7( c : in out d.Criteria; dlamoc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc7", op, join, dlamoc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc7;


   procedure Add_dlacac8( c : in out d.Criteria; dlacac8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac8", op, join, dlacac8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac8;


   procedure Add_dlamoc8( c : in out d.Criteria; dlamoc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc8", op, join, dlamoc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc8;


   procedure Add_dlacac9( c : in out d.Criteria; dlacac9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlacac9", op, join, dlacac9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac9;


   procedure Add_dlamoc9( c : in out d.Criteria; dlamoc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dlamoc9", op, join, dlamoc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc9;


   procedure Add_ltdlacc1( c : in out d.Criteria; ltdlacc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc1", op, join, ltdlacc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc1;


   procedure Add_ltdlamc1( c : in out d.Criteria; ltdlamc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc1", op, join, ltdlamc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc1;


   procedure Add_ltdlacc2( c : in out d.Criteria; ltdlacc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc2", op, join, ltdlacc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc2;


   procedure Add_ltdlamc2( c : in out d.Criteria; ltdlamc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc2", op, join, ltdlamc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc2;


   procedure Add_ltdlacc3( c : in out d.Criteria; ltdlacc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc3", op, join, ltdlacc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc3;


   procedure Add_ltdlamc3( c : in out d.Criteria; ltdlamc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc3", op, join, ltdlamc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc3;


   procedure Add_ltdlacc4( c : in out d.Criteria; ltdlacc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc4", op, join, ltdlacc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc4;


   procedure Add_ltdlamc4( c : in out d.Criteria; ltdlamc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc4", op, join, ltdlamc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc4;


   procedure Add_ltdlacc5( c : in out d.Criteria; ltdlacc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc5", op, join, ltdlacc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc5;


   procedure Add_ltdlamc5( c : in out d.Criteria; ltdlamc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc5", op, join, ltdlamc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc5;


   procedure Add_ltdlacc6( c : in out d.Criteria; ltdlacc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc6", op, join, ltdlacc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc6;


   procedure Add_ltdlamc6( c : in out d.Criteria; ltdlamc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc6", op, join, ltdlamc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc6;


   procedure Add_ltdlacc7( c : in out d.Criteria; ltdlacc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc7", op, join, ltdlacc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc7;


   procedure Add_ltdlamc7( c : in out d.Criteria; ltdlamc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc7", op, join, ltdlamc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc7;


   procedure Add_ltdlacc8( c : in out d.Criteria; ltdlacc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc8", op, join, ltdlacc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc8;


   procedure Add_ltdlamc8( c : in out d.Criteria; ltdlamc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc8", op, join, ltdlamc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc8;


   procedure Add_ltdlacc9( c : in out d.Criteria; ltdlacc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlacc9", op, join, ltdlacc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc9;


   procedure Add_ltdlamc9( c : in out d.Criteria; ltdlamc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ltdlamc9", op, join, ltdlamc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc9;


   procedure Add_pdlacac1( c : in out d.Criteria; pdlacac1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac1", op, join, pdlacac1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac1;


   procedure Add_pdlamoc1( c : in out d.Criteria; pdlamoc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc1", op, join, pdlamoc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc1;


   procedure Add_pdlacac2( c : in out d.Criteria; pdlacac2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac2", op, join, pdlacac2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac2;


   procedure Add_pdlamoc2( c : in out d.Criteria; pdlamoc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc2", op, join, pdlamoc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc2;


   procedure Add_pdlacac3( c : in out d.Criteria; pdlacac3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac3", op, join, pdlacac3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac3;


   procedure Add_pdlamoc3( c : in out d.Criteria; pdlamoc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc3", op, join, pdlamoc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc3;


   procedure Add_pdlacac4( c : in out d.Criteria; pdlacac4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac4", op, join, pdlacac4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac4;


   procedure Add_pdlamoc4( c : in out d.Criteria; pdlamoc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc4", op, join, pdlamoc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc4;


   procedure Add_pdlacac5( c : in out d.Criteria; pdlacac5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac5", op, join, pdlacac5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac5;


   procedure Add_pdlamoc5( c : in out d.Criteria; pdlamoc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc5", op, join, pdlamoc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc5;


   procedure Add_pdlacac6( c : in out d.Criteria; pdlacac6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac6", op, join, pdlacac6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac6;


   procedure Add_pdlamoc6( c : in out d.Criteria; pdlamoc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc6", op, join, pdlamoc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc6;


   procedure Add_pdlacac7( c : in out d.Criteria; pdlacac7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac7", op, join, pdlacac7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac7;


   procedure Add_pdlamoc7( c : in out d.Criteria; pdlamoc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc7", op, join, pdlamoc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc7;


   procedure Add_pdlacac8( c : in out d.Criteria; pdlacac8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac8", op, join, pdlacac8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac8;


   procedure Add_pdlamoc8( c : in out d.Criteria; pdlamoc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc8", op, join, pdlamoc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc8;


   procedure Add_pdlacac9( c : in out d.Criteria; pdlacac9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlacac9", op, join, pdlacac9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac9;


   procedure Add_pdlamoc9( c : in out d.Criteria; pdlamoc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdlamoc9", op, join, pdlamoc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc9;


   procedure Add_dcpayc1( c : in out d.Criteria; dcpayc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc1", op, join, dcpayc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc1;


   procedure Add_dmpayc1( c : in out d.Criteria; dmpayc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc1", op, join, dmpayc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc1;


   procedure Add_dcpayc2( c : in out d.Criteria; dcpayc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc2", op, join, dcpayc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc2;


   procedure Add_dmpayc2( c : in out d.Criteria; dmpayc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc2", op, join, dmpayc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc2;


   procedure Add_dcpayc3( c : in out d.Criteria; dcpayc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc3", op, join, dcpayc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc3;


   procedure Add_dmpayc3( c : in out d.Criteria; dmpayc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc3", op, join, dmpayc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc3;


   procedure Add_dcpayc4( c : in out d.Criteria; dcpayc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc4", op, join, dcpayc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc4;


   procedure Add_dmpayc4( c : in out d.Criteria; dmpayc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc4", op, join, dmpayc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc4;


   procedure Add_dcpayc5( c : in out d.Criteria; dcpayc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc5", op, join, dcpayc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc5;


   procedure Add_dmpayc5( c : in out d.Criteria; dmpayc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc5", op, join, dmpayc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc5;


   procedure Add_dcpayc6( c : in out d.Criteria; dcpayc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc6", op, join, dcpayc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc6;


   procedure Add_dmpayc6( c : in out d.Criteria; dmpayc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc6", op, join, dmpayc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc6;


   procedure Add_dcpayc7( c : in out d.Criteria; dcpayc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc7", op, join, dcpayc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc7;


   procedure Add_dmpayc7( c : in out d.Criteria; dmpayc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc7", op, join, dmpayc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc7;


   procedure Add_dcpayc8( c : in out d.Criteria; dcpayc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc8", op, join, dcpayc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc8;


   procedure Add_dmpayc8( c : in out d.Criteria; dmpayc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc8", op, join, dmpayc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc8;


   procedure Add_dcpayc9( c : in out d.Criteria; dcpayc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dcpayc9", op, join, dcpayc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc9;


   procedure Add_dmpayc9( c : in out d.Criteria; dmpayc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmpayc9", op, join, dmpayc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc9;


   procedure Add_r1dlcc1( c : in out d.Criteria; r1dlcc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc1", op, join, r1dlcc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc1;


   procedure Add_r1dlmc1( c : in out d.Criteria; r1dlmc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc1", op, join, r1dlmc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc1;


   procedure Add_r1dlcc2( c : in out d.Criteria; r1dlcc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc2", op, join, r1dlcc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc2;


   procedure Add_r1dlmc2( c : in out d.Criteria; r1dlmc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc2", op, join, r1dlmc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc2;


   procedure Add_r1dlcc3( c : in out d.Criteria; r1dlcc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc3", op, join, r1dlcc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc3;


   procedure Add_r1dlmc3( c : in out d.Criteria; r1dlmc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc3", op, join, r1dlmc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc3;


   procedure Add_r1dlcc4( c : in out d.Criteria; r1dlcc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc4", op, join, r1dlcc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc4;


   procedure Add_r1dlmc4( c : in out d.Criteria; r1dlmc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc4", op, join, r1dlmc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc4;


   procedure Add_r1dlcc5( c : in out d.Criteria; r1dlcc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc5", op, join, r1dlcc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc5;


   procedure Add_r1dlmc5( c : in out d.Criteria; r1dlmc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc5", op, join, r1dlmc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc5;


   procedure Add_r1dlcc6( c : in out d.Criteria; r1dlcc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc6", op, join, r1dlcc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc6;


   procedure Add_r1dlmc6( c : in out d.Criteria; r1dlmc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc6", op, join, r1dlmc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc6;


   procedure Add_r1dlcc7( c : in out d.Criteria; r1dlcc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc7", op, join, r1dlcc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc7;


   procedure Add_r1dlmc7( c : in out d.Criteria; r1dlmc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc7", op, join, r1dlmc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc7;


   procedure Add_r1dlcc8( c : in out d.Criteria; r1dlcc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc8", op, join, r1dlcc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc8;


   procedure Add_r1dlmc8( c : in out d.Criteria; r1dlmc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc8", op, join, r1dlmc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc8;


   procedure Add_r1dlcc9( c : in out d.Criteria; r1dlcc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlcc9", op, join, r1dlcc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc9;


   procedure Add_r1dlmc9( c : in out d.Criteria; r1dlmc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r1dlmc9", op, join, r1dlmc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc9;


   procedure Add_r2dlcc1( c : in out d.Criteria; r2dlcc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc1", op, join, r2dlcc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc1;


   procedure Add_r2dlmc1( c : in out d.Criteria; r2dlmc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc1", op, join, r2dlmc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc1;


   procedure Add_r2dlcc2( c : in out d.Criteria; r2dlcc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc2", op, join, r2dlcc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc2;


   procedure Add_r2dlmc2( c : in out d.Criteria; r2dlmc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc2", op, join, r2dlmc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc2;


   procedure Add_r2dlcc3( c : in out d.Criteria; r2dlcc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc3", op, join, r2dlcc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc3;


   procedure Add_r2dlmc3( c : in out d.Criteria; r2dlmc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc3", op, join, r2dlmc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc3;


   procedure Add_r2dlcc4( c : in out d.Criteria; r2dlcc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc4", op, join, r2dlcc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc4;


   procedure Add_r2dlmc4( c : in out d.Criteria; r2dlmc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc4", op, join, r2dlmc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc4;


   procedure Add_r2dlcc5( c : in out d.Criteria; r2dlcc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc5", op, join, r2dlcc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc5;


   procedure Add_r2dlmc5( c : in out d.Criteria; r2dlmc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc5", op, join, r2dlmc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc5;


   procedure Add_r2dlcc6( c : in out d.Criteria; r2dlcc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc6", op, join, r2dlcc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc6;


   procedure Add_r2dlmc6( c : in out d.Criteria; r2dlmc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc6", op, join, r2dlmc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc6;


   procedure Add_r2dlcc7( c : in out d.Criteria; r2dlcc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc7", op, join, r2dlcc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc7;


   procedure Add_r2dlmc7( c : in out d.Criteria; r2dlmc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc7", op, join, r2dlmc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc7;


   procedure Add_r2dlcc8( c : in out d.Criteria; r2dlcc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc8", op, join, r2dlcc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc8;


   procedure Add_r2dlmc8( c : in out d.Criteria; r2dlmc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc8", op, join, r2dlmc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc8;


   procedure Add_r2dlcc9( c : in out d.Criteria; r2dlcc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlcc9", op, join, r2dlcc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc9;


   procedure Add_r2dlmc9( c : in out d.Criteria; r2dlmc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r2dlmc9", op, join, r2dlmc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc9;


   procedure Add_r3dlcc1( c : in out d.Criteria; r3dlcc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc1", op, join, r3dlcc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc1;


   procedure Add_r3dlmc1( c : in out d.Criteria; r3dlmc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc1", op, join, r3dlmc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc1;


   procedure Add_r3dlcc2( c : in out d.Criteria; r3dlcc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc2", op, join, r3dlcc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc2;


   procedure Add_r3dlmc2( c : in out d.Criteria; r3dlmc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc2", op, join, r3dlmc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc2;


   procedure Add_r3dlcc3( c : in out d.Criteria; r3dlcc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc3", op, join, r3dlcc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc3;


   procedure Add_r3dlmc3( c : in out d.Criteria; r3dlmc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc3", op, join, r3dlmc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc3;


   procedure Add_r3dlcc4( c : in out d.Criteria; r3dlcc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc4", op, join, r3dlcc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc4;


   procedure Add_r3dlmc4( c : in out d.Criteria; r3dlmc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc4", op, join, r3dlmc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc4;


   procedure Add_r3dlcc5( c : in out d.Criteria; r3dlcc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc5", op, join, r3dlcc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc5;


   procedure Add_r3dlmc5( c : in out d.Criteria; r3dlmc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc5", op, join, r3dlmc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc5;


   procedure Add_r3dlcc6( c : in out d.Criteria; r3dlcc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc6", op, join, r3dlcc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc6;


   procedure Add_r3dlmc6( c : in out d.Criteria; r3dlmc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc6", op, join, r3dlmc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc6;


   procedure Add_r3dlcc7( c : in out d.Criteria; r3dlcc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc7", op, join, r3dlcc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc7;


   procedure Add_r3dlmc7( c : in out d.Criteria; r3dlmc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc7", op, join, r3dlmc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc7;


   procedure Add_r3dlcc8( c : in out d.Criteria; r3dlcc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc8", op, join, r3dlcc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc8;


   procedure Add_r3dlmc8( c : in out d.Criteria; r3dlmc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc8", op, join, r3dlmc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc8;


   procedure Add_r3dlcc9( c : in out d.Criteria; r3dlcc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlcc9", op, join, r3dlcc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc9;


   procedure Add_r3dlmc9( c : in out d.Criteria; r3dlmc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r3dlmc9", op, join, r3dlmc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc9;


   procedure Add_r4dlcc1( c : in out d.Criteria; r4dlcc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc1", op, join, r4dlcc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc1;


   procedure Add_r4dlmc1( c : in out d.Criteria; r4dlmc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc1", op, join, r4dlmc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc1;


   procedure Add_r4dlcc2( c : in out d.Criteria; r4dlcc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc2", op, join, r4dlcc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc2;


   procedure Add_r4dlmc2( c : in out d.Criteria; r4dlmc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc2", op, join, r4dlmc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc2;


   procedure Add_r4dlcc3( c : in out d.Criteria; r4dlcc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc3", op, join, r4dlcc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc3;


   procedure Add_r4dlmc3( c : in out d.Criteria; r4dlmc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc3", op, join, r4dlmc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc3;


   procedure Add_r4dlcc4( c : in out d.Criteria; r4dlcc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc4", op, join, r4dlcc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc4;


   procedure Add_r4dlmc4( c : in out d.Criteria; r4dlmc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc4", op, join, r4dlmc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc4;


   procedure Add_r4dlcc5( c : in out d.Criteria; r4dlcc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc5", op, join, r4dlcc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc5;


   procedure Add_r4dlmc5( c : in out d.Criteria; r4dlmc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc5", op, join, r4dlmc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc5;


   procedure Add_r4dlcc6( c : in out d.Criteria; r4dlcc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc6", op, join, r4dlcc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc6;


   procedure Add_r4dlmc6( c : in out d.Criteria; r4dlmc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc6", op, join, r4dlmc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc6;


   procedure Add_r4dlcc7( c : in out d.Criteria; r4dlcc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc7", op, join, r4dlcc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc7;


   procedure Add_r4dlmc7( c : in out d.Criteria; r4dlmc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc7", op, join, r4dlmc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc7;


   procedure Add_r4dlcc8( c : in out d.Criteria; r4dlcc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc8", op, join, r4dlcc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc8;


   procedure Add_r4dlmc8( c : in out d.Criteria; r4dlmc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc8", op, join, r4dlmc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc8;


   procedure Add_r4dlcc9( c : in out d.Criteria; r4dlcc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlcc9", op, join, r4dlcc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc9;


   procedure Add_r4dlmc9( c : in out d.Criteria; r4dlmc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r4dlmc9", op, join, r4dlmc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc9;


   procedure Add_r5dlcc1( c : in out d.Criteria; r5dlcc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc1", op, join, r5dlcc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc1;


   procedure Add_r5dlmc1( c : in out d.Criteria; r5dlmc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc1", op, join, r5dlmc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc1;


   procedure Add_r5dlcc2( c : in out d.Criteria; r5dlcc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc2", op, join, r5dlcc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc2;


   procedure Add_r5dlmc2( c : in out d.Criteria; r5dlmc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc2", op, join, r5dlmc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc2;


   procedure Add_r5dlcc3( c : in out d.Criteria; r5dlcc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc3", op, join, r5dlcc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc3;


   procedure Add_r5dlmc3( c : in out d.Criteria; r5dlmc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc3", op, join, r5dlmc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc3;


   procedure Add_r5dlcc4( c : in out d.Criteria; r5dlcc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc4", op, join, r5dlcc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc4;


   procedure Add_r5dlmc4( c : in out d.Criteria; r5dlmc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc4", op, join, r5dlmc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc4;


   procedure Add_r5dlcc5( c : in out d.Criteria; r5dlcc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc5", op, join, r5dlcc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc5;


   procedure Add_r5dlmc5( c : in out d.Criteria; r5dlmc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc5", op, join, r5dlmc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc5;


   procedure Add_r5dlcc6( c : in out d.Criteria; r5dlcc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc6", op, join, r5dlcc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc6;


   procedure Add_r5dlmc6( c : in out d.Criteria; r5dlmc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc6", op, join, r5dlmc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc6;


   procedure Add_r5dlcc7( c : in out d.Criteria; r5dlcc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc7", op, join, r5dlcc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc7;


   procedure Add_r5dlmc7( c : in out d.Criteria; r5dlmc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc7", op, join, r5dlmc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc7;


   procedure Add_r5dlcc8( c : in out d.Criteria; r5dlcc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc8", op, join, r5dlcc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc8;


   procedure Add_r5dlmc8( c : in out d.Criteria; r5dlmc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc8", op, join, r5dlmc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc8;


   procedure Add_r5dlcc9( c : in out d.Criteria; r5dlcc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlcc9", op, join, r5dlcc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc9;


   procedure Add_r5dlmc9( c : in out d.Criteria; r5dlmc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "r5dlmc9", op, join, r5dlmc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc9;


   procedure Add_adbtbl( c : in out d.Criteria; adbtbl : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adbtbl", op, join, adbtbl );
   begin
      d.add_to_criteria( c, elem );
   end Add_adbtbl;


   procedure Add_adddec( c : in out d.Criteria; adddec : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adddec", op, join, adddec );
   begin
      d.add_to_criteria( c, elem );
   end Add_adddec;


   procedure Add_addhol( c : in out d.Criteria; addhol : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "addhol", op, join, addhol );
   begin
      d.add_to_criteria( c, elem );
   end Add_addhol;


   procedure Add_addholr( c : in out d.Criteria; addholr : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "addholr", op, join, addholr );
   begin
      d.add_to_criteria( c, elem );
   end Add_addholr;


   procedure Add_addins( c : in out d.Criteria; addins : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "addins", op, join, addins );
   begin
      d.add_to_criteria( c, elem );
   end Add_addins;


   procedure Add_addmon( c : in out d.Criteria; addmon : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "addmon", op, join, addmon );
   begin
      d.add_to_criteria( c, elem );
   end Add_addmon;


   procedure Add_adepfur( c : in out d.Criteria; adepfur : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adepfur", op, join, adepfur );
   begin
      d.add_to_criteria( c, elem );
   end Add_adepfur;


   procedure Add_adles( c : in out d.Criteria; adles : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adles", op, join, adles );
   begin
      d.add_to_criteria( c, elem );
   end Add_adles;


   procedure Add_adlesoa( c : in out d.Criteria; adlesoa : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adlesoa", op, join, adlesoa );
   begin
      d.add_to_criteria( c, elem );
   end Add_adlesoa;


   procedure Add_af1( c : in out d.Criteria; af1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "af1", op, join, af1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_af1;


   procedure Add_afdep2( c : in out d.Criteria; afdep2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "afdep2", op, join, afdep2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_afdep2;


   procedure Add_cdelply( c : in out d.Criteria; cdelply : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdelply", op, join, cdelply );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdelply;


   procedure Add_cdepact( c : in out d.Criteria; cdepact : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdepact", op, join, cdepact );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepact;


   procedure Add_cdepbed( c : in out d.Criteria; cdepbed : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdepbed", op, join, cdepbed );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepbed;


   procedure Add_cdepcel( c : in out d.Criteria; cdepcel : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdepcel", op, join, cdepcel );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepcel;


   procedure Add_cdepeqp( c : in out d.Criteria; cdepeqp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdepeqp", op, join, cdepeqp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepeqp;


   procedure Add_cdephol( c : in out d.Criteria; cdephol : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdephol", op, join, cdephol );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdephol;


   procedure Add_cdeples( c : in out d.Criteria; cdeples : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeples", op, join, cdeples );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeples;


   procedure Add_cdeptea( c : in out d.Criteria; cdeptea : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeptea", op, join, cdeptea );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeptea;


   procedure Add_cdeptrp( c : in out d.Criteria; cdeptrp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeptrp", op, join, cdeptrp );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeptrp;


   procedure Add_cdepveg( c : in out d.Criteria; cdepveg : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdepveg", op, join, cdepveg );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepveg;


   procedure Add_cdpcoat( c : in out d.Criteria; cdpcoat : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdpcoat", op, join, cdpcoat );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdpcoat;


   procedure Add_clothes( c : in out d.Criteria; clothes : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "clothes", op, join, clothes );
   begin
      d.add_to_criteria( c, elem );
   end Add_clothes;


   procedure Add_cplay( c : in out d.Criteria; cplay : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cplay", op, join, cplay );
   begin
      d.add_to_criteria( c, elem );
   end Add_cplay;


   procedure Add_debt10( c : in out d.Criteria; debt10 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt10", op, join, debt10 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt10;


   procedure Add_debt11( c : in out d.Criteria; debt11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt11", op, join, debt11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt11;


   procedure Add_debt12( c : in out d.Criteria; debt12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt12", op, join, debt12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt12;


   procedure Add_debt13( c : in out d.Criteria; debt13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt13", op, join, debt13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt13;


   procedure Add_debtar01( c : in out d.Criteria; debtar01 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar01", op, join, debtar01 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar01;


   procedure Add_debtar02( c : in out d.Criteria; debtar02 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar02", op, join, debtar02 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar02;


   procedure Add_debtar03( c : in out d.Criteria; debtar03 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar03", op, join, debtar03 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar03;


   procedure Add_debtar04( c : in out d.Criteria; debtar04 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar04", op, join, debtar04 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar04;


   procedure Add_debtar05( c : in out d.Criteria; debtar05 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar05", op, join, debtar05 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar05;


   procedure Add_debtar06( c : in out d.Criteria; debtar06 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar06", op, join, debtar06 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar06;


   procedure Add_debtar07( c : in out d.Criteria; debtar07 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar07", op, join, debtar07 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar07;


   procedure Add_debtar08( c : in out d.Criteria; debtar08 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar08", op, join, debtar08 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar08;


   procedure Add_debtar09( c : in out d.Criteria; debtar09 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar09", op, join, debtar09 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar09;


   procedure Add_debtar10( c : in out d.Criteria; debtar10 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar10", op, join, debtar10 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar10;


   procedure Add_debtar11( c : in out d.Criteria; debtar11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar11", op, join, debtar11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar11;


   procedure Add_debtar12( c : in out d.Criteria; debtar12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar12", op, join, debtar12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar12;


   procedure Add_debtar13( c : in out d.Criteria; debtar13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtar13", op, join, debtar13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar13;


   procedure Add_debtfre1( c : in out d.Criteria; debtfre1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtfre1", op, join, debtfre1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtfre1;


   procedure Add_debtfre2( c : in out d.Criteria; debtfre2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtfre2", op, join, debtfre2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtfre2;


   procedure Add_debtfre3( c : in out d.Criteria; debtfre3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debtfre3", op, join, debtfre3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtfre3;


   procedure Add_hbolng( c : in out d.Criteria; hbolng : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbolng", op, join, hbolng );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbolng;


   procedure Add_houshe1( c : in out d.Criteria; houshe1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "houshe1", op, join, houshe1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_houshe1;


   procedure Add_kidinc( c : in out d.Criteria; kidinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kidinc", op, join, kidinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_kidinc;


   procedure Add_meal( c : in out d.Criteria; meal : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "meal", op, join, meal );
   begin
      d.add_to_criteria( c, elem );
   end Add_meal;


   procedure Add_nhhchild( c : in out d.Criteria; nhhchild : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhchild", op, join, nhhchild );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhchild;


   procedure Add_oafur( c : in out d.Criteria; oafur : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oafur", op, join, oafur );
   begin
      d.add_to_criteria( c, elem );
   end Add_oafur;


   procedure Add_oapre( c : in out d.Criteria; oapre : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oapre", op, join, oapre );
   begin
      d.add_to_criteria( c, elem );
   end Add_oapre;


   procedure Add_outpay( c : in out d.Criteria; outpay : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outpay", op, join, outpay );
   begin
      d.add_to_criteria( c, elem );
   end Add_outpay;


   procedure Add_outpyamt( c : in out d.Criteria; outpyamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outpyamt", op, join, Long_Float( outpyamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_outpyamt;


   procedure Add_regpamt( c : in out d.Criteria; regpamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "regpamt", op, join, Long_Float( regpamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_regpamt;


   procedure Add_regularp( c : in out d.Criteria; regularp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "regularp", op, join, regularp );
   begin
      d.add_to_criteria( c, elem );
   end Add_regularp;


   procedure Add_shoeoa( c : in out d.Criteria; shoeoa : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "shoeoa", op, join, shoeoa );
   begin
      d.add_to_criteria( c, elem );
   end Add_shoeoa;


   procedure Add_totsav( c : in out d.Criteria; totsav : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsav", op, join, totsav );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsav;


   procedure Add_adultb( c : in out d.Criteria; adultb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adultb", op, join, adultb );
   begin
      d.add_to_criteria( c, elem );
   end Add_adultb;


   procedure Add_boarder( c : in out d.Criteria; boarder : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boarder", op, join, Long_Float( boarder ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boarder;


   procedure Add_bpeninc( c : in out d.Criteria; bpeninc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bpeninc", op, join, bpeninc );
   begin
      d.add_to_criteria( c, elem );
   end Add_bpeninc;


   procedure Add_bseinc( c : in out d.Criteria; bseinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bseinc", op, join, bseinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_bseinc;


   procedure Add_budisben( c : in out d.Criteria; budisben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "budisben", op, join, budisben );
   begin
      d.add_to_criteria( c, elem );
   end Add_budisben;


   procedure Add_buearns( c : in out d.Criteria; buearns : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buearns", op, join, buearns );
   begin
      d.add_to_criteria( c, elem );
   end Add_buearns;


   procedure Add_buethgr3( c : in out d.Criteria; buethgr3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buethgr3", op, join, buethgr3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_buethgr3;


   procedure Add_buinc( c : in out d.Criteria; buinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buinc", op, join, buinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_buinc;


   procedure Add_buinv( c : in out d.Criteria; buinv : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buinv", op, join, buinv );
   begin
      d.add_to_criteria( c, elem );
   end Add_buinv;


   procedure Add_buirben( c : in out d.Criteria; buirben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buirben", op, join, buirben );
   begin
      d.add_to_criteria( c, elem );
   end Add_buirben;


   procedure Add_bukids( c : in out d.Criteria; bukids : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bukids", op, join, bukids );
   begin
      d.add_to_criteria( c, elem );
   end Add_bukids;


   procedure Add_bunirben( c : in out d.Criteria; bunirben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bunirben", op, join, bunirben );
   begin
      d.add_to_criteria( c, elem );
   end Add_bunirben;


   procedure Add_buothben( c : in out d.Criteria; buothben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buothben", op, join, buothben );
   begin
      d.add_to_criteria( c, elem );
   end Add_buothben;


   procedure Add_burent( c : in out d.Criteria; burent : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "burent", op, join, burent );
   begin
      d.add_to_criteria( c, elem );
   end Add_burent;


   procedure Add_burinc( c : in out d.Criteria; burinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "burinc", op, join, burinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_burinc;


   procedure Add_burpinc( c : in out d.Criteria; burpinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "burpinc", op, join, burpinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_burpinc;


   procedure Add_butvlic( c : in out d.Criteria; butvlic : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "butvlic", op, join, Long_Float( butvlic ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_butvlic;


   procedure Add_butxcred( c : in out d.Criteria; butxcred : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "butxcred", op, join, butxcred );
   begin
      d.add_to_criteria( c, elem );
   end Add_butxcred;


   procedure Add_depchldb( c : in out d.Criteria; depchldb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "depchldb", op, join, depchldb );
   begin
      d.add_to_criteria( c, elem );
   end Add_depchldb;


   procedure Add_diswbua1( c : in out d.Criteria; diswbua1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "diswbua1", op, join, diswbua1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswbua1;


   procedure Add_diswbuc1( c : in out d.Criteria; diswbuc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "diswbuc1", op, join, diswbuc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswbuc1;


   procedure Add_ecstatbu( c : in out d.Criteria; ecstatbu : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ecstatbu", op, join, ecstatbu );
   begin
      d.add_to_criteria( c, elem );
   end Add_ecstatbu;


   procedure Add_famtypb2( c : in out d.Criteria; famtypb2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "famtypb2", op, join, famtypb2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_famtypb2;


   procedure Add_famtypbs( c : in out d.Criteria; famtypbs : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "famtypbs", op, join, famtypbs );
   begin
      d.add_to_criteria( c, elem );
   end Add_famtypbs;


   procedure Add_famtypbu( c : in out d.Criteria; famtypbu : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "famtypbu", op, join, famtypbu );
   begin
      d.add_to_criteria( c, elem );
   end Add_famtypbu;


   procedure Add_fsfvbu( c : in out d.Criteria; fsfvbu : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsfvbu", op, join, Long_Float( fsfvbu ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsfvbu;


   procedure Add_fsmbu( c : in out d.Criteria; fsmbu : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmbu", op, join, Long_Float( fsmbu ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmbu;


   procedure Add_fsmlkbu( c : in out d.Criteria; fsmlkbu : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlkbu", op, join, Long_Float( fsmlkbu ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlkbu;


   procedure Add_gross4( c : in out d.Criteria; gross4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gross4", op, join, gross4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gross4;


   procedure Add_hbindbu( c : in out d.Criteria; hbindbu : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbindbu", op, join, hbindbu );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindbu;


   procedure Add_hbindbu2( c : in out d.Criteria; hbindbu2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbindbu2", op, join, hbindbu2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindbu2;


   procedure Add_heartbu( c : in out d.Criteria; heartbu : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heartbu", op, join, Long_Float( heartbu ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_heartbu;


   procedure Add_kid04( c : in out d.Criteria; kid04 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kid04", op, join, kid04 );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid04;


   procedure Add_kid1115( c : in out d.Criteria; kid1115 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kid1115", op, join, kid1115 );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid1115;


   procedure Add_kid1619( c : in out d.Criteria; kid1619 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kid1619", op, join, kid1619 );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid1619;


   procedure Add_kid510( c : in out d.Criteria; kid510 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "kid510", op, join, kid510 );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid510;


   procedure Add_lodger( c : in out d.Criteria; lodger : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lodger", op, join, Long_Float( lodger ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_lodger;


   procedure Add_subltamt( c : in out d.Criteria; subltamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "subltamt", op, join, Long_Float( subltamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_subltamt;


   procedure Add_totcapb3( c : in out d.Criteria; totcapb3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totcapb3", op, join, Long_Float( totcapb3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_totcapb3;


   procedure Add_totsavbu( c : in out d.Criteria; totsavbu : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsavbu", op, join, totsavbu );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsavbu;


   procedure Add_tuburent( c : in out d.Criteria; tuburent : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuburent", op, join, tuburent );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuburent;


   procedure Add_youngch( c : in out d.Criteria; youngch : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "youngch", op, join, youngch );
   begin
      d.add_to_criteria( c, elem );
   end Add_youngch;


   procedure Add_clthsoa( c : in out d.Criteria; clthsoa : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "clthsoa", op, join, clthsoa );
   begin
      d.add_to_criteria( c, elem );
   end Add_clthsoa;


   procedure Add_debt1( c : in out d.Criteria; debt1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt1", op, join, debt1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt1;


   procedure Add_debt2( c : in out d.Criteria; debt2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt2", op, join, debt2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt2;


   procedure Add_debt3( c : in out d.Criteria; debt3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt3", op, join, debt3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt3;


   procedure Add_debt4( c : in out d.Criteria; debt4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt4", op, join, debt4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt4;


   procedure Add_debt5( c : in out d.Criteria; debt5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt5", op, join, debt5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt5;


   procedure Add_debt6( c : in out d.Criteria; debt6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt6", op, join, debt6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt6;


   procedure Add_debt7( c : in out d.Criteria; debt7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt7", op, join, debt7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt7;


   procedure Add_debt8( c : in out d.Criteria; debt8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt8", op, join, debt8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt8;


   procedure Add_debt9( c : in out d.Criteria; debt9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "debt9", op, join, debt9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt9;


   procedure Add_discbua( c : in out d.Criteria; discbua : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discbua", op, join, discbua );
   begin
      d.add_to_criteria( c, elem );
   end Add_discbua;


   procedure Add_discbuc( c : in out d.Criteria; discbuc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discbuc", op, join, discbuc );
   begin
      d.add_to_criteria( c, elem );
   end Add_discbuc;


   procedure Add_hbtham( c : in out d.Criteria; hbtham : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbtham", op, join, Long_Float( hbtham ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbtham;


   procedure Add_hbthbu( c : in out d.Criteria; hbthbu : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbthbu", op, join, hbthbu );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthbu;


   procedure Add_hbthmn( c : in out d.Criteria; hbthmn : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbthmn", op, join, hbthmn );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthmn;


   procedure Add_hbthpd( c : in out d.Criteria; hbthpd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbthpd", op, join, hbthpd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthpd;


   procedure Add_hbthwk( c : in out d.Criteria; hbthwk : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbthwk", op, join, hbthwk );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthwk;


   procedure Add_hbthyr( c : in out d.Criteria; hbthyr : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbthyr", op, join, hbthyr );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthyr;


   procedure Add_hbwait( c : in out d.Criteria; hbwait : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbwait", op, join, hbwait );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbwait;


   procedure Add_intrnt( c : in out d.Criteria; intrnt : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intrnt", op, join, intrnt );
   begin
      d.add_to_criteria( c, elem );
   end Add_intrnt;


   procedure Add_oadep( c : in out d.Criteria; oadep : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oadep", op, join, oadep );
   begin
      d.add_to_criteria( c, elem );
   end Add_oadep;


   procedure Add_oanet( c : in out d.Criteria; oanet : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oanet", op, join, oanet );
   begin
      d.add_to_criteria( c, elem );
   end Add_oanet;


   procedure Add_dynhthd( c : in out d.Criteria; dynhthd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhthd", op, join, dynhthd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhthd;


   procedure Add_dynhtsp( c : in out d.Criteria; dynhtsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtsp", op, join, dynhtsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtsp;


   procedure Add_freqhd( c : in out d.Criteria; freqhd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqhd", op, join, freqhd );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqhd;


   procedure Add_freqsp( c : in out d.Criteria; freqsp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqsp", op, join, freqsp );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqsp;


   procedure Add_hur01hd( c : in out d.Criteria; hur01hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01hd", op, join, hur01hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01hd;


   procedure Add_hur01sp( c : in out d.Criteria; hur01sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01sp", op, join, hur01sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01sp;


   procedure Add_hur02hd( c : in out d.Criteria; hur02hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02hd", op, join, hur02hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02hd;


   procedure Add_hur02sp( c : in out d.Criteria; hur02sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02sp", op, join, hur02sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02sp;


   procedure Add_hur03hd( c : in out d.Criteria; hur03hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03hd", op, join, hur03hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03hd;


   procedure Add_hur03sp( c : in out d.Criteria; hur03sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03sp", op, join, hur03sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03sp;


   procedure Add_hur04hd( c : in out d.Criteria; hur04hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04hd", op, join, hur04hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04hd;


   procedure Add_hur04sp( c : in out d.Criteria; hur04sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04sp", op, join, hur04sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04sp;


   procedure Add_hur05hd( c : in out d.Criteria; hur05hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05hd", op, join, hur05hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05hd;


   procedure Add_hur05sp( c : in out d.Criteria; hur05sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05sp", op, join, hur05sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05sp;


   procedure Add_hur06hd( c : in out d.Criteria; hur06hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06hd", op, join, hur06hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06hd;


   procedure Add_hur06sp( c : in out d.Criteria; hur06sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06sp", op, join, hur06sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06sp;


   procedure Add_hur07hd( c : in out d.Criteria; hur07hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07hd", op, join, hur07hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07hd;


   procedure Add_hur07sp( c : in out d.Criteria; hur07sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07sp", op, join, hur07sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07sp;


   procedure Add_hur08hd( c : in out d.Criteria; hur08hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08hd", op, join, hur08hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08hd;


   procedure Add_hur08sp( c : in out d.Criteria; hur08sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08sp", op, join, hur08sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08sp;


   procedure Add_hur09hd( c : in out d.Criteria; hur09hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09hd", op, join, hur09hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09hd;


   procedure Add_hur09sp( c : in out d.Criteria; hur09sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09sp", op, join, hur09sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09sp;


   procedure Add_hur10hd( c : in out d.Criteria; hur10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10hd", op, join, hur10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10hd;


   procedure Add_hur10sp( c : in out d.Criteria; hur10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10sp", op, join, hur10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10sp;


   procedure Add_hur11hd( c : in out d.Criteria; hur11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11hd", op, join, hur11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11hd;


   procedure Add_hur11sp( c : in out d.Criteria; hur11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11sp", op, join, hur11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11sp;


   procedure Add_hur12hd( c : in out d.Criteria; hur12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12hd", op, join, hur12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12hd;


   procedure Add_hur12sp( c : in out d.Criteria; hur12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12sp", op, join, hur12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12sp;


   procedure Add_hur13hd( c : in out d.Criteria; hur13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13hd", op, join, hur13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13hd;


   procedure Add_hur13sp( c : in out d.Criteria; hur13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13sp", op, join, hur13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13sp;


   procedure Add_hur14hd( c : in out d.Criteria; hur14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14hd", op, join, hur14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14hd;


   procedure Add_hur14sp( c : in out d.Criteria; hur14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14sp", op, join, hur14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14sp;


   procedure Add_hur15hd( c : in out d.Criteria; hur15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15hd", op, join, hur15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15hd;


   procedure Add_hur15sp( c : in out d.Criteria; hur15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15sp", op, join, hur15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15sp;


   procedure Add_hur16hd( c : in out d.Criteria; hur16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16hd", op, join, hur16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16hd;


   procedure Add_hur16sp( c : in out d.Criteria; hur16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16sp", op, join, hur16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16sp;


   procedure Add_hur17hd( c : in out d.Criteria; hur17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17hd", op, join, hur17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17hd;


   procedure Add_hur17sp( c : in out d.Criteria; hur17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17sp", op, join, hur17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17sp;


   procedure Add_hur18hd( c : in out d.Criteria; hur18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18hd", op, join, hur18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18hd;


   procedure Add_hur18sp( c : in out d.Criteria; hur18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18sp", op, join, hur18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18sp;


   procedure Add_hur19hd( c : in out d.Criteria; hur19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19hd", op, join, hur19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19hd;


   procedure Add_hur19sp( c : in out d.Criteria; hur19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19sp", op, join, hur19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19sp;


   procedure Add_hur20hd( c : in out d.Criteria; hur20hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20hd", op, join, hur20hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20hd;


   procedure Add_hur20sp( c : in out d.Criteria; hur20sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20sp", op, join, hur20sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20sp;


   procedure Add_whl01hd( c : in out d.Criteria; whl01hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01hd", op, join, whl01hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01hd;


   procedure Add_whl01sp( c : in out d.Criteria; whl01sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01sp", op, join, whl01sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01sp;


   procedure Add_whl02hd( c : in out d.Criteria; whl02hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02hd", op, join, whl02hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02hd;


   procedure Add_whl02sp( c : in out d.Criteria; whl02sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02sp", op, join, whl02sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02sp;


   procedure Add_whl03hd( c : in out d.Criteria; whl03hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03hd", op, join, whl03hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03hd;


   procedure Add_whl03sp( c : in out d.Criteria; whl03sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03sp", op, join, whl03sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03sp;


   procedure Add_whl04hd( c : in out d.Criteria; whl04hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04hd", op, join, whl04hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04hd;


   procedure Add_whl04sp( c : in out d.Criteria; whl04sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04sp", op, join, whl04sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04sp;


   procedure Add_whl05hd( c : in out d.Criteria; whl05hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05hd", op, join, whl05hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05hd;


   procedure Add_whl05sp( c : in out d.Criteria; whl05sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05sp", op, join, whl05sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05sp;


   procedure Add_whl06hd( c : in out d.Criteria; whl06hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06hd", op, join, whl06hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06hd;


   procedure Add_whl06sp( c : in out d.Criteria; whl06sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06sp", op, join, whl06sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06sp;


   procedure Add_whl07hd( c : in out d.Criteria; whl07hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07hd", op, join, whl07hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07hd;


   procedure Add_whl07sp( c : in out d.Criteria; whl07sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07sp", op, join, whl07sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07sp;


   procedure Add_whl08hd( c : in out d.Criteria; whl08hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08hd", op, join, whl08hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08hd;


   procedure Add_whl08sp( c : in out d.Criteria; whl08sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08sp", op, join, whl08sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08sp;


   procedure Add_whl09hd( c : in out d.Criteria; whl09hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09hd", op, join, whl09hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09hd;


   procedure Add_whl09sp( c : in out d.Criteria; whl09sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09sp", op, join, whl09sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09sp;


   procedure Add_whl10hd( c : in out d.Criteria; whl10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10hd", op, join, whl10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10hd;


   procedure Add_whl10sp( c : in out d.Criteria; whl10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10sp", op, join, whl10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10sp;


   procedure Add_whl11hd( c : in out d.Criteria; whl11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11hd", op, join, whl11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11hd;


   procedure Add_whl11sp( c : in out d.Criteria; whl11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11sp", op, join, whl11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11sp;


   procedure Add_whl12hd( c : in out d.Criteria; whl12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12hd", op, join, whl12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12hd;


   procedure Add_whl12sp( c : in out d.Criteria; whl12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12sp", op, join, whl12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12sp;


   procedure Add_whl13hd( c : in out d.Criteria; whl13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13hd", op, join, whl13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13hd;


   procedure Add_whl13sp( c : in out d.Criteria; whl13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13sp", op, join, whl13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13sp;


   procedure Add_whl14hd( c : in out d.Criteria; whl14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14hd", op, join, whl14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14hd;


   procedure Add_whl14sp( c : in out d.Criteria; whl14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14sp", op, join, whl14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14sp;


   procedure Add_whl15hd( c : in out d.Criteria; whl15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15hd", op, join, whl15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15hd;


   procedure Add_whl15sp( c : in out d.Criteria; whl15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15sp", op, join, whl15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15sp;


   procedure Add_whl16hd( c : in out d.Criteria; whl16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16hd", op, join, whl16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16hd;


   procedure Add_whl16sp( c : in out d.Criteria; whl16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16sp", op, join, whl16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16sp;


   procedure Add_whl17hd( c : in out d.Criteria; whl17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17hd", op, join, whl17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17hd;


   procedure Add_whl17sp( c : in out d.Criteria; whl17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17sp", op, join, whl17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17sp;


   procedure Add_whl18hd( c : in out d.Criteria; whl18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18hd", op, join, whl18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18hd;


   procedure Add_whl18sp( c : in out d.Criteria; whl18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18sp", op, join, whl18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18sp;


   procedure Add_whl19hd( c : in out d.Criteria; whl19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19hd", op, join, whl19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19hd;


   procedure Add_whl19sp( c : in out d.Criteria; whl19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19sp", op, join, whl19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19sp;


   procedure Add_whl20hd( c : in out d.Criteria; whl20hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20hd", op, join, whl20hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20hd;


   procedure Add_whl20sp( c : in out d.Criteria; whl20sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20sp", op, join, whl20sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20sp;


   procedure Add_dynhtc1( c : in out d.Criteria; dynhtc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc1", op, join, dynhtc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc1;


   procedure Add_dynhtc2( c : in out d.Criteria; dynhtc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc2", op, join, dynhtc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc2;


   procedure Add_dynhtc3( c : in out d.Criteria; dynhtc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc3", op, join, dynhtc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc3;


   procedure Add_dynhtc4( c : in out d.Criteria; dynhtc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc4", op, join, dynhtc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc4;


   procedure Add_dynhtc5( c : in out d.Criteria; dynhtc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc5", op, join, dynhtc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc5;


   procedure Add_dynhtc6( c : in out d.Criteria; dynhtc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc6", op, join, dynhtc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc6;


   procedure Add_dynhtc7( c : in out d.Criteria; dynhtc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc7", op, join, dynhtc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc7;


   procedure Add_dynhtc8( c : in out d.Criteria; dynhtc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc8", op, join, dynhtc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc8;


   procedure Add_dynhtc9( c : in out d.Criteria; dynhtc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dynhtc9", op, join, dynhtc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc9;


   procedure Add_freqc1( c : in out d.Criteria; freqc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc1", op, join, freqc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc1;


   procedure Add_freqc2( c : in out d.Criteria; freqc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc2", op, join, freqc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc2;


   procedure Add_freqc3( c : in out d.Criteria; freqc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc3", op, join, freqc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc3;


   procedure Add_freqc4( c : in out d.Criteria; freqc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc4", op, join, freqc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc4;


   procedure Add_freqc5( c : in out d.Criteria; freqc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc5", op, join, freqc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc5;


   procedure Add_freqc6( c : in out d.Criteria; freqc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc6", op, join, freqc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc6;


   procedure Add_freqc7( c : in out d.Criteria; freqc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc7", op, join, freqc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc7;


   procedure Add_freqc8( c : in out d.Criteria; freqc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc8", op, join, freqc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc8;


   procedure Add_freqc9( c : in out d.Criteria; freqc9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "freqc9", op, join, freqc9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc9;


   procedure Add_hur01c1( c : in out d.Criteria; hur01c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c1", op, join, hur01c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c1;


   procedure Add_hur01c2( c : in out d.Criteria; hur01c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c2", op, join, hur01c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c2;


   procedure Add_hur01c3( c : in out d.Criteria; hur01c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c3", op, join, hur01c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c3;


   procedure Add_hur01c4( c : in out d.Criteria; hur01c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c4", op, join, hur01c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c4;


   procedure Add_hur01c5( c : in out d.Criteria; hur01c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c5", op, join, hur01c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c5;


   procedure Add_hur01c6( c : in out d.Criteria; hur01c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c6", op, join, hur01c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c6;


   procedure Add_hur01c7( c : in out d.Criteria; hur01c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c7", op, join, hur01c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c7;


   procedure Add_hur01c8( c : in out d.Criteria; hur01c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c8", op, join, hur01c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c8;


   procedure Add_hur01c9( c : in out d.Criteria; hur01c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur01c9", op, join, hur01c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c9;


   procedure Add_hur02c1( c : in out d.Criteria; hur02c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c1", op, join, hur02c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c1;


   procedure Add_hur02c2( c : in out d.Criteria; hur02c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c2", op, join, hur02c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c2;


   procedure Add_hur02c3( c : in out d.Criteria; hur02c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c3", op, join, hur02c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c3;


   procedure Add_hur02c4( c : in out d.Criteria; hur02c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c4", op, join, hur02c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c4;


   procedure Add_hur02c5( c : in out d.Criteria; hur02c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c5", op, join, hur02c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c5;


   procedure Add_hur02c6( c : in out d.Criteria; hur02c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c6", op, join, hur02c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c6;


   procedure Add_hur02c7( c : in out d.Criteria; hur02c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c7", op, join, hur02c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c7;


   procedure Add_hur02c8( c : in out d.Criteria; hur02c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c8", op, join, hur02c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c8;


   procedure Add_hur02c9( c : in out d.Criteria; hur02c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur02c9", op, join, hur02c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c9;


   procedure Add_hur03c1( c : in out d.Criteria; hur03c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c1", op, join, hur03c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c1;


   procedure Add_hur03c2( c : in out d.Criteria; hur03c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c2", op, join, hur03c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c2;


   procedure Add_hur03c3( c : in out d.Criteria; hur03c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c3", op, join, hur03c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c3;


   procedure Add_hur03c4( c : in out d.Criteria; hur03c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c4", op, join, hur03c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c4;


   procedure Add_hur03c5( c : in out d.Criteria; hur03c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c5", op, join, hur03c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c5;


   procedure Add_hur03c6( c : in out d.Criteria; hur03c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c6", op, join, hur03c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c6;


   procedure Add_hur03c7( c : in out d.Criteria; hur03c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c7", op, join, hur03c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c7;


   procedure Add_hur03c8( c : in out d.Criteria; hur03c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c8", op, join, hur03c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c8;


   procedure Add_hur03c9( c : in out d.Criteria; hur03c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur03c9", op, join, hur03c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c9;


   procedure Add_hur04c1( c : in out d.Criteria; hur04c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c1", op, join, hur04c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c1;


   procedure Add_hur04c2( c : in out d.Criteria; hur04c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c2", op, join, hur04c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c2;


   procedure Add_hur04c3( c : in out d.Criteria; hur04c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c3", op, join, hur04c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c3;


   procedure Add_hur04c4( c : in out d.Criteria; hur04c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c4", op, join, hur04c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c4;


   procedure Add_hur04c5( c : in out d.Criteria; hur04c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c5", op, join, hur04c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c5;


   procedure Add_hur04c6( c : in out d.Criteria; hur04c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c6", op, join, hur04c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c6;


   procedure Add_hur04c7( c : in out d.Criteria; hur04c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c7", op, join, hur04c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c7;


   procedure Add_hur04c8( c : in out d.Criteria; hur04c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c8", op, join, hur04c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c8;


   procedure Add_hur04c9( c : in out d.Criteria; hur04c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur04c9", op, join, hur04c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c9;


   procedure Add_hur05c1( c : in out d.Criteria; hur05c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c1", op, join, hur05c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c1;


   procedure Add_hur05c2( c : in out d.Criteria; hur05c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c2", op, join, hur05c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c2;


   procedure Add_hur05c3( c : in out d.Criteria; hur05c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c3", op, join, hur05c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c3;


   procedure Add_hur05c4( c : in out d.Criteria; hur05c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c4", op, join, hur05c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c4;


   procedure Add_hur05c5( c : in out d.Criteria; hur05c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c5", op, join, hur05c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c5;


   procedure Add_hur05c6( c : in out d.Criteria; hur05c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c6", op, join, hur05c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c6;


   procedure Add_hur05c7( c : in out d.Criteria; hur05c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c7", op, join, hur05c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c7;


   procedure Add_hur05c8( c : in out d.Criteria; hur05c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c8", op, join, hur05c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c8;


   procedure Add_hur05c9( c : in out d.Criteria; hur05c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur05c9", op, join, hur05c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c9;


   procedure Add_hur06c1( c : in out d.Criteria; hur06c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c1", op, join, hur06c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c1;


   procedure Add_hur06c2( c : in out d.Criteria; hur06c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c2", op, join, hur06c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c2;


   procedure Add_hur06c3( c : in out d.Criteria; hur06c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c3", op, join, hur06c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c3;


   procedure Add_hur06c4( c : in out d.Criteria; hur06c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c4", op, join, hur06c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c4;


   procedure Add_hur06c5( c : in out d.Criteria; hur06c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c5", op, join, hur06c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c5;


   procedure Add_hur06c6( c : in out d.Criteria; hur06c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c6", op, join, hur06c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c6;


   procedure Add_hur06c7( c : in out d.Criteria; hur06c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c7", op, join, hur06c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c7;


   procedure Add_hur06c8( c : in out d.Criteria; hur06c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c8", op, join, hur06c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c8;


   procedure Add_hur06c9( c : in out d.Criteria; hur06c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur06c9", op, join, hur06c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c9;


   procedure Add_hur07c1( c : in out d.Criteria; hur07c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c1", op, join, hur07c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c1;


   procedure Add_hur07c2( c : in out d.Criteria; hur07c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c2", op, join, hur07c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c2;


   procedure Add_hur07c3( c : in out d.Criteria; hur07c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c3", op, join, hur07c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c3;


   procedure Add_hur07c4( c : in out d.Criteria; hur07c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c4", op, join, hur07c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c4;


   procedure Add_hur07c5( c : in out d.Criteria; hur07c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c5", op, join, hur07c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c5;


   procedure Add_hur07c6( c : in out d.Criteria; hur07c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c6", op, join, hur07c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c6;


   procedure Add_hur07c7( c : in out d.Criteria; hur07c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c7", op, join, hur07c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c7;


   procedure Add_hur07c8( c : in out d.Criteria; hur07c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c8", op, join, hur07c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c8;


   procedure Add_hur07c9( c : in out d.Criteria; hur07c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur07c9", op, join, hur07c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c9;


   procedure Add_hur08c1( c : in out d.Criteria; hur08c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c1", op, join, hur08c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c1;


   procedure Add_hur08c2( c : in out d.Criteria; hur08c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c2", op, join, hur08c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c2;


   procedure Add_hur08c3( c : in out d.Criteria; hur08c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c3", op, join, hur08c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c3;


   procedure Add_hur08c4( c : in out d.Criteria; hur08c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c4", op, join, hur08c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c4;


   procedure Add_hur08c5( c : in out d.Criteria; hur08c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c5", op, join, hur08c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c5;


   procedure Add_hur08c6( c : in out d.Criteria; hur08c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c6", op, join, hur08c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c6;


   procedure Add_hur08c7( c : in out d.Criteria; hur08c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c7", op, join, hur08c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c7;


   procedure Add_hur08c8( c : in out d.Criteria; hur08c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c8", op, join, hur08c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c8;


   procedure Add_hur08c9( c : in out d.Criteria; hur08c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur08c9", op, join, hur08c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c9;


   procedure Add_hur09c1( c : in out d.Criteria; hur09c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c1", op, join, hur09c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c1;


   procedure Add_hur09c2( c : in out d.Criteria; hur09c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c2", op, join, hur09c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c2;


   procedure Add_hur09c3( c : in out d.Criteria; hur09c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c3", op, join, hur09c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c3;


   procedure Add_hur09c4( c : in out d.Criteria; hur09c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c4", op, join, hur09c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c4;


   procedure Add_hur09c5( c : in out d.Criteria; hur09c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c5", op, join, hur09c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c5;


   procedure Add_hur09c6( c : in out d.Criteria; hur09c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c6", op, join, hur09c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c6;


   procedure Add_hur09c7( c : in out d.Criteria; hur09c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c7", op, join, hur09c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c7;


   procedure Add_hur09c8( c : in out d.Criteria; hur09c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c8", op, join, hur09c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c8;


   procedure Add_hur09c9( c : in out d.Criteria; hur09c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur09c9", op, join, hur09c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c9;


   procedure Add_hur10c1( c : in out d.Criteria; hur10c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c1", op, join, hur10c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c1;


   procedure Add_hur10c2( c : in out d.Criteria; hur10c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c2", op, join, hur10c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c2;


   procedure Add_hur10c3( c : in out d.Criteria; hur10c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c3", op, join, hur10c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c3;


   procedure Add_hur10c4( c : in out d.Criteria; hur10c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c4", op, join, hur10c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c4;


   procedure Add_hur10c5( c : in out d.Criteria; hur10c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c5", op, join, hur10c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c5;


   procedure Add_hur10c6( c : in out d.Criteria; hur10c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c6", op, join, hur10c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c6;


   procedure Add_hur10c7( c : in out d.Criteria; hur10c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c7", op, join, hur10c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c7;


   procedure Add_hur10c8( c : in out d.Criteria; hur10c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c8", op, join, hur10c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c8;


   procedure Add_hur10c9( c : in out d.Criteria; hur10c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur10c9", op, join, hur10c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c9;


   procedure Add_hur11c1( c : in out d.Criteria; hur11c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c1", op, join, hur11c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c1;


   procedure Add_hur11c2( c : in out d.Criteria; hur11c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c2", op, join, hur11c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c2;


   procedure Add_hur11c3( c : in out d.Criteria; hur11c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c3", op, join, hur11c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c3;


   procedure Add_hur11c4( c : in out d.Criteria; hur11c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c4", op, join, hur11c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c4;


   procedure Add_hur11c5( c : in out d.Criteria; hur11c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c5", op, join, hur11c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c5;


   procedure Add_hur11c6( c : in out d.Criteria; hur11c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c6", op, join, hur11c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c6;


   procedure Add_hur11c7( c : in out d.Criteria; hur11c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c7", op, join, hur11c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c7;


   procedure Add_hur11c8( c : in out d.Criteria; hur11c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c8", op, join, hur11c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c8;


   procedure Add_hur11c9( c : in out d.Criteria; hur11c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur11c9", op, join, hur11c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c9;


   procedure Add_hur12c1( c : in out d.Criteria; hur12c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c1", op, join, hur12c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c1;


   procedure Add_hur12c2( c : in out d.Criteria; hur12c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c2", op, join, hur12c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c2;


   procedure Add_hur12c3( c : in out d.Criteria; hur12c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c3", op, join, hur12c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c3;


   procedure Add_hur12c4( c : in out d.Criteria; hur12c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c4", op, join, hur12c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c4;


   procedure Add_hur12c5( c : in out d.Criteria; hur12c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c5", op, join, hur12c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c5;


   procedure Add_hur12c6( c : in out d.Criteria; hur12c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c6", op, join, hur12c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c6;


   procedure Add_hur12c7( c : in out d.Criteria; hur12c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c7", op, join, hur12c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c7;


   procedure Add_hur12c8( c : in out d.Criteria; hur12c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c8", op, join, hur12c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c8;


   procedure Add_hur12c9( c : in out d.Criteria; hur12c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur12c9", op, join, hur12c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c9;


   procedure Add_hur13c1( c : in out d.Criteria; hur13c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c1", op, join, hur13c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c1;


   procedure Add_hur13c2( c : in out d.Criteria; hur13c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c2", op, join, hur13c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c2;


   procedure Add_hur13c3( c : in out d.Criteria; hur13c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c3", op, join, hur13c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c3;


   procedure Add_hur13c4( c : in out d.Criteria; hur13c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c4", op, join, hur13c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c4;


   procedure Add_hur13c5( c : in out d.Criteria; hur13c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c5", op, join, hur13c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c5;


   procedure Add_hur13c6( c : in out d.Criteria; hur13c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c6", op, join, hur13c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c6;


   procedure Add_hur13c7( c : in out d.Criteria; hur13c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c7", op, join, hur13c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c7;


   procedure Add_hur13c8( c : in out d.Criteria; hur13c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c8", op, join, hur13c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c8;


   procedure Add_hur13c9( c : in out d.Criteria; hur13c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur13c9", op, join, hur13c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c9;


   procedure Add_hur14c1( c : in out d.Criteria; hur14c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c1", op, join, hur14c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c1;


   procedure Add_hur14c2( c : in out d.Criteria; hur14c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c2", op, join, hur14c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c2;


   procedure Add_hur14c3( c : in out d.Criteria; hur14c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c3", op, join, hur14c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c3;


   procedure Add_hur14c4( c : in out d.Criteria; hur14c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c4", op, join, hur14c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c4;


   procedure Add_hur14c5( c : in out d.Criteria; hur14c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c5", op, join, hur14c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c5;


   procedure Add_hur14c6( c : in out d.Criteria; hur14c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c6", op, join, hur14c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c6;


   procedure Add_hur14c7( c : in out d.Criteria; hur14c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c7", op, join, hur14c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c7;


   procedure Add_hur14c8( c : in out d.Criteria; hur14c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c8", op, join, hur14c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c8;


   procedure Add_hur14c9( c : in out d.Criteria; hur14c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur14c9", op, join, hur14c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c9;


   procedure Add_hur15c1( c : in out d.Criteria; hur15c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c1", op, join, hur15c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c1;


   procedure Add_hur15c2( c : in out d.Criteria; hur15c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c2", op, join, hur15c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c2;


   procedure Add_hur15c3( c : in out d.Criteria; hur15c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c3", op, join, hur15c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c3;


   procedure Add_hur15c4( c : in out d.Criteria; hur15c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c4", op, join, hur15c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c4;


   procedure Add_hur15c5( c : in out d.Criteria; hur15c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c5", op, join, hur15c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c5;


   procedure Add_hur15c6( c : in out d.Criteria; hur15c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c6", op, join, hur15c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c6;


   procedure Add_hur15c7( c : in out d.Criteria; hur15c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c7", op, join, hur15c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c7;


   procedure Add_hur15c8( c : in out d.Criteria; hur15c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c8", op, join, hur15c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c8;


   procedure Add_hur15c9( c : in out d.Criteria; hur15c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur15c9", op, join, hur15c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c9;


   procedure Add_hur16c1( c : in out d.Criteria; hur16c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c1", op, join, hur16c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c1;


   procedure Add_hur16c2( c : in out d.Criteria; hur16c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c2", op, join, hur16c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c2;


   procedure Add_hur16c3( c : in out d.Criteria; hur16c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c3", op, join, hur16c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c3;


   procedure Add_hur16c4( c : in out d.Criteria; hur16c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c4", op, join, hur16c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c4;


   procedure Add_hur16c5( c : in out d.Criteria; hur16c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c5", op, join, hur16c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c5;


   procedure Add_hur16c6( c : in out d.Criteria; hur16c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c6", op, join, hur16c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c6;


   procedure Add_hur16c7( c : in out d.Criteria; hur16c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c7", op, join, hur16c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c7;


   procedure Add_hur16c8( c : in out d.Criteria; hur16c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c8", op, join, hur16c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c8;


   procedure Add_hur16c9( c : in out d.Criteria; hur16c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur16c9", op, join, hur16c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c9;


   procedure Add_hur17c1( c : in out d.Criteria; hur17c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c1", op, join, hur17c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c1;


   procedure Add_hur17c2( c : in out d.Criteria; hur17c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c2", op, join, hur17c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c2;


   procedure Add_hur17c3( c : in out d.Criteria; hur17c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c3", op, join, hur17c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c3;


   procedure Add_hur17c4( c : in out d.Criteria; hur17c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c4", op, join, hur17c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c4;


   procedure Add_hur17c5( c : in out d.Criteria; hur17c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c5", op, join, hur17c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c5;


   procedure Add_hur17c6( c : in out d.Criteria; hur17c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c6", op, join, hur17c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c6;


   procedure Add_hur17c7( c : in out d.Criteria; hur17c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c7", op, join, hur17c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c7;


   procedure Add_hur17c8( c : in out d.Criteria; hur17c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c8", op, join, hur17c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c8;


   procedure Add_hur17c9( c : in out d.Criteria; hur17c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur17c9", op, join, hur17c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c9;


   procedure Add_hur18c1( c : in out d.Criteria; hur18c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c1", op, join, hur18c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c1;


   procedure Add_hur18c2( c : in out d.Criteria; hur18c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c2", op, join, hur18c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c2;


   procedure Add_hur18c3( c : in out d.Criteria; hur18c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c3", op, join, hur18c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c3;


   procedure Add_hur18c4( c : in out d.Criteria; hur18c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c4", op, join, hur18c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c4;


   procedure Add_hur18c5( c : in out d.Criteria; hur18c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c5", op, join, hur18c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c5;


   procedure Add_hur18c6( c : in out d.Criteria; hur18c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c6", op, join, hur18c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c6;


   procedure Add_hur18c7( c : in out d.Criteria; hur18c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c7", op, join, hur18c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c7;


   procedure Add_hur18c8( c : in out d.Criteria; hur18c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c8", op, join, hur18c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c8;


   procedure Add_hur18c9( c : in out d.Criteria; hur18c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur18c9", op, join, hur18c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c9;


   procedure Add_hur19c1( c : in out d.Criteria; hur19c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c1", op, join, hur19c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c1;


   procedure Add_hur19c2( c : in out d.Criteria; hur19c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c2", op, join, hur19c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c2;


   procedure Add_hur19c3( c : in out d.Criteria; hur19c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c3", op, join, hur19c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c3;


   procedure Add_hur19c4( c : in out d.Criteria; hur19c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c4", op, join, hur19c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c4;


   procedure Add_hur19c5( c : in out d.Criteria; hur19c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c5", op, join, hur19c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c5;


   procedure Add_hur19c6( c : in out d.Criteria; hur19c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c6", op, join, hur19c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c6;


   procedure Add_hur19c7( c : in out d.Criteria; hur19c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c7", op, join, hur19c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c7;


   procedure Add_hur19c8( c : in out d.Criteria; hur19c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c8", op, join, hur19c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c8;


   procedure Add_hur19c9( c : in out d.Criteria; hur19c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur19c9", op, join, hur19c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c9;


   procedure Add_hur20c1( c : in out d.Criteria; hur20c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c1", op, join, hur20c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c1;


   procedure Add_hur20c2( c : in out d.Criteria; hur20c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c2", op, join, hur20c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c2;


   procedure Add_hur20c3( c : in out d.Criteria; hur20c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c3", op, join, hur20c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c3;


   procedure Add_hur20c4( c : in out d.Criteria; hur20c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c4", op, join, hur20c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c4;


   procedure Add_hur20c5( c : in out d.Criteria; hur20c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c5", op, join, hur20c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c5;


   procedure Add_hur20c6( c : in out d.Criteria; hur20c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c6", op, join, hur20c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c6;


   procedure Add_hur20c7( c : in out d.Criteria; hur20c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c7", op, join, hur20c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c7;


   procedure Add_hur20c8( c : in out d.Criteria; hur20c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c8", op, join, hur20c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c8;


   procedure Add_hur20c9( c : in out d.Criteria; hur20c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hur20c9", op, join, hur20c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c9;


   procedure Add_whl01c1( c : in out d.Criteria; whl01c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c1", op, join, whl01c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c1;


   procedure Add_whl01c2( c : in out d.Criteria; whl01c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c2", op, join, whl01c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c2;


   procedure Add_whl01c3( c : in out d.Criteria; whl01c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c3", op, join, whl01c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c3;


   procedure Add_whl01c4( c : in out d.Criteria; whl01c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c4", op, join, whl01c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c4;


   procedure Add_whl01c5( c : in out d.Criteria; whl01c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c5", op, join, whl01c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c5;


   procedure Add_whl01c6( c : in out d.Criteria; whl01c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c6", op, join, whl01c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c6;


   procedure Add_whl01c7( c : in out d.Criteria; whl01c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c7", op, join, whl01c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c7;


   procedure Add_whl01c8( c : in out d.Criteria; whl01c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c8", op, join, whl01c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c8;


   procedure Add_whl01c9( c : in out d.Criteria; whl01c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl01c9", op, join, whl01c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c9;


   procedure Add_whl02c1( c : in out d.Criteria; whl02c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c1", op, join, whl02c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c1;


   procedure Add_whl02c2( c : in out d.Criteria; whl02c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c2", op, join, whl02c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c2;


   procedure Add_whl02c3( c : in out d.Criteria; whl02c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c3", op, join, whl02c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c3;


   procedure Add_whl02c4( c : in out d.Criteria; whl02c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c4", op, join, whl02c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c4;


   procedure Add_whl02c5( c : in out d.Criteria; whl02c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c5", op, join, whl02c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c5;


   procedure Add_whl02c6( c : in out d.Criteria; whl02c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c6", op, join, whl02c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c6;


   procedure Add_whl02c7( c : in out d.Criteria; whl02c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c7", op, join, whl02c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c7;


   procedure Add_whl02c8( c : in out d.Criteria; whl02c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c8", op, join, whl02c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c8;


   procedure Add_whl02c9( c : in out d.Criteria; whl02c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl02c9", op, join, whl02c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c9;


   procedure Add_whl03c1( c : in out d.Criteria; whl03c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c1", op, join, whl03c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c1;


   procedure Add_whl03c2( c : in out d.Criteria; whl03c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c2", op, join, whl03c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c2;


   procedure Add_whl03c3( c : in out d.Criteria; whl03c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c3", op, join, whl03c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c3;


   procedure Add_whl03c4( c : in out d.Criteria; whl03c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c4", op, join, whl03c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c4;


   procedure Add_whl03c5( c : in out d.Criteria; whl03c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c5", op, join, whl03c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c5;


   procedure Add_whl03c6( c : in out d.Criteria; whl03c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c6", op, join, whl03c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c6;


   procedure Add_whl03c7( c : in out d.Criteria; whl03c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c7", op, join, whl03c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c7;


   procedure Add_whl03c8( c : in out d.Criteria; whl03c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c8", op, join, whl03c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c8;


   procedure Add_whl03c9( c : in out d.Criteria; whl03c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl03c9", op, join, whl03c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c9;


   procedure Add_whl04c1( c : in out d.Criteria; whl04c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c1", op, join, whl04c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c1;


   procedure Add_whl04c2( c : in out d.Criteria; whl04c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c2", op, join, whl04c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c2;


   procedure Add_whl04c3( c : in out d.Criteria; whl04c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c3", op, join, whl04c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c3;


   procedure Add_whl04c4( c : in out d.Criteria; whl04c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c4", op, join, whl04c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c4;


   procedure Add_whl04c5( c : in out d.Criteria; whl04c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c5", op, join, whl04c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c5;


   procedure Add_whl04c6( c : in out d.Criteria; whl04c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c6", op, join, whl04c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c6;


   procedure Add_whl04c7( c : in out d.Criteria; whl04c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c7", op, join, whl04c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c7;


   procedure Add_whl04c8( c : in out d.Criteria; whl04c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c8", op, join, whl04c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c8;


   procedure Add_whl04c9( c : in out d.Criteria; whl04c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl04c9", op, join, whl04c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c9;


   procedure Add_whl05c1( c : in out d.Criteria; whl05c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c1", op, join, whl05c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c1;


   procedure Add_whl05c2( c : in out d.Criteria; whl05c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c2", op, join, whl05c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c2;


   procedure Add_whl05c3( c : in out d.Criteria; whl05c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c3", op, join, whl05c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c3;


   procedure Add_whl05c4( c : in out d.Criteria; whl05c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c4", op, join, whl05c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c4;


   procedure Add_whl05c5( c : in out d.Criteria; whl05c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c5", op, join, whl05c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c5;


   procedure Add_whl05c6( c : in out d.Criteria; whl05c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c6", op, join, whl05c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c6;


   procedure Add_whl05c7( c : in out d.Criteria; whl05c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c7", op, join, whl05c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c7;


   procedure Add_whl05c8( c : in out d.Criteria; whl05c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c8", op, join, whl05c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c8;


   procedure Add_whl05c9( c : in out d.Criteria; whl05c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl05c9", op, join, whl05c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c9;


   procedure Add_whl06c1( c : in out d.Criteria; whl06c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c1", op, join, whl06c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c1;


   procedure Add_whl06c2( c : in out d.Criteria; whl06c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c2", op, join, whl06c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c2;


   procedure Add_whl06c3( c : in out d.Criteria; whl06c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c3", op, join, whl06c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c3;


   procedure Add_whl06c4( c : in out d.Criteria; whl06c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c4", op, join, whl06c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c4;


   procedure Add_whl06c5( c : in out d.Criteria; whl06c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c5", op, join, whl06c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c5;


   procedure Add_whl06c6( c : in out d.Criteria; whl06c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c6", op, join, whl06c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c6;


   procedure Add_whl06c7( c : in out d.Criteria; whl06c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c7", op, join, whl06c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c7;


   procedure Add_whl06c8( c : in out d.Criteria; whl06c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c8", op, join, whl06c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c8;


   procedure Add_whl06c9( c : in out d.Criteria; whl06c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl06c9", op, join, whl06c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c9;


   procedure Add_whl07c1( c : in out d.Criteria; whl07c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c1", op, join, whl07c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c1;


   procedure Add_whl07c2( c : in out d.Criteria; whl07c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c2", op, join, whl07c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c2;


   procedure Add_whl07c3( c : in out d.Criteria; whl07c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c3", op, join, whl07c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c3;


   procedure Add_whl07c4( c : in out d.Criteria; whl07c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c4", op, join, whl07c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c4;


   procedure Add_whl07c5( c : in out d.Criteria; whl07c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c5", op, join, whl07c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c5;


   procedure Add_whl07c6( c : in out d.Criteria; whl07c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c6", op, join, whl07c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c6;


   procedure Add_whl07c7( c : in out d.Criteria; whl07c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c7", op, join, whl07c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c7;


   procedure Add_whl07c8( c : in out d.Criteria; whl07c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c8", op, join, whl07c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c8;


   procedure Add_whl07c9( c : in out d.Criteria; whl07c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl07c9", op, join, whl07c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c9;


   procedure Add_whl08c1( c : in out d.Criteria; whl08c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c1", op, join, whl08c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c1;


   procedure Add_whl08c2( c : in out d.Criteria; whl08c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c2", op, join, whl08c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c2;


   procedure Add_whl08c3( c : in out d.Criteria; whl08c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c3", op, join, whl08c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c3;


   procedure Add_whl08c4( c : in out d.Criteria; whl08c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c4", op, join, whl08c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c4;


   procedure Add_whl08c5( c : in out d.Criteria; whl08c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c5", op, join, whl08c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c5;


   procedure Add_whl08c6( c : in out d.Criteria; whl08c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c6", op, join, whl08c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c6;


   procedure Add_whl08c7( c : in out d.Criteria; whl08c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c7", op, join, whl08c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c7;


   procedure Add_whl08c8( c : in out d.Criteria; whl08c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c8", op, join, whl08c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c8;


   procedure Add_whl08c9( c : in out d.Criteria; whl08c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl08c9", op, join, whl08c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c9;


   procedure Add_whl09c1( c : in out d.Criteria; whl09c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c1", op, join, whl09c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c1;


   procedure Add_whl09c2( c : in out d.Criteria; whl09c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c2", op, join, whl09c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c2;


   procedure Add_whl09c3( c : in out d.Criteria; whl09c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c3", op, join, whl09c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c3;


   procedure Add_whl09c4( c : in out d.Criteria; whl09c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c4", op, join, whl09c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c4;


   procedure Add_whl09c5( c : in out d.Criteria; whl09c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c5", op, join, whl09c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c5;


   procedure Add_whl09c6( c : in out d.Criteria; whl09c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c6", op, join, whl09c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c6;


   procedure Add_whl09c7( c : in out d.Criteria; whl09c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c7", op, join, whl09c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c7;


   procedure Add_whl09c8( c : in out d.Criteria; whl09c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c8", op, join, whl09c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c8;


   procedure Add_whl09c9( c : in out d.Criteria; whl09c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl09c9", op, join, whl09c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c9;


   procedure Add_whl10c1( c : in out d.Criteria; whl10c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c1", op, join, whl10c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c1;


   procedure Add_whl10c2( c : in out d.Criteria; whl10c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c2", op, join, whl10c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c2;


   procedure Add_whl10c3( c : in out d.Criteria; whl10c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c3", op, join, whl10c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c3;


   procedure Add_whl10c4( c : in out d.Criteria; whl10c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c4", op, join, whl10c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c4;


   procedure Add_whl10c5( c : in out d.Criteria; whl10c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c5", op, join, whl10c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c5;


   procedure Add_whl10c6( c : in out d.Criteria; whl10c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c6", op, join, whl10c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c6;


   procedure Add_whl10c7( c : in out d.Criteria; whl10c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c7", op, join, whl10c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c7;


   procedure Add_whl10c8( c : in out d.Criteria; whl10c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c8", op, join, whl10c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c8;


   procedure Add_whl10c9( c : in out d.Criteria; whl10c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl10c9", op, join, whl10c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c9;


   procedure Add_whl11c1( c : in out d.Criteria; whl11c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c1", op, join, whl11c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c1;


   procedure Add_whl11c2( c : in out d.Criteria; whl11c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c2", op, join, whl11c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c2;


   procedure Add_whl11c3( c : in out d.Criteria; whl11c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c3", op, join, whl11c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c3;


   procedure Add_whl11c4( c : in out d.Criteria; whl11c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c4", op, join, whl11c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c4;


   procedure Add_whl11c5( c : in out d.Criteria; whl11c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c5", op, join, whl11c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c5;


   procedure Add_whl11c6( c : in out d.Criteria; whl11c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c6", op, join, whl11c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c6;


   procedure Add_whl11c7( c : in out d.Criteria; whl11c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c7", op, join, whl11c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c7;


   procedure Add_whl11c8( c : in out d.Criteria; whl11c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c8", op, join, whl11c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c8;


   procedure Add_whl11c9( c : in out d.Criteria; whl11c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl11c9", op, join, whl11c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c9;


   procedure Add_whl12c1( c : in out d.Criteria; whl12c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c1", op, join, whl12c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c1;


   procedure Add_whl12c2( c : in out d.Criteria; whl12c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c2", op, join, whl12c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c2;


   procedure Add_whl12c3( c : in out d.Criteria; whl12c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c3", op, join, whl12c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c3;


   procedure Add_whl12c4( c : in out d.Criteria; whl12c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c4", op, join, whl12c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c4;


   procedure Add_whl12c5( c : in out d.Criteria; whl12c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c5", op, join, whl12c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c5;


   procedure Add_whl12c6( c : in out d.Criteria; whl12c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c6", op, join, whl12c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c6;


   procedure Add_whl12c7( c : in out d.Criteria; whl12c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c7", op, join, whl12c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c7;


   procedure Add_whl12c8( c : in out d.Criteria; whl12c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c8", op, join, whl12c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c8;


   procedure Add_whl12c9( c : in out d.Criteria; whl12c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl12c9", op, join, whl12c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c9;


   procedure Add_whl13c1( c : in out d.Criteria; whl13c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c1", op, join, whl13c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c1;


   procedure Add_whl13c2( c : in out d.Criteria; whl13c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c2", op, join, whl13c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c2;


   procedure Add_whl13c3( c : in out d.Criteria; whl13c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c3", op, join, whl13c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c3;


   procedure Add_whl13c4( c : in out d.Criteria; whl13c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c4", op, join, whl13c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c4;


   procedure Add_whl13c5( c : in out d.Criteria; whl13c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c5", op, join, whl13c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c5;


   procedure Add_whl13c6( c : in out d.Criteria; whl13c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c6", op, join, whl13c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c6;


   procedure Add_whl13c7( c : in out d.Criteria; whl13c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c7", op, join, whl13c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c7;


   procedure Add_whl13c8( c : in out d.Criteria; whl13c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c8", op, join, whl13c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c8;


   procedure Add_whl13c9( c : in out d.Criteria; whl13c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl13c9", op, join, whl13c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c9;


   procedure Add_whl14c1( c : in out d.Criteria; whl14c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c1", op, join, whl14c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c1;


   procedure Add_whl14c2( c : in out d.Criteria; whl14c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c2", op, join, whl14c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c2;


   procedure Add_whl14c3( c : in out d.Criteria; whl14c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c3", op, join, whl14c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c3;


   procedure Add_whl14c4( c : in out d.Criteria; whl14c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c4", op, join, whl14c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c4;


   procedure Add_whl14c5( c : in out d.Criteria; whl14c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c5", op, join, whl14c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c5;


   procedure Add_whl14c6( c : in out d.Criteria; whl14c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c6", op, join, whl14c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c6;


   procedure Add_whl14c7( c : in out d.Criteria; whl14c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c7", op, join, whl14c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c7;


   procedure Add_whl14c8( c : in out d.Criteria; whl14c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c8", op, join, whl14c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c8;


   procedure Add_whl14c9( c : in out d.Criteria; whl14c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl14c9", op, join, whl14c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c9;


   procedure Add_whl15c1( c : in out d.Criteria; whl15c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c1", op, join, whl15c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c1;


   procedure Add_whl15c2( c : in out d.Criteria; whl15c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c2", op, join, whl15c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c2;


   procedure Add_whl15c3( c : in out d.Criteria; whl15c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c3", op, join, whl15c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c3;


   procedure Add_whl15c4( c : in out d.Criteria; whl15c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c4", op, join, whl15c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c4;


   procedure Add_whl15c5( c : in out d.Criteria; whl15c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c5", op, join, whl15c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c5;


   procedure Add_whl15c6( c : in out d.Criteria; whl15c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c6", op, join, whl15c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c6;


   procedure Add_whl15c7( c : in out d.Criteria; whl15c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c7", op, join, whl15c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c7;


   procedure Add_whl15c8( c : in out d.Criteria; whl15c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c8", op, join, whl15c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c8;


   procedure Add_whl15c9( c : in out d.Criteria; whl15c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl15c9", op, join, whl15c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c9;


   procedure Add_whl16c1( c : in out d.Criteria; whl16c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c1", op, join, whl16c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c1;


   procedure Add_whl16c2( c : in out d.Criteria; whl16c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c2", op, join, whl16c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c2;


   procedure Add_whl16c3( c : in out d.Criteria; whl16c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c3", op, join, whl16c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c3;


   procedure Add_whl16c4( c : in out d.Criteria; whl16c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c4", op, join, whl16c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c4;


   procedure Add_whl16c5( c : in out d.Criteria; whl16c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c5", op, join, whl16c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c5;


   procedure Add_whl16c6( c : in out d.Criteria; whl16c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c6", op, join, whl16c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c6;


   procedure Add_whl16c7( c : in out d.Criteria; whl16c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c7", op, join, whl16c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c7;


   procedure Add_whl16c8( c : in out d.Criteria; whl16c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c8", op, join, whl16c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c8;


   procedure Add_whl16c9( c : in out d.Criteria; whl16c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl16c9", op, join, whl16c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c9;


   procedure Add_whl17c1( c : in out d.Criteria; whl17c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c1", op, join, whl17c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c1;


   procedure Add_whl17c2( c : in out d.Criteria; whl17c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c2", op, join, whl17c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c2;


   procedure Add_whl17c3( c : in out d.Criteria; whl17c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c3", op, join, whl17c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c3;


   procedure Add_whl17c4( c : in out d.Criteria; whl17c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c4", op, join, whl17c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c4;


   procedure Add_whl17c5( c : in out d.Criteria; whl17c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c5", op, join, whl17c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c5;


   procedure Add_whl17c6( c : in out d.Criteria; whl17c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c6", op, join, whl17c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c6;


   procedure Add_whl17c7( c : in out d.Criteria; whl17c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c7", op, join, whl17c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c7;


   procedure Add_whl17c8( c : in out d.Criteria; whl17c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c8", op, join, whl17c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c8;


   procedure Add_whl17c9( c : in out d.Criteria; whl17c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl17c9", op, join, whl17c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c9;


   procedure Add_whl18c1( c : in out d.Criteria; whl18c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c1", op, join, whl18c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c1;


   procedure Add_whl18c2( c : in out d.Criteria; whl18c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c2", op, join, whl18c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c2;


   procedure Add_whl18c3( c : in out d.Criteria; whl18c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c3", op, join, whl18c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c3;


   procedure Add_whl18c4( c : in out d.Criteria; whl18c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c4", op, join, whl18c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c4;


   procedure Add_whl18c5( c : in out d.Criteria; whl18c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c5", op, join, whl18c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c5;


   procedure Add_whl18c6( c : in out d.Criteria; whl18c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c6", op, join, whl18c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c6;


   procedure Add_whl18c7( c : in out d.Criteria; whl18c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c7", op, join, whl18c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c7;


   procedure Add_whl18c8( c : in out d.Criteria; whl18c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c8", op, join, whl18c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c8;


   procedure Add_whl18c9( c : in out d.Criteria; whl18c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl18c9", op, join, whl18c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c9;


   procedure Add_whl19c1( c : in out d.Criteria; whl19c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c1", op, join, whl19c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c1;


   procedure Add_whl19c2( c : in out d.Criteria; whl19c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c2", op, join, whl19c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c2;


   procedure Add_whl19c3( c : in out d.Criteria; whl19c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c3", op, join, whl19c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c3;


   procedure Add_whl19c4( c : in out d.Criteria; whl19c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c4", op, join, whl19c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c4;


   procedure Add_whl19c5( c : in out d.Criteria; whl19c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c5", op, join, whl19c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c5;


   procedure Add_whl19c6( c : in out d.Criteria; whl19c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c6", op, join, whl19c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c6;


   procedure Add_whl19c7( c : in out d.Criteria; whl19c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c7", op, join, whl19c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c7;


   procedure Add_whl19c8( c : in out d.Criteria; whl19c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c8", op, join, whl19c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c8;


   procedure Add_whl19c9( c : in out d.Criteria; whl19c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl19c9", op, join, whl19c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c9;


   procedure Add_whl20c1( c : in out d.Criteria; whl20c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c1", op, join, whl20c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c1;


   procedure Add_whl20c2( c : in out d.Criteria; whl20c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c2", op, join, whl20c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c2;


   procedure Add_whl20c3( c : in out d.Criteria; whl20c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c3", op, join, whl20c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c3;


   procedure Add_whl20c4( c : in out d.Criteria; whl20c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c4", op, join, whl20c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c4;


   procedure Add_whl20c5( c : in out d.Criteria; whl20c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c5", op, join, whl20c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c5;


   procedure Add_whl20c6( c : in out d.Criteria; whl20c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c6", op, join, whl20c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c6;


   procedure Add_whl20c7( c : in out d.Criteria; whl20c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c7", op, join, whl20c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c7;


   procedure Add_whl20c8( c : in out d.Criteria; whl20c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c8", op, join, whl20c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c8;


   procedure Add_whl20c9( c : in out d.Criteria; whl20c9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whl20c9", op, join, whl20c9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c9;


   procedure Add_agec1( c : in out d.Criteria; agec1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec1", op, join, agec1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec1;


   procedure Add_agec2( c : in out d.Criteria; agec2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec2", op, join, agec2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec2;


   procedure Add_agec3( c : in out d.Criteria; agec3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec3", op, join, agec3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec3;


   procedure Add_agec4( c : in out d.Criteria; agec4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec4", op, join, agec4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec4;


   procedure Add_agec5( c : in out d.Criteria; agec5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec5", op, join, agec5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec5;


   procedure Add_agec6( c : in out d.Criteria; agec6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec6", op, join, agec6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec6;


   procedure Add_agec7( c : in out d.Criteria; agec7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec7", op, join, agec7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec7;


   procedure Add_agec8( c : in out d.Criteria; agec8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "agec8", op, join, agec8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec8;


   procedure Add_cameyrc1( c : in out d.Criteria; cameyrc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc1", op, join, cameyrc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc1;


   procedure Add_cameyrc2( c : in out d.Criteria; cameyrc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc2", op, join, cameyrc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc2;


   procedure Add_cameyrc3( c : in out d.Criteria; cameyrc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc3", op, join, cameyrc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc3;


   procedure Add_cameyrc4( c : in out d.Criteria; cameyrc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc4", op, join, cameyrc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc4;


   procedure Add_cameyrc5( c : in out d.Criteria; cameyrc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc5", op, join, cameyrc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc5;


   procedure Add_cameyrc6( c : in out d.Criteria; cameyrc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc6", op, join, cameyrc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc6;


   procedure Add_cameyrc7( c : in out d.Criteria; cameyrc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc7", op, join, cameyrc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc7;


   procedure Add_cameyrc8( c : in out d.Criteria; cameyrc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cameyrc8", op, join, cameyrc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc8;


   procedure Add_chcrec1( c : in out d.Criteria; chcrec1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec1", op, join, chcrec1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec1;


   procedure Add_chcrec2( c : in out d.Criteria; chcrec2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec2", op, join, chcrec2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec2;


   procedure Add_chcrec3( c : in out d.Criteria; chcrec3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec3", op, join, chcrec3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec3;


   procedure Add_chcrec4( c : in out d.Criteria; chcrec4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec4", op, join, chcrec4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec4;


   procedure Add_chcrec5( c : in out d.Criteria; chcrec5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec5", op, join, chcrec5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec5;


   procedure Add_chcrec6( c : in out d.Criteria; chcrec6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec6", op, join, chcrec6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec6;


   procedure Add_chcrec7( c : in out d.Criteria; chcrec7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec7", op, join, chcrec7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec7;


   procedure Add_chcrec8( c : in out d.Criteria; chcrec8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcrec8", op, join, chcrec8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec8;


   procedure Add_creabc1( c : in out d.Criteria; creabc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc1", op, join, creabc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc1;


   procedure Add_creabc2( c : in out d.Criteria; creabc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc2", op, join, creabc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc2;


   procedure Add_creabc3( c : in out d.Criteria; creabc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc3", op, join, creabc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc3;


   procedure Add_creabc4( c : in out d.Criteria; creabc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc4", op, join, creabc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc4;


   procedure Add_creabc5( c : in out d.Criteria; creabc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc5", op, join, creabc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc5;


   procedure Add_creabc6( c : in out d.Criteria; creabc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc6", op, join, creabc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc6;


   procedure Add_creabc7( c : in out d.Criteria; creabc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc7", op, join, creabc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc7;


   procedure Add_creabc8( c : in out d.Criteria; creabc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creabc8", op, join, creabc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc8;


   procedure Add_creahc1( c : in out d.Criteria; creahc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc1", op, join, creahc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc1;


   procedure Add_creahc2( c : in out d.Criteria; creahc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc2", op, join, creahc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc2;


   procedure Add_creahc3( c : in out d.Criteria; creahc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc3", op, join, creahc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc3;


   procedure Add_creahc4( c : in out d.Criteria; creahc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc4", op, join, creahc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc4;


   procedure Add_creahc5( c : in out d.Criteria; creahc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc5", op, join, creahc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc5;


   procedure Add_creahc6( c : in out d.Criteria; creahc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc6", op, join, creahc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc6;


   procedure Add_creahc7( c : in out d.Criteria; creahc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc7", op, join, creahc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc7;


   procedure Add_creahc8( c : in out d.Criteria; creahc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creahc8", op, join, creahc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc8;


   procedure Add_crecbc1( c : in out d.Criteria; crecbc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc1", op, join, crecbc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc1;


   procedure Add_crecbc2( c : in out d.Criteria; crecbc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc2", op, join, crecbc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc2;


   procedure Add_crecbc3( c : in out d.Criteria; crecbc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc3", op, join, crecbc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc3;


   procedure Add_crecbc4( c : in out d.Criteria; crecbc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc4", op, join, crecbc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc4;


   procedure Add_crecbc5( c : in out d.Criteria; crecbc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc5", op, join, crecbc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc5;


   procedure Add_crecbc6( c : in out d.Criteria; crecbc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc6", op, join, crecbc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc6;


   procedure Add_crecbc7( c : in out d.Criteria; crecbc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc7", op, join, crecbc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc7;


   procedure Add_crecbc8( c : in out d.Criteria; crecbc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crecbc8", op, join, crecbc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc8;


   procedure Add_crechc1( c : in out d.Criteria; crechc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc1", op, join, crechc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc1;


   procedure Add_crechc2( c : in out d.Criteria; crechc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc2", op, join, crechc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc2;


   procedure Add_crechc3( c : in out d.Criteria; crechc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc3", op, join, crechc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc3;


   procedure Add_crechc4( c : in out d.Criteria; crechc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc4", op, join, crechc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc4;


   procedure Add_crechc5( c : in out d.Criteria; crechc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc5", op, join, crechc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc5;


   procedure Add_crechc6( c : in out d.Criteria; crechc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc6", op, join, crechc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc6;


   procedure Add_crechc7( c : in out d.Criteria; crechc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc7", op, join, crechc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc7;


   procedure Add_crechc8( c : in out d.Criteria; crechc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crechc8", op, join, crechc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc8;


   procedure Add_creclc1( c : in out d.Criteria; creclc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc1", op, join, creclc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc1;


   procedure Add_creclc2( c : in out d.Criteria; creclc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc2", op, join, creclc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc2;


   procedure Add_creclc3( c : in out d.Criteria; creclc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc3", op, join, creclc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc3;


   procedure Add_creclc4( c : in out d.Criteria; creclc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc4", op, join, creclc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc4;


   procedure Add_creclc5( c : in out d.Criteria; creclc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc5", op, join, creclc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc5;


   procedure Add_creclc6( c : in out d.Criteria; creclc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc6", op, join, creclc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc6;


   procedure Add_creclc7( c : in out d.Criteria; creclc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc7", op, join, creclc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc7;


   procedure Add_creclc8( c : in out d.Criteria; creclc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creclc8", op, join, creclc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc8;


   procedure Add_crefrc1( c : in out d.Criteria; crefrc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc1", op, join, crefrc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc1;


   procedure Add_crefrc2( c : in out d.Criteria; crefrc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc2", op, join, crefrc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc2;


   procedure Add_crefrc3( c : in out d.Criteria; crefrc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc3", op, join, crefrc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc3;


   procedure Add_crefrc4( c : in out d.Criteria; crefrc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc4", op, join, crefrc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc4;


   procedure Add_crefrc5( c : in out d.Criteria; crefrc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc5", op, join, crefrc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc5;


   procedure Add_crefrc6( c : in out d.Criteria; crefrc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc6", op, join, crefrc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc6;


   procedure Add_crefrc7( c : in out d.Criteria; crefrc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc7", op, join, crefrc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc7;


   procedure Add_crefrc8( c : in out d.Criteria; crefrc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crefrc8", op, join, crefrc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc8;


   procedure Add_creotc1( c : in out d.Criteria; creotc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc1", op, join, creotc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc1;


   procedure Add_creotc2( c : in out d.Criteria; creotc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc2", op, join, creotc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc2;


   procedure Add_creotc3( c : in out d.Criteria; creotc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc3", op, join, creotc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc3;


   procedure Add_creotc4( c : in out d.Criteria; creotc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc4", op, join, creotc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc4;


   procedure Add_creotc5( c : in out d.Criteria; creotc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc5", op, join, creotc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc5;


   procedure Add_creotc6( c : in out d.Criteria; creotc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc6", op, join, creotc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc6;


   procedure Add_creotc7( c : in out d.Criteria; creotc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc7", op, join, creotc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc7;


   procedure Add_creotc8( c : in out d.Criteria; creotc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "creotc8", op, join, creotc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc8;


   procedure Add_carerc1( c : in out d.Criteria; carerc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc1", op, join, carerc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc1;


   procedure Add_carerc2( c : in out d.Criteria; carerc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc2", op, join, carerc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc2;


   procedure Add_carerc3( c : in out d.Criteria; carerc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc3", op, join, carerc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc3;


   procedure Add_carerc4( c : in out d.Criteria; carerc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc4", op, join, carerc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc4;


   procedure Add_carerc5( c : in out d.Criteria; carerc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc5", op, join, carerc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc5;


   procedure Add_carerc6( c : in out d.Criteria; carerc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc6", op, join, carerc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc6;


   procedure Add_carerc7( c : in out d.Criteria; carerc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc7", op, join, carerc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc7;


   procedure Add_carerc8( c : in out d.Criteria; carerc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carerc8", op, join, carerc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc8;


   procedure Add_cdatrec1( c : in out d.Criteria; cdatrec1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec1", op, join, cdatrec1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec1;


   procedure Add_cdatrec2( c : in out d.Criteria; cdatrec2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec2", op, join, cdatrec2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec2;


   procedure Add_cdatrec3( c : in out d.Criteria; cdatrec3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec3", op, join, cdatrec3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec3;


   procedure Add_cdatrec4( c : in out d.Criteria; cdatrec4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec4", op, join, cdatrec4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec4;


   procedure Add_cdatrec5( c : in out d.Criteria; cdatrec5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec5", op, join, cdatrec5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec5;


   procedure Add_cdatrec6( c : in out d.Criteria; cdatrec6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec6", op, join, cdatrec6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec6;


   procedure Add_cdatrec7( c : in out d.Criteria; cdatrec7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec7", op, join, cdatrec7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec7;


   procedure Add_cdatrec8( c : in out d.Criteria; cdatrec8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdatrec8", op, join, cdatrec8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec8;


   procedure Add_cdtrepc1( c : in out d.Criteria; cdtrepc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc1", op, join, cdtrepc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc1;


   procedure Add_cdtrepc2( c : in out d.Criteria; cdtrepc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc2", op, join, cdtrepc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc2;


   procedure Add_cdtrepc3( c : in out d.Criteria; cdtrepc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc3", op, join, cdtrepc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc3;


   procedure Add_cdtrepc4( c : in out d.Criteria; cdtrepc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc4", op, join, cdtrepc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc4;


   procedure Add_cdtrepc5( c : in out d.Criteria; cdtrepc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc5", op, join, cdtrepc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc5;


   procedure Add_cdtrepc6( c : in out d.Criteria; cdtrepc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc6", op, join, cdtrepc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc6;


   procedure Add_cdtrepc7( c : in out d.Criteria; cdtrepc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc7", op, join, cdtrepc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc7;


   procedure Add_cdtrepc8( c : in out d.Criteria; cdtrepc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdtrepc8", op, join, cdtrepc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc8;


   procedure Add_cdis1c1( c : in out d.Criteria; cdis1c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c1", op, join, cdis1c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c1;


   procedure Add_cdis1c2( c : in out d.Criteria; cdis1c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c2", op, join, cdis1c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c2;


   procedure Add_cdis1c3( c : in out d.Criteria; cdis1c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c3", op, join, cdis1c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c3;


   procedure Add_cdis1c4( c : in out d.Criteria; cdis1c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c4", op, join, cdis1c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c4;


   procedure Add_cdis1c5( c : in out d.Criteria; cdis1c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c5", op, join, cdis1c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c5;


   procedure Add_cdis1c6( c : in out d.Criteria; cdis1c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c6", op, join, cdis1c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c6;


   procedure Add_cdis1c7( c : in out d.Criteria; cdis1c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c7", op, join, cdis1c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c7;


   procedure Add_cdis1c8( c : in out d.Criteria; cdis1c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis1c8", op, join, cdis1c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c8;


   procedure Add_cdis2c1( c : in out d.Criteria; cdis2c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c1", op, join, cdis2c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c1;


   procedure Add_cdis2c2( c : in out d.Criteria; cdis2c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c2", op, join, cdis2c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c2;


   procedure Add_cdis2c3( c : in out d.Criteria; cdis2c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c3", op, join, cdis2c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c3;


   procedure Add_cdis2c4( c : in out d.Criteria; cdis2c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c4", op, join, cdis2c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c4;


   procedure Add_cdis2c5( c : in out d.Criteria; cdis2c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c5", op, join, cdis2c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c5;


   procedure Add_cdis2c6( c : in out d.Criteria; cdis2c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c6", op, join, cdis2c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c6;


   procedure Add_cdis2c7( c : in out d.Criteria; cdis2c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c7", op, join, cdis2c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c7;


   procedure Add_cdis2c8( c : in out d.Criteria; cdis2c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis2c8", op, join, cdis2c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c8;


   procedure Add_cdis3c1( c : in out d.Criteria; cdis3c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c1", op, join, cdis3c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c1;


   procedure Add_cdis3c2( c : in out d.Criteria; cdis3c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c2", op, join, cdis3c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c2;


   procedure Add_cdis3c3( c : in out d.Criteria; cdis3c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c3", op, join, cdis3c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c3;


   procedure Add_cdis3c4( c : in out d.Criteria; cdis3c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c4", op, join, cdis3c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c4;


   procedure Add_cdis3c5( c : in out d.Criteria; cdis3c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c5", op, join, cdis3c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c5;


   procedure Add_cdis3c6( c : in out d.Criteria; cdis3c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c6", op, join, cdis3c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c6;


   procedure Add_cdis3c7( c : in out d.Criteria; cdis3c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c7", op, join, cdis3c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c7;


   procedure Add_cdis3c8( c : in out d.Criteria; cdis3c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis3c8", op, join, cdis3c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c8;


   procedure Add_cdis4c1( c : in out d.Criteria; cdis4c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c1", op, join, cdis4c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c1;


   procedure Add_cdis4c2( c : in out d.Criteria; cdis4c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c2", op, join, cdis4c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c2;


   procedure Add_cdis4c3( c : in out d.Criteria; cdis4c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c3", op, join, cdis4c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c3;


   procedure Add_cdis4c4( c : in out d.Criteria; cdis4c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c4", op, join, cdis4c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c4;


   procedure Add_cdis4c5( c : in out d.Criteria; cdis4c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c5", op, join, cdis4c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c5;


   procedure Add_cdis4c6( c : in out d.Criteria; cdis4c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c6", op, join, cdis4c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c6;


   procedure Add_cdis4c7( c : in out d.Criteria; cdis4c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c7", op, join, cdis4c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c7;


   procedure Add_cdis4c8( c : in out d.Criteria; cdis4c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis4c8", op, join, cdis4c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c8;


   procedure Add_cdis5c1( c : in out d.Criteria; cdis5c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c1", op, join, cdis5c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c1;


   procedure Add_cdis5c2( c : in out d.Criteria; cdis5c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c2", op, join, cdis5c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c2;


   procedure Add_cdis5c3( c : in out d.Criteria; cdis5c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c3", op, join, cdis5c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c3;


   procedure Add_cdis5c4( c : in out d.Criteria; cdis5c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c4", op, join, cdis5c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c4;


   procedure Add_cdis5c5( c : in out d.Criteria; cdis5c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c5", op, join, cdis5c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c5;


   procedure Add_cdis5c6( c : in out d.Criteria; cdis5c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c6", op, join, cdis5c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c6;


   procedure Add_cdis5c7( c : in out d.Criteria; cdis5c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c7", op, join, cdis5c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c7;


   procedure Add_cdis5c8( c : in out d.Criteria; cdis5c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis5c8", op, join, cdis5c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c8;


   procedure Add_cdis6c1( c : in out d.Criteria; cdis6c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c1", op, join, cdis6c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c1;


   procedure Add_cdis6c2( c : in out d.Criteria; cdis6c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c2", op, join, cdis6c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c2;


   procedure Add_cdis6c3( c : in out d.Criteria; cdis6c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c3", op, join, cdis6c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c3;


   procedure Add_cdis6c4( c : in out d.Criteria; cdis6c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c4", op, join, cdis6c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c4;


   procedure Add_cdis6c5( c : in out d.Criteria; cdis6c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c5", op, join, cdis6c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c5;


   procedure Add_cdis6c6( c : in out d.Criteria; cdis6c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c6", op, join, cdis6c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c6;


   procedure Add_cdis6c7( c : in out d.Criteria; cdis6c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c7", op, join, cdis6c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c7;


   procedure Add_cdis6c8( c : in out d.Criteria; cdis6c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis6c8", op, join, cdis6c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c8;


   procedure Add_cdis7c1( c : in out d.Criteria; cdis7c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c1", op, join, cdis7c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c1;


   procedure Add_cdis7c2( c : in out d.Criteria; cdis7c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c2", op, join, cdis7c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c2;


   procedure Add_cdis7c3( c : in out d.Criteria; cdis7c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c3", op, join, cdis7c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c3;


   procedure Add_cdis7c4( c : in out d.Criteria; cdis7c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c4", op, join, cdis7c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c4;


   procedure Add_cdis7c5( c : in out d.Criteria; cdis7c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c5", op, join, cdis7c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c5;


   procedure Add_cdis7c6( c : in out d.Criteria; cdis7c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c6", op, join, cdis7c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c6;


   procedure Add_cdis7c7( c : in out d.Criteria; cdis7c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c7", op, join, cdis7c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c7;


   procedure Add_cdis7c8( c : in out d.Criteria; cdis7c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis7c8", op, join, cdis7c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c8;


   procedure Add_cdis8c1( c : in out d.Criteria; cdis8c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c1", op, join, cdis8c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c1;


   procedure Add_cdis8c2( c : in out d.Criteria; cdis8c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c2", op, join, cdis8c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c2;


   procedure Add_cdis8c3( c : in out d.Criteria; cdis8c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c3", op, join, cdis8c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c3;


   procedure Add_cdis8c4( c : in out d.Criteria; cdis8c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c4", op, join, cdis8c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c4;


   procedure Add_cdis8c5( c : in out d.Criteria; cdis8c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c5", op, join, cdis8c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c5;


   procedure Add_cdis8c6( c : in out d.Criteria; cdis8c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c6", op, join, cdis8c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c6;


   procedure Add_cdis8c7( c : in out d.Criteria; cdis8c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c7", op, join, cdis8c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c7;


   procedure Add_cdis8c8( c : in out d.Criteria; cdis8c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis8c8", op, join, cdis8c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c8;


   procedure Add_cdis9c1( c : in out d.Criteria; cdis9c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c1", op, join, cdis9c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c1;


   procedure Add_cdis9c2( c : in out d.Criteria; cdis9c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c2", op, join, cdis9c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c2;


   procedure Add_cdis9c3( c : in out d.Criteria; cdis9c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c3", op, join, cdis9c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c3;


   procedure Add_cdis9c4( c : in out d.Criteria; cdis9c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c4", op, join, cdis9c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c4;


   procedure Add_cdis9c5( c : in out d.Criteria; cdis9c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c5", op, join, cdis9c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c5;


   procedure Add_cdis9c6( c : in out d.Criteria; cdis9c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c6", op, join, cdis9c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c6;


   procedure Add_cdis9c7( c : in out d.Criteria; cdis9c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c7", op, join, cdis9c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c7;


   procedure Add_cdis9c8( c : in out d.Criteria; cdis9c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis9c8", op, join, cdis9c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c8;


   procedure Add_cdis10c1( c : in out d.Criteria; cdis10c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c1", op, join, cdis10c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c1;


   procedure Add_cdis10c2( c : in out d.Criteria; cdis10c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c2", op, join, cdis10c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c2;


   procedure Add_cdis10c3( c : in out d.Criteria; cdis10c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c3", op, join, cdis10c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c3;


   procedure Add_cdis10c4( c : in out d.Criteria; cdis10c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c4", op, join, cdis10c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c4;


   procedure Add_cdis10c5( c : in out d.Criteria; cdis10c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c5", op, join, cdis10c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c5;


   procedure Add_cdis10c6( c : in out d.Criteria; cdis10c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c6", op, join, cdis10c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c6;


   procedure Add_cdis10c7( c : in out d.Criteria; cdis10c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c7", op, join, cdis10c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c7;


   procedure Add_cdis10c8( c : in out d.Criteria; cdis10c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdis10c8", op, join, cdis10c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c8;


   procedure Add_cdifc1( c : in out d.Criteria; cdifc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc1", op, join, cdifc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc1;


   procedure Add_cdifc2( c : in out d.Criteria; cdifc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc2", op, join, cdifc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc2;


   procedure Add_cdifc3( c : in out d.Criteria; cdifc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc3", op, join, cdifc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc3;


   procedure Add_cdifc4( c : in out d.Criteria; cdifc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc4", op, join, cdifc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc4;


   procedure Add_cdifc5( c : in out d.Criteria; cdifc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc5", op, join, cdifc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc5;


   procedure Add_cdifc6( c : in out d.Criteria; cdifc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc6", op, join, cdifc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc6;


   procedure Add_cdifc7( c : in out d.Criteria; cdifc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc7", op, join, cdifc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc7;


   procedure Add_cdifc8( c : in out d.Criteria; cdifc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdifc8", op, join, cdifc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc8;


   procedure Add_ernamc1( c : in out d.Criteria; ernamc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc1", op, join, Long_Float( ernamc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc1;


   procedure Add_ernamc2( c : in out d.Criteria; ernamc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc2", op, join, Long_Float( ernamc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc2;


   procedure Add_ernamc3( c : in out d.Criteria; ernamc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc3", op, join, Long_Float( ernamc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc3;


   procedure Add_ernamc4( c : in out d.Criteria; ernamc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc4", op, join, ernamc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc4;


   procedure Add_ernamc5( c : in out d.Criteria; ernamc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc5", op, join, ernamc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc5;


   procedure Add_ernamc6( c : in out d.Criteria; ernamc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc6", op, join, ernamc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc6;


   procedure Add_ernamc7( c : in out d.Criteria; ernamc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc7", op, join, ernamc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc7;


   procedure Add_ernamc8( c : in out d.Criteria; ernamc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ernamc8", op, join, ernamc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc8;


   procedure Add_trustc1( c : in out d.Criteria; trustc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc1", op, join, Long_Float( trustc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc1;


   procedure Add_trustc2( c : in out d.Criteria; trustc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc2", op, join, Long_Float( trustc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc2;


   procedure Add_trustc3( c : in out d.Criteria; trustc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc3", op, join, Long_Float( trustc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc3;


   procedure Add_trustc4( c : in out d.Criteria; trustc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc4", op, join, trustc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc4;


   procedure Add_trustc5( c : in out d.Criteria; trustc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc5", op, join, trustc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc5;


   procedure Add_trustc6( c : in out d.Criteria; trustc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc6", op, join, trustc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc6;


   procedure Add_trustc7( c : in out d.Criteria; trustc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc7", op, join, trustc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc7;


   procedure Add_trustc8( c : in out d.Criteria; trustc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trustc8", op, join, trustc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc8;


   procedure Add_chbfdc1( c : in out d.Criteria; chbfdc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc1", op, join, chbfdc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc1;


   procedure Add_chbfdc2( c : in out d.Criteria; chbfdc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc2", op, join, chbfdc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc2;


   procedure Add_chbfdc3( c : in out d.Criteria; chbfdc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc3", op, join, chbfdc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc3;


   procedure Add_chbfdc4( c : in out d.Criteria; chbfdc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc4", op, join, chbfdc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc4;


   procedure Add_chbfdc5( c : in out d.Criteria; chbfdc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc5", op, join, chbfdc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc5;


   procedure Add_chbfdc6( c : in out d.Criteria; chbfdc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc6", op, join, chbfdc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc6;


   procedure Add_chbfdc7( c : in out d.Criteria; chbfdc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc7", op, join, chbfdc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc7;


   procedure Add_chbfdc8( c : in out d.Criteria; chbfdc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chbfdc8", op, join, chbfdc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc8;


   procedure Add_cbfamtc1( c : in out d.Criteria; cbfamtc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc1", op, join, Long_Float( cbfamtc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc1;


   procedure Add_cbfamtc2( c : in out d.Criteria; cbfamtc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc2", op, join, Long_Float( cbfamtc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc2;


   procedure Add_cbfamtc3( c : in out d.Criteria; cbfamtc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc3", op, join, cbfamtc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc3;


   procedure Add_cbfamtc4( c : in out d.Criteria; cbfamtc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc4", op, join, cbfamtc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc4;


   procedure Add_cbfamtc5( c : in out d.Criteria; cbfamtc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc5", op, join, cbfamtc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc5;


   procedure Add_cbfamtc6( c : in out d.Criteria; cbfamtc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc6", op, join, cbfamtc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc6;


   procedure Add_cbfamtc7( c : in out d.Criteria; cbfamtc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc7", op, join, cbfamtc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc7;


   procedure Add_cbfamtc8( c : in out d.Criteria; cbfamtc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfamtc8", op, join, cbfamtc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc8;


   procedure Add_pbfamtc1( c : in out d.Criteria; pbfamtc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc1", op, join, pbfamtc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc1;


   procedure Add_pbfamtc2( c : in out d.Criteria; pbfamtc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc2", op, join, pbfamtc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc2;


   procedure Add_pbfamtc3( c : in out d.Criteria; pbfamtc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc3", op, join, pbfamtc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc3;


   procedure Add_pbfamtc4( c : in out d.Criteria; pbfamtc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc4", op, join, pbfamtc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc4;


   procedure Add_pbfamtc5( c : in out d.Criteria; pbfamtc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc5", op, join, pbfamtc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc5;


   procedure Add_pbfamtc6( c : in out d.Criteria; pbfamtc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc6", op, join, pbfamtc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc6;


   procedure Add_pbfamtc7( c : in out d.Criteria; pbfamtc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc7", op, join, pbfamtc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc7;


   procedure Add_pbfamtc8( c : in out d.Criteria; pbfamtc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pbfamtc8", op, join, pbfamtc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc8;


   procedure Add_cbfvalc1( c : in out d.Criteria; cbfvalc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc1", op, join, cbfvalc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc1;


   procedure Add_cbfvalc2( c : in out d.Criteria; cbfvalc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc2", op, join, cbfvalc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc2;


   procedure Add_cbfvalc3( c : in out d.Criteria; cbfvalc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc3", op, join, cbfvalc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc3;


   procedure Add_cbfvalc4( c : in out d.Criteria; cbfvalc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc4", op, join, cbfvalc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc4;


   procedure Add_cbfvalc5( c : in out d.Criteria; cbfvalc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc5", op, join, cbfvalc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc5;


   procedure Add_cbfvalc6( c : in out d.Criteria; cbfvalc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc6", op, join, cbfvalc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc6;


   procedure Add_cbfvalc7( c : in out d.Criteria; cbfvalc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc7", op, join, cbfvalc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc7;


   procedure Add_cbfvalc8( c : in out d.Criteria; cbfvalc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cbfvalc8", op, join, cbfvalc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc8;


   procedure Add_chcondc1( c : in out d.Criteria; chcondc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc1", op, join, chcondc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc1;


   procedure Add_chcondc2( c : in out d.Criteria; chcondc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc2", op, join, chcondc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc2;


   procedure Add_chcondc3( c : in out d.Criteria; chcondc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc3", op, join, chcondc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc3;


   procedure Add_chcondc4( c : in out d.Criteria; chcondc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc4", op, join, chcondc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc4;


   procedure Add_chcondc5( c : in out d.Criteria; chcondc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc5", op, join, chcondc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc5;


   procedure Add_chcondc6( c : in out d.Criteria; chcondc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc6", op, join, chcondc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc6;


   procedure Add_chcondc7( c : in out d.Criteria; chcondc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc7", op, join, chcondc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc7;


   procedure Add_chcondc8( c : in out d.Criteria; chcondc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcondc8", op, join, chcondc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc8;


   procedure Add_cdla1c1( c : in out d.Criteria; cdla1c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c1", op, join, cdla1c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c1;


   procedure Add_cdla1c2( c : in out d.Criteria; cdla1c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c2", op, join, cdla1c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c2;


   procedure Add_cdla1c3( c : in out d.Criteria; cdla1c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c3", op, join, cdla1c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c3;


   procedure Add_cdla1c4( c : in out d.Criteria; cdla1c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c4", op, join, cdla1c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c4;


   procedure Add_cdla1c5( c : in out d.Criteria; cdla1c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c5", op, join, cdla1c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c5;


   procedure Add_cdla1c6( c : in out d.Criteria; cdla1c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c6", op, join, cdla1c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c6;


   procedure Add_cdla1c7( c : in out d.Criteria; cdla1c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c7", op, join, cdla1c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c7;


   procedure Add_cdla1c8( c : in out d.Criteria; cdla1c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla1c8", op, join, cdla1c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c8;


   procedure Add_cdla2c1( c : in out d.Criteria; cdla2c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c1", op, join, cdla2c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c1;


   procedure Add_cdla2c2( c : in out d.Criteria; cdla2c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c2", op, join, cdla2c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c2;


   procedure Add_cdla2c3( c : in out d.Criteria; cdla2c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c3", op, join, cdla2c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c3;


   procedure Add_cdla2c4( c : in out d.Criteria; cdla2c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c4", op, join, cdla2c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c4;


   procedure Add_cdla2c5( c : in out d.Criteria; cdla2c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c5", op, join, cdla2c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c5;


   procedure Add_cdla2c6( c : in out d.Criteria; cdla2c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c6", op, join, cdla2c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c6;


   procedure Add_cdla2c7( c : in out d.Criteria; cdla2c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c7", op, join, cdla2c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c7;


   procedure Add_cdla2c8( c : in out d.Criteria; cdla2c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdla2c8", op, join, cdla2c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c8;


   procedure Add_chelfc1( c : in out d.Criteria; chelfc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc1", op, join, chelfc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc1;


   procedure Add_chelfc2( c : in out d.Criteria; chelfc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc2", op, join, chelfc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc2;


   procedure Add_chelfc3( c : in out d.Criteria; chelfc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc3", op, join, chelfc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc3;


   procedure Add_chelfc4( c : in out d.Criteria; chelfc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc4", op, join, chelfc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc4;


   procedure Add_chelfc5( c : in out d.Criteria; chelfc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc5", op, join, chelfc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc5;


   procedure Add_chelfc6( c : in out d.Criteria; chelfc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc6", op, join, chelfc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc6;


   procedure Add_chelfc7( c : in out d.Criteria; chelfc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc7", op, join, chelfc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc7;


   procedure Add_chelfc8( c : in out d.Criteria; chelfc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chelfc8", op, join, chelfc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc8;


   procedure Add_chernc1( c : in out d.Criteria; chernc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc1", op, join, Long_Float( chernc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc1;


   procedure Add_chernc2( c : in out d.Criteria; chernc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc2", op, join, Long_Float( chernc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc2;


   procedure Add_chernc3( c : in out d.Criteria; chernc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc3", op, join, Long_Float( chernc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc3;


   procedure Add_chernc4( c : in out d.Criteria; chernc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc4", op, join, chernc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc4;


   procedure Add_chernc5( c : in out d.Criteria; chernc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc5", op, join, chernc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc5;


   procedure Add_chernc6( c : in out d.Criteria; chernc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc6", op, join, chernc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc6;


   procedure Add_chernc7( c : in out d.Criteria; chernc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc7", op, join, chernc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc7;


   procedure Add_chernc8( c : in out d.Criteria; chernc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chernc8", op, join, chernc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc8;


   procedure Add_crns1c1( c : in out d.Criteria; crns1c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c1", op, join, crns1c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c1;


   procedure Add_crns1c2( c : in out d.Criteria; crns1c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c2", op, join, crns1c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c2;


   procedure Add_crns1c3( c : in out d.Criteria; crns1c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c3", op, join, crns1c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c3;


   procedure Add_crns1c4( c : in out d.Criteria; crns1c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c4", op, join, crns1c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c4;


   procedure Add_crns1c5( c : in out d.Criteria; crns1c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c5", op, join, crns1c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c5;


   procedure Add_crns1c6( c : in out d.Criteria; crns1c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c6", op, join, crns1c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c6;


   procedure Add_crns1c7( c : in out d.Criteria; crns1c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c7", op, join, crns1c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c7;


   procedure Add_crns1c8( c : in out d.Criteria; crns1c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns1c8", op, join, crns1c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c8;


   procedure Add_crns2c1( c : in out d.Criteria; crns2c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c1", op, join, crns2c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c1;


   procedure Add_crns2c2( c : in out d.Criteria; crns2c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c2", op, join, crns2c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c2;


   procedure Add_crns2c3( c : in out d.Criteria; crns2c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c3", op, join, crns2c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c3;


   procedure Add_crns2c4( c : in out d.Criteria; crns2c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c4", op, join, crns2c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c4;


   procedure Add_crns2c5( c : in out d.Criteria; crns2c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c5", op, join, crns2c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c5;


   procedure Add_crns2c6( c : in out d.Criteria; crns2c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c6", op, join, crns2c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c6;


   procedure Add_crns2c7( c : in out d.Criteria; crns2c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c7", op, join, crns2c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c7;


   procedure Add_crns2c8( c : in out d.Criteria; crns2c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns2c8", op, join, crns2c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c8;


   procedure Add_crns3c1( c : in out d.Criteria; crns3c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c1", op, join, crns3c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c1;


   procedure Add_crns3c2( c : in out d.Criteria; crns3c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c2", op, join, crns3c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c2;


   procedure Add_crns3c3( c : in out d.Criteria; crns3c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c3", op, join, crns3c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c3;


   procedure Add_crns3c4( c : in out d.Criteria; crns3c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c4", op, join, crns3c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c4;


   procedure Add_crns3c5( c : in out d.Criteria; crns3c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c5", op, join, crns3c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c5;


   procedure Add_crns3c6( c : in out d.Criteria; crns3c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c6", op, join, crns3c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c6;


   procedure Add_crns3c7( c : in out d.Criteria; crns3c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c7", op, join, crns3c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c7;


   procedure Add_crns3c8( c : in out d.Criteria; crns3c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "crns3c8", op, join, crns3c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c8;


   procedure Add_chemac1( c : in out d.Criteria; chemac1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac1", op, join, chemac1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac1;


   procedure Add_chemac2( c : in out d.Criteria; chemac2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac2", op, join, chemac2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac2;


   procedure Add_chemac3( c : in out d.Criteria; chemac3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac3", op, join, chemac3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac3;


   procedure Add_chemac4( c : in out d.Criteria; chemac4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac4", op, join, chemac4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac4;


   procedure Add_chemac5( c : in out d.Criteria; chemac5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac5", op, join, chemac5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac5;


   procedure Add_chemac6( c : in out d.Criteria; chemac6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac6", op, join, chemac6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac6;


   procedure Add_chemac7( c : in out d.Criteria; chemac7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac7", op, join, chemac7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac7;


   procedure Add_chemac8( c : in out d.Criteria; chemac8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chemac8", op, join, chemac8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac8;


   procedure Add_emamtc1( c : in out d.Criteria; emamtc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc1", op, join, Long_Float( emamtc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc1;


   procedure Add_emamtc2( c : in out d.Criteria; emamtc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc2", op, join, Long_Float( emamtc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc2;


   procedure Add_emamtc3( c : in out d.Criteria; emamtc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc3", op, join, emamtc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc3;


   procedure Add_emamtc4( c : in out d.Criteria; emamtc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc4", op, join, emamtc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc4;


   procedure Add_emamtc5( c : in out d.Criteria; emamtc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc5", op, join, emamtc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc5;


   procedure Add_emamtc6( c : in out d.Criteria; emamtc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc6", op, join, emamtc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc6;


   procedure Add_emamtc7( c : in out d.Criteria; emamtc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc7", op, join, emamtc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc7;


   procedure Add_emamtc8( c : in out d.Criteria; emamtc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emamtc8", op, join, emamtc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc8;


   procedure Add_emapdc1( c : in out d.Criteria; emapdc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc1", op, join, emapdc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc1;


   procedure Add_emapdc2( c : in out d.Criteria; emapdc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc2", op, join, emapdc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc2;


   procedure Add_emapdc3( c : in out d.Criteria; emapdc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc3", op, join, emapdc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc3;


   procedure Add_emapdc4( c : in out d.Criteria; emapdc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc4", op, join, emapdc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc4;


   procedure Add_emapdc5( c : in out d.Criteria; emapdc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc5", op, join, emapdc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc5;


   procedure Add_emapdc6( c : in out d.Criteria; emapdc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc6", op, join, emapdc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc6;


   procedure Add_emapdc7( c : in out d.Criteria; emapdc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc7", op, join, emapdc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc7;


   procedure Add_emapdc8( c : in out d.Criteria; emapdc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "emapdc8", op, join, emapdc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc8;


   procedure Add_chidvc1( c : in out d.Criteria; chidvc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc1", op, join, Long_Float( chidvc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc1;


   procedure Add_chidvc2( c : in out d.Criteria; chidvc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc2", op, join, Long_Float( chidvc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc2;


   procedure Add_chidvc3( c : in out d.Criteria; chidvc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc3", op, join, Long_Float( chidvc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc3;


   procedure Add_chidvc4( c : in out d.Criteria; chidvc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc4", op, join, chidvc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc4;


   procedure Add_chidvc5( c : in out d.Criteria; chidvc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc5", op, join, chidvc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc5;


   procedure Add_chidvc6( c : in out d.Criteria; chidvc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc6", op, join, chidvc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc6;


   procedure Add_chidvc7( c : in out d.Criteria; chidvc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc7", op, join, chidvc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc7;


   procedure Add_chidvc8( c : in out d.Criteria; chidvc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chidvc8", op, join, chidvc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc8;


   procedure Add_climitc1( c : in out d.Criteria; climitc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc1", op, join, climitc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc1;


   procedure Add_climitc2( c : in out d.Criteria; climitc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc2", op, join, climitc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc2;


   procedure Add_climitc3( c : in out d.Criteria; climitc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc3", op, join, climitc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc3;


   procedure Add_climitc4( c : in out d.Criteria; climitc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc4", op, join, climitc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc4;


   procedure Add_climitc5( c : in out d.Criteria; climitc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc5", op, join, climitc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc5;


   procedure Add_climitc6( c : in out d.Criteria; climitc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc6", op, join, climitc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc6;


   procedure Add_climitc7( c : in out d.Criteria; climitc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc7", op, join, climitc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc7;


   procedure Add_climitc8( c : in out d.Criteria; climitc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "climitc8", op, join, climitc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc8;


   procedure Add_pearnc1( c : in out d.Criteria; pearnc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc1", op, join, pearnc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc1;


   procedure Add_pearnc2( c : in out d.Criteria; pearnc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc2", op, join, pearnc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc2;


   procedure Add_pearnc3( c : in out d.Criteria; pearnc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc3", op, join, pearnc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc3;


   procedure Add_pearnc4( c : in out d.Criteria; pearnc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc4", op, join, pearnc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc4;


   procedure Add_pearnc5( c : in out d.Criteria; pearnc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc5", op, join, pearnc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc5;


   procedure Add_pearnc6( c : in out d.Criteria; pearnc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc6", op, join, pearnc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc6;


   procedure Add_pearnc7( c : in out d.Criteria; pearnc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc7", op, join, pearnc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc7;


   procedure Add_pearnc8( c : in out d.Criteria; pearnc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pearnc8", op, join, pearnc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc8;


   procedure Add_ptrusc1( c : in out d.Criteria; ptrusc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc1", op, join, ptrusc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc1;


   procedure Add_ptrusc2( c : in out d.Criteria; ptrusc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc2", op, join, ptrusc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc2;


   procedure Add_ptrusc3( c : in out d.Criteria; ptrusc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc3", op, join, ptrusc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc3;


   procedure Add_ptrusc4( c : in out d.Criteria; ptrusc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc4", op, join, ptrusc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc4;


   procedure Add_ptrusc5( c : in out d.Criteria; ptrusc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc5", op, join, ptrusc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc5;


   procedure Add_ptrusc6( c : in out d.Criteria; ptrusc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc6", op, join, ptrusc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc6;


   procedure Add_ptrusc7( c : in out d.Criteria; ptrusc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc7", op, join, ptrusc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc7;


   procedure Add_ptrusc8( c : in out d.Criteria; ptrusc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrusc8", op, join, ptrusc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc8;


   procedure Add_chrinc1( c : in out d.Criteria; chrinc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc1", op, join, Long_Float( chrinc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc1;


   procedure Add_chrinc2( c : in out d.Criteria; chrinc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc2", op, join, Long_Float( chrinc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc2;


   procedure Add_chrinc3( c : in out d.Criteria; chrinc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc3", op, join, Long_Float( chrinc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc3;


   procedure Add_chrinc4( c : in out d.Criteria; chrinc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc4", op, join, chrinc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc4;


   procedure Add_chrinc5( c : in out d.Criteria; chrinc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc5", op, join, chrinc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc5;


   procedure Add_chrinc6( c : in out d.Criteria; chrinc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc6", op, join, chrinc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc6;


   procedure Add_chrinc7( c : in out d.Criteria; chrinc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc7", op, join, chrinc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc7;


   procedure Add_chrinc8( c : in out d.Criteria; chrinc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrinc8", op, join, chrinc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc8;


   procedure Add_csavec1( c : in out d.Criteria; csavec1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec1", op, join, csavec1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec1;


   procedure Add_csavec2( c : in out d.Criteria; csavec2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec2", op, join, csavec2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec2;


   procedure Add_csavec3( c : in out d.Criteria; csavec3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec3", op, join, csavec3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec3;


   procedure Add_csavec4( c : in out d.Criteria; csavec4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec4", op, join, csavec4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec4;


   procedure Add_csavec5( c : in out d.Criteria; csavec5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec5", op, join, csavec5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec5;


   procedure Add_csavec6( c : in out d.Criteria; csavec6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec6", op, join, csavec6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec6;


   procedure Add_csavec7( c : in out d.Criteria; csavec7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec7", op, join, csavec7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec7;


   procedure Add_csavec8( c : in out d.Criteria; csavec8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csavec8", op, join, csavec8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec8;


   procedure Add_tramtc1( c : in out d.Criteria; tramtc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc1", op, join, Long_Float( tramtc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc1;


   procedure Add_tramtc2( c : in out d.Criteria; tramtc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc2", op, join, Long_Float( tramtc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc2;


   procedure Add_tramtc3( c : in out d.Criteria; tramtc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc3", op, join, tramtc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc3;


   procedure Add_tramtc4( c : in out d.Criteria; tramtc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc4", op, join, tramtc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc4;


   procedure Add_tramtc5( c : in out d.Criteria; tramtc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc5", op, join, tramtc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc5;


   procedure Add_tramtc6( c : in out d.Criteria; tramtc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc6", op, join, tramtc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc6;


   procedure Add_tramtc7( c : in out d.Criteria; tramtc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc7", op, join, tramtc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc7;


   procedure Add_tramtc8( c : in out d.Criteria; tramtc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tramtc8", op, join, tramtc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc8;


   procedure Add_trnpdc1( c : in out d.Criteria; trnpdc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc1", op, join, trnpdc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc1;


   procedure Add_trnpdc2( c : in out d.Criteria; trnpdc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc2", op, join, trnpdc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc2;


   procedure Add_trnpdc3( c : in out d.Criteria; trnpdc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc3", op, join, trnpdc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc3;


   procedure Add_trnpdc4( c : in out d.Criteria; trnpdc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc4", op, join, trnpdc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc4;


   procedure Add_trnpdc5( c : in out d.Criteria; trnpdc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc5", op, join, trnpdc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc5;


   procedure Add_trnpdc6( c : in out d.Criteria; trnpdc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc6", op, join, trnpdc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc6;


   procedure Add_trnpdc7( c : in out d.Criteria; trnpdc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc7", op, join, trnpdc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc7;


   procedure Add_trnpdc8( c : in out d.Criteria; trnpdc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trnpdc8", op, join, trnpdc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc8;


   procedure Add_cohabc1( c : in out d.Criteria; cohabc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc1", op, join, cohabc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc1;


   procedure Add_cohabc2( c : in out d.Criteria; cohabc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc2", op, join, cohabc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc2;


   procedure Add_cohabc3( c : in out d.Criteria; cohabc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc3", op, join, cohabc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc3;


   procedure Add_cohabc4( c : in out d.Criteria; cohabc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc4", op, join, cohabc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc4;


   procedure Add_cohabc5( c : in out d.Criteria; cohabc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc5", op, join, cohabc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc5;


   procedure Add_cohabc6( c : in out d.Criteria; cohabc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc6", op, join, cohabc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc6;


   procedure Add_cohabc7( c : in out d.Criteria; cohabc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc7", op, join, cohabc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc7;


   procedure Add_cohabc8( c : in out d.Criteria; cohabc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cohabc8", op, join, cohabc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc8;


   procedure Add_curqulc1( c : in out d.Criteria; curqulc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc1", op, join, curqulc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc1;


   procedure Add_curqulc2( c : in out d.Criteria; curqulc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc2", op, join, curqulc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc2;


   procedure Add_curqulc3( c : in out d.Criteria; curqulc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc3", op, join, curqulc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc3;


   procedure Add_curqulc4( c : in out d.Criteria; curqulc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc4", op, join, curqulc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc4;


   procedure Add_curqulc5( c : in out d.Criteria; curqulc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc5", op, join, curqulc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc5;


   procedure Add_curqulc6( c : in out d.Criteria; curqulc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc6", op, join, curqulc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc6;


   procedure Add_curqulc7( c : in out d.Criteria; curqulc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc7", op, join, curqulc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc7;


   procedure Add_curqulc8( c : in out d.Criteria; curqulc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "curqulc8", op, join, curqulc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc8;


   procedure Add_disacc1( c : in out d.Criteria; disacc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc1", op, join, disacc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc1;


   procedure Add_disacc2( c : in out d.Criteria; disacc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc2", op, join, disacc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc2;


   procedure Add_disacc3( c : in out d.Criteria; disacc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc3", op, join, disacc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc3;


   procedure Add_disacc4( c : in out d.Criteria; disacc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc4", op, join, disacc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc4;


   procedure Add_disacc5( c : in out d.Criteria; disacc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc5", op, join, disacc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc5;


   procedure Add_disacc6( c : in out d.Criteria; disacc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc6", op, join, disacc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc6;


   procedure Add_disacc7( c : in out d.Criteria; disacc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc7", op, join, disacc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc7;


   procedure Add_disacc8( c : in out d.Criteria; disacc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "disacc8", op, join, disacc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc8;


   procedure Add_discoc1( c : in out d.Criteria; discoc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc1", op, join, discoc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc1;


   procedure Add_discoc2( c : in out d.Criteria; discoc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc2", op, join, discoc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc2;


   procedure Add_discoc3( c : in out d.Criteria; discoc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc3", op, join, discoc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc3;


   procedure Add_discoc4( c : in out d.Criteria; discoc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc4", op, join, discoc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc4;


   procedure Add_discoc5( c : in out d.Criteria; discoc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc5", op, join, discoc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc5;


   procedure Add_discoc6( c : in out d.Criteria; discoc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc6", op, join, discoc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc6;


   procedure Add_discoc7( c : in out d.Criteria; discoc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc7", op, join, discoc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc7;


   procedure Add_discoc8( c : in out d.Criteria; discoc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "discoc8", op, join, discoc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc8;


   procedure Add_dobc1( c : in out d.Criteria; dobc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc1", op, join, dobc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc1;


   procedure Add_dobc2( c : in out d.Criteria; dobc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc2", op, join, dobc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc2;


   procedure Add_dobc3( c : in out d.Criteria; dobc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc3", op, join, dobc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc3;


   procedure Add_dobc4( c : in out d.Criteria; dobc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc4", op, join, dobc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc4;


   procedure Add_dobc5( c : in out d.Criteria; dobc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc5", op, join, dobc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc5;


   procedure Add_dobc6( c : in out d.Criteria; dobc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc6", op, join, dobc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc6;


   procedure Add_dobc7( c : in out d.Criteria; dobc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc7", op, join, dobc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc7;


   procedure Add_dobc8( c : in out d.Criteria; dobc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dobc8", op, join, dobc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc8;


   procedure Add_dvmarc1( c : in out d.Criteria; dvmarc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc1", op, join, dvmarc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc1;


   procedure Add_dvmarc2( c : in out d.Criteria; dvmarc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc2", op, join, dvmarc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc2;


   procedure Add_dvmarc3( c : in out d.Criteria; dvmarc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc3", op, join, dvmarc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc3;


   procedure Add_dvmarc4( c : in out d.Criteria; dvmarc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc4", op, join, dvmarc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc4;


   procedure Add_dvmarc5( c : in out d.Criteria; dvmarc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc5", op, join, dvmarc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc5;


   procedure Add_dvmarc6( c : in out d.Criteria; dvmarc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc6", op, join, dvmarc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc6;


   procedure Add_dvmarc7( c : in out d.Criteria; dvmarc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc7", op, join, dvmarc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc7;


   procedure Add_dvmarc8( c : in out d.Criteria; dvmarc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvmarc8", op, join, dvmarc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc8;


   procedure Add_fsvvlc1( c : in out d.Criteria; fsvvlc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc1", op, join, Long_Float( fsvvlc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc1;


   procedure Add_fsvvlc2( c : in out d.Criteria; fsvvlc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc2", op, join, Long_Float( fsvvlc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc2;


   procedure Add_fsvvlc3( c : in out d.Criteria; fsvvlc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc3", op, join, Long_Float( fsvvlc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc3;


   procedure Add_fsvvlc4( c : in out d.Criteria; fsvvlc4 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc4", op, join, Long_Float( fsvvlc4 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc4;


   procedure Add_fsvvlc5( c : in out d.Criteria; fsvvlc5 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc5", op, join, Long_Float( fsvvlc5 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc5;


   procedure Add_fsvvlc6( c : in out d.Criteria; fsvvlc6 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc6", op, join, Long_Float( fsvvlc6 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc6;


   procedure Add_fsvvlc7( c : in out d.Criteria; fsvvlc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc7", op, join, fsvvlc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc7;


   procedure Add_fsvvlc8( c : in out d.Criteria; fsvvlc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsvvlc8", op, join, fsvvlc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc8;


   procedure Add_fsmkvc1( c : in out d.Criteria; fsmkvc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc1", op, join, Long_Float( fsmkvc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc1;


   procedure Add_fsmkvc2( c : in out d.Criteria; fsmkvc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc2", op, join, Long_Float( fsmkvc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc2;


   procedure Add_fsmkvc3( c : in out d.Criteria; fsmkvc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc3", op, join, Long_Float( fsmkvc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc3;


   procedure Add_fsmkvc4( c : in out d.Criteria; fsmkvc4 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc4", op, join, Long_Float( fsmkvc4 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc4;


   procedure Add_fsmkvc5( c : in out d.Criteria; fsmkvc5 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc5", op, join, Long_Float( fsmkvc5 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc5;


   procedure Add_fsmkvc6( c : in out d.Criteria; fsmkvc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc6", op, join, fsmkvc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc6;


   procedure Add_fsmkvc7( c : in out d.Criteria; fsmkvc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc7", op, join, fsmkvc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc7;


   procedure Add_fsmkvc8( c : in out d.Criteria; fsmkvc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmkvc8", op, join, fsmkvc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc8;


   procedure Add_fsmlvc1( c : in out d.Criteria; fsmlvc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc1", op, join, Long_Float( fsmlvc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc1;


   procedure Add_fsmlvc2( c : in out d.Criteria; fsmlvc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc2", op, join, Long_Float( fsmlvc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc2;


   procedure Add_fsmlvc3( c : in out d.Criteria; fsmlvc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc3", op, join, Long_Float( fsmlvc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc3;


   procedure Add_fsmlvc4( c : in out d.Criteria; fsmlvc4 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc4", op, join, Long_Float( fsmlvc4 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc4;


   procedure Add_fsmlvc5( c : in out d.Criteria; fsmlvc5 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc5", op, join, Long_Float( fsmlvc5 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc5;


   procedure Add_fsmlvc6( c : in out d.Criteria; fsmlvc6 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc6", op, join, Long_Float( fsmlvc6 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc6;


   procedure Add_fsmlvc7( c : in out d.Criteria; fsmlvc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc7", op, join, fsmlvc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc7;


   procedure Add_fsmlvc8( c : in out d.Criteria; fsmlvc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fsmlvc8", op, join, fsmlvc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc8;


   procedure Add_ftedc1( c : in out d.Criteria; ftedc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc1", op, join, ftedc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc1;


   procedure Add_ftedc2( c : in out d.Criteria; ftedc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc2", op, join, ftedc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc2;


   procedure Add_ftedc3( c : in out d.Criteria; ftedc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc3", op, join, ftedc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc3;


   procedure Add_ftedc4( c : in out d.Criteria; ftedc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc4", op, join, ftedc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc4;


   procedure Add_ftedc5( c : in out d.Criteria; ftedc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc5", op, join, ftedc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc5;


   procedure Add_ftedc6( c : in out d.Criteria; ftedc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc6", op, join, ftedc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc6;


   procedure Add_ftedc7( c : in out d.Criteria; ftedc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc7", op, join, ftedc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc7;


   procedure Add_ftedc8( c : in out d.Criteria; ftedc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftedc8", op, join, ftedc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc8;


   procedure Add_g1valc1( c : in out d.Criteria; g1valc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc1", op, join, g1valc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc1;


   procedure Add_g1valc2( c : in out d.Criteria; g1valc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc2", op, join, g1valc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc2;


   procedure Add_g1valc3( c : in out d.Criteria; g1valc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc3", op, join, g1valc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc3;


   procedure Add_g1valc4( c : in out d.Criteria; g1valc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc4", op, join, g1valc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc4;


   procedure Add_g1valc5( c : in out d.Criteria; g1valc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc5", op, join, g1valc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc5;


   procedure Add_g1valc6( c : in out d.Criteria; g1valc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc6", op, join, g1valc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc6;


   procedure Add_g1valc7( c : in out d.Criteria; g1valc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc7", op, join, g1valc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc7;


   procedure Add_g1valc8( c : in out d.Criteria; g1valc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1valc8", op, join, g1valc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc8;


   procedure Add_g2valc1( c : in out d.Criteria; g2valc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc1", op, join, g2valc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc1;


   procedure Add_g2valc2( c : in out d.Criteria; g2valc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc2", op, join, g2valc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc2;


   procedure Add_g2valc3( c : in out d.Criteria; g2valc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc3", op, join, g2valc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc3;


   procedure Add_g2valc4( c : in out d.Criteria; g2valc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc4", op, join, g2valc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc4;


   procedure Add_g2valc5( c : in out d.Criteria; g2valc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc5", op, join, g2valc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc5;


   procedure Add_g2valc6( c : in out d.Criteria; g2valc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc6", op, join, g2valc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc6;


   procedure Add_g2valc7( c : in out d.Criteria; g2valc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc7", op, join, g2valc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc7;


   procedure Add_g2valc8( c : in out d.Criteria; g2valc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2valc8", op, join, g2valc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc8;


   procedure Add_g1dirc1( c : in out d.Criteria; g1dirc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc1", op, join, g1dirc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc1;


   procedure Add_g1dirc2( c : in out d.Criteria; g1dirc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc2", op, join, g1dirc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc2;


   procedure Add_g1dirc3( c : in out d.Criteria; g1dirc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc3", op, join, g1dirc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc3;


   procedure Add_g1dirc4( c : in out d.Criteria; g1dirc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc4", op, join, g1dirc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc4;


   procedure Add_g1dirc5( c : in out d.Criteria; g1dirc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc5", op, join, g1dirc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc5;


   procedure Add_g1dirc6( c : in out d.Criteria; g1dirc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc6", op, join, g1dirc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc6;


   procedure Add_g1dirc7( c : in out d.Criteria; g1dirc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc7", op, join, g1dirc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc7;


   procedure Add_g1dirc8( c : in out d.Criteria; g1dirc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g1dirc8", op, join, g1dirc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc8;


   procedure Add_g2dirc1( c : in out d.Criteria; g2dirc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc1", op, join, g2dirc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc1;


   procedure Add_g2dirc2( c : in out d.Criteria; g2dirc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc2", op, join, g2dirc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc2;


   procedure Add_g2dirc3( c : in out d.Criteria; g2dirc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc3", op, join, g2dirc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc3;


   procedure Add_g2dirc4( c : in out d.Criteria; g2dirc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc4", op, join, g2dirc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc4;


   procedure Add_g2dirc5( c : in out d.Criteria; g2dirc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc5", op, join, g2dirc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc5;


   procedure Add_g2dirc6( c : in out d.Criteria; g2dirc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc6", op, join, g2dirc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc6;


   procedure Add_g2dirc7( c : in out d.Criteria; g2dirc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc7", op, join, g2dirc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc7;


   procedure Add_g2dirc8( c : in out d.Criteria; g2dirc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "g2dirc8", op, join, g2dirc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc8;


   procedure Add_gtnumc1( c : in out d.Criteria; gtnumc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc1", op, join, gtnumc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc1;


   procedure Add_gtnumc2( c : in out d.Criteria; gtnumc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc2", op, join, gtnumc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc2;


   procedure Add_gtnumc3( c : in out d.Criteria; gtnumc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc3", op, join, gtnumc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc3;


   procedure Add_gtnumc4( c : in out d.Criteria; gtnumc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc4", op, join, gtnumc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc4;


   procedure Add_gtnumc5( c : in out d.Criteria; gtnumc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc5", op, join, gtnumc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc5;


   procedure Add_gtnumc6( c : in out d.Criteria; gtnumc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc6", op, join, gtnumc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc6;


   procedure Add_gtnumc7( c : in out d.Criteria; gtnumc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc7", op, join, gtnumc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc7;


   procedure Add_gtnumc8( c : in out d.Criteria; gtnumc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gtnumc8", op, join, gtnumc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc8;


   procedure Add_gt1scc1( c : in out d.Criteria; gt1scc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc1", op, join, gt1scc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc1;


   procedure Add_gt1scc2( c : in out d.Criteria; gt1scc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc2", op, join, gt1scc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc2;


   procedure Add_gt1scc3( c : in out d.Criteria; gt1scc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc3", op, join, gt1scc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc3;


   procedure Add_gt1scc4( c : in out d.Criteria; gt1scc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc4", op, join, gt1scc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc4;


   procedure Add_gt1scc5( c : in out d.Criteria; gt1scc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc5", op, join, gt1scc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc5;


   procedure Add_gt1scc6( c : in out d.Criteria; gt1scc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc6", op, join, gt1scc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc6;


   procedure Add_gt1scc7( c : in out d.Criteria; gt1scc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc7", op, join, gt1scc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc7;


   procedure Add_gt1scc8( c : in out d.Criteria; gt1scc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt1scc8", op, join, gt1scc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc8;


   procedure Add_gt2scc1( c : in out d.Criteria; gt2scc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc1", op, join, gt2scc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc1;


   procedure Add_gt2scc2( c : in out d.Criteria; gt2scc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc2", op, join, gt2scc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc2;


   procedure Add_gt2scc3( c : in out d.Criteria; gt2scc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc3", op, join, gt2scc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc3;


   procedure Add_gt2scc4( c : in out d.Criteria; gt2scc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc4", op, join, gt2scc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc4;


   procedure Add_gt2scc5( c : in out d.Criteria; gt2scc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc5", op, join, gt2scc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc5;


   procedure Add_gt2scc6( c : in out d.Criteria; gt2scc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc6", op, join, gt2scc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc6;


   procedure Add_gt2scc7( c : in out d.Criteria; gt2scc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc7", op, join, gt2scc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc7;


   procedure Add_gt2scc8( c : in out d.Criteria; gt2scc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt2scc8", op, join, gt2scc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc8;


   procedure Add_gt10sc1( c : in out d.Criteria; gt10sc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc1", op, join, Long_Float( gt10sc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc1;


   procedure Add_gt10sc2( c : in out d.Criteria; gt10sc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc2", op, join, gt10sc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc2;


   procedure Add_gt10sc3( c : in out d.Criteria; gt10sc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc3", op, join, gt10sc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc3;


   procedure Add_gt10sc4( c : in out d.Criteria; gt10sc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc4", op, join, gt10sc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc4;


   procedure Add_gt10sc5( c : in out d.Criteria; gt10sc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc5", op, join, gt10sc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc5;


   procedure Add_gt10sc6( c : in out d.Criteria; gt10sc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc6", op, join, gt10sc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc6;


   procedure Add_gt10sc7( c : in out d.Criteria; gt10sc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc7", op, join, gt10sc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc7;


   procedure Add_gt10sc8( c : in out d.Criteria; gt10sc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt10sc8", op, join, gt10sc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc8;


   procedure Add_gt20sc1( c : in out d.Criteria; gt20sc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc1", op, join, gt20sc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc1;


   procedure Add_gt20sc2( c : in out d.Criteria; gt20sc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc2", op, join, gt20sc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc2;


   procedure Add_gt20sc3( c : in out d.Criteria; gt20sc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc3", op, join, gt20sc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc3;


   procedure Add_gt20sc4( c : in out d.Criteria; gt20sc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc4", op, join, gt20sc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc4;


   procedure Add_gt20sc5( c : in out d.Criteria; gt20sc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc5", op, join, gt20sc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc5;


   procedure Add_gt20sc6( c : in out d.Criteria; gt20sc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc6", op, join, gt20sc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc6;


   procedure Add_gt20sc7( c : in out d.Criteria; gt20sc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc7", op, join, gt20sc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc7;


   procedure Add_gt20sc8( c : in out d.Criteria; gt20sc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gt20sc8", op, join, gt20sc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc8;


   procedure Add_hartvc1( c : in out d.Criteria; hartvc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc1", op, join, hartvc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc1;


   procedure Add_hartvc2( c : in out d.Criteria; hartvc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc2", op, join, hartvc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc2;


   procedure Add_hartvc3( c : in out d.Criteria; hartvc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc3", op, join, hartvc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc3;


   procedure Add_hartvc4( c : in out d.Criteria; hartvc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc4", op, join, hartvc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc4;


   procedure Add_hartvc5( c : in out d.Criteria; hartvc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc5", op, join, hartvc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc5;


   procedure Add_hartvc6( c : in out d.Criteria; hartvc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc6", op, join, hartvc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc6;


   procedure Add_hartvc7( c : in out d.Criteria; hartvc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc7", op, join, hartvc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc7;


   procedure Add_hartvc8( c : in out d.Criteria; hartvc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hartvc8", op, join, hartvc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc8;


   procedure Add_heatchc1( c : in out d.Criteria; heatchc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc1", op, join, heatchc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc1;


   procedure Add_heatchc2( c : in out d.Criteria; heatchc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc2", op, join, heatchc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc2;


   procedure Add_heatchc3( c : in out d.Criteria; heatchc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc3", op, join, heatchc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc3;


   procedure Add_heatchc4( c : in out d.Criteria; heatchc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc4", op, join, heatchc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc4;


   procedure Add_heatchc5( c : in out d.Criteria; heatchc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc5", op, join, heatchc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc5;


   procedure Add_heatchc6( c : in out d.Criteria; heatchc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc6", op, join, heatchc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc6;


   procedure Add_heatchc7( c : in out d.Criteria; heatchc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc7", op, join, heatchc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc7;


   procedure Add_heatchc8( c : in out d.Criteria; heatchc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heatchc8", op, join, heatchc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc8;


   procedure Add_hhldrc1( c : in out d.Criteria; hhldrc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc1", op, join, hhldrc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc1;


   procedure Add_hhldrc2( c : in out d.Criteria; hhldrc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc2", op, join, hhldrc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc2;


   procedure Add_hhldrc3( c : in out d.Criteria; hhldrc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc3", op, join, hhldrc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc3;


   procedure Add_hhldrc4( c : in out d.Criteria; hhldrc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc4", op, join, hhldrc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc4;


   procedure Add_hhldrc5( c : in out d.Criteria; hhldrc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc5", op, join, hhldrc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc5;


   procedure Add_hhldrc6( c : in out d.Criteria; hhldrc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc6", op, join, hhldrc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc6;


   procedure Add_hhldrc7( c : in out d.Criteria; hhldrc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc7", op, join, hhldrc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc7;


   procedure Add_hhldrc8( c : in out d.Criteria; hhldrc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldrc8", op, join, hhldrc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc8;


   procedure Add_hurabc1( c : in out d.Criteria; hurabc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc1", op, join, hurabc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc1;


   procedure Add_hurabc2( c : in out d.Criteria; hurabc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc2", op, join, hurabc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc2;


   procedure Add_hurabc3( c : in out d.Criteria; hurabc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc3", op, join, hurabc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc3;


   procedure Add_hurabc4( c : in out d.Criteria; hurabc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc4", op, join, hurabc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc4;


   procedure Add_hurabc5( c : in out d.Criteria; hurabc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc5", op, join, hurabc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc5;


   procedure Add_hurabc6( c : in out d.Criteria; hurabc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc6", op, join, hurabc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc6;


   procedure Add_hurabc7( c : in out d.Criteria; hurabc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc7", op, join, hurabc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc7;


   procedure Add_hurabc8( c : in out d.Criteria; hurabc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurabc8", op, join, hurabc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc8;


   procedure Add_hurahc1( c : in out d.Criteria; hurahc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc1", op, join, hurahc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc1;


   procedure Add_hurahc2( c : in out d.Criteria; hurahc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc2", op, join, hurahc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc2;


   procedure Add_hurahc3( c : in out d.Criteria; hurahc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc3", op, join, hurahc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc3;


   procedure Add_hurahc4( c : in out d.Criteria; hurahc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc4", op, join, hurahc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc4;


   procedure Add_hurahc5( c : in out d.Criteria; hurahc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc5", op, join, hurahc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc5;


   procedure Add_hurahc6( c : in out d.Criteria; hurahc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc6", op, join, hurahc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc6;


   procedure Add_hurahc7( c : in out d.Criteria; hurahc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc7", op, join, hurahc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc7;


   procedure Add_hurahc8( c : in out d.Criteria; hurahc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurahc8", op, join, hurahc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc8;


   procedure Add_hurcbc1( c : in out d.Criteria; hurcbc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc1", op, join, hurcbc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc1;


   procedure Add_hurcbc2( c : in out d.Criteria; hurcbc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc2", op, join, hurcbc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc2;


   procedure Add_hurcbc3( c : in out d.Criteria; hurcbc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc3", op, join, hurcbc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc3;


   procedure Add_hurcbc4( c : in out d.Criteria; hurcbc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc4", op, join, hurcbc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc4;


   procedure Add_hurcbc5( c : in out d.Criteria; hurcbc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc5", op, join, hurcbc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc5;


   procedure Add_hurcbc6( c : in out d.Criteria; hurcbc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc6", op, join, hurcbc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc6;


   procedure Add_hurcbc7( c : in out d.Criteria; hurcbc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc7", op, join, hurcbc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc7;


   procedure Add_hurcbc8( c : in out d.Criteria; hurcbc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurcbc8", op, join, hurcbc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc8;


   procedure Add_hurchc1( c : in out d.Criteria; hurchc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc1", op, join, hurchc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc1;


   procedure Add_hurchc2( c : in out d.Criteria; hurchc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc2", op, join, hurchc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc2;


   procedure Add_hurchc3( c : in out d.Criteria; hurchc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc3", op, join, hurchc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc3;


   procedure Add_hurchc4( c : in out d.Criteria; hurchc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc4", op, join, hurchc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc4;


   procedure Add_hurchc5( c : in out d.Criteria; hurchc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc5", op, join, hurchc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc5;


   procedure Add_hurchc6( c : in out d.Criteria; hurchc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc6", op, join, hurchc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc6;


   procedure Add_hurchc7( c : in out d.Criteria; hurchc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc7", op, join, hurchc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc7;


   procedure Add_hurchc8( c : in out d.Criteria; hurchc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurchc8", op, join, hurchc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc8;


   procedure Add_hurclc1( c : in out d.Criteria; hurclc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc1", op, join, hurclc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc1;


   procedure Add_hurclc2( c : in out d.Criteria; hurclc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc2", op, join, hurclc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc2;


   procedure Add_hurclc3( c : in out d.Criteria; hurclc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc3", op, join, hurclc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc3;


   procedure Add_hurclc4( c : in out d.Criteria; hurclc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc4", op, join, hurclc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc4;


   procedure Add_hurclc5( c : in out d.Criteria; hurclc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc5", op, join, hurclc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc5;


   procedure Add_hurclc6( c : in out d.Criteria; hurclc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc6", op, join, hurclc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc6;


   procedure Add_hurclc7( c : in out d.Criteria; hurclc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc7", op, join, hurclc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc7;


   procedure Add_hurclc8( c : in out d.Criteria; hurclc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurclc8", op, join, hurclc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc8;


   procedure Add_hurfrc1( c : in out d.Criteria; hurfrc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc1", op, join, hurfrc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc1;


   procedure Add_hurfrc2( c : in out d.Criteria; hurfrc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc2", op, join, hurfrc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc2;


   procedure Add_hurfrc3( c : in out d.Criteria; hurfrc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc3", op, join, hurfrc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc3;


   procedure Add_hurfrc4( c : in out d.Criteria; hurfrc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc4", op, join, hurfrc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc4;


   procedure Add_hurfrc5( c : in out d.Criteria; hurfrc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc5", op, join, hurfrc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc5;


   procedure Add_hurfrc6( c : in out d.Criteria; hurfrc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc6", op, join, hurfrc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc6;


   procedure Add_hurfrc7( c : in out d.Criteria; hurfrc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc7", op, join, hurfrc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc7;


   procedure Add_hurfrc8( c : in out d.Criteria; hurfrc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurfrc8", op, join, hurfrc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc8;


   procedure Add_hurotc1( c : in out d.Criteria; hurotc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc1", op, join, hurotc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc1;


   procedure Add_hurotc2( c : in out d.Criteria; hurotc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc2", op, join, hurotc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc2;


   procedure Add_hurotc3( c : in out d.Criteria; hurotc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc3", op, join, hurotc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc3;


   procedure Add_hurotc4( c : in out d.Criteria; hurotc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc4", op, join, hurotc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc4;


   procedure Add_hurotc5( c : in out d.Criteria; hurotc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc5", op, join, hurotc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc5;


   procedure Add_hurotc6( c : in out d.Criteria; hurotc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc6", op, join, hurotc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc6;


   procedure Add_hurotc7( c : in out d.Criteria; hurotc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc7", op, join, hurotc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc7;


   procedure Add_hurotc8( c : in out d.Criteria; hurotc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurotc8", op, join, hurotc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc8;


   procedure Add_hurrec1( c : in out d.Criteria; hurrec1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec1", op, join, hurrec1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec1;


   procedure Add_hurrec2( c : in out d.Criteria; hurrec2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec2", op, join, hurrec2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec2;


   procedure Add_hurrec3( c : in out d.Criteria; hurrec3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec3", op, join, hurrec3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec3;


   procedure Add_hurrec4( c : in out d.Criteria; hurrec4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec4", op, join, hurrec4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec4;


   procedure Add_hurrec5( c : in out d.Criteria; hurrec5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec5", op, join, hurrec5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec5;


   procedure Add_hurrec6( c : in out d.Criteria; hurrec6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec6", op, join, hurrec6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec6;


   procedure Add_hurrec7( c : in out d.Criteria; hurrec7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec7", op, join, hurrec7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec7;


   procedure Add_hurrec8( c : in out d.Criteria; hurrec8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hurrec8", op, join, hurrec8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec8;


   procedure Add_hpersc1( c : in out d.Criteria; hpersc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc1", op, join, hpersc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc1;


   procedure Add_hpersc2( c : in out d.Criteria; hpersc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc2", op, join, hpersc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc2;


   procedure Add_hpersc3( c : in out d.Criteria; hpersc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc3", op, join, hpersc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc3;


   procedure Add_hpersc4( c : in out d.Criteria; hpersc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc4", op, join, hpersc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc4;


   procedure Add_hpersc5( c : in out d.Criteria; hpersc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc5", op, join, hpersc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc5;


   procedure Add_hpersc6( c : in out d.Criteria; hpersc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc6", op, join, hpersc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc6;


   procedure Add_hpersc7( c : in out d.Criteria; hpersc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc7", op, join, hpersc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc7;


   procedure Add_hpersc8( c : in out d.Criteria; hpersc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpersc8", op, join, hpersc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc8;


   procedure Add_hrsedc1( c : in out d.Criteria; hrsedc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc1", op, join, hrsedc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc1;


   procedure Add_hrsedc2( c : in out d.Criteria; hrsedc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc2", op, join, hrsedc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc2;


   procedure Add_hrsedc3( c : in out d.Criteria; hrsedc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc3", op, join, hrsedc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc3;


   procedure Add_hrsedc4( c : in out d.Criteria; hrsedc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc4", op, join, hrsedc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc4;


   procedure Add_hrsedc5( c : in out d.Criteria; hrsedc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc5", op, join, hrsedc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc5;


   procedure Add_hrsedc6( c : in out d.Criteria; hrsedc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc6", op, join, hrsedc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc6;


   procedure Add_hrsedc7( c : in out d.Criteria; hrsedc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc7", op, join, hrsedc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc7;


   procedure Add_hrsedc8( c : in out d.Criteria; hrsedc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrsedc8", op, join, hrsedc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc8;


   procedure Add_hsvprc1( c : in out d.Criteria; hsvprc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc1", op, join, hsvprc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc1;


   procedure Add_hsvprc2( c : in out d.Criteria; hsvprc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc2", op, join, hsvprc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc2;


   procedure Add_hsvprc3( c : in out d.Criteria; hsvprc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc3", op, join, hsvprc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc3;


   procedure Add_hsvprc4( c : in out d.Criteria; hsvprc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc4", op, join, hsvprc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc4;


   procedure Add_hsvprc5( c : in out d.Criteria; hsvprc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc5", op, join, hsvprc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc5;


   procedure Add_hsvprc6( c : in out d.Criteria; hsvprc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc6", op, join, hsvprc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc6;


   procedure Add_hsvprc7( c : in out d.Criteria; hsvprc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc7", op, join, hsvprc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc7;


   procedure Add_hsvprc8( c : in out d.Criteria; hsvprc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hsvprc8", op, join, hsvprc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc8;


   procedure Add_laregc1( c : in out d.Criteria; laregc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc1", op, join, laregc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc1;


   procedure Add_laregc2( c : in out d.Criteria; laregc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc2", op, join, laregc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc2;


   procedure Add_laregc3( c : in out d.Criteria; laregc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc3", op, join, laregc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc3;


   procedure Add_laregc4( c : in out d.Criteria; laregc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc4", op, join, laregc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc4;


   procedure Add_laregc5( c : in out d.Criteria; laregc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc5", op, join, laregc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc5;


   procedure Add_laregc6( c : in out d.Criteria; laregc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc6", op, join, laregc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc6;


   procedure Add_laregc7( c : in out d.Criteria; laregc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc7", op, join, laregc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc7;


   procedure Add_laregc8( c : in out d.Criteria; laregc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "laregc8", op, join, laregc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc8;


   procedure Add_msc1( c : in out d.Criteria; msc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc1", op, join, msc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc1;


   procedure Add_msc2( c : in out d.Criteria; msc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc2", op, join, msc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc2;


   procedure Add_msc3( c : in out d.Criteria; msc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc3", op, join, msc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc3;


   procedure Add_msc4( c : in out d.Criteria; msc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc4", op, join, msc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc4;


   procedure Add_msc5( c : in out d.Criteria; msc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc5", op, join, msc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc5;


   procedure Add_msc6( c : in out d.Criteria; msc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc6", op, join, msc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc6;


   procedure Add_msc7( c : in out d.Criteria; msc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc7", op, join, msc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc7;


   procedure Add_msc8( c : in out d.Criteria; msc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "msc8", op, join, msc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc8;


   procedure Add_prsonc1( c : in out d.Criteria; prsonc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc1", op, join, prsonc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc1;


   procedure Add_prsonc2( c : in out d.Criteria; prsonc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc2", op, join, prsonc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc2;


   procedure Add_prsonc3( c : in out d.Criteria; prsonc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc3", op, join, prsonc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc3;


   procedure Add_prsonc4( c : in out d.Criteria; prsonc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc4", op, join, prsonc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc4;


   procedure Add_prsonc5( c : in out d.Criteria; prsonc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc5", op, join, prsonc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc5;


   procedure Add_prsonc6( c : in out d.Criteria; prsonc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc6", op, join, prsonc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc6;


   procedure Add_prsonc7( c : in out d.Criteria; prsonc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc7", op, join, prsonc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc7;


   procedure Add_prsonc8( c : in out d.Criteria; prsonc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prsonc8", op, join, prsonc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc8;


   procedure Add_rlp1c1( c : in out d.Criteria; rlp1c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c1", op, join, rlp1c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c1;


   procedure Add_rlp1c2( c : in out d.Criteria; rlp1c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c2", op, join, rlp1c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c2;


   procedure Add_rlp1c3( c : in out d.Criteria; rlp1c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c3", op, join, rlp1c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c3;


   procedure Add_rlp1c4( c : in out d.Criteria; rlp1c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c4", op, join, rlp1c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c4;


   procedure Add_rlp1c5( c : in out d.Criteria; rlp1c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c5", op, join, rlp1c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c5;


   procedure Add_rlp1c6( c : in out d.Criteria; rlp1c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c6", op, join, rlp1c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c6;


   procedure Add_rlp1c7( c : in out d.Criteria; rlp1c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c7", op, join, rlp1c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c7;


   procedure Add_rlp1c8( c : in out d.Criteria; rlp1c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp1c8", op, join, rlp1c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c8;


   procedure Add_rlp2c1( c : in out d.Criteria; rlp2c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c1", op, join, rlp2c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c1;


   procedure Add_rlp2c2( c : in out d.Criteria; rlp2c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c2", op, join, rlp2c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c2;


   procedure Add_rlp2c3( c : in out d.Criteria; rlp2c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c3", op, join, rlp2c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c3;


   procedure Add_rlp2c4( c : in out d.Criteria; rlp2c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c4", op, join, rlp2c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c4;


   procedure Add_rlp2c5( c : in out d.Criteria; rlp2c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c5", op, join, rlp2c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c5;


   procedure Add_rlp2c6( c : in out d.Criteria; rlp2c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c6", op, join, rlp2c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c6;


   procedure Add_rlp2c7( c : in out d.Criteria; rlp2c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c7", op, join, rlp2c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c7;


   procedure Add_rlp2c8( c : in out d.Criteria; rlp2c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp2c8", op, join, rlp2c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c8;


   procedure Add_rlp3c1( c : in out d.Criteria; rlp3c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c1", op, join, rlp3c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c1;


   procedure Add_rlp3c2( c : in out d.Criteria; rlp3c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c2", op, join, rlp3c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c2;


   procedure Add_rlp3c3( c : in out d.Criteria; rlp3c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c3", op, join, rlp3c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c3;


   procedure Add_rlp3c4( c : in out d.Criteria; rlp3c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c4", op, join, rlp3c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c4;


   procedure Add_rlp3c5( c : in out d.Criteria; rlp3c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c5", op, join, rlp3c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c5;


   procedure Add_rlp3c6( c : in out d.Criteria; rlp3c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c6", op, join, rlp3c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c6;


   procedure Add_rlp3c7( c : in out d.Criteria; rlp3c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c7", op, join, rlp3c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c7;


   procedure Add_rlp3c8( c : in out d.Criteria; rlp3c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp3c8", op, join, rlp3c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c8;


   procedure Add_rlp4c1( c : in out d.Criteria; rlp4c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c1", op, join, rlp4c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c1;


   procedure Add_rlp4c2( c : in out d.Criteria; rlp4c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c2", op, join, rlp4c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c2;


   procedure Add_rlp4c3( c : in out d.Criteria; rlp4c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c3", op, join, rlp4c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c3;


   procedure Add_rlp4c4( c : in out d.Criteria; rlp4c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c4", op, join, rlp4c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c4;


   procedure Add_rlp4c5( c : in out d.Criteria; rlp4c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c5", op, join, rlp4c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c5;


   procedure Add_rlp4c6( c : in out d.Criteria; rlp4c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c6", op, join, rlp4c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c6;


   procedure Add_rlp4c7( c : in out d.Criteria; rlp4c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c7", op, join, rlp4c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c7;


   procedure Add_rlp4c8( c : in out d.Criteria; rlp4c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp4c8", op, join, rlp4c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c8;


   procedure Add_rlp5c1( c : in out d.Criteria; rlp5c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c1", op, join, rlp5c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c1;


   procedure Add_rlp5c2( c : in out d.Criteria; rlp5c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c2", op, join, rlp5c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c2;


   procedure Add_rlp5c3( c : in out d.Criteria; rlp5c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c3", op, join, rlp5c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c3;


   procedure Add_rlp5c4( c : in out d.Criteria; rlp5c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c4", op, join, rlp5c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c4;


   procedure Add_rlp5c5( c : in out d.Criteria; rlp5c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c5", op, join, rlp5c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c5;


   procedure Add_rlp5c6( c : in out d.Criteria; rlp5c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c6", op, join, rlp5c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c6;


   procedure Add_rlp5c7( c : in out d.Criteria; rlp5c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c7", op, join, rlp5c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c7;


   procedure Add_rlp5c8( c : in out d.Criteria; rlp5c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp5c8", op, join, rlp5c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c8;


   procedure Add_rlp6c1( c : in out d.Criteria; rlp6c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c1", op, join, rlp6c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c1;


   procedure Add_rlp6c2( c : in out d.Criteria; rlp6c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c2", op, join, rlp6c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c2;


   procedure Add_rlp6c3( c : in out d.Criteria; rlp6c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c3", op, join, rlp6c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c3;


   procedure Add_rlp6c4( c : in out d.Criteria; rlp6c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c4", op, join, rlp6c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c4;


   procedure Add_rlp6c5( c : in out d.Criteria; rlp6c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c5", op, join, rlp6c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c5;


   procedure Add_rlp6c6( c : in out d.Criteria; rlp6c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c6", op, join, rlp6c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c6;


   procedure Add_rlp6c7( c : in out d.Criteria; rlp6c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c7", op, join, rlp6c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c7;


   procedure Add_rlp6c8( c : in out d.Criteria; rlp6c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp6c8", op, join, rlp6c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c8;


   procedure Add_rlp7c1( c : in out d.Criteria; rlp7c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c1", op, join, rlp7c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c1;


   procedure Add_rlp7c2( c : in out d.Criteria; rlp7c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c2", op, join, rlp7c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c2;


   procedure Add_rlp7c3( c : in out d.Criteria; rlp7c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c3", op, join, rlp7c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c3;


   procedure Add_rlp7c4( c : in out d.Criteria; rlp7c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c4", op, join, rlp7c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c4;


   procedure Add_rlp7c5( c : in out d.Criteria; rlp7c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c5", op, join, rlp7c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c5;


   procedure Add_rlp7c6( c : in out d.Criteria; rlp7c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c6", op, join, rlp7c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c6;


   procedure Add_rlp7c7( c : in out d.Criteria; rlp7c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c7", op, join, rlp7c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c7;


   procedure Add_rlp7c8( c : in out d.Criteria; rlp7c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp7c8", op, join, rlp7c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c8;


   procedure Add_rlp8c1( c : in out d.Criteria; rlp8c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c1", op, join, rlp8c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c1;


   procedure Add_rlp8c2( c : in out d.Criteria; rlp8c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c2", op, join, rlp8c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c2;


   procedure Add_rlp8c3( c : in out d.Criteria; rlp8c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c3", op, join, rlp8c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c3;


   procedure Add_rlp8c4( c : in out d.Criteria; rlp8c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c4", op, join, rlp8c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c4;


   procedure Add_rlp8c5( c : in out d.Criteria; rlp8c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c5", op, join, rlp8c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c5;


   procedure Add_rlp8c6( c : in out d.Criteria; rlp8c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c6", op, join, rlp8c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c6;


   procedure Add_rlp8c7( c : in out d.Criteria; rlp8c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c7", op, join, rlp8c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c7;


   procedure Add_rlp8c8( c : in out d.Criteria; rlp8c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp8c8", op, join, rlp8c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c8;


   procedure Add_rlp9c1( c : in out d.Criteria; rlp9c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c1", op, join, rlp9c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c1;


   procedure Add_rlp9c2( c : in out d.Criteria; rlp9c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c2", op, join, rlp9c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c2;


   procedure Add_rlp9c3( c : in out d.Criteria; rlp9c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c3", op, join, rlp9c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c3;


   procedure Add_rlp9c4( c : in out d.Criteria; rlp9c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c4", op, join, rlp9c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c4;


   procedure Add_rlp9c5( c : in out d.Criteria; rlp9c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c5", op, join, rlp9c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c5;


   procedure Add_rlp9c6( c : in out d.Criteria; rlp9c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c6", op, join, rlp9c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c6;


   procedure Add_rlp9c7( c : in out d.Criteria; rlp9c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c7", op, join, rlp9c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c7;


   procedure Add_rlp9c8( c : in out d.Criteria; rlp9c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp9c8", op, join, rlp9c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c8;


   procedure Add_rlp10c1( c : in out d.Criteria; rlp10c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c1", op, join, rlp10c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c1;


   procedure Add_rlp10c2( c : in out d.Criteria; rlp10c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c2", op, join, rlp10c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c2;


   procedure Add_rlp10c3( c : in out d.Criteria; rlp10c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c3", op, join, rlp10c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c3;


   procedure Add_rlp10c4( c : in out d.Criteria; rlp10c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c4", op, join, rlp10c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c4;


   procedure Add_rlp10c5( c : in out d.Criteria; rlp10c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c5", op, join, rlp10c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c5;


   procedure Add_rlp10c6( c : in out d.Criteria; rlp10c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c6", op, join, rlp10c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c6;


   procedure Add_rlp10c7( c : in out d.Criteria; rlp10c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c7", op, join, rlp10c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c7;


   procedure Add_rlp10c8( c : in out d.Criteria; rlp10c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp10c8", op, join, rlp10c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c8;


   procedure Add_rlp11c1( c : in out d.Criteria; rlp11c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c1", op, join, rlp11c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c1;


   procedure Add_rlp11c2( c : in out d.Criteria; rlp11c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c2", op, join, rlp11c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c2;


   procedure Add_rlp11c3( c : in out d.Criteria; rlp11c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c3", op, join, rlp11c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c3;


   procedure Add_rlp11c4( c : in out d.Criteria; rlp11c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c4", op, join, rlp11c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c4;


   procedure Add_rlp11c5( c : in out d.Criteria; rlp11c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c5", op, join, rlp11c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c5;


   procedure Add_rlp11c6( c : in out d.Criteria; rlp11c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c6", op, join, rlp11c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c6;


   procedure Add_rlp11c7( c : in out d.Criteria; rlp11c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c7", op, join, rlp11c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c7;


   procedure Add_rlp11c8( c : in out d.Criteria; rlp11c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp11c8", op, join, rlp11c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c8;


   procedure Add_rlp12c1( c : in out d.Criteria; rlp12c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c1", op, join, rlp12c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c1;


   procedure Add_rlp12c2( c : in out d.Criteria; rlp12c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c2", op, join, rlp12c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c2;


   procedure Add_rlp12c3( c : in out d.Criteria; rlp12c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c3", op, join, rlp12c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c3;


   procedure Add_rlp12c4( c : in out d.Criteria; rlp12c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c4", op, join, rlp12c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c4;


   procedure Add_rlp12c5( c : in out d.Criteria; rlp12c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c5", op, join, rlp12c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c5;


   procedure Add_rlp12c6( c : in out d.Criteria; rlp12c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c6", op, join, rlp12c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c6;


   procedure Add_rlp12c7( c : in out d.Criteria; rlp12c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c7", op, join, rlp12c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c7;


   procedure Add_rlp12c8( c : in out d.Criteria; rlp12c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp12c8", op, join, rlp12c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c8;


   procedure Add_rlp13c1( c : in out d.Criteria; rlp13c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c1", op, join, rlp13c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c1;


   procedure Add_rlp13c2( c : in out d.Criteria; rlp13c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c2", op, join, rlp13c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c2;


   procedure Add_rlp13c3( c : in out d.Criteria; rlp13c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c3", op, join, rlp13c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c3;


   procedure Add_rlp13c4( c : in out d.Criteria; rlp13c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c4", op, join, rlp13c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c4;


   procedure Add_rlp13c5( c : in out d.Criteria; rlp13c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c5", op, join, rlp13c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c5;


   procedure Add_rlp13c6( c : in out d.Criteria; rlp13c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c6", op, join, rlp13c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c6;


   procedure Add_rlp13c7( c : in out d.Criteria; rlp13c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c7", op, join, rlp13c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c7;


   procedure Add_rlp13c8( c : in out d.Criteria; rlp13c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp13c8", op, join, rlp13c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c8;


   procedure Add_rlp14c1( c : in out d.Criteria; rlp14c1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c1", op, join, rlp14c1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c1;


   procedure Add_rlp14c2( c : in out d.Criteria; rlp14c2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c2", op, join, rlp14c2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c2;


   procedure Add_rlp14c3( c : in out d.Criteria; rlp14c3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c3", op, join, rlp14c3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c3;


   procedure Add_rlp14c4( c : in out d.Criteria; rlp14c4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c4", op, join, rlp14c4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c4;


   procedure Add_rlp14c5( c : in out d.Criteria; rlp14c5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c5", op, join, rlp14c5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c5;


   procedure Add_rlp14c6( c : in out d.Criteria; rlp14c6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c6", op, join, rlp14c6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c6;


   procedure Add_rlp14c7( c : in out d.Criteria; rlp14c7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c7", op, join, rlp14c7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c7;


   procedure Add_rlp14c8( c : in out d.Criteria; rlp14c8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rlp14c8", op, join, rlp14c8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c8;


   procedure Add_rhrpcc1( c : in out d.Criteria; rhrpcc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc1", op, join, rhrpcc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc1;


   procedure Add_rhrpcc2( c : in out d.Criteria; rhrpcc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc2", op, join, rhrpcc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc2;


   procedure Add_rhrpcc3( c : in out d.Criteria; rhrpcc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc3", op, join, rhrpcc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc3;


   procedure Add_rhrpcc4( c : in out d.Criteria; rhrpcc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc4", op, join, rhrpcc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc4;


   procedure Add_rhrpcc5( c : in out d.Criteria; rhrpcc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc5", op, join, rhrpcc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc5;


   procedure Add_rhrpcc6( c : in out d.Criteria; rhrpcc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc6", op, join, rhrpcc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc6;


   procedure Add_rhrpcc7( c : in out d.Criteria; rhrpcc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc7", op, join, rhrpcc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc7;


   procedure Add_rhrpcc8( c : in out d.Criteria; rhrpcc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rhrpcc8", op, join, rhrpcc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc8;


   procedure Add_sbkitc1( c : in out d.Criteria; sbkitc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc1", op, join, sbkitc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc1;


   procedure Add_sbkitc2( c : in out d.Criteria; sbkitc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc2", op, join, sbkitc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc2;


   procedure Add_sbkitc3( c : in out d.Criteria; sbkitc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc3", op, join, sbkitc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc3;


   procedure Add_sbkitc4( c : in out d.Criteria; sbkitc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc4", op, join, sbkitc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc4;


   procedure Add_sbkitc5( c : in out d.Criteria; sbkitc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc5", op, join, sbkitc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc5;


   procedure Add_sbkitc6( c : in out d.Criteria; sbkitc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc6", op, join, sbkitc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc6;


   procedure Add_sbkitc7( c : in out d.Criteria; sbkitc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc7", op, join, sbkitc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc7;


   procedure Add_sbkitc8( c : in out d.Criteria; sbkitc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sbkitc8", op, join, sbkitc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc8;


   procedure Add_sexc1( c : in out d.Criteria; sexc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc1", op, join, sexc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc1;


   procedure Add_sexc2( c : in out d.Criteria; sexc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc2", op, join, sexc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc2;


   procedure Add_sexc3( c : in out d.Criteria; sexc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc3", op, join, sexc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc3;


   procedure Add_sexc4( c : in out d.Criteria; sexc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc4", op, join, sexc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc4;


   procedure Add_sexc5( c : in out d.Criteria; sexc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc5", op, join, sexc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc5;


   procedure Add_sexc6( c : in out d.Criteria; sexc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc6", op, join, sexc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc6;


   procedure Add_sexc7( c : in out d.Criteria; sexc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc7", op, join, sexc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc7;


   procedure Add_sexc8( c : in out d.Criteria; sexc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sexc8", op, join, sexc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc8;


   procedure Add_sfvitc1( c : in out d.Criteria; sfvitc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc1", op, join, sfvitc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc1;


   procedure Add_sfvitc2( c : in out d.Criteria; sfvitc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc2", op, join, sfvitc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc2;


   procedure Add_sfvitc3( c : in out d.Criteria; sfvitc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc3", op, join, sfvitc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc3;


   procedure Add_sfvitc4( c : in out d.Criteria; sfvitc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc4", op, join, sfvitc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc4;


   procedure Add_sfvitc5( c : in out d.Criteria; sfvitc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc5", op, join, sfvitc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc5;


   procedure Add_sfvitc6( c : in out d.Criteria; sfvitc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc6", op, join, sfvitc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc6;


   procedure Add_sfvitc7( c : in out d.Criteria; sfvitc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc7", op, join, sfvitc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc7;


   procedure Add_sfvitc8( c : in out d.Criteria; sfvitc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sfvitc8", op, join, sfvitc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc8;


   procedure Add_fmctsc1( c : in out d.Criteria; fmctsc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc1", op, join, fmctsc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc1;


   procedure Add_fmctsc2( c : in out d.Criteria; fmctsc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc2", op, join, fmctsc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc2;


   procedure Add_fmctsc3( c : in out d.Criteria; fmctsc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc3", op, join, fmctsc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc3;


   procedure Add_fmctsc4( c : in out d.Criteria; fmctsc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc4", op, join, fmctsc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc4;


   procedure Add_fmctsc5( c : in out d.Criteria; fmctsc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc5", op, join, fmctsc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc5;


   procedure Add_fmctsc6( c : in out d.Criteria; fmctsc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc6", op, join, fmctsc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc6;


   procedure Add_fmctsc7( c : in out d.Criteria; fmctsc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc7", op, join, fmctsc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc7;


   procedure Add_fmctsc8( c : in out d.Criteria; fmctsc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmctsc8", op, join, fmctsc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc8;


   procedure Add_fmealc1( c : in out d.Criteria; fmealc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc1", op, join, fmealc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc1;


   procedure Add_fmealc2( c : in out d.Criteria; fmealc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc2", op, join, fmealc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc2;


   procedure Add_fmealc3( c : in out d.Criteria; fmealc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc3", op, join, fmealc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc3;


   procedure Add_fmealc4( c : in out d.Criteria; fmealc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc4", op, join, fmealc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc4;


   procedure Add_fmealc5( c : in out d.Criteria; fmealc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc5", op, join, fmealc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc5;


   procedure Add_fmealc6( c : in out d.Criteria; fmealc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc6", op, join, fmealc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc6;


   procedure Add_fmealc7( c : in out d.Criteria; fmealc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc7", op, join, fmealc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc7;


   procedure Add_fmealc8( c : in out d.Criteria; fmealc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fmealc8", op, join, fmealc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc8;


   procedure Add_cblndc1( c : in out d.Criteria; cblndc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc1", op, join, cblndc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc1;


   procedure Add_cblndc2( c : in out d.Criteria; cblndc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc2", op, join, cblndc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc2;


   procedure Add_cblndc3( c : in out d.Criteria; cblndc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc3", op, join, cblndc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc3;


   procedure Add_cblndc4( c : in out d.Criteria; cblndc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc4", op, join, cblndc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc4;


   procedure Add_cblndc5( c : in out d.Criteria; cblndc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc5", op, join, cblndc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc5;


   procedure Add_cblndc6( c : in out d.Criteria; cblndc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc6", op, join, cblndc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc6;


   procedure Add_cblndc7( c : in out d.Criteria; cblndc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc7", op, join, cblndc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc7;


   procedure Add_cblndc8( c : in out d.Criteria; cblndc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cblndc8", op, join, cblndc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc8;


   procedure Add_cparsc1( c : in out d.Criteria; cparsc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc1", op, join, cparsc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc1;


   procedure Add_cparsc2( c : in out d.Criteria; cparsc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc2", op, join, cparsc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc2;


   procedure Add_cparsc3( c : in out d.Criteria; cparsc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc3", op, join, cparsc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc3;


   procedure Add_cparsc4( c : in out d.Criteria; cparsc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc4", op, join, cparsc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc4;


   procedure Add_cparsc5( c : in out d.Criteria; cparsc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc5", op, join, cparsc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc5;


   procedure Add_cparsc6( c : in out d.Criteria; cparsc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc6", op, join, cparsc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc6;


   procedure Add_cparsc7( c : in out d.Criteria; cparsc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc7", op, join, cparsc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc7;


   procedure Add_cparsc8( c : in out d.Criteria; cparsc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cparsc8", op, join, cparsc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc8;


   procedure Add_cdeafc1( c : in out d.Criteria; cdeafc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc1", op, join, cdeafc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc1;


   procedure Add_cdeafc2( c : in out d.Criteria; cdeafc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc2", op, join, cdeafc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc2;


   procedure Add_cdeafc3( c : in out d.Criteria; cdeafc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc3", op, join, cdeafc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc3;


   procedure Add_cdeafc4( c : in out d.Criteria; cdeafc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc4", op, join, cdeafc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc4;


   procedure Add_cdeafc5( c : in out d.Criteria; cdeafc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc5", op, join, cdeafc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc5;


   procedure Add_cdeafc6( c : in out d.Criteria; cdeafc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc6", op, join, cdeafc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc6;


   procedure Add_cdeafc7( c : in out d.Criteria; cdeafc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc7", op, join, cdeafc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc7;


   procedure Add_cdeafc8( c : in out d.Criteria; cdeafc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cdeafc8", op, join, cdeafc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc8;


   procedure Add_totgtc1( c : in out d.Criteria; totgtc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc1", op, join, totgtc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc1;


   procedure Add_totgtc2( c : in out d.Criteria; totgtc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc2", op, join, totgtc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc2;


   procedure Add_totgtc3( c : in out d.Criteria; totgtc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc3", op, join, totgtc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc3;


   procedure Add_totgtc4( c : in out d.Criteria; totgtc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc4", op, join, totgtc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc4;


   procedure Add_totgtc5( c : in out d.Criteria; totgtc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc5", op, join, totgtc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc5;


   procedure Add_totgtc6( c : in out d.Criteria; totgtc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc6", op, join, totgtc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc6;


   procedure Add_totgtc7( c : in out d.Criteria; totgtc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc7", op, join, totgtc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc7;


   procedure Add_totgtc8( c : in out d.Criteria; totgtc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totgtc8", op, join, totgtc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc8;


   procedure Add_totsvc1( c : in out d.Criteria; totsvc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc1", op, join, totsvc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc1;


   procedure Add_totsvc2( c : in out d.Criteria; totsvc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc2", op, join, totsvc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc2;


   procedure Add_totsvc3( c : in out d.Criteria; totsvc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc3", op, join, totsvc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc3;


   procedure Add_totsvc4( c : in out d.Criteria; totsvc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc4", op, join, totsvc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc4;


   procedure Add_totsvc5( c : in out d.Criteria; totsvc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc5", op, join, totsvc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc5;


   procedure Add_totsvc6( c : in out d.Criteria; totsvc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc6", op, join, totsvc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc6;


   procedure Add_totsvc7( c : in out d.Criteria; totsvc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc7", op, join, totsvc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc7;


   procedure Add_totsvc8( c : in out d.Criteria; totsvc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totsvc8", op, join, totsvc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc8;


   procedure Add_tacamc1( c : in out d.Criteria; tacamc1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc1", op, join, Long_Float( tacamc1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc1;


   procedure Add_tacamc2( c : in out d.Criteria; tacamc2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc2", op, join, Long_Float( tacamc2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc2;


   procedure Add_tacamc3( c : in out d.Criteria; tacamc3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc3", op, join, Long_Float( tacamc3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc3;


   procedure Add_tacamc4( c : in out d.Criteria; tacamc4 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc4", op, join, Long_Float( tacamc4 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc4;


   procedure Add_tacamc5( c : in out d.Criteria; tacamc5 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc5", op, join, Long_Float( tacamc5 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc5;


   procedure Add_tacamc6( c : in out d.Criteria; tacamc6 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc6", op, join, Long_Float( tacamc6 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc6;


   procedure Add_tacamc7( c : in out d.Criteria; tacamc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc7", op, join, tacamc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc7;


   procedure Add_tacamc8( c : in out d.Criteria; tacamc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tacamc8", op, join, tacamc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc8;


   procedure Add_tpeedc1( c : in out d.Criteria; tpeedc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc1", op, join, tpeedc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc1;


   procedure Add_tpeedc2( c : in out d.Criteria; tpeedc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc2", op, join, tpeedc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc2;


   procedure Add_tpeedc3( c : in out d.Criteria; tpeedc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc3", op, join, tpeedc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc3;


   procedure Add_tpeedc4( c : in out d.Criteria; tpeedc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc4", op, join, tpeedc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc4;


   procedure Add_tpeedc5( c : in out d.Criteria; tpeedc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc5", op, join, tpeedc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc5;


   procedure Add_tpeedc6( c : in out d.Criteria; tpeedc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc6", op, join, tpeedc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc6;


   procedure Add_tpeedc7( c : in out d.Criteria; tpeedc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc7", op, join, tpeedc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc7;


   procedure Add_tpeedc8( c : in out d.Criteria; tpeedc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tpeedc8", op, join, tpeedc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc8;


   procedure Add_uprsoc1( c : in out d.Criteria; uprsoc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc1", op, join, uprsoc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc1;


   procedure Add_uprsoc2( c : in out d.Criteria; uprsoc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc2", op, join, uprsoc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc2;


   procedure Add_uprsoc3( c : in out d.Criteria; uprsoc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc3", op, join, uprsoc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc3;


   procedure Add_uprsoc4( c : in out d.Criteria; uprsoc4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc4", op, join, uprsoc4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc4;


   procedure Add_uprsoc5( c : in out d.Criteria; uprsoc5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc5", op, join, uprsoc5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc5;


   procedure Add_uprsoc6( c : in out d.Criteria; uprsoc6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc6", op, join, uprsoc6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc6;


   procedure Add_uprsoc7( c : in out d.Criteria; uprsoc7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc7", op, join, uprsoc7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc7;


   procedure Add_uprsoc8( c : in out d.Criteria; uprsoc8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uprsoc8", op, join, uprsoc8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc8;


   procedure Add_govpy1hd( c : in out d.Criteria; govpy1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy1hd", op, join, govpy1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy1hd;


   procedure Add_govpy2hd( c : in out d.Criteria; govpy2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy2hd", op, join, govpy2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy2hd;


   procedure Add_govpy3hd( c : in out d.Criteria; govpy3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy3hd", op, join, govpy3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy3hd;


   procedure Add_govpy4hd( c : in out d.Criteria; govpy4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy4hd", op, join, govpy4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy4hd;


   procedure Add_govpy5hd( c : in out d.Criteria; govpy5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy5hd", op, join, govpy5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy5hd;


   procedure Add_govpy6hd( c : in out d.Criteria; govpy6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy6hd", op, join, govpy6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy6hd;


   procedure Add_govpy7hd( c : in out d.Criteria; govpy7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy7hd", op, join, govpy7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy7hd;


   procedure Add_govpy8hd( c : in out d.Criteria; govpy8hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy8hd", op, join, govpy8hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy8hd;


   procedure Add_govpy9hd( c : in out d.Criteria; govpy9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy9hd", op, join, govpy9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy9hd;


   procedure Add_gvpy10hd( c : in out d.Criteria; gvpy10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvpy10hd", op, join, gvpy10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy10hd;


   procedure Add_gvpy11hd( c : in out d.Criteria; gvpy11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvpy11hd", op, join, gvpy11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy11hd;


   procedure Add_govpy1sp( c : in out d.Criteria; govpy1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy1sp", op, join, govpy1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy1sp;


   procedure Add_govpy2sp( c : in out d.Criteria; govpy2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy2sp", op, join, govpy2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy2sp;


   procedure Add_govpy3sp( c : in out d.Criteria; govpy3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy3sp", op, join, govpy3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy3sp;


   procedure Add_govpy4sp( c : in out d.Criteria; govpy4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy4sp", op, join, govpy4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy4sp;


   procedure Add_govpy5sp( c : in out d.Criteria; govpy5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy5sp", op, join, govpy5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy5sp;


   procedure Add_govpy6sp( c : in out d.Criteria; govpy6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy6sp", op, join, govpy6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy6sp;


   procedure Add_govpy7sp( c : in out d.Criteria; govpy7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy7sp", op, join, govpy7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy7sp;


   procedure Add_govpy8sp( c : in out d.Criteria; govpy8sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy8sp", op, join, govpy8sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy8sp;


   procedure Add_govpy9sp( c : in out d.Criteria; govpy9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "govpy9sp", op, join, govpy9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy9sp;


   procedure Add_gvpy10sp( c : in out d.Criteria; gvpy10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvpy10sp", op, join, gvpy10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy10sp;


   procedure Add_gvpy11sp( c : in out d.Criteria; gvpy11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvpy11sp", op, join, gvpy11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy11sp;


   procedure Add_nhhamt1( c : in out d.Criteria; nhhamt1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhamt1", op, join, Long_Float( nhhamt1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt1;


   procedure Add_nhhamt2( c : in out d.Criteria; nhhamt2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhamt2", op, join, Long_Float( nhhamt2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt2;


   procedure Add_nhhamt3( c : in out d.Criteria; nhhamt3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhamt3", op, join, Long_Float( nhhamt3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt3;


   procedure Add_nhhamt4( c : in out d.Criteria; nhhamt4 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhamt4", op, join, Long_Float( nhhamt4 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt4;


   procedure Add_nhhfee1( c : in out d.Criteria; nhhfee1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhfee1", op, join, nhhfee1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee1;


   procedure Add_nhhfee2( c : in out d.Criteria; nhhfee2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhfee2", op, join, nhhfee2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee2;


   procedure Add_nhhfee3( c : in out d.Criteria; nhhfee3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhfee3", op, join, nhhfee3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee3;


   procedure Add_nhhfee4( c : in out d.Criteria; nhhfee4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nhhfee4", op, join, nhhfee4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee4;


   procedure Add_pnhhamt1( c : in out d.Criteria; pnhhamt1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pnhhamt1", op, join, pnhhamt1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt1;


   procedure Add_pnhhamt2( c : in out d.Criteria; pnhhamt2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pnhhamt2", op, join, pnhhamt2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt2;


   procedure Add_pnhhamt3( c : in out d.Criteria; pnhhamt3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pnhhamt3", op, join, pnhhamt3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt3;


   procedure Add_pnhhamt4( c : in out d.Criteria; pnhhamt4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pnhhamt4", op, join, pnhhamt4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt4;


   procedure Add_bona11hd( c : in out d.Criteria; bona11hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona11hd", op, join, Long_Float( bona11hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona11hd;


   procedure Add_bona12hd( c : in out d.Criteria; bona12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona12hd", op, join, bona12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona12hd;


   procedure Add_bona13hd( c : in out d.Criteria; bona13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona13hd", op, join, bona13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona13hd;


   procedure Add_bona11sp( c : in out d.Criteria; bona11sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona11sp", op, join, Long_Float( bona11sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona11sp;


   procedure Add_bona12sp( c : in out d.Criteria; bona12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona12sp", op, join, bona12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona12sp;


   procedure Add_bona13sp( c : in out d.Criteria; bona13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona13sp", op, join, bona13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona13sp;


   procedure Add_bona21hd( c : in out d.Criteria; bona21hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona21hd", op, join, Long_Float( bona21hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona21hd;


   procedure Add_bona22hd( c : in out d.Criteria; bona22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona22hd", op, join, bona22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona22hd;


   procedure Add_bona23hd( c : in out d.Criteria; bona23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona23hd", op, join, bona23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona23hd;


   procedure Add_bona21sp( c : in out d.Criteria; bona21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona21sp", op, join, bona21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona21sp;


   procedure Add_bona22sp( c : in out d.Criteria; bona22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona22sp", op, join, bona22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona22sp;


   procedure Add_bona23sp( c : in out d.Criteria; bona23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona23sp", op, join, bona23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona23sp;


   procedure Add_bona31hd( c : in out d.Criteria; bona31hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona31hd", op, join, Long_Float( bona31hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona31hd;


   procedure Add_bona32hd( c : in out d.Criteria; bona32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona32hd", op, join, bona32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona32hd;


   procedure Add_bona33hd( c : in out d.Criteria; bona33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona33hd", op, join, bona33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona33hd;


   procedure Add_bona31sp( c : in out d.Criteria; bona31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona31sp", op, join, bona31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona31sp;


   procedure Add_bona32sp( c : in out d.Criteria; bona32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona32sp", op, join, bona32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona32sp;


   procedure Add_bona33sp( c : in out d.Criteria; bona33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona33sp", op, join, bona33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona33sp;


   procedure Add_bona41hd( c : in out d.Criteria; bona41hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona41hd", op, join, Long_Float( bona41hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona41hd;


   procedure Add_bona42hd( c : in out d.Criteria; bona42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona42hd", op, join, bona42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona42hd;


   procedure Add_bona43hd( c : in out d.Criteria; bona43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona43hd", op, join, bona43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona43hd;


   procedure Add_bona41sp( c : in out d.Criteria; bona41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona41sp", op, join, bona41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona41sp;


   procedure Add_bona42sp( c : in out d.Criteria; bona42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona42sp", op, join, bona42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona42sp;


   procedure Add_bona43sp( c : in out d.Criteria; bona43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona43sp", op, join, bona43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona43sp;


   procedure Add_bona51hd( c : in out d.Criteria; bona51hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona51hd", op, join, Long_Float( bona51hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona51hd;


   procedure Add_bona52hd( c : in out d.Criteria; bona52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona52hd", op, join, bona52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona52hd;


   procedure Add_bona53hd( c : in out d.Criteria; bona53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona53hd", op, join, bona53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona53hd;


   procedure Add_bona51sp( c : in out d.Criteria; bona51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona51sp", op, join, bona51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona51sp;


   procedure Add_bona52sp( c : in out d.Criteria; bona52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona52sp", op, join, bona52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona52sp;


   procedure Add_bona53sp( c : in out d.Criteria; bona53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona53sp", op, join, bona53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona53sp;


   procedure Add_bona61hd( c : in out d.Criteria; bona61hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona61hd", op, join, Long_Float( bona61hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona61hd;


   procedure Add_bona62hd( c : in out d.Criteria; bona62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona62hd", op, join, bona62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona62hd;


   procedure Add_bona63hd( c : in out d.Criteria; bona63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona63hd", op, join, bona63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona63hd;


   procedure Add_bona61sp( c : in out d.Criteria; bona61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona61sp", op, join, bona61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona61sp;


   procedure Add_bona62sp( c : in out d.Criteria; bona62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona62sp", op, join, bona62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona62sp;


   procedure Add_bona63sp( c : in out d.Criteria; bona63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bona63sp", op, join, bona63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona63sp;


   procedure Add_bont11hd( c : in out d.Criteria; bont11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont11hd", op, join, bont11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont11hd;


   procedure Add_bont12hd( c : in out d.Criteria; bont12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont12hd", op, join, bont12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont12hd;


   procedure Add_bont13hd( c : in out d.Criteria; bont13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont13hd", op, join, bont13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont13hd;


   procedure Add_bont11sp( c : in out d.Criteria; bont11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont11sp", op, join, bont11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont11sp;


   procedure Add_bont12sp( c : in out d.Criteria; bont12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont12sp", op, join, bont12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont12sp;


   procedure Add_bont13sp( c : in out d.Criteria; bont13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont13sp", op, join, bont13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont13sp;


   procedure Add_bont21hd( c : in out d.Criteria; bont21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont21hd", op, join, bont21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont21hd;


   procedure Add_bont22hd( c : in out d.Criteria; bont22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont22hd", op, join, bont22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont22hd;


   procedure Add_bont23hd( c : in out d.Criteria; bont23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont23hd", op, join, bont23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont23hd;


   procedure Add_bont21sp( c : in out d.Criteria; bont21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont21sp", op, join, bont21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont21sp;


   procedure Add_bont22sp( c : in out d.Criteria; bont22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont22sp", op, join, bont22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont22sp;


   procedure Add_bont23sp( c : in out d.Criteria; bont23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont23sp", op, join, bont23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont23sp;


   procedure Add_bont31hd( c : in out d.Criteria; bont31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont31hd", op, join, bont31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont31hd;


   procedure Add_bont32hd( c : in out d.Criteria; bont32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont32hd", op, join, bont32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont32hd;


   procedure Add_bont33hd( c : in out d.Criteria; bont33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont33hd", op, join, bont33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont33hd;


   procedure Add_bont31sp( c : in out d.Criteria; bont31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont31sp", op, join, bont31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont31sp;


   procedure Add_bont32sp( c : in out d.Criteria; bont32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont32sp", op, join, bont32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont32sp;


   procedure Add_bont33sp( c : in out d.Criteria; bont33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont33sp", op, join, bont33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont33sp;


   procedure Add_bont41hd( c : in out d.Criteria; bont41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont41hd", op, join, bont41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont41hd;


   procedure Add_bont42hd( c : in out d.Criteria; bont42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont42hd", op, join, bont42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont42hd;


   procedure Add_bont43hd( c : in out d.Criteria; bont43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont43hd", op, join, bont43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont43hd;


   procedure Add_bont41sp( c : in out d.Criteria; bont41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont41sp", op, join, bont41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont41sp;


   procedure Add_bont42sp( c : in out d.Criteria; bont42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont42sp", op, join, bont42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont42sp;


   procedure Add_bont43sp( c : in out d.Criteria; bont43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont43sp", op, join, bont43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont43sp;


   procedure Add_bont51hd( c : in out d.Criteria; bont51hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont51hd", op, join, bont51hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont51hd;


   procedure Add_bont52hd( c : in out d.Criteria; bont52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont52hd", op, join, bont52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont52hd;


   procedure Add_bont53hd( c : in out d.Criteria; bont53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont53hd", op, join, bont53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont53hd;


   procedure Add_bont51sp( c : in out d.Criteria; bont51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont51sp", op, join, bont51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont51sp;


   procedure Add_bont52sp( c : in out d.Criteria; bont52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont52sp", op, join, bont52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont52sp;


   procedure Add_bont53sp( c : in out d.Criteria; bont53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont53sp", op, join, bont53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont53sp;


   procedure Add_bont61hd( c : in out d.Criteria; bont61hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont61hd", op, join, bont61hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont61hd;


   procedure Add_bont62hd( c : in out d.Criteria; bont62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont62hd", op, join, bont62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont62hd;


   procedure Add_bont63hd( c : in out d.Criteria; bont63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont63hd", op, join, bont63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont63hd;


   procedure Add_bont61sp( c : in out d.Criteria; bont61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont61sp", op, join, bont61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont61sp;


   procedure Add_bont62sp( c : in out d.Criteria; bont62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont62sp", op, join, bont62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont62sp;


   procedure Add_bont63sp( c : in out d.Criteria; bont63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bont63sp", op, join, bont63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont63sp;


   procedure Add_btax11hd( c : in out d.Criteria; btax11hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax11hd", op, join, Long_Float( btax11hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax11hd;


   procedure Add_btax12hd( c : in out d.Criteria; btax12hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax12hd", op, join, Long_Float( btax12hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax12hd;


   procedure Add_btax13hd( c : in out d.Criteria; btax13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax13hd", op, join, btax13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax13hd;


   procedure Add_btax11sp( c : in out d.Criteria; btax11sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax11sp", op, join, Long_Float( btax11sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax11sp;


   procedure Add_btax12sp( c : in out d.Criteria; btax12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax12sp", op, join, btax12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax12sp;


   procedure Add_btax13sp( c : in out d.Criteria; btax13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax13sp", op, join, btax13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax13sp;


   procedure Add_btax21hd( c : in out d.Criteria; btax21hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax21hd", op, join, Long_Float( btax21hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax21hd;


   procedure Add_btax22hd( c : in out d.Criteria; btax22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax22hd", op, join, btax22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax22hd;


   procedure Add_btax23hd( c : in out d.Criteria; btax23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax23hd", op, join, btax23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax23hd;


   procedure Add_btax21sp( c : in out d.Criteria; btax21sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax21sp", op, join, Long_Float( btax21sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax21sp;


   procedure Add_btax22sp( c : in out d.Criteria; btax22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax22sp", op, join, btax22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax22sp;


   procedure Add_btax23sp( c : in out d.Criteria; btax23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax23sp", op, join, btax23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax23sp;


   procedure Add_btax31hd( c : in out d.Criteria; btax31hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax31hd", op, join, Long_Float( btax31hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax31hd;


   procedure Add_btax32hd( c : in out d.Criteria; btax32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax32hd", op, join, btax32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax32hd;


   procedure Add_btax33hd( c : in out d.Criteria; btax33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax33hd", op, join, btax33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax33hd;


   procedure Add_btax31sp( c : in out d.Criteria; btax31sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax31sp", op, join, Long_Float( btax31sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax31sp;


   procedure Add_btax32sp( c : in out d.Criteria; btax32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax32sp", op, join, btax32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax32sp;


   procedure Add_btax33sp( c : in out d.Criteria; btax33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax33sp", op, join, btax33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax33sp;


   procedure Add_btax41hd( c : in out d.Criteria; btax41hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax41hd", op, join, Long_Float( btax41hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax41hd;


   procedure Add_btax42hd( c : in out d.Criteria; btax42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax42hd", op, join, btax42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax42hd;


   procedure Add_btax43hd( c : in out d.Criteria; btax43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax43hd", op, join, btax43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax43hd;


   procedure Add_btax41sp( c : in out d.Criteria; btax41sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax41sp", op, join, Long_Float( btax41sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax41sp;


   procedure Add_btax42sp( c : in out d.Criteria; btax42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax42sp", op, join, btax42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax42sp;


   procedure Add_btax43sp( c : in out d.Criteria; btax43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax43sp", op, join, btax43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax43sp;


   procedure Add_btax51hd( c : in out d.Criteria; btax51hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax51hd", op, join, Long_Float( btax51hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax51hd;


   procedure Add_btax52hd( c : in out d.Criteria; btax52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax52hd", op, join, btax52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax52hd;


   procedure Add_btax53hd( c : in out d.Criteria; btax53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax53hd", op, join, btax53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax53hd;


   procedure Add_btax51sp( c : in out d.Criteria; btax51sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax51sp", op, join, Long_Float( btax51sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax51sp;


   procedure Add_btax52sp( c : in out d.Criteria; btax52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax52sp", op, join, btax52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax52sp;


   procedure Add_btax53sp( c : in out d.Criteria; btax53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax53sp", op, join, btax53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax53sp;


   procedure Add_btax61hd( c : in out d.Criteria; btax61hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax61hd", op, join, Long_Float( btax61hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax61hd;


   procedure Add_btax62hd( c : in out d.Criteria; btax62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax62hd", op, join, btax62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax62hd;


   procedure Add_btax63hd( c : in out d.Criteria; btax63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax63hd", op, join, btax63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax63hd;


   procedure Add_btax61sp( c : in out d.Criteria; btax61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax61sp", op, join, btax61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax61sp;


   procedure Add_btax62sp( c : in out d.Criteria; btax62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax62sp", op, join, btax62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax62sp;


   procedure Add_btax63sp( c : in out d.Criteria; btax63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "btax63sp", op, join, btax63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax63sp;


   procedure Add_busac1hd( c : in out d.Criteria; busac1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busac1hd", op, join, busac1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac1hd;


   procedure Add_busac2hd( c : in out d.Criteria; busac2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busac2hd", op, join, busac2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac2hd;


   procedure Add_busac3hd( c : in out d.Criteria; busac3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busac3hd", op, join, busac3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac3hd;


   procedure Add_busac1sp( c : in out d.Criteria; busac1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busac1sp", op, join, busac1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac1sp;


   procedure Add_busac2sp( c : in out d.Criteria; busac2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busac2sp", op, join, busac2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac2sp;


   procedure Add_busac3sp( c : in out d.Criteria; busac3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busac3sp", op, join, busac3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac3sp;


   procedure Add_caram1hd( c : in out d.Criteria; caram1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "caram1hd", op, join, Long_Float( caram1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram1hd;


   procedure Add_caram2hd( c : in out d.Criteria; caram2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "caram2hd", op, join, caram2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram2hd;


   procedure Add_caram3hd( c : in out d.Criteria; caram3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "caram3hd", op, join, caram3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram3hd;


   procedure Add_caram1sp( c : in out d.Criteria; caram1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "caram1sp", op, join, Long_Float( caram1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram1sp;


   procedure Add_caram2sp( c : in out d.Criteria; caram2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "caram2sp", op, join, caram2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram2sp;


   procedure Add_caram3sp( c : in out d.Criteria; caram3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "caram3sp", op, join, caram3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram3sp;


   procedure Add_carcn1hd( c : in out d.Criteria; carcn1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carcn1hd", op, join, carcn1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn1hd;


   procedure Add_carcn2hd( c : in out d.Criteria; carcn2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carcn2hd", op, join, carcn2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn2hd;


   procedure Add_carcn3hd( c : in out d.Criteria; carcn3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carcn3hd", op, join, carcn3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn3hd;


   procedure Add_carcn1sp( c : in out d.Criteria; carcn1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carcn1sp", op, join, carcn1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn1sp;


   procedure Add_carcn2sp( c : in out d.Criteria; carcn2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carcn2sp", op, join, carcn2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn2sp;


   procedure Add_carcn3sp( c : in out d.Criteria; carcn3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carcn3sp", op, join, carcn3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn3sp;


   procedure Add_carvl1hd( c : in out d.Criteria; carvl1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carvl1hd", op, join, carvl1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl1hd;


   procedure Add_carvl2hd( c : in out d.Criteria; carvl2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carvl2hd", op, join, carvl2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl2hd;


   procedure Add_carvl3hd( c : in out d.Criteria; carvl3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carvl3hd", op, join, carvl3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl3hd;


   procedure Add_carvl1sp( c : in out d.Criteria; carvl1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carvl1sp", op, join, carvl1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl1sp;


   procedure Add_carvl2sp( c : in out d.Criteria; carvl2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carvl2sp", op, join, carvl2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl2sp;


   procedure Add_carvl3sp( c : in out d.Criteria; carvl3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "carvl3sp", op, join, carvl3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl3sp;


   procedure Add_chktx1hd( c : in out d.Criteria; chktx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chktx1hd", op, join, chktx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx1hd;


   procedure Add_chktx2hd( c : in out d.Criteria; chktx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chktx2hd", op, join, chktx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx2hd;


   procedure Add_chktx3hd( c : in out d.Criteria; chktx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chktx3hd", op, join, chktx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx3hd;


   procedure Add_chktx1sp( c : in out d.Criteria; chktx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chktx1sp", op, join, chktx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx1sp;


   procedure Add_chktx2sp( c : in out d.Criteria; chktx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chktx2sp", op, join, chktx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx2sp;


   procedure Add_chktx3sp( c : in out d.Criteria; chktx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chktx3sp", op, join, chktx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx3sp;


   procedure Add_chcom1hd( c : in out d.Criteria; chcom1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcom1hd", op, join, chcom1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom1hd;


   procedure Add_chcom2hd( c : in out d.Criteria; chcom2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcom2hd", op, join, chcom2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom2hd;


   procedure Add_chcom3hd( c : in out d.Criteria; chcom3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcom3hd", op, join, chcom3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom3hd;


   procedure Add_chcom1sp( c : in out d.Criteria; chcom1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcom1sp", op, join, chcom1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom1sp;


   procedure Add_chcom2sp( c : in out d.Criteria; chcom2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcom2sp", op, join, chcom2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom2sp;


   procedure Add_chcom3sp( c : in out d.Criteria; chcom3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chcom3sp", op, join, chcom3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom3sp;


   procedure Add_chvam1hd( c : in out d.Criteria; chvam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvam1hd", op, join, Long_Float( chvam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam1hd;


   procedure Add_chvam2hd( c : in out d.Criteria; chvam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvam2hd", op, join, chvam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam2hd;


   procedure Add_chvam3hd( c : in out d.Criteria; chvam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvam3hd", op, join, chvam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam3hd;


   procedure Add_chvam1sp( c : in out d.Criteria; chvam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvam1sp", op, join, Long_Float( chvam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam1sp;


   procedure Add_chvam2sp( c : in out d.Criteria; chvam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvam2sp", op, join, Long_Float( chvam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam2sp;


   procedure Add_chvam3sp( c : in out d.Criteria; chvam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvam3sp", op, join, chvam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam3sp;


   procedure Add_chvpd1hd( c : in out d.Criteria; chvpd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvpd1hd", op, join, chvpd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd1hd;


   procedure Add_chvpd2hd( c : in out d.Criteria; chvpd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvpd2hd", op, join, chvpd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd2hd;


   procedure Add_chvpd3hd( c : in out d.Criteria; chvpd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvpd3hd", op, join, chvpd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd3hd;


   procedure Add_chvpd1sp( c : in out d.Criteria; chvpd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvpd1sp", op, join, chvpd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd1sp;


   procedure Add_chvpd2sp( c : in out d.Criteria; chvpd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvpd2sp", op, join, chvpd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd2sp;


   procedure Add_chvpd3sp( c : in out d.Criteria; chvpd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chvpd3sp", op, join, chvpd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd3sp;


   procedure Add_chsac1hd( c : in out d.Criteria; chsac1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chsac1hd", op, join, chsac1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac1hd;


   procedure Add_chsac2hd( c : in out d.Criteria; chsac2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chsac2hd", op, join, chsac2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac2hd;


   procedure Add_chsac3hd( c : in out d.Criteria; chsac3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chsac3hd", op, join, chsac3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac3hd;


   procedure Add_chsac1sp( c : in out d.Criteria; chsac1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chsac1sp", op, join, chsac1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac1sp;


   procedure Add_chsac2sp( c : in out d.Criteria; chsac2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chsac2sp", op, join, chsac2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac2sp;


   procedure Add_chsac3sp( c : in out d.Criteria; chsac3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chsac3sp", op, join, chsac3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac3sp;


   procedure Add_chuam1hd( c : in out d.Criteria; chuam1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chuam1hd", op, join, chuam1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam1hd;


   procedure Add_chuam2hd( c : in out d.Criteria; chuam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chuam2hd", op, join, chuam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam2hd;


   procedure Add_chuam3hd( c : in out d.Criteria; chuam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chuam3hd", op, join, chuam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam3hd;


   procedure Add_chuam1sp( c : in out d.Criteria; chuam1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chuam1sp", op, join, chuam1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam1sp;


   procedure Add_chuam2sp( c : in out d.Criteria; chuam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chuam2sp", op, join, chuam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam2sp;


   procedure Add_chuam3sp( c : in out d.Criteria; chuam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chuam3sp", op, join, chuam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam3sp;


   procedure Add_chupd1hd( c : in out d.Criteria; chupd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chupd1hd", op, join, chupd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd1hd;


   procedure Add_chupd2hd( c : in out d.Criteria; chupd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chupd2hd", op, join, chupd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd2hd;


   procedure Add_chupd3hd( c : in out d.Criteria; chupd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chupd3hd", op, join, chupd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd3hd;


   procedure Add_chupd1sp( c : in out d.Criteria; chupd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chupd1sp", op, join, chupd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd1sp;


   procedure Add_chupd2sp( c : in out d.Criteria; chupd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chupd2sp", op, join, chupd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd2sp;


   procedure Add_chupd3sp( c : in out d.Criteria; chupd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chupd3sp", op, join, chupd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd3sp;


   procedure Add_chusu1hd( c : in out d.Criteria; chusu1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chusu1hd", op, join, chusu1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu1hd;


   procedure Add_chusu2hd( c : in out d.Criteria; chusu2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chusu2hd", op, join, chusu2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu2hd;


   procedure Add_chusu3hd( c : in out d.Criteria; chusu3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chusu3hd", op, join, chusu3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu3hd;


   procedure Add_chusu1sp( c : in out d.Criteria; chusu1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chusu1sp", op, join, chusu1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu1sp;


   procedure Add_chusu2sp( c : in out d.Criteria; chusu2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chusu2sp", op, join, chusu2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu2sp;


   procedure Add_chusu3sp( c : in out d.Criteria; chusu3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chusu3sp", op, join, chusu3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu3sp;


   procedure Add_doth1hd( c : in out d.Criteria; doth1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "doth1hd", op, join, Long_Float( doth1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth1hd;


   procedure Add_doth2hd( c : in out d.Criteria; doth2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "doth2hd", op, join, Long_Float( doth2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth2hd;


   procedure Add_doth3hd( c : in out d.Criteria; doth3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "doth3hd", op, join, doth3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth3hd;


   procedure Add_doth1sp( c : in out d.Criteria; doth1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "doth1sp", op, join, Long_Float( doth1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth1sp;


   procedure Add_doth2sp( c : in out d.Criteria; doth2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "doth2sp", op, join, doth2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth2sp;


   procedure Add_doth3sp( c : in out d.Criteria; doth3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "doth3sp", op, join, doth3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth3sp;


   procedure Add_dpen1hd( c : in out d.Criteria; dpen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dpen1hd", op, join, Long_Float( dpen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen1hd;


   procedure Add_dpen2hd( c : in out d.Criteria; dpen2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dpen2hd", op, join, Long_Float( dpen2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen2hd;


   procedure Add_dpen3hd( c : in out d.Criteria; dpen3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dpen3hd", op, join, dpen3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen3hd;


   procedure Add_dpen1sp( c : in out d.Criteria; dpen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dpen1sp", op, join, Long_Float( dpen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen1sp;


   procedure Add_dpen2sp( c : in out d.Criteria; dpen2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dpen2sp", op, join, Long_Float( dpen2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen2sp;


   procedure Add_dpen3sp( c : in out d.Criteria; dpen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dpen3sp", op, join, dpen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen3sp;


   procedure Add_davc1hd( c : in out d.Criteria; davc1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "davc1hd", op, join, Long_Float( davc1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc1hd;


   procedure Add_davc2hd( c : in out d.Criteria; davc2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "davc2hd", op, join, davc2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc2hd;


   procedure Add_davc3hd( c : in out d.Criteria; davc3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "davc3hd", op, join, davc3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc3hd;


   procedure Add_davc1sp( c : in out d.Criteria; davc1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "davc1sp", op, join, Long_Float( davc1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc1sp;


   procedure Add_davc2sp( c : in out d.Criteria; davc2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "davc2sp", op, join, davc2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc2sp;


   procedure Add_davc3sp( c : in out d.Criteria; davc3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "davc3sp", op, join, davc3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc3sp;


   procedure Add_dtuf1hd( c : in out d.Criteria; dtuf1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dtuf1hd", op, join, Long_Float( dtuf1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf1hd;


   procedure Add_dtuf2hd( c : in out d.Criteria; dtuf2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dtuf2hd", op, join, Long_Float( dtuf2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf2hd;


   procedure Add_dtuf3hd( c : in out d.Criteria; dtuf3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dtuf3hd", op, join, dtuf3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf3hd;


   procedure Add_dtuf1sp( c : in out d.Criteria; dtuf1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dtuf1sp", op, join, Long_Float( dtuf1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf1sp;


   procedure Add_dtuf2sp( c : in out d.Criteria; dtuf2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dtuf2sp", op, join, Long_Float( dtuf2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf2sp;


   procedure Add_dtuf3sp( c : in out d.Criteria; dtuf3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dtuf3sp", op, join, dtuf3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf3sp;


   procedure Add_dfrso1hd( c : in out d.Criteria; dfrso1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dfrso1hd", op, join, Long_Float( dfrso1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso1hd;


   procedure Add_dfrso2hd( c : in out d.Criteria; dfrso2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dfrso2hd", op, join, dfrso2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso2hd;


   procedure Add_dfrso3hd( c : in out d.Criteria; dfrso3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dfrso3hd", op, join, dfrso3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso3hd;


   procedure Add_dfrso1sp( c : in out d.Criteria; dfrso1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dfrso1sp", op, join, Long_Float( dfrso1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso1sp;


   procedure Add_dfrso2sp( c : in out d.Criteria; dfrso2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dfrso2sp", op, join, dfrso2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso2sp;


   procedure Add_dfrso3sp( c : in out d.Criteria; dfrso3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dfrso3sp", op, join, dfrso3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso3sp;


   procedure Add_dspor1hd( c : in out d.Criteria; dspor1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dspor1hd", op, join, Long_Float( dspor1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor1hd;


   procedure Add_dspor2hd( c : in out d.Criteria; dspor2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dspor2hd", op, join, dspor2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor2hd;


   procedure Add_dspor3hd( c : in out d.Criteria; dspor3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dspor3hd", op, join, dspor3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor3hd;


   procedure Add_dspor1sp( c : in out d.Criteria; dspor1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dspor1sp", op, join, Long_Float( dspor1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor1sp;


   procedure Add_dspor2sp( c : in out d.Criteria; dspor2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dspor2sp", op, join, dspor2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor2sp;


   procedure Add_dspor3sp( c : in out d.Criteria; dspor3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dspor3sp", op, join, dspor3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor3sp;


   procedure Add_drepl1hd( c : in out d.Criteria; drepl1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "drepl1hd", op, join, Long_Float( drepl1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl1hd;


   procedure Add_drepl2hd( c : in out d.Criteria; drepl2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "drepl2hd", op, join, drepl2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl2hd;


   procedure Add_drepl3hd( c : in out d.Criteria; drepl3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "drepl3hd", op, join, drepl3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl3hd;


   procedure Add_drepl1sp( c : in out d.Criteria; drepl1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "drepl1sp", op, join, Long_Float( drepl1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl1sp;


   procedure Add_drepl2sp( c : in out d.Criteria; drepl2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "drepl2sp", op, join, drepl2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl2sp;


   procedure Add_drepl3sp( c : in out d.Criteria; drepl3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "drepl3sp", op, join, drepl3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl3sp;


   procedure Add_dmed1hd( c : in out d.Criteria; dmed1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmed1hd", op, join, Long_Float( dmed1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed1hd;


   procedure Add_dmed2hd( c : in out d.Criteria; dmed2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmed2hd", op, join, dmed2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed2hd;


   procedure Add_dmed3hd( c : in out d.Criteria; dmed3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmed3hd", op, join, dmed3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed3hd;


   procedure Add_dmed1sp( c : in out d.Criteria; dmed1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmed1sp", op, join, Long_Float( dmed1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed1sp;


   procedure Add_dmed2sp( c : in out d.Criteria; dmed2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmed2sp", op, join, dmed2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed2sp;


   procedure Add_dmed3sp( c : in out d.Criteria; dmed3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dmed3sp", op, join, dmed3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed3sp;


   procedure Add_dchar1hd( c : in out d.Criteria; dchar1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dchar1hd", op, join, Long_Float( dchar1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar1hd;


   procedure Add_dchar2hd( c : in out d.Criteria; dchar2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dchar2hd", op, join, Long_Float( dchar2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar2hd;


   procedure Add_dchar3hd( c : in out d.Criteria; dchar3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dchar3hd", op, join, dchar3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar3hd;


   procedure Add_dchar1sp( c : in out d.Criteria; dchar1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dchar1sp", op, join, Long_Float( dchar1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar1sp;


   procedure Add_dchar2sp( c : in out d.Criteria; dchar2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dchar2sp", op, join, dchar2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar2sp;


   procedure Add_dchar3sp( c : in out d.Criteria; dchar3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dchar3sp", op, join, dchar3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar3sp;


   procedure Add_dslrp1hd( c : in out d.Criteria; dslrp1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dslrp1hd", op, join, Long_Float( dslrp1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp1hd;


   procedure Add_dslrp2hd( c : in out d.Criteria; dslrp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dslrp2hd", op, join, dslrp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp2hd;


   procedure Add_dslrp3hd( c : in out d.Criteria; dslrp3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dslrp3hd", op, join, dslrp3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp3hd;


   procedure Add_dslrp1sp( c : in out d.Criteria; dslrp1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dslrp1sp", op, join, Long_Float( dslrp1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp1sp;


   procedure Add_dslrp2sp( c : in out d.Criteria; dslrp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dslrp2sp", op, join, dslrp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp2sp;


   procedure Add_dslrp3sp( c : in out d.Criteria; dslrp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dslrp3sp", op, join, dslrp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp3sp;


   procedure Add_dirni1hd( c : in out d.Criteria; dirni1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dirni1hd", op, join, dirni1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni1hd;


   procedure Add_dirni2hd( c : in out d.Criteria; dirni2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dirni2hd", op, join, dirni2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni2hd;


   procedure Add_dirni3hd( c : in out d.Criteria; dirni3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dirni3hd", op, join, dirni3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni3hd;


   procedure Add_dirni1sp( c : in out d.Criteria; dirni1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dirni1sp", op, join, dirni1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni1sp;


   procedure Add_dirni2sp( c : in out d.Criteria; dirni2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dirni2sp", op, join, dirni2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni2sp;


   procedure Add_dirni3sp( c : in out d.Criteria; dirni3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dirni3sp", op, join, dirni3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni3sp;


   procedure Add_totov1hd( c : in out d.Criteria; totov1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totov1hd", op, join, totov1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov1hd;


   procedure Add_totov2hd( c : in out d.Criteria; totov2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totov2hd", op, join, totov2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov2hd;


   procedure Add_totov3hd( c : in out d.Criteria; totov3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totov3hd", op, join, totov3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov3hd;


   procedure Add_totov1sp( c : in out d.Criteria; totov1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totov1sp", op, join, totov1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov1sp;


   procedure Add_totov2sp( c : in out d.Criteria; totov2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totov2sp", op, join, totov2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov2sp;


   procedure Add_totov3sp( c : in out d.Criteria; totov3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "totov3sp", op, join, totov3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov3sp;


   procedure Add_dvuhr1hd( c : in out d.Criteria; dvuhr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvuhr1hd", op, join, Long_Float( dvuhr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr1hd;


   procedure Add_dvuhr2hd( c : in out d.Criteria; dvuhr2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvuhr2hd", op, join, Long_Float( dvuhr2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr2hd;


   procedure Add_dvuhr3hd( c : in out d.Criteria; dvuhr3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvuhr3hd", op, join, Long_Float( dvuhr3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr3hd;


   procedure Add_dvuhr1sp( c : in out d.Criteria; dvuhr1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvuhr1sp", op, join, Long_Float( dvuhr1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr1sp;


   procedure Add_dvuhr2sp( c : in out d.Criteria; dvuhr2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvuhr2sp", op, join, Long_Float( dvuhr2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr2sp;


   procedure Add_dvuhr3sp( c : in out d.Criteria; dvuhr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dvuhr3sp", op, join, dvuhr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr3sp;


   procedure Add_empan1hd( c : in out d.Criteria; empan1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empan1hd", op, join, empan1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan1hd;


   procedure Add_empan2hd( c : in out d.Criteria; empan2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empan2hd", op, join, empan2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan2hd;


   procedure Add_empan3hd( c : in out d.Criteria; empan3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empan3hd", op, join, empan3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan3hd;


   procedure Add_empan1sp( c : in out d.Criteria; empan1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empan1sp", op, join, empan1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan1sp;


   procedure Add_empan2sp( c : in out d.Criteria; empan2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empan2sp", op, join, empan2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan2sp;


   procedure Add_empan3sp( c : in out d.Criteria; empan3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empan3sp", op, join, empan3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan3sp;


   procedure Add_empen1hd( c : in out d.Criteria; empen1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empen1hd", op, join, empen1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen1hd;


   procedure Add_empen2hd( c : in out d.Criteria; empen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empen2hd", op, join, empen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen2hd;


   procedure Add_empen3hd( c : in out d.Criteria; empen3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empen3hd", op, join, empen3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen3hd;


   procedure Add_empen1sp( c : in out d.Criteria; empen1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empen1sp", op, join, empen1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen1sp;


   procedure Add_empen2sp( c : in out d.Criteria; empen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empen2sp", op, join, empen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen2sp;


   procedure Add_empen3sp( c : in out d.Criteria; empen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "empen3sp", op, join, empen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen3sp;


   procedure Add_etype1hd( c : in out d.Criteria; etype1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etype1hd", op, join, etype1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype1hd;


   procedure Add_etype2hd( c : in out d.Criteria; etype2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etype2hd", op, join, etype2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype2hd;


   procedure Add_etype3hd( c : in out d.Criteria; etype3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etype3hd", op, join, etype3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype3hd;


   procedure Add_etype1sp( c : in out d.Criteria; etype1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etype1sp", op, join, etype1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype1sp;


   procedure Add_etype2sp( c : in out d.Criteria; etype2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etype2sp", op, join, etype2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype2sp;


   procedure Add_etype3sp( c : in out d.Criteria; etype3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "etype3sp", op, join, etype3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype3sp;


   procedure Add_evrot1hd( c : in out d.Criteria; evrot1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "evrot1hd", op, join, evrot1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot1hd;


   procedure Add_evrot2hd( c : in out d.Criteria; evrot2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "evrot2hd", op, join, evrot2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot2hd;


   procedure Add_evrot3hd( c : in out d.Criteria; evrot3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "evrot3hd", op, join, evrot3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot3hd;


   procedure Add_evrot1sp( c : in out d.Criteria; evrot1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "evrot1sp", op, join, evrot1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot1sp;


   procedure Add_evrot2sp( c : in out d.Criteria; evrot2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "evrot2sp", op, join, evrot2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot2sp;


   procedure Add_evrot3sp( c : in out d.Criteria; evrot3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "evrot3sp", op, join, evrot3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot3sp;


   procedure Add_exb011hd( c : in out d.Criteria; exb011hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb011hd", op, join, exb011hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb011hd;


   procedure Add_exb012hd( c : in out d.Criteria; exb012hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb012hd", op, join, exb012hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb012hd;


   procedure Add_exb013hd( c : in out d.Criteria; exb013hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb013hd", op, join, exb013hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb013hd;


   procedure Add_exb011sp( c : in out d.Criteria; exb011sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb011sp", op, join, exb011sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb011sp;


   procedure Add_exb012sp( c : in out d.Criteria; exb012sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb012sp", op, join, exb012sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb012sp;


   procedure Add_exb013sp( c : in out d.Criteria; exb013sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb013sp", op, join, exb013sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb013sp;


   procedure Add_exb021hd( c : in out d.Criteria; exb021hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb021hd", op, join, exb021hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb021hd;


   procedure Add_exb022hd( c : in out d.Criteria; exb022hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb022hd", op, join, exb022hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb022hd;


   procedure Add_exb023hd( c : in out d.Criteria; exb023hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb023hd", op, join, exb023hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb023hd;


   procedure Add_exb021sp( c : in out d.Criteria; exb021sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb021sp", op, join, exb021sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb021sp;


   procedure Add_exb022sp( c : in out d.Criteria; exb022sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb022sp", op, join, exb022sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb022sp;


   procedure Add_exb023sp( c : in out d.Criteria; exb023sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb023sp", op, join, exb023sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb023sp;


   procedure Add_exb031hd( c : in out d.Criteria; exb031hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb031hd", op, join, exb031hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb031hd;


   procedure Add_exb032hd( c : in out d.Criteria; exb032hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb032hd", op, join, exb032hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb032hd;


   procedure Add_exb033hd( c : in out d.Criteria; exb033hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb033hd", op, join, exb033hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb033hd;


   procedure Add_exb031sp( c : in out d.Criteria; exb031sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb031sp", op, join, exb031sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb031sp;


   procedure Add_exb032sp( c : in out d.Criteria; exb032sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb032sp", op, join, exb032sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb032sp;


   procedure Add_exb033sp( c : in out d.Criteria; exb033sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb033sp", op, join, exb033sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb033sp;


   procedure Add_exb041hd( c : in out d.Criteria; exb041hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb041hd", op, join, exb041hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb041hd;


   procedure Add_exb042hd( c : in out d.Criteria; exb042hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb042hd", op, join, exb042hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb042hd;


   procedure Add_exb043hd( c : in out d.Criteria; exb043hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb043hd", op, join, exb043hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb043hd;


   procedure Add_exb041sp( c : in out d.Criteria; exb041sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb041sp", op, join, exb041sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb041sp;


   procedure Add_exb042sp( c : in out d.Criteria; exb042sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb042sp", op, join, exb042sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb042sp;


   procedure Add_exb043sp( c : in out d.Criteria; exb043sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb043sp", op, join, exb043sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb043sp;


   procedure Add_exb051hd( c : in out d.Criteria; exb051hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb051hd", op, join, exb051hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb051hd;


   procedure Add_exb052hd( c : in out d.Criteria; exb052hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb052hd", op, join, exb052hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb052hd;


   procedure Add_exb053hd( c : in out d.Criteria; exb053hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb053hd", op, join, exb053hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb053hd;


   procedure Add_exb051sp( c : in out d.Criteria; exb051sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb051sp", op, join, exb051sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb051sp;


   procedure Add_exb052sp( c : in out d.Criteria; exb052sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb052sp", op, join, exb052sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb052sp;


   procedure Add_exb053sp( c : in out d.Criteria; exb053sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb053sp", op, join, exb053sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb053sp;


   procedure Add_exb061hd( c : in out d.Criteria; exb061hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb061hd", op, join, exb061hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb061hd;


   procedure Add_exb062hd( c : in out d.Criteria; exb062hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb062hd", op, join, exb062hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb062hd;


   procedure Add_exb063hd( c : in out d.Criteria; exb063hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb063hd", op, join, exb063hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb063hd;


   procedure Add_exb061sp( c : in out d.Criteria; exb061sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb061sp", op, join, exb061sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb061sp;


   procedure Add_exb062sp( c : in out d.Criteria; exb062sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb062sp", op, join, exb062sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb062sp;


   procedure Add_exb063sp( c : in out d.Criteria; exb063sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb063sp", op, join, exb063sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb063sp;


   procedure Add_exb071hd( c : in out d.Criteria; exb071hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb071hd", op, join, exb071hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb071hd;


   procedure Add_exb072hd( c : in out d.Criteria; exb072hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb072hd", op, join, exb072hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb072hd;


   procedure Add_exb073hd( c : in out d.Criteria; exb073hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb073hd", op, join, exb073hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb073hd;


   procedure Add_exb071sp( c : in out d.Criteria; exb071sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb071sp", op, join, exb071sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb071sp;


   procedure Add_exb072sp( c : in out d.Criteria; exb072sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb072sp", op, join, exb072sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb072sp;


   procedure Add_exb073sp( c : in out d.Criteria; exb073sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb073sp", op, join, exb073sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb073sp;


   procedure Add_exb081hd( c : in out d.Criteria; exb081hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb081hd", op, join, exb081hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb081hd;


   procedure Add_exb082hd( c : in out d.Criteria; exb082hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb082hd", op, join, exb082hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb082hd;


   procedure Add_exb083hd( c : in out d.Criteria; exb083hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb083hd", op, join, exb083hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb083hd;


   procedure Add_exb081sp( c : in out d.Criteria; exb081sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb081sp", op, join, exb081sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb081sp;


   procedure Add_exb082sp( c : in out d.Criteria; exb082sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb082sp", op, join, exb082sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb082sp;


   procedure Add_exb083sp( c : in out d.Criteria; exb083sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb083sp", op, join, exb083sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb083sp;


   procedure Add_exb091hd( c : in out d.Criteria; exb091hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb091hd", op, join, exb091hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb091hd;


   procedure Add_exb092hd( c : in out d.Criteria; exb092hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb092hd", op, join, exb092hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb092hd;


   procedure Add_exb093hd( c : in out d.Criteria; exb093hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb093hd", op, join, exb093hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb093hd;


   procedure Add_exb091sp( c : in out d.Criteria; exb091sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb091sp", op, join, exb091sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb091sp;


   procedure Add_exb092sp( c : in out d.Criteria; exb092sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb092sp", op, join, exb092sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb092sp;


   procedure Add_exb093sp( c : in out d.Criteria; exb093sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb093sp", op, join, exb093sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb093sp;


   procedure Add_exb101hd( c : in out d.Criteria; exb101hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb101hd", op, join, exb101hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb101hd;


   procedure Add_exb102hd( c : in out d.Criteria; exb102hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb102hd", op, join, exb102hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb102hd;


   procedure Add_exb103hd( c : in out d.Criteria; exb103hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb103hd", op, join, exb103hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb103hd;


   procedure Add_exb101sp( c : in out d.Criteria; exb101sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb101sp", op, join, exb101sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb101sp;


   procedure Add_exb102sp( c : in out d.Criteria; exb102sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb102sp", op, join, exb102sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb102sp;


   procedure Add_exb103sp( c : in out d.Criteria; exb103sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb103sp", op, join, exb103sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb103sp;


   procedure Add_exb111hd( c : in out d.Criteria; exb111hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb111hd", op, join, exb111hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb111hd;


   procedure Add_exb112hd( c : in out d.Criteria; exb112hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb112hd", op, join, exb112hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb112hd;


   procedure Add_exb113hd( c : in out d.Criteria; exb113hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb113hd", op, join, exb113hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb113hd;


   procedure Add_exb111sp( c : in out d.Criteria; exb111sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb111sp", op, join, exb111sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb111sp;


   procedure Add_exb112sp( c : in out d.Criteria; exb112sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb112sp", op, join, exb112sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb112sp;


   procedure Add_exb113sp( c : in out d.Criteria; exb113sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb113sp", op, join, exb113sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb113sp;


   procedure Add_exb121hd( c : in out d.Criteria; exb121hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb121hd", op, join, exb121hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb121hd;


   procedure Add_exb122hd( c : in out d.Criteria; exb122hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb122hd", op, join, exb122hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb122hd;


   procedure Add_exb123hd( c : in out d.Criteria; exb123hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb123hd", op, join, exb123hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb123hd;


   procedure Add_exb121sp( c : in out d.Criteria; exb121sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb121sp", op, join, exb121sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb121sp;


   procedure Add_exb122sp( c : in out d.Criteria; exb122sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb122sp", op, join, exb122sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb122sp;


   procedure Add_exb123sp( c : in out d.Criteria; exb123sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exb123sp", op, join, exb123sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb123sp;


   procedure Add_ftpt1hd( c : in out d.Criteria; ftpt1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftpt1hd", op, join, ftpt1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt1hd;


   procedure Add_ftpt2hd( c : in out d.Criteria; ftpt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftpt2hd", op, join, ftpt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt2hd;


   procedure Add_ftpt3hd( c : in out d.Criteria; ftpt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftpt3hd", op, join, ftpt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt3hd;


   procedure Add_ftpt1sp( c : in out d.Criteria; ftpt1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftpt1sp", op, join, ftpt1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt1sp;


   procedure Add_ftpt2sp( c : in out d.Criteria; ftpt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftpt2sp", op, join, ftpt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt2sp;


   procedure Add_ftpt3sp( c : in out d.Criteria; ftpt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ftpt3sp", op, join, ftpt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt3sp;


   procedure Add_fulam1hd( c : in out d.Criteria; fulam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulam1hd", op, join, Long_Float( fulam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam1hd;


   procedure Add_fulam2hd( c : in out d.Criteria; fulam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulam2hd", op, join, fulam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam2hd;


   procedure Add_fulam3hd( c : in out d.Criteria; fulam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulam3hd", op, join, fulam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam3hd;


   procedure Add_fulam1sp( c : in out d.Criteria; fulam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulam1sp", op, join, Long_Float( fulam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam1sp;


   procedure Add_fulam2sp( c : in out d.Criteria; fulam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulam2sp", op, join, fulam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam2sp;


   procedure Add_fulam3sp( c : in out d.Criteria; fulam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulam3sp", op, join, fulam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam3sp;


   procedure Add_fulbn1hd( c : in out d.Criteria; fulbn1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulbn1hd", op, join, fulbn1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn1hd;


   procedure Add_fulbn2hd( c : in out d.Criteria; fulbn2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulbn2hd", op, join, fulbn2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn2hd;


   procedure Add_fulbn3hd( c : in out d.Criteria; fulbn3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulbn3hd", op, join, fulbn3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn3hd;


   procedure Add_fulbn1sp( c : in out d.Criteria; fulbn1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulbn1sp", op, join, fulbn1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn1sp;


   procedure Add_fulbn2sp( c : in out d.Criteria; fulbn2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulbn2sp", op, join, fulbn2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn2sp;


   procedure Add_fulbn3sp( c : in out d.Criteria; fulbn3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulbn3sp", op, join, fulbn3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn3sp;


   procedure Add_fulpd1hd( c : in out d.Criteria; fulpd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulpd1hd", op, join, fulpd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd1hd;


   procedure Add_fulpd2hd( c : in out d.Criteria; fulpd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulpd2hd", op, join, fulpd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd2hd;


   procedure Add_fulpd3hd( c : in out d.Criteria; fulpd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulpd3hd", op, join, fulpd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd3hd;


   procedure Add_fulpd1sp( c : in out d.Criteria; fulpd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulpd1sp", op, join, fulpd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd1sp;


   procedure Add_fulpd2sp( c : in out d.Criteria; fulpd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulpd2sp", op, join, fulpd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd2sp;


   procedure Add_fulpd3sp( c : in out d.Criteria; fulpd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulpd3sp", op, join, fulpd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd3sp;


   procedure Add_fulty1hd( c : in out d.Criteria; fulty1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulty1hd", op, join, fulty1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty1hd;


   procedure Add_fulty2hd( c : in out d.Criteria; fulty2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulty2hd", op, join, fulty2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty2hd;


   procedure Add_fulty3hd( c : in out d.Criteria; fulty3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulty3hd", op, join, fulty3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty3hd;


   procedure Add_fulty1sp( c : in out d.Criteria; fulty1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulty1sp", op, join, fulty1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty1sp;


   procedure Add_fulty2sp( c : in out d.Criteria; fulty2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulty2sp", op, join, fulty2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty2sp;


   procedure Add_fulty3sp( c : in out d.Criteria; fulty3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fulty3sp", op, join, fulty3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty3sp;


   procedure Add_fluam1hd( c : in out d.Criteria; fluam1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fluam1hd", op, join, fluam1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam1hd;


   procedure Add_fluam2hd( c : in out d.Criteria; fluam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fluam2hd", op, join, fluam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam2hd;


   procedure Add_fluam3hd( c : in out d.Criteria; fluam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fluam3hd", op, join, fluam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam3hd;


   procedure Add_fluam1sp( c : in out d.Criteria; fluam1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fluam1sp", op, join, fluam1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam1sp;


   procedure Add_fluam2sp( c : in out d.Criteria; fluam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fluam2sp", op, join, fluam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam2sp;


   procedure Add_fluam3sp( c : in out d.Criteria; fluam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fluam3sp", op, join, fluam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam3sp;


   procedure Add_flupd1hd( c : in out d.Criteria; flupd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flupd1hd", op, join, flupd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd1hd;


   procedure Add_flupd2hd( c : in out d.Criteria; flupd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flupd2hd", op, join, flupd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd2hd;


   procedure Add_flupd3hd( c : in out d.Criteria; flupd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flupd3hd", op, join, flupd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd3hd;


   procedure Add_flupd1sp( c : in out d.Criteria; flupd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flupd1sp", op, join, flupd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd1sp;


   procedure Add_flupd2sp( c : in out d.Criteria; flupd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flupd2sp", op, join, flupd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd2sp;


   procedure Add_flupd3sp( c : in out d.Criteria; flupd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flupd3sp", op, join, flupd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd3sp;


   procedure Add_flusu1hd( c : in out d.Criteria; flusu1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flusu1hd", op, join, flusu1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu1hd;


   procedure Add_flusu2hd( c : in out d.Criteria; flusu2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flusu2hd", op, join, flusu2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu2hd;


   procedure Add_flusu3hd( c : in out d.Criteria; flusu3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flusu3hd", op, join, flusu3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu3hd;


   procedure Add_flusu1sp( c : in out d.Criteria; flusu1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flusu1sp", op, join, flusu1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu1sp;


   procedure Add_flusu2sp( c : in out d.Criteria; flusu2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flusu2sp", op, join, flusu2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu2sp;


   procedure Add_flusu3sp( c : in out d.Criteria; flusu3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "flusu3sp", op, join, flusu3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu3sp;


   procedure Add_grwag1hd( c : in out d.Criteria; grwag1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwag1hd", op, join, Long_Float( grwag1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag1hd;


   procedure Add_grwag2hd( c : in out d.Criteria; grwag2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwag2hd", op, join, Long_Float( grwag2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag2hd;


   procedure Add_grwag3hd( c : in out d.Criteria; grwag3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwag3hd", op, join, Long_Float( grwag3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag3hd;


   procedure Add_grwag1sp( c : in out d.Criteria; grwag1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwag1sp", op, join, Long_Float( grwag1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag1sp;


   procedure Add_grwag2sp( c : in out d.Criteria; grwag2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwag2sp", op, join, Long_Float( grwag2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag2sp;


   procedure Add_grwag3sp( c : in out d.Criteria; grwag3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwag3sp", op, join, Long_Float( grwag3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag3sp;


   procedure Add_grwap1hd( c : in out d.Criteria; grwap1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwap1hd", op, join, grwap1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap1hd;


   procedure Add_grwap2hd( c : in out d.Criteria; grwap2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwap2hd", op, join, grwap2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap2hd;


   procedure Add_grwap3hd( c : in out d.Criteria; grwap3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwap3hd", op, join, grwap3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap3hd;


   procedure Add_grwap1sp( c : in out d.Criteria; grwap1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwap1sp", op, join, grwap1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap1sp;


   procedure Add_grwap2sp( c : in out d.Criteria; grwap2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwap2sp", op, join, grwap2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap2sp;


   procedure Add_grwap3sp( c : in out d.Criteria; grwap3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grwap3sp", op, join, grwap3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap3sp;


   procedure Add_hha11hd( c : in out d.Criteria; hha11hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha11hd", op, join, Long_Float( hha11hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha11hd;


   procedure Add_hha12hd( c : in out d.Criteria; hha12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha12hd", op, join, hha12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha12hd;


   procedure Add_hha13hd( c : in out d.Criteria; hha13hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha13hd", op, join, Long_Float( hha13hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha13hd;


   procedure Add_hha11sp( c : in out d.Criteria; hha11sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha11sp", op, join, Long_Float( hha11sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha11sp;


   procedure Add_hha12sp( c : in out d.Criteria; hha12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha12sp", op, join, hha12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha12sp;


   procedure Add_hha13sp( c : in out d.Criteria; hha13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha13sp", op, join, hha13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha13sp;


   procedure Add_hha21hd( c : in out d.Criteria; hha21hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha21hd", op, join, Long_Float( hha21hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha21hd;


   procedure Add_hha22hd( c : in out d.Criteria; hha22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha22hd", op, join, hha22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha22hd;


   procedure Add_hha23hd( c : in out d.Criteria; hha23hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha23hd", op, join, Long_Float( hha23hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha23hd;


   procedure Add_hha21sp( c : in out d.Criteria; hha21sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha21sp", op, join, Long_Float( hha21sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha21sp;


   procedure Add_hha22sp( c : in out d.Criteria; hha22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha22sp", op, join, hha22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha22sp;


   procedure Add_hha23sp( c : in out d.Criteria; hha23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha23sp", op, join, hha23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha23sp;


   procedure Add_hha31hd( c : in out d.Criteria; hha31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha31hd", op, join, hha31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha31hd;


   procedure Add_hha32hd( c : in out d.Criteria; hha32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha32hd", op, join, hha32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha32hd;


   procedure Add_hha33hd( c : in out d.Criteria; hha33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha33hd", op, join, hha33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha33hd;


   procedure Add_hha31sp( c : in out d.Criteria; hha31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha31sp", op, join, hha31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha31sp;


   procedure Add_hha32sp( c : in out d.Criteria; hha32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha32sp", op, join, hha32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha32sp;


   procedure Add_hha33sp( c : in out d.Criteria; hha33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hha33sp", op, join, hha33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha33sp;


   procedure Add_hour1hd( c : in out d.Criteria; hour1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hour1hd", op, join, hour1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour1hd;


   procedure Add_hour2hd( c : in out d.Criteria; hour2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hour2hd", op, join, hour2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour2hd;


   procedure Add_hour3hd( c : in out d.Criteria; hour3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hour3hd", op, join, hour3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour3hd;


   procedure Add_hour1sp( c : in out d.Criteria; hour1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hour1sp", op, join, hour1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour1sp;


   procedure Add_hour2sp( c : in out d.Criteria; hour2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hour2sp", op, join, hour2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour2sp;


   procedure Add_hour3sp( c : in out d.Criteria; hour3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hour3sp", op, join, hour3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour3sp;


   procedure Add_hrrte1hd( c : in out d.Criteria; hrrte1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrrte1hd", op, join, Long_Float( hrrte1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte1hd;


   procedure Add_hrrte2hd( c : in out d.Criteria; hrrte2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrrte2hd", op, join, Long_Float( hrrte2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte2hd;


   procedure Add_hrrte3hd( c : in out d.Criteria; hrrte3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrrte3hd", op, join, Long_Float( hrrte3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte3hd;


   procedure Add_hrrte1sp( c : in out d.Criteria; hrrte1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrrte1sp", op, join, Long_Float( hrrte1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte1sp;


   procedure Add_hrrte2sp( c : in out d.Criteria; hrrte2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrrte2sp", op, join, Long_Float( hrrte2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte2sp;


   procedure Add_hrrte3sp( c : in out d.Criteria; hrrte3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hrrte3sp", op, join, Long_Float( hrrte3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte3sp;


   procedure Add_ipay11hd( c : in out d.Criteria; ipay11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay11hd", op, join, ipay11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay11hd;


   procedure Add_ipay12hd( c : in out d.Criteria; ipay12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay12hd", op, join, ipay12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay12hd;


   procedure Add_ipay13hd( c : in out d.Criteria; ipay13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay13hd", op, join, ipay13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay13hd;


   procedure Add_ipay11sp( c : in out d.Criteria; ipay11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay11sp", op, join, ipay11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay11sp;


   procedure Add_ipay12sp( c : in out d.Criteria; ipay12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay12sp", op, join, ipay12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay12sp;


   procedure Add_ipay13sp( c : in out d.Criteria; ipay13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay13sp", op, join, ipay13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay13sp;


   procedure Add_ipay21hd( c : in out d.Criteria; ipay21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay21hd", op, join, ipay21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay21hd;


   procedure Add_ipay22hd( c : in out d.Criteria; ipay22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay22hd", op, join, ipay22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay22hd;


   procedure Add_ipay23hd( c : in out d.Criteria; ipay23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay23hd", op, join, ipay23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay23hd;


   procedure Add_ipay21sp( c : in out d.Criteria; ipay21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay21sp", op, join, ipay21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay21sp;


   procedure Add_ipay22sp( c : in out d.Criteria; ipay22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay22sp", op, join, ipay22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay22sp;


   procedure Add_ipay23sp( c : in out d.Criteria; ipay23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay23sp", op, join, ipay23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay23sp;


   procedure Add_ipay31hd( c : in out d.Criteria; ipay31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay31hd", op, join, ipay31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay31hd;


   procedure Add_ipay32hd( c : in out d.Criteria; ipay32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay32hd", op, join, ipay32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay32hd;


   procedure Add_ipay33hd( c : in out d.Criteria; ipay33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay33hd", op, join, ipay33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay33hd;


   procedure Add_ipay31sp( c : in out d.Criteria; ipay31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay31sp", op, join, ipay31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay31sp;


   procedure Add_ipay32sp( c : in out d.Criteria; ipay32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay32sp", op, join, ipay32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay32sp;


   procedure Add_ipay33sp( c : in out d.Criteria; ipay33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay33sp", op, join, ipay33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay33sp;


   procedure Add_ipay41hd( c : in out d.Criteria; ipay41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay41hd", op, join, ipay41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay41hd;


   procedure Add_ipay42hd( c : in out d.Criteria; ipay42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay42hd", op, join, ipay42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay42hd;


   procedure Add_ipay43hd( c : in out d.Criteria; ipay43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay43hd", op, join, ipay43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay43hd;


   procedure Add_ipay41sp( c : in out d.Criteria; ipay41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay41sp", op, join, ipay41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay41sp;


   procedure Add_ipay42sp( c : in out d.Criteria; ipay42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay42sp", op, join, ipay42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay42sp;


   procedure Add_ipay43sp( c : in out d.Criteria; ipay43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay43sp", op, join, ipay43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay43sp;


   procedure Add_ipay51hd( c : in out d.Criteria; ipay51hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay51hd", op, join, ipay51hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay51hd;


   procedure Add_ipay52hd( c : in out d.Criteria; ipay52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay52hd", op, join, ipay52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay52hd;


   procedure Add_ipay53hd( c : in out d.Criteria; ipay53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay53hd", op, join, ipay53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay53hd;


   procedure Add_ipay51sp( c : in out d.Criteria; ipay51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay51sp", op, join, ipay51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay51sp;


   procedure Add_ipay52sp( c : in out d.Criteria; ipay52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay52sp", op, join, ipay52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay52sp;


   procedure Add_ipay53sp( c : in out d.Criteria; ipay53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay53sp", op, join, ipay53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay53sp;


   procedure Add_ipay61hd( c : in out d.Criteria; ipay61hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay61hd", op, join, ipay61hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay61hd;


   procedure Add_ipay62hd( c : in out d.Criteria; ipay62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay62hd", op, join, ipay62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay62hd;


   procedure Add_ipay63hd( c : in out d.Criteria; ipay63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay63hd", op, join, ipay63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay63hd;


   procedure Add_ipay61sp( c : in out d.Criteria; ipay61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay61sp", op, join, ipay61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay61sp;


   procedure Add_ipay62sp( c : in out d.Criteria; ipay62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay62sp", op, join, ipay62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay62sp;


   procedure Add_ipay63sp( c : in out d.Criteria; ipay63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay63sp", op, join, ipay63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay63sp;


   procedure Add_ipay71hd( c : in out d.Criteria; ipay71hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay71hd", op, join, ipay71hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay71hd;


   procedure Add_ipay72hd( c : in out d.Criteria; ipay72hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay72hd", op, join, ipay72hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay72hd;


   procedure Add_ipay73hd( c : in out d.Criteria; ipay73hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay73hd", op, join, ipay73hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay73hd;


   procedure Add_ipay71sp( c : in out d.Criteria; ipay71sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay71sp", op, join, ipay71sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay71sp;


   procedure Add_ipay72sp( c : in out d.Criteria; ipay72sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay72sp", op, join, ipay72sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay72sp;


   procedure Add_ipay73sp( c : in out d.Criteria; ipay73sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ipay73sp", op, join, ipay73sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay73sp;


   procedure Add_jbchg1hd( c : in out d.Criteria; jbchg1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbchg1hd", op, join, jbchg1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg1hd;


   procedure Add_jbchg2hd( c : in out d.Criteria; jbchg2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbchg2hd", op, join, jbchg2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg2hd;


   procedure Add_jbchg3hd( c : in out d.Criteria; jbchg3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbchg3hd", op, join, jbchg3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg3hd;


   procedure Add_jbchg1sp( c : in out d.Criteria; jbchg1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbchg1sp", op, join, jbchg1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg1sp;


   procedure Add_jbchg2sp( c : in out d.Criteria; jbchg2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbchg2sp", op, join, jbchg2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg2sp;


   procedure Add_jbchg3sp( c : in out d.Criteria; jbchg3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbchg3sp", op, join, jbchg3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg3sp;


   procedure Add_jobus1hd( c : in out d.Criteria; jobus1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobus1hd", op, join, jobus1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus1hd;


   procedure Add_jobus2hd( c : in out d.Criteria; jobus2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobus2hd", op, join, jobus2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus2hd;


   procedure Add_jobus3hd( c : in out d.Criteria; jobus3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobus3hd", op, join, jobus3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus3hd;


   procedure Add_jobus1sp( c : in out d.Criteria; jobus1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobus1sp", op, join, jobus1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus1sp;


   procedure Add_jobus2sp( c : in out d.Criteria; jobus2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobus2sp", op, join, jobus2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus2sp;


   procedure Add_jobus3sp( c : in out d.Criteria; jobus3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobus3sp", op, join, jobus3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus3sp;


   procedure Add_jbhrs1hd( c : in out d.Criteria; jbhrs1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbhrs1hd", op, join, Long_Float( jbhrs1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs1hd;


   procedure Add_jbhrs2hd( c : in out d.Criteria; jbhrs2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbhrs2hd", op, join, Long_Float( jbhrs2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs2hd;


   procedure Add_jbhrs3hd( c : in out d.Criteria; jbhrs3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbhrs3hd", op, join, Long_Float( jbhrs3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs3hd;


   procedure Add_jbhrs1sp( c : in out d.Criteria; jbhrs1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbhrs1sp", op, join, Long_Float( jbhrs1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs1sp;


   procedure Add_jbhrs2sp( c : in out d.Criteria; jbhrs2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbhrs2sp", op, join, Long_Float( jbhrs2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs2sp;


   procedure Add_jbhrs3sp( c : in out d.Criteria; jbhrs3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jbhrs3sp", op, join, jbhrs3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs3sp;


   procedure Add_lt301hd( c : in out d.Criteria; lt301hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lt301hd", op, join, lt301hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt301hd;


   procedure Add_lt302hd( c : in out d.Criteria; lt302hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lt302hd", op, join, lt302hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt302hd;


   procedure Add_lt303hd( c : in out d.Criteria; lt303hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lt303hd", op, join, lt303hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt303hd;


   procedure Add_lt301sp( c : in out d.Criteria; lt301sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lt301sp", op, join, lt301sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt301sp;


   procedure Add_lt302sp( c : in out d.Criteria; lt302sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lt302sp", op, join, lt302sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt302sp;


   procedure Add_lt303sp( c : in out d.Criteria; lt303sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lt303sp", op, join, lt303sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt303sp;


   procedure Add_madem1hd( c : in out d.Criteria; madem1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "madem1hd", op, join, madem1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem1hd;


   procedure Add_madem2hd( c : in out d.Criteria; madem2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "madem2hd", op, join, madem2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem2hd;


   procedure Add_madem3hd( c : in out d.Criteria; madem3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "madem3hd", op, join, madem3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem3hd;


   procedure Add_madem1sp( c : in out d.Criteria; madem1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "madem1sp", op, join, madem1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem1sp;


   procedure Add_madem2sp( c : in out d.Criteria; madem2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "madem2sp", op, join, madem2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem2sp;


   procedure Add_madem3sp( c : in out d.Criteria; madem3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "madem3sp", op, join, madem3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem3sp;


   procedure Add_mile1hd( c : in out d.Criteria; mile1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mile1hd", op, join, Long_Float( mile1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile1hd;


   procedure Add_mile2hd( c : in out d.Criteria; mile2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mile2hd", op, join, Long_Float( mile2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile2hd;


   procedure Add_mile3hd( c : in out d.Criteria; mile3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mile3hd", op, join, mile3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile3hd;


   procedure Add_mile1sp( c : in out d.Criteria; mile1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mile1sp", op, join, Long_Float( mile1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile1sp;


   procedure Add_mile2sp( c : in out d.Criteria; mile2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mile2sp", op, join, Long_Float( mile2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile2sp;


   procedure Add_mile3sp( c : in out d.Criteria; mile3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mile3sp", op, join, mile3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile3sp;


   procedure Add_moref1hd( c : in out d.Criteria; moref1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "moref1hd", op, join, Long_Float( moref1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref1hd;


   procedure Add_moref2hd( c : in out d.Criteria; moref2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "moref2hd", op, join, moref2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref2hd;


   procedure Add_moref3hd( c : in out d.Criteria; moref3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "moref3hd", op, join, moref3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref3hd;


   procedure Add_moref1sp( c : in out d.Criteria; moref1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "moref1sp", op, join, Long_Float( moref1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref1sp;


   procedure Add_moref2sp( c : in out d.Criteria; moref2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "moref2sp", op, join, Long_Float( moref2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref2sp;


   procedure Add_moref3sp( c : in out d.Criteria; moref3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "moref3sp", op, join, moref3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref3sp;


   procedure Add_nic1hd( c : in out d.Criteria; nic1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nic1hd", op, join, Long_Float( nic1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic1hd;


   procedure Add_nic2hd( c : in out d.Criteria; nic2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nic2hd", op, join, Long_Float( nic2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic2hd;


   procedure Add_nic3hd( c : in out d.Criteria; nic3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nic3hd", op, join, Long_Float( nic3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic3hd;


   procedure Add_nic1sp( c : in out d.Criteria; nic1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nic1sp", op, join, Long_Float( nic1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic1sp;


   procedure Add_nic2sp( c : in out d.Criteria; nic2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nic2sp", op, join, Long_Float( nic2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic2sp;


   procedure Add_nic3sp( c : in out d.Criteria; nic3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nic3sp", op, join, nic3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic3sp;


   procedure Add_nidam1hd( c : in out d.Criteria; nidam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidam1hd", op, join, Long_Float( nidam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam1hd;


   procedure Add_nidam2hd( c : in out d.Criteria; nidam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidam2hd", op, join, nidam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam2hd;


   procedure Add_nidam3hd( c : in out d.Criteria; nidam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidam3hd", op, join, nidam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam3hd;


   procedure Add_nidam1sp( c : in out d.Criteria; nidam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidam1sp", op, join, Long_Float( nidam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam1sp;


   procedure Add_nidam2sp( c : in out d.Criteria; nidam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidam2sp", op, join, Long_Float( nidam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam2sp;


   procedure Add_nidam3sp( c : in out d.Criteria; nidam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidam3sp", op, join, nidam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam3sp;


   procedure Add_nipd1hd( c : in out d.Criteria; nipd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nipd1hd", op, join, nipd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd1hd;


   procedure Add_nipd2hd( c : in out d.Criteria; nipd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nipd2hd", op, join, nipd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd2hd;


   procedure Add_nipd3hd( c : in out d.Criteria; nipd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nipd3hd", op, join, nipd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd3hd;


   procedure Add_nipd1sp( c : in out d.Criteria; nipd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nipd1sp", op, join, nipd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd1sp;


   procedure Add_nipd2sp( c : in out d.Criteria; nipd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nipd2sp", op, join, nipd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd2sp;


   procedure Add_nipd3sp( c : in out d.Criteria; nipd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nipd3sp", op, join, nipd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd3sp;


   procedure Add_noemp1hd( c : in out d.Criteria; noemp1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "noemp1hd", op, join, noemp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp1hd;


   procedure Add_noemp2hd( c : in out d.Criteria; noemp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "noemp2hd", op, join, noemp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp2hd;


   procedure Add_noemp3hd( c : in out d.Criteria; noemp3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "noemp3hd", op, join, noemp3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp3hd;


   procedure Add_noemp1sp( c : in out d.Criteria; noemp1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "noemp1sp", op, join, noemp1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp1sp;


   procedure Add_noemp2sp( c : in out d.Criteria; noemp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "noemp2sp", op, join, noemp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp2sp;


   procedure Add_noemp3sp( c : in out d.Criteria; noemp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "noemp3sp", op, join, noemp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp3sp;


   procedure Add_oremp1hd( c : in out d.Criteria; oremp1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oremp1hd", op, join, oremp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp1hd;


   procedure Add_oremp2hd( c : in out d.Criteria; oremp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oremp2hd", op, join, oremp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp2hd;


   procedure Add_oremp3hd( c : in out d.Criteria; oremp3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oremp3hd", op, join, oremp3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp3hd;


   procedure Add_oremp1sp( c : in out d.Criteria; oremp1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oremp1sp", op, join, oremp1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp1sp;


   procedure Add_oremp2sp( c : in out d.Criteria; oremp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oremp2sp", op, join, oremp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp2sp;


   procedure Add_oremp3sp( c : in out d.Criteria; oremp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oremp3sp", op, join, oremp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp3sp;


   procedure Add_othd11hd( c : in out d.Criteria; othd11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd11hd", op, join, othd11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd11hd;


   procedure Add_othd12hd( c : in out d.Criteria; othd12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd12hd", op, join, othd12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd12hd;


   procedure Add_othd13hd( c : in out d.Criteria; othd13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd13hd", op, join, othd13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd13hd;


   procedure Add_othd11sp( c : in out d.Criteria; othd11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd11sp", op, join, othd11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd11sp;


   procedure Add_othd12sp( c : in out d.Criteria; othd12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd12sp", op, join, othd12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd12sp;


   procedure Add_othd13sp( c : in out d.Criteria; othd13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd13sp", op, join, othd13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd13sp;


   procedure Add_othd21hd( c : in out d.Criteria; othd21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd21hd", op, join, othd21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd21hd;


   procedure Add_othd22hd( c : in out d.Criteria; othd22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd22hd", op, join, othd22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd22hd;


   procedure Add_othd23hd( c : in out d.Criteria; othd23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd23hd", op, join, othd23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd23hd;


   procedure Add_othd21sp( c : in out d.Criteria; othd21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd21sp", op, join, othd21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd21sp;


   procedure Add_othd22sp( c : in out d.Criteria; othd22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd22sp", op, join, othd22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd22sp;


   procedure Add_othd23sp( c : in out d.Criteria; othd23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd23sp", op, join, othd23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd23sp;


   procedure Add_othd31hd( c : in out d.Criteria; othd31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd31hd", op, join, othd31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd31hd;


   procedure Add_othd32hd( c : in out d.Criteria; othd32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd32hd", op, join, othd32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd32hd;


   procedure Add_othd33hd( c : in out d.Criteria; othd33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd33hd", op, join, othd33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd33hd;


   procedure Add_othd31sp( c : in out d.Criteria; othd31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd31sp", op, join, othd31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd31sp;


   procedure Add_othd32sp( c : in out d.Criteria; othd32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd32sp", op, join, othd32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd32sp;


   procedure Add_othd33sp( c : in out d.Criteria; othd33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd33sp", op, join, othd33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd33sp;


   procedure Add_othd41hd( c : in out d.Criteria; othd41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd41hd", op, join, othd41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd41hd;


   procedure Add_othd42hd( c : in out d.Criteria; othd42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd42hd", op, join, othd42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd42hd;


   procedure Add_othd43hd( c : in out d.Criteria; othd43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd43hd", op, join, othd43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd43hd;


   procedure Add_othd41sp( c : in out d.Criteria; othd41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd41sp", op, join, othd41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd41sp;


   procedure Add_othd42sp( c : in out d.Criteria; othd42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd42sp", op, join, othd42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd42sp;


   procedure Add_othd43sp( c : in out d.Criteria; othd43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd43sp", op, join, othd43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd43sp;


   procedure Add_othd51hd( c : in out d.Criteria; othd51hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd51hd", op, join, othd51hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd51hd;


   procedure Add_othd52hd( c : in out d.Criteria; othd52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd52hd", op, join, othd52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd52hd;


   procedure Add_othd53hd( c : in out d.Criteria; othd53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd53hd", op, join, othd53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd53hd;


   procedure Add_othd51sp( c : in out d.Criteria; othd51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd51sp", op, join, othd51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd51sp;


   procedure Add_othd52sp( c : in out d.Criteria; othd52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd52sp", op, join, othd52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd52sp;


   procedure Add_othd53sp( c : in out d.Criteria; othd53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd53sp", op, join, othd53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd53sp;


   procedure Add_othd61hd( c : in out d.Criteria; othd61hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd61hd", op, join, othd61hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd61hd;


   procedure Add_othd62hd( c : in out d.Criteria; othd62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd62hd", op, join, othd62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd62hd;


   procedure Add_othd63hd( c : in out d.Criteria; othd63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd63hd", op, join, othd63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd63hd;


   procedure Add_othd61sp( c : in out d.Criteria; othd61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd61sp", op, join, othd61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd61sp;


   procedure Add_othd62sp( c : in out d.Criteria; othd62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd62sp", op, join, othd62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd62sp;


   procedure Add_othd63sp( c : in out d.Criteria; othd63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd63sp", op, join, othd63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd63sp;


   procedure Add_othd71hd( c : in out d.Criteria; othd71hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd71hd", op, join, othd71hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd71hd;


   procedure Add_othd72hd( c : in out d.Criteria; othd72hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd72hd", op, join, othd72hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd72hd;


   procedure Add_othd73hd( c : in out d.Criteria; othd73hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd73hd", op, join, othd73hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd73hd;


   procedure Add_othd71sp( c : in out d.Criteria; othd71sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd71sp", op, join, othd71sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd71sp;


   procedure Add_othd72sp( c : in out d.Criteria; othd72sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd72sp", op, join, othd72sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd72sp;


   procedure Add_othd73sp( c : in out d.Criteria; othd73sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd73sp", op, join, othd73sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd73sp;


   procedure Add_othd81hd( c : in out d.Criteria; othd81hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd81hd", op, join, othd81hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd81hd;


   procedure Add_othd82hd( c : in out d.Criteria; othd82hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd82hd", op, join, othd82hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd82hd;


   procedure Add_othd83hd( c : in out d.Criteria; othd83hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd83hd", op, join, othd83hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd83hd;


   procedure Add_othd81sp( c : in out d.Criteria; othd81sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd81sp", op, join, othd81sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd81sp;


   procedure Add_othd82sp( c : in out d.Criteria; othd82sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd82sp", op, join, othd82sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd82sp;


   procedure Add_othd83sp( c : in out d.Criteria; othd83sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd83sp", op, join, othd83sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd83sp;


   procedure Add_othd91hd( c : in out d.Criteria; othd91hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd91hd", op, join, othd91hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd91hd;


   procedure Add_othd92hd( c : in out d.Criteria; othd92hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd92hd", op, join, othd92hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd92hd;


   procedure Add_othd93hd( c : in out d.Criteria; othd93hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd93hd", op, join, othd93hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd93hd;


   procedure Add_othd91sp( c : in out d.Criteria; othd91sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd91sp", op, join, othd91sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd91sp;


   procedure Add_othd92sp( c : in out d.Criteria; othd92sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd92sp", op, join, othd92sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd92sp;


   procedure Add_othd93sp( c : in out d.Criteria; othd93sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othd93sp", op, join, othd93sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd93sp;


   procedure Add_otd101hd( c : in out d.Criteria; otd101hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otd101hd", op, join, otd101hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd101hd;


   procedure Add_otd102hd( c : in out d.Criteria; otd102hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otd102hd", op, join, otd102hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd102hd;


   procedure Add_otd103hd( c : in out d.Criteria; otd103hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otd103hd", op, join, otd103hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd103hd;


   procedure Add_otd101sp( c : in out d.Criteria; otd101sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otd101sp", op, join, otd101sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd101sp;


   procedure Add_otd102sp( c : in out d.Criteria; otd102sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otd102sp", op, join, otd102sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd102sp;


   procedure Add_otd103sp( c : in out d.Criteria; otd103sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "otd103sp", op, join, otd103sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd103sp;


   procedure Add_ownam1hd( c : in out d.Criteria; ownam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownam1hd", op, join, Long_Float( ownam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam1hd;


   procedure Add_ownam2hd( c : in out d.Criteria; ownam2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownam2hd", op, join, Long_Float( ownam2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam2hd;


   procedure Add_ownam3hd( c : in out d.Criteria; ownam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownam3hd", op, join, ownam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam3hd;


   procedure Add_ownam1sp( c : in out d.Criteria; ownam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownam1sp", op, join, Long_Float( ownam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam1sp;


   procedure Add_ownam2sp( c : in out d.Criteria; ownam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownam2sp", op, join, Long_Float( ownam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam2sp;


   procedure Add_ownam3sp( c : in out d.Criteria; ownam3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownam3sp", op, join, Long_Float( ownam3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam3sp;


   procedure Add_ownoa1hd( c : in out d.Criteria; ownoa1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownoa1hd", op, join, Long_Float( ownoa1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa1hd;


   procedure Add_ownoa2hd( c : in out d.Criteria; ownoa2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownoa2hd", op, join, Long_Float( ownoa2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa2hd;


   procedure Add_ownoa3hd( c : in out d.Criteria; ownoa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownoa3hd", op, join, ownoa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa3hd;


   procedure Add_ownoa1sp( c : in out d.Criteria; ownoa1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownoa1sp", op, join, Long_Float( ownoa1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa1sp;


   procedure Add_ownoa2sp( c : in out d.Criteria; ownoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownoa2sp", op, join, ownoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa2sp;


   procedure Add_ownoa3sp( c : in out d.Criteria; ownoa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownoa3sp", op, join, ownoa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa3sp;


   procedure Add_ownot1hd( c : in out d.Criteria; ownot1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownot1hd", op, join, ownot1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot1hd;


   procedure Add_ownot2hd( c : in out d.Criteria; ownot2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownot2hd", op, join, ownot2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot2hd;


   procedure Add_ownot3hd( c : in out d.Criteria; ownot3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownot3hd", op, join, ownot3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot3hd;


   procedure Add_ownot1sp( c : in out d.Criteria; ownot1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownot1sp", op, join, ownot1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot1sp;


   procedure Add_ownot2sp( c : in out d.Criteria; ownot2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownot2sp", op, join, ownot2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot2sp;


   procedure Add_ownot3sp( c : in out d.Criteria; ownot3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownot3sp", op, join, ownot3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot3sp;


   procedure Add_ownsm1hd( c : in out d.Criteria; ownsm1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownsm1hd", op, join, ownsm1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm1hd;


   procedure Add_ownsm2hd( c : in out d.Criteria; ownsm2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownsm2hd", op, join, ownsm2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm2hd;


   procedure Add_ownsm3hd( c : in out d.Criteria; ownsm3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownsm3hd", op, join, ownsm3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm3hd;


   procedure Add_ownsm1sp( c : in out d.Criteria; ownsm1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownsm1sp", op, join, ownsm1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm1sp;


   procedure Add_ownsm2sp( c : in out d.Criteria; ownsm2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownsm2sp", op, join, ownsm2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm2sp;


   procedure Add_ownsm3sp( c : in out d.Criteria; ownsm3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ownsm3sp", op, join, ownsm3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm3sp;


   procedure Add_pappd1hd( c : in out d.Criteria; pappd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pappd1hd", op, join, pappd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd1hd;


   procedure Add_pappd2hd( c : in out d.Criteria; pappd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pappd2hd", op, join, pappd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd2hd;


   procedure Add_pappd3hd( c : in out d.Criteria; pappd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pappd3hd", op, join, pappd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd3hd;


   procedure Add_pappd1sp( c : in out d.Criteria; pappd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pappd1sp", op, join, pappd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd1sp;


   procedure Add_pappd2sp( c : in out d.Criteria; pappd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pappd2sp", op, join, pappd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd2sp;


   procedure Add_pappd3sp( c : in out d.Criteria; pappd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pappd3sp", op, join, pappd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd3sp;


   procedure Add_payam1hd( c : in out d.Criteria; payam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payam1hd", op, join, Long_Float( payam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam1hd;


   procedure Add_payam2hd( c : in out d.Criteria; payam2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payam2hd", op, join, Long_Float( payam2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam2hd;


   procedure Add_payam3hd( c : in out d.Criteria; payam3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payam3hd", op, join, Long_Float( payam3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam3hd;


   procedure Add_payam1sp( c : in out d.Criteria; payam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payam1sp", op, join, Long_Float( payam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam1sp;


   procedure Add_payam2sp( c : in out d.Criteria; payam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payam2sp", op, join, Long_Float( payam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam2sp;


   procedure Add_payam3sp( c : in out d.Criteria; payam3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payam3sp", op, join, Long_Float( payam3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam3sp;


   procedure Add_pdate1hd( c : in out d.Criteria; pdate1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdate1hd", op, join, pdate1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate1hd;


   procedure Add_pdate2hd( c : in out d.Criteria; pdate2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdate2hd", op, join, pdate2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate2hd;


   procedure Add_pdate3hd( c : in out d.Criteria; pdate3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdate3hd", op, join, pdate3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate3hd;


   procedure Add_pdate1sp( c : in out d.Criteria; pdate1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdate1sp", op, join, pdate1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate1sp;


   procedure Add_pdate2sp( c : in out d.Criteria; pdate2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdate2sp", op, join, pdate2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate2sp;


   procedure Add_pdate3sp( c : in out d.Criteria; pdate3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pdate3sp", op, join, pdate3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate3sp;


   procedure Add_paye1hd( c : in out d.Criteria; paye1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paye1hd", op, join, Long_Float( paye1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye1hd;


   procedure Add_paye2hd( c : in out d.Criteria; paye2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paye2hd", op, join, Long_Float( paye2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye2hd;


   procedure Add_paye3hd( c : in out d.Criteria; paye3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paye3hd", op, join, Long_Float( paye3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye3hd;


   procedure Add_paye1sp( c : in out d.Criteria; paye1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paye1sp", op, join, Long_Float( paye1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye1sp;


   procedure Add_paye2sp( c : in out d.Criteria; paye2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paye2sp", op, join, Long_Float( paye2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye2sp;


   procedure Add_paye3sp( c : in out d.Criteria; paye3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paye3sp", op, join, Long_Float( paye3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye3sp;


   procedure Add_paype1hd( c : in out d.Criteria; paype1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paype1hd", op, join, paype1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype1hd;


   procedure Add_paype2hd( c : in out d.Criteria; paype2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paype2hd", op, join, paype2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype2hd;


   procedure Add_paype3hd( c : in out d.Criteria; paype3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paype3hd", op, join, paype3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype3hd;


   procedure Add_paype1sp( c : in out d.Criteria; paype1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paype1sp", op, join, paype1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype1sp;


   procedure Add_paype2sp( c : in out d.Criteria; paype2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paype2sp", op, join, paype2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype2sp;


   procedure Add_paype3sp( c : in out d.Criteria; paype3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paype3sp", op, join, paype3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype3sp;


   procedure Add_paysl1hd( c : in out d.Criteria; paysl1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paysl1hd", op, join, paysl1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl1hd;


   procedure Add_paysl2hd( c : in out d.Criteria; paysl2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paysl2hd", op, join, paysl2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl2hd;


   procedure Add_paysl3hd( c : in out d.Criteria; paysl3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paysl3hd", op, join, paysl3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl3hd;


   procedure Add_paysl1sp( c : in out d.Criteria; paysl1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paysl1sp", op, join, paysl1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl1sp;


   procedure Add_paysl2sp( c : in out d.Criteria; paysl2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paysl2sp", op, join, paysl2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl2sp;


   procedure Add_paysl3sp( c : in out d.Criteria; paysl3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "paysl3sp", op, join, paysl3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl3sp;


   procedure Add_payus1hd( c : in out d.Criteria; payus1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payus1hd", op, join, payus1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus1hd;


   procedure Add_payus2hd( c : in out d.Criteria; payus2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payus2hd", op, join, payus2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus2hd;


   procedure Add_payus3hd( c : in out d.Criteria; payus3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payus3hd", op, join, payus3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus3hd;


   procedure Add_payus1sp( c : in out d.Criteria; payus1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payus1sp", op, join, payus1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus1sp;


   procedure Add_payus2sp( c : in out d.Criteria; payus2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payus2sp", op, join, payus2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus2sp;


   procedure Add_payus3sp( c : in out d.Criteria; payus3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payus3sp", op, join, payus3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus3sp;


   procedure Add_pothr1hd( c : in out d.Criteria; pothr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothr1hd", op, join, Long_Float( pothr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr1hd;


   procedure Add_pothr2hd( c : in out d.Criteria; pothr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothr2hd", op, join, pothr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr2hd;


   procedure Add_pothr3hd( c : in out d.Criteria; pothr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothr3hd", op, join, pothr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr3hd;


   procedure Add_pothr1sp( c : in out d.Criteria; pothr1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothr1sp", op, join, Long_Float( pothr1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr1sp;


   procedure Add_pothr2sp( c : in out d.Criteria; pothr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothr2sp", op, join, pothr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr2sp;


   procedure Add_pothr3sp( c : in out d.Criteria; pothr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pothr3sp", op, join, pothr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr3sp;


   procedure Add_ppppd1hd( c : in out d.Criteria; ppppd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppppd1hd", op, join, ppppd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd1hd;


   procedure Add_ppppd2hd( c : in out d.Criteria; ppppd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppppd2hd", op, join, ppppd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd2hd;


   procedure Add_ppppd3hd( c : in out d.Criteria; ppppd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppppd3hd", op, join, ppppd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd3hd;


   procedure Add_ppppd1sp( c : in out d.Criteria; ppppd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppppd1sp", op, join, ppppd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd1sp;


   procedure Add_ppppd2sp( c : in out d.Criteria; ppppd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppppd2sp", op, join, ppppd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd2sp;


   procedure Add_ppppd3sp( c : in out d.Criteria; ppppd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppppd3sp", op, join, ppppd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd3sp;


   procedure Add_prbef1hd( c : in out d.Criteria; prbef1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prbef1hd", op, join, Long_Float( prbef1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef1hd;


   procedure Add_prbef2hd( c : in out d.Criteria; prbef2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prbef2hd", op, join, Long_Float( prbef2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef2hd;


   procedure Add_prbef3hd( c : in out d.Criteria; prbef3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prbef3hd", op, join, Long_Float( prbef3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef3hd;


   procedure Add_prbef1sp( c : in out d.Criteria; prbef1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prbef1sp", op, join, Long_Float( prbef1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef1sp;


   procedure Add_prbef2sp( c : in out d.Criteria; prbef2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prbef2sp", op, join, Long_Float( prbef2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef2sp;


   procedure Add_prbef3sp( c : in out d.Criteria; prbef3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prbef3sp", op, join, Long_Float( prbef3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef3sp;


   procedure Add_prdoc1hd( c : in out d.Criteria; prdoc1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prdoc1hd", op, join, prdoc1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc1hd;


   procedure Add_prdoc2hd( c : in out d.Criteria; prdoc2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prdoc2hd", op, join, prdoc2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc2hd;


   procedure Add_prdoc3hd( c : in out d.Criteria; prdoc3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prdoc3hd", op, join, prdoc3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc3hd;


   procedure Add_prdoc1sp( c : in out d.Criteria; prdoc1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prdoc1sp", op, join, prdoc1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc1sp;


   procedure Add_prdoc2sp( c : in out d.Criteria; prdoc2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prdoc2sp", op, join, prdoc2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc2sp;


   procedure Add_prdoc3sp( c : in out d.Criteria; prdoc3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prdoc3sp", op, join, prdoc3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc3sp;


   procedure Add_sepro1hd( c : in out d.Criteria; sepro1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sepro1hd", op, join, Long_Float( sepro1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro1hd;


   procedure Add_sepro2hd( c : in out d.Criteria; sepro2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sepro2hd", op, join, Long_Float( sepro2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro2hd;


   procedure Add_sepro3hd( c : in out d.Criteria; sepro3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sepro3hd", op, join, Long_Float( sepro3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro3hd;


   procedure Add_sepro1sp( c : in out d.Criteria; sepro1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sepro1sp", op, join, Long_Float( sepro1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro1sp;


   procedure Add_sepro2sp( c : in out d.Criteria; sepro2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sepro2sp", op, join, Long_Float( sepro2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro2sp;


   procedure Add_sepro3sp( c : in out d.Criteria; sepro3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sepro3sp", op, join, Long_Float( sepro3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro3sp;


   procedure Add_prolo1hd( c : in out d.Criteria; prolo1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prolo1hd", op, join, prolo1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo1hd;


   procedure Add_prolo2hd( c : in out d.Criteria; prolo2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prolo2hd", op, join, prolo2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo2hd;


   procedure Add_prolo3hd( c : in out d.Criteria; prolo3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prolo3hd", op, join, prolo3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo3hd;


   procedure Add_prolo1sp( c : in out d.Criteria; prolo1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prolo1sp", op, join, prolo1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo1sp;


   procedure Add_prolo2sp( c : in out d.Criteria; prolo2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prolo2sp", op, join, prolo2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo2sp;


   procedure Add_prolo3sp( c : in out d.Criteria; prolo3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prolo3sp", op, join, prolo3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo3sp;


   procedure Add_profn1hd( c : in out d.Criteria; profn1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "profn1hd", op, join, profn1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn1hd;


   procedure Add_profn2hd( c : in out d.Criteria; profn2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "profn2hd", op, join, profn2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn2hd;


   procedure Add_profn3hd( c : in out d.Criteria; profn3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "profn3hd", op, join, profn3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn3hd;


   procedure Add_profn1sp( c : in out d.Criteria; profn1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "profn1sp", op, join, profn1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn1sp;


   procedure Add_profn2sp( c : in out d.Criteria; profn2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "profn2sp", op, join, profn2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn2sp;


   procedure Add_profn3sp( c : in out d.Criteria; profn3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "profn3sp", op, join, profn3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn3sp;


   procedure Add_protx1hd( c : in out d.Criteria; protx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "protx1hd", op, join, protx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx1hd;


   procedure Add_protx2hd( c : in out d.Criteria; protx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "protx2hd", op, join, protx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx2hd;


   procedure Add_protx3hd( c : in out d.Criteria; protx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "protx3hd", op, join, protx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx3hd;


   procedure Add_protx1sp( c : in out d.Criteria; protx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "protx1sp", op, join, protx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx1sp;


   procedure Add_protx2sp( c : in out d.Criteria; protx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "protx2sp", op, join, protx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx2sp;


   procedure Add_protx3sp( c : in out d.Criteria; protx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "protx3sp", op, join, protx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx3sp;


   procedure Add_rspvr1hd( c : in out d.Criteria; rspvr1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rspvr1hd", op, join, rspvr1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr1hd;


   procedure Add_rspvr2hd( c : in out d.Criteria; rspvr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rspvr2hd", op, join, rspvr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr2hd;


   procedure Add_rspvr3hd( c : in out d.Criteria; rspvr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rspvr3hd", op, join, rspvr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr3hd;


   procedure Add_rspvr1sp( c : in out d.Criteria; rspvr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rspvr1sp", op, join, rspvr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr1sp;


   procedure Add_rspvr2sp( c : in out d.Criteria; rspvr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rspvr2sp", op, join, rspvr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr2sp;


   procedure Add_rspvr3sp( c : in out d.Criteria; rspvr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rspvr3sp", op, join, rspvr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr3sp;


   procedure Add_apamt1hd( c : in out d.Criteria; apamt1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apamt1hd", op, join, apamt1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt1hd;


   procedure Add_apamt2hd( c : in out d.Criteria; apamt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apamt2hd", op, join, apamt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt2hd;


   procedure Add_apamt3hd( c : in out d.Criteria; apamt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apamt3hd", op, join, apamt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt3hd;


   procedure Add_apamt1sp( c : in out d.Criteria; apamt1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apamt1sp", op, join, apamt1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt1sp;


   procedure Add_apamt2sp( c : in out d.Criteria; apamt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apamt2sp", op, join, apamt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt2sp;


   procedure Add_apamt3sp( c : in out d.Criteria; apamt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apamt3sp", op, join, apamt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt3sp;


   procedure Add_sebeg1hd( c : in out d.Criteria; sebeg1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sebeg1hd", op, join, sebeg1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg1hd;


   procedure Add_sebeg2hd( c : in out d.Criteria; sebeg2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sebeg2hd", op, join, sebeg2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg2hd;


   procedure Add_sebeg3hd( c : in out d.Criteria; sebeg3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sebeg3hd", op, join, sebeg3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg3hd;


   procedure Add_sebeg1sp( c : in out d.Criteria; sebeg1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sebeg1sp", op, join, sebeg1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg1sp;


   procedure Add_sebeg2sp( c : in out d.Criteria; sebeg2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sebeg2sp", op, join, sebeg2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg2sp;


   procedure Add_sebeg3sp( c : in out d.Criteria; sebeg3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sebeg3sp", op, join, sebeg3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg3sp;


   procedure Add_seend1hd( c : in out d.Criteria; seend1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seend1hd", op, join, seend1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend1hd;


   procedure Add_seend2hd( c : in out d.Criteria; seend2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seend2hd", op, join, seend2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend2hd;


   procedure Add_seend3hd( c : in out d.Criteria; seend3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seend3hd", op, join, seend3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend3hd;


   procedure Add_seend1sp( c : in out d.Criteria; seend1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seend1sp", op, join, seend1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend1sp;


   procedure Add_seend2sp( c : in out d.Criteria; seend2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seend2sp", op, join, seend2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend2sp;


   procedure Add_seend3sp( c : in out d.Criteria; seend3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seend3sp", op, join, seend3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend3sp;


   procedure Add_sectr1hd( c : in out d.Criteria; sectr1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectr1hd", op, join, sectr1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr1hd;


   procedure Add_sectr2hd( c : in out d.Criteria; sectr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectr2hd", op, join, sectr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr2hd;


   procedure Add_sectr3hd( c : in out d.Criteria; sectr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectr3hd", op, join, sectr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr3hd;


   procedure Add_sectr1sp( c : in out d.Criteria; sectr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectr1sp", op, join, sectr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr1sp;


   procedure Add_sectr2sp( c : in out d.Criteria; sectr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectr2sp", op, join, sectr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr2sp;


   procedure Add_sectr3sp( c : in out d.Criteria; sectr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectr3sp", op, join, sectr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr3sp;


   procedure Add_sectt1hd( c : in out d.Criteria; sectt1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectt1hd", op, join, sectt1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt1hd;


   procedure Add_sectt2hd( c : in out d.Criteria; sectt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectt2hd", op, join, sectt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt2hd;


   procedure Add_sectt3hd( c : in out d.Criteria; sectt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectt3hd", op, join, sectt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt3hd;


   procedure Add_sectt1sp( c : in out d.Criteria; sectt1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectt1sp", op, join, sectt1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt1sp;


   procedure Add_sectt2sp( c : in out d.Criteria; sectt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectt2sp", op, join, sectt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt2sp;


   procedure Add_sectt3sp( c : in out d.Criteria; sectt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sectt3sp", op, join, sectt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt3sp;


   procedure Add_sefin1hd( c : in out d.Criteria; sefin1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sefin1hd", op, join, sefin1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin1hd;


   procedure Add_sefin2hd( c : in out d.Criteria; sefin2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sefin2hd", op, join, sefin2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin2hd;


   procedure Add_sefin3hd( c : in out d.Criteria; sefin3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sefin3hd", op, join, sefin3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin3hd;


   procedure Add_sefin1sp( c : in out d.Criteria; sefin1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sefin1sp", op, join, sefin1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin1sp;


   procedure Add_sefin2sp( c : in out d.Criteria; sefin2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sefin2sp", op, join, sefin2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin2sp;


   procedure Add_sefin3sp( c : in out d.Criteria; sefin3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sefin3sp", op, join, sefin3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin3sp;


   procedure Add_secam1hd( c : in out d.Criteria; secam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secam1hd", op, join, Long_Float( secam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam1hd;


   procedure Add_secam2hd( c : in out d.Criteria; secam2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secam2hd", op, join, Long_Float( secam2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam2hd;


   procedure Add_secam3hd( c : in out d.Criteria; secam3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secam3hd", op, join, Long_Float( secam3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam3hd;


   procedure Add_secam1sp( c : in out d.Criteria; secam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secam1sp", op, join, Long_Float( secam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam1sp;


   procedure Add_secam2sp( c : in out d.Criteria; secam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secam2sp", op, join, Long_Float( secam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam2sp;


   procedure Add_secam3sp( c : in out d.Criteria; secam3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secam3sp", op, join, Long_Float( secam3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam3sp;


   procedure Add_seciw1hd( c : in out d.Criteria; seciw1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seciw1hd", op, join, seciw1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw1hd;


   procedure Add_seciw2hd( c : in out d.Criteria; seciw2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seciw2hd", op, join, seciw2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw2hd;


   procedure Add_seciw3hd( c : in out d.Criteria; seciw3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seciw3hd", op, join, seciw3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw3hd;


   procedure Add_seciw1sp( c : in out d.Criteria; seciw1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seciw1sp", op, join, seciw1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw1sp;


   procedure Add_seciw2sp( c : in out d.Criteria; seciw2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seciw2sp", op, join, seciw2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw2sp;


   procedure Add_seciw3sp( c : in out d.Criteria; seciw3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seciw3sp", op, join, seciw3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw3sp;


   procedure Add_sewks1hd( c : in out d.Criteria; sewks1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewks1hd", op, join, sewks1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks1hd;


   procedure Add_sewks2hd( c : in out d.Criteria; sewks2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewks2hd", op, join, sewks2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks2hd;


   procedure Add_sewks3hd( c : in out d.Criteria; sewks3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewks3hd", op, join, sewks3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks3hd;


   procedure Add_sewks1sp( c : in out d.Criteria; sewks1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewks1sp", op, join, sewks1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks1sp;


   procedure Add_sewks2sp( c : in out d.Criteria; sewks2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewks2sp", op, join, sewks2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks2sp;


   procedure Add_sewks3sp( c : in out d.Criteria; sewks3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewks3sp", op, join, sewks3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks3sp;


   procedure Add_senam1hd( c : in out d.Criteria; senam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senam1hd", op, join, Long_Float( senam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam1hd;


   procedure Add_senam2hd( c : in out d.Criteria; senam2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senam2hd", op, join, Long_Float( senam2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam2hd;


   procedure Add_senam3hd( c : in out d.Criteria; senam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senam3hd", op, join, senam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam3hd;


   procedure Add_senam1sp( c : in out d.Criteria; senam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senam1sp", op, join, Long_Float( senam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam1sp;


   procedure Add_senam2sp( c : in out d.Criteria; senam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senam2sp", op, join, Long_Float( senam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam2sp;


   procedure Add_senam3sp( c : in out d.Criteria; senam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senam3sp", op, join, senam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam3sp;


   procedure Add_seiin1hd( c : in out d.Criteria; seiin1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seiin1hd", op, join, seiin1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin1hd;


   procedure Add_seiin2hd( c : in out d.Criteria; seiin2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seiin2hd", op, join, seiin2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin2hd;


   procedure Add_seiin3hd( c : in out d.Criteria; seiin3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seiin3hd", op, join, seiin3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin3hd;


   procedure Add_seiin1sp( c : in out d.Criteria; seiin1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seiin1sp", op, join, seiin1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin1sp;


   procedure Add_seiin2sp( c : in out d.Criteria; seiin2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seiin2sp", op, join, seiin2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin2sp;


   procedure Add_seiin3sp( c : in out d.Criteria; seiin3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seiin3sp", op, join, seiin3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin3sp;


   procedure Add_senil1hd( c : in out d.Criteria; senil1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senil1hd", op, join, Long_Float( senil1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil1hd;


   procedure Add_senil2hd( c : in out d.Criteria; senil2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senil2hd", op, join, Long_Float( senil2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil2hd;


   procedure Add_senil3hd( c : in out d.Criteria; senil3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senil3hd", op, join, senil3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil3hd;


   procedure Add_senil1sp( c : in out d.Criteria; senil1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senil1sp", op, join, Long_Float( senil1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil1sp;


   procedure Add_senil2sp( c : in out d.Criteria; senil2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senil2sp", op, join, Long_Float( senil2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil2sp;


   procedure Add_senil3sp( c : in out d.Criteria; senil3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senil3sp", op, join, senil3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil3sp;


   procedure Add_senir1hd( c : in out d.Criteria; senir1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senir1hd", op, join, Long_Float( senir1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir1hd;


   procedure Add_senir2hd( c : in out d.Criteria; senir2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senir2hd", op, join, Long_Float( senir2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir2hd;


   procedure Add_senir3hd( c : in out d.Criteria; senir3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senir3hd", op, join, Long_Float( senir3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir3hd;


   procedure Add_senir1sp( c : in out d.Criteria; senir1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senir1sp", op, join, Long_Float( senir1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir1sp;


   procedure Add_senir2sp( c : in out d.Criteria; senir2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senir2sp", op, join, Long_Float( senir2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir2sp;


   procedure Add_senir3sp( c : in out d.Criteria; senir3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "senir3sp", op, join, Long_Float( senir3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir3sp;


   procedure Add_psenr1hd( c : in out d.Criteria; psenr1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psenr1hd", op, join, psenr1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr1hd;


   procedure Add_psenr2hd( c : in out d.Criteria; psenr2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psenr2hd", op, join, psenr2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr2hd;


   procedure Add_psenr3hd( c : in out d.Criteria; psenr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psenr3hd", op, join, psenr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr3hd;


   procedure Add_psenr1sp( c : in out d.Criteria; psenr1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psenr1sp", op, join, psenr1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr1sp;


   procedure Add_psenr2sp( c : in out d.Criteria; psenr2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psenr2sp", op, join, psenr2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr2sp;


   procedure Add_psenr3sp( c : in out d.Criteria; psenr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "psenr3sp", op, join, psenr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr3sp;


   procedure Add_setax1hd( c : in out d.Criteria; setax1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "setax1hd", op, join, Long_Float( setax1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax1hd;


   procedure Add_setax2hd( c : in out d.Criteria; setax2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "setax2hd", op, join, Long_Float( setax2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax2hd;


   procedure Add_setax3hd( c : in out d.Criteria; setax3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "setax3hd", op, join, Long_Float( setax3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax3hd;


   procedure Add_setax1sp( c : in out d.Criteria; setax1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "setax1sp", op, join, Long_Float( setax1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax1sp;


   procedure Add_setax2sp( c : in out d.Criteria; setax2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "setax2sp", op, join, Long_Float( setax2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax2sp;


   procedure Add_setax3sp( c : in out d.Criteria; setax3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "setax3sp", op, join, Long_Float( setax3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax3sp;


   procedure Add_smpam1hd( c : in out d.Criteria; smpam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpam1hd", op, join, Long_Float( smpam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam1hd;


   procedure Add_smpam2hd( c : in out d.Criteria; smpam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpam2hd", op, join, smpam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam2hd;


   procedure Add_smpam3hd( c : in out d.Criteria; smpam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpam3hd", op, join, smpam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam3hd;


   procedure Add_smpam1sp( c : in out d.Criteria; smpam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpam1sp", op, join, Long_Float( smpam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam1sp;


   procedure Add_smpam2sp( c : in out d.Criteria; smpam2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpam2sp", op, join, Long_Float( smpam2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam2sp;


   procedure Add_smpam3sp( c : in out d.Criteria; smpam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smpam3sp", op, join, smpam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam3sp;


   procedure Add_smprt1hd( c : in out d.Criteria; smprt1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smprt1hd", op, join, smprt1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt1hd;


   procedure Add_smprt2hd( c : in out d.Criteria; smprt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smprt2hd", op, join, smprt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt2hd;


   procedure Add_smprt3hd( c : in out d.Criteria; smprt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smprt3hd", op, join, smprt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt3hd;


   procedure Add_smprt1sp( c : in out d.Criteria; smprt1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smprt1sp", op, join, smprt1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt1sp;


   procedure Add_smprt2sp( c : in out d.Criteria; smprt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smprt2sp", op, join, smprt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt2sp;


   procedure Add_smprt3sp( c : in out d.Criteria; smprt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "smprt3sp", op, join, smprt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt3sp;


   procedure Add_sole1hd( c : in out d.Criteria; sole1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sole1hd", op, join, sole1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole1hd;


   procedure Add_sole2hd( c : in out d.Criteria; sole2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sole2hd", op, join, sole2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole2hd;


   procedure Add_sole3hd( c : in out d.Criteria; sole3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sole3hd", op, join, sole3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole3hd;


   procedure Add_sole1sp( c : in out d.Criteria; sole1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sole1sp", op, join, sole1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole1sp;


   procedure Add_sole2sp( c : in out d.Criteria; sole2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sole2sp", op, join, sole2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole2sp;


   procedure Add_sole3sp( c : in out d.Criteria; sole3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sole3sp", op, join, sole3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole3sp;


   procedure Add_spamt1hd( c : in out d.Criteria; spamt1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spamt1hd", op, join, Long_Float( spamt1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt1hd;


   procedure Add_spamt2hd( c : in out d.Criteria; spamt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spamt2hd", op, join, spamt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt2hd;


   procedure Add_spamt3hd( c : in out d.Criteria; spamt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spamt3hd", op, join, spamt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt3hd;


   procedure Add_spamt1sp( c : in out d.Criteria; spamt1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spamt1sp", op, join, Long_Float( spamt1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt1sp;


   procedure Add_spamt2sp( c : in out d.Criteria; spamt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spamt2sp", op, join, spamt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt2sp;


   procedure Add_spamt3sp( c : in out d.Criteria; spamt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spamt3sp", op, join, spamt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt3sp;


   procedure Add_sppd1hd( c : in out d.Criteria; sppd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppd1hd", op, join, sppd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd1hd;


   procedure Add_sppd2hd( c : in out d.Criteria; sppd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppd2hd", op, join, sppd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd2hd;


   procedure Add_sppd3hd( c : in out d.Criteria; sppd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppd3hd", op, join, sppd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd3hd;


   procedure Add_sppd1sp( c : in out d.Criteria; sppd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppd1sp", op, join, sppd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd1sp;


   procedure Add_sppd2sp( c : in out d.Criteria; sppd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppd2sp", op, join, sppd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd2sp;


   procedure Add_sppd3sp( c : in out d.Criteria; sppd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sppd3sp", op, join, sppd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd3sp;


   procedure Add_spsac1hd( c : in out d.Criteria; spsac1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsac1hd", op, join, spsac1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac1hd;


   procedure Add_spsac2hd( c : in out d.Criteria; spsac2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsac2hd", op, join, spsac2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac2hd;


   procedure Add_spsac3hd( c : in out d.Criteria; spsac3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsac3hd", op, join, spsac3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac3hd;


   procedure Add_spsac1sp( c : in out d.Criteria; spsac1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsac1sp", op, join, spsac1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac1sp;


   procedure Add_spsac2sp( c : in out d.Criteria; spsac2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsac2sp", op, join, spsac2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac2sp;


   procedure Add_spsac3sp( c : in out d.Criteria; spsac3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsac3sp", op, join, spsac3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac3sp;


   procedure Add_spuam1hd( c : in out d.Criteria; spuam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spuam1hd", op, join, Long_Float( spuam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam1hd;


   procedure Add_spuam2hd( c : in out d.Criteria; spuam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spuam2hd", op, join, spuam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam2hd;


   procedure Add_spuam3hd( c : in out d.Criteria; spuam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spuam3hd", op, join, spuam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam3hd;


   procedure Add_spuam1sp( c : in out d.Criteria; spuam1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spuam1sp", op, join, spuam1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam1sp;


   procedure Add_spuam2sp( c : in out d.Criteria; spuam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spuam2sp", op, join, spuam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam2sp;


   procedure Add_spuam3sp( c : in out d.Criteria; spuam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spuam3sp", op, join, spuam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam3sp;


   procedure Add_spupd1hd( c : in out d.Criteria; spupd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spupd1hd", op, join, spupd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd1hd;


   procedure Add_spupd2hd( c : in out d.Criteria; spupd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spupd2hd", op, join, spupd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd2hd;


   procedure Add_spupd3hd( c : in out d.Criteria; spupd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spupd3hd", op, join, spupd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd3hd;


   procedure Add_spupd1sp( c : in out d.Criteria; spupd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spupd1sp", op, join, spupd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd1sp;


   procedure Add_spupd2sp( c : in out d.Criteria; spupd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spupd2sp", op, join, spupd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd2sp;


   procedure Add_spupd3sp( c : in out d.Criteria; spupd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spupd3sp", op, join, spupd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd3sp;


   procedure Add_spusu1hd( c : in out d.Criteria; spusu1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spusu1hd", op, join, spusu1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu1hd;


   procedure Add_spusu2hd( c : in out d.Criteria; spusu2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spusu2hd", op, join, spusu2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu2hd;


   procedure Add_spusu3hd( c : in out d.Criteria; spusu3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spusu3hd", op, join, spusu3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu3hd;


   procedure Add_spusu1sp( c : in out d.Criteria; spusu1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spusu1sp", op, join, spusu1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu1sp;


   procedure Add_spusu2sp( c : in out d.Criteria; spusu2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spusu2sp", op, join, spusu2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu2sp;


   procedure Add_spusu3sp( c : in out d.Criteria; spusu3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spusu3sp", op, join, spusu3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu3sp;


   procedure Add_ppamt1hd( c : in out d.Criteria; ppamt1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppamt1hd", op, join, Long_Float( ppamt1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt1hd;


   procedure Add_ppamt2hd( c : in out d.Criteria; ppamt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppamt2hd", op, join, ppamt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt2hd;


   procedure Add_ppamt3hd( c : in out d.Criteria; ppamt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppamt3hd", op, join, ppamt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt3hd;


   procedure Add_ppamt1sp( c : in out d.Criteria; ppamt1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppamt1sp", op, join, Long_Float( ppamt1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt1sp;


   procedure Add_ppamt2sp( c : in out d.Criteria; ppamt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppamt2sp", op, join, ppamt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt2sp;


   procedure Add_ppamt3sp( c : in out d.Criteria; ppamt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppamt3sp", op, join, ppamt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt3sp;


   procedure Add_sspam1hd( c : in out d.Criteria; sspam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspam1hd", op, join, Long_Float( sspam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam1hd;


   procedure Add_sspam2hd( c : in out d.Criteria; sspam2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspam2hd", op, join, Long_Float( sspam2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam2hd;


   procedure Add_sspam3hd( c : in out d.Criteria; sspam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspam3hd", op, join, sspam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam3hd;


   procedure Add_sspam1sp( c : in out d.Criteria; sspam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspam1sp", op, join, Long_Float( sspam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam1sp;


   procedure Add_sspam2sp( c : in out d.Criteria; sspam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspam2sp", op, join, sspam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam2sp;


   procedure Add_sspam3sp( c : in out d.Criteria; sspam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sspam3sp", op, join, sspam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam3sp;


   procedure Add_spsmp1hd( c : in out d.Criteria; spsmp1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsmp1hd", op, join, spsmp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp1hd;


   procedure Add_spsmp2hd( c : in out d.Criteria; spsmp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsmp2hd", op, join, spsmp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp2hd;


   procedure Add_spsmp3hd( c : in out d.Criteria; spsmp3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsmp3hd", op, join, spsmp3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp3hd;


   procedure Add_spsmp1sp( c : in out d.Criteria; spsmp1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsmp1sp", op, join, spsmp1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp1sp;


   procedure Add_spsmp2sp( c : in out d.Criteria; spsmp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsmp2sp", op, join, spsmp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp2sp;


   procedure Add_spsmp3sp( c : in out d.Criteria; spsmp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "spsmp3sp", op, join, spsmp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp3sp;


   procedure Add_taxam1hd( c : in out d.Criteria; taxam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxam1hd", op, join, Long_Float( taxam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam1hd;


   procedure Add_taxam2hd( c : in out d.Criteria; taxam2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxam2hd", op, join, Long_Float( taxam2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam2hd;


   procedure Add_taxam3hd( c : in out d.Criteria; taxam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxam3hd", op, join, taxam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam3hd;


   procedure Add_taxam1sp( c : in out d.Criteria; taxam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxam1sp", op, join, Long_Float( taxam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam1sp;


   procedure Add_taxam2sp( c : in out d.Criteria; taxam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxam2sp", op, join, taxam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam2sp;


   procedure Add_taxam3sp( c : in out d.Criteria; taxam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxam3sp", op, join, taxam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam3sp;


   procedure Add_taxda1hd( c : in out d.Criteria; taxda1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxda1hd", op, join, Long_Float( taxda1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda1hd;


   procedure Add_taxda2hd( c : in out d.Criteria; taxda2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxda2hd", op, join, Long_Float( taxda2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda2hd;


   procedure Add_taxda3hd( c : in out d.Criteria; taxda3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxda3hd", op, join, Long_Float( taxda3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda3hd;


   procedure Add_taxda1sp( c : in out d.Criteria; taxda1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxda1sp", op, join, Long_Float( taxda1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda1sp;


   procedure Add_taxda2sp( c : in out d.Criteria; taxda2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxda2sp", op, join, Long_Float( taxda2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda2sp;


   procedure Add_taxda3sp( c : in out d.Criteria; taxda3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxda3sp", op, join, taxda3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda3sp;


   procedure Add_taxpd1hd( c : in out d.Criteria; taxpd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxpd1hd", op, join, taxpd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd1hd;


   procedure Add_taxpd2hd( c : in out d.Criteria; taxpd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxpd2hd", op, join, taxpd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd2hd;


   procedure Add_taxpd3hd( c : in out d.Criteria; taxpd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxpd3hd", op, join, taxpd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd3hd;


   procedure Add_taxpd1sp( c : in out d.Criteria; taxpd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxpd1sp", op, join, taxpd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd1sp;


   procedure Add_taxpd2sp( c : in out d.Criteria; taxpd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxpd2sp", op, join, taxpd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd2sp;


   procedure Add_taxpd3sp( c : in out d.Criteria; taxpd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "taxpd3sp", op, join, taxpd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd3sp;


   procedure Add_to1hr1hd( c : in out d.Criteria; to1hr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to1hr1hd", op, join, Long_Float( to1hr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr1hd;


   procedure Add_to1hr2hd( c : in out d.Criteria; to1hr2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to1hr2hd", op, join, Long_Float( to1hr2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr2hd;


   procedure Add_to1hr3hd( c : in out d.Criteria; to1hr3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to1hr3hd", op, join, Long_Float( to1hr3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr3hd;


   procedure Add_to1hr1sp( c : in out d.Criteria; to1hr1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to1hr1sp", op, join, Long_Float( to1hr1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr1sp;


   procedure Add_to1hr2sp( c : in out d.Criteria; to1hr2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to1hr2sp", op, join, Long_Float( to1hr2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr2sp;


   procedure Add_to1hr3sp( c : in out d.Criteria; to1hr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to1hr3sp", op, join, to1hr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr3sp;


   procedure Add_boinu1hd( c : in out d.Criteria; boinu1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boinu1hd", op, join, Long_Float( boinu1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu1hd;


   procedure Add_boinu2hd( c : in out d.Criteria; boinu2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boinu2hd", op, join, boinu2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu2hd;


   procedure Add_boinu3hd( c : in out d.Criteria; boinu3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boinu3hd", op, join, boinu3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu3hd;


   procedure Add_boinu1sp( c : in out d.Criteria; boinu1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boinu1sp", op, join, Long_Float( boinu1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu1sp;


   procedure Add_boinu2sp( c : in out d.Criteria; boinu2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boinu2sp", op, join, boinu2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu2sp;


   procedure Add_boinu3sp( c : in out d.Criteria; boinu3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "boinu3sp", op, join, boinu3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu3sp;


   procedure Add_uincb1hd( c : in out d.Criteria; uincb1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uincb1hd", op, join, uincb1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb1hd;


   procedure Add_uincb2hd( c : in out d.Criteria; uincb2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uincb2hd", op, join, uincb2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb2hd;


   procedure Add_uincb3hd( c : in out d.Criteria; uincb3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uincb3hd", op, join, uincb3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb3hd;


   procedure Add_uincb1sp( c : in out d.Criteria; uincb1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uincb1sp", op, join, uincb1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb1sp;


   procedure Add_uincb2sp( c : in out d.Criteria; uincb2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uincb2sp", op, join, uincb2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb2sp;


   procedure Add_uincb3sp( c : in out d.Criteria; uincb3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uincb3sp", op, join, uincb3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb3sp;


   procedure Add_uded11hd( c : in out d.Criteria; uded11hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded11hd", op, join, Long_Float( uded11hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded11hd;


   procedure Add_uded12hd( c : in out d.Criteria; uded12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded12hd", op, join, uded12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded12hd;


   procedure Add_uded13hd( c : in out d.Criteria; uded13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded13hd", op, join, uded13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded13hd;


   procedure Add_uded11sp( c : in out d.Criteria; uded11sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded11sp", op, join, Long_Float( uded11sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded11sp;


   procedure Add_uded12sp( c : in out d.Criteria; uded12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded12sp", op, join, uded12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded12sp;


   procedure Add_uded13sp( c : in out d.Criteria; uded13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded13sp", op, join, uded13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded13sp;


   procedure Add_uded21hd( c : in out d.Criteria; uded21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded21hd", op, join, uded21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded21hd;


   procedure Add_uded22hd( c : in out d.Criteria; uded22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded22hd", op, join, uded22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded22hd;


   procedure Add_uded23hd( c : in out d.Criteria; uded23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded23hd", op, join, uded23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded23hd;


   procedure Add_uded21sp( c : in out d.Criteria; uded21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded21sp", op, join, uded21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded21sp;


   procedure Add_uded22sp( c : in out d.Criteria; uded22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded22sp", op, join, uded22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded22sp;


   procedure Add_uded23sp( c : in out d.Criteria; uded23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded23sp", op, join, uded23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded23sp;


   procedure Add_uded31hd( c : in out d.Criteria; uded31hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded31hd", op, join, Long_Float( uded31hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded31hd;


   procedure Add_uded32hd( c : in out d.Criteria; uded32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded32hd", op, join, uded32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded32hd;


   procedure Add_uded33hd( c : in out d.Criteria; uded33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded33hd", op, join, uded33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded33hd;


   procedure Add_uded31sp( c : in out d.Criteria; uded31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded31sp", op, join, uded31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded31sp;


   procedure Add_uded32sp( c : in out d.Criteria; uded32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded32sp", op, join, uded32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded32sp;


   procedure Add_uded33sp( c : in out d.Criteria; uded33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded33sp", op, join, uded33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded33sp;


   procedure Add_uded41hd( c : in out d.Criteria; uded41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded41hd", op, join, uded41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded41hd;


   procedure Add_uded42hd( c : in out d.Criteria; uded42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded42hd", op, join, uded42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded42hd;


   procedure Add_uded43hd( c : in out d.Criteria; uded43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded43hd", op, join, uded43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded43hd;


   procedure Add_uded41sp( c : in out d.Criteria; uded41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded41sp", op, join, uded41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded41sp;


   procedure Add_uded42sp( c : in out d.Criteria; uded42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded42sp", op, join, uded42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded42sp;


   procedure Add_uded43sp( c : in out d.Criteria; uded43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded43sp", op, join, uded43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded43sp;


   procedure Add_uded51hd( c : in out d.Criteria; uded51hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded51hd", op, join, Long_Float( uded51hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded51hd;


   procedure Add_uded52hd( c : in out d.Criteria; uded52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded52hd", op, join, uded52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded52hd;


   procedure Add_uded53hd( c : in out d.Criteria; uded53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded53hd", op, join, uded53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded53hd;


   procedure Add_uded51sp( c : in out d.Criteria; uded51sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded51sp", op, join, Long_Float( uded51sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded51sp;


   procedure Add_uded52sp( c : in out d.Criteria; uded52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded52sp", op, join, uded52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded52sp;


   procedure Add_uded53sp( c : in out d.Criteria; uded53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded53sp", op, join, uded53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded53sp;


   procedure Add_uded61hd( c : in out d.Criteria; uded61hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded61hd", op, join, uded61hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded61hd;


   procedure Add_uded62hd( c : in out d.Criteria; uded62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded62hd", op, join, uded62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded62hd;


   procedure Add_uded63hd( c : in out d.Criteria; uded63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded63hd", op, join, uded63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded63hd;


   procedure Add_uded61sp( c : in out d.Criteria; uded61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded61sp", op, join, uded61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded61sp;


   procedure Add_uded62sp( c : in out d.Criteria; uded62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded62sp", op, join, uded62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded62sp;


   procedure Add_uded63sp( c : in out d.Criteria; uded63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded63sp", op, join, uded63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded63sp;


   procedure Add_uded71hd( c : in out d.Criteria; uded71hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded71hd", op, join, uded71hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded71hd;


   procedure Add_uded72hd( c : in out d.Criteria; uded72hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded72hd", op, join, uded72hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded72hd;


   procedure Add_uded73hd( c : in out d.Criteria; uded73hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded73hd", op, join, uded73hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded73hd;


   procedure Add_uded71sp( c : in out d.Criteria; uded71sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded71sp", op, join, uded71sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded71sp;


   procedure Add_uded72sp( c : in out d.Criteria; uded72sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded72sp", op, join, uded72sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded72sp;


   procedure Add_uded73sp( c : in out d.Criteria; uded73sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded73sp", op, join, uded73sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded73sp;


   procedure Add_uded81hd( c : in out d.Criteria; uded81hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded81hd", op, join, uded81hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded81hd;


   procedure Add_uded82hd( c : in out d.Criteria; uded82hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded82hd", op, join, uded82hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded82hd;


   procedure Add_uded83hd( c : in out d.Criteria; uded83hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded83hd", op, join, uded83hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded83hd;


   procedure Add_uded81sp( c : in out d.Criteria; uded81sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded81sp", op, join, uded81sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded81sp;


   procedure Add_uded82sp( c : in out d.Criteria; uded82sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded82sp", op, join, uded82sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded82sp;


   procedure Add_uded83sp( c : in out d.Criteria; uded83sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded83sp", op, join, uded83sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded83sp;


   procedure Add_uded91hd( c : in out d.Criteria; uded91hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded91hd", op, join, Long_Float( uded91hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded91hd;


   procedure Add_uded92hd( c : in out d.Criteria; uded92hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded92hd", op, join, uded92hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded92hd;


   procedure Add_uded93hd( c : in out d.Criteria; uded93hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded93hd", op, join, uded93hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded93hd;


   procedure Add_uded91sp( c : in out d.Criteria; uded91sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded91sp", op, join, uded91sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded91sp;


   procedure Add_uded92sp( c : in out d.Criteria; uded92sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded92sp", op, join, uded92sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded92sp;


   procedure Add_uded93sp( c : in out d.Criteria; uded93sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uded93sp", op, join, uded93sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded93sp;


   procedure Add_ugros1hd( c : in out d.Criteria; ugros1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugros1hd", op, join, Long_Float( ugros1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros1hd;


   procedure Add_ugros2hd( c : in out d.Criteria; ugros2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugros2hd", op, join, Long_Float( ugros2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros2hd;


   procedure Add_ugros3hd( c : in out d.Criteria; ugros3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugros3hd", op, join, ugros3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros3hd;


   procedure Add_ugros1sp( c : in out d.Criteria; ugros1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugros1sp", op, join, Long_Float( ugros1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros1sp;


   procedure Add_ugros2sp( c : in out d.Criteria; ugros2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugros2sp", op, join, Long_Float( ugros2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros2sp;


   procedure Add_ugros3sp( c : in out d.Criteria; ugros3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugros3sp", op, join, ugros3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros3sp;


   procedure Add_ugrsp1hd( c : in out d.Criteria; ugrsp1hd : Unbounded_String; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp1hd", op, join, To_String( ugrsp1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp1hd;


   procedure Add_ugrsp1hd( c : in out d.Criteria; ugrsp1hd : String; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp1hd", op, join, ugrsp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp1hd;


   procedure Add_ugrsp2hd( c : in out d.Criteria; ugrsp2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp2hd", op, join, Long_Float( ugrsp2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp2hd;


   procedure Add_ugrsp3hd( c : in out d.Criteria; ugrsp3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp3hd", op, join, Long_Float( ugrsp3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp3hd;


   procedure Add_ugrsp1sp( c : in out d.Criteria; ugrsp1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp1sp", op, join, Long_Float( ugrsp1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp1sp;


   procedure Add_ugrsp2sp( c : in out d.Criteria; ugrsp2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp2sp", op, join, Long_Float( ugrsp2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp2sp;


   procedure Add_ugrsp3sp( c : in out d.Criteria; ugrsp3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ugrsp3sp", op, join, Long_Float( ugrsp3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp3sp;


   procedure Add_uinc11hd( c : in out d.Criteria; uinc11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc11hd", op, join, uinc11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc11hd;


   procedure Add_uinc12hd( c : in out d.Criteria; uinc12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc12hd", op, join, uinc12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc12hd;


   procedure Add_uinc13hd( c : in out d.Criteria; uinc13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc13hd", op, join, uinc13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc13hd;


   procedure Add_uinc11sp( c : in out d.Criteria; uinc11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc11sp", op, join, uinc11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc11sp;


   procedure Add_uinc12sp( c : in out d.Criteria; uinc12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc12sp", op, join, uinc12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc12sp;


   procedure Add_uinc13sp( c : in out d.Criteria; uinc13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc13sp", op, join, uinc13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc13sp;


   procedure Add_uinc21hd( c : in out d.Criteria; uinc21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc21hd", op, join, uinc21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc21hd;


   procedure Add_uinc22hd( c : in out d.Criteria; uinc22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc22hd", op, join, uinc22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc22hd;


   procedure Add_uinc23hd( c : in out d.Criteria; uinc23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc23hd", op, join, uinc23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc23hd;


   procedure Add_uinc21sp( c : in out d.Criteria; uinc21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc21sp", op, join, uinc21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc21sp;


   procedure Add_uinc22sp( c : in out d.Criteria; uinc22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc22sp", op, join, uinc22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc22sp;


   procedure Add_uinc23sp( c : in out d.Criteria; uinc23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc23sp", op, join, uinc23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc23sp;


   procedure Add_uinc31hd( c : in out d.Criteria; uinc31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc31hd", op, join, uinc31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc31hd;


   procedure Add_uinc32hd( c : in out d.Criteria; uinc32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc32hd", op, join, uinc32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc32hd;


   procedure Add_uinc33hd( c : in out d.Criteria; uinc33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc33hd", op, join, uinc33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc33hd;


   procedure Add_uinc31sp( c : in out d.Criteria; uinc31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc31sp", op, join, uinc31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc31sp;


   procedure Add_uinc32sp( c : in out d.Criteria; uinc32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc32sp", op, join, uinc32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc32sp;


   procedure Add_uinc33sp( c : in out d.Criteria; uinc33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc33sp", op, join, uinc33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc33sp;


   procedure Add_uinc41hd( c : in out d.Criteria; uinc41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc41hd", op, join, uinc41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc41hd;


   procedure Add_uinc42hd( c : in out d.Criteria; uinc42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc42hd", op, join, uinc42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc42hd;


   procedure Add_uinc43hd( c : in out d.Criteria; uinc43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc43hd", op, join, uinc43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc43hd;


   procedure Add_uinc41sp( c : in out d.Criteria; uinc41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc41sp", op, join, uinc41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc41sp;


   procedure Add_uinc42sp( c : in out d.Criteria; uinc42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc42sp", op, join, uinc42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc42sp;


   procedure Add_uinc43sp( c : in out d.Criteria; uinc43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc43sp", op, join, uinc43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc43sp;


   procedure Add_uinc51hd( c : in out d.Criteria; uinc51hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc51hd", op, join, uinc51hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc51hd;


   procedure Add_uinc52hd( c : in out d.Criteria; uinc52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc52hd", op, join, uinc52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc52hd;


   procedure Add_uinc53hd( c : in out d.Criteria; uinc53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc53hd", op, join, uinc53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc53hd;


   procedure Add_uinc51sp( c : in out d.Criteria; uinc51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc51sp", op, join, uinc51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc51sp;


   procedure Add_uinc52sp( c : in out d.Criteria; uinc52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc52sp", op, join, uinc52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc52sp;


   procedure Add_uinc53sp( c : in out d.Criteria; uinc53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc53sp", op, join, uinc53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc53sp;


   procedure Add_uinc61hd( c : in out d.Criteria; uinc61hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc61hd", op, join, uinc61hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc61hd;


   procedure Add_uinc62hd( c : in out d.Criteria; uinc62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc62hd", op, join, uinc62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc62hd;


   procedure Add_uinc63hd( c : in out d.Criteria; uinc63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc63hd", op, join, uinc63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc63hd;


   procedure Add_uinc61sp( c : in out d.Criteria; uinc61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc61sp", op, join, uinc61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc61sp;


   procedure Add_uinc62sp( c : in out d.Criteria; uinc62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc62sp", op, join, uinc62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc62sp;


   procedure Add_uinc63sp( c : in out d.Criteria; uinc63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc63sp", op, join, uinc63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc63sp;


   procedure Add_uinc71hd( c : in out d.Criteria; uinc71hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc71hd", op, join, uinc71hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc71hd;


   procedure Add_uinc72hd( c : in out d.Criteria; uinc72hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc72hd", op, join, uinc72hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc72hd;


   procedure Add_uinc73hd( c : in out d.Criteria; uinc73hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc73hd", op, join, uinc73hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc73hd;


   procedure Add_uinc71sp( c : in out d.Criteria; uinc71sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc71sp", op, join, uinc71sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc71sp;


   procedure Add_uinc72sp( c : in out d.Criteria; uinc72sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc72sp", op, join, uinc72sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc72sp;


   procedure Add_uinc73sp( c : in out d.Criteria; uinc73sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uinc73sp", op, join, uinc73sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc73sp;


   procedure Add_umile1hd( c : in out d.Criteria; umile1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umile1hd", op, join, Long_Float( umile1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile1hd;


   procedure Add_umile2hd( c : in out d.Criteria; umile2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umile2hd", op, join, umile2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile2hd;


   procedure Add_umile3hd( c : in out d.Criteria; umile3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umile3hd", op, join, umile3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile3hd;


   procedure Add_umile1sp( c : in out d.Criteria; umile1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umile1sp", op, join, Long_Float( umile1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile1sp;


   procedure Add_umile2sp( c : in out d.Criteria; umile2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umile2sp", op, join, umile2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile2sp;


   procedure Add_umile3sp( c : in out d.Criteria; umile3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umile3sp", op, join, umile3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile3sp;


   procedure Add_umot1hd( c : in out d.Criteria; umot1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umot1hd", op, join, Long_Float( umot1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot1hd;


   procedure Add_umot2hd( c : in out d.Criteria; umot2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umot2hd", op, join, umot2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot2hd;


   procedure Add_umot3hd( c : in out d.Criteria; umot3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umot3hd", op, join, umot3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot3hd;


   procedure Add_umot1sp( c : in out d.Criteria; umot1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umot1sp", op, join, Long_Float( umot1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot1sp;


   procedure Add_umot2sp( c : in out d.Criteria; umot2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umot2sp", op, join, umot2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot2sp;


   procedure Add_umot3sp( c : in out d.Criteria; umot3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "umot3sp", op, join, umot3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot3sp;


   procedure Add_unett1hd( c : in out d.Criteria; unett1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unett1hd", op, join, Long_Float( unett1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett1hd;


   procedure Add_unett2hd( c : in out d.Criteria; unett2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unett2hd", op, join, Long_Float( unett2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett2hd;


   procedure Add_unett3hd( c : in out d.Criteria; unett3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unett3hd", op, join, unett3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett3hd;


   procedure Add_unett1sp( c : in out d.Criteria; unett1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unett1sp", op, join, Long_Float( unett1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett1sp;


   procedure Add_unett2sp( c : in out d.Criteria; unett2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unett2sp", op, join, Long_Float( unett2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett2sp;


   procedure Add_unett3sp( c : in out d.Criteria; unett3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "unett3sp", op, join, unett3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett3sp;


   procedure Add_uoth11hd( c : in out d.Criteria; uoth11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth11hd", op, join, uoth11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth11hd;


   procedure Add_uoth12hd( c : in out d.Criteria; uoth12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth12hd", op, join, uoth12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth12hd;


   procedure Add_uoth13hd( c : in out d.Criteria; uoth13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth13hd", op, join, uoth13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth13hd;


   procedure Add_uoth11sp( c : in out d.Criteria; uoth11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth11sp", op, join, uoth11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth11sp;


   procedure Add_uoth12sp( c : in out d.Criteria; uoth12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth12sp", op, join, uoth12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth12sp;


   procedure Add_uoth13sp( c : in out d.Criteria; uoth13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth13sp", op, join, uoth13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth13sp;


   procedure Add_uoth21hd( c : in out d.Criteria; uoth21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth21hd", op, join, uoth21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth21hd;


   procedure Add_uoth22hd( c : in out d.Criteria; uoth22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth22hd", op, join, uoth22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth22hd;


   procedure Add_uoth23hd( c : in out d.Criteria; uoth23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth23hd", op, join, uoth23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth23hd;


   procedure Add_uoth21sp( c : in out d.Criteria; uoth21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth21sp", op, join, uoth21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth21sp;


   procedure Add_uoth22sp( c : in out d.Criteria; uoth22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth22sp", op, join, uoth22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth22sp;


   procedure Add_uoth23sp( c : in out d.Criteria; uoth23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth23sp", op, join, uoth23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth23sp;


   procedure Add_uoth31hd( c : in out d.Criteria; uoth31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth31hd", op, join, uoth31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth31hd;


   procedure Add_uoth32hd( c : in out d.Criteria; uoth32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth32hd", op, join, uoth32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth32hd;


   procedure Add_uoth33hd( c : in out d.Criteria; uoth33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth33hd", op, join, uoth33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth33hd;


   procedure Add_uoth31sp( c : in out d.Criteria; uoth31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth31sp", op, join, uoth31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth31sp;


   procedure Add_uoth32sp( c : in out d.Criteria; uoth32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth32sp", op, join, uoth32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth32sp;


   procedure Add_uoth33sp( c : in out d.Criteria; uoth33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth33sp", op, join, uoth33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth33sp;


   procedure Add_uoth41hd( c : in out d.Criteria; uoth41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth41hd", op, join, uoth41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth41hd;


   procedure Add_uoth42hd( c : in out d.Criteria; uoth42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth42hd", op, join, uoth42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth42hd;


   procedure Add_uoth43hd( c : in out d.Criteria; uoth43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth43hd", op, join, uoth43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth43hd;


   procedure Add_uoth41sp( c : in out d.Criteria; uoth41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth41sp", op, join, uoth41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth41sp;


   procedure Add_uoth42sp( c : in out d.Criteria; uoth42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth42sp", op, join, uoth42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth42sp;


   procedure Add_uoth43sp( c : in out d.Criteria; uoth43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth43sp", op, join, uoth43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth43sp;


   procedure Add_uoth51hd( c : in out d.Criteria; uoth51hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth51hd", op, join, uoth51hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth51hd;


   procedure Add_uoth52hd( c : in out d.Criteria; uoth52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth52hd", op, join, uoth52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth52hd;


   procedure Add_uoth53hd( c : in out d.Criteria; uoth53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth53hd", op, join, uoth53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth53hd;


   procedure Add_uoth51sp( c : in out d.Criteria; uoth51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth51sp", op, join, uoth51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth51sp;


   procedure Add_uoth52sp( c : in out d.Criteria; uoth52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth52sp", op, join, uoth52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth52sp;


   procedure Add_uoth53sp( c : in out d.Criteria; uoth53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth53sp", op, join, uoth53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth53sp;


   procedure Add_uoth61hd( c : in out d.Criteria; uoth61hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth61hd", op, join, uoth61hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth61hd;


   procedure Add_uoth62hd( c : in out d.Criteria; uoth62hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth62hd", op, join, uoth62hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth62hd;


   procedure Add_uoth63hd( c : in out d.Criteria; uoth63hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth63hd", op, join, uoth63hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth63hd;


   procedure Add_uoth61sp( c : in out d.Criteria; uoth61sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth61sp", op, join, uoth61sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth61sp;


   procedure Add_uoth62sp( c : in out d.Criteria; uoth62sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth62sp", op, join, uoth62sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth62sp;


   procedure Add_uoth63sp( c : in out d.Criteria; uoth63sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth63sp", op, join, uoth63sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth63sp;


   procedure Add_uoth71hd( c : in out d.Criteria; uoth71hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth71hd", op, join, uoth71hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth71hd;


   procedure Add_uoth72hd( c : in out d.Criteria; uoth72hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth72hd", op, join, uoth72hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth72hd;


   procedure Add_uoth73hd( c : in out d.Criteria; uoth73hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth73hd", op, join, uoth73hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth73hd;


   procedure Add_uoth71sp( c : in out d.Criteria; uoth71sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth71sp", op, join, uoth71sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth71sp;


   procedure Add_uoth72sp( c : in out d.Criteria; uoth72sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth72sp", op, join, uoth72sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth72sp;


   procedure Add_uoth73sp( c : in out d.Criteria; uoth73sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth73sp", op, join, uoth73sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth73sp;


   procedure Add_uoth81hd( c : in out d.Criteria; uoth81hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth81hd", op, join, uoth81hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth81hd;


   procedure Add_uoth82hd( c : in out d.Criteria; uoth82hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth82hd", op, join, uoth82hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth82hd;


   procedure Add_uoth83hd( c : in out d.Criteria; uoth83hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth83hd", op, join, uoth83hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth83hd;


   procedure Add_uoth81sp( c : in out d.Criteria; uoth81sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth81sp", op, join, uoth81sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth81sp;


   procedure Add_uoth82sp( c : in out d.Criteria; uoth82sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth82sp", op, join, uoth82sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth82sp;


   procedure Add_uoth83sp( c : in out d.Criteria; uoth83sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth83sp", op, join, uoth83sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth83sp;


   procedure Add_uoth91hd( c : in out d.Criteria; uoth91hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth91hd", op, join, uoth91hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth91hd;


   procedure Add_uoth92hd( c : in out d.Criteria; uoth92hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth92hd", op, join, uoth92hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth92hd;


   procedure Add_uoth93hd( c : in out d.Criteria; uoth93hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth93hd", op, join, uoth93hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth93hd;


   procedure Add_uoth91sp( c : in out d.Criteria; uoth91sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth91sp", op, join, uoth91sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth91sp;


   procedure Add_uoth92sp( c : in out d.Criteria; uoth92sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth92sp", op, join, uoth92sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth92sp;


   procedure Add_uoth93sp( c : in out d.Criteria; uoth93sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uoth93sp", op, join, uoth93sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth93sp;


   procedure Add_uot101hd( c : in out d.Criteria; uot101hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uot101hd", op, join, uot101hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot101hd;


   procedure Add_uot102hd( c : in out d.Criteria; uot102hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uot102hd", op, join, uot102hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot102hd;


   procedure Add_uot103hd( c : in out d.Criteria; uot103hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uot103hd", op, join, uot103hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot103hd;


   procedure Add_uot101sp( c : in out d.Criteria; uot101sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uot101sp", op, join, uot101sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot101sp;


   procedure Add_uot102sp( c : in out d.Criteria; uot102sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uot102sp", op, join, uot102sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot102sp;


   procedure Add_uot103sp( c : in out d.Criteria; uot103sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uot103sp", op, join, uot103sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot103sp;


   procedure Add_uotht1hd( c : in out d.Criteria; uotht1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uotht1hd", op, join, Long_Float( uotht1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht1hd;


   procedure Add_uotht2hd( c : in out d.Criteria; uotht2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uotht2hd", op, join, uotht2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht2hd;


   procedure Add_uotht3hd( c : in out d.Criteria; uotht3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uotht3hd", op, join, uotht3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht3hd;


   procedure Add_uotht1sp( c : in out d.Criteria; uotht1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uotht1sp", op, join, uotht1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht1sp;


   procedure Add_uotht2sp( c : in out d.Criteria; uotht2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uotht2sp", op, join, uotht2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht2sp;


   procedure Add_uotht3sp( c : in out d.Criteria; uotht3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uotht3sp", op, join, uotht3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht3sp;


   procedure Add_uothr1hd( c : in out d.Criteria; uothr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uothr1hd", op, join, Long_Float( uothr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr1hd;


   procedure Add_uothr2hd( c : in out d.Criteria; uothr2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uothr2hd", op, join, Long_Float( uothr2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr2hd;


   procedure Add_uothr3hd( c : in out d.Criteria; uothr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uothr3hd", op, join, uothr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr3hd;


   procedure Add_uothr1sp( c : in out d.Criteria; uothr1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uothr1sp", op, join, Long_Float( uothr1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr1sp;


   procedure Add_uothr2sp( c : in out d.Criteria; uothr2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uothr2sp", op, join, Long_Float( uothr2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr2sp;


   procedure Add_uothr3sp( c : in out d.Criteria; uothr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uothr3sp", op, join, uothr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr3sp;


   procedure Add_upay1hd( c : in out d.Criteria; upay1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upay1hd", op, join, upay1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay1hd;


   procedure Add_upay2hd( c : in out d.Criteria; upay2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upay2hd", op, join, upay2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay2hd;


   procedure Add_upay3hd( c : in out d.Criteria; upay3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upay3hd", op, join, upay3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay3hd;


   procedure Add_upay1sp( c : in out d.Criteria; upay1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upay1sp", op, join, upay1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay1sp;


   procedure Add_upay2sp( c : in out d.Criteria; upay2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upay2sp", op, join, upay2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay2sp;


   procedure Add_upay3sp( c : in out d.Criteria; upay3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "upay3sp", op, join, upay3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay3sp;


   procedure Add_usapa1hd( c : in out d.Criteria; usapa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usapa1hd", op, join, usapa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa1hd;


   procedure Add_usapa2hd( c : in out d.Criteria; usapa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usapa2hd", op, join, usapa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa2hd;


   procedure Add_usapa3hd( c : in out d.Criteria; usapa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usapa3hd", op, join, usapa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa3hd;


   procedure Add_usapa1sp( c : in out d.Criteria; usapa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usapa1sp", op, join, usapa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa1sp;


   procedure Add_usapa2sp( c : in out d.Criteria; usapa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usapa2sp", op, join, usapa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa2sp;


   procedure Add_usapa3sp( c : in out d.Criteria; usapa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usapa3sp", op, join, usapa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa3sp;


   procedure Add_uspam1hd( c : in out d.Criteria; uspam1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspam1hd", op, join, Long_Float( uspam1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam1hd;


   procedure Add_uspam2hd( c : in out d.Criteria; uspam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspam2hd", op, join, uspam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam2hd;


   procedure Add_uspam3hd( c : in out d.Criteria; uspam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspam3hd", op, join, uspam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam3hd;


   procedure Add_uspam1sp( c : in out d.Criteria; uspam1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspam1sp", op, join, Long_Float( uspam1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam1sp;


   procedure Add_uspam2sp( c : in out d.Criteria; uspam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspam2sp", op, join, uspam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam2sp;


   procedure Add_uspam3sp( c : in out d.Criteria; uspam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspam3sp", op, join, uspam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam3sp;


   procedure Add_uspra1hd( c : in out d.Criteria; uspra1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspra1hd", op, join, uspra1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra1hd;


   procedure Add_uspra2hd( c : in out d.Criteria; uspra2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspra2hd", op, join, uspra2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra2hd;


   procedure Add_uspra3hd( c : in out d.Criteria; uspra3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspra3hd", op, join, uspra3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra3hd;


   procedure Add_uspra1sp( c : in out d.Criteria; uspra1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspra1sp", op, join, uspra1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra1sp;


   procedure Add_uspra2sp( c : in out d.Criteria; uspra2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspra2sp", op, join, uspra2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra2sp;


   procedure Add_uspra3sp( c : in out d.Criteria; uspra3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uspra3sp", op, join, uspra3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra3sp;


   procedure Add_uppam1hd( c : in out d.Criteria; uppam1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uppam1hd", op, join, uppam1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam1hd;


   procedure Add_uppam2hd( c : in out d.Criteria; uppam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uppam2hd", op, join, uppam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam2hd;


   procedure Add_uppam3hd( c : in out d.Criteria; uppam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uppam3hd", op, join, uppam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam3hd;


   procedure Add_uppam1sp( c : in out d.Criteria; uppam1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uppam1sp", op, join, uppam1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam1sp;


   procedure Add_uppam2sp( c : in out d.Criteria; uppam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uppam2sp", op, join, uppam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam2sp;


   procedure Add_uppam3sp( c : in out d.Criteria; uppam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "uppam3sp", op, join, uppam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam3sp;


   procedure Add_usspa1hd( c : in out d.Criteria; usspa1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usspa1hd", op, join, Long_Float( usspa1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa1hd;


   procedure Add_usspa2hd( c : in out d.Criteria; usspa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usspa2hd", op, join, usspa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa2hd;


   procedure Add_usspa3hd( c : in out d.Criteria; usspa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usspa3hd", op, join, usspa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa3hd;


   procedure Add_usspa1sp( c : in out d.Criteria; usspa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usspa1sp", op, join, usspa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa1sp;


   procedure Add_usspa2sp( c : in out d.Criteria; usspa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usspa2sp", op, join, usspa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa2sp;


   procedure Add_usspa3sp( c : in out d.Criteria; usspa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "usspa3sp", op, join, usspa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa3sp;


   procedure Add_to2hr1hd( c : in out d.Criteria; to2hr1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to2hr1hd", op, join, Long_Float( to2hr1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr1hd;


   procedure Add_to2hr2hd( c : in out d.Criteria; to2hr2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to2hr2hd", op, join, Long_Float( to2hr2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr2hd;


   procedure Add_to2hr3hd( c : in out d.Criteria; to2hr3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to2hr3hd", op, join, to2hr3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr3hd;


   procedure Add_to2hr1sp( c : in out d.Criteria; to2hr1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to2hr1sp", op, join, Long_Float( to2hr1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr1sp;


   procedure Add_to2hr2sp( c : in out d.Criteria; to2hr2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to2hr2sp", op, join, Long_Float( to2hr2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr2sp;


   procedure Add_to2hr3sp( c : in out d.Criteria; to2hr3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "to2hr3sp", op, join, to2hr3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr3sp;


   procedure Add_utaxa1hd( c : in out d.Criteria; utaxa1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "utaxa1hd", op, join, Long_Float( utaxa1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa1hd;


   procedure Add_utaxa2hd( c : in out d.Criteria; utaxa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "utaxa2hd", op, join, utaxa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa2hd;


   procedure Add_utaxa3hd( c : in out d.Criteria; utaxa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "utaxa3hd", op, join, utaxa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa3hd;


   procedure Add_utaxa1sp( c : in out d.Criteria; utaxa1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "utaxa1sp", op, join, Long_Float( utaxa1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa1sp;


   procedure Add_utaxa2sp( c : in out d.Criteria; utaxa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "utaxa2sp", op, join, utaxa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa2sp;


   procedure Add_utaxa3sp( c : in out d.Criteria; utaxa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "utaxa3sp", op, join, utaxa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa3sp;


   procedure Add_vcamt1hd( c : in out d.Criteria; vcamt1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcamt1hd", op, join, Long_Float( vcamt1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt1hd;


   procedure Add_vcamt2hd( c : in out d.Criteria; vcamt2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcamt2hd", op, join, vcamt2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt2hd;


   procedure Add_vcamt3hd( c : in out d.Criteria; vcamt3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcamt3hd", op, join, vcamt3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt3hd;


   procedure Add_vcamt1sp( c : in out d.Criteria; vcamt1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcamt1sp", op, join, Long_Float( vcamt1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt1sp;


   procedure Add_vcamt2sp( c : in out d.Criteria; vcamt2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcamt2sp", op, join, vcamt2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt2sp;


   procedure Add_vcamt3sp( c : in out d.Criteria; vcamt3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcamt3sp", op, join, vcamt3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt3sp;


   procedure Add_vcpd1hd( c : in out d.Criteria; vcpd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcpd1hd", op, join, vcpd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd1hd;


   procedure Add_vcpd2hd( c : in out d.Criteria; vcpd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcpd2hd", op, join, vcpd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd2hd;


   procedure Add_vcpd3hd( c : in out d.Criteria; vcpd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcpd3hd", op, join, vcpd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd3hd;


   procedure Add_vcpd1sp( c : in out d.Criteria; vcpd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcpd1sp", op, join, vcpd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd1sp;


   procedure Add_vcpd2sp( c : in out d.Criteria; vcpd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcpd2sp", op, join, vcpd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd2sp;


   procedure Add_vcpd3sp( c : in out d.Criteria; vcpd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcpd3sp", op, join, vcpd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd3sp;


   procedure Add_vcsac1hd( c : in out d.Criteria; vcsac1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcsac1hd", op, join, vcsac1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac1hd;


   procedure Add_vcsac2hd( c : in out d.Criteria; vcsac2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcsac2hd", op, join, vcsac2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac2hd;


   procedure Add_vcsac3hd( c : in out d.Criteria; vcsac3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcsac3hd", op, join, vcsac3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac3hd;


   procedure Add_vcsac1sp( c : in out d.Criteria; vcsac1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcsac1sp", op, join, vcsac1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac1sp;


   procedure Add_vcsac2sp( c : in out d.Criteria; vcsac2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcsac2sp", op, join, vcsac2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac2sp;


   procedure Add_vcsac3sp( c : in out d.Criteria; vcsac3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcsac3sp", op, join, vcsac3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac3sp;


   procedure Add_vcuam1hd( c : in out d.Criteria; vcuam1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcuam1hd", op, join, vcuam1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam1hd;


   procedure Add_vcuam2hd( c : in out d.Criteria; vcuam2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcuam2hd", op, join, vcuam2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam2hd;


   procedure Add_vcuam3hd( c : in out d.Criteria; vcuam3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcuam3hd", op, join, vcuam3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam3hd;


   procedure Add_vcuam1sp( c : in out d.Criteria; vcuam1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcuam1sp", op, join, vcuam1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam1sp;


   procedure Add_vcuam2sp( c : in out d.Criteria; vcuam2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcuam2sp", op, join, vcuam2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam2sp;


   procedure Add_vcuam3sp( c : in out d.Criteria; vcuam3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcuam3sp", op, join, vcuam3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam3sp;


   procedure Add_vcupd1hd( c : in out d.Criteria; vcupd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcupd1hd", op, join, vcupd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd1hd;


   procedure Add_vcupd2hd( c : in out d.Criteria; vcupd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcupd2hd", op, join, vcupd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd2hd;


   procedure Add_vcupd3hd( c : in out d.Criteria; vcupd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcupd3hd", op, join, vcupd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd3hd;


   procedure Add_vcupd1sp( c : in out d.Criteria; vcupd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcupd1sp", op, join, vcupd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd1sp;


   procedure Add_vcupd2sp( c : in out d.Criteria; vcupd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcupd2sp", op, join, vcupd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd2sp;


   procedure Add_vcupd3sp( c : in out d.Criteria; vcupd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcupd3sp", op, join, vcupd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd3sp;


   procedure Add_vcusu1hd( c : in out d.Criteria; vcusu1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcusu1hd", op, join, vcusu1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu1hd;


   procedure Add_vcusu2hd( c : in out d.Criteria; vcusu2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcusu2hd", op, join, vcusu2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu2hd;


   procedure Add_vcusu3hd( c : in out d.Criteria; vcusu3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcusu3hd", op, join, vcusu3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu3hd;


   procedure Add_vcusu1sp( c : in out d.Criteria; vcusu1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcusu1sp", op, join, vcusu1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu1sp;


   procedure Add_vcusu2sp( c : in out d.Criteria; vcusu2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcusu2sp", op, join, vcusu2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu2sp;


   procedure Add_vcusu3sp( c : in out d.Criteria; vcusu3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "vcusu3sp", op, join, vcusu3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu3sp;


   procedure Add_nou011hd( c : in out d.Criteria; nou011hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou011hd", op, join, nou011hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou011hd;


   procedure Add_nou012hd( c : in out d.Criteria; nou012hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou012hd", op, join, nou012hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou012hd;


   procedure Add_nou013hd( c : in out d.Criteria; nou013hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou013hd", op, join, nou013hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou013hd;


   procedure Add_nou011sp( c : in out d.Criteria; nou011sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou011sp", op, join, nou011sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou011sp;


   procedure Add_nou012sp( c : in out d.Criteria; nou012sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou012sp", op, join, nou012sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou012sp;


   procedure Add_nou013sp( c : in out d.Criteria; nou013sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou013sp", op, join, nou013sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou013sp;


   procedure Add_nou021hd( c : in out d.Criteria; nou021hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou021hd", op, join, nou021hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou021hd;


   procedure Add_nou022hd( c : in out d.Criteria; nou022hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou022hd", op, join, nou022hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou022hd;


   procedure Add_nou023hd( c : in out d.Criteria; nou023hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou023hd", op, join, nou023hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou023hd;


   procedure Add_nou021sp( c : in out d.Criteria; nou021sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou021sp", op, join, nou021sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou021sp;


   procedure Add_nou022sp( c : in out d.Criteria; nou022sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou022sp", op, join, nou022sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou022sp;


   procedure Add_nou023sp( c : in out d.Criteria; nou023sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou023sp", op, join, nou023sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou023sp;


   procedure Add_nou031hd( c : in out d.Criteria; nou031hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou031hd", op, join, nou031hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou031hd;


   procedure Add_nou032hd( c : in out d.Criteria; nou032hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou032hd", op, join, nou032hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou032hd;


   procedure Add_nou033hd( c : in out d.Criteria; nou033hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou033hd", op, join, nou033hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou033hd;


   procedure Add_nou031sp( c : in out d.Criteria; nou031sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou031sp", op, join, nou031sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou031sp;


   procedure Add_nou032sp( c : in out d.Criteria; nou032sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou032sp", op, join, nou032sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou032sp;


   procedure Add_nou033sp( c : in out d.Criteria; nou033sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou033sp", op, join, nou033sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou033sp;


   procedure Add_nou041hd( c : in out d.Criteria; nou041hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou041hd", op, join, nou041hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou041hd;


   procedure Add_nou042hd( c : in out d.Criteria; nou042hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou042hd", op, join, nou042hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou042hd;


   procedure Add_nou043hd( c : in out d.Criteria; nou043hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou043hd", op, join, nou043hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou043hd;


   procedure Add_nou041sp( c : in out d.Criteria; nou041sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou041sp", op, join, nou041sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou041sp;


   procedure Add_nou042sp( c : in out d.Criteria; nou042sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou042sp", op, join, nou042sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou042sp;


   procedure Add_nou043sp( c : in out d.Criteria; nou043sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou043sp", op, join, nou043sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou043sp;


   procedure Add_nou051hd( c : in out d.Criteria; nou051hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou051hd", op, join, nou051hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou051hd;


   procedure Add_nou052hd( c : in out d.Criteria; nou052hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou052hd", op, join, nou052hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou052hd;


   procedure Add_nou053hd( c : in out d.Criteria; nou053hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou053hd", op, join, nou053hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou053hd;


   procedure Add_nou051sp( c : in out d.Criteria; nou051sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou051sp", op, join, nou051sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou051sp;


   procedure Add_nou052sp( c : in out d.Criteria; nou052sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou052sp", op, join, nou052sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou052sp;


   procedure Add_nou053sp( c : in out d.Criteria; nou053sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou053sp", op, join, nou053sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou053sp;


   procedure Add_nou061hd( c : in out d.Criteria; nou061hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou061hd", op, join, nou061hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou061hd;


   procedure Add_nou062hd( c : in out d.Criteria; nou062hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou062hd", op, join, nou062hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou062hd;


   procedure Add_nou063hd( c : in out d.Criteria; nou063hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou063hd", op, join, nou063hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou063hd;


   procedure Add_nou061sp( c : in out d.Criteria; nou061sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou061sp", op, join, nou061sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou061sp;


   procedure Add_nou062sp( c : in out d.Criteria; nou062sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou062sp", op, join, nou062sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou062sp;


   procedure Add_nou063sp( c : in out d.Criteria; nou063sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou063sp", op, join, nou063sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou063sp;


   procedure Add_nou071hd( c : in out d.Criteria; nou071hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou071hd", op, join, nou071hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou071hd;


   procedure Add_nou072hd( c : in out d.Criteria; nou072hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou072hd", op, join, nou072hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou072hd;


   procedure Add_nou073hd( c : in out d.Criteria; nou073hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou073hd", op, join, nou073hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou073hd;


   procedure Add_nou071sp( c : in out d.Criteria; nou071sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou071sp", op, join, nou071sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou071sp;


   procedure Add_nou072sp( c : in out d.Criteria; nou072sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou072sp", op, join, nou072sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou072sp;


   procedure Add_nou073sp( c : in out d.Criteria; nou073sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou073sp", op, join, nou073sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou073sp;


   procedure Add_nou081hd( c : in out d.Criteria; nou081hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou081hd", op, join, nou081hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou081hd;


   procedure Add_nou082hd( c : in out d.Criteria; nou082hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou082hd", op, join, nou082hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou082hd;


   procedure Add_nou083hd( c : in out d.Criteria; nou083hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou083hd", op, join, nou083hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou083hd;


   procedure Add_nou081sp( c : in out d.Criteria; nou081sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou081sp", op, join, nou081sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou081sp;


   procedure Add_nou082sp( c : in out d.Criteria; nou082sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou082sp", op, join, nou082sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou082sp;


   procedure Add_nou083sp( c : in out d.Criteria; nou083sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou083sp", op, join, nou083sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou083sp;


   procedure Add_nou091hd( c : in out d.Criteria; nou091hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou091hd", op, join, nou091hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou091hd;


   procedure Add_nou092hd( c : in out d.Criteria; nou092hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou092hd", op, join, nou092hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou092hd;


   procedure Add_nou093hd( c : in out d.Criteria; nou093hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou093hd", op, join, nou093hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou093hd;


   procedure Add_nou091sp( c : in out d.Criteria; nou091sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou091sp", op, join, nou091sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou091sp;


   procedure Add_nou092sp( c : in out d.Criteria; nou092sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou092sp", op, join, nou092sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou092sp;


   procedure Add_nou093sp( c : in out d.Criteria; nou093sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou093sp", op, join, nou093sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou093sp;


   procedure Add_nou101hd( c : in out d.Criteria; nou101hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou101hd", op, join, nou101hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou101hd;


   procedure Add_nou102hd( c : in out d.Criteria; nou102hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou102hd", op, join, nou102hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou102hd;


   procedure Add_nou103hd( c : in out d.Criteria; nou103hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou103hd", op, join, nou103hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou103hd;


   procedure Add_nou101sp( c : in out d.Criteria; nou101sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou101sp", op, join, nou101sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou101sp;


   procedure Add_nou102sp( c : in out d.Criteria; nou102sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou102sp", op, join, nou102sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou102sp;


   procedure Add_nou103sp( c : in out d.Criteria; nou103sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou103sp", op, join, nou103sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou103sp;


   procedure Add_nou111hd( c : in out d.Criteria; nou111hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou111hd", op, join, nou111hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou111hd;


   procedure Add_nou112hd( c : in out d.Criteria; nou112hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou112hd", op, join, nou112hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou112hd;


   procedure Add_nou113hd( c : in out d.Criteria; nou113hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou113hd", op, join, nou113hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou113hd;


   procedure Add_nou111sp( c : in out d.Criteria; nou111sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou111sp", op, join, nou111sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou111sp;


   procedure Add_nou112sp( c : in out d.Criteria; nou112sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou112sp", op, join, nou112sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou112sp;


   procedure Add_nou113sp( c : in out d.Criteria; nou113sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou113sp", op, join, nou113sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou113sp;


   procedure Add_nou121hd( c : in out d.Criteria; nou121hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou121hd", op, join, nou121hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou121hd;


   procedure Add_nou122hd( c : in out d.Criteria; nou122hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou122hd", op, join, nou122hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou122hd;


   procedure Add_nou123hd( c : in out d.Criteria; nou123hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou123hd", op, join, nou123hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou123hd;


   procedure Add_nou121sp( c : in out d.Criteria; nou121sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou121sp", op, join, nou121sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou121sp;


   procedure Add_nou122sp( c : in out d.Criteria; nou122sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou122sp", op, join, nou122sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou122sp;


   procedure Add_nou123sp( c : in out d.Criteria; nou123sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou123sp", op, join, nou123sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou123sp;


   procedure Add_nou131hd( c : in out d.Criteria; nou131hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou131hd", op, join, nou131hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou131hd;


   procedure Add_nou132hd( c : in out d.Criteria; nou132hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou132hd", op, join, nou132hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou132hd;


   procedure Add_nou133hd( c : in out d.Criteria; nou133hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou133hd", op, join, nou133hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou133hd;


   procedure Add_nou131sp( c : in out d.Criteria; nou131sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou131sp", op, join, nou131sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou131sp;


   procedure Add_nou132sp( c : in out d.Criteria; nou132sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou132sp", op, join, nou132sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou132sp;


   procedure Add_nou133sp( c : in out d.Criteria; nou133sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou133sp", op, join, nou133sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou133sp;


   procedure Add_nou141hd( c : in out d.Criteria; nou141hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou141hd", op, join, nou141hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou141hd;


   procedure Add_nou142hd( c : in out d.Criteria; nou142hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou142hd", op, join, nou142hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou142hd;


   procedure Add_nou143hd( c : in out d.Criteria; nou143hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou143hd", op, join, nou143hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou143hd;


   procedure Add_nou141sp( c : in out d.Criteria; nou141sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou141sp", op, join, nou141sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou141sp;


   procedure Add_nou142sp( c : in out d.Criteria; nou142sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou142sp", op, join, nou142sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou142sp;


   procedure Add_nou143sp( c : in out d.Criteria; nou143sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nou143sp", op, join, nou143sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou143sp;


   procedure Add_worka1hd( c : in out d.Criteria; worka1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worka1hd", op, join, worka1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka1hd;


   procedure Add_worka2hd( c : in out d.Criteria; worka2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worka2hd", op, join, worka2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka2hd;


   procedure Add_worka3hd( c : in out d.Criteria; worka3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worka3hd", op, join, worka3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka3hd;


   procedure Add_worka1sp( c : in out d.Criteria; worka1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worka1sp", op, join, worka1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka1sp;


   procedure Add_worka2sp( c : in out d.Criteria; worka2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worka2sp", op, join, worka2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka2sp;


   procedure Add_worka3sp( c : in out d.Criteria; worka3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worka3sp", op, join, worka3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka3sp;


   procedure Add_workm1hd( c : in out d.Criteria; workm1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workm1hd", op, join, workm1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm1hd;


   procedure Add_workm2hd( c : in out d.Criteria; workm2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workm2hd", op, join, workm2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm2hd;


   procedure Add_workm3hd( c : in out d.Criteria; workm3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workm3hd", op, join, workm3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm3hd;


   procedure Add_workm1sp( c : in out d.Criteria; workm1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workm1sp", op, join, workm1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm1sp;


   procedure Add_workm2sp( c : in out d.Criteria; workm2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workm2sp", op, join, workm2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm2sp;


   procedure Add_workm3sp( c : in out d.Criteria; workm3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "workm3sp", op, join, workm3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm3sp;


   procedure Add_worky1hd( c : in out d.Criteria; worky1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worky1hd", op, join, worky1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky1hd;


   procedure Add_worky2hd( c : in out d.Criteria; worky2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worky2hd", op, join, worky2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky2hd;


   procedure Add_worky3hd( c : in out d.Criteria; worky3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worky3hd", op, join, worky3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky3hd;


   procedure Add_worky1sp( c : in out d.Criteria; worky1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worky1sp", op, join, worky1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky1sp;


   procedure Add_worky2sp( c : in out d.Criteria; worky2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worky2sp", op, join, worky2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky2sp;


   procedure Add_worky3sp( c : in out d.Criteria; worky3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "worky3sp", op, join, worky3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky3sp;


   procedure Add_yjchg1hd( c : in out d.Criteria; yjchg1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjchg1hd", op, join, yjchg1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg1hd;


   procedure Add_yjchg2hd( c : in out d.Criteria; yjchg2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjchg2hd", op, join, yjchg2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg2hd;


   procedure Add_yjchg3hd( c : in out d.Criteria; yjchg3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjchg3hd", op, join, yjchg3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg3hd;


   procedure Add_yjchg1sp( c : in out d.Criteria; yjchg1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjchg1sp", op, join, yjchg1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg1sp;


   procedure Add_yjchg2sp( c : in out d.Criteria; yjchg2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjchg2sp", op, join, yjchg2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg2sp;


   procedure Add_yjchg3sp( c : in out d.Criteria; yjchg3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yjchg3sp", op, join, yjchg3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg3sp;


   procedure Add_mp1hd( c : in out d.Criteria; mp1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mp1hd", op, join, Long_Float( mp1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp1hd;


   procedure Add_mp2hd( c : in out d.Criteria; mp2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mp2hd", op, join, Long_Float( mp2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp2hd;


   procedure Add_mp3hd( c : in out d.Criteria; mp3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mp3hd", op, join, Long_Float( mp3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp3hd;


   procedure Add_mp1sp( c : in out d.Criteria; mp1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mp1sp", op, join, Long_Float( mp1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp1sp;


   procedure Add_mp2sp( c : in out d.Criteria; mp2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mp2sp", op, join, Long_Float( mp2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp2sp;


   procedure Add_mp3sp( c : in out d.Criteria; mp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mp3sp", op, join, mp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp3sp;


   procedure Add_mrar11hd( c : in out d.Criteria; mrar11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar11hd", op, join, mrar11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar11hd;


   procedure Add_mrar12hd( c : in out d.Criteria; mrar12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar12hd", op, join, mrar12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar12hd;


   procedure Add_mrar13hd( c : in out d.Criteria; mrar13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar13hd", op, join, mrar13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar13hd;


   procedure Add_mrar11sp( c : in out d.Criteria; mrar11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar11sp", op, join, mrar11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar11sp;


   procedure Add_mrar12sp( c : in out d.Criteria; mrar12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar12sp", op, join, mrar12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar12sp;


   procedure Add_mrar13sp( c : in out d.Criteria; mrar13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar13sp", op, join, mrar13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar13sp;


   procedure Add_mrar21hd( c : in out d.Criteria; mrar21hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar21hd", op, join, mrar21hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar21hd;


   procedure Add_mrar22hd( c : in out d.Criteria; mrar22hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar22hd", op, join, mrar22hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar22hd;


   procedure Add_mrar23hd( c : in out d.Criteria; mrar23hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar23hd", op, join, mrar23hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar23hd;


   procedure Add_mrar21sp( c : in out d.Criteria; mrar21sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar21sp", op, join, mrar21sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar21sp;


   procedure Add_mrar22sp( c : in out d.Criteria; mrar22sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar22sp", op, join, mrar22sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar22sp;


   procedure Add_mrar23sp( c : in out d.Criteria; mrar23sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar23sp", op, join, mrar23sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar23sp;


   procedure Add_mrar31hd( c : in out d.Criteria; mrar31hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar31hd", op, join, mrar31hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar31hd;


   procedure Add_mrar32hd( c : in out d.Criteria; mrar32hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar32hd", op, join, mrar32hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar32hd;


   procedure Add_mrar33hd( c : in out d.Criteria; mrar33hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar33hd", op, join, mrar33hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar33hd;


   procedure Add_mrar31sp( c : in out d.Criteria; mrar31sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar31sp", op, join, mrar31sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar31sp;


   procedure Add_mrar32sp( c : in out d.Criteria; mrar32sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar32sp", op, join, mrar32sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar32sp;


   procedure Add_mrar33sp( c : in out d.Criteria; mrar33sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar33sp", op, join, mrar33sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar33sp;


   procedure Add_mrar41hd( c : in out d.Criteria; mrar41hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar41hd", op, join, mrar41hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar41hd;


   procedure Add_mrar42hd( c : in out d.Criteria; mrar42hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar42hd", op, join, mrar42hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar42hd;


   procedure Add_mrar43hd( c : in out d.Criteria; mrar43hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar43hd", op, join, mrar43hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar43hd;


   procedure Add_mrar41sp( c : in out d.Criteria; mrar41sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar41sp", op, join, mrar41sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar41sp;


   procedure Add_mrar42sp( c : in out d.Criteria; mrar42sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar42sp", op, join, mrar42sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar42sp;


   procedure Add_mrar43sp( c : in out d.Criteria; mrar43sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar43sp", op, join, mrar43sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar43sp;


   procedure Add_mrar51hd( c : in out d.Criteria; mrar51hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar51hd", op, join, mrar51hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar51hd;


   procedure Add_mrar52hd( c : in out d.Criteria; mrar52hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar52hd", op, join, mrar52hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar52hd;


   procedure Add_mrar53hd( c : in out d.Criteria; mrar53hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar53hd", op, join, mrar53hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar53hd;


   procedure Add_mrar51sp( c : in out d.Criteria; mrar51sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar51sp", op, join, mrar51sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar51sp;


   procedure Add_mrar52sp( c : in out d.Criteria; mrar52sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar52sp", op, join, mrar52sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar52sp;


   procedure Add_mrar53sp( c : in out d.Criteria; mrar53sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mrar53sp", op, join, mrar53sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar53sp;


   procedure Add_mpnch1hd( c : in out d.Criteria; mpnch1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpnch1hd", op, join, mpnch1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch1hd;


   procedure Add_mpnch2hd( c : in out d.Criteria; mpnch2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpnch2hd", op, join, mpnch2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch2hd;


   procedure Add_mpnch3hd( c : in out d.Criteria; mpnch3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpnch3hd", op, join, mpnch3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch3hd;


   procedure Add_mpnch1sp( c : in out d.Criteria; mpnch1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpnch1sp", op, join, mpnch1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch1sp;


   procedure Add_mpnch2sp( c : in out d.Criteria; mpnch2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpnch2sp", op, join, mpnch2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch2sp;


   procedure Add_mpnch3sp( c : in out d.Criteria; mpnch3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpnch3sp", op, join, mpnch3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch3sp;


   procedure Add_pmp1hd( c : in out d.Criteria; pmp1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmp1hd", op, join, pmp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp1hd;


   procedure Add_pmp2hd( c : in out d.Criteria; pmp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmp2hd", op, join, pmp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp2hd;


   procedure Add_pmp3hd( c : in out d.Criteria; pmp3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmp3hd", op, join, pmp3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp3hd;


   procedure Add_pmp1sp( c : in out d.Criteria; pmp1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmp1sp", op, join, pmp1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp1sp;


   procedure Add_pmp2sp( c : in out d.Criteria; pmp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmp2sp", op, join, pmp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp2sp;


   procedure Add_pmp3sp( c : in out d.Criteria; pmp3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmp3sp", op, join, pmp3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp3sp;


   procedure Add_ump1hd( c : in out d.Criteria; ump1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ump1hd", op, join, Long_Float( ump1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump1hd;


   procedure Add_ump2hd( c : in out d.Criteria; ump2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ump2hd", op, join, Long_Float( ump2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump2hd;


   procedure Add_ump3hd( c : in out d.Criteria; ump3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ump3hd", op, join, ump3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump3hd;


   procedure Add_ump1sp( c : in out d.Criteria; ump1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ump1sp", op, join, Long_Float( ump1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump1sp;


   procedure Add_ump2sp( c : in out d.Criteria; ump2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ump2sp", op, join, ump2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump2sp;


   procedure Add_ump3sp( c : in out d.Criteria; ump3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ump3sp", op, join, ump3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump3sp;


   procedure Add_pump1hd( c : in out d.Criteria; pump1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pump1hd", op, join, pump1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump1hd;


   procedure Add_pump2hd( c : in out d.Criteria; pump2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pump2hd", op, join, pump2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump2hd;


   procedure Add_pump3hd( c : in out d.Criteria; pump3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pump3hd", op, join, pump3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump3hd;


   procedure Add_pump1sp( c : in out d.Criteria; pump1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pump1sp", op, join, pump1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump1sp;


   procedure Add_pump2sp( c : in out d.Criteria; pump2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pump2sp", op, join, pump2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump2sp;


   procedure Add_pump3sp( c : in out d.Criteria; pump3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pump3sp", op, join, pump3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump3sp;


   procedure Add_isump1hd( c : in out d.Criteria; isump1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isump1hd", op, join, isump1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump1hd;


   procedure Add_isump2hd( c : in out d.Criteria; isump2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isump2hd", op, join, isump2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump2hd;


   procedure Add_isump3hd( c : in out d.Criteria; isump3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isump3hd", op, join, isump3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump3hd;


   procedure Add_isump1sp( c : in out d.Criteria; isump1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isump1sp", op, join, isump1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump1sp;


   procedure Add_isump2sp( c : in out d.Criteria; isump2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isump2sp", op, join, isump2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump2sp;


   procedure Add_isump3sp( c : in out d.Criteria; isump3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "isump3sp", op, join, isump3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump3sp;


   procedure Add_jobst1hd( c : in out d.Criteria; jobst1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobst1hd", op, join, jobst1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst1hd;


   procedure Add_jobst2hd( c : in out d.Criteria; jobst2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobst2hd", op, join, jobst2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst2hd;


   procedure Add_jobst1sp( c : in out d.Criteria; jobst1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobst1sp", op, join, jobst1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst1sp;


   procedure Add_jobst2sp( c : in out d.Criteria; jobst2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "jobst2sp", op, join, jobst2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst2sp;


   procedure Add_oddtp1hd( c : in out d.Criteria; oddtp1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddtp1hd", op, join, oddtp1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp1hd;


   procedure Add_oddtp2hd( c : in out d.Criteria; oddtp2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddtp2hd", op, join, oddtp2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp2hd;


   procedure Add_oddtp1sp( c : in out d.Criteria; oddtp1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddtp1sp", op, join, oddtp1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp1sp;


   procedure Add_oddtp2sp( c : in out d.Criteria; oddtp2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddtp2sp", op, join, oddtp2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp2sp;


   procedure Add_oddjb1hd( c : in out d.Criteria; oddjb1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjb1hd", op, join, Long_Float( oddjb1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb1hd;


   procedure Add_oddjb2hd( c : in out d.Criteria; oddjb2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjb2hd", op, join, Long_Float( oddjb2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb2hd;


   procedure Add_oddjb1sp( c : in out d.Criteria; oddjb1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjb1sp", op, join, Long_Float( oddjb1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb1sp;


   procedure Add_oddjb2sp( c : in out d.Criteria; oddjb2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjb2sp", op, join, oddjb2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb2sp;


   procedure Add_oddjn1hd( c : in out d.Criteria; oddjn1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjn1hd", op, join, oddjn1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn1hd;


   procedure Add_oddjn2hd( c : in out d.Criteria; oddjn2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjn2hd", op, join, oddjn2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn2hd;


   procedure Add_oddjn1sp( c : in out d.Criteria; oddjn1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjn1sp", op, join, oddjn1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn1sp;


   procedure Add_oddjn2sp( c : in out d.Criteria; oddjn2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "oddjn2sp", op, join, oddjn2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn2sp;


   procedure Add_poth1hd( c : in out d.Criteria; poth1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth1hd", op, join, poth1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth1hd;


   procedure Add_poth2hd( c : in out d.Criteria; poth2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth2hd", op, join, poth2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth2hd;


   procedure Add_poth3hd( c : in out d.Criteria; poth3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth3hd", op, join, poth3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth3hd;


   procedure Add_poth4hd( c : in out d.Criteria; poth4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth4hd", op, join, poth4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth4hd;


   procedure Add_poth5hd( c : in out d.Criteria; poth5hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth5hd", op, join, poth5hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth5hd;


   procedure Add_poth6hd( c : in out d.Criteria; poth6hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth6hd", op, join, poth6hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth6hd;


   procedure Add_poth7hd( c : in out d.Criteria; poth7hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth7hd", op, join, poth7hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth7hd;


   procedure Add_poth8hd( c : in out d.Criteria; poth8hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth8hd", op, join, poth8hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth8hd;


   procedure Add_poth9hd( c : in out d.Criteria; poth9hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth9hd", op, join, poth9hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth9hd;


   procedure Add_poth10hd( c : in out d.Criteria; poth10hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth10hd", op, join, poth10hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth10hd;


   procedure Add_poth11hd( c : in out d.Criteria; poth11hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth11hd", op, join, poth11hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth11hd;


   procedure Add_poth12hd( c : in out d.Criteria; poth12hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth12hd", op, join, poth12hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth12hd;


   procedure Add_poth13hd( c : in out d.Criteria; poth13hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth13hd", op, join, poth13hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth13hd;


   procedure Add_poth14hd( c : in out d.Criteria; poth14hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth14hd", op, join, poth14hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth14hd;


   procedure Add_poth15hd( c : in out d.Criteria; poth15hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth15hd", op, join, poth15hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth15hd;


   procedure Add_poth16hd( c : in out d.Criteria; poth16hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth16hd", op, join, poth16hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth16hd;


   procedure Add_poth17hd( c : in out d.Criteria; poth17hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth17hd", op, join, poth17hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth17hd;


   procedure Add_poth18hd( c : in out d.Criteria; poth18hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth18hd", op, join, poth18hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth18hd;


   procedure Add_poth19hd( c : in out d.Criteria; poth19hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth19hd", op, join, poth19hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth19hd;


   procedure Add_poth1sp( c : in out d.Criteria; poth1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth1sp", op, join, poth1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth1sp;


   procedure Add_poth2sp( c : in out d.Criteria; poth2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth2sp", op, join, poth2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth2sp;


   procedure Add_poth3sp( c : in out d.Criteria; poth3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth3sp", op, join, poth3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth3sp;


   procedure Add_poth4sp( c : in out d.Criteria; poth4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth4sp", op, join, poth4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth4sp;


   procedure Add_poth5sp( c : in out d.Criteria; poth5sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth5sp", op, join, poth5sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth5sp;


   procedure Add_poth6sp( c : in out d.Criteria; poth6sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth6sp", op, join, poth6sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth6sp;


   procedure Add_poth7sp( c : in out d.Criteria; poth7sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth7sp", op, join, poth7sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth7sp;


   procedure Add_poth8sp( c : in out d.Criteria; poth8sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth8sp", op, join, poth8sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth8sp;


   procedure Add_poth9sp( c : in out d.Criteria; poth9sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth9sp", op, join, poth9sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth9sp;


   procedure Add_poth10sp( c : in out d.Criteria; poth10sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth10sp", op, join, poth10sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth10sp;


   procedure Add_poth11sp( c : in out d.Criteria; poth11sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth11sp", op, join, poth11sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth11sp;


   procedure Add_poth12sp( c : in out d.Criteria; poth12sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth12sp", op, join, poth12sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth12sp;


   procedure Add_poth13sp( c : in out d.Criteria; poth13sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth13sp", op, join, poth13sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth13sp;


   procedure Add_poth14sp( c : in out d.Criteria; poth14sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth14sp", op, join, poth14sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth14sp;


   procedure Add_poth15sp( c : in out d.Criteria; poth15sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth15sp", op, join, poth15sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth15sp;


   procedure Add_poth16sp( c : in out d.Criteria; poth16sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth16sp", op, join, poth16sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth16sp;


   procedure Add_poth17sp( c : in out d.Criteria; poth17sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth17sp", op, join, poth17sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth17sp;


   procedure Add_poth18sp( c : in out d.Criteria; poth18sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth18sp", op, join, poth18sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth18sp;


   procedure Add_poth19sp( c : in out d.Criteria; poth19sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "poth19sp", op, join, poth19sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth19sp;


   procedure Add_ocpen1hd( c : in out d.Criteria; ocpen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen1hd", op, join, Long_Float( ocpen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen1hd;


   procedure Add_ocpen2hd( c : in out d.Criteria; ocpen2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen2hd", op, join, Long_Float( ocpen2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen2hd;


   procedure Add_ocpen3hd( c : in out d.Criteria; ocpen3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen3hd", op, join, Long_Float( ocpen3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen3hd;


   procedure Add_ocpen4hd( c : in out d.Criteria; ocpen4hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen4hd", op, join, Long_Float( ocpen4hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen4hd;


   procedure Add_wpen1hd( c : in out d.Criteria; wpen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpen1hd", op, join, Long_Float( wpen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen1hd;


   procedure Add_wpen2hd( c : in out d.Criteria; wpen2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpen2hd", op, join, Long_Float( wpen2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen2hd;


   procedure Add_wpen3hd( c : in out d.Criteria; wpen3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpen3hd", op, join, Long_Float( wpen3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen3hd;


   procedure Add_ppen1hd( c : in out d.Criteria; ppen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppen1hd", op, join, Long_Float( ppen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen1hd;


   procedure Add_ppen2hd( c : in out d.Criteria; ppen2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppen2hd", op, join, Long_Float( ppen2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen2hd;


   procedure Add_ppen3hd( c : in out d.Criteria; ppen3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppen3hd", op, join, Long_Float( ppen3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen3hd;


   procedure Add_tupen1hd( c : in out d.Criteria; tupen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupen1hd", op, join, Long_Float( tupen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen1hd;


   procedure Add_tupen2hd( c : in out d.Criteria; tupen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupen2hd", op, join, tupen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen2hd;


   procedure Add_anpen1hd( c : in out d.Criteria; anpen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anpen1hd", op, join, Long_Float( anpen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen1hd;


   procedure Add_anpen2hd( c : in out d.Criteria; anpen2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anpen2hd", op, join, Long_Float( anpen2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen2hd;


   procedure Add_anpen3hd( c : in out d.Criteria; anpen3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anpen3hd", op, join, anpen3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen3hd;


   procedure Add_trust1hd( c : in out d.Criteria; trust1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trust1hd", op, join, Long_Float( trust1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust1hd;


   procedure Add_trust2hd( c : in out d.Criteria; trust2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trust2hd", op, join, trust2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust2hd;


   procedure Add_expen1hd( c : in out d.Criteria; expen1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expen1hd", op, join, Long_Float( expen1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen1hd;


   procedure Add_expen2hd( c : in out d.Criteria; expen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expen2hd", op, join, expen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen2hd;


   procedure Add_ocpen1sp( c : in out d.Criteria; ocpen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen1sp", op, join, Long_Float( ocpen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen1sp;


   procedure Add_ocpen2sp( c : in out d.Criteria; ocpen2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen2sp", op, join, Long_Float( ocpen2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen2sp;


   procedure Add_ocpen3sp( c : in out d.Criteria; ocpen3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen3sp", op, join, Long_Float( ocpen3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen3sp;


   procedure Add_ocpen4sp( c : in out d.Criteria; ocpen4sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpen4sp", op, join, Long_Float( ocpen4sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen4sp;


   procedure Add_wpen1sp( c : in out d.Criteria; wpen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpen1sp", op, join, Long_Float( wpen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen1sp;


   procedure Add_wpen2sp( c : in out d.Criteria; wpen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpen2sp", op, join, wpen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen2sp;


   procedure Add_wpen3sp( c : in out d.Criteria; wpen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpen3sp", op, join, wpen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen3sp;


   procedure Add_ppen1sp( c : in out d.Criteria; ppen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppen1sp", op, join, Long_Float( ppen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen1sp;


   procedure Add_ppen2sp( c : in out d.Criteria; ppen2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppen2sp", op, join, Long_Float( ppen2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen2sp;


   procedure Add_ppen3sp( c : in out d.Criteria; ppen3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppen3sp", op, join, Long_Float( ppen3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen3sp;


   procedure Add_tupen1sp( c : in out d.Criteria; tupen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupen1sp", op, join, Long_Float( tupen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen1sp;


   procedure Add_tupen2sp( c : in out d.Criteria; tupen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupen2sp", op, join, tupen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen2sp;


   procedure Add_anpen1sp( c : in out d.Criteria; anpen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anpen1sp", op, join, Long_Float( anpen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen1sp;


   procedure Add_anpen2sp( c : in out d.Criteria; anpen2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anpen2sp", op, join, Long_Float( anpen2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen2sp;


   procedure Add_anpen3sp( c : in out d.Criteria; anpen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "anpen3sp", op, join, anpen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen3sp;


   procedure Add_trust1sp( c : in out d.Criteria; trust1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trust1sp", op, join, Long_Float( trust1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust1sp;


   procedure Add_trust2sp( c : in out d.Criteria; trust2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trust2sp", op, join, trust2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust2sp;


   procedure Add_expen1sp( c : in out d.Criteria; expen1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expen1sp", op, join, Long_Float( expen1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen1sp;


   procedure Add_expen2sp( c : in out d.Criteria; expen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expen2sp", op, join, expen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen2sp;


   procedure Add_pcpen1hd( c : in out d.Criteria; pcpen1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen1hd", op, join, pcpen1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen1hd;


   procedure Add_pcpen2hd( c : in out d.Criteria; pcpen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen2hd", op, join, pcpen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen2hd;


   procedure Add_pcpen3hd( c : in out d.Criteria; pcpen3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen3hd", op, join, pcpen3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen3hd;


   procedure Add_pcpen4hd( c : in out d.Criteria; pcpen4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen4hd", op, join, pcpen4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen4hd;


   procedure Add_pwpen1hd( c : in out d.Criteria; pwpen1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpen1hd", op, join, pwpen1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen1hd;


   procedure Add_pwpen2hd( c : in out d.Criteria; pwpen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpen2hd", op, join, pwpen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen2hd;


   procedure Add_pwpen3hd( c : in out d.Criteria; pwpen3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpen3hd", op, join, pwpen3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen3hd;


   procedure Add_pppen1hd( c : in out d.Criteria; pppen1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pppen1hd", op, join, pppen1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen1hd;


   procedure Add_pppen2hd( c : in out d.Criteria; pppen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pppen2hd", op, join, pppen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen2hd;


   procedure Add_pppen3hd( c : in out d.Criteria; pppen3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pppen3hd", op, join, pppen3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen3hd;


   procedure Add_ptupn1hd( c : in out d.Criteria; ptupn1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptupn1hd", op, join, ptupn1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn1hd;


   procedure Add_ptupn2hd( c : in out d.Criteria; ptupn2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptupn2hd", op, join, ptupn2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn2hd;


   procedure Add_panpn1hd( c : in out d.Criteria; panpn1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "panpn1hd", op, join, panpn1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn1hd;


   procedure Add_panpn2hd( c : in out d.Criteria; panpn2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "panpn2hd", op, join, panpn2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn2hd;


   procedure Add_panpn3hd( c : in out d.Criteria; panpn3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "panpn3hd", op, join, panpn3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn3hd;


   procedure Add_ptrst1hd( c : in out d.Criteria; ptrst1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrst1hd", op, join, ptrst1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst1hd;


   procedure Add_ptrst2hd( c : in out d.Criteria; ptrst2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrst2hd", op, join, ptrst2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst2hd;


   procedure Add_pxpen1hd( c : in out d.Criteria; pxpen1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pxpen1hd", op, join, pxpen1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen1hd;


   procedure Add_pxpen2hd( c : in out d.Criteria; pxpen2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pxpen2hd", op, join, pxpen2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen2hd;


   procedure Add_pcpen1sp( c : in out d.Criteria; pcpen1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen1sp", op, join, pcpen1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen1sp;


   procedure Add_pcpen2sp( c : in out d.Criteria; pcpen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen2sp", op, join, pcpen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen2sp;


   procedure Add_pcpen3sp( c : in out d.Criteria; pcpen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen3sp", op, join, pcpen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen3sp;


   procedure Add_pcpen4sp( c : in out d.Criteria; pcpen4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pcpen4sp", op, join, pcpen4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen4sp;


   procedure Add_pwpen1sp( c : in out d.Criteria; pwpen1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpen1sp", op, join, pwpen1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen1sp;


   procedure Add_pwpen2sp( c : in out d.Criteria; pwpen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpen2sp", op, join, pwpen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen2sp;


   procedure Add_pwpen3sp( c : in out d.Criteria; pwpen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pwpen3sp", op, join, pwpen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen3sp;


   procedure Add_pppen1sp( c : in out d.Criteria; pppen1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pppen1sp", op, join, pppen1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen1sp;


   procedure Add_pppen2sp( c : in out d.Criteria; pppen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pppen2sp", op, join, pppen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen2sp;


   procedure Add_pppen3sp( c : in out d.Criteria; pppen3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pppen3sp", op, join, pppen3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen3sp;


   procedure Add_ptupn1sp( c : in out d.Criteria; ptupn1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptupn1sp", op, join, ptupn1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn1sp;


   procedure Add_ptupn2sp( c : in out d.Criteria; ptupn2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptupn2sp", op, join, ptupn2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn2sp;


   procedure Add_panpn1sp( c : in out d.Criteria; panpn1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "panpn1sp", op, join, panpn1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn1sp;


   procedure Add_panpn2sp( c : in out d.Criteria; panpn2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "panpn2sp", op, join, panpn2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn2sp;


   procedure Add_panpn3sp( c : in out d.Criteria; panpn3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "panpn3sp", op, join, panpn3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn3sp;


   procedure Add_ptrst1sp( c : in out d.Criteria; ptrst1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrst1sp", op, join, ptrst1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst1sp;


   procedure Add_ptrst2sp( c : in out d.Criteria; ptrst2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptrst2sp", op, join, ptrst2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst2sp;


   procedure Add_pxpen1sp( c : in out d.Criteria; pxpen1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pxpen1sp", op, join, pxpen1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen1sp;


   procedure Add_pxpen2sp( c : in out d.Criteria; pxpen2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pxpen2sp", op, join, pxpen2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen2sp;


   procedure Add_ocptd1hd( c : in out d.Criteria; ocptd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd1hd", op, join, ocptd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd1hd;


   procedure Add_ocptd2hd( c : in out d.Criteria; ocptd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd2hd", op, join, ocptd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd2hd;


   procedure Add_ocptd3hd( c : in out d.Criteria; ocptd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd3hd", op, join, ocptd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd3hd;


   procedure Add_ocptd4hd( c : in out d.Criteria; ocptd4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd4hd", op, join, ocptd4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd4hd;


   procedure Add_wpptd1hd( c : in out d.Criteria; wpptd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptd1hd", op, join, wpptd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd1hd;


   procedure Add_wpptd2hd( c : in out d.Criteria; wpptd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptd2hd", op, join, wpptd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd2hd;


   procedure Add_wpptd3hd( c : in out d.Criteria; wpptd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptd3hd", op, join, wpptd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd3hd;


   procedure Add_ppetd1hd( c : in out d.Criteria; ppetd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetd1hd", op, join, ppetd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd1hd;


   procedure Add_ppetd2hd( c : in out d.Criteria; ppetd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetd2hd", op, join, ppetd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd2hd;


   procedure Add_ppetd3hd( c : in out d.Criteria; ppetd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetd3hd", op, join, ppetd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd3hd;


   procedure Add_tuptd1hd( c : in out d.Criteria; tuptd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptd1hd", op, join, tuptd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd1hd;


   procedure Add_tuptd2hd( c : in out d.Criteria; tuptd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptd2hd", op, join, tuptd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd2hd;


   procedure Add_aptd1hd( c : in out d.Criteria; aptd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptd1hd", op, join, aptd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd1hd;


   procedure Add_aptd2hd( c : in out d.Criteria; aptd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptd2hd", op, join, aptd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd2hd;


   procedure Add_aptd3hd( c : in out d.Criteria; aptd3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptd3hd", op, join, aptd3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd3hd;


   procedure Add_trutd1hd( c : in out d.Criteria; trutd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trutd1hd", op, join, trutd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd1hd;


   procedure Add_trutd2hd( c : in out d.Criteria; trutd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trutd2hd", op, join, trutd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd2hd;


   procedure Add_exptd1hd( c : in out d.Criteria; exptd1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptd1hd", op, join, exptd1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd1hd;


   procedure Add_exptd2hd( c : in out d.Criteria; exptd2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptd2hd", op, join, exptd2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd2hd;


   procedure Add_ocptd1sp( c : in out d.Criteria; ocptd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd1sp", op, join, ocptd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd1sp;


   procedure Add_ocptd2sp( c : in out d.Criteria; ocptd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd2sp", op, join, ocptd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd2sp;


   procedure Add_ocptd3sp( c : in out d.Criteria; ocptd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd3sp", op, join, ocptd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd3sp;


   procedure Add_ocptd4sp( c : in out d.Criteria; ocptd4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptd4sp", op, join, ocptd4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd4sp;


   procedure Add_wpptd1sp( c : in out d.Criteria; wpptd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptd1sp", op, join, wpptd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd1sp;


   procedure Add_wpptd2sp( c : in out d.Criteria; wpptd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptd2sp", op, join, wpptd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd2sp;


   procedure Add_wpptd3sp( c : in out d.Criteria; wpptd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptd3sp", op, join, wpptd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd3sp;


   procedure Add_ppetd1sp( c : in out d.Criteria; ppetd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetd1sp", op, join, ppetd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd1sp;


   procedure Add_ppetd2sp( c : in out d.Criteria; ppetd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetd2sp", op, join, ppetd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd2sp;


   procedure Add_ppetd3sp( c : in out d.Criteria; ppetd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetd3sp", op, join, ppetd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd3sp;


   procedure Add_tuptd1sp( c : in out d.Criteria; tuptd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptd1sp", op, join, tuptd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd1sp;


   procedure Add_tuptd2sp( c : in out d.Criteria; tuptd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptd2sp", op, join, tuptd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd2sp;


   procedure Add_aptd1sp( c : in out d.Criteria; aptd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptd1sp", op, join, aptd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd1sp;


   procedure Add_aptd2sp( c : in out d.Criteria; aptd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptd2sp", op, join, aptd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd2sp;


   procedure Add_aptd3sp( c : in out d.Criteria; aptd3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptd3sp", op, join, aptd3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd3sp;


   procedure Add_trutd1sp( c : in out d.Criteria; trutd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trutd1sp", op, join, trutd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd1sp;


   procedure Add_trutd2sp( c : in out d.Criteria; trutd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "trutd2sp", op, join, trutd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd2sp;


   procedure Add_exptd1sp( c : in out d.Criteria; exptd1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptd1sp", op, join, exptd1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd1sp;


   procedure Add_exptd2sp( c : in out d.Criteria; exptd2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptd2sp", op, join, exptd2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd2sp;


   procedure Add_ocpid1hd( c : in out d.Criteria; ocpid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid1hd", op, join, ocpid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid1hd;


   procedure Add_ocpid2hd( c : in out d.Criteria; ocpid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid2hd", op, join, ocpid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid2hd;


   procedure Add_ocpid3hd( c : in out d.Criteria; ocpid3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid3hd", op, join, ocpid3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid3hd;


   procedure Add_ocpid4hd( c : in out d.Criteria; ocpid4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid4hd", op, join, ocpid4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid4hd;


   procedure Add_wwpid1hd( c : in out d.Criteria; wwpid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpid1hd", op, join, wwpid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid1hd;


   procedure Add_wwpid2hd( c : in out d.Criteria; wwpid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpid2hd", op, join, wwpid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid2hd;


   procedure Add_wwpid3hd( c : in out d.Criteria; wwpid3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpid3hd", op, join, wwpid3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid3hd;


   procedure Add_ppeid1hd( c : in out d.Criteria; ppeid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeid1hd", op, join, ppeid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid1hd;


   procedure Add_ppeid2hd( c : in out d.Criteria; ppeid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeid2hd", op, join, ppeid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid2hd;


   procedure Add_ppeid3hd( c : in out d.Criteria; ppeid3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeid3hd", op, join, ppeid3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid3hd;


   procedure Add_tupid1hd( c : in out d.Criteria; tupid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupid1hd", op, join, tupid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid1hd;


   procedure Add_tupid2hd( c : in out d.Criteria; tupid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupid2hd", op, join, tupid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid2hd;


   procedure Add_apid1hd( c : in out d.Criteria; apid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apid1hd", op, join, apid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid1hd;


   procedure Add_apid2hd( c : in out d.Criteria; apid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apid2hd", op, join, apid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid2hd;


   procedure Add_apid3hd( c : in out d.Criteria; apid3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apid3hd", op, join, apid3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid3hd;


   procedure Add_truid1hd( c : in out d.Criteria; truid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truid1hd", op, join, truid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid1hd;


   procedure Add_truid2hd( c : in out d.Criteria; truid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truid2hd", op, join, truid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid2hd;


   procedure Add_expid1hd( c : in out d.Criteria; expid1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expid1hd", op, join, expid1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid1hd;


   procedure Add_expid2hd( c : in out d.Criteria; expid2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expid2hd", op, join, expid2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid2hd;


   procedure Add_ocpid1sp( c : in out d.Criteria; ocpid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid1sp", op, join, ocpid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid1sp;


   procedure Add_ocpid2sp( c : in out d.Criteria; ocpid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid2sp", op, join, ocpid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid2sp;


   procedure Add_ocpid3sp( c : in out d.Criteria; ocpid3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid3sp", op, join, ocpid3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid3sp;


   procedure Add_ocpid4sp( c : in out d.Criteria; ocpid4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpid4sp", op, join, ocpid4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid4sp;


   procedure Add_wwpid1sp( c : in out d.Criteria; wwpid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpid1sp", op, join, wwpid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid1sp;


   procedure Add_wwpid2sp( c : in out d.Criteria; wwpid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpid2sp", op, join, wwpid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid2sp;


   procedure Add_wwpid3sp( c : in out d.Criteria; wwpid3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpid3sp", op, join, wwpid3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid3sp;


   procedure Add_ppeid1sp( c : in out d.Criteria; ppeid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeid1sp", op, join, ppeid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid1sp;


   procedure Add_ppeid2sp( c : in out d.Criteria; ppeid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeid2sp", op, join, ppeid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid2sp;


   procedure Add_ppeid3sp( c : in out d.Criteria; ppeid3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeid3sp", op, join, ppeid3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid3sp;


   procedure Add_tupid1sp( c : in out d.Criteria; tupid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupid1sp", op, join, tupid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid1sp;


   procedure Add_tupid2sp( c : in out d.Criteria; tupid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupid2sp", op, join, tupid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid2sp;


   procedure Add_apid1sp( c : in out d.Criteria; apid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apid1sp", op, join, apid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid1sp;


   procedure Add_apid2sp( c : in out d.Criteria; apid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apid2sp", op, join, apid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid2sp;


   procedure Add_apid3sp( c : in out d.Criteria; apid3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apid3sp", op, join, apid3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid3sp;


   procedure Add_truid1sp( c : in out d.Criteria; truid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truid1sp", op, join, truid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid1sp;


   procedure Add_truid2sp( c : in out d.Criteria; truid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truid2sp", op, join, truid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid2sp;


   procedure Add_expid1sp( c : in out d.Criteria; expid1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expid1sp", op, join, expid1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid1sp;


   procedure Add_expid2sp( c : in out d.Criteria; expid2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expid2sp", op, join, expid2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid2sp;


   procedure Add_ocptx1hd( c : in out d.Criteria; ocptx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx1hd", op, join, ocptx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx1hd;


   procedure Add_ocptx2hd( c : in out d.Criteria; ocptx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx2hd", op, join, ocptx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx2hd;


   procedure Add_ocptx3hd( c : in out d.Criteria; ocptx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx3hd", op, join, ocptx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx3hd;


   procedure Add_ocptx4hd( c : in out d.Criteria; ocptx4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx4hd", op, join, ocptx4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx4hd;


   procedure Add_wptx1hd( c : in out d.Criteria; wptx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wptx1hd", op, join, wptx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wptx1hd;


   procedure Add_wpptx2hd( c : in out d.Criteria; wpptx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptx2hd", op, join, wpptx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx2hd;


   procedure Add_wpptx3hd( c : in out d.Criteria; wpptx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptx3hd", op, join, wpptx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx3hd;


   procedure Add_ppetx1hd( c : in out d.Criteria; ppetx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetx1hd", op, join, ppetx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx1hd;


   procedure Add_ppetx2hd( c : in out d.Criteria; ppetx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetx2hd", op, join, ppetx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx2hd;


   procedure Add_ppetx3hd( c : in out d.Criteria; ppetx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetx3hd", op, join, ppetx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx3hd;


   procedure Add_tuptx1hd( c : in out d.Criteria; tuptx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptx1hd", op, join, tuptx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx1hd;


   procedure Add_tuptx2hd( c : in out d.Criteria; tuptx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptx2hd", op, join, tuptx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx2hd;


   procedure Add_aptx1hd( c : in out d.Criteria; aptx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptx1hd", op, join, aptx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx1hd;


   procedure Add_aptx2hd( c : in out d.Criteria; aptx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptx2hd", op, join, aptx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx2hd;


   procedure Add_aptx3hd( c : in out d.Criteria; aptx3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptx3hd", op, join, aptx3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx3hd;


   procedure Add_ttrtx1hd( c : in out d.Criteria; ttrtx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ttrtx1hd", op, join, ttrtx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx1hd;


   procedure Add_ttrtx2hd( c : in out d.Criteria; ttrtx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ttrtx2hd", op, join, ttrtx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx2hd;


   procedure Add_exptx1hd( c : in out d.Criteria; exptx1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptx1hd", op, join, exptx1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx1hd;


   procedure Add_exptx2hd( c : in out d.Criteria; exptx2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptx2hd", op, join, exptx2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx2hd;


   procedure Add_ocptx1sp( c : in out d.Criteria; ocptx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx1sp", op, join, ocptx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx1sp;


   procedure Add_ocptx2sp( c : in out d.Criteria; ocptx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx2sp", op, join, ocptx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx2sp;


   procedure Add_ocptx3sp( c : in out d.Criteria; ocptx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx3sp", op, join, ocptx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx3sp;


   procedure Add_ocptx4sp( c : in out d.Criteria; ocptx4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocptx4sp", op, join, ocptx4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx4sp;


   procedure Add_wptx1sp( c : in out d.Criteria; wptx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wptx1sp", op, join, wptx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wptx1sp;


   procedure Add_wpptx2sp( c : in out d.Criteria; wpptx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptx2sp", op, join, wpptx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx2sp;


   procedure Add_wpptx3sp( c : in out d.Criteria; wpptx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpptx3sp", op, join, wpptx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx3sp;


   procedure Add_ppetx1sp( c : in out d.Criteria; ppetx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetx1sp", op, join, ppetx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx1sp;


   procedure Add_ppetx2sp( c : in out d.Criteria; ppetx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetx2sp", op, join, ppetx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx2sp;


   procedure Add_ppetx3sp( c : in out d.Criteria; ppetx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppetx3sp", op, join, ppetx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx3sp;


   procedure Add_tuptx1sp( c : in out d.Criteria; tuptx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptx1sp", op, join, tuptx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx1sp;


   procedure Add_tuptx2sp( c : in out d.Criteria; tuptx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuptx2sp", op, join, tuptx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx2sp;


   procedure Add_aptx1sp( c : in out d.Criteria; aptx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptx1sp", op, join, aptx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx1sp;


   procedure Add_aptx2sp( c : in out d.Criteria; aptx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptx2sp", op, join, aptx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx2sp;


   procedure Add_aptx3sp( c : in out d.Criteria; aptx3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "aptx3sp", op, join, aptx3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx3sp;


   procedure Add_ttrtx1sp( c : in out d.Criteria; ttrtx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ttrtx1sp", op, join, ttrtx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx1sp;


   procedure Add_ttrtx2sp( c : in out d.Criteria; ttrtx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ttrtx2sp", op, join, ttrtx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx2sp;


   procedure Add_exptx1sp( c : in out d.Criteria; exptx1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptx1sp", op, join, exptx1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx1sp;


   procedure Add_exptx2sp( c : in out d.Criteria; exptx2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "exptx2sp", op, join, exptx2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx2sp;


   procedure Add_ocpoa1hd( c : in out d.Criteria; ocpoa1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa1hd", op, join, Long_Float( ocpoa1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa1hd;


   procedure Add_ocpoa2hd( c : in out d.Criteria; ocpoa2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa2hd", op, join, Long_Float( ocpoa2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa2hd;


   procedure Add_ocpoa3hd( c : in out d.Criteria; ocpoa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa3hd", op, join, ocpoa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa3hd;


   procedure Add_ocpoa4hd( c : in out d.Criteria; ocpoa4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa4hd", op, join, ocpoa4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa4hd;


   procedure Add_wpoa1hd( c : in out d.Criteria; wpoa1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpoa1hd", op, join, Long_Float( wpoa1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoa1hd;


   procedure Add_wwpoa2hd( c : in out d.Criteria; wwpoa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoa2hd", op, join, wwpoa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa2hd;


   procedure Add_wwpoa3hd( c : in out d.Criteria; wwpoa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoa3hd", op, join, wwpoa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa3hd;


   procedure Add_ppeoa1hd( c : in out d.Criteria; ppeoa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoa1hd", op, join, ppeoa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa1hd;


   procedure Add_ppeoa2hd( c : in out d.Criteria; ppeoa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoa2hd", op, join, ppeoa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa2hd;


   procedure Add_ppeoa3hd( c : in out d.Criteria; ppeoa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoa3hd", op, join, ppeoa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa3hd;


   procedure Add_tupoa1hd( c : in out d.Criteria; tupoa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoa1hd", op, join, tupoa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa1hd;


   procedure Add_tupoa2hd( c : in out d.Criteria; tupoa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoa2hd", op, join, tupoa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa2hd;


   procedure Add_apoa1hd( c : in out d.Criteria; apoa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoa1hd", op, join, apoa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa1hd;


   procedure Add_apoa2hd( c : in out d.Criteria; apoa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoa2hd", op, join, apoa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa2hd;


   procedure Add_apoa3hd( c : in out d.Criteria; apoa3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoa3hd", op, join, apoa3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa3hd;


   procedure Add_truoa1hd( c : in out d.Criteria; truoa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoa1hd", op, join, truoa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa1hd;


   procedure Add_truoa2hd( c : in out d.Criteria; truoa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoa2hd", op, join, truoa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa2hd;


   procedure Add_expoa1hd( c : in out d.Criteria; expoa1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoa1hd", op, join, expoa1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa1hd;


   procedure Add_expoa2hd( c : in out d.Criteria; expoa2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoa2hd", op, join, expoa2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa2hd;


   procedure Add_ocpoa1sp( c : in out d.Criteria; ocpoa1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa1sp", op, join, Long_Float( ocpoa1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa1sp;


   procedure Add_ocpoa2sp( c : in out d.Criteria; ocpoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa2sp", op, join, ocpoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa2sp;


   procedure Add_ocpoa3sp( c : in out d.Criteria; ocpoa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa3sp", op, join, ocpoa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa3sp;


   procedure Add_ocpoa4sp( c : in out d.Criteria; ocpoa4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoa4sp", op, join, ocpoa4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa4sp;


   procedure Add_wpoa1sp( c : in out d.Criteria; wpoa1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpoa1sp", op, join, Long_Float( wpoa1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoa1sp;


   procedure Add_wwpoa2sp( c : in out d.Criteria; wwpoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoa2sp", op, join, wwpoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa2sp;


   procedure Add_wwpoa3sp( c : in out d.Criteria; wwpoa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoa3sp", op, join, wwpoa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa3sp;


   procedure Add_ppeoa1sp( c : in out d.Criteria; ppeoa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoa1sp", op, join, ppeoa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa1sp;


   procedure Add_ppeoa2sp( c : in out d.Criteria; ppeoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoa2sp", op, join, ppeoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa2sp;


   procedure Add_ppeoa3sp( c : in out d.Criteria; ppeoa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoa3sp", op, join, ppeoa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa3sp;


   procedure Add_tupoa1sp( c : in out d.Criteria; tupoa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoa1sp", op, join, tupoa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa1sp;


   procedure Add_tupoa2sp( c : in out d.Criteria; tupoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoa2sp", op, join, tupoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa2sp;


   procedure Add_apoa1sp( c : in out d.Criteria; apoa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoa1sp", op, join, apoa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa1sp;


   procedure Add_apoa2sp( c : in out d.Criteria; apoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoa2sp", op, join, apoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa2sp;


   procedure Add_apoa3sp( c : in out d.Criteria; apoa3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoa3sp", op, join, apoa3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa3sp;


   procedure Add_truoa1sp( c : in out d.Criteria; truoa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoa1sp", op, join, truoa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa1sp;


   procedure Add_truoa2sp( c : in out d.Criteria; truoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoa2sp", op, join, truoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa2sp;


   procedure Add_expoa1sp( c : in out d.Criteria; expoa1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoa1sp", op, join, expoa1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa1sp;


   procedure Add_expoa2sp( c : in out d.Criteria; expoa2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoa2sp", op, join, expoa2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa2sp;


   procedure Add_ocpoi1hd( c : in out d.Criteria; ocpoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi1hd", op, join, ocpoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi1hd;


   procedure Add_ocpoi2hd( c : in out d.Criteria; ocpoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi2hd", op, join, ocpoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi2hd;


   procedure Add_ocpoi3hd( c : in out d.Criteria; ocpoi3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi3hd", op, join, ocpoi3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi3hd;


   procedure Add_ocpoi4hd( c : in out d.Criteria; ocpoi4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi4hd", op, join, ocpoi4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi4hd;


   procedure Add_wpoi1hd( c : in out d.Criteria; wpoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpoi1hd", op, join, wpoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoi1hd;


   procedure Add_wwpoi2hd( c : in out d.Criteria; wwpoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoi2hd", op, join, wwpoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi2hd;


   procedure Add_wwpoi3hd( c : in out d.Criteria; wwpoi3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoi3hd", op, join, wwpoi3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi3hd;


   procedure Add_ppeoi1hd( c : in out d.Criteria; ppeoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoi1hd", op, join, ppeoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi1hd;


   procedure Add_ppeoi2hd( c : in out d.Criteria; ppeoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoi2hd", op, join, ppeoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi2hd;


   procedure Add_ppeoi3hd( c : in out d.Criteria; ppeoi3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoi3hd", op, join, ppeoi3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi3hd;


   procedure Add_tupoi1hd( c : in out d.Criteria; tupoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoi1hd", op, join, tupoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi1hd;


   procedure Add_tupoi2hd( c : in out d.Criteria; tupoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoi2hd", op, join, tupoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi2hd;


   procedure Add_apoi1hd( c : in out d.Criteria; apoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoi1hd", op, join, apoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi1hd;


   procedure Add_apoi2hd( c : in out d.Criteria; apoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoi2hd", op, join, apoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi2hd;


   procedure Add_apoi3hd( c : in out d.Criteria; apoi3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoi3hd", op, join, apoi3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi3hd;


   procedure Add_truoi1hd( c : in out d.Criteria; truoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoi1hd", op, join, truoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi1hd;


   procedure Add_truoi2hd( c : in out d.Criteria; truoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoi2hd", op, join, truoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi2hd;


   procedure Add_expoi1hd( c : in out d.Criteria; expoi1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoi1hd", op, join, expoi1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi1hd;


   procedure Add_expoi2hd( c : in out d.Criteria; expoi2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoi2hd", op, join, expoi2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi2hd;


   procedure Add_ocpoi1sp( c : in out d.Criteria; ocpoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi1sp", op, join, ocpoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi1sp;


   procedure Add_ocpoi2sp( c : in out d.Criteria; ocpoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi2sp", op, join, ocpoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi2sp;


   procedure Add_ocpoi3sp( c : in out d.Criteria; ocpoi3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi3sp", op, join, ocpoi3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi3sp;


   procedure Add_ocpoi4sp( c : in out d.Criteria; ocpoi4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpoi4sp", op, join, ocpoi4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi4sp;


   procedure Add_wpoi1sp( c : in out d.Criteria; wpoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpoi1sp", op, join, wpoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoi1sp;


   procedure Add_wwpoi2sp( c : in out d.Criteria; wwpoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoi2sp", op, join, wwpoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi2sp;


   procedure Add_wwpoi3sp( c : in out d.Criteria; wwpoi3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wwpoi3sp", op, join, wwpoi3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi3sp;


   procedure Add_ppeoi1sp( c : in out d.Criteria; ppeoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoi1sp", op, join, ppeoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi1sp;


   procedure Add_ppeoi2sp( c : in out d.Criteria; ppeoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoi2sp", op, join, ppeoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi2sp;


   procedure Add_ppeoi3sp( c : in out d.Criteria; ppeoi3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeoi3sp", op, join, ppeoi3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi3sp;


   procedure Add_tupoi1sp( c : in out d.Criteria; tupoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoi1sp", op, join, tupoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi1sp;


   procedure Add_tupoi2sp( c : in out d.Criteria; tupoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupoi2sp", op, join, tupoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi2sp;


   procedure Add_apoi1sp( c : in out d.Criteria; apoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoi1sp", op, join, apoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi1sp;


   procedure Add_apoi2sp( c : in out d.Criteria; apoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoi2sp", op, join, apoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi2sp;


   procedure Add_apoi3sp( c : in out d.Criteria; apoi3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apoi3sp", op, join, apoi3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi3sp;


   procedure Add_truoi1sp( c : in out d.Criteria; truoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoi1sp", op, join, truoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi1sp;


   procedure Add_truoi2sp( c : in out d.Criteria; truoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truoi2sp", op, join, truoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi2sp;


   procedure Add_expoi1sp( c : in out d.Criteria; expoi1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoi1sp", op, join, expoi1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi1sp;


   procedure Add_expoi2sp( c : in out d.Criteria; expoi2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expoi2sp", op, join, expoi2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi2sp;


   procedure Add_ocpta1hd( c : in out d.Criteria; ocpta1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta1hd", op, join, Long_Float( ocpta1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta1hd;


   procedure Add_ocpta2hd( c : in out d.Criteria; ocpta2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta2hd", op, join, Long_Float( ocpta2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta2hd;


   procedure Add_ocpta3hd( c : in out d.Criteria; ocpta3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta3hd", op, join, Long_Float( ocpta3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta3hd;


   procedure Add_ocpta4hd( c : in out d.Criteria; ocpta4hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta4hd", op, join, Long_Float( ocpta4hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta4hd;


   procedure Add_wpta1hd( c : in out d.Criteria; wpta1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpta1hd", op, join, Long_Float( wpta1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpta1hd;


   procedure Add_wppta2hd( c : in out d.Criteria; wppta2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppta2hd", op, join, Long_Float( wppta2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta2hd;


   procedure Add_wppta3hd( c : in out d.Criteria; wppta3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppta3hd", op, join, Long_Float( wppta3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta3hd;


   procedure Add_ppeta1hd( c : in out d.Criteria; ppeta1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeta1hd", op, join, Long_Float( ppeta1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta1hd;


   procedure Add_ppeta2hd( c : in out d.Criteria; ppeta2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeta2hd", op, join, Long_Float( ppeta2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta2hd;


   procedure Add_ppeta3hd( c : in out d.Criteria; ppeta3hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeta3hd", op, join, Long_Float( ppeta3hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta3hd;


   procedure Add_tupta1hd( c : in out d.Criteria; tupta1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupta1hd", op, join, tupta1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta1hd;


   procedure Add_tupta2hd( c : in out d.Criteria; tupta2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupta2hd", op, join, tupta2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta2hd;


   procedure Add_apta1hd( c : in out d.Criteria; apta1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apta1hd", op, join, Long_Float( apta1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta1hd;


   procedure Add_apta2hd( c : in out d.Criteria; apta2hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apta2hd", op, join, Long_Float( apta2hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta2hd;


   procedure Add_apta3hd( c : in out d.Criteria; apta3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apta3hd", op, join, apta3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta3hd;


   procedure Add_truta1hd( c : in out d.Criteria; truta1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truta1hd", op, join, Long_Float( truta1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta1hd;


   procedure Add_truta2hd( c : in out d.Criteria; truta2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truta2hd", op, join, truta2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta2hd;


   procedure Add_expta1hd( c : in out d.Criteria; expta1hd : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expta1hd", op, join, Long_Float( expta1hd ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta1hd;


   procedure Add_expta2hd( c : in out d.Criteria; expta2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expta2hd", op, join, expta2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta2hd;


   procedure Add_ocpta1sp( c : in out d.Criteria; ocpta1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta1sp", op, join, Long_Float( ocpta1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta1sp;


   procedure Add_ocpta2sp( c : in out d.Criteria; ocpta2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta2sp", op, join, Long_Float( ocpta2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta2sp;


   procedure Add_ocpta3sp( c : in out d.Criteria; ocpta3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta3sp", op, join, Long_Float( ocpta3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta3sp;


   procedure Add_ocpta4sp( c : in out d.Criteria; ocpta4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpta4sp", op, join, ocpta4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta4sp;


   procedure Add_wpta1sp( c : in out d.Criteria; wpta1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpta1sp", op, join, Long_Float( wpta1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpta1sp;


   procedure Add_wppta2sp( c : in out d.Criteria; wppta2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppta2sp", op, join, wppta2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta2sp;


   procedure Add_wppta3sp( c : in out d.Criteria; wppta3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppta3sp", op, join, wppta3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta3sp;


   procedure Add_ppeta1sp( c : in out d.Criteria; ppeta1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeta1sp", op, join, Long_Float( ppeta1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta1sp;


   procedure Add_ppeta2sp( c : in out d.Criteria; ppeta2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeta2sp", op, join, Long_Float( ppeta2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta2sp;


   procedure Add_ppeta3sp( c : in out d.Criteria; ppeta3sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeta3sp", op, join, Long_Float( ppeta3sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta3sp;


   procedure Add_tupta1sp( c : in out d.Criteria; tupta1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupta1sp", op, join, tupta1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta1sp;


   procedure Add_tupta2sp( c : in out d.Criteria; tupta2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupta2sp", op, join, tupta2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta2sp;


   procedure Add_apta1sp( c : in out d.Criteria; apta1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apta1sp", op, join, Long_Float( apta1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta1sp;


   procedure Add_apta2sp( c : in out d.Criteria; apta2sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apta2sp", op, join, Long_Float( apta2sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta2sp;


   procedure Add_apta3sp( c : in out d.Criteria; apta3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apta3sp", op, join, apta3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta3sp;


   procedure Add_truta1sp( c : in out d.Criteria; truta1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truta1sp", op, join, Long_Float( truta1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta1sp;


   procedure Add_truta2sp( c : in out d.Criteria; truta2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truta2sp", op, join, truta2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta2sp;


   procedure Add_expta1sp( c : in out d.Criteria; expta1sp : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expta1sp", op, join, Long_Float( expta1sp ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta1sp;


   procedure Add_expta2sp( c : in out d.Criteria; expta2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expta2sp", op, join, expta2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta2sp;


   procedure Add_ocpti1hd( c : in out d.Criteria; ocpti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti1hd", op, join, ocpti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti1hd;


   procedure Add_ocpti2hd( c : in out d.Criteria; ocpti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti2hd", op, join, ocpti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti2hd;


   procedure Add_ocpti3hd( c : in out d.Criteria; ocpti3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti3hd", op, join, ocpti3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti3hd;


   procedure Add_ocpti4hd( c : in out d.Criteria; ocpti4hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti4hd", op, join, ocpti4hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti4hd;


   procedure Add_wpti1hd( c : in out d.Criteria; wpti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpti1hd", op, join, wpti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpti1hd;


   procedure Add_wppti2hd( c : in out d.Criteria; wppti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppti2hd", op, join, wppti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti2hd;


   procedure Add_wppti3hd( c : in out d.Criteria; wppti3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppti3hd", op, join, wppti3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti3hd;


   procedure Add_ppeti1hd( c : in out d.Criteria; ppeti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeti1hd", op, join, ppeti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti1hd;


   procedure Add_ppeti2hd( c : in out d.Criteria; ppeti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeti2hd", op, join, ppeti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti2hd;


   procedure Add_ppeti3hd( c : in out d.Criteria; ppeti3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeti3hd", op, join, ppeti3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti3hd;


   procedure Add_tupti1hd( c : in out d.Criteria; tupti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupti1hd", op, join, tupti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti1hd;


   procedure Add_tupti2hd( c : in out d.Criteria; tupti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupti2hd", op, join, tupti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti2hd;


   procedure Add_apti1hd( c : in out d.Criteria; apti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apti1hd", op, join, apti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti1hd;


   procedure Add_apti2hd( c : in out d.Criteria; apti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apti2hd", op, join, apti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti2hd;


   procedure Add_apti3hd( c : in out d.Criteria; apti3hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apti3hd", op, join, apti3hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti3hd;


   procedure Add_truti1hd( c : in out d.Criteria; truti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truti1hd", op, join, truti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti1hd;


   procedure Add_truti2hd( c : in out d.Criteria; truti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truti2hd", op, join, truti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti2hd;


   procedure Add_expti1hd( c : in out d.Criteria; expti1hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expti1hd", op, join, expti1hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti1hd;


   procedure Add_expti2hd( c : in out d.Criteria; expti2hd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expti2hd", op, join, expti2hd );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti2hd;


   procedure Add_ocpti1sp( c : in out d.Criteria; ocpti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti1sp", op, join, ocpti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti1sp;


   procedure Add_ocpti2sp( c : in out d.Criteria; ocpti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti2sp", op, join, ocpti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti2sp;


   procedure Add_ocpti3sp( c : in out d.Criteria; ocpti3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti3sp", op, join, ocpti3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti3sp;


   procedure Add_ocpti4sp( c : in out d.Criteria; ocpti4sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ocpti4sp", op, join, ocpti4sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti4sp;


   procedure Add_wpti1sp( c : in out d.Criteria; wpti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wpti1sp", op, join, wpti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpti1sp;


   procedure Add_wppti2sp( c : in out d.Criteria; wppti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppti2sp", op, join, wppti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti2sp;


   procedure Add_wppti3sp( c : in out d.Criteria; wppti3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wppti3sp", op, join, wppti3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti3sp;


   procedure Add_ppeti1sp( c : in out d.Criteria; ppeti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeti1sp", op, join, ppeti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti1sp;


   procedure Add_ppeti2sp( c : in out d.Criteria; ppeti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeti2sp", op, join, ppeti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti2sp;


   procedure Add_ppeti3sp( c : in out d.Criteria; ppeti3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ppeti3sp", op, join, ppeti3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti3sp;


   procedure Add_tupti1sp( c : in out d.Criteria; tupti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupti1sp", op, join, tupti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti1sp;


   procedure Add_tupti2sp( c : in out d.Criteria; tupti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tupti2sp", op, join, tupti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti2sp;


   procedure Add_apti1sp( c : in out d.Criteria; apti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apti1sp", op, join, apti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti1sp;


   procedure Add_apti2sp( c : in out d.Criteria; apti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apti2sp", op, join, apti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti2sp;


   procedure Add_apti3sp( c : in out d.Criteria; apti3sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "apti3sp", op, join, apti3sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti3sp;


   procedure Add_truti1sp( c : in out d.Criteria; truti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truti1sp", op, join, truti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti1sp;


   procedure Add_truti2sp( c : in out d.Criteria; truti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "truti2sp", op, join, truti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti2sp;


   procedure Add_expti1sp( c : in out d.Criteria; expti1sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expti1sp", op, join, expti1sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti1sp;


   procedure Add_expti2sp( c : in out d.Criteria; expti2sp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "expti2sp", op, join, expti2sp );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti2sp;


   procedure Add_menpin11( c : in out d.Criteria; menpin11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin11", op, join, menpin11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin11;


   procedure Add_menpin12( c : in out d.Criteria; menpin12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin12", op, join, menpin12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin12;


   procedure Add_menpin13( c : in out d.Criteria; menpin13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin13", op, join, menpin13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin13;


   procedure Add_menpin21( c : in out d.Criteria; menpin21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin21", op, join, menpin21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin21;


   procedure Add_menpin22( c : in out d.Criteria; menpin22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin22", op, join, menpin22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin22;


   procedure Add_menpin23( c : in out d.Criteria; menpin23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin23", op, join, menpin23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin23;


   procedure Add_menpin31( c : in out d.Criteria; menpin31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin31", op, join, menpin31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin31;


   procedure Add_menpin32( c : in out d.Criteria; menpin32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin32", op, join, menpin32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin32;


   procedure Add_menpin33( c : in out d.Criteria; menpin33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpin33", op, join, menpin33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin33;


   procedure Add_menpol11( c : in out d.Criteria; menpol11 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol11", op, join, Long_Float( menpol11 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol11;


   procedure Add_menpol12( c : in out d.Criteria; menpol12 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol12", op, join, Long_Float( menpol12 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol12;


   procedure Add_menpol13( c : in out d.Criteria; menpol13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol13", op, join, menpol13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol13;


   procedure Add_menpol21( c : in out d.Criteria; menpol21 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol21", op, join, Long_Float( menpol21 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol21;


   procedure Add_menpol22( c : in out d.Criteria; menpol22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol22", op, join, menpol22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol22;


   procedure Add_menpol23( c : in out d.Criteria; menpol23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol23", op, join, menpol23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol23;


   procedure Add_menpol31( c : in out d.Criteria; menpol31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol31", op, join, menpol31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol31;


   procedure Add_menpol32( c : in out d.Criteria; menpol32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol32", op, join, menpol32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol32;


   procedure Add_menpol33( c : in out d.Criteria; menpol33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol33", op, join, menpol33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol33;


   procedure Add_pmenpo11( c : in out d.Criteria; pmenpo11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo11", op, join, pmenpo11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo11;


   procedure Add_pmenpo12( c : in out d.Criteria; pmenpo12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo12", op, join, pmenpo12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo12;


   procedure Add_pmenpo13( c : in out d.Criteria; pmenpo13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo13", op, join, pmenpo13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo13;


   procedure Add_pmenpo21( c : in out d.Criteria; pmenpo21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo21", op, join, pmenpo21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo21;


   procedure Add_pmenpo22( c : in out d.Criteria; pmenpo22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo22", op, join, pmenpo22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo22;


   procedure Add_pmenpo23( c : in out d.Criteria; pmenpo23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo23", op, join, pmenpo23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo23;


   procedure Add_pmenpo31( c : in out d.Criteria; pmenpo31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo31", op, join, pmenpo31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo31;


   procedure Add_pmenpo32( c : in out d.Criteria; pmenpo32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo32", op, join, pmenpo32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo32;


   procedure Add_pmenpo33( c : in out d.Criteria; pmenpo33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmenpo33", op, join, pmenpo33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo33;


   procedure Add_bedroom( c : in out d.Criteria; bedroom : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bedroom", op, join, bedroom );
   begin
      d.add_to_criteria( c, elem );
   end Add_bedroom;


   procedure Add_benunits( c : in out d.Criteria; benunits : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "benunits", op, join, benunits );
   begin
      d.add_to_criteria( c, elem );
   end Add_benunits;


   procedure Add_billrate( c : in out d.Criteria; billrate : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "billrate", op, join, billrate );
   begin
      d.add_to_criteria( c, elem );
   end Add_billrate;


   procedure Add_brma( c : in out d.Criteria; brma : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "brma", op, join, brma );
   begin
      d.add_to_criteria( c, elem );
   end Add_brma;


   procedure Add_burden( c : in out d.Criteria; burden : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "burden", op, join, burden );
   begin
      d.add_to_criteria( c, elem );
   end Add_burden;


   procedure Add_busroom( c : in out d.Criteria; busroom : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "busroom", op, join, busroom );
   begin
      d.add_to_criteria( c, elem );
   end Add_busroom;


   procedure Add_capval( c : in out d.Criteria; capval : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "capval", op, join, capval );
   begin
      d.add_to_criteria( c, elem );
   end Add_capval;


   procedure Add_charge1( c : in out d.Criteria; charge1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge1", op, join, charge1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge1;


   procedure Add_charge2( c : in out d.Criteria; charge2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge2", op, join, charge2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge2;


   procedure Add_charge3( c : in out d.Criteria; charge3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge3", op, join, charge3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge3;


   procedure Add_charge4( c : in out d.Criteria; charge4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge4", op, join, charge4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge4;


   procedure Add_charge5( c : in out d.Criteria; charge5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge5", op, join, charge5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge5;


   procedure Add_charge6( c : in out d.Criteria; charge6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge6", op, join, charge6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge6;


   procedure Add_charge7( c : in out d.Criteria; charge7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge7", op, join, charge7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge7;


   procedure Add_charge8( c : in out d.Criteria; charge8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge8", op, join, charge8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge8;


   procedure Add_charge9( c : in out d.Criteria; charge9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "charge9", op, join, charge9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge9;


   procedure Add_chins( c : in out d.Criteria; chins : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chins", op, join, chins );
   begin
      d.add_to_criteria( c, elem );
   end Add_chins;


   procedure Add_chrgpd1( c : in out d.Criteria; chrgpd1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd1", op, join, chrgpd1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd1;


   procedure Add_chrgpd2( c : in out d.Criteria; chrgpd2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd2", op, join, chrgpd2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd2;


   procedure Add_chrgpd3( c : in out d.Criteria; chrgpd3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd3", op, join, chrgpd3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd3;


   procedure Add_chrgpd4( c : in out d.Criteria; chrgpd4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd4", op, join, chrgpd4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd4;


   procedure Add_chrgpd5( c : in out d.Criteria; chrgpd5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd5", op, join, chrgpd5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd5;


   procedure Add_chrgpd6( c : in out d.Criteria; chrgpd6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd6", op, join, chrgpd6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd6;


   procedure Add_chrgpd7( c : in out d.Criteria; chrgpd7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd7", op, join, chrgpd7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd7;


   procedure Add_chrgpd8( c : in out d.Criteria; chrgpd8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd8", op, join, chrgpd8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd8;


   procedure Add_chrgpd9( c : in out d.Criteria; chrgpd9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "chrgpd9", op, join, chrgpd9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd9;


   procedure Add_covoths( c : in out d.Criteria; covoths : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "covoths", op, join, covoths );
   begin
      d.add_to_criteria( c, elem );
   end Add_covoths;


   procedure Add_csewamt( c : in out d.Criteria; csewamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csewamt", op, join, Long_Float( csewamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_csewamt;


   procedure Add_csewamt1( c : in out d.Criteria; csewamt1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "csewamt1", op, join, Long_Float( csewamt1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_csewamt1;


   procedure Add_ct25d50d( c : in out d.Criteria; ct25d50d : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ct25d50d", op, join, ct25d50d );
   begin
      d.add_to_criteria( c, elem );
   end Add_ct25d50d;


   procedure Add_ctamt( c : in out d.Criteria; ctamt : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctamt", op, join, ctamt );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctamt;


   procedure Add_ctannual( c : in out d.Criteria; ctannual : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctannual", op, join, ctannual );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctannual;


   procedure Add_ctband( c : in out d.Criteria; ctband : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctband", op, join, ctband );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctband;


   procedure Add_ctbwait( c : in out d.Criteria; ctbwait : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctbwait", op, join, ctbwait );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctbwait;


   procedure Add_ctcondoc( c : in out d.Criteria; ctcondoc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctcondoc", op, join, ctcondoc );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctcondoc;


   procedure Add_ctdisc( c : in out d.Criteria; ctdisc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctdisc", op, join, ctdisc );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctdisc;


   procedure Add_ctinstal( c : in out d.Criteria; ctinstal : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctinstal", op, join, ctinstal );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctinstal;


   procedure Add_ctlvband( c : in out d.Criteria; ctlvband : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctlvband", op, join, ctlvband );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctlvband;


   procedure Add_ctlvchk( c : in out d.Criteria; ctlvchk : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctlvchk", op, join, ctlvchk );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctlvchk;


   procedure Add_ctreb( c : in out d.Criteria; ctreb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctreb", op, join, ctreb );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctreb;


   procedure Add_ctrebamt( c : in out d.Criteria; ctrebamt : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctrebamt", op, join, ctrebamt );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctrebamt;


   procedure Add_ctrebpd( c : in out d.Criteria; ctrebpd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctrebpd", op, join, ctrebpd );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctrebpd;


   procedure Add_cttime( c : in out d.Criteria; cttime : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cttime", op, join, cttime );
   begin
      d.add_to_criteria( c, elem );
   end Add_cttime;


   procedure Add_cwatamt( c : in out d.Criteria; cwatamt : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cwatamt", op, join, cwatamt );
   begin
      d.add_to_criteria( c, elem );
   end Add_cwatamt;


   procedure Add_cwatamt1( c : in out d.Criteria; cwatamt1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cwatamt1", op, join, cwatamt1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_cwatamt1;


   procedure Add_entry1( c : in out d.Criteria; entry1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "entry1", op, join, entry1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry1;


   procedure Add_entry2( c : in out d.Criteria; entry2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "entry2", op, join, entry2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry2;


   procedure Add_entry3( c : in out d.Criteria; entry3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "entry3", op, join, entry3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry3;


   procedure Add_entry4( c : in out d.Criteria; entry4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "entry4", op, join, entry4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry4;


   procedure Add_gvtregn( c : in out d.Criteria; gvtregn : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvtregn", op, join, gvtregn );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvtregn;


   procedure Add_gvtregno( c : in out d.Criteria; gvtregno : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvtregno", op, join, gvtregno );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvtregno;


   procedure Add_hhldr01( c : in out d.Criteria; hhldr01 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr01", op, join, hhldr01 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr01;


   procedure Add_hhldr02( c : in out d.Criteria; hhldr02 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr02", op, join, hhldr02 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr02;


   procedure Add_hhldr03( c : in out d.Criteria; hhldr03 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr03", op, join, hhldr03 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr03;


   procedure Add_hhldr04( c : in out d.Criteria; hhldr04 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr04", op, join, hhldr04 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr04;


   procedure Add_hhldr05( c : in out d.Criteria; hhldr05 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr05", op, join, hhldr05 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr05;


   procedure Add_hhldr06( c : in out d.Criteria; hhldr06 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr06", op, join, hhldr06 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr06;


   procedure Add_hhldr07( c : in out d.Criteria; hhldr07 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr07", op, join, hhldr07 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr07;


   procedure Add_hhldr08( c : in out d.Criteria; hhldr08 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr08", op, join, hhldr08 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr08;


   procedure Add_hhldr09( c : in out d.Criteria; hhldr09 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr09", op, join, hhldr09 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr09;


   procedure Add_hhldr10( c : in out d.Criteria; hhldr10 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr10", op, join, hhldr10 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr10;


   procedure Add_hhldr11( c : in out d.Criteria; hhldr11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr11", op, join, hhldr11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr11;


   procedure Add_hhldr12( c : in out d.Criteria; hhldr12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr12", op, join, hhldr12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr12;


   procedure Add_hhldr13( c : in out d.Criteria; hhldr13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr13", op, join, hhldr13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr13;


   procedure Add_hhldr14( c : in out d.Criteria; hhldr14 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr14", op, join, hhldr14 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr14;


   procedure Add_hhldr97( c : in out d.Criteria; hhldr97 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhldr97", op, join, hhldr97 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr97;


   procedure Add_hhstat( c : in out d.Criteria; hhstat : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhstat", op, join, hhstat );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhstat;


   procedure Add_hlthst( c : in out d.Criteria; hlthst : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hlthst", op, join, hlthst );
   begin
      d.add_to_criteria( c, elem );
   end Add_hlthst;


   procedure Add_intdate( c : in out d.Criteria; intdate : Ada.Calendar.Time; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intdate", op, join, Ada.Calendar.Time( intdate ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_intdate;


   procedure Add_mainacc( c : in out d.Criteria; mainacc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mainacc", op, join, mainacc );
   begin
      d.add_to_criteria( c, elem );
   end Add_mainacc;


   procedure Add_mnthcode( c : in out d.Criteria; mnthcode : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mnthcode", op, join, mnthcode );
   begin
      d.add_to_criteria( c, elem );
   end Add_mnthcode;


   procedure Add_monlive( c : in out d.Criteria; monlive : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "monlive", op, join, monlive );
   begin
      d.add_to_criteria( c, elem );
   end Add_monlive;


   procedure Add_multi( c : in out d.Criteria; multi : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "multi", op, join, multi );
   begin
      d.add_to_criteria( c, elem );
   end Add_multi;


   procedure Add_nicoun( c : in out d.Criteria; nicoun : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nicoun", op, join, nicoun );
   begin
      d.add_to_criteria( c, elem );
   end Add_nicoun;


   procedure Add_nidpnd( c : in out d.Criteria; nidpnd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nidpnd", op, join, nidpnd );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidpnd;


   procedure Add_nmrmshar( c : in out d.Criteria; nmrmshar : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nmrmshar", op, join, nmrmshar );
   begin
      d.add_to_criteria( c, elem );
   end Add_nmrmshar;


   procedure Add_nopay( c : in out d.Criteria; nopay : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nopay", op, join, nopay );
   begin
      d.add_to_criteria( c, elem );
   end Add_nopay;


   procedure Add_norate( c : in out d.Criteria; norate : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "norate", op, join, norate );
   begin
      d.add_to_criteria( c, elem );
   end Add_norate;


   procedure Add_onbsroom( c : in out d.Criteria; onbsroom : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "onbsroom", op, join, onbsroom );
   begin
      d.add_to_criteria( c, elem );
   end Add_onbsroom;


   procedure Add_orgid( c : in out d.Criteria; orgid : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "orgid", op, join, orgid );
   begin
      d.add_to_criteria( c, elem );
   end Add_orgid;


   procedure Add_payrate( c : in out d.Criteria; payrate : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "payrate", op, join, payrate );
   begin
      d.add_to_criteria( c, elem );
   end Add_payrate;


   procedure Add_ptbsroom( c : in out d.Criteria; ptbsroom : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptbsroom", op, join, ptbsroom );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptbsroom;


   procedure Add_rooms( c : in out d.Criteria; rooms : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rooms", op, join, rooms );
   begin
      d.add_to_criteria( c, elem );
   end Add_rooms;


   procedure Add_roomshr( c : in out d.Criteria; roomshr : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "roomshr", op, join, roomshr );
   begin
      d.add_to_criteria( c, elem );
   end Add_roomshr;


   procedure Add_rt2rebam( c : in out d.Criteria; rt2rebam : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rt2rebam", op, join, Long_Float( rt2rebam ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rt2rebam;


   procedure Add_rtannual( c : in out d.Criteria; rtannual : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtannual", op, join, Long_Float( rtannual ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtannual;


   procedure Add_rtcondoc( c : in out d.Criteria; rtcondoc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtcondoc", op, join, rtcondoc );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtcondoc;


   procedure Add_rtdpa( c : in out d.Criteria; rtdpa : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtdpa", op, join, rtdpa );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtdpa;


   procedure Add_rtdpaamt( c : in out d.Criteria; rtdpaamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtdpaamt", op, join, Long_Float( rtdpaamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtdpaamt;


   procedure Add_rtene( c : in out d.Criteria; rtene : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtene", op, join, rtene );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtene;


   procedure Add_rteneamt( c : in out d.Criteria; rteneamt : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rteneamt", op, join, rteneamt );
   begin
      d.add_to_criteria( c, elem );
   end Add_rteneamt;


   procedure Add_rtgen( c : in out d.Criteria; rtgen : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtgen", op, join, rtgen );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtgen;


   procedure Add_rtinstal( c : in out d.Criteria; rtinstal : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtinstal", op, join, rtinstal );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtinstal;


   procedure Add_rtlpa( c : in out d.Criteria; rtlpa : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtlpa", op, join, rtlpa );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtlpa;


   procedure Add_rtlpaamt( c : in out d.Criteria; rtlpaamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtlpaamt", op, join, Long_Float( rtlpaamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtlpaamt;


   procedure Add_rtothamt( c : in out d.Criteria; rtothamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtothamt", op, join, Long_Float( rtothamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtothamt;


   procedure Add_rtother( c : in out d.Criteria; rtother : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtother", op, join, rtother );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtother;


   procedure Add_rtreb( c : in out d.Criteria; rtreb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtreb", op, join, rtreb );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtreb;


   procedure Add_rtrebamt( c : in out d.Criteria; rtrebamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtrebamt", op, join, Long_Float( rtrebamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtrebamt;


   procedure Add_rtrtramt( c : in out d.Criteria; rtrtramt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rtrtramt", op, join, Long_Float( rtrtramt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtrtramt;


   procedure Add_rttimepd( c : in out d.Criteria; rttimepd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rttimepd", op, join, rttimepd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rttimepd;


   procedure Add_schbrk( c : in out d.Criteria; schbrk : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "schbrk", op, join, schbrk );
   begin
      d.add_to_criteria( c, elem );
   end Add_schbrk;


   procedure Add_schfrt( c : in out d.Criteria; schfrt : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "schfrt", op, join, schfrt );
   begin
      d.add_to_criteria( c, elem );
   end Add_schfrt;


   procedure Add_schmeal( c : in out d.Criteria; schmeal : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "schmeal", op, join, schmeal );
   begin
      d.add_to_criteria( c, elem );
   end Add_schmeal;


   procedure Add_schmilk( c : in out d.Criteria; schmilk : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "schmilk", op, join, schmilk );
   begin
      d.add_to_criteria( c, elem );
   end Add_schmilk;


   procedure Add_seramt1( c : in out d.Criteria; seramt1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seramt1", op, join, Long_Float( seramt1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt1;


   procedure Add_seramt2( c : in out d.Criteria; seramt2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seramt2", op, join, Long_Float( seramt2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt2;


   procedure Add_seramt3( c : in out d.Criteria; seramt3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seramt3", op, join, Long_Float( seramt3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt3;


   procedure Add_seramt4( c : in out d.Criteria; seramt4 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seramt4", op, join, Long_Float( seramt4 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt4;


   procedure Add_seramt5( c : in out d.Criteria; seramt5 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "seramt5", op, join, Long_Float( seramt5 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt5;


   procedure Add_sercomb( c : in out d.Criteria; sercomb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sercomb", op, join, sercomb );
   begin
      d.add_to_criteria( c, elem );
   end Add_sercomb;


   procedure Add_serpay1( c : in out d.Criteria; serpay1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpay1", op, join, serpay1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay1;


   procedure Add_serpay2( c : in out d.Criteria; serpay2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpay2", op, join, serpay2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay2;


   procedure Add_serpay3( c : in out d.Criteria; serpay3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpay3", op, join, serpay3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay3;


   procedure Add_serpay4( c : in out d.Criteria; serpay4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpay4", op, join, serpay4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay4;


   procedure Add_serpay5( c : in out d.Criteria; serpay5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpay5", op, join, serpay5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay5;


   procedure Add_sewamt( c : in out d.Criteria; sewamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewamt", op, join, Long_Float( sewamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewamt;


   procedure Add_sewanul( c : in out d.Criteria; sewanul : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewanul", op, join, Long_Float( sewanul ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewanul;


   procedure Add_sewerpay( c : in out d.Criteria; sewerpay : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewerpay", op, join, sewerpay );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewerpay;


   procedure Add_sewsep( c : in out d.Criteria; sewsep : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewsep", op, join, sewsep );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewsep;


   procedure Add_sewtime( c : in out d.Criteria; sewtime : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sewtime", op, join, sewtime );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewtime;


   procedure Add_shelter( c : in out d.Criteria; shelter : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "shelter", op, join, shelter );
   begin
      d.add_to_criteria( c, elem );
   end Add_shelter;


   procedure Add_sobuy( c : in out d.Criteria; sobuy : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sobuy", op, join, sobuy );
   begin
      d.add_to_criteria( c, elem );
   end Add_sobuy;


   procedure Add_stramt1( c : in out d.Criteria; stramt1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stramt1", op, join, Long_Float( stramt1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_stramt1;


   procedure Add_stramt2( c : in out d.Criteria; stramt2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stramt2", op, join, Long_Float( stramt2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_stramt2;


   procedure Add_strcov( c : in out d.Criteria; strcov : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "strcov", op, join, strcov );
   begin
      d.add_to_criteria( c, elem );
   end Add_strcov;


   procedure Add_strmort( c : in out d.Criteria; strmort : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "strmort", op, join, strmort );
   begin
      d.add_to_criteria( c, elem );
   end Add_strmort;


   procedure Add_stroths( c : in out d.Criteria; stroths : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "stroths", op, join, stroths );
   begin
      d.add_to_criteria( c, elem );
   end Add_stroths;


   procedure Add_strpd1( c : in out d.Criteria; strpd1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "strpd1", op, join, strpd1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_strpd1;


   procedure Add_strpd2( c : in out d.Criteria; strpd2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "strpd2", op, join, strpd2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_strpd2;


   procedure Add_suballow( c : in out d.Criteria; suballow : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "suballow", op, join, suballow );
   begin
      d.add_to_criteria( c, elem );
   end Add_suballow;


   procedure Add_sublet( c : in out d.Criteria; sublet : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sublet", op, join, sublet );
   begin
      d.add_to_criteria( c, elem );
   end Add_sublet;


   procedure Add_sublety( c : in out d.Criteria; sublety : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "sublety", op, join, sublety );
   begin
      d.add_to_criteria( c, elem );
   end Add_sublety;


   procedure Add_subrent( c : in out d.Criteria; subrent : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "subrent", op, join, Long_Float( subrent ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_subrent;


   procedure Add_tenure( c : in out d.Criteria; tenure : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tenure", op, join, tenure );
   begin
      d.add_to_criteria( c, elem );
   end Add_tenure;


   procedure Add_tvlic( c : in out d.Criteria; tvlic : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tvlic", op, join, tvlic );
   begin
      d.add_to_criteria( c, elem );
   end Add_tvlic;


   procedure Add_typeacc( c : in out d.Criteria; typeacc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "typeacc", op, join, typeacc );
   begin
      d.add_to_criteria( c, elem );
   end Add_typeacc;


   procedure Add_urb( c : in out d.Criteria; urb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "urb", op, join, urb );
   begin
      d.add_to_criteria( c, elem );
   end Add_urb;


   procedure Add_urbrur( c : in out d.Criteria; urbrur : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "urbrur", op, join, urbrur );
   begin
      d.add_to_criteria( c, elem );
   end Add_urbrur;


   procedure Add_urindew( c : in out d.Criteria; urindew : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "urindew", op, join, urindew );
   begin
      d.add_to_criteria( c, elem );
   end Add_urindew;


   procedure Add_urinds( c : in out d.Criteria; urinds : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "urinds", op, join, urinds );
   begin
      d.add_to_criteria( c, elem );
   end Add_urinds;


   procedure Add_watamt( c : in out d.Criteria; watamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "watamt", op, join, Long_Float( watamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_watamt;


   procedure Add_watanul( c : in out d.Criteria; watanul : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "watanul", op, join, Long_Float( watanul ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_watanul;


   procedure Add_watermet( c : in out d.Criteria; watermet : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "watermet", op, join, watermet );
   begin
      d.add_to_criteria( c, elem );
   end Add_watermet;


   procedure Add_waterpay( c : in out d.Criteria; waterpay : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "waterpay", op, join, waterpay );
   begin
      d.add_to_criteria( c, elem );
   end Add_waterpay;


   procedure Add_watrb( c : in out d.Criteria; watrb : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "watrb", op, join, watrb );
   begin
      d.add_to_criteria( c, elem );
   end Add_watrb;


   procedure Add_wattime( c : in out d.Criteria; wattime : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wattime", op, join, wattime );
   begin
      d.add_to_criteria( c, elem );
   end Add_wattime;


   procedure Add_whoctbot( c : in out d.Criteria; whoctbot : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whoctbot", op, join, whoctbot );
   begin
      d.add_to_criteria( c, elem );
   end Add_whoctbot;


   procedure Add_whorsp01( c : in out d.Criteria; whorsp01 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp01", op, join, whorsp01 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp01;


   procedure Add_whorsp02( c : in out d.Criteria; whorsp02 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp02", op, join, whorsp02 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp02;


   procedure Add_whorsp03( c : in out d.Criteria; whorsp03 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp03", op, join, whorsp03 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp03;


   procedure Add_whorsp04( c : in out d.Criteria; whorsp04 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp04", op, join, whorsp04 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp04;


   procedure Add_whorsp05( c : in out d.Criteria; whorsp05 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp05", op, join, whorsp05 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp05;


   procedure Add_whorsp06( c : in out d.Criteria; whorsp06 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp06", op, join, whorsp06 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp06;


   procedure Add_whorsp07( c : in out d.Criteria; whorsp07 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp07", op, join, whorsp07 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp07;


   procedure Add_whorsp08( c : in out d.Criteria; whorsp08 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp08", op, join, whorsp08 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp08;


   procedure Add_whorsp09( c : in out d.Criteria; whorsp09 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp09", op, join, whorsp09 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp09;


   procedure Add_whorsp10( c : in out d.Criteria; whorsp10 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp10", op, join, whorsp10 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp10;


   procedure Add_whorsp11( c : in out d.Criteria; whorsp11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp11", op, join, whorsp11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp11;


   procedure Add_whorsp12( c : in out d.Criteria; whorsp12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp12", op, join, whorsp12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp12;


   procedure Add_whorsp13( c : in out d.Criteria; whorsp13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp13", op, join, whorsp13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp13;


   procedure Add_whorsp14( c : in out d.Criteria; whorsp14 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whorsp14", op, join, whorsp14 );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp14;


   procedure Add_whynoct( c : in out d.Criteria; whynoct : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "whynoct", op, join, whynoct );
   begin
      d.add_to_criteria( c, elem );
   end Add_whynoct;


   procedure Add_wsewamt( c : in out d.Criteria; wsewamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsewamt", op, join, Long_Float( wsewamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsewamt;


   procedure Add_wsewanul( c : in out d.Criteria; wsewanul : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsewanul", op, join, Long_Float( wsewanul ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsewanul;


   procedure Add_wsewtime( c : in out d.Criteria; wsewtime : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsewtime", op, join, wsewtime );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsewtime;


   procedure Add_yearlive( c : in out d.Criteria; yearlive : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yearlive", op, join, yearlive );
   begin
      d.add_to_criteria( c, elem );
   end Add_yearlive;


   procedure Add_yearwhc( c : in out d.Criteria; yearwhc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "yearwhc", op, join, yearwhc );
   begin
      d.add_to_criteria( c, elem );
   end Add_yearwhc;


   procedure Add_adulth( c : in out d.Criteria; adulth : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "adulth", op, join, adulth );
   begin
      d.add_to_criteria( c, elem );
   end Add_adulth;


   procedure Add_cwatamtd( c : in out d.Criteria; cwatamtd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "cwatamtd", op, join, cwatamtd );
   begin
      d.add_to_criteria( c, elem );
   end Add_cwatamtd;


   procedure Add_depchldh( c : in out d.Criteria; depchldh : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "depchldh", op, join, depchldh );
   begin
      d.add_to_criteria( c, elem );
   end Add_depchldh;


   procedure Add_dischha1( c : in out d.Criteria; dischha1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dischha1", op, join, dischha1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dischha1;


   procedure Add_dischhc1( c : in out d.Criteria; dischhc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "dischhc1", op, join, dischhc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_dischhc1;


   procedure Add_diswhha1( c : in out d.Criteria; diswhha1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "diswhha1", op, join, diswhha1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswhha1;


   procedure Add_diswhhc1( c : in out d.Criteria; diswhhc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "diswhhc1", op, join, diswhhc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswhhc1;


   procedure Add_endowpay( c : in out d.Criteria; endowpay : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endowpay", op, join, Long_Float( endowpay ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_endowpay;


   procedure Add_gbhscost( c : in out d.Criteria; gbhscost : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gbhscost", op, join, gbhscost );
   begin
      d.add_to_criteria( c, elem );
   end Add_gbhscost;


   procedure Add_grossct( c : in out d.Criteria; grossct : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "grossct", op, join, grossct );
   begin
      d.add_to_criteria( c, elem );
   end Add_grossct;


   procedure Add_hbeninc( c : in out d.Criteria; hbeninc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbeninc", op, join, hbeninc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbeninc;


   procedure Add_hbindhh( c : in out d.Criteria; hbindhh : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbindhh", op, join, hbindhh );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindhh;


   procedure Add_hbindhh2( c : in out d.Criteria; hbindhh2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbindhh2", op, join, hbindhh2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindhh2;


   procedure Add_hearns( c : in out d.Criteria; hearns : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hearns", op, join, hearns );
   begin
      d.add_to_criteria( c, elem );
   end Add_hearns;


   procedure Add_hhdisben( c : in out d.Criteria; hhdisben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhdisben", op, join, hhdisben );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhdisben;


   procedure Add_hhinc( c : in out d.Criteria; hhinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhinc", op, join, hhinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhinc;


   procedure Add_hhinv( c : in out d.Criteria; hhinv : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhinv", op, join, hhinv );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhinv;


   procedure Add_hhirben( c : in out d.Criteria; hhirben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhirben", op, join, hhirben );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhirben;


   procedure Add_hhnirben( c : in out d.Criteria; hhnirben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhnirben", op, join, hhnirben );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhnirben;


   procedure Add_hhothben( c : in out d.Criteria; hhothben : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhothben", op, join, hhothben );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhothben;


   procedure Add_hhrent( c : in out d.Criteria; hhrent : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhrent", op, join, hhrent );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhrent;


   procedure Add_hhrinc( c : in out d.Criteria; hhrinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhrinc", op, join, hhrinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhrinc;


   procedure Add_hhrpinc( c : in out d.Criteria; hhrpinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhrpinc", op, join, hhrpinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhrpinc;


   procedure Add_hhtvlic( c : in out d.Criteria; hhtvlic : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhtvlic", op, join, Long_Float( hhtvlic ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhtvlic;


   procedure Add_hhtxcred( c : in out d.Criteria; hhtxcred : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hhtxcred", op, join, hhtxcred );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhtxcred;


   procedure Add_hothinc( c : in out d.Criteria; hothinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hothinc", op, join, hothinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hothinc;


   procedure Add_hpeninc( c : in out d.Criteria; hpeninc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hpeninc", op, join, hpeninc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpeninc;


   procedure Add_hseinc( c : in out d.Criteria; hseinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hseinc", op, join, hseinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_hseinc;


   procedure Add_london( c : in out d.Criteria; london : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "london", op, join, london );
   begin
      d.add_to_criteria( c, elem );
   end Add_london;


   procedure Add_mortint( c : in out d.Criteria; mortint : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortint", op, join, Long_Float( mortint ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortint;


   procedure Add_nihscost( c : in out d.Criteria; nihscost : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "nihscost", op, join, nihscost );
   begin
      d.add_to_criteria( c, elem );
   end Add_nihscost;


   procedure Add_penage( c : in out d.Criteria; penage : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penage", op, join, penage );
   begin
      d.add_to_criteria( c, elem );
   end Add_penage;


   procedure Add_penhrp( c : in out d.Criteria; penhrp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "penhrp", op, join, penhrp );
   begin
      d.add_to_criteria( c, elem );
   end Add_penhrp;


   procedure Add_ptentyp2( c : in out d.Criteria; ptentyp2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ptentyp2", op, join, ptentyp2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptentyp2;


   procedure Add_servpay( c : in out d.Criteria; servpay : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "servpay", op, join, Long_Float( servpay ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_servpay;


   procedure Add_struins( c : in out d.Criteria; struins : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "struins", op, join, Long_Float( struins ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_struins;


   procedure Add_tentyp2( c : in out d.Criteria; tentyp2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tentyp2", op, join, tentyp2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_tentyp2;


   procedure Add_tuhhrent( c : in out d.Criteria; tuhhrent : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuhhrent", op, join, tuhhrent );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuhhrent;


   procedure Add_tuwatsew( c : in out d.Criteria; tuwatsew : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tuwatsew", op, join, Long_Float( tuwatsew ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuwatsew;


   procedure Add_watsewrt( c : in out d.Criteria; watsewrt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "watsewrt", op, join, Long_Float( watsewrt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_watsewrt;


   procedure Add_hcgrent( c : in out d.Criteria; hcgrent : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcgrent", op, join, Long_Float( hcgrent ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcgrent;


   procedure Add_hcfeudut( c : in out d.Criteria; hcfeudut : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcfeudut", op, join, hcfeudut );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcfeudut;


   procedure Add_hcchrent( c : in out d.Criteria; hcchrent : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcchrent", op, join, Long_Float( hcchrent ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcchrent;


   procedure Add_hcservch( c : in out d.Criteria; hcservch : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcservch", op, join, Long_Float( hcservch ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcservch;


   procedure Add_hcmaint( c : in out d.Criteria; hcmaint : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcmaint", op, join, Long_Float( hcmaint ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcmaint;


   procedure Add_hcsirent( c : in out d.Criteria; hcsirent : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcsirent", op, join, Long_Float( hcsirent ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcsirent;


   procedure Add_hcfactor( c : in out d.Criteria; hcfactor : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcfactor", op, join, Long_Float( hcfactor ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcfactor;


   procedure Add_hcother( c : in out d.Criteria; hcother : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcother", op, join, Long_Float( hcother ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcother;


   procedure Add_hcpcomb( c : in out d.Criteria; hcpcomb : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hcpcomb", op, join, Long_Float( hcpcomb ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcpcomb;


   procedure Add_gvhelp( c : in out d.Criteria; gvhelp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gvhelp", op, join, gvhelp );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvhelp;


   procedure Add_lacode( c : in out d.Criteria; lacode : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lacode", op, join, lacode );
   begin
      d.add_to_criteria( c, elem );
   end Add_lacode;


   procedure Add_lauacode( c : in out d.Criteria; lauacode : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lauacode", op, join, lauacode );
   begin
      d.add_to_criteria( c, elem );
   end Add_lauacode;


   procedure Add_llcare( c : in out d.Criteria; llcare : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "llcare", op, join, llcare );
   begin
      d.add_to_criteria( c, elem );
   end Add_llcare;


   procedure Add_needcare( c : in out d.Criteria; needcare : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "needcare", op, join, needcare );
   begin
      d.add_to_criteria( c, elem );
   end Add_needcare;


   procedure Add_colourtv( c : in out d.Criteria; colourtv : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "colourtv", op, join, colourtv );
   begin
      d.add_to_criteria( c, elem );
   end Add_colourtv;


   procedure Add_bwtv( c : in out d.Criteria; bwtv : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "bwtv", op, join, bwtv );
   begin
      d.add_to_criteria( c, elem );
   end Add_bwtv;


   procedure Add_serpd1( c : in out d.Criteria; serpd1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpd1", op, join, serpd1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd1;


   procedure Add_serpd2( c : in out d.Criteria; serpd2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpd2", op, join, serpd2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd2;


   procedure Add_serpd3( c : in out d.Criteria; serpd3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpd3", op, join, serpd3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd3;


   procedure Add_serpd4( c : in out d.Criteria; serpd4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpd4", op, join, serpd4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd4;


   procedure Add_serpd5( c : in out d.Criteria; serpd5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serpd5", op, join, serpd5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd5;


   procedure Add_outsam11( c : in out d.Criteria; outsam11 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsam11", op, join, Long_Float( outsam11 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam11;


   procedure Add_outsam12( c : in out d.Criteria; outsam12 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsam12", op, join, Long_Float( outsam12 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam12;


   procedure Add_outsam21( c : in out d.Criteria; outsam21 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsam21", op, join, Long_Float( outsam21 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam21;


   procedure Add_outsam22( c : in out d.Criteria; outsam22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsam22", op, join, outsam22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam22;


   procedure Add_outsam31( c : in out d.Criteria; outsam31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsam31", op, join, outsam31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam31;


   procedure Add_outsam32( c : in out d.Criteria; outsam32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsam32", op, join, outsam32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam32;


   procedure Add_outsin11( c : in out d.Criteria; outsin11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsin11", op, join, outsin11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin11;


   procedure Add_outsin12( c : in out d.Criteria; outsin12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsin12", op, join, outsin12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin12;


   procedure Add_outsin21( c : in out d.Criteria; outsin21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsin21", op, join, outsin21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin21;


   procedure Add_outsin22( c : in out d.Criteria; outsin22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsin22", op, join, outsin22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin22;


   procedure Add_outsin31( c : in out d.Criteria; outsin31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsin31", op, join, outsin31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin31;


   procedure Add_outsin32( c : in out d.Criteria; outsin32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsin32", op, join, outsin32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin32;


   procedure Add_outspa11( c : in out d.Criteria; outspa11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspa11", op, join, outspa11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa11;


   procedure Add_outspa12( c : in out d.Criteria; outspa12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspa12", op, join, outspa12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa12;


   procedure Add_outspa21( c : in out d.Criteria; outspa21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspa21", op, join, outspa21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa21;


   procedure Add_outspa22( c : in out d.Criteria; outspa22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspa22", op, join, outspa22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa22;


   procedure Add_outspa31( c : in out d.Criteria; outspa31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspa31", op, join, outspa31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa31;


   procedure Add_outspa32( c : in out d.Criteria; outspa32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspa32", op, join, outspa32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa32;


   procedure Add_outspd11( c : in out d.Criteria; outspd11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspd11", op, join, outspd11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd11;


   procedure Add_outspd12( c : in out d.Criteria; outspd12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspd12", op, join, outspd12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd12;


   procedure Add_outspd21( c : in out d.Criteria; outspd21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspd21", op, join, outspd21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd21;


   procedure Add_outspd22( c : in out d.Criteria; outspd22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspd22", op, join, outspd22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd22;


   procedure Add_outspd31( c : in out d.Criteria; outspd31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspd31", op, join, outspd31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd31;


   procedure Add_outspd32( c : in out d.Criteria; outspd32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outspd32", op, join, outspd32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd32;


   procedure Add_borramt1( c : in out d.Criteria; borramt1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "borramt1", op, join, Long_Float( borramt1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_borramt1;


   procedure Add_borramt2( c : in out d.Criteria; borramt2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "borramt2", op, join, borramt2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_borramt2;


   procedure Add_borramt3( c : in out d.Criteria; borramt3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "borramt3", op, join, borramt3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_borramt3;


   procedure Add_endwp11( c : in out d.Criteria; endwp11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp11", op, join, endwp11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp11;


   procedure Add_endwp12( c : in out d.Criteria; endwp12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp12", op, join, endwp12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp12;


   procedure Add_endwp13( c : in out d.Criteria; endwp13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp13", op, join, endwp13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp13;


   procedure Add_endwp21( c : in out d.Criteria; endwp21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp21", op, join, endwp21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp21;


   procedure Add_endwp22( c : in out d.Criteria; endwp22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp22", op, join, endwp22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp22;


   procedure Add_endwp23( c : in out d.Criteria; endwp23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp23", op, join, endwp23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp23;


   procedure Add_endwp31( c : in out d.Criteria; endwp31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp31", op, join, endwp31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp31;


   procedure Add_endwp32( c : in out d.Criteria; endwp32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp32", op, join, endwp32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp32;


   procedure Add_endwp33( c : in out d.Criteria; endwp33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp33", op, join, endwp33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp33;


   procedure Add_endwp41( c : in out d.Criteria; endwp41 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp41", op, join, endwp41 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp41;


   procedure Add_endwp42( c : in out d.Criteria; endwp42 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp42", op, join, endwp42 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp42;


   procedure Add_endwp43( c : in out d.Criteria; endwp43 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp43", op, join, endwp43 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp43;


   procedure Add_endwp51( c : in out d.Criteria; endwp51 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp51", op, join, endwp51 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp51;


   procedure Add_endwp52( c : in out d.Criteria; endwp52 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp52", op, join, endwp52 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp52;


   procedure Add_endwp53( c : in out d.Criteria; endwp53 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "endwp53", op, join, endwp53 );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp53;


   procedure Add_incmin11( c : in out d.Criteria; incmin11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin11", op, join, incmin11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin11;


   procedure Add_incmin12( c : in out d.Criteria; incmin12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin12", op, join, incmin12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin12;


   procedure Add_incmin13( c : in out d.Criteria; incmin13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin13", op, join, incmin13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin13;


   procedure Add_incmin21( c : in out d.Criteria; incmin21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin21", op, join, incmin21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin21;


   procedure Add_incmin22( c : in out d.Criteria; incmin22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin22", op, join, incmin22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin22;


   procedure Add_incmin23( c : in out d.Criteria; incmin23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin23", op, join, incmin23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin23;


   procedure Add_incmin31( c : in out d.Criteria; incmin31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin31", op, join, incmin31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin31;


   procedure Add_incmin32( c : in out d.Criteria; incmin32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin32", op, join, incmin32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin32;


   procedure Add_incmin33( c : in out d.Criteria; incmin33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmin33", op, join, incmin33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin33;


   procedure Add_incmp11( c : in out d.Criteria; incmp11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp11", op, join, incmp11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp11;


   procedure Add_incmp12( c : in out d.Criteria; incmp12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp12", op, join, incmp12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp12;


   procedure Add_incmp13( c : in out d.Criteria; incmp13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp13", op, join, incmp13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp13;


   procedure Add_incmp21( c : in out d.Criteria; incmp21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp21", op, join, incmp21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp21;


   procedure Add_incmp22( c : in out d.Criteria; incmp22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp22", op, join, incmp22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp22;


   procedure Add_incmp23( c : in out d.Criteria; incmp23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp23", op, join, incmp23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp23;


   procedure Add_incmp31( c : in out d.Criteria; incmp31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp31", op, join, incmp31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp31;


   procedure Add_incmp32( c : in out d.Criteria; incmp32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp32", op, join, incmp32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp32;


   procedure Add_incmp33( c : in out d.Criteria; incmp33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmp33", op, join, incmp33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp33;


   procedure Add_incmpa11( c : in out d.Criteria; incmpa11 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa11", op, join, Long_Float( incmpa11 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa11;


   procedure Add_incmpa12( c : in out d.Criteria; incmpa12 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa12", op, join, Long_Float( incmpa12 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa12;


   procedure Add_incmpa13( c : in out d.Criteria; incmpa13 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa13", op, join, Long_Float( incmpa13 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa13;


   procedure Add_incmpa21( c : in out d.Criteria; incmpa21 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa21", op, join, Long_Float( incmpa21 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa21;


   procedure Add_incmpa22( c : in out d.Criteria; incmpa22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa22", op, join, incmpa22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa22;


   procedure Add_incmpa23( c : in out d.Criteria; incmpa23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa23", op, join, incmpa23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa23;


   procedure Add_incmpa31( c : in out d.Criteria; incmpa31 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa31", op, join, Long_Float( incmpa31 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa31;


   procedure Add_incmpa32( c : in out d.Criteria; incmpa32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa32", op, join, incmpa32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa32;


   procedure Add_incmpa33( c : in out d.Criteria; incmpa33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "incmpa33", op, join, incmpa33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa33;


   procedure Add_pincmp11( c : in out d.Criteria; pincmp11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp11", op, join, pincmp11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp11;


   procedure Add_pincmp12( c : in out d.Criteria; pincmp12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp12", op, join, pincmp12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp12;


   procedure Add_pincmp13( c : in out d.Criteria; pincmp13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp13", op, join, pincmp13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp13;


   procedure Add_pincmp21( c : in out d.Criteria; pincmp21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp21", op, join, pincmp21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp21;


   procedure Add_pincmp22( c : in out d.Criteria; pincmp22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp22", op, join, pincmp22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp22;


   procedure Add_pincmp23( c : in out d.Criteria; pincmp23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp23", op, join, pincmp23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp23;


   procedure Add_pincmp31( c : in out d.Criteria; pincmp31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp31", op, join, pincmp31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp31;


   procedure Add_pincmp32( c : in out d.Criteria; pincmp32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp32", op, join, pincmp32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp32;


   procedure Add_pincmp33( c : in out d.Criteria; pincmp33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pincmp33", op, join, pincmp33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp33;


   procedure Add_intpri1( c : in out d.Criteria; intpri1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intpri1", op, join, Long_Float( intpri1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_intpri1;


   procedure Add_intpri2( c : in out d.Criteria; intpri2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intpri2", op, join, Long_Float( intpri2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_intpri2;


   procedure Add_intpri3( c : in out d.Criteria; intpri3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "intpri3", op, join, Long_Float( intpri3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_intpri3;


   procedure Add_pintrpi1( c : in out d.Criteria; pintrpi1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pintrpi1", op, join, pintrpi1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pintrpi1;


   procedure Add_pintrpi2( c : in out d.Criteria; pintrpi2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pintrpi2", op, join, pintrpi2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pintrpi2;


   procedure Add_pintrpi3( c : in out d.Criteria; pintrpi3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pintrpi3", op, join, pintrpi3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pintrpi3;


   procedure Add_loanyr1( c : in out d.Criteria; loanyr1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loanyr1", op, join, loanyr1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanyr1;


   procedure Add_loanyr2( c : in out d.Criteria; loanyr2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loanyr2", op, join, loanyr2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanyr2;


   procedure Add_loanyr3( c : in out d.Criteria; loanyr3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "loanyr3", op, join, loanyr3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanyr3;


   procedure Add_menpol1( c : in out d.Criteria; menpol1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol1", op, join, menpol1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol1;


   procedure Add_menpol2( c : in out d.Criteria; menpol2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol2", op, join, menpol2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol2;


   procedure Add_menpol3( c : in out d.Criteria; menpol3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "menpol3", op, join, menpol3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol3;


   procedure Add_morall1( c : in out d.Criteria; morall1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morall1", op, join, morall1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morall1;


   procedure Add_morall2( c : in out d.Criteria; morall2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morall2", op, join, morall2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morall2;


   procedure Add_morall3( c : in out d.Criteria; morall3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morall3", op, join, morall3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morall3;


   procedure Add_morflc1( c : in out d.Criteria; morflc1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morflc1", op, join, morflc1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morflc1;


   procedure Add_morflc2( c : in out d.Criteria; morflc2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morflc2", op, join, morflc2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morflc2;


   procedure Add_morflc3( c : in out d.Criteria; morflc3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morflc3", op, join, morflc3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morflc3;


   procedure Add_morinp1( c : in out d.Criteria; morinp1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morinp1", op, join, Long_Float( morinp1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinp1;


   procedure Add_morinp2( c : in out d.Criteria; morinp2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morinp2", op, join, Long_Float( morinp2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinp2;


   procedure Add_morinp3( c : in out d.Criteria; morinp3 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morinp3", op, join, Long_Float( morinp3 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinp3;


   procedure Add_pmorinp1( c : in out d.Criteria; pmorinp1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmorinp1", op, join, pmorinp1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmorinp1;


   procedure Add_pmorinp2( c : in out d.Criteria; pmorinp2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmorinp2", op, join, pmorinp2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmorinp2;


   procedure Add_pmorinp3( c : in out d.Criteria; pmorinp3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "pmorinp3", op, join, pmorinp3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmorinp3;


   procedure Add_morinus1( c : in out d.Criteria; morinus1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morinus1", op, join, morinus1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinus1;


   procedure Add_morinus2( c : in out d.Criteria; morinus2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morinus2", op, join, morinus2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinus2;


   procedure Add_morinus3( c : in out d.Criteria; morinus3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morinus3", op, join, morinus3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinus3;


   procedure Add_mortend1( c : in out d.Criteria; mortend1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortend1", op, join, mortend1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortend1;


   procedure Add_mortend2( c : in out d.Criteria; mortend2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortend2", op, join, mortend2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortend2;


   procedure Add_mortend3( c : in out d.Criteria; mortend3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortend3", op, join, mortend3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortend3;


   procedure Add_mortlef1( c : in out d.Criteria; mortlef1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortlef1", op, join, Long_Float( mortlef1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortlef1;


   procedure Add_mortlef2( c : in out d.Criteria; mortlef2 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortlef2", op, join, Long_Float( mortlef2 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortlef2;


   procedure Add_mortlef3( c : in out d.Criteria; mortlef3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortlef3", op, join, mortlef3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortlef3;


   procedure Add_mortpro1( c : in out d.Criteria; mortpro1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortpro1", op, join, mortpro1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortpro1;


   procedure Add_mortpro2( c : in out d.Criteria; mortpro2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortpro2", op, join, mortpro2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortpro2;


   procedure Add_mortpro3( c : in out d.Criteria; mortpro3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mortpro3", op, join, mortpro3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortpro3;


   procedure Add_morttyp1( c : in out d.Criteria; morttyp1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morttyp1", op, join, morttyp1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morttyp1;


   procedure Add_morttyp2( c : in out d.Criteria; morttyp2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morttyp2", op, join, morttyp2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morttyp2;


   procedure Add_morttyp3( c : in out d.Criteria; morttyp3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morttyp3", op, join, morttyp3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morttyp3;


   procedure Add_morupd1( c : in out d.Criteria; morupd1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morupd1", op, join, morupd1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morupd1;


   procedure Add_morupd2( c : in out d.Criteria; morupd2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morupd2", op, join, morupd2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morupd2;


   procedure Add_morupd3( c : in out d.Criteria; morupd3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morupd3", op, join, morupd3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morupd3;


   procedure Add_morus1( c : in out d.Criteria; morus1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morus1", op, join, Long_Float( morus1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_morus1;


   procedure Add_morus2( c : in out d.Criteria; morus2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morus2", op, join, morus2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morus2;


   procedure Add_morus3( c : in out d.Criteria; morus3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "morus3", op, join, morus3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_morus3;


   procedure Add_mpcove11( c : in out d.Criteria; mpcove11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove11", op, join, mpcove11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove11;


   procedure Add_mpcove12( c : in out d.Criteria; mpcove12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove12", op, join, mpcove12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove12;


   procedure Add_mpcove13( c : in out d.Criteria; mpcove13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove13", op, join, mpcove13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove13;


   procedure Add_mpcove21( c : in out d.Criteria; mpcove21 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove21", op, join, mpcove21 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove21;


   procedure Add_mpcove22( c : in out d.Criteria; mpcove22 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove22", op, join, mpcove22 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove22;


   procedure Add_mpcove23( c : in out d.Criteria; mpcove23 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove23", op, join, mpcove23 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove23;


   procedure Add_mpcove31( c : in out d.Criteria; mpcove31 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove31", op, join, mpcove31 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove31;


   procedure Add_mpcove32( c : in out d.Criteria; mpcove32 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove32", op, join, mpcove32 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove32;


   procedure Add_mpcove33( c : in out d.Criteria; mpcove33 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "mpcove33", op, join, mpcove33 );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove33;


   procedure Add_outsmor1( c : in out d.Criteria; outsmor1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsmor1", op, join, outsmor1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsmor1;


   procedure Add_outsmor2( c : in out d.Criteria; outsmor2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsmor2", op, join, outsmor2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsmor2;


   procedure Add_outsmor3( c : in out d.Criteria; outsmor3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "outsmor3", op, join, outsmor3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsmor3;


   procedure Add_rmamt1( c : in out d.Criteria; rmamt1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmamt1", op, join, Long_Float( rmamt1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmamt1;


   procedure Add_rmamt2( c : in out d.Criteria; rmamt2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmamt2", op, join, rmamt2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmamt2;


   procedure Add_rmamt3( c : in out d.Criteria; rmamt3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmamt3", op, join, rmamt3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmamt3;


   procedure Add_rmort1( c : in out d.Criteria; rmort1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmort1", op, join, rmort1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmort1;


   procedure Add_rmort2( c : in out d.Criteria; rmort2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmort2", op, join, rmort2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmort2;


   procedure Add_rmort3( c : in out d.Criteria; rmort3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmort3", op, join, rmort3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmort3;


   procedure Add_rmortyr1( c : in out d.Criteria; rmortyr1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmortyr1", op, join, rmortyr1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmortyr1;


   procedure Add_rmortyr2( c : in out d.Criteria; rmortyr2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmortyr2", op, join, rmortyr2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmortyr2;


   procedure Add_rmortyr3( c : in out d.Criteria; rmortyr3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmortyr3", op, join, rmortyr3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmortyr3;


   procedure Add_rmpur011( c : in out d.Criteria; rmpur011 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur011", op, join, rmpur011 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur011;


   procedure Add_rmpur012( c : in out d.Criteria; rmpur012 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur012", op, join, rmpur012 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur012;


   procedure Add_rmpur013( c : in out d.Criteria; rmpur013 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur013", op, join, rmpur013 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur013;


   procedure Add_rmpur021( c : in out d.Criteria; rmpur021 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur021", op, join, rmpur021 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur021;


   procedure Add_rmpur022( c : in out d.Criteria; rmpur022 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur022", op, join, rmpur022 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur022;


   procedure Add_rmpur023( c : in out d.Criteria; rmpur023 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur023", op, join, rmpur023 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur023;


   procedure Add_rmpur031( c : in out d.Criteria; rmpur031 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur031", op, join, rmpur031 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur031;


   procedure Add_rmpur032( c : in out d.Criteria; rmpur032 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur032", op, join, rmpur032 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur032;


   procedure Add_rmpur033( c : in out d.Criteria; rmpur033 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur033", op, join, rmpur033 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur033;


   procedure Add_rmpur041( c : in out d.Criteria; rmpur041 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur041", op, join, rmpur041 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur041;


   procedure Add_rmpur042( c : in out d.Criteria; rmpur042 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur042", op, join, rmpur042 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur042;


   procedure Add_rmpur043( c : in out d.Criteria; rmpur043 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur043", op, join, rmpur043 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur043;


   procedure Add_rmpur051( c : in out d.Criteria; rmpur051 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur051", op, join, rmpur051 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur051;


   procedure Add_rmpur052( c : in out d.Criteria; rmpur052 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur052", op, join, rmpur052 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur052;


   procedure Add_rmpur053( c : in out d.Criteria; rmpur053 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur053", op, join, rmpur053 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur053;


   procedure Add_rmpur061( c : in out d.Criteria; rmpur061 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur061", op, join, rmpur061 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur061;


   procedure Add_rmpur062( c : in out d.Criteria; rmpur062 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur062", op, join, rmpur062 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur062;


   procedure Add_rmpur063( c : in out d.Criteria; rmpur063 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur063", op, join, rmpur063 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur063;


   procedure Add_rmpur071( c : in out d.Criteria; rmpur071 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur071", op, join, rmpur071 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur071;


   procedure Add_rmpur072( c : in out d.Criteria; rmpur072 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur072", op, join, rmpur072 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur072;


   procedure Add_rmpur073( c : in out d.Criteria; rmpur073 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur073", op, join, rmpur073 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur073;


   procedure Add_rmpur081( c : in out d.Criteria; rmpur081 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur081", op, join, rmpur081 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur081;


   procedure Add_rmpur082( c : in out d.Criteria; rmpur082 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur082", op, join, rmpur082 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur082;


   procedure Add_rmpur083( c : in out d.Criteria; rmpur083 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rmpur083", op, join, rmpur083 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur083;


   procedure Add_buyyear( c : in out d.Criteria; buyyear : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "buyyear", op, join, buyyear );
   begin
      d.add_to_criteria( c, elem );
   end Add_buyyear;


   procedure Add_purcamt( c : in out d.Criteria; purcamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "purcamt", op, join, Long_Float( purcamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_purcamt;


   procedure Add_purcloan( c : in out d.Criteria; purcloan : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "purcloan", op, join, purcloan );
   begin
      d.add_to_criteria( c, elem );
   end Add_purcloan;


   procedure Add_secmpur3( c : in out d.Criteria; secmpur3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur3", op, join, secmpur3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur3;


   procedure Add_secmpur4( c : in out d.Criteria; secmpur4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur4", op, join, secmpur4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur4;


   procedure Add_secmpur1( c : in out d.Criteria; secmpur1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur1", op, join, secmpur1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur1;


   procedure Add_secmpur5( c : in out d.Criteria; secmpur5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur5", op, join, secmpur5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur5;


   procedure Add_secmpur6( c : in out d.Criteria; secmpur6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur6", op, join, secmpur6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur6;


   procedure Add_secmpur2( c : in out d.Criteria; secmpur2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur2", op, join, secmpur2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur2;


   procedure Add_secmpur7( c : in out d.Criteria; secmpur7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "secmpur7", op, join, secmpur7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur7;


   procedure Add_rexhham1( c : in out d.Criteria; rexhham1 : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rexhham1", op, join, Long_Float( rexhham1 ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rexhham1;


   procedure Add_accchk1( c : in out d.Criteria; accchk1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accchk1", op, join, accchk1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accchk1;


   procedure Add_rexhhwh1( c : in out d.Criteria; rexhhwh1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rexhhwh1", op, join, rexhhwh1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rexhhwh1;


   procedure Add_prexhha1( c : in out d.Criteria; prexhha1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "prexhha1", op, join, prexhha1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_prexhha1;


   procedure Add_accjbp10( c : in out d.Criteria; accjbp10 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp10", op, join, accjbp10 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp10;


   procedure Add_accjbp11( c : in out d.Criteria; accjbp11 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp11", op, join, accjbp11 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp11;


   procedure Add_accjbp12( c : in out d.Criteria; accjbp12 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp12", op, join, accjbp12 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp12;


   procedure Add_accjbp13( c : in out d.Criteria; accjbp13 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp13", op, join, accjbp13 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp13;


   procedure Add_accjbp14( c : in out d.Criteria; accjbp14 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp14", op, join, accjbp14 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp14;


   procedure Add_accjob( c : in out d.Criteria; accjob : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjob", op, join, accjob );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjob;


   procedure Add_ctract( c : in out d.Criteria; ctract : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ctract", op, join, ctract );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctract;


   procedure Add_eligamt( c : in out d.Criteria; eligamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "eligamt", op, join, Long_Float( eligamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_eligamt;


   procedure Add_eligpd( c : in out d.Criteria; eligpd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "eligpd", op, join, eligpd );
   begin
      d.add_to_criteria( c, elem );
   end Add_eligpd;


   procedure Add_fairrent( c : in out d.Criteria; fairrent : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fairrent", op, join, fairrent );
   begin
      d.add_to_criteria( c, elem );
   end Add_fairrent;


   procedure Add_furnish( c : in out d.Criteria; furnish : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "furnish", op, join, furnish );
   begin
      d.add_to_criteria( c, elem );
   end Add_furnish;


   procedure Add_hbenamt( c : in out d.Criteria; hbenamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbenamt", op, join, Long_Float( hbenamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenamt;


   procedure Add_hbenchk( c : in out d.Criteria; hbenchk : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbenchk", op, join, hbenchk );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenchk;


   procedure Add_hbenefit( c : in out d.Criteria; hbenefit : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbenefit", op, join, hbenefit );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenefit;


   procedure Add_hbenpd( c : in out d.Criteria; hbenpd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbenpd", op, join, hbenpd );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenpd;


   procedure Add_hbenwait( c : in out d.Criteria; hbenwait : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbenwait", op, join, hbenwait );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenwait;


   procedure Add_hbmnth( c : in out d.Criteria; hbmnth : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbmnth", op, join, hbmnth );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbmnth;


   procedure Add_hbrecp( c : in out d.Criteria; hbrecp : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbrecp", op, join, hbrecp );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbrecp;


   procedure Add_hbweeks( c : in out d.Criteria; hbweeks : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbweeks", op, join, hbweeks );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbweeks;


   procedure Add_hbyear( c : in out d.Criteria; hbyear : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbyear", op, join, hbyear );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbyear;


   procedure Add_hbyears( c : in out d.Criteria; hbyears : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hbyears", op, join, hbyears );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbyears;


   procedure Add_landlord( c : in out d.Criteria; landlord : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "landlord", op, join, landlord );
   begin
      d.add_to_criteria( c, elem );
   end Add_landlord;


   procedure Add_niystart( c : in out d.Criteria; niystart : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "niystart", op, join, niystart );
   begin
      d.add_to_criteria( c, elem );
   end Add_niystart;


   procedure Add_othtype( c : in out d.Criteria; othtype : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "othtype", op, join, othtype );
   begin
      d.add_to_criteria( c, elem );
   end Add_othtype;


   procedure Add_rebate( c : in out d.Criteria; rebate : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rebate", op, join, rebate );
   begin
      d.add_to_criteria( c, elem );
   end Add_rebate;


   procedure Add_rent( c : in out d.Criteria; rent : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rent", op, join, Long_Float( rent ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rent;


   procedure Add_rentdoc( c : in out d.Criteria; rentdoc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rentdoc", op, join, rentdoc );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentdoc;


   procedure Add_renthol( c : in out d.Criteria; renthol : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "renthol", op, join, renthol );
   begin
      d.add_to_criteria( c, elem );
   end Add_renthol;


   procedure Add_rentpd( c : in out d.Criteria; rentpd : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rentpd", op, join, rentpd );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentpd;


   procedure Add_rentpd1( c : in out d.Criteria; rentpd1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rentpd1", op, join, rentpd1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentpd1;


   procedure Add_rentpd2( c : in out d.Criteria; rentpd2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rentpd2", op, join, rentpd2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentpd2;


   procedure Add_resll( c : in out d.Criteria; resll : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "resll", op, join, resll );
   begin
      d.add_to_criteria( c, elem );
   end Add_resll;


   procedure Add_resll2( c : in out d.Criteria; resll2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "resll2", op, join, resll2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_resll2;


   procedure Add_serincam( c : in out d.Criteria; serincam : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "serincam", op, join, serincam );
   begin
      d.add_to_criteria( c, elem );
   end Add_serincam;


   procedure Add_tentype( c : in out d.Criteria; tentype : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tentype", op, join, tentype );
   begin
      d.add_to_criteria( c, elem );
   end Add_tentype;


   procedure Add_weekhol( c : in out d.Criteria; weekhol : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "weekhol", op, join, weekhol );
   begin
      d.add_to_criteria( c, elem );
   end Add_weekhol;


   procedure Add_wsinc( c : in out d.Criteria; wsinc : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsinc", op, join, wsinc );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsinc;


   procedure Add_wsincamt( c : in out d.Criteria; wsincamt : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "wsincamt", op, join, Long_Float( wsincamt ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsincamt;


   procedure Add_ystartr( c : in out d.Criteria; ystartr : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "ystartr", op, join, ystartr );
   begin
      d.add_to_criteria( c, elem );
   end Add_ystartr;


   procedure Add_accjbp1( c : in out d.Criteria; accjbp1 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp1", op, join, accjbp1 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp1;


   procedure Add_accjbp2( c : in out d.Criteria; accjbp2 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp2", op, join, accjbp2 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp2;


   procedure Add_accjbp3( c : in out d.Criteria; accjbp3 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp3", op, join, accjbp3 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp3;


   procedure Add_accjbp4( c : in out d.Criteria; accjbp4 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp4", op, join, accjbp4 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp4;


   procedure Add_accjbp5( c : in out d.Criteria; accjbp5 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp5", op, join, accjbp5 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp5;


   procedure Add_accjbp6( c : in out d.Criteria; accjbp6 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp6", op, join, accjbp6 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp6;


   procedure Add_accjbp7( c : in out d.Criteria; accjbp7 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp7", op, join, accjbp7 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp7;


   procedure Add_accjbp8( c : in out d.Criteria; accjbp8 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp8", op, join, accjbp8 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp8;


   procedure Add_accjbp9( c : in out d.Criteria; accjbp9 : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "accjbp9", op, join, accjbp9 );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp9;


   procedure Add_rexhh( c : in out d.Criteria; rexhh : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rexhh", op, join, rexhh );
   begin
      d.add_to_criteria( c, elem );
   end Add_rexhh;


   procedure Add_rntfull( c : in out d.Criteria; rntfull : Amount; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "rntfull", op, join, Long_Float( rntfull ) );
   begin
      d.add_to_criteria( c, elem );
   end Add_rntfull;


   procedure Add_lighting( c : in out d.Criteria; lighting : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lighting", op, join, lighting );
   begin
      d.add_to_criteria( c, elem );
   end Add_lighting;


   procedure Add_heating( c : in out d.Criteria; heating : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "heating", op, join, heating );
   begin
      d.add_to_criteria( c, elem );
   end Add_heating;


   procedure Add_hotwater( c : in out d.Criteria; hotwater : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "hotwater", op, join, hotwater );
   begin
      d.add_to_criteria( c, elem );
   end Add_hotwater;


   procedure Add_fuelcook( c : in out d.Criteria; fuelcook : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "fuelcook", op, join, fuelcook );
   begin
      d.add_to_criteria( c, elem );
   end Add_fuelcook;


   procedure Add_tvlice( c : in out d.Criteria; tvlice : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "tvlice", op, join, tvlice );
   begin
      d.add_to_criteria( c, elem );
   end Add_tvlice;


   procedure Add_elec( c : in out d.Criteria; elec : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "elec", op, join, elec );
   begin
      d.add_to_criteria( c, elem );
   end Add_elec;


   procedure Add_gas( c : in out d.Criteria; gas : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "gas", op, join, gas );
   begin
      d.add_to_criteria( c, elem );
   end Add_gas;


   procedure Add_lsf( c : in out d.Criteria; lsf : Integer; op : d.operation_type:= d.eq; join : d.join_type := d.join_and ) is   
   elem : d.Criterion := d.Make_Criterion_Element( "lsf", op, join, lsf );
   begin
      d.add_to_criteria( c, elem );
   end Add_lsf;


   
   --
   -- functions to add an ordering to a criteria
   --
   procedure Add_user_id_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "user_id", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_user_id_To_Orderings;


   procedure Add_edition_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edition", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edition_To_Orderings;


   procedure Add_year_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "year", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_year_To_Orderings;


   procedure Add_sernum_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sernum", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sernum_To_Orderings;


   procedure Add_benunit_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "benunit", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_benunit_To_Orderings;


   procedure Add_int1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int1hd_To_Orderings;


   procedure Add_int2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int2hd_To_Orderings;


   procedure Add_int3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int3hd_To_Orderings;


   procedure Add_int4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int4hd_To_Orderings;


   procedure Add_int5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int5hd_To_Orderings;


   procedure Add_int6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int6hd_To_Orderings;


   procedure Add_int7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int7hd_To_Orderings;


   procedure Add_int8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int8hd_To_Orderings;


   procedure Add_int9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int9hd_To_Orderings;


   procedure Add_int10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int10hd_To_Orderings;


   procedure Add_int11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int11hd_To_Orderings;


   procedure Add_int12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int12hd_To_Orderings;


   procedure Add_int13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int13hd_To_Orderings;


   procedure Add_int14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int14hd_To_Orderings;


   procedure Add_int15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int15hd_To_Orderings;


   procedure Add_int16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int16hd_To_Orderings;


   procedure Add_int17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int17hd_To_Orderings;


   procedure Add_int18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int18hd_To_Orderings;


   procedure Add_int19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int19hd_To_Orderings;


   procedure Add_int21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int21hd_To_Orderings;


   procedure Add_int22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int22hd_To_Orderings;


   procedure Add_int23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int23hd_To_Orderings;


   procedure Add_int24hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int24hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int24hd_To_Orderings;


   procedure Add_int25hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int25hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int25hd_To_Orderings;


   procedure Add_int26hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int26hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int26hd_To_Orderings;


   procedure Add_int27hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int27hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int27hd_To_Orderings;


   procedure Add_int28hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int28hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int28hd_To_Orderings;


   procedure Add_int29hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int29hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int29hd_To_Orderings;


   procedure Add_int30hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int30hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int30hd_To_Orderings;


   procedure Add_int1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int1sp_To_Orderings;


   procedure Add_int2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int2sp_To_Orderings;


   procedure Add_int3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int3sp_To_Orderings;


   procedure Add_int4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int4sp_To_Orderings;


   procedure Add_int5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int5sp_To_Orderings;


   procedure Add_int6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int6sp_To_Orderings;


   procedure Add_int7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int7sp_To_Orderings;


   procedure Add_int8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int8sp_To_Orderings;


   procedure Add_int9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int9sp_To_Orderings;


   procedure Add_int10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int10sp_To_Orderings;


   procedure Add_int11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int11sp_To_Orderings;


   procedure Add_int12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int12sp_To_Orderings;


   procedure Add_int13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int13sp_To_Orderings;


   procedure Add_int14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int14sp_To_Orderings;


   procedure Add_int15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int15sp_To_Orderings;


   procedure Add_int16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int16sp_To_Orderings;


   procedure Add_int17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int17sp_To_Orderings;


   procedure Add_int18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int18sp_To_Orderings;


   procedure Add_int19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int19sp_To_Orderings;


   procedure Add_int21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int21sp_To_Orderings;


   procedure Add_int22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int22sp_To_Orderings;


   procedure Add_int23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int23sp_To_Orderings;


   procedure Add_int24sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int24sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int24sp_To_Orderings;


   procedure Add_int25sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int25sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int25sp_To_Orderings;


   procedure Add_int26sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int26sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int26sp_To_Orderings;


   procedure Add_int27sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int27sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int27sp_To_Orderings;


   procedure Add_int28sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int28sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int28sp_To_Orderings;


   procedure Add_int29sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int29sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int29sp_To_Orderings;


   procedure Add_int30sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "int30sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_int30sp_To_Orderings;


   procedure Add_intx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx1hd_To_Orderings;


   procedure Add_intx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx2hd_To_Orderings;


   procedure Add_intx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx3hd_To_Orderings;


   procedure Add_intx4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx4hd_To_Orderings;


   procedure Add_intx5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx5hd_To_Orderings;


   procedure Add_intx6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx6hd_To_Orderings;


   procedure Add_intx7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx7hd_To_Orderings;


   procedure Add_intx8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx8hd_To_Orderings;


   procedure Add_intx9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx9hd_To_Orderings;


   procedure Add_intx10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx10hd_To_Orderings;


   procedure Add_intx11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx11hd_To_Orderings;


   procedure Add_intx12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx12hd_To_Orderings;


   procedure Add_intx13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx13hd_To_Orderings;


   procedure Add_intx14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx14hd_To_Orderings;


   procedure Add_intx15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx15hd_To_Orderings;


   procedure Add_intx16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx16hd_To_Orderings;


   procedure Add_intx17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx17hd_To_Orderings;


   procedure Add_intx18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx18hd_To_Orderings;


   procedure Add_intx19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx19hd_To_Orderings;


   procedure Add_intx21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx21hd_To_Orderings;


   procedure Add_intx22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx22hd_To_Orderings;


   procedure Add_intx23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx23hd_To_Orderings;


   procedure Add_intx24hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx24hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx24hd_To_Orderings;


   procedure Add_intx25hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx25hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx25hd_To_Orderings;


   procedure Add_intx26hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx26hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx26hd_To_Orderings;


   procedure Add_intx27hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx27hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx27hd_To_Orderings;


   procedure Add_intx28hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx28hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx28hd_To_Orderings;


   procedure Add_intx29hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx29hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx29hd_To_Orderings;


   procedure Add_intx30hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx30hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx30hd_To_Orderings;


   procedure Add_intx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx1sp_To_Orderings;


   procedure Add_intx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx2sp_To_Orderings;


   procedure Add_intx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx3sp_To_Orderings;


   procedure Add_intx4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx4sp_To_Orderings;


   procedure Add_intx5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx5sp_To_Orderings;


   procedure Add_intx6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx6sp_To_Orderings;


   procedure Add_intx7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx7sp_To_Orderings;


   procedure Add_intx8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx8sp_To_Orderings;


   procedure Add_intx9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx9sp_To_Orderings;


   procedure Add_intx10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx10sp_To_Orderings;


   procedure Add_intx11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx11sp_To_Orderings;


   procedure Add_intx12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx12sp_To_Orderings;


   procedure Add_intx13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx13sp_To_Orderings;


   procedure Add_intx14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx14sp_To_Orderings;


   procedure Add_intx15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx15sp_To_Orderings;


   procedure Add_intx16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx16sp_To_Orderings;


   procedure Add_intx17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx17sp_To_Orderings;


   procedure Add_intx18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx18sp_To_Orderings;


   procedure Add_intx19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx19sp_To_Orderings;


   procedure Add_intx21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx21sp_To_Orderings;


   procedure Add_intx22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx22sp_To_Orderings;


   procedure Add_intx23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx23sp_To_Orderings;


   procedure Add_intx24sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx24sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx24sp_To_Orderings;


   procedure Add_intx25sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx25sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx25sp_To_Orderings;


   procedure Add_intx26sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx26sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx26sp_To_Orderings;


   procedure Add_intx27sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx27sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx27sp_To_Orderings;


   procedure Add_intx28sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx28sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx28sp_To_Orderings;


   procedure Add_intx29sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx29sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx29sp_To_Orderings;


   procedure Add_intx30sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intx30sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intx30sp_To_Orderings;


   procedure Add_invt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt1hd_To_Orderings;


   procedure Add_invt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt2hd_To_Orderings;


   procedure Add_invt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt3hd_To_Orderings;


   procedure Add_invt4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt4hd_To_Orderings;


   procedure Add_invt5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt5hd_To_Orderings;


   procedure Add_invt6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt6hd_To_Orderings;


   procedure Add_invt7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt7hd_To_Orderings;


   procedure Add_invt8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt8hd_To_Orderings;


   procedure Add_invt9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt9hd_To_Orderings;


   procedure Add_invt10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt10hd_To_Orderings;


   procedure Add_invt11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt11hd_To_Orderings;


   procedure Add_invt12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt12hd_To_Orderings;


   procedure Add_invt13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt13hd_To_Orderings;


   procedure Add_invt14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt14hd_To_Orderings;


   procedure Add_invt15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt15hd_To_Orderings;


   procedure Add_invt16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt16hd_To_Orderings;


   procedure Add_invt17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt17hd_To_Orderings;


   procedure Add_invt18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt18hd_To_Orderings;


   procedure Add_invt19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt19hd_To_Orderings;


   procedure Add_invt21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt21hd_To_Orderings;


   procedure Add_invt22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt22hd_To_Orderings;


   procedure Add_invt23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt23hd_To_Orderings;


   procedure Add_invt24hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt24hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt24hd_To_Orderings;


   procedure Add_invt25hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt25hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt25hd_To_Orderings;


   procedure Add_invt26hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt26hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt26hd_To_Orderings;


   procedure Add_invt27hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt27hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt27hd_To_Orderings;


   procedure Add_invt28hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt28hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt28hd_To_Orderings;


   procedure Add_invt29hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt29hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt29hd_To_Orderings;


   procedure Add_invt30hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt30hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt30hd_To_Orderings;


   procedure Add_invt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt1sp_To_Orderings;


   procedure Add_invt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt2sp_To_Orderings;


   procedure Add_invt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt3sp_To_Orderings;


   procedure Add_invt4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt4sp_To_Orderings;


   procedure Add_invt5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt5sp_To_Orderings;


   procedure Add_invt6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt6sp_To_Orderings;


   procedure Add_invt7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt7sp_To_Orderings;


   procedure Add_invt8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt8sp_To_Orderings;


   procedure Add_invt9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt9sp_To_Orderings;


   procedure Add_invt10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt10sp_To_Orderings;


   procedure Add_invt11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt11sp_To_Orderings;


   procedure Add_invt12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt12sp_To_Orderings;


   procedure Add_invt13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt13sp_To_Orderings;


   procedure Add_invt14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt14sp_To_Orderings;


   procedure Add_invt15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt15sp_To_Orderings;


   procedure Add_invt16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt16sp_To_Orderings;


   procedure Add_invt17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt17sp_To_Orderings;


   procedure Add_invt18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt18sp_To_Orderings;


   procedure Add_invt19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt19sp_To_Orderings;


   procedure Add_invt21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt21sp_To_Orderings;


   procedure Add_invt22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt22sp_To_Orderings;


   procedure Add_invt23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt23sp_To_Orderings;


   procedure Add_invt24sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt24sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt24sp_To_Orderings;


   procedure Add_invt25sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt25sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt25sp_To_Orderings;


   procedure Add_invt26sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt26sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt26sp_To_Orderings;


   procedure Add_invt27sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt27sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt27sp_To_Orderings;


   procedure Add_invt28sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt28sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt28sp_To_Orderings;


   procedure Add_invt29sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt29sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt29sp_To_Orderings;


   procedure Add_invt30sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "invt30sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_invt30sp_To_Orderings;


   procedure Add_nsa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa1hd_To_Orderings;


   procedure Add_nsa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa2hd_To_Orderings;


   procedure Add_nsa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa3hd_To_Orderings;


   procedure Add_nsa4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa4hd_To_Orderings;


   procedure Add_nsa5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa5hd_To_Orderings;


   procedure Add_nsa6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa6hd_To_Orderings;


   procedure Add_nsa7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa7hd_To_Orderings;


   procedure Add_nsa8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa8hd_To_Orderings;


   procedure Add_nsa9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa9hd_To_Orderings;


   procedure Add_nsa10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa10hd_To_Orderings;


   procedure Add_nsa11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa11hd_To_Orderings;


   procedure Add_nsa12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa12hd_To_Orderings;


   procedure Add_nsa13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa13hd_To_Orderings;


   procedure Add_nsa14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa14hd_To_Orderings;


   procedure Add_nsa15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa15hd_To_Orderings;


   procedure Add_nsa16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa16hd_To_Orderings;


   procedure Add_nsa17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa17hd_To_Orderings;


   procedure Add_nsa18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa18hd_To_Orderings;


   procedure Add_nsa19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa19hd_To_Orderings;


   procedure Add_nsa21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa21hd_To_Orderings;


   procedure Add_nsa22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa22hd_To_Orderings;


   procedure Add_nsa23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa23hd_To_Orderings;


   procedure Add_nsa24hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa24hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa24hd_To_Orderings;


   procedure Add_nsa25hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa25hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa25hd_To_Orderings;


   procedure Add_nsa26hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa26hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa26hd_To_Orderings;


   procedure Add_nsa27hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa27hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa27hd_To_Orderings;


   procedure Add_nsa28hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa28hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa28hd_To_Orderings;


   procedure Add_nsa29hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa29hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa29hd_To_Orderings;


   procedure Add_nsa30hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa30hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa30hd_To_Orderings;


   procedure Add_nsa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa1sp_To_Orderings;


   procedure Add_nsa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa2sp_To_Orderings;


   procedure Add_nsa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa3sp_To_Orderings;


   procedure Add_nsa4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa4sp_To_Orderings;


   procedure Add_nsa5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa5sp_To_Orderings;


   procedure Add_nsa6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa6sp_To_Orderings;


   procedure Add_nsa7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa7sp_To_Orderings;


   procedure Add_nsa8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa8sp_To_Orderings;


   procedure Add_nsa9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa9sp_To_Orderings;


   procedure Add_nsa10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa10sp_To_Orderings;


   procedure Add_nsa11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa11sp_To_Orderings;


   procedure Add_nsa12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa12sp_To_Orderings;


   procedure Add_nsa13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa13sp_To_Orderings;


   procedure Add_nsa14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa14sp_To_Orderings;


   procedure Add_nsa15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa15sp_To_Orderings;


   procedure Add_nsa16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa16sp_To_Orderings;


   procedure Add_nsa17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa17sp_To_Orderings;


   procedure Add_nsa18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa18sp_To_Orderings;


   procedure Add_nsa19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa19sp_To_Orderings;


   procedure Add_nsa21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa21sp_To_Orderings;


   procedure Add_nsa22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa22sp_To_Orderings;


   procedure Add_nsa23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa23sp_To_Orderings;


   procedure Add_nsa24sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa24sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa24sp_To_Orderings;


   procedure Add_nsa25sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa25sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa25sp_To_Orderings;


   procedure Add_nsa26sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa26sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa26sp_To_Orderings;


   procedure Add_nsa27sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa27sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa27sp_To_Orderings;


   procedure Add_nsa28sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa28sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa28sp_To_Orderings;


   procedure Add_nsa29sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa29sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa29sp_To_Orderings;


   procedure Add_nsa30sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nsa30sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nsa30sp_To_Orderings;


   procedure Add_ablehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ablehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ablehd_To_Orderings;


   procedure Add_ablesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ablesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ablesp_To_Orderings;


   procedure Add_abs1pdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abs1pdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abs1pdhd_To_Orderings;


   procedure Add_abs1pdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abs1pdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abs1pdsp_To_Orderings;


   procedure Add_absparhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "absparhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_absparhd_To_Orderings;


   procedure Add_absparsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "absparsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_absparsp_To_Orderings;


   procedure Add_abspayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abspayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspayhd_To_Orderings;


   procedure Add_abspaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abspaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspaysp_To_Orderings;


   procedure Add_abswhyhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abswhyhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswhyhd_To_Orderings;


   procedure Add_abswhysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abswhysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswhysp_To_Orderings;


   procedure Add_abswkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abswkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswkhd_To_Orderings;


   procedure Add_abswksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abswksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abswksp_To_Orderings;


   procedure Add_acshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acshd_To_Orderings;


   procedure Add_acssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acssp_To_Orderings;


   procedure Add_acctqhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acctqhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acctqhd_To_Orderings;


   procedure Add_acctqsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acctqsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acctqsp_To_Orderings;


   procedure Add_acsamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acsamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acsamthd_To_Orderings;


   procedure Add_acsamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acsamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acsamtsp_To_Orderings;


   procedure Add_acspdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acspdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acspdhd_To_Orderings;


   procedure Add_acspdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "acspdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_acspdsp_To_Orderings;


   procedure Add_actacihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "actacihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_actacihd_To_Orderings;


   procedure Add_actacisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "actacisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_actacisp_To_Orderings;


   procedure Add_emahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emahd_To_Orderings;


   procedure Add_emasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emasp_To_Orderings;


   procedure Add_emaamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emaamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emaamthd_To_Orderings;


   procedure Add_emaamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emaamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emaamtsp_To_Orderings;


   procedure Add_emapdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdhd_To_Orderings;


   procedure Add_emapdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdsp_To_Orderings;


   procedure Add_agehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agehd_To_Orderings;


   procedure Add_agesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agesp_To_Orderings;


   procedure Add_agehqhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agehqhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agehqhd_To_Orderings;


   procedure Add_agehqsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agehqsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agehqsp_To_Orderings;


   procedure Add_aliamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aliamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliamthd_To_Orderings;


   procedure Add_aliamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aliamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliamtsp_To_Orderings;


   procedure Add_alimnyhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "alimnyhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_alimnyhd_To_Orderings;


   procedure Add_alimnysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "alimnysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_alimnysp_To_Orderings;


   procedure Add_alipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "alipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_alipdhd_To_Orderings;


   procedure Add_alipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "alipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_alipdsp_To_Orderings;


   procedure Add_aliushd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aliushd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliushd_To_Orderings;


   procedure Add_aliussp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aliussp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aliussp_To_Orderings;


   procedure Add_absallhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "absallhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_absallhd_To_Orderings;


   procedure Add_absallsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "absallsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_absallsp_To_Orderings;


   procedure Add_organhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "organhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_organhd_To_Orderings;


   procedure Add_organsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "organsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_organsp_To_Orderings;


   procedure Add_fosterhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fosterhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fosterhd_To_Orderings;


   procedure Add_fostersp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fostersp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fostersp_To_Orderings;


   procedure Add_adopthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adopthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adopthd_To_Orderings;


   procedure Add_adoptsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adoptsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adoptsp_To_Orderings;


   procedure Add_pasbalhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pasbalhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pasbalhd_To_Orderings;


   procedure Add_pasbalsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pasbalsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pasbalsp_To_Orderings;


   procedure Add_porganhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "porganhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_porganhd_To_Orderings;


   procedure Add_porgansp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "porgansp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_porgansp_To_Orderings;


   procedure Add_pfostehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pfostehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfostehd_To_Orderings;


   procedure Add_pfostesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pfostesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfostesp_To_Orderings;


   procedure Add_padopthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "padopthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_padopthd_To_Orderings;


   procedure Add_padoptsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "padoptsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_padoptsp_To_Orderings;


   procedure Add_aluamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aluamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aluamthd_To_Orderings;


   procedure Add_aluamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aluamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aluamtsp_To_Orderings;


   procedure Add_alupdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "alupdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_alupdhd_To_Orderings;


   procedure Add_alupdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "alupdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_alupdsp_To_Orderings;


   procedure Add_anyacchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anyacchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyacchd_To_Orderings;


   procedure Add_anyaccsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anyaccsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyaccsp_To_Orderings;


   procedure Add_anyedhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anyedhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyedhd_To_Orderings;


   procedure Add_anyedsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anyedsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anyedsp_To_Orderings;


   procedure Add_anymonhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anymonhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anymonhd_To_Orderings;


   procedure Add_anymonsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anymonsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anymonsp_To_Orderings;


   procedure Add_anype1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype1hd_To_Orderings;


   procedure Add_anype1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype1sp_To_Orderings;


   procedure Add_anype2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype2hd_To_Orderings;


   procedure Add_anype2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype2sp_To_Orderings;


   procedure Add_anype3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype3hd_To_Orderings;


   procedure Add_anype3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype3sp_To_Orderings;


   procedure Add_anype4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype4hd_To_Orderings;


   procedure Add_anype4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype4sp_To_Orderings;


   procedure Add_anype5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype5hd_To_Orderings;


   procedure Add_anype5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype5sp_To_Orderings;


   procedure Add_anype6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype6hd_To_Orderings;


   procedure Add_anype6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype6sp_To_Orderings;


   procedure Add_anype7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype7hd_To_Orderings;


   procedure Add_anype7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anype7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anype7sp_To_Orderings;


   procedure Add_abspamhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abspamhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspamhd_To_Orderings;


   procedure Add_abspamsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abspamsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspamsp_To_Orderings;


   procedure Add_abspexhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abspexhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspexhd_To_Orderings;


   procedure Add_abspexsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "abspexsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_abspexsp_To_Orderings;


   procedure Add_apdpdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apdpdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apdpdhd_To_Orderings;


   procedure Add_apdpdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apdpdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apdpdsp_To_Orderings;


   procedure Add_pabspahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pabspahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pabspahd_To_Orderings;


   procedure Add_pabspasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pabspasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pabspasp_To_Orderings;


   procedure Add_basacthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "basacthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_basacthd_To_Orderings;


   procedure Add_basactsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "basactsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_basactsp_To_Orderings;


   procedure Add_bfdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bfdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdhd_To_Orderings;


   procedure Add_bfdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bfdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdsp_To_Orderings;


   procedure Add_bfdamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bfdamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdamthd_To_Orderings;


   procedure Add_bfdamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bfdamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdamtsp_To_Orderings;


   procedure Add_pbfdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfdhd_To_Orderings;


   procedure Add_pbfdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfdsp_To_Orderings;


   procedure Add_bfdvalhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bfdvalhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdvalhd_To_Orderings;


   procedure Add_bfdvalsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bfdvalsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bfdvalsp_To_Orderings;


   procedure Add_careabhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careabhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careabhd_To_Orderings;


   procedure Add_careabsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careabsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careabsp_To_Orderings;


   procedure Add_careahhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careahhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careahhd_To_Orderings;


   procedure Add_careahsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careahsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careahsp_To_Orderings;


   procedure Add_carecbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carecbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carecbhd_To_Orderings;


   procedure Add_carecbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carecbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carecbsp_To_Orderings;


   procedure Add_carechhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carechhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carechhd_To_Orderings;


   procedure Add_carechsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carechsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carechsp_To_Orderings;


   procedure Add_careclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careclhd_To_Orderings;


   procedure Add_careclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careclsp_To_Orderings;


   procedure Add_careflhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careflhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careflhd_To_Orderings;


   procedure Add_careflsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careflsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careflsp_To_Orderings;


   procedure Add_carefrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carefrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carefrhd_To_Orderings;


   procedure Add_carefrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carefrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carefrsp_To_Orderings;


   procedure Add_careothd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careothd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careothd_To_Orderings;


   procedure Add_careotsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "careotsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_careotsp_To_Orderings;


   procedure Add_carerhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerhd_To_Orderings;


   procedure Add_carersp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carersp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carersp_To_Orderings;


   procedure Add_cbaamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbaamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbaamthd_To_Orderings;


   procedure Add_cbaamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbaamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbaamtsp_To_Orderings;


   procedure Add_cbchkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbchkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbchkhd_To_Orderings;


   procedure Add_cbchksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbchksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbchksp_To_Orderings;


   procedure Add_changehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "changehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_changehd_To_Orderings;


   procedure Add_changesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "changesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_changesp_To_Orderings;


   procedure Add_chbflghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbflghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbflghd_To_Orderings;


   procedure Add_chbflgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbflgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbflgsp_To_Orderings;


   procedure Add_chknophd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chknophd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chknophd_To_Orderings;


   procedure Add_chknopsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chknopsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chknopsp_To_Orderings;


   procedure Add_fpchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fpchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fpchd_To_Orderings;


   procedure Add_fpcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fpcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fpcsp_To_Orderings;


   procedure Add_fuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fuchd_To_Orderings;


   procedure Add_fucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fucsp_To_Orderings;


   procedure Add_fhbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fhbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fhbhd_To_Orderings;


   procedure Add_fhbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fhbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fhbsp_To_Orderings;


   procedure Add_fwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fwtchd_To_Orderings;


   procedure Add_fwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fwtcsp_To_Orderings;


   procedure Add_fctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fctchd_To_Orderings;


   procedure Add_fctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fctcsp_To_Orderings;


   procedure Add_fishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fishd_To_Orderings;


   procedure Add_fissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fissp_To_Orderings;


   procedure Add_fjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fjsahd_To_Orderings;


   procedure Add_fjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fjsasp_To_Orderings;


   procedure Add_fesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fesahd_To_Orderings;


   procedure Add_fesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fesasp_To_Orderings;


   procedure Add_claimahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "claimahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_claimahd_To_Orderings;


   procedure Add_claimasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "claimasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_claimasp_To_Orderings;


   procedure Add_cohabhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabhd_To_Orderings;


   procedure Add_cohabsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabsp_To_Orderings;


   procedure Add_condithd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "condithd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_condithd_To_Orderings;


   procedure Add_conditsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "conditsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_conditsp_To_Orderings;


   procedure Add_blodgehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blodgehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blodgehd_To_Orderings;


   procedure Add_blodgesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blodgesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blodgesp_To_Orderings;


   procedure Add_ctclm1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctclm1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm1hd_To_Orderings;


   procedure Add_ctclm1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctclm1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm1sp_To_Orderings;


   procedure Add_ctclm2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctclm2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm2hd_To_Orderings;


   procedure Add_ctclm2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctclm2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctclm2sp_To_Orderings;


   procedure Add_cupchkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cupchkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cupchkhd_To_Orderings;


   procedure Add_cupchksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cupchksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cupchksp_To_Orderings;


   procedure Add_curacthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curacthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curacthd_To_Orderings;


   procedure Add_curactsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curactsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curactsp_To_Orderings;


   procedure Add_curqulhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulhd_To_Orderings;


   procedure Add_curqulsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulsp_To_Orderings;


   procedure Add_blheadhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blheadhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blheadhd_To_Orderings;


   procedure Add_blheadsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blheadsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blheadsp_To_Orderings;


   procedure Add_blrenthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blrenthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blrenthd_To_Orderings;


   procedure Add_blrentsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blrentsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blrentsp_To_Orderings;


   procedure Add_pblrenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pblrenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pblrenhd_To_Orderings;


   procedure Add_pblrensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pblrensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pblrensp_To_Orderings;


   procedure Add_ddaprghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ddaprghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddaprghd_To_Orderings;


   procedure Add_ddaprgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ddaprgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddaprgsp_To_Orderings;


   procedure Add_ddatrehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ddatrehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatrehd_To_Orderings;


   procedure Add_ddatresp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ddatresp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatresp_To_Orderings;


   procedure Add_ddatrphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ddatrphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatrphd_To_Orderings;


   procedure Add_ddatrpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ddatrpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ddatrpsp_To_Orderings;


   procedure Add_defrpnhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "defrpnhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_defrpnhd_To_Orderings;


   procedure Add_defrpnsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "defrpnsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_defrpnsp_To_Orderings;


   procedure Add_dependhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dependhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dependhd_To_Orderings;


   procedure Add_dependsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dependsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dependsp_To_Orderings;


   procedure Add_disacahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacahd_To_Orderings;


   procedure Add_disacasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacasp_To_Orderings;


   procedure Add_qpiphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpiphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpiphd_To_Orderings;


   procedure Add_qpipsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpipsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipsp_To_Orderings;


   procedure Add_qdlahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qdlahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qdlahd_To_Orderings;


   procedure Add_qdlasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qdlasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qdlasp_To_Orderings;


   procedure Add_qaahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qaahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaahd_To_Orderings;


   procedure Add_qaasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qaasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaasp_To_Orderings;


   procedure Add_qsdahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qsdahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsdahd_To_Orderings;


   procedure Add_qsdasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qsdasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsdasp_To_Orderings;


   procedure Add_qibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qibhd_To_Orderings;


   procedure Add_qibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qibsp_To_Orderings;


   procedure Add_qiidbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qiidbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qiidbhd_To_Orderings;


   procedure Add_qiidbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qiidbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qiidbsp_To_Orderings;


   procedure Add_discoahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoahd_To_Orderings;


   procedure Add_discoasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoasp_To_Orderings;


   procedure Add_disd01hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd01hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd01hd_To_Orderings;


   procedure Add_disd01sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd01sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd01sp_To_Orderings;


   procedure Add_disd02hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd02hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd02hd_To_Orderings;


   procedure Add_disd02sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd02sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd02sp_To_Orderings;


   procedure Add_disd03hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd03hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd03hd_To_Orderings;


   procedure Add_disd03sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd03sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd03sp_To_Orderings;


   procedure Add_disd04hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd04hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd04hd_To_Orderings;


   procedure Add_disd04sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd04sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd04sp_To_Orderings;


   procedure Add_disd05hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd05hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd05hd_To_Orderings;


   procedure Add_disd05sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd05sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd05sp_To_Orderings;


   procedure Add_disd06hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd06hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd06hd_To_Orderings;


   procedure Add_disd06sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd06sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd06sp_To_Orderings;


   procedure Add_disd07hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd07hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd07hd_To_Orderings;


   procedure Add_disd07sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd07sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd07sp_To_Orderings;


   procedure Add_disd08hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd08hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd08hd_To_Orderings;


   procedure Add_disd08sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd08sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd08sp_To_Orderings;


   procedure Add_disd09hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd09hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd09hd_To_Orderings;


   procedure Add_disd09sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd09sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd09sp_To_Orderings;


   procedure Add_disd10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd10hd_To_Orderings;


   procedure Add_disd10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disd10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disd10sp_To_Orderings;


   procedure Add_disdifhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disdifhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disdifhd_To_Orderings;


   procedure Add_disdifsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disdifsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disdifsp_To_Orderings;


   procedure Add_dlachd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlachd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlachd_To_Orderings;


   procedure Add_dlacsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacsp_To_Orderings;


   procedure Add_dlamhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamhd_To_Orderings;


   procedure Add_dlamsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamsp_To_Orderings;


   procedure Add_dlshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlshd_To_Orderings;


   procedure Add_dlssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlssp_To_Orderings;


   procedure Add_dlsamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlsamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsamthd_To_Orderings;


   procedure Add_dlsamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlsamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsamtsp_To_Orderings;


   procedure Add_pdlshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlshd_To_Orderings;


   procedure Add_pdlssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlssp_To_Orderings;


   procedure Add_dlsvalhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlsvalhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsvalhd_To_Orderings;


   procedure Add_dlsvalsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlsvalsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlsvalsp_To_Orderings;


   procedure Add_dobhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobhd_To_Orderings;


   procedure Add_dobsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobsp_To_Orderings;


   procedure Add_h3qualhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "h3qualhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_h3qualhd_To_Orderings;


   procedure Add_h3qualsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "h3qualsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_h3qualsp_To_Orderings;


   procedure Add_dvil3ahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvil3ahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil3ahd_To_Orderings;


   procedure Add_dvil3asp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvil3asp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil3asp_To_Orderings;


   procedure Add_dvil4ahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvil4ahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil4ahd_To_Orderings;


   procedure Add_dvil4asp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvil4asp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvil4asp_To_Orderings;


   procedure Add_dvjb12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvjb12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvjb12hd_To_Orderings;


   procedure Add_dvjb12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvjb12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvjb12sp_To_Orderings;


   procedure Add_dvmarhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarhd_To_Orderings;


   procedure Add_dvmarsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarsp_To_Orderings;


   procedure Add_edl1ahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl1ahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1ahd_To_Orderings;


   procedure Add_edl1asp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl1asp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1asp_To_Orderings;


   procedure Add_pedl1ahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pedl1ahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl1ahd_To_Orderings;


   procedure Add_pedl1asp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pedl1asp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl1asp_To_Orderings;


   procedure Add_edl1obhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl1obhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1obhd_To_Orderings;


   procedure Add_edl1obsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl1obsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl1obsp_To_Orderings;


   procedure Add_edl2ahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl2ahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2ahd_To_Orderings;


   procedure Add_edl2asp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl2asp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2asp_To_Orderings;


   procedure Add_pedl2ahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pedl2ahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl2ahd_To_Orderings;


   procedure Add_pedl2asp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pedl2asp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pedl2asp_To_Orderings;


   procedure Add_edl2obhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl2obhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2obhd_To_Orderings;


   procedure Add_edl2obsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edl2obsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edl2obsp_To_Orderings;


   procedure Add_edatthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edatthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edatthd_To_Orderings;


   procedure Add_edattsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edattsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edattsp_To_Orderings;


   procedure Add_edhrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edhrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edhrhd_To_Orderings;


   procedure Add_edhrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edhrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edhrsp_To_Orderings;


   procedure Add_edtyphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edtyphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edtyphd_To_Orderings;


   procedure Add_edtypsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "edtypsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_edtypsp_To_Orderings;


   procedure Add_empconhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empconhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empconhd_To_Orderings;


   procedure Add_empconsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empconsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empconsp_To_Orderings;


   procedure Add_empocchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empocchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empocchd_To_Orderings;


   procedure Add_empoccsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empoccsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empoccsp_To_Orderings;


   procedure Add_empshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empshd_To_Orderings;


   procedure Add_empssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empssp_To_Orderings;


   procedure Add_empbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empbhd_To_Orderings;


   procedure Add_empbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empbsp_To_Orderings;


   procedure Add_empchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empchd_To_Orderings;


   procedure Add_empcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empcsp_To_Orderings;


   procedure Add_empilohd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empilohd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empilohd_To_Orderings;


   procedure Add_empilosp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empilosp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empilosp_To_Orderings;


   procedure Add_es2000hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "es2000hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_es2000hd_To_Orderings;


   procedure Add_es2000sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "es2000sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_es2000sp_To_Orderings;


   procedure Add_ethgr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ethgr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgr3hd_To_Orderings;


   procedure Add_ethgr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ethgr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgr3sp_To_Orderings;


   procedure Add_ethgpshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ethgpshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgpshd_To_Orderings;


   procedure Add_ethgpssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ethgpssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ethgpssp_To_Orderings;


   procedure Add_etngrphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etngrphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etngrphd_To_Orderings;


   procedure Add_etngrpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etngrpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etngrpsp_To_Orderings;


   procedure Add_eualamhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "eualamhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualamhd_To_Orderings;


   procedure Add_eualamsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "eualamsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualamsp_To_Orderings;


   procedure Add_eualmnhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "eualmnhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualmnhd_To_Orderings;


   procedure Add_eualmnsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "eualmnsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_eualmnsp_To_Orderings;


   procedure Add_peualihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "peualihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_peualihd_To_Orderings;


   procedure Add_peualisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "peualisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_peualisp_To_Orderings;


   procedure Add_euetyphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "euetyphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_euetyphd_To_Orderings;


   procedure Add_euetypsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "euetypsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_euetypsp_To_Orderings;


   procedure Add_everwkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "everwkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_everwkhd_To_Orderings;


   procedure Add_everwksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "everwksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_everwksp_To_Orderings;


   procedure Add_ehbct1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ehbct1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ehbct1hd_To_Orderings;


   procedure Add_ehbct1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ehbct1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ehbct1sp_To_Orderings;


   procedure Add_fllwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fllwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fllwphd_To_Orderings;


   procedure Add_fllwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fllwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fllwpsp_To_Orderings;


   procedure Add_ftedhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedhd_To_Orderings;


   procedure Add_ftedsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedsp_To_Orderings;


   procedure Add_ftwkyrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftwkyrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftwkyrhd_To_Orderings;


   procedure Add_ftwkyrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftwkyrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftwkyrsp_To_Orderings;


   procedure Add_gebacthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gebacthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gebacthd_To_Orderings;


   procedure Add_gebactsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gebactsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gebactsp_To_Orderings;


   procedure Add_giltcthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "giltcthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_giltcthd_To_Orderings;


   procedure Add_giltctsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "giltctsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_giltctsp_To_Orderings;


   procedure Add_gpispchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gpispchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpispchd_To_Orderings;


   procedure Add_gpispcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gpispcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpispcsp_To_Orderings;


   procedure Add_gpjesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gpjesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpjesahd_To_Orderings;


   procedure Add_gpjesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gpjesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpjesasp_To_Orderings;


   procedure Add_gpuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gpuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpuchd_To_Orderings;


   procedure Add_gpucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gpucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gpucsp_To_Orderings;


   procedure Add_granthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "granthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_granthd_To_Orderings;


   procedure Add_grantsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grantsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grantsp_To_Orderings;


   procedure Add_gt1valhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1valhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1valhd_To_Orderings;


   procedure Add_gt1valsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1valsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1valsp_To_Orderings;


   procedure Add_gt2valhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2valhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2valhd_To_Orderings;


   procedure Add_gt2valsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2valsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2valsp_To_Orderings;


   procedure Add_gt1dirhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1dirhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1dirhd_To_Orderings;


   procedure Add_gt1dirsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1dirsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1dirsp_To_Orderings;


   procedure Add_gt2dirhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2dirhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2dirhd_To_Orderings;


   procedure Add_gt2dirsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2dirsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2dirsp_To_Orderings;


   procedure Add_grtnumhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grtnumhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grtnumhd_To_Orderings;


   procedure Add_grtnumsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grtnumsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grtnumsp_To_Orderings;


   procedure Add_gt1scehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scehd_To_Orderings;


   procedure Add_gt1scesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scesp_To_Orderings;


   procedure Add_gt2scehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scehd_To_Orderings;


   procedure Add_gt2scesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scesp_To_Orderings;


   procedure Add_gt1oshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1oshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1oshd_To_Orderings;


   procedure Add_gt1ossp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1ossp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1ossp_To_Orderings;


   procedure Add_gt2oshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2oshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2oshd_To_Orderings;


   procedure Add_gt2ossp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2ossp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2ossp_To_Orderings;


   procedure Add_gtahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtahd_To_Orderings;


   procedure Add_gtasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtasp_To_Orderings;


   procedure Add_healthhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "healthhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_healthhd_To_Orderings;


   procedure Add_healthsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "healthsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_healthsp_To_Orderings;


   procedure Add_heartvhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heartvhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heartvhd_To_Orderings;


   procedure Add_heartvsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heartvsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heartvsp_To_Orderings;


   procedure Add_heatadhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatadhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatadhd_To_Orderings;


   procedure Add_heatadsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatadsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatadsp_To_Orderings;


   procedure Add_hholdrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hholdrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hholdrhd_To_Orderings;


   procedure Add_hholdrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hholdrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hholdrsp_To_Orderings;


   procedure Add_hourabhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourabhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourabhd_To_Orderings;


   procedure Add_hourabsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourabsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourabsp_To_Orderings;


   procedure Add_hourahhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourahhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourahhd_To_Orderings;


   procedure Add_hourahsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourahsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourahsp_To_Orderings;


   procedure Add_hrcarehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrcarehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrcarehd_To_Orderings;


   procedure Add_hrcaresp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrcaresp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrcaresp_To_Orderings;


   procedure Add_hourcbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourcbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourcbhd_To_Orderings;


   procedure Add_hourcbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourcbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourcbsp_To_Orderings;


   procedure Add_hourchhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourchhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourchhd_To_Orderings;


   procedure Add_hourchsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourchsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourchsp_To_Orderings;


   procedure Add_hourclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourclhd_To_Orderings;


   procedure Add_hourclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourclsp_To_Orderings;


   procedure Add_hourfrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourfrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourfrhd_To_Orderings;


   procedure Add_hourfrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourfrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourfrsp_To_Orderings;


   procedure Add_hourothd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourothd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourothd_To_Orderings;


   procedure Add_hourotsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourotsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourotsp_To_Orderings;


   procedure Add_hourrehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourrehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourrehd_To_Orderings;


   procedure Add_hourresp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourresp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourresp_To_Orderings;


   procedure Add_hourtthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourtthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourtthd_To_Orderings;


   procedure Add_hourttsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hourttsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hourttsp_To_Orderings;


   procedure Add_hpersohd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersohd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersohd_To_Orderings;


   procedure Add_hpersosp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersosp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersosp_To_Orderings;


   procedure Add_hrpidhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrpidhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrpidhd_To_Orderings;


   procedure Add_hrpidsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrpidsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrpidsp_To_Orderings;


   procedure Add_hsvperhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvperhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvperhd_To_Orderings;


   procedure Add_hsvpersp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvpersp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvpersp_To_Orderings;


   procedure Add_agegp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agegp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegp2hd_To_Orderings;


   procedure Add_agegp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agegp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegp2sp_To_Orderings;


   procedure Add_agegphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agegphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegphd_To_Orderings;


   procedure Add_agegpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agegpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agegpsp_To_Orderings;


   procedure Add_quninshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "quninshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_quninshd_To_Orderings;


   procedure Add_quninssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "quninssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_quninssp_To_Orderings;


   procedure Add_qtubenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qtubenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qtubenhd_To_Orderings;


   procedure Add_qtubensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qtubensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qtubensp_To_Orderings;


   procedure Add_qsicinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qsicinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsicinhd_To_Orderings;


   procedure Add_qsicinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qsicinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsicinsp_To_Orderings;


   procedure Add_qaccinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qaccinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaccinhd_To_Orderings;


   procedure Add_qaccinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qaccinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qaccinsp_To_Orderings;


   procedure Add_qpehinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpehinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpehinhd_To_Orderings;


   procedure Add_qpehinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpehinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpehinsp_To_Orderings;


   procedure Add_qhosinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qhosinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhosinhd_To_Orderings;


   procedure Add_qhosinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qhosinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhosinsp_To_Orderings;


   procedure Add_qfsbenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qfsbenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qfsbenhd_To_Orderings;


   procedure Add_qfsbensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qfsbensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qfsbensp_To_Orderings;


   procedure Add_qcichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qcichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcichd_To_Orderings;


   procedure Add_qcicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qcicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcicsp_To_Orderings;


   procedure Add_qotbenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qotbenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qotbenhd_To_Orderings;


   procedure Add_qotbensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qotbensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qotbensp_To_Orderings;


   procedure Add_incdurhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incdurhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incdurhd_To_Orderings;


   procedure Add_incdursp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incdursp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incdursp_To_Orderings;


   procedure Add_incsehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incsehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incsehd_To_Orderings;


   procedure Add_incsesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incsesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incsesp_To_Orderings;


   procedure Add_indinchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "indinchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_indinchd_To_Orderings;


   procedure Add_indincsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "indincsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_indincsp_To_Orderings;


   procedure Add_indisbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "indisbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_indisbhd_To_Orderings;


   procedure Add_indisbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "indisbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_indisbsp_To_Orderings;


   procedure Add_inearnhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inearnhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inearnhd_To_Orderings;


   procedure Add_inearnsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inearnsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inearnsp_To_Orderings;


   procedure Add_ininvhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ininvhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ininvhd_To_Orderings;


   procedure Add_ininvsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ininvsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ininvsp_To_Orderings;


   procedure Add_inirbehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inirbehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inirbehd_To_Orderings;


   procedure Add_inirbesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inirbesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inirbesp_To_Orderings;


   procedure Add_injlonhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "injlonhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_injlonhd_To_Orderings;


   procedure Add_injlonsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "injlonsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_injlonsp_To_Orderings;


   procedure Add_injhrshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "injhrshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_injhrshd_To_Orderings;


   procedure Add_injhrssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "injhrssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_injhrssp_To_Orderings;


   procedure Add_innirbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "innirbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_innirbhd_To_Orderings;


   procedure Add_innirbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "innirbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_innirbsp_To_Orderings;


   procedure Add_inothbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inothbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inothbhd_To_Orderings;


   procedure Add_inothbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inothbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inothbsp_To_Orderings;


   procedure Add_inpenihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inpenihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inpenihd_To_Orderings;


   procedure Add_inpenisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inpenisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inpenisp_To_Orderings;


   procedure Add_inrinchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inrinchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrinchd_To_Orderings;


   procedure Add_inrincsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inrincsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrincsp_To_Orderings;


   procedure Add_inrpinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inrpinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrpinhd_To_Orderings;


   procedure Add_inrpinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inrpinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inrpinsp_To_Orderings;


   procedure Add_itvlichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "itvlichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_itvlichd_To_Orderings;


   procedure Add_itvlicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "itvlicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_itvlicsp_To_Orderings;


   procedure Add_intxcdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intxcdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intxcdhd_To_Orderings;


   procedure Add_intxcdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intxcdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intxcdsp_To_Orderings;


   procedure Add_investhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "investhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_investhd_To_Orderings;


   procedure Add_investsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "investsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_investsp_To_Orderings;


   procedure Add_isa1tyhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isa1tyhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa1tyhd_To_Orderings;


   procedure Add_isa1tysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isa1tysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa1tysp_To_Orderings;


   procedure Add_isa2tyhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isa2tyhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa2tyhd_To_Orderings;


   procedure Add_isa2tysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isa2tysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isa2tysp_To_Orderings;


   procedure Add_isactihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isactihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isactihd_To_Orderings;


   procedure Add_isactisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isactisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isactisp_To_Orderings;


   procedure Add_jobawahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobawahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobawahd_To_Orderings;


   procedure Add_jobawasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobawasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobawasp_To_Orderings;


   procedure Add_jobbyrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobbyrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobbyrhd_To_Orderings;


   procedure Add_jobbyrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobbyrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobbyrsp_To_Orderings;


   procedure Add_qcbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qcbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcbhd_To_Orderings;


   procedure Add_qcbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qcbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcbsp_To_Orderings;


   procedure Add_qgahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qgahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qgahd_To_Orderings;


   procedure Add_qgasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qgasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qgasp_To_Orderings;


   procedure Add_qmahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qmahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qmahd_To_Orderings;


   procedure Add_qmasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qmasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qmasp_To_Orderings;


   procedure Add_lareghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lareghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lareghd_To_Orderings;


   procedure Add_laregsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregsp_To_Orderings;


   procedure Add_likewkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "likewkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_likewkhd_To_Orderings;


   procedure Add_likewksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "likewksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_likewksp_To_Orderings;


   procedure Add_limitlhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "limitlhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_limitlhd_To_Orderings;


   procedure Add_limitlsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "limitlsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_limitlsp_To_Orderings;


   procedure Add_lktimehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lktimehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktimehd_To_Orderings;


   procedure Add_lktimesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lktimesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktimesp_To_Orderings;


   procedure Add_lktrnhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lktrnhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktrnhd_To_Orderings;


   procedure Add_lktrnsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lktrnsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lktrnsp_To_Orderings;


   procedure Add_lkworkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lkworkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lkworkhd_To_Orderings;


   procedure Add_lkworksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lkworksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lkworksp_To_Orderings;


   procedure Add_loanhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loanhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanhd_To_Orderings;


   procedure Add_loansp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loansp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loansp_To_Orderings;


   procedure Add_loannuhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loannuhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loannuhd_To_Orderings;


   procedure Add_loannusp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loannusp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loannusp_To_Orderings;


   procedure Add_lstwkmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lstwkmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkmhd_To_Orderings;


   procedure Add_lstwkmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lstwkmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkmsp_To_Orderings;


   procedure Add_lstwkyhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lstwkyhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkyhd_To_Orderings;


   procedure Add_lstwkysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lstwkysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lstwkysp_To_Orderings;


   procedure Add_wkswkdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wkswkdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkswkdhd_To_Orderings;


   procedure Add_wkswkdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wkswkdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkswkdsp_To_Orderings;


   procedure Add_marithd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "marithd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_marithd_To_Orderings;


   procedure Add_maritsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "maritsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_maritsp_To_Orderings;


   procedure Add_mr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr1hd_To_Orderings;


   procedure Add_mr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr1sp_To_Orderings;


   procedure Add_mr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr2hd_To_Orderings;


   procedure Add_mr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr2sp_To_Orderings;


   procedure Add_mntar1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar1hd_To_Orderings;


   procedure Add_mntar1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar1sp_To_Orderings;


   procedure Add_mntar2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar2hd_To_Orderings;


   procedure Add_mntar2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar2sp_To_Orderings;


   procedure Add_mntar3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar3hd_To_Orderings;


   procedure Add_mntar3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar3sp_To_Orderings;


   procedure Add_mntar4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar4hd_To_Orderings;


   procedure Add_mntar4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar4sp_To_Orderings;


   procedure Add_mntar5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar5hd_To_Orderings;


   procedure Add_mntar5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntar5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntar5sp_To_Orderings;


   procedure Add_mntnc1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc1hd_To_Orderings;


   procedure Add_mntnc1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc1sp_To_Orderings;


   procedure Add_mntnc2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc2hd_To_Orderings;


   procedure Add_mntnc2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc2sp_To_Orderings;


   procedure Add_mntnc3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc3hd_To_Orderings;


   procedure Add_mntnc3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc3sp_To_Orderings;


   procedure Add_mntnc4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc4hd_To_Orderings;


   procedure Add_mntnc4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc4sp_To_Orderings;


   procedure Add_mntnc5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc5hd_To_Orderings;


   procedure Add_mntnc5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntnc5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntnc5sp_To_Orderings;


   procedure Add_mntpayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpayhd_To_Orderings;


   procedure Add_mntpaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpaysp_To_Orderings;


   procedure Add_pmr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr1hd_To_Orderings;


   procedure Add_pmr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr1sp_To_Orderings;


   procedure Add_pmr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr2hd_To_Orderings;


   procedure Add_pmr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmr2sp_To_Orderings;


   procedure Add_mntpr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr1hd_To_Orderings;


   procedure Add_mntpr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr1sp_To_Orderings;


   procedure Add_mntpr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr2hd_To_Orderings;


   procedure Add_mntpr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr2sp_To_Orderings;


   procedure Add_mntpr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr3hd_To_Orderings;


   procedure Add_mntpr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntpr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntpr3sp_To_Orderings;


   procedure Add_mr12mhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mr12mhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr12mhd_To_Orderings;


   procedure Add_mr12msp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mr12msp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mr12msp_To_Orderings;


   procedure Add_mntt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt1hd_To_Orderings;


   procedure Add_mntt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt1sp_To_Orderings;


   procedure Add_mntt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt2hd_To_Orderings;


   procedure Add_mntt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt2sp_To_Orderings;


   procedure Add_mntt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt3hd_To_Orderings;


   procedure Add_mntt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntt3sp_To_Orderings;


   procedure Add_mntus1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntus1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus1hd_To_Orderings;


   procedure Add_mntus1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntus1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus1sp_To_Orderings;


   procedure Add_mntus2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntus2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus2hd_To_Orderings;


   procedure Add_mntus2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntus2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntus2sp_To_Orderings;


   procedure Add_umr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr1hd_To_Orderings;


   procedure Add_umr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr1sp_To_Orderings;


   procedure Add_umr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr2hd_To_Orderings;


   procedure Add_umr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umr2sp_To_Orderings;


   procedure Add_pumr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pumr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr1hd_To_Orderings;


   procedure Add_pumr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pumr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr1sp_To_Orderings;


   procedure Add_pumr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pumr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr2hd_To_Orderings;


   procedure Add_pumr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pumr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pumr2sp_To_Orderings;


   procedure Add_mntw1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw1hd_To_Orderings;


   procedure Add_mntw1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw1sp_To_Orderings;


   procedure Add_mntw2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw2hd_To_Orderings;


   procedure Add_mntw2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw2sp_To_Orderings;


   procedure Add_mntw3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw3hd_To_Orderings;


   procedure Add_mntw3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw3sp_To_Orderings;


   procedure Add_mntw4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw4hd_To_Orderings;


   procedure Add_mntw4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw4sp_To_Orderings;


   procedure Add_mntw5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw5hd_To_Orderings;


   procedure Add_mntw5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mntw5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mntw5sp_To_Orderings;


   procedure Add_mshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mshd_To_Orderings;


   procedure Add_mssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mssp_To_Orderings;


   procedure Add_nanid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid1hd_To_Orderings;


   procedure Add_nanid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid1sp_To_Orderings;


   procedure Add_nanid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid2hd_To_Orderings;


   procedure Add_nanid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid2sp_To_Orderings;


   procedure Add_nanid3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid3hd_To_Orderings;


   procedure Add_nanid3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid3sp_To_Orderings;


   procedure Add_nanid4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid4hd_To_Orderings;


   procedure Add_nanid4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid4sp_To_Orderings;


   procedure Add_nanid5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid5hd_To_Orderings;


   procedure Add_nanid5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid5sp_To_Orderings;


   procedure Add_nanid6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid6hd_To_Orderings;


   procedure Add_nanid6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nanid6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nanid6sp_To_Orderings;


   procedure Add_nitrnhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nitrnhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nitrnhd_To_Orderings;


   procedure Add_nitrnsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nitrnsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nitrnsp_To_Orderings;


   procedure Add_niamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "niamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_niamthd_To_Orderings;


   procedure Add_niamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "niamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_niamtsp_To_Orderings;


   procedure Add_niethghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "niethghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_niethghd_To_Orderings;


   procedure Add_niethgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "niethgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_niethgsp_To_Orderings;


   procedure Add_nixhbbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nixhbbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nixhbbhd_To_Orderings;


   procedure Add_nixhbbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nixhbbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nixhbbsp_To_Orderings;


   procedure Add_ninid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid1hd_To_Orderings;


   procedure Add_ninid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid1sp_To_Orderings;


   procedure Add_ninid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid2hd_To_Orderings;


   procedure Add_ninid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid2sp_To_Orderings;


   procedure Add_ninid3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid3hd_To_Orderings;


   procedure Add_ninid3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid3sp_To_Orderings;


   procedure Add_ninid4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid4hd_To_Orderings;


   procedure Add_ninid4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid4sp_To_Orderings;


   procedure Add_ninid5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid5hd_To_Orderings;


   procedure Add_ninid5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid5sp_To_Orderings;


   procedure Add_ninid6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid6hd_To_Orderings;


   procedure Add_ninid6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid6sp_To_Orderings;


   procedure Add_ninid7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid7hd_To_Orderings;


   procedure Add_ninid7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninid7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninid7sp_To_Orderings;


   procedure Add_nincs2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nincs2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nincs2hd_To_Orderings;


   procedure Add_nincs2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nincs2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nincs2sp_To_Orderings;


   procedure Add_nininchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nininchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nininchd_To_Orderings;


   procedure Add_ninincsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninincsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninincsp_To_Orderings;


   procedure Add_ninearhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninearhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninearhd_To_Orderings;


   procedure Add_ninearsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninearsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninearsp_To_Orderings;


   procedure Add_nininvhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nininvhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nininvhd_To_Orderings;


   procedure Add_nininvsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nininvsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nininvsp_To_Orderings;


   procedure Add_ninpenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninpenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninpenhd_To_Orderings;


   procedure Add_ninpensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninpensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninpensp_To_Orderings;


   procedure Add_ninrinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninrinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninrinhd_To_Orderings;


   procedure Add_ninrinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninrinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninrinsp_To_Orderings;


   procedure Add_ninseihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninseihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninseihd_To_Orderings;


   procedure Add_ninseisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ninseisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ninseisp_To_Orderings;


   procedure Add_pniamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pniamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pniamthd_To_Orderings;


   procedure Add_pniamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pniamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pniamtsp_To_Orderings;


   procedure Add_nireghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nireghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nireghd_To_Orderings;


   procedure Add_niregsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "niregsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_niregsp_To_Orderings;


   procedure Add_nirelghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nirelghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nirelghd_To_Orderings;


   procedure Add_nirelgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nirelgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nirelgsp_To_Orderings;


   procedure Add_nolk1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nolk1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk1hd_To_Orderings;


   procedure Add_nolk1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nolk1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk1sp_To_Orderings;


   procedure Add_nolk2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nolk2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk2hd_To_Orderings;


   procedure Add_nolk2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nolk2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk2sp_To_Orderings;


   procedure Add_nolk3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nolk3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk3hd_To_Orderings;


   procedure Add_nolk3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nolk3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nolk3sp_To_Orderings;


   procedure Add_nowanthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nowanthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nowanthd_To_Orderings;


   procedure Add_nowantsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nowantsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nowantsp_To_Orderings;


   procedure Add_nssechd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nssechd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nssechd_To_Orderings;


   procedure Add_nssecsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nssecsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nssecsp_To_Orderings;


   procedure Add_numjobhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "numjobhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_numjobhd_To_Orderings;


   procedure Add_numjobsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "numjobsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_numjobsp_To_Orderings;


   procedure Add_numj2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "numj2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_numj2hd_To_Orderings;


   procedure Add_numj2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "numj2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_numj2sp_To_Orderings;


   procedure Add_ocnumhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocnumhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocnumhd_To_Orderings;


   procedure Add_ocnumsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocnumsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocnumsp_To_Orderings;


   procedure Add_oddjobhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjobhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjobhd_To_Orderings;


   procedure Add_oddjobsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjobsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjobsp_To_Orderings;


   procedure Add_oldstdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oldstdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oldstdhd_To_Orderings;


   procedure Add_oldstdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oldstdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oldstdsp_To_Orderings;


   procedure Add_oabparhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oabparhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oabparhd_To_Orderings;


   procedure Add_oabparsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oabparsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oabparsp_To_Orderings;


   procedure Add_otamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otamthd_To_Orderings;


   procedure Add_otamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otamtsp_To_Orderings;


   procedure Add_otpamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otpamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otpamthd_To_Orderings;


   procedure Add_otpamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otpamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otpamtsp_To_Orderings;


   procedure Add_otappdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otappdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otappdhd_To_Orderings;


   procedure Add_otappdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otappdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otappdsp_To_Orderings;


   procedure Add_qehbtbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qehbtbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qehbtbhd_To_Orderings;


   procedure Add_qehbtbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qehbtbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qehbtbsp_To_Orderings;


   procedure Add_qwidplhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qwidplhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwidplhd_To_Orderings;


   procedure Add_qwidplsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qwidplsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwidplsp_To_Orderings;


   procedure Add_qinwkchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qinwkchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qinwkchd_To_Orderings;


   procedure Add_qinwkcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qinwkcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qinwkcsp_To_Orderings;


   procedure Add_qrtwkchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qrtwkchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrtwkchd_To_Orderings;


   procedure Add_qrtwkcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qrtwkcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrtwkcsp_To_Orderings;


   procedure Add_qothbehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qothbehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qothbehd_To_Orderings;


   procedure Add_qothbesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qothbesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qothbesp_To_Orderings;


   procedure Add_othtaxhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othtaxhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othtaxhd_To_Orderings;


   procedure Add_othtaxsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othtaxsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othtaxsp_To_Orderings;


   procedure Add_otinvahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otinvahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otinvahd_To_Orderings;


   procedure Add_otinvasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otinvasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otinvasp_To_Orderings;


   procedure Add_pareamhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pareamhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pareamhd_To_Orderings;


   procedure Add_pareamsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pareamsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pareamsp_To_Orderings;


   procedure Add_qpchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpchd_To_Orderings;


   procedure Add_qpcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpcsp_To_Orderings;


   procedure Add_qrphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qrphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrphd_To_Orderings;


   procedure Add_qrpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qrpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qrpsp_To_Orderings;


   procedure Add_qbbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qbbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qbbhd_To_Orderings;


   procedure Add_qbbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qbbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qbbsp_To_Orderings;


   procedure Add_qafcshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qafcshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qafcshd_To_Orderings;


   procedure Add_qafcssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qafcssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qafcssp_To_Orderings;


   procedure Add_qwwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qwwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwwphd_To_Orderings;


   procedure Add_qwwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qwwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwwpsp_To_Orderings;


   procedure Add_penflghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penflghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penflghd_To_Orderings;


   procedure Add_penflgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penflgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penflgsp_To_Orderings;


   procedure Add_penwl1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl1hd_To_Orderings;


   procedure Add_penwl1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl1sp_To_Orderings;


   procedure Add_penwl2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl2hd_To_Orderings;


   procedure Add_penwl2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl2sp_To_Orderings;


   procedure Add_penwl3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl3hd_To_Orderings;


   procedure Add_penwl3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl3sp_To_Orderings;


   procedure Add_penwl4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl4hd_To_Orderings;


   procedure Add_penwl4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl4sp_To_Orderings;


   procedure Add_penwl5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl5hd_To_Orderings;


   procedure Add_penwl5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl5sp_To_Orderings;


   procedure Add_penwl6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl6hd_To_Orderings;


   procedure Add_penwl6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penwl6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penwl6sp_To_Orderings;


   procedure Add_pepscthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pepscthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pepscthd_To_Orderings;


   procedure Add_pepsctsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pepsctsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pepsctsp_To_Orderings;


   procedure Add_personhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "personhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_personhd_To_Orderings;


   procedure Add_personsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "personsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_personsp_To_Orderings;


   procedure Add_qpipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipdhd_To_Orderings;


   procedure Add_qpipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipdsp_To_Orderings;


   procedure Add_qpipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipmhd_To_Orderings;


   procedure Add_qpipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qpipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qpipmsp_To_Orderings;


   procedure Add_poaccthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poaccthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poaccthd_To_Orderings;


   procedure Add_poacctsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poacctsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poacctsp_To_Orderings;


   procedure Add_pocardhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pocardhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pocardhd_To_Orderings;


   procedure Add_pocardsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pocardsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pocardsp_To_Orderings;


   procedure Add_ppnumchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppnumchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppnumchd_To_Orderings;


   procedure Add_ppnumcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppnumcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppnumcsp_To_Orderings;


   procedure Add_proptxhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "proptxhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_proptxhd_To_Orderings;


   procedure Add_proptxsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "proptxsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_proptxsp_To_Orderings;


   procedure Add_ptwkyrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptwkyrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptwkyrhd_To_Orderings;


   procedure Add_ptwkyrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptwkyrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptwkyrsp_To_Orderings;


   procedure Add_relp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp1hd_To_Orderings;


   procedure Add_relp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp1sp_To_Orderings;


   procedure Add_relp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp2hd_To_Orderings;


   procedure Add_relp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp2sp_To_Orderings;


   procedure Add_relp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp3hd_To_Orderings;


   procedure Add_relp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp3sp_To_Orderings;


   procedure Add_relp4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp4hd_To_Orderings;


   procedure Add_relp4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp4sp_To_Orderings;


   procedure Add_relp5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp5hd_To_Orderings;


   procedure Add_relp5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp5sp_To_Orderings;


   procedure Add_relp6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp6hd_To_Orderings;


   procedure Add_relp6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp6sp_To_Orderings;


   procedure Add_relp7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp7hd_To_Orderings;


   procedure Add_relp7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp7sp_To_Orderings;


   procedure Add_relp8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp8hd_To_Orderings;


   procedure Add_relp8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp8sp_To_Orderings;


   procedure Add_relp9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp9hd_To_Orderings;


   procedure Add_relp9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp9sp_To_Orderings;


   procedure Add_relp10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp10hd_To_Orderings;


   procedure Add_relp10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp10sp_To_Orderings;


   procedure Add_relp11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp11hd_To_Orderings;


   procedure Add_relp11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp11sp_To_Orderings;


   procedure Add_relp12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp12hd_To_Orderings;


   procedure Add_relp12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp12sp_To_Orderings;


   procedure Add_relp13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp13hd_To_Orderings;


   procedure Add_relp13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp13sp_To_Orderings;


   procedure Add_relp14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp14hd_To_Orderings;


   procedure Add_relp14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relp14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relp14sp_To_Orderings;


   procedure Add_reasonhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "reasonhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_reasonhd_To_Orderings;


   procedure Add_reasonsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "reasonsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_reasonsp_To_Orderings;


   procedure Add_redamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "redamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_redamthd_To_Orderings;


   procedure Add_redamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "redamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_redamtsp_To_Orderings;


   procedure Add_redundhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "redundhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_redundhd_To_Orderings;


   procedure Add_redundsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "redundsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_redundsp_To_Orderings;


   procedure Add_rednethd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rednethd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rednethd_To_Orderings;


   procedure Add_rednetsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rednetsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rednetsp_To_Orderings;


   procedure Add_redtaxhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "redtaxhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_redtaxhd_To_Orderings;


   procedure Add_redtaxsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "redtaxsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_redtaxsp_To_Orderings;


   procedure Add_relhrphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relhrphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relhrphd_To_Orderings;


   procedure Add_relhrpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relhrpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relhrpsp_To_Orderings;


   procedure Add_relgewhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relgewhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgewhd_To_Orderings;


   procedure Add_relgewsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relgewsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgewsp_To_Orderings;


   procedure Add_relgschd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relgschd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgschd_To_Orderings;


   procedure Add_relgscsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "relgscsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_relgscsp_To_Orderings;


   procedure Add_rprofhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rprofhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rprofhd_To_Orderings;


   procedure Add_rprofsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rprofsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rprofsp_To_Orderings;


   procedure Add_retirehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "retirehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_retirehd_To_Orderings;


   procedure Add_retiresp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "retiresp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_retiresp_To_Orderings;


   procedure Add_retir1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "retir1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_retir1hd_To_Orderings;


   procedure Add_retir1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "retir1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_retir1sp_To_Orderings;


   procedure Add_retreshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "retreshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_retreshd_To_Orderings;


   procedure Add_retressp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "retressp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_retressp_To_Orderings;


   procedure Add_renthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "renthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_renthd_To_Orderings;


   procedure Add_rentsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rentsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentsp_To_Orderings;


   procedure Add_royalhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "royalhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_royalhd_To_Orderings;


   procedure Add_royalsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "royalsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_royalsp_To_Orderings;


   procedure Add_sleephd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sleephd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sleephd_To_Orderings;


   procedure Add_sleepsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sleepsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sleepsp_To_Orderings;


   procedure Add_forpenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "forpenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_forpenhd_To_Orderings;


   procedure Add_forpensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "forpensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_forpensp_To_Orderings;


   procedure Add_restrchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "restrchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_restrchd_To_Orderings;


   procedure Add_restrcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "restrcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_restrcsp_To_Orderings;


   procedure Add_sapadjhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sapadjhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sapadjhd_To_Orderings;


   procedure Add_sapadjsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sapadjsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sapadjsp_To_Orderings;


   procedure Add_sdem01hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem01hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem01hd_To_Orderings;


   procedure Add_sdem01sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem01sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem01sp_To_Orderings;


   procedure Add_sdem02hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem02hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem02hd_To_Orderings;


   procedure Add_sdem02sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem02sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem02sp_To_Orderings;


   procedure Add_sdem03hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem03hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem03hd_To_Orderings;


   procedure Add_sdem03sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem03sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem03sp_To_Orderings;


   procedure Add_sdem04hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem04hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem04hd_To_Orderings;


   procedure Add_sdem04sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem04sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem04sp_To_Orderings;


   procedure Add_sdem05hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem05hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem05hd_To_Orderings;


   procedure Add_sdem05sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem05sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem05sp_To_Orderings;


   procedure Add_sdem06hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem06hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem06hd_To_Orderings;


   procedure Add_sdem06sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem06sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem06sp_To_Orderings;


   procedure Add_sdem07hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem07hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem07hd_To_Orderings;


   procedure Add_sdem07sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem07sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem07sp_To_Orderings;


   procedure Add_sdem08hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem08hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem08hd_To_Orderings;


   procedure Add_sdem08sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem08sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem08sp_To_Orderings;


   procedure Add_sdem09hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem09hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem09hd_To_Orderings;


   procedure Add_sdem09sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem09sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem09sp_To_Orderings;


   procedure Add_sdem10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem10hd_To_Orderings;


   procedure Add_sdem10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem10sp_To_Orderings;


   procedure Add_sdem11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem11hd_To_Orderings;


   procedure Add_sdem11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem11sp_To_Orderings;


   procedure Add_sdem12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem12hd_To_Orderings;


   procedure Add_sdem12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdem12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdem12sp_To_Orderings;


   procedure Add_inseinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inseinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inseinhd_To_Orderings;


   procedure Add_inseinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "inseinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_inseinsp_To_Orderings;


   procedure Add_sdemphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdemphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdemphd_To_Orderings;


   procedure Add_sdempsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdempsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdempsp_To_Orderings;


   procedure Add_sexhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexhd_To_Orderings;


   procedure Add_sexsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexsp_To_Orderings;


   procedure Add_sichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sichd_To_Orderings;


   procedure Add_sicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sicsp_To_Orderings;


   procedure Add_sidqnhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sidqnhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sidqnhd_To_Orderings;


   procedure Add_sidqnsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sidqnsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sidqnsp_To_Orderings;


   procedure Add_sloshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sloshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sloshd_To_Orderings;


   procedure Add_slossp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "slossp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_slossp_To_Orderings;


   procedure Add_slramthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "slramthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_slramthd_To_Orderings;


   procedure Add_slramtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "slramtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_slramtsp_To_Orderings;


   procedure Add_slrppdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "slrppdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_slrppdhd_To_Orderings;


   procedure Add_slrppdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "slrppdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_slrppdsp_To_Orderings;


   procedure Add_smpajhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpajhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpajhd_To_Orderings;


   procedure Add_smpajsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpajsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpajsp_To_Orderings;


   procedure Add_sc2010hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sc2010hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sc2010hd_To_Orderings;


   procedure Add_sc2010sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sc2010sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sc2010sp_To_Orderings;


   procedure Add_qsfgrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qsfgrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsfgrhd_To_Orderings;


   procedure Add_qsfgrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qsfgrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qsfgrsp_To_Orderings;


   procedure Add_qssmthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qssmthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qssmthd_To_Orderings;


   procedure Add_qssmtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qssmtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qssmtsp_To_Orderings;


   procedure Add_qlgdwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qlgdwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlgdwphd_To_Orderings;


   procedure Add_qlgdwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qlgdwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlgdwpsp_To_Orderings;


   procedure Add_qlglahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qlglahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlglahd_To_Orderings;


   procedure Add_qlglasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qlglasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qlglasp_To_Orderings;


   procedure Add_blindhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blindhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blindhd_To_Orderings;


   procedure Add_blindsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "blindsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_blindsp_To_Orderings;


   procedure Add_parsihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "parsihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_parsihd_To_Orderings;


   procedure Add_parsisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "parsisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_parsisp_To_Orderings;


   procedure Add_deafhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "deafhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_deafhd_To_Orderings;


   procedure Add_deafsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "deafsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_deafsp_To_Orderings;


   procedure Add_spouthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spouthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spouthd_To_Orderings;


   procedure Add_spoutsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spoutsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spoutsp_To_Orderings;


   procedure Add_sppadjhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppadjhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppadjhd_To_Orderings;


   procedure Add_sppadjsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppadjsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppadjsp_To_Orderings;


   procedure Add_spyrothd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spyrothd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spyrothd_To_Orderings;


   procedure Add_spyrotsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spyrotsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spyrotsp_To_Orderings;


   procedure Add_srentahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "srentahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_srentahd_To_Orderings;


   procedure Add_srentasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "srentasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_srentasp_To_Orderings;


   procedure Add_psrenthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psrenthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psrenthd_To_Orderings;


   procedure Add_psrentsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psrentsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psrentsp_To_Orderings;


   procedure Add_sfispchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfispchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfispchd_To_Orderings;


   procedure Add_sfispcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfispcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfispcsp_To_Orderings;


   procedure Add_sfjesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfjesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfjesahd_To_Orderings;


   procedure Add_sfjesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfjesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfjesasp_To_Orderings;


   procedure Add_sruchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sruchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sruchd_To_Orderings;


   procedure Add_srucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "srucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_srucsp_To_Orderings;


   procedure Add_sspajhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspajhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspajhd_To_Orderings;


   procedure Add_sspajsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspajsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspajsp_To_Orderings;


   procedure Add_gtsavahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtsavahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtsavahd_To_Orderings;


   procedure Add_gtsavasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtsavasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtsavasp_To_Orderings;


   procedure Add_stshcthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stshcthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshcthd_To_Orderings;


   procedure Add_stshctsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stshctsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshctsp_To_Orderings;


   procedure Add_tdaywkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tdaywkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tdaywkhd_To_Orderings;


   procedure Add_tdaywksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tdaywksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tdaywksp_To_Orderings;


   procedure Add_agefedhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agefedhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agefedhd_To_Orderings;


   procedure Add_agefedsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agefedsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agefedsp_To_Orderings;


   procedure Add_tmpjobhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tmpjobhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tmpjobhd_To_Orderings;


   procedure Add_tmpjobsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tmpjobsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tmpjobsp_To_Orderings;


   procedure Add_tesscthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tesscthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tesscthd_To_Orderings;


   procedure Add_tessctsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tessctsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tessctsp_To_Orderings;


   procedure Add_totgrahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgrahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgrahd_To_Orderings;


   procedure Add_totgrasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgrasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgrasp_To_Orderings;


   procedure Add_tothouhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tothouhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tothouhd_To_Orderings;


   procedure Add_tothousp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tothousp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tothousp_To_Orderings;


   procedure Add_totinthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totinthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totinthd_To_Orderings;


   procedure Add_totintsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totintsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totintsp_To_Orderings;


   procedure Add_totocchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totocchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totocchd_To_Orderings;


   procedure Add_totoccsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totoccsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totoccsp_To_Orderings;


   procedure Add_trainhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trainhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trainhd_To_Orderings;


   procedure Add_trainsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trainsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trainsp_To_Orderings;


   procedure Add_trnallhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnallhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnallhd_To_Orderings;


   procedure Add_trnallsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnallsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnallsp_To_Orderings;


   procedure Add_ttbprxhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ttbprxhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttbprxhd_To_Orderings;


   procedure Add_ttbprxsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ttbprxsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttbprxsp_To_Orderings;


   procedure Add_tuborrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuborrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuborrhd_To_Orderings;


   procedure Add_tuborrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuborrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuborrsp_To_Orderings;


   procedure Add_typeedhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "typeedhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_typeedhd_To_Orderings;


   procedure Add_typeedsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "typeedsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_typeedsp_To_Orderings;


   procedure Add_unpd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unpd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd1hd_To_Orderings;


   procedure Add_unpd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unpd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd1sp_To_Orderings;


   procedure Add_unpd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unpd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd2hd_To_Orderings;


   procedure Add_unpd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unpd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unpd2sp_To_Orderings;


   procedure Add_untrcthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "untrcthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_untrcthd_To_Orderings;


   procedure Add_untrctsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "untrctsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_untrctsp_To_Orderings;


   procedure Add_upersohd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upersohd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upersohd_To_Orderings;


   procedure Add_upersosp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upersosp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upersosp_To_Orderings;


   procedure Add_agewidhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agewidhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agewidhd_To_Orderings;


   procedure Add_agewidsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agewidsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agewidsp_To_Orderings;


   procedure Add_kidwidhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kidwidhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kidwidhd_To_Orderings;


   procedure Add_kidwidsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kidwidsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kidwidsp_To_Orderings;


   procedure Add_quchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "quchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_quchd_To_Orderings;


   procedure Add_qucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qucsp_To_Orderings;


   procedure Add_qhbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qhbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhbhd_To_Orderings;


   procedure Add_qhbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qhbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qhbsp_To_Orderings;


   procedure Add_qwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwtchd_To_Orderings;


   procedure Add_qwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qwtcsp_To_Orderings;


   procedure Add_qctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qctchd_To_Orderings;


   procedure Add_qctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qctcsp_To_Orderings;


   procedure Add_qishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qishd_To_Orderings;


   procedure Add_qissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qissp_To_Orderings;


   procedure Add_qjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qjsahd_To_Orderings;


   procedure Add_qjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qjsasp_To_Orderings;


   procedure Add_qesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qesahd_To_Orderings;


   procedure Add_qesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qesasp_To_Orderings;


   procedure Add_qcahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qcahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcahd_To_Orderings;


   procedure Add_qcasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "qcasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_qcasp_To_Orderings;


   procedure Add_waithd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "waithd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_waithd_To_Orderings;


   procedure Add_waitsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "waitsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_waitsp_To_Orderings;


   procedure Add_whresphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whresphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whresphd_To_Orderings;


   procedure Add_whrespsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whrespsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whrespsp_To_Orderings;


   procedure Add_whoctbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whoctbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whoctbhd_To_Orderings;


   procedure Add_whoctbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whoctbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whoctbsp_To_Orderings;


   procedure Add_widocchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "widocchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_widocchd_To_Orderings;


   procedure Add_widoccsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "widoccsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_widoccsp_To_Orderings;


   procedure Add_wintflhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wintflhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wintflhd_To_Orderings;


   procedure Add_wintflsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wintflsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wintflsp_To_Orderings;


   procedure Add_workinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workinhd_To_Orderings;


   procedure Add_workinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workinsp_To_Orderings;


   procedure Add_wpahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpahd_To_Orderings;


   procedure Add_wpasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpasp_To_Orderings;


   procedure Add_wpbahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpbahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpbahd_To_Orderings;


   procedure Add_wpbasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpbasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpbasp_To_Orderings;


   procedure Add_wtclm1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wtclm1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm1hd_To_Orderings;


   procedure Add_wtclm1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wtclm1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm1sp_To_Orderings;


   procedure Add_wtclm2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wtclm2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm2hd_To_Orderings;


   procedure Add_wtclm2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wtclm2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtclm2sp_To_Orderings;


   procedure Add_yjblevhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjblevhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjblevhd_To_Orderings;


   procedure Add_yjblevsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjblevsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjblevsp_To_Orderings;


   procedure Add_ystwkhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ystwkhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ystwkhd_To_Orderings;


   procedure Add_ystwksp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ystwksp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ystwksp_To_Orderings;


   procedure Add_as011hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as011hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as011hd_To_Orderings;


   procedure Add_as012hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as012hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as012hd_To_Orderings;


   procedure Add_as013hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as013hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as013hd_To_Orderings;


   procedure Add_as014hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as014hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as014hd_To_Orderings;


   procedure Add_as011sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as011sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as011sp_To_Orderings;


   procedure Add_as012sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as012sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as012sp_To_Orderings;


   procedure Add_as013sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as013sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as013sp_To_Orderings;


   procedure Add_as014sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as014sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as014sp_To_Orderings;


   procedure Add_as021hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as021hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as021hd_To_Orderings;


   procedure Add_as022hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as022hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as022hd_To_Orderings;


   procedure Add_as021sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as021sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as021sp_To_Orderings;


   procedure Add_as022sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as022sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as022sp_To_Orderings;


   procedure Add_as031hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as031hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as031hd_To_Orderings;


   procedure Add_as031sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as031sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as031sp_To_Orderings;


   procedure Add_as051hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as051hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as051hd_To_Orderings;


   procedure Add_as052hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as052hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as052hd_To_Orderings;


   procedure Add_as053hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as053hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as053hd_To_Orderings;


   procedure Add_as054hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as054hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as054hd_To_Orderings;


   procedure Add_as055hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as055hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as055hd_To_Orderings;


   procedure Add_as056hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as056hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as056hd_To_Orderings;


   procedure Add_as057hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as057hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as057hd_To_Orderings;


   procedure Add_as051sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as051sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as051sp_To_Orderings;


   procedure Add_as052sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as052sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as052sp_To_Orderings;


   procedure Add_as053sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as053sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as053sp_To_Orderings;


   procedure Add_as054sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as054sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as054sp_To_Orderings;


   procedure Add_as055sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as055sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as055sp_To_Orderings;


   procedure Add_as056sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as056sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as056sp_To_Orderings;


   procedure Add_as057sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as057sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as057sp_To_Orderings;


   procedure Add_as061hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as061hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as061hd_To_Orderings;


   procedure Add_as061sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as061sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as061sp_To_Orderings;


   procedure Add_as071hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as071hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as071hd_To_Orderings;


   procedure Add_as071sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as071sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as071sp_To_Orderings;


   procedure Add_as081hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as081hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as081hd_To_Orderings;


   procedure Add_as082hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as082hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as082hd_To_Orderings;


   procedure Add_as083hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as083hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as083hd_To_Orderings;


   procedure Add_as084hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as084hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as084hd_To_Orderings;


   procedure Add_as085hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as085hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as085hd_To_Orderings;


   procedure Add_as081sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as081sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as081sp_To_Orderings;


   procedure Add_as082sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as082sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as082sp_To_Orderings;


   procedure Add_as083sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as083sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as083sp_To_Orderings;


   procedure Add_as084sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as084sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as084sp_To_Orderings;


   procedure Add_as085sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as085sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as085sp_To_Orderings;


   procedure Add_as101hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as101hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as101hd_To_Orderings;


   procedure Add_as101sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as101sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as101sp_To_Orderings;


   procedure Add_as111hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as111hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as111hd_To_Orderings;


   procedure Add_as111sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as111sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as111sp_To_Orderings;


   procedure Add_as121hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as121hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as121hd_To_Orderings;


   procedure Add_as121sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as121sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as121sp_To_Orderings;


   procedure Add_as131hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as131hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as131hd_To_Orderings;


   procedure Add_as131sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as131sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as131sp_To_Orderings;


   procedure Add_as141hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as141hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as141hd_To_Orderings;


   procedure Add_as142hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as142hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as142hd_To_Orderings;


   procedure Add_as143hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as143hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as143hd_To_Orderings;


   procedure Add_as141sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as141sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as141sp_To_Orderings;


   procedure Add_as142sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as142sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as142sp_To_Orderings;


   procedure Add_as143sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as143sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as143sp_To_Orderings;


   procedure Add_as151hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as151hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as151hd_To_Orderings;


   procedure Add_as151sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as151sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as151sp_To_Orderings;


   procedure Add_as161hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as161hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as161hd_To_Orderings;


   procedure Add_as161sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as161sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as161sp_To_Orderings;


   procedure Add_as191hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as191hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as191hd_To_Orderings;


   procedure Add_as191sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as191sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as191sp_To_Orderings;


   procedure Add_as211hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as211hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as211hd_To_Orderings;


   procedure Add_as212hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as212hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as212hd_To_Orderings;


   procedure Add_as213hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as213hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as213hd_To_Orderings;


   procedure Add_as214hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as214hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as214hd_To_Orderings;


   procedure Add_as211sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as211sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as211sp_To_Orderings;


   procedure Add_as212sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as212sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as212sp_To_Orderings;


   procedure Add_as213sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as213sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as213sp_To_Orderings;


   procedure Add_as214sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as214sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as214sp_To_Orderings;


   procedure Add_as261hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as261hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as261hd_To_Orderings;


   procedure Add_as261sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as261sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as261sp_To_Orderings;


   procedure Add_as271hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as271hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as271hd_To_Orderings;


   procedure Add_as272hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as272hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as272hd_To_Orderings;


   procedure Add_as271sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as271sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as271sp_To_Orderings;


   procedure Add_as272sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as272sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as272sp_To_Orderings;


   procedure Add_as281hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as281hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as281hd_To_Orderings;


   procedure Add_as281sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as281sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as281sp_To_Orderings;


   procedure Add_as291hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as291hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as291hd_To_Orderings;


   procedure Add_as292hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as292hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as292hd_To_Orderings;


   procedure Add_as293hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as293hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as293hd_To_Orderings;


   procedure Add_as291sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as291sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as291sp_To_Orderings;


   procedure Add_as292sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as292sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as292sp_To_Orderings;


   procedure Add_as293sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "as293sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_as293sp_To_Orderings;


   procedure Add_stdlachd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlachd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlachd_To_Orderings;


   procedure Add_stdlamhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamhd_To_Orderings;


   procedure Add_stcbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stcbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stcbhd_To_Orderings;


   procedure Add_stpenchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stpenchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpenchd_To_Orderings;


   procedure Add_strphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "strphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_strphd_To_Orderings;


   procedure Add_stwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwphd_To_Orderings;


   procedure Add_stwdphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwdphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwdphd_To_Orderings;


   procedure Add_stwwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwwphd_To_Orderings;


   procedure Add_stsdahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stsdahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stsdahd_To_Orderings;


   procedure Add_staahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "staahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_staahd_To_Orderings;


   procedure Add_sticahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sticahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sticahd_To_Orderings;


   procedure Add_stjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stjsahd_To_Orderings;


   procedure Add_stiidbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stiidbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stiidbhd_To_Orderings;


   procedure Add_stesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stesahd_To_Orderings;


   procedure Add_stibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stibhd_To_Orderings;


   procedure Add_stishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stishd_To_Orderings;


   procedure Add_stmahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stmahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stmahd_To_Orderings;


   procedure Add_stshhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stshhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshhd_To_Orderings;


   procedure Add_stgahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stgahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stgahd_To_Orderings;


   procedure Add_stwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtchd_To_Orderings;


   procedure Add_stctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctchd_To_Orderings;


   procedure Add_stwtclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwtclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtclhd_To_Orderings;


   procedure Add_stctclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stctclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctclhd_To_Orderings;


   procedure Add_stuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stuchd_To_Orderings;


   procedure Add_stpipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stpipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipdhd_To_Orderings;


   procedure Add_stpipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stpipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipmhd_To_Orderings;


   procedure Add_stdlacsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacsp_To_Orderings;


   procedure Add_stdlamsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamsp_To_Orderings;


   procedure Add_stcbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stcbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stcbsp_To_Orderings;


   procedure Add_stpencsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stpencsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpencsp_To_Orderings;


   procedure Add_strpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "strpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_strpsp_To_Orderings;


   procedure Add_stwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwpsp_To_Orderings;


   procedure Add_stwdpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwdpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwdpsp_To_Orderings;


   procedure Add_stwwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwwpsp_To_Orderings;


   procedure Add_stsdasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stsdasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stsdasp_To_Orderings;


   procedure Add_staasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "staasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_staasp_To_Orderings;


   procedure Add_sticasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sticasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sticasp_To_Orderings;


   procedure Add_stjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stjsasp_To_Orderings;


   procedure Add_stiidbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stiidbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stiidbsp_To_Orderings;


   procedure Add_stesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stesasp_To_Orderings;


   procedure Add_stibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stibsp_To_Orderings;


   procedure Add_stissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stissp_To_Orderings;


   procedure Add_stmasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stmasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stmasp_To_Orderings;


   procedure Add_stshsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stshsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stshsp_To_Orderings;


   procedure Add_stgasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stgasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stgasp_To_Orderings;


   procedure Add_stwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtcsp_To_Orderings;


   procedure Add_stctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctcsp_To_Orderings;


   procedure Add_stwtclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stwtclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stwtclsp_To_Orderings;


   procedure Add_stctclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stctclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stctclsp_To_Orderings;


   procedure Add_stucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stucsp_To_Orderings;


   procedure Add_stpipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stpipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipdsp_To_Orderings;


   procedure Add_stpipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stpipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stpipmsp_To_Orderings;


   procedure Add_dlacahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacahd_To_Orderings;


   procedure Add_dlamohd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamohd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamohd_To_Orderings;


   procedure Add_cbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbhd_To_Orderings;


   procedure Add_lpencrhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lpencrhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lpencrhd_To_Orderings;


   procedure Add_rphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rphd_To_Orderings;


   procedure Add_wphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wphd_To_Orderings;


   procedure Add_wdphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wdphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wdphd_To_Orderings;


   procedure Add_wwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwphd_To_Orderings;


   procedure Add_sdahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdahd_To_Orderings;


   procedure Add_aahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aahd_To_Orderings;


   procedure Add_icahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "icahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_icahd_To_Orderings;


   procedure Add_jsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsahd_To_Orderings;


   procedure Add_iidbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "iidbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_iidbhd_To_Orderings;


   procedure Add_esahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "esahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_esahd_To_Orderings;


   procedure Add_ibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ibhd_To_Orderings;


   procedure Add_ishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ishd_To_Orderings;


   procedure Add_mahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mahd_To_Orderings;


   procedure Add_sfmghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfmghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfmghd_To_Orderings;


   procedure Add_sffghd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sffghd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sffghd_To_Orderings;


   procedure Add_othbenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othbenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othbenhd_To_Orderings;


   procedure Add_tubenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tubenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tubenhd_To_Orderings;


   procedure Add_fsbenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsbenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsbenhd_To_Orderings;


   procedure Add_sicinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sicinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sicinhd_To_Orderings;


   procedure Add_accinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accinhd_To_Orderings;


   procedure Add_hosinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hosinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hosinhd_To_Orderings;


   procedure Add_gtshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtshd_To_Orderings;


   procedure Add_gahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gahd_To_Orderings;


   procedure Add_iwchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "iwchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwchd_To_Orderings;


   procedure Add_r2wchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2wchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wchd_To_Orderings;


   procedure Add_widplhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "widplhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_widplhd_To_Orderings;


   procedure Add_uninshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uninshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uninshd_To_Orderings;


   procedure Add_wfamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wfamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfamthd_To_Orderings;


   procedure Add_dssdpihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssdpihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpihd_To_Orderings;


   procedure Add_dssdpjhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssdpjhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpjhd_To_Orderings;


   procedure Add_sfrpaihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfrpaihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpaihd_To_Orderings;


   procedure Add_sfrpajhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfrpajhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpajhd_To_Orderings;


   procedure Add_exhbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exhbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbhd_To_Orderings;


   procedure Add_perhinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "perhinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_perhinhd_To_Orderings;


   procedure Add_otsiinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otsiinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otsiinhd_To_Orderings;


   procedure Add_cichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cichd_To_Orderings;


   procedure Add_bowtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bowtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtchd_To_Orderings;


   procedure Add_boctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctchd_To_Orderings;


   procedure Add_bowtclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bowtclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtclhd_To_Orderings;


   procedure Add_boctclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boctclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctclhd_To_Orderings;


   procedure Add_hbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbhd_To_Orderings;


   procedure Add_uchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uchd_To_Orderings;


   procedure Add_pipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipdhd_To_Orderings;


   procedure Add_pipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmhd_To_Orderings;


   procedure Add_lndwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lndwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lndwphd_To_Orderings;


   procedure Add_lnlahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lnlahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnlahd_To_Orderings;


   procedure Add_dwpauchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dwpauchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpauchd_To_Orderings;


   procedure Add_sfrpuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfrpuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpuchd_To_Orderings;


   procedure Add_dlacasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacasp_To_Orderings;


   procedure Add_dlamosp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamosp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamosp_To_Orderings;


   procedure Add_cbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbsp_To_Orderings;


   procedure Add_lpencrsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lpencrsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lpencrsp_To_Orderings;


   procedure Add_rpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rpsp_To_Orderings;


   procedure Add_wpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpsp_To_Orderings;


   procedure Add_wdpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wdpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wdpsp_To_Orderings;


   procedure Add_wwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpsp_To_Orderings;


   procedure Add_sdasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sdasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sdasp_To_Orderings;


   procedure Add_aasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aasp_To_Orderings;


   procedure Add_icasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "icasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_icasp_To_Orderings;


   procedure Add_jsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsasp_To_Orderings;


   procedure Add_iidbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "iidbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_iidbsp_To_Orderings;


   procedure Add_esasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "esasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_esasp_To_Orderings;


   procedure Add_ibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ibsp_To_Orderings;


   procedure Add_issp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "issp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_issp_To_Orderings;


   procedure Add_masp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "masp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_masp_To_Orderings;


   procedure Add_sfmgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfmgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfmgsp_To_Orderings;


   procedure Add_sffgsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sffgsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sffgsp_To_Orderings;


   procedure Add_othbensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othbensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othbensp_To_Orderings;


   procedure Add_tubensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tubensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tubensp_To_Orderings;


   procedure Add_fsbensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsbensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsbensp_To_Orderings;


   procedure Add_sicinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sicinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sicinsp_To_Orderings;


   procedure Add_accinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accinsp_To_Orderings;


   procedure Add_hosinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hosinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hosinsp_To_Orderings;


   procedure Add_gtssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtssp_To_Orderings;


   procedure Add_gasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gasp_To_Orderings;


   procedure Add_iwcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "iwcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwcsp_To_Orderings;


   procedure Add_r2wcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2wcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wcsp_To_Orderings;


   procedure Add_widplsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "widplsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_widplsp_To_Orderings;


   procedure Add_uninssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uninssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uninssp_To_Orderings;


   procedure Add_wfamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wfamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfamtsp_To_Orderings;


   procedure Add_dssdpisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssdpisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpisp_To_Orderings;


   procedure Add_dssdpjsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssdpjsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssdpjsp_To_Orderings;


   procedure Add_sfrpaisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfrpaisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpaisp_To_Orderings;


   procedure Add_sfrpajsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfrpajsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpajsp_To_Orderings;


   procedure Add_exhbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exhbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbsp_To_Orderings;


   procedure Add_perhinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "perhinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_perhinsp_To_Orderings;


   procedure Add_otsiinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otsiinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otsiinsp_To_Orderings;


   procedure Add_cicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cicsp_To_Orderings;


   procedure Add_bowtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bowtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtcsp_To_Orderings;


   procedure Add_boctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctcsp_To_Orderings;


   procedure Add_bowtclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bowtclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bowtclsp_To_Orderings;


   procedure Add_boctclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boctclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boctclsp_To_Orderings;


   procedure Add_hbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbsp_To_Orderings;


   procedure Add_ucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ucsp_To_Orderings;


   procedure Add_pipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipdsp_To_Orderings;


   procedure Add_pipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmsp_To_Orderings;


   procedure Add_lndwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lndwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lndwpsp_To_Orderings;


   procedure Add_lnlasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lnlasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnlasp_To_Orderings;


   procedure Add_dwpaucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dwpaucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpaucsp_To_Orderings;


   procedure Add_sfrpucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfrpucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfrpucsp_To_Orderings;


   procedure Add_ltdlachd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlachd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlachd_To_Orderings;


   procedure Add_ltdlamhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamhd_To_Orderings;


   procedure Add_ltcbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltcbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltcbhd_To_Orderings;


   procedure Add_bopenchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bopenchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bopenchd_To_Orderings;


   procedure Add_ltrphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltrphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltrphd_To_Orderings;


   procedure Add_ltwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwphd_To_Orderings;


   procedure Add_ltwdphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltwdphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwdphd_To_Orderings;


   procedure Add_ltwwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltwwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwwphd_To_Orderings;


   procedure Add_ltsdahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltsdahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltsdahd_To_Orderings;


   procedure Add_ltaahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltaahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltaahd_To_Orderings;


   procedure Add_lticahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lticahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lticahd_To_Orderings;


   procedure Add_ltjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltjsahd_To_Orderings;


   procedure Add_ltiidbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltiidbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltiidbhd_To_Orderings;


   procedure Add_ltesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltesahd_To_Orderings;


   procedure Add_ltibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltibhd_To_Orderings;


   procedure Add_ltishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltishd_To_Orderings;


   procedure Add_ltmahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltmahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltmahd_To_Orderings;


   procedure Add_ltshhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltshhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltshhd_To_Orderings;


   procedure Add_ltgahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltgahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltgahd_To_Orderings;


   procedure Add_hwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtchd_To_Orderings;


   procedure Add_hctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctchd_To_Orderings;


   procedure Add_hwtclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hwtclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtclhd_To_Orderings;


   procedure Add_hctclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hctclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctclhd_To_Orderings;


   procedure Add_ltuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltuchd_To_Orderings;


   procedure Add_ltpipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltpipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipdhd_To_Orderings;


   procedure Add_ltpipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltpipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipmhd_To_Orderings;


   procedure Add_ltdlacsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacsp_To_Orderings;


   procedure Add_ltdlamsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamsp_To_Orderings;


   procedure Add_ltcbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltcbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltcbsp_To_Orderings;


   procedure Add_bopencsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bopencsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bopencsp_To_Orderings;


   procedure Add_ltrpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltrpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltrpsp_To_Orderings;


   procedure Add_ltwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwpsp_To_Orderings;


   procedure Add_ltwdpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltwdpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwdpsp_To_Orderings;


   procedure Add_ltwwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltwwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltwwpsp_To_Orderings;


   procedure Add_ltsdasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltsdasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltsdasp_To_Orderings;


   procedure Add_ltaasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltaasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltaasp_To_Orderings;


   procedure Add_lticasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lticasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lticasp_To_Orderings;


   procedure Add_ltjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltjsasp_To_Orderings;


   procedure Add_ltiidbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltiidbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltiidbsp_To_Orderings;


   procedure Add_ltesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltesasp_To_Orderings;


   procedure Add_ltibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltibsp_To_Orderings;


   procedure Add_ltissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltissp_To_Orderings;


   procedure Add_ltmasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltmasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltmasp_To_Orderings;


   procedure Add_ltshsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltshsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltshsp_To_Orderings;


   procedure Add_ltgasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltgasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltgasp_To_Orderings;


   procedure Add_hwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtcsp_To_Orderings;


   procedure Add_hctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctcsp_To_Orderings;


   procedure Add_hwtclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hwtclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hwtclsp_To_Orderings;


   procedure Add_hctclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hctclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hctclsp_To_Orderings;


   procedure Add_ltucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltucsp_To_Orderings;


   procedure Add_ltpipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltpipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipdsp_To_Orderings;


   procedure Add_ltpipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltpipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltpipmsp_To_Orderings;


   procedure Add_pdlacahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacahd_To_Orderings;


   procedure Add_pdlamohd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamohd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamohd_To_Orderings;


   procedure Add_pcbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcbhd_To_Orderings;


   procedure Add_hpenchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpenchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpenchd_To_Orderings;


   procedure Add_prphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prphd_To_Orderings;


   procedure Add_pwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwphd_To_Orderings;


   procedure Add_pwdphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwdphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwdphd_To_Orderings;


   procedure Add_pwwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwwphd_To_Orderings;


   procedure Add_psdahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psdahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psdahd_To_Orderings;


   procedure Add_paahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paahd_To_Orderings;


   procedure Add_picahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "picahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_picahd_To_Orderings;


   procedure Add_pjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pjsahd_To_Orderings;


   procedure Add_piidbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "piidbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_piidbhd_To_Orderings;


   procedure Add_pesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pesahd_To_Orderings;


   procedure Add_pibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pibhd_To_Orderings;


   procedure Add_pishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pishd_To_Orderings;


   procedure Add_pmahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmahd_To_Orderings;


   procedure Add_pothbehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothbehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothbehd_To_Orderings;


   procedure Add_ptubenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptubenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptubenhd_To_Orderings;


   procedure Add_pfsbenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pfsbenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfsbenhd_To_Orderings;


   procedure Add_psicinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psicinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psicinhd_To_Orderings;


   procedure Add_paccinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paccinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paccinhd_To_Orderings;


   procedure Add_phosinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "phosinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_phosinhd_To_Orderings;


   procedure Add_pgtshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pgtshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgtshd_To_Orderings;


   procedure Add_pgahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pgahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgahd_To_Orderings;


   procedure Add_iwcpdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "iwcpdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwcpdhd_To_Orderings;


   procedure Add_r2wcpdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2wcpdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wcpdhd_To_Orderings;


   procedure Add_puninshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puninshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puninshd_To_Orderings;


   procedure Add_pdsspihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdsspihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspihd_To_Orderings;


   procedure Add_pdsspjhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdsspjhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspjhd_To_Orderings;


   procedure Add_pexhbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pexhbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pexhbhd_To_Orderings;


   procedure Add_ppehinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppehinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppehinhd_To_Orderings;


   procedure Add_potsinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "potsinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_potsinhd_To_Orderings;


   procedure Add_pdcichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdcichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdcichd_To_Orderings;


   procedure Add_wwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtchd_To_Orderings;


   procedure Add_wctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctchd_To_Orderings;


   procedure Add_wwtclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwtclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtclhd_To_Orderings;


   procedure Add_wctclhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wctclhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctclhd_To_Orderings;


   procedure Add_phbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "phbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_phbhd_To_Orderings;


   procedure Add_puchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puchd_To_Orderings;


   procedure Add_ppipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipdhd_To_Orderings;


   procedure Add_ppipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipmhd_To_Orderings;


   procedure Add_pdwpuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdwpuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdwpuchd_To_Orderings;


   procedure Add_pdlacasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacasp_To_Orderings;


   procedure Add_pdlamosp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamosp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamosp_To_Orderings;


   procedure Add_pcbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcbsp_To_Orderings;


   procedure Add_hpencsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpencsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpencsp_To_Orderings;


   procedure Add_prpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prpsp_To_Orderings;


   procedure Add_pwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpsp_To_Orderings;


   procedure Add_pwdpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwdpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwdpsp_To_Orderings;


   procedure Add_pwwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwwpsp_To_Orderings;


   procedure Add_psdasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psdasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psdasp_To_Orderings;


   procedure Add_paasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paasp_To_Orderings;


   procedure Add_picasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "picasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_picasp_To_Orderings;


   procedure Add_pjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pjsasp_To_Orderings;


   procedure Add_piidbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "piidbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_piidbsp_To_Orderings;


   procedure Add_pesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pesasp_To_Orderings;


   procedure Add_pibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pibsp_To_Orderings;


   procedure Add_pissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pissp_To_Orderings;


   procedure Add_pmasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmasp_To_Orderings;


   procedure Add_pothbesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothbesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothbesp_To_Orderings;


   procedure Add_ptubensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptubensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptubensp_To_Orderings;


   procedure Add_pfsbensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pfsbensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pfsbensp_To_Orderings;


   procedure Add_psicinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psicinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psicinsp_To_Orderings;


   procedure Add_paccinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paccinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paccinsp_To_Orderings;


   procedure Add_phosinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "phosinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_phosinsp_To_Orderings;


   procedure Add_pgtssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pgtssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgtssp_To_Orderings;


   procedure Add_pgasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pgasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pgasp_To_Orderings;


   procedure Add_iwcpdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "iwcpdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_iwcpdsp_To_Orderings;


   procedure Add_r2wcpdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2wcpdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2wcpdsp_To_Orderings;


   procedure Add_puninssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puninssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puninssp_To_Orderings;


   procedure Add_pdsspisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdsspisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspisp_To_Orderings;


   procedure Add_pdsspjsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdsspjsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdsspjsp_To_Orderings;


   procedure Add_pexhbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pexhbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pexhbsp_To_Orderings;


   procedure Add_ppehinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppehinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppehinsp_To_Orderings;


   procedure Add_potsinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "potsinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_potsinsp_To_Orderings;


   procedure Add_pdcicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdcicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdcicsp_To_Orderings;


   procedure Add_wwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtcsp_To_Orderings;


   procedure Add_wctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctcsp_To_Orderings;


   procedure Add_wwtclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwtclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwtclsp_To_Orderings;


   procedure Add_wctclsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wctclsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wctclsp_To_Orderings;


   procedure Add_phbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "phbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_phbsp_To_Orderings;


   procedure Add_pucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pucsp_To_Orderings;


   procedure Add_ppipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipdsp_To_Orderings;


   procedure Add_ppipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppipmsp_To_Orderings;


   procedure Add_pdwpucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdwpucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdwpucsp_To_Orderings;


   procedure Add_cbpayehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbpayehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbpayehd_To_Orderings;


   procedure Add_cbpayesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbpayesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbpayesp_To_Orderings;


   procedure Add_cbtaxhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbtaxhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbtaxhd_To_Orderings;


   procedure Add_cbtaxsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbtaxsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbtaxsp_To_Orderings;


   procedure Add_pwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwtchd_To_Orderings;


   procedure Add_pctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pctchd_To_Orderings;


   procedure Add_pwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwtcsp_To_Orderings;


   procedure Add_pctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pctcsp_To_Orderings;


   procedure Add_npcamthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "npcamthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_npcamthd_To_Orderings;


   procedure Add_urphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "urphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_urphd_To_Orderings;


   procedure Add_uwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwphd_To_Orderings;


   procedure Add_uesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uesahd_To_Orderings;


   procedure Add_uishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uishd_To_Orderings;


   procedure Add_uwtchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uwtchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwtchd_To_Orderings;


   procedure Add_uctchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uctchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uctchd_To_Orderings;


   procedure Add_npcamtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "npcamtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_npcamtsp_To_Orderings;


   procedure Add_urpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "urpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_urpsp_To_Orderings;


   procedure Add_uwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwpsp_To_Orderings;


   procedure Add_uesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uesasp_To_Orderings;


   procedure Add_uissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uissp_To_Orderings;


   procedure Add_uwtcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uwtcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uwtcsp_To_Orderings;


   procedure Add_uctcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uctcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uctcsp_To_Orderings;


   procedure Add_dmpenchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpenchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpenchd_To_Orderings;


   procedure Add_purphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "purphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_purphd_To_Orderings;


   procedure Add_puwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puwphd_To_Orderings;


   procedure Add_nupesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nupesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nupesahd_To_Orderings;


   procedure Add_puishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puishd_To_Orderings;


   procedure Add_dmpencsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpencsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpencsp_To_Orderings;


   procedure Add_purpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "purpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_purpsp_To_Orderings;


   procedure Add_puwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puwpsp_To_Orderings;


   procedure Add_nupesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nupesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nupesasp_To_Orderings;


   procedure Add_puissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "puissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_puissp_To_Orderings;


   procedure Add_wjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wjsahd_To_Orderings;


   procedure Add_wesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wesahd_To_Orderings;


   procedure Add_wishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wishd_To_Orderings;


   procedure Add_wothbehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wothbehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wothbehd_To_Orderings;


   procedure Add_wtubenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wtubenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtubenhd_To_Orderings;


   procedure Add_wfsbenhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wfsbenhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfsbenhd_To_Orderings;


   procedure Add_wsicinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsicinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsicinhd_To_Orderings;


   procedure Add_waccinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "waccinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_waccinhd_To_Orderings;


   procedure Add_whosinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whosinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whosinhd_To_Orderings;


   procedure Add_wkiwchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wkiwchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkiwchd_To_Orderings;


   procedure Add_wkr2whd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wkr2whd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkr2whd_To_Orderings;


   procedure Add_wuninshd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wuninshd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wuninshd_To_Orderings;


   procedure Add_wpehinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpehinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpehinhd_To_Orderings;


   procedure Add_wotsinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wotsinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wotsinhd_To_Orderings;


   procedure Add_wocichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wocichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wocichd_To_Orderings;


   procedure Add_whbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whbhd_To_Orderings;


   procedure Add_wjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wjsasp_To_Orderings;


   procedure Add_wesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wesasp_To_Orderings;


   procedure Add_wissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wissp_To_Orderings;


   procedure Add_wothbesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wothbesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wothbesp_To_Orderings;


   procedure Add_wtubensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wtubensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wtubensp_To_Orderings;


   procedure Add_wfsbensp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wfsbensp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfsbensp_To_Orderings;


   procedure Add_wsicinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsicinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsicinsp_To_Orderings;


   procedure Add_waccinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "waccinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_waccinsp_To_Orderings;


   procedure Add_whosinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whosinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whosinsp_To_Orderings;


   procedure Add_wkiwcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wkiwcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkiwcsp_To_Orderings;


   procedure Add_wkr2wsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wkr2wsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wkr2wsp_To_Orderings;


   procedure Add_wuninssp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wuninssp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wuninssp_To_Orderings;


   procedure Add_wpehinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpehinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpehinsp_To_Orderings;


   procedure Add_wotsinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wotsinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wotsinsp_To_Orderings;


   procedure Add_wocicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wocicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wocicsp_To_Orderings;


   procedure Add_whbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whbsp_To_Orderings;


   procedure Add_yjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjsahd_To_Orderings;


   procedure Add_yesahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yesahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yesahd_To_Orderings;


   procedure Add_yishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yishd_To_Orderings;


   procedure Add_yhbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yhbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yhbhd_To_Orderings;


   procedure Add_yjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjsasp_To_Orderings;


   procedure Add_yesasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yesasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yesasp_To_Orderings;


   procedure Add_yissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yissp_To_Orderings;


   procedure Add_yhbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yhbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yhbsp_To_Orderings;


   procedure Add_prothbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prothbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prothbhd_To_Orderings;


   procedure Add_prtubehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prtubehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prtubehd_To_Orderings;


   procedure Add_prfsbehd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prfsbehd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prfsbehd_To_Orderings;


   procedure Add_prsicihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsicihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsicihd_To_Orderings;


   procedure Add_praccihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "praccihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_praccihd_To_Orderings;


   procedure Add_prhosihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prhosihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prhosihd_To_Orderings;


   procedure Add_pruninhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pruninhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pruninhd_To_Orderings;


   procedure Add_prphinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prphinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prphinhd_To_Orderings;


   procedure Add_prosinhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prosinhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prosinhd_To_Orderings;


   procedure Add_prcichd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prcichd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prcichd_To_Orderings;


   procedure Add_prothbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prothbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prothbsp_To_Orderings;


   procedure Add_prtubesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prtubesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prtubesp_To_Orderings;


   procedure Add_prfsbesp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prfsbesp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prfsbesp_To_Orderings;


   procedure Add_prsicisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsicisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsicisp_To_Orderings;


   procedure Add_praccisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "praccisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_praccisp_To_Orderings;


   procedure Add_prhosisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prhosisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prhosisp_To_Orderings;


   procedure Add_pruninsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pruninsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pruninsp_To_Orderings;


   procedure Add_prphinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prphinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prphinsp_To_Orderings;


   procedure Add_prosinsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prosinsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prosinsp_To_Orderings;


   procedure Add_prcicsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prcicsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prcicsp_To_Orderings;


   procedure Add_uspenchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspenchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspenchd_To_Orderings;


   procedure Add_usrphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usrphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usrphd_To_Orderings;


   procedure Add_uswphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uswphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uswphd_To_Orderings;


   procedure Add_usjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usjsahd_To_Orderings;


   procedure Add_usishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usishd_To_Orderings;


   procedure Add_uspencsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspencsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspencsp_To_Orderings;


   procedure Add_usrpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usrpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usrpsp_To_Orderings;


   procedure Add_uswpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uswpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uswpsp_To_Orderings;


   procedure Add_usjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usjsasp_To_Orderings;


   procedure Add_usissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usissp_To_Orderings;


   procedure Add_gicacahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gicacahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicacahd_To_Orderings;


   procedure Add_pencrdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pencrdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pencrdhd_To_Orderings;


   procedure Add_gicaahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gicaahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicaahd_To_Orderings;


   procedure Add_muibwhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "muibwhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_muibwhd_To_Orderings;


   procedure Add_wfuelhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wfuelhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfuelhd_To_Orderings;


   procedure Add_exhbtyhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exhbtyhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbtyhd_To_Orderings;


   procedure Add_lnodwphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lnodwphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnodwphd_To_Orderings;


   procedure Add_lnolahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lnolahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnolahd_To_Orderings;


   procedure Add_gicacasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gicacasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicacasp_To_Orderings;


   procedure Add_pencrdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pencrdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pencrdsp_To_Orderings;


   procedure Add_gicaasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gicaasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gicaasp_To_Orderings;


   procedure Add_muibwsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "muibwsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_muibwsp_To_Orderings;


   procedure Add_wfuelsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wfuelsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wfuelsp_To_Orderings;


   procedure Add_exhbtysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exhbtysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exhbtysp_To_Orderings;


   procedure Add_lnodwpsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lnodwpsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnodwpsp_To_Orderings;


   procedure Add_lnolasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lnolasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lnolasp_To_Orderings;


   procedure Add_dcpayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayhd_To_Orderings;


   procedure Add_dmpayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayhd_To_Orderings;


   procedure Add_ecpenchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ecpenchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ecpenchd_To_Orderings;


   procedure Add_wporbahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wporbahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wporbahd_To_Orderings;


   procedure Add_aapayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aapayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aapayhd_To_Orderings;


   procedure Add_jsatyphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jsatyphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsatyphd_To_Orderings;


   procedure Add_esatyphd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "esatyphd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_esatyphd_To_Orderings;


   procedure Add_mupibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mupibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mupibhd_To_Orderings;


   procedure Add_dssishd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssishd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssishd_To_Orderings;


   procedure Add_dssjsahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssjsahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssjsahd_To_Orderings;


   procedure Add_sfincihd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfincihd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincihd_To_Orderings;


   procedure Add_sfincjhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfincjhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincjhd_To_Orderings;


   procedure Add_pdlpayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlpayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlpayhd_To_Orderings;


   procedure Add_pmpayhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmpayhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmpayhd_To_Orderings;


   procedure Add_dwpuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dwpuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpuchd_To_Orderings;


   procedure Add_sfinuchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfinuchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfinuchd_To_Orderings;


   procedure Add_dcpaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpaysp_To_Orderings;


   procedure Add_dmpaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpaysp_To_Orderings;


   procedure Add_ecpencsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ecpencsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ecpencsp_To_Orderings;


   procedure Add_wporbasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wporbasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wporbasp_To_Orderings;


   procedure Add_aapaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aapaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aapaysp_To_Orderings;


   procedure Add_jsatypsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jsatypsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jsatypsp_To_Orderings;


   procedure Add_esatypsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "esatypsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_esatypsp_To_Orderings;


   procedure Add_mupibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mupibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mupibsp_To_Orderings;


   procedure Add_dssissp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssissp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssissp_To_Orderings;


   procedure Add_dssjsasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dssjsasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dssjsasp_To_Orderings;


   procedure Add_sfincisp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfincisp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincisp_To_Orderings;


   procedure Add_sfincjsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfincjsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfincjsp_To_Orderings;


   procedure Add_pdlpaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlpaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlpaysp_To_Orderings;


   procedure Add_pmpaysp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmpaysp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmpaysp_To_Orderings;


   procedure Add_dwpucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dwpucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dwpucsp_To_Orderings;


   procedure Add_sfinucsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfinucsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfinucsp_To_Orderings;


   procedure Add_icaperhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "icaperhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_icaperhd_To_Orderings;


   procedure Add_pmuibhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmuibhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmuibhd_To_Orderings;


   procedure Add_pipmothd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pipmothd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmothd_To_Orderings;


   procedure Add_icapersp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "icapersp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_icapersp_To_Orderings;


   procedure Add_pmuibsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmuibsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmuibsp_To_Orderings;


   procedure Add_pipmotsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pipmotsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pipmotsp_To_Orderings;


   procedure Add_r1dlchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlchd_To_Orderings;


   procedure Add_r1dlmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmhd_To_Orderings;


   procedure Add_r1aahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1aahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1aahd_To_Orderings;


   procedure Add_r1hbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1hbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1hbhd_To_Orderings;


   procedure Add_r1pipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1pipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipdhd_To_Orderings;


   procedure Add_r1pipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1pipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipmhd_To_Orderings;


   procedure Add_r1dlcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcsp_To_Orderings;


   procedure Add_r1dlmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmsp_To_Orderings;


   procedure Add_r1aasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1aasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1aasp_To_Orderings;


   procedure Add_r1hbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1hbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1hbsp_To_Orderings;


   procedure Add_r1pipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1pipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipdsp_To_Orderings;


   procedure Add_r1pipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1pipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1pipmsp_To_Orderings;


   procedure Add_r2dlchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlchd_To_Orderings;


   procedure Add_r2dlmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmhd_To_Orderings;


   procedure Add_r2aahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2aahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2aahd_To_Orderings;


   procedure Add_r2hbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2hbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2hbhd_To_Orderings;


   procedure Add_r2pipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2pipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipdhd_To_Orderings;


   procedure Add_r2pipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2pipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipmhd_To_Orderings;


   procedure Add_r2dlcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcsp_To_Orderings;


   procedure Add_r2dlmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmsp_To_Orderings;


   procedure Add_r2aasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2aasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2aasp_To_Orderings;


   procedure Add_r2hbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2hbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2hbsp_To_Orderings;


   procedure Add_r2pipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2pipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipdsp_To_Orderings;


   procedure Add_r2pipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2pipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2pipmsp_To_Orderings;


   procedure Add_r3dlchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlchd_To_Orderings;


   procedure Add_r3dlmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmhd_To_Orderings;


   procedure Add_r3aahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3aahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3aahd_To_Orderings;


   procedure Add_r3hbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3hbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3hbhd_To_Orderings;


   procedure Add_r3pipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3pipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipdhd_To_Orderings;


   procedure Add_r3pipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3pipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipmhd_To_Orderings;


   procedure Add_r3dlcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcsp_To_Orderings;


   procedure Add_r3dlmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmsp_To_Orderings;


   procedure Add_r3aasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3aasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3aasp_To_Orderings;


   procedure Add_r3hbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3hbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3hbsp_To_Orderings;


   procedure Add_r3pipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3pipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipdsp_To_Orderings;


   procedure Add_r3pipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3pipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3pipmsp_To_Orderings;


   procedure Add_r4dlchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlchd_To_Orderings;


   procedure Add_r4dlmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmhd_To_Orderings;


   procedure Add_r4aahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4aahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4aahd_To_Orderings;


   procedure Add_r4hbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4hbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4hbhd_To_Orderings;


   procedure Add_r4pipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4pipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipdhd_To_Orderings;


   procedure Add_r4pipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4pipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipmhd_To_Orderings;


   procedure Add_r4dlcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcsp_To_Orderings;


   procedure Add_r4dlmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmsp_To_Orderings;


   procedure Add_r4aasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4aasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4aasp_To_Orderings;


   procedure Add_r4hbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4hbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4hbsp_To_Orderings;


   procedure Add_r4pipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4pipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipdsp_To_Orderings;


   procedure Add_r4pipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4pipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4pipmsp_To_Orderings;


   procedure Add_r5dlchd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlchd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlchd_To_Orderings;


   procedure Add_r5dlmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmhd_To_Orderings;


   procedure Add_r5aahd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5aahd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5aahd_To_Orderings;


   procedure Add_r5hbhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5hbhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5hbhd_To_Orderings;


   procedure Add_r5pipdhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5pipdhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipdhd_To_Orderings;


   procedure Add_r5pipmhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5pipmhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipmhd_To_Orderings;


   procedure Add_r5dlcsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcsp_To_Orderings;


   procedure Add_r5dlmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmsp_To_Orderings;


   procedure Add_r5aasp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5aasp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5aasp_To_Orderings;


   procedure Add_r5hbsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5hbsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5hbsp_To_Orderings;


   procedure Add_r5pipdsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5pipdsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipdsp_To_Orderings;


   procedure Add_r5pipmsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5pipmsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5pipmsp_To_Orderings;


   procedure Add_stdlacc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc1_To_Orderings;


   procedure Add_stdlamc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc1_To_Orderings;


   procedure Add_stdlacc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc2_To_Orderings;


   procedure Add_stdlamc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc2_To_Orderings;


   procedure Add_stdlacc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc3_To_Orderings;


   procedure Add_stdlamc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc3_To_Orderings;


   procedure Add_stdlacc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc4_To_Orderings;


   procedure Add_stdlamc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc4_To_Orderings;


   procedure Add_stdlacc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc5_To_Orderings;


   procedure Add_stdlamc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc5_To_Orderings;


   procedure Add_stdlacc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc6_To_Orderings;


   procedure Add_stdlamc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc6_To_Orderings;


   procedure Add_stdlacc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc7_To_Orderings;


   procedure Add_stdlamc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc7_To_Orderings;


   procedure Add_stdlacc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc8_To_Orderings;


   procedure Add_stdlamc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc8_To_Orderings;


   procedure Add_stdlacc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlacc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlacc9_To_Orderings;


   procedure Add_stdlamc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stdlamc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stdlamc9_To_Orderings;


   procedure Add_dlacac1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac1_To_Orderings;


   procedure Add_dlamoc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc1_To_Orderings;


   procedure Add_dlacac2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac2_To_Orderings;


   procedure Add_dlamoc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc2_To_Orderings;


   procedure Add_dlacac3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac3_To_Orderings;


   procedure Add_dlamoc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc3_To_Orderings;


   procedure Add_dlacac4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac4_To_Orderings;


   procedure Add_dlamoc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc4_To_Orderings;


   procedure Add_dlacac5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac5_To_Orderings;


   procedure Add_dlamoc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc5_To_Orderings;


   procedure Add_dlacac6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac6_To_Orderings;


   procedure Add_dlamoc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc6_To_Orderings;


   procedure Add_dlacac7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac7_To_Orderings;


   procedure Add_dlamoc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc7_To_Orderings;


   procedure Add_dlacac8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac8_To_Orderings;


   procedure Add_dlamoc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc8_To_Orderings;


   procedure Add_dlacac9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlacac9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlacac9_To_Orderings;


   procedure Add_dlamoc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dlamoc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dlamoc9_To_Orderings;


   procedure Add_ltdlacc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc1_To_Orderings;


   procedure Add_ltdlamc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc1_To_Orderings;


   procedure Add_ltdlacc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc2_To_Orderings;


   procedure Add_ltdlamc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc2_To_Orderings;


   procedure Add_ltdlacc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc3_To_Orderings;


   procedure Add_ltdlamc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc3_To_Orderings;


   procedure Add_ltdlacc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc4_To_Orderings;


   procedure Add_ltdlamc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc4_To_Orderings;


   procedure Add_ltdlacc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc5_To_Orderings;


   procedure Add_ltdlamc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc5_To_Orderings;


   procedure Add_ltdlacc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc6_To_Orderings;


   procedure Add_ltdlamc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc6_To_Orderings;


   procedure Add_ltdlacc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc7_To_Orderings;


   procedure Add_ltdlamc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc7_To_Orderings;


   procedure Add_ltdlacc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc8_To_Orderings;


   procedure Add_ltdlamc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc8_To_Orderings;


   procedure Add_ltdlacc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlacc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlacc9_To_Orderings;


   procedure Add_ltdlamc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ltdlamc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ltdlamc9_To_Orderings;


   procedure Add_pdlacac1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac1_To_Orderings;


   procedure Add_pdlamoc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc1_To_Orderings;


   procedure Add_pdlacac2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac2_To_Orderings;


   procedure Add_pdlamoc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc2_To_Orderings;


   procedure Add_pdlacac3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac3_To_Orderings;


   procedure Add_pdlamoc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc3_To_Orderings;


   procedure Add_pdlacac4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac4_To_Orderings;


   procedure Add_pdlamoc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc4_To_Orderings;


   procedure Add_pdlacac5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac5_To_Orderings;


   procedure Add_pdlamoc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc5_To_Orderings;


   procedure Add_pdlacac6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac6_To_Orderings;


   procedure Add_pdlamoc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc6_To_Orderings;


   procedure Add_pdlacac7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac7_To_Orderings;


   procedure Add_pdlamoc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc7_To_Orderings;


   procedure Add_pdlacac8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac8_To_Orderings;


   procedure Add_pdlamoc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc8_To_Orderings;


   procedure Add_pdlacac9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlacac9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlacac9_To_Orderings;


   procedure Add_pdlamoc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdlamoc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdlamoc9_To_Orderings;


   procedure Add_dcpayc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc1_To_Orderings;


   procedure Add_dmpayc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc1_To_Orderings;


   procedure Add_dcpayc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc2_To_Orderings;


   procedure Add_dmpayc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc2_To_Orderings;


   procedure Add_dcpayc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc3_To_Orderings;


   procedure Add_dmpayc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc3_To_Orderings;


   procedure Add_dcpayc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc4_To_Orderings;


   procedure Add_dmpayc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc4_To_Orderings;


   procedure Add_dcpayc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc5_To_Orderings;


   procedure Add_dmpayc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc5_To_Orderings;


   procedure Add_dcpayc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc6_To_Orderings;


   procedure Add_dmpayc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc6_To_Orderings;


   procedure Add_dcpayc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc7_To_Orderings;


   procedure Add_dmpayc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc7_To_Orderings;


   procedure Add_dcpayc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc8_To_Orderings;


   procedure Add_dmpayc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc8_To_Orderings;


   procedure Add_dcpayc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dcpayc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dcpayc9_To_Orderings;


   procedure Add_dmpayc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmpayc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmpayc9_To_Orderings;


   procedure Add_r1dlcc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc1_To_Orderings;


   procedure Add_r1dlmc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc1_To_Orderings;


   procedure Add_r1dlcc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc2_To_Orderings;


   procedure Add_r1dlmc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc2_To_Orderings;


   procedure Add_r1dlcc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc3_To_Orderings;


   procedure Add_r1dlmc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc3_To_Orderings;


   procedure Add_r1dlcc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc4_To_Orderings;


   procedure Add_r1dlmc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc4_To_Orderings;


   procedure Add_r1dlcc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc5_To_Orderings;


   procedure Add_r1dlmc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc5_To_Orderings;


   procedure Add_r1dlcc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc6_To_Orderings;


   procedure Add_r1dlmc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc6_To_Orderings;


   procedure Add_r1dlcc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc7_To_Orderings;


   procedure Add_r1dlmc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc7_To_Orderings;


   procedure Add_r1dlcc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc8_To_Orderings;


   procedure Add_r1dlmc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc8_To_Orderings;


   procedure Add_r1dlcc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlcc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlcc9_To_Orderings;


   procedure Add_r1dlmc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r1dlmc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r1dlmc9_To_Orderings;


   procedure Add_r2dlcc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc1_To_Orderings;


   procedure Add_r2dlmc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc1_To_Orderings;


   procedure Add_r2dlcc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc2_To_Orderings;


   procedure Add_r2dlmc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc2_To_Orderings;


   procedure Add_r2dlcc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc3_To_Orderings;


   procedure Add_r2dlmc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc3_To_Orderings;


   procedure Add_r2dlcc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc4_To_Orderings;


   procedure Add_r2dlmc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc4_To_Orderings;


   procedure Add_r2dlcc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc5_To_Orderings;


   procedure Add_r2dlmc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc5_To_Orderings;


   procedure Add_r2dlcc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc6_To_Orderings;


   procedure Add_r2dlmc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc6_To_Orderings;


   procedure Add_r2dlcc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc7_To_Orderings;


   procedure Add_r2dlmc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc7_To_Orderings;


   procedure Add_r2dlcc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc8_To_Orderings;


   procedure Add_r2dlmc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc8_To_Orderings;


   procedure Add_r2dlcc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlcc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlcc9_To_Orderings;


   procedure Add_r2dlmc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r2dlmc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r2dlmc9_To_Orderings;


   procedure Add_r3dlcc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc1_To_Orderings;


   procedure Add_r3dlmc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc1_To_Orderings;


   procedure Add_r3dlcc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc2_To_Orderings;


   procedure Add_r3dlmc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc2_To_Orderings;


   procedure Add_r3dlcc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc3_To_Orderings;


   procedure Add_r3dlmc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc3_To_Orderings;


   procedure Add_r3dlcc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc4_To_Orderings;


   procedure Add_r3dlmc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc4_To_Orderings;


   procedure Add_r3dlcc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc5_To_Orderings;


   procedure Add_r3dlmc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc5_To_Orderings;


   procedure Add_r3dlcc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc6_To_Orderings;


   procedure Add_r3dlmc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc6_To_Orderings;


   procedure Add_r3dlcc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc7_To_Orderings;


   procedure Add_r3dlmc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc7_To_Orderings;


   procedure Add_r3dlcc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc8_To_Orderings;


   procedure Add_r3dlmc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc8_To_Orderings;


   procedure Add_r3dlcc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlcc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlcc9_To_Orderings;


   procedure Add_r3dlmc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r3dlmc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r3dlmc9_To_Orderings;


   procedure Add_r4dlcc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc1_To_Orderings;


   procedure Add_r4dlmc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc1_To_Orderings;


   procedure Add_r4dlcc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc2_To_Orderings;


   procedure Add_r4dlmc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc2_To_Orderings;


   procedure Add_r4dlcc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc3_To_Orderings;


   procedure Add_r4dlmc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc3_To_Orderings;


   procedure Add_r4dlcc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc4_To_Orderings;


   procedure Add_r4dlmc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc4_To_Orderings;


   procedure Add_r4dlcc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc5_To_Orderings;


   procedure Add_r4dlmc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc5_To_Orderings;


   procedure Add_r4dlcc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc6_To_Orderings;


   procedure Add_r4dlmc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc6_To_Orderings;


   procedure Add_r4dlcc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc7_To_Orderings;


   procedure Add_r4dlmc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc7_To_Orderings;


   procedure Add_r4dlcc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc8_To_Orderings;


   procedure Add_r4dlmc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc8_To_Orderings;


   procedure Add_r4dlcc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlcc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlcc9_To_Orderings;


   procedure Add_r4dlmc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r4dlmc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r4dlmc9_To_Orderings;


   procedure Add_r5dlcc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc1_To_Orderings;


   procedure Add_r5dlmc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc1_To_Orderings;


   procedure Add_r5dlcc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc2_To_Orderings;


   procedure Add_r5dlmc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc2_To_Orderings;


   procedure Add_r5dlcc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc3_To_Orderings;


   procedure Add_r5dlmc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc3_To_Orderings;


   procedure Add_r5dlcc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc4_To_Orderings;


   procedure Add_r5dlmc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc4_To_Orderings;


   procedure Add_r5dlcc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc5_To_Orderings;


   procedure Add_r5dlmc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc5_To_Orderings;


   procedure Add_r5dlcc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc6_To_Orderings;


   procedure Add_r5dlmc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc6_To_Orderings;


   procedure Add_r5dlcc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc7_To_Orderings;


   procedure Add_r5dlmc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc7_To_Orderings;


   procedure Add_r5dlcc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc8_To_Orderings;


   procedure Add_r5dlmc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc8_To_Orderings;


   procedure Add_r5dlcc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlcc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlcc9_To_Orderings;


   procedure Add_r5dlmc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "r5dlmc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_r5dlmc9_To_Orderings;


   procedure Add_adbtbl_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adbtbl", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adbtbl_To_Orderings;


   procedure Add_adddec_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adddec", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adddec_To_Orderings;


   procedure Add_addhol_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "addhol", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_addhol_To_Orderings;


   procedure Add_addholr_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "addholr", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_addholr_To_Orderings;


   procedure Add_addins_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "addins", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_addins_To_Orderings;


   procedure Add_addmon_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "addmon", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_addmon_To_Orderings;


   procedure Add_adepfur_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adepfur", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adepfur_To_Orderings;


   procedure Add_adles_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adles", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adles_To_Orderings;


   procedure Add_adlesoa_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adlesoa", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adlesoa_To_Orderings;


   procedure Add_af1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "af1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_af1_To_Orderings;


   procedure Add_afdep2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "afdep2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_afdep2_To_Orderings;


   procedure Add_cdelply_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdelply", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdelply_To_Orderings;


   procedure Add_cdepact_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdepact", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepact_To_Orderings;


   procedure Add_cdepbed_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdepbed", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepbed_To_Orderings;


   procedure Add_cdepcel_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdepcel", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepcel_To_Orderings;


   procedure Add_cdepeqp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdepeqp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepeqp_To_Orderings;


   procedure Add_cdephol_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdephol", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdephol_To_Orderings;


   procedure Add_cdeples_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeples", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeples_To_Orderings;


   procedure Add_cdeptea_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeptea", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeptea_To_Orderings;


   procedure Add_cdeptrp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeptrp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeptrp_To_Orderings;


   procedure Add_cdepveg_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdepveg", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdepveg_To_Orderings;


   procedure Add_cdpcoat_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdpcoat", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdpcoat_To_Orderings;


   procedure Add_clothes_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "clothes", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_clothes_To_Orderings;


   procedure Add_cplay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cplay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cplay_To_Orderings;


   procedure Add_debt10_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt10", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt10_To_Orderings;


   procedure Add_debt11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt11_To_Orderings;


   procedure Add_debt12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt12_To_Orderings;


   procedure Add_debt13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt13_To_Orderings;


   procedure Add_debtar01_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar01", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar01_To_Orderings;


   procedure Add_debtar02_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar02", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar02_To_Orderings;


   procedure Add_debtar03_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar03", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar03_To_Orderings;


   procedure Add_debtar04_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar04", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar04_To_Orderings;


   procedure Add_debtar05_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar05", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar05_To_Orderings;


   procedure Add_debtar06_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar06", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar06_To_Orderings;


   procedure Add_debtar07_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar07", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar07_To_Orderings;


   procedure Add_debtar08_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar08", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar08_To_Orderings;


   procedure Add_debtar09_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar09", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar09_To_Orderings;


   procedure Add_debtar10_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar10", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar10_To_Orderings;


   procedure Add_debtar11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar11_To_Orderings;


   procedure Add_debtar12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar12_To_Orderings;


   procedure Add_debtar13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtar13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtar13_To_Orderings;


   procedure Add_debtfre1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtfre1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtfre1_To_Orderings;


   procedure Add_debtfre2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtfre2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtfre2_To_Orderings;


   procedure Add_debtfre3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debtfre3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debtfre3_To_Orderings;


   procedure Add_hbolng_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbolng", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbolng_To_Orderings;


   procedure Add_houshe1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "houshe1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_houshe1_To_Orderings;


   procedure Add_kidinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kidinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kidinc_To_Orderings;


   procedure Add_meal_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "meal", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_meal_To_Orderings;


   procedure Add_nhhchild_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhchild", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhchild_To_Orderings;


   procedure Add_oafur_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oafur", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oafur_To_Orderings;


   procedure Add_oapre_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oapre", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oapre_To_Orderings;


   procedure Add_outpay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outpay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outpay_To_Orderings;


   procedure Add_outpyamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outpyamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outpyamt_To_Orderings;


   procedure Add_regpamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "regpamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_regpamt_To_Orderings;


   procedure Add_regularp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "regularp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_regularp_To_Orderings;


   procedure Add_shoeoa_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "shoeoa", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_shoeoa_To_Orderings;


   procedure Add_totsav_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsav", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsav_To_Orderings;


   procedure Add_adultb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adultb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adultb_To_Orderings;


   procedure Add_boarder_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boarder", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boarder_To_Orderings;


   procedure Add_bpeninc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bpeninc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bpeninc_To_Orderings;


   procedure Add_bseinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bseinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bseinc_To_Orderings;


   procedure Add_budisben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "budisben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_budisben_To_Orderings;


   procedure Add_buearns_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buearns", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buearns_To_Orderings;


   procedure Add_buethgr3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buethgr3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buethgr3_To_Orderings;


   procedure Add_buinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buinc_To_Orderings;


   procedure Add_buinv_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buinv", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buinv_To_Orderings;


   procedure Add_buirben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buirben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buirben_To_Orderings;


   procedure Add_bukids_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bukids", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bukids_To_Orderings;


   procedure Add_bunirben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bunirben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bunirben_To_Orderings;


   procedure Add_buothben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buothben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buothben_To_Orderings;


   procedure Add_burent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "burent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_burent_To_Orderings;


   procedure Add_burinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "burinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_burinc_To_Orderings;


   procedure Add_burpinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "burpinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_burpinc_To_Orderings;


   procedure Add_butvlic_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "butvlic", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_butvlic_To_Orderings;


   procedure Add_butxcred_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "butxcred", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_butxcred_To_Orderings;


   procedure Add_depchldb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "depchldb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_depchldb_To_Orderings;


   procedure Add_diswbua1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "diswbua1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswbua1_To_Orderings;


   procedure Add_diswbuc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "diswbuc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswbuc1_To_Orderings;


   procedure Add_ecstatbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ecstatbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ecstatbu_To_Orderings;


   procedure Add_famtypb2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "famtypb2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_famtypb2_To_Orderings;


   procedure Add_famtypbs_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "famtypbs", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_famtypbs_To_Orderings;


   procedure Add_famtypbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "famtypbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_famtypbu_To_Orderings;


   procedure Add_fsfvbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsfvbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsfvbu_To_Orderings;


   procedure Add_fsmbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmbu_To_Orderings;


   procedure Add_fsmlkbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlkbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlkbu_To_Orderings;


   procedure Add_gross4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gross4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gross4_To_Orderings;


   procedure Add_hbindbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbindbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindbu_To_Orderings;


   procedure Add_hbindbu2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbindbu2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindbu2_To_Orderings;


   procedure Add_heartbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heartbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heartbu_To_Orderings;


   procedure Add_kid04_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kid04", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid04_To_Orderings;


   procedure Add_kid1115_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kid1115", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid1115_To_Orderings;


   procedure Add_kid1619_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kid1619", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid1619_To_Orderings;


   procedure Add_kid510_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "kid510", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_kid510_To_Orderings;


   procedure Add_lodger_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lodger", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lodger_To_Orderings;


   procedure Add_subltamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "subltamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_subltamt_To_Orderings;


   procedure Add_totcapb3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totcapb3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totcapb3_To_Orderings;


   procedure Add_totsavbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsavbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsavbu_To_Orderings;


   procedure Add_tuburent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuburent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuburent_To_Orderings;


   procedure Add_youngch_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "youngch", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_youngch_To_Orderings;


   procedure Add_clthsoa_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "clthsoa", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_clthsoa_To_Orderings;


   procedure Add_debt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt1_To_Orderings;


   procedure Add_debt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt2_To_Orderings;


   procedure Add_debt3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt3_To_Orderings;


   procedure Add_debt4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt4_To_Orderings;


   procedure Add_debt5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt5_To_Orderings;


   procedure Add_debt6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt6_To_Orderings;


   procedure Add_debt7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt7_To_Orderings;


   procedure Add_debt8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt8_To_Orderings;


   procedure Add_debt9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "debt9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_debt9_To_Orderings;


   procedure Add_discbua_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discbua", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discbua_To_Orderings;


   procedure Add_discbuc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discbuc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discbuc_To_Orderings;


   procedure Add_hbtham_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbtham", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbtham_To_Orderings;


   procedure Add_hbthbu_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbthbu", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthbu_To_Orderings;


   procedure Add_hbthmn_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbthmn", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthmn_To_Orderings;


   procedure Add_hbthpd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbthpd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthpd_To_Orderings;


   procedure Add_hbthwk_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbthwk", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthwk_To_Orderings;


   procedure Add_hbthyr_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbthyr", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbthyr_To_Orderings;


   procedure Add_hbwait_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbwait", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbwait_To_Orderings;


   procedure Add_intrnt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intrnt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intrnt_To_Orderings;


   procedure Add_oadep_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oadep", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oadep_To_Orderings;


   procedure Add_oanet_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oanet", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oanet_To_Orderings;


   procedure Add_dynhthd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhthd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhthd_To_Orderings;


   procedure Add_dynhtsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtsp_To_Orderings;


   procedure Add_freqhd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqhd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqhd_To_Orderings;


   procedure Add_freqsp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqsp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqsp_To_Orderings;


   procedure Add_hur01hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01hd_To_Orderings;


   procedure Add_hur01sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01sp_To_Orderings;


   procedure Add_hur02hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02hd_To_Orderings;


   procedure Add_hur02sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02sp_To_Orderings;


   procedure Add_hur03hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03hd_To_Orderings;


   procedure Add_hur03sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03sp_To_Orderings;


   procedure Add_hur04hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04hd_To_Orderings;


   procedure Add_hur04sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04sp_To_Orderings;


   procedure Add_hur05hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05hd_To_Orderings;


   procedure Add_hur05sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05sp_To_Orderings;


   procedure Add_hur06hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06hd_To_Orderings;


   procedure Add_hur06sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06sp_To_Orderings;


   procedure Add_hur07hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07hd_To_Orderings;


   procedure Add_hur07sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07sp_To_Orderings;


   procedure Add_hur08hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08hd_To_Orderings;


   procedure Add_hur08sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08sp_To_Orderings;


   procedure Add_hur09hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09hd_To_Orderings;


   procedure Add_hur09sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09sp_To_Orderings;


   procedure Add_hur10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10hd_To_Orderings;


   procedure Add_hur10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10sp_To_Orderings;


   procedure Add_hur11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11hd_To_Orderings;


   procedure Add_hur11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11sp_To_Orderings;


   procedure Add_hur12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12hd_To_Orderings;


   procedure Add_hur12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12sp_To_Orderings;


   procedure Add_hur13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13hd_To_Orderings;


   procedure Add_hur13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13sp_To_Orderings;


   procedure Add_hur14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14hd_To_Orderings;


   procedure Add_hur14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14sp_To_Orderings;


   procedure Add_hur15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15hd_To_Orderings;


   procedure Add_hur15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15sp_To_Orderings;


   procedure Add_hur16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16hd_To_Orderings;


   procedure Add_hur16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16sp_To_Orderings;


   procedure Add_hur17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17hd_To_Orderings;


   procedure Add_hur17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17sp_To_Orderings;


   procedure Add_hur18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18hd_To_Orderings;


   procedure Add_hur18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18sp_To_Orderings;


   procedure Add_hur19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19hd_To_Orderings;


   procedure Add_hur19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19sp_To_Orderings;


   procedure Add_hur20hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20hd_To_Orderings;


   procedure Add_hur20sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20sp_To_Orderings;


   procedure Add_whl01hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01hd_To_Orderings;


   procedure Add_whl01sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01sp_To_Orderings;


   procedure Add_whl02hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02hd_To_Orderings;


   procedure Add_whl02sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02sp_To_Orderings;


   procedure Add_whl03hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03hd_To_Orderings;


   procedure Add_whl03sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03sp_To_Orderings;


   procedure Add_whl04hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04hd_To_Orderings;


   procedure Add_whl04sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04sp_To_Orderings;


   procedure Add_whl05hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05hd_To_Orderings;


   procedure Add_whl05sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05sp_To_Orderings;


   procedure Add_whl06hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06hd_To_Orderings;


   procedure Add_whl06sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06sp_To_Orderings;


   procedure Add_whl07hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07hd_To_Orderings;


   procedure Add_whl07sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07sp_To_Orderings;


   procedure Add_whl08hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08hd_To_Orderings;


   procedure Add_whl08sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08sp_To_Orderings;


   procedure Add_whl09hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09hd_To_Orderings;


   procedure Add_whl09sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09sp_To_Orderings;


   procedure Add_whl10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10hd_To_Orderings;


   procedure Add_whl10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10sp_To_Orderings;


   procedure Add_whl11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11hd_To_Orderings;


   procedure Add_whl11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11sp_To_Orderings;


   procedure Add_whl12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12hd_To_Orderings;


   procedure Add_whl12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12sp_To_Orderings;


   procedure Add_whl13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13hd_To_Orderings;


   procedure Add_whl13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13sp_To_Orderings;


   procedure Add_whl14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14hd_To_Orderings;


   procedure Add_whl14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14sp_To_Orderings;


   procedure Add_whl15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15hd_To_Orderings;


   procedure Add_whl15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15sp_To_Orderings;


   procedure Add_whl16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16hd_To_Orderings;


   procedure Add_whl16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16sp_To_Orderings;


   procedure Add_whl17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17hd_To_Orderings;


   procedure Add_whl17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17sp_To_Orderings;


   procedure Add_whl18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18hd_To_Orderings;


   procedure Add_whl18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18sp_To_Orderings;


   procedure Add_whl19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19hd_To_Orderings;


   procedure Add_whl19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19sp_To_Orderings;


   procedure Add_whl20hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20hd_To_Orderings;


   procedure Add_whl20sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20sp_To_Orderings;


   procedure Add_dynhtc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc1_To_Orderings;


   procedure Add_dynhtc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc2_To_Orderings;


   procedure Add_dynhtc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc3_To_Orderings;


   procedure Add_dynhtc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc4_To_Orderings;


   procedure Add_dynhtc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc5_To_Orderings;


   procedure Add_dynhtc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc6_To_Orderings;


   procedure Add_dynhtc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc7_To_Orderings;


   procedure Add_dynhtc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc8_To_Orderings;


   procedure Add_dynhtc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dynhtc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dynhtc9_To_Orderings;


   procedure Add_freqc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc1_To_Orderings;


   procedure Add_freqc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc2_To_Orderings;


   procedure Add_freqc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc3_To_Orderings;


   procedure Add_freqc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc4_To_Orderings;


   procedure Add_freqc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc5_To_Orderings;


   procedure Add_freqc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc6_To_Orderings;


   procedure Add_freqc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc7_To_Orderings;


   procedure Add_freqc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc8_To_Orderings;


   procedure Add_freqc9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "freqc9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_freqc9_To_Orderings;


   procedure Add_hur01c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c1_To_Orderings;


   procedure Add_hur01c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c2_To_Orderings;


   procedure Add_hur01c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c3_To_Orderings;


   procedure Add_hur01c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c4_To_Orderings;


   procedure Add_hur01c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c5_To_Orderings;


   procedure Add_hur01c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c6_To_Orderings;


   procedure Add_hur01c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c7_To_Orderings;


   procedure Add_hur01c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c8_To_Orderings;


   procedure Add_hur01c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur01c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur01c9_To_Orderings;


   procedure Add_hur02c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c1_To_Orderings;


   procedure Add_hur02c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c2_To_Orderings;


   procedure Add_hur02c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c3_To_Orderings;


   procedure Add_hur02c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c4_To_Orderings;


   procedure Add_hur02c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c5_To_Orderings;


   procedure Add_hur02c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c6_To_Orderings;


   procedure Add_hur02c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c7_To_Orderings;


   procedure Add_hur02c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c8_To_Orderings;


   procedure Add_hur02c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur02c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur02c9_To_Orderings;


   procedure Add_hur03c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c1_To_Orderings;


   procedure Add_hur03c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c2_To_Orderings;


   procedure Add_hur03c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c3_To_Orderings;


   procedure Add_hur03c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c4_To_Orderings;


   procedure Add_hur03c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c5_To_Orderings;


   procedure Add_hur03c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c6_To_Orderings;


   procedure Add_hur03c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c7_To_Orderings;


   procedure Add_hur03c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c8_To_Orderings;


   procedure Add_hur03c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur03c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur03c9_To_Orderings;


   procedure Add_hur04c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c1_To_Orderings;


   procedure Add_hur04c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c2_To_Orderings;


   procedure Add_hur04c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c3_To_Orderings;


   procedure Add_hur04c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c4_To_Orderings;


   procedure Add_hur04c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c5_To_Orderings;


   procedure Add_hur04c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c6_To_Orderings;


   procedure Add_hur04c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c7_To_Orderings;


   procedure Add_hur04c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c8_To_Orderings;


   procedure Add_hur04c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur04c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur04c9_To_Orderings;


   procedure Add_hur05c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c1_To_Orderings;


   procedure Add_hur05c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c2_To_Orderings;


   procedure Add_hur05c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c3_To_Orderings;


   procedure Add_hur05c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c4_To_Orderings;


   procedure Add_hur05c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c5_To_Orderings;


   procedure Add_hur05c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c6_To_Orderings;


   procedure Add_hur05c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c7_To_Orderings;


   procedure Add_hur05c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c8_To_Orderings;


   procedure Add_hur05c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur05c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur05c9_To_Orderings;


   procedure Add_hur06c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c1_To_Orderings;


   procedure Add_hur06c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c2_To_Orderings;


   procedure Add_hur06c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c3_To_Orderings;


   procedure Add_hur06c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c4_To_Orderings;


   procedure Add_hur06c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c5_To_Orderings;


   procedure Add_hur06c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c6_To_Orderings;


   procedure Add_hur06c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c7_To_Orderings;


   procedure Add_hur06c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c8_To_Orderings;


   procedure Add_hur06c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur06c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur06c9_To_Orderings;


   procedure Add_hur07c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c1_To_Orderings;


   procedure Add_hur07c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c2_To_Orderings;


   procedure Add_hur07c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c3_To_Orderings;


   procedure Add_hur07c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c4_To_Orderings;


   procedure Add_hur07c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c5_To_Orderings;


   procedure Add_hur07c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c6_To_Orderings;


   procedure Add_hur07c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c7_To_Orderings;


   procedure Add_hur07c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c8_To_Orderings;


   procedure Add_hur07c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur07c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur07c9_To_Orderings;


   procedure Add_hur08c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c1_To_Orderings;


   procedure Add_hur08c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c2_To_Orderings;


   procedure Add_hur08c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c3_To_Orderings;


   procedure Add_hur08c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c4_To_Orderings;


   procedure Add_hur08c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c5_To_Orderings;


   procedure Add_hur08c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c6_To_Orderings;


   procedure Add_hur08c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c7_To_Orderings;


   procedure Add_hur08c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c8_To_Orderings;


   procedure Add_hur08c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur08c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur08c9_To_Orderings;


   procedure Add_hur09c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c1_To_Orderings;


   procedure Add_hur09c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c2_To_Orderings;


   procedure Add_hur09c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c3_To_Orderings;


   procedure Add_hur09c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c4_To_Orderings;


   procedure Add_hur09c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c5_To_Orderings;


   procedure Add_hur09c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c6_To_Orderings;


   procedure Add_hur09c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c7_To_Orderings;


   procedure Add_hur09c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c8_To_Orderings;


   procedure Add_hur09c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur09c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur09c9_To_Orderings;


   procedure Add_hur10c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c1_To_Orderings;


   procedure Add_hur10c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c2_To_Orderings;


   procedure Add_hur10c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c3_To_Orderings;


   procedure Add_hur10c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c4_To_Orderings;


   procedure Add_hur10c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c5_To_Orderings;


   procedure Add_hur10c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c6_To_Orderings;


   procedure Add_hur10c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c7_To_Orderings;


   procedure Add_hur10c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c8_To_Orderings;


   procedure Add_hur10c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur10c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur10c9_To_Orderings;


   procedure Add_hur11c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c1_To_Orderings;


   procedure Add_hur11c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c2_To_Orderings;


   procedure Add_hur11c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c3_To_Orderings;


   procedure Add_hur11c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c4_To_Orderings;


   procedure Add_hur11c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c5_To_Orderings;


   procedure Add_hur11c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c6_To_Orderings;


   procedure Add_hur11c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c7_To_Orderings;


   procedure Add_hur11c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c8_To_Orderings;


   procedure Add_hur11c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur11c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur11c9_To_Orderings;


   procedure Add_hur12c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c1_To_Orderings;


   procedure Add_hur12c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c2_To_Orderings;


   procedure Add_hur12c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c3_To_Orderings;


   procedure Add_hur12c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c4_To_Orderings;


   procedure Add_hur12c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c5_To_Orderings;


   procedure Add_hur12c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c6_To_Orderings;


   procedure Add_hur12c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c7_To_Orderings;


   procedure Add_hur12c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c8_To_Orderings;


   procedure Add_hur12c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur12c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur12c9_To_Orderings;


   procedure Add_hur13c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c1_To_Orderings;


   procedure Add_hur13c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c2_To_Orderings;


   procedure Add_hur13c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c3_To_Orderings;


   procedure Add_hur13c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c4_To_Orderings;


   procedure Add_hur13c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c5_To_Orderings;


   procedure Add_hur13c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c6_To_Orderings;


   procedure Add_hur13c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c7_To_Orderings;


   procedure Add_hur13c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c8_To_Orderings;


   procedure Add_hur13c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur13c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur13c9_To_Orderings;


   procedure Add_hur14c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c1_To_Orderings;


   procedure Add_hur14c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c2_To_Orderings;


   procedure Add_hur14c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c3_To_Orderings;


   procedure Add_hur14c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c4_To_Orderings;


   procedure Add_hur14c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c5_To_Orderings;


   procedure Add_hur14c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c6_To_Orderings;


   procedure Add_hur14c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c7_To_Orderings;


   procedure Add_hur14c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c8_To_Orderings;


   procedure Add_hur14c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur14c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur14c9_To_Orderings;


   procedure Add_hur15c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c1_To_Orderings;


   procedure Add_hur15c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c2_To_Orderings;


   procedure Add_hur15c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c3_To_Orderings;


   procedure Add_hur15c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c4_To_Orderings;


   procedure Add_hur15c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c5_To_Orderings;


   procedure Add_hur15c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c6_To_Orderings;


   procedure Add_hur15c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c7_To_Orderings;


   procedure Add_hur15c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c8_To_Orderings;


   procedure Add_hur15c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur15c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur15c9_To_Orderings;


   procedure Add_hur16c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c1_To_Orderings;


   procedure Add_hur16c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c2_To_Orderings;


   procedure Add_hur16c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c3_To_Orderings;


   procedure Add_hur16c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c4_To_Orderings;


   procedure Add_hur16c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c5_To_Orderings;


   procedure Add_hur16c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c6_To_Orderings;


   procedure Add_hur16c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c7_To_Orderings;


   procedure Add_hur16c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c8_To_Orderings;


   procedure Add_hur16c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur16c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur16c9_To_Orderings;


   procedure Add_hur17c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c1_To_Orderings;


   procedure Add_hur17c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c2_To_Orderings;


   procedure Add_hur17c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c3_To_Orderings;


   procedure Add_hur17c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c4_To_Orderings;


   procedure Add_hur17c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c5_To_Orderings;


   procedure Add_hur17c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c6_To_Orderings;


   procedure Add_hur17c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c7_To_Orderings;


   procedure Add_hur17c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c8_To_Orderings;


   procedure Add_hur17c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur17c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur17c9_To_Orderings;


   procedure Add_hur18c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c1_To_Orderings;


   procedure Add_hur18c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c2_To_Orderings;


   procedure Add_hur18c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c3_To_Orderings;


   procedure Add_hur18c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c4_To_Orderings;


   procedure Add_hur18c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c5_To_Orderings;


   procedure Add_hur18c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c6_To_Orderings;


   procedure Add_hur18c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c7_To_Orderings;


   procedure Add_hur18c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c8_To_Orderings;


   procedure Add_hur18c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur18c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur18c9_To_Orderings;


   procedure Add_hur19c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c1_To_Orderings;


   procedure Add_hur19c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c2_To_Orderings;


   procedure Add_hur19c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c3_To_Orderings;


   procedure Add_hur19c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c4_To_Orderings;


   procedure Add_hur19c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c5_To_Orderings;


   procedure Add_hur19c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c6_To_Orderings;


   procedure Add_hur19c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c7_To_Orderings;


   procedure Add_hur19c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c8_To_Orderings;


   procedure Add_hur19c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur19c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur19c9_To_Orderings;


   procedure Add_hur20c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c1_To_Orderings;


   procedure Add_hur20c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c2_To_Orderings;


   procedure Add_hur20c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c3_To_Orderings;


   procedure Add_hur20c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c4_To_Orderings;


   procedure Add_hur20c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c5_To_Orderings;


   procedure Add_hur20c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c6_To_Orderings;


   procedure Add_hur20c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c7_To_Orderings;


   procedure Add_hur20c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c8_To_Orderings;


   procedure Add_hur20c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hur20c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hur20c9_To_Orderings;


   procedure Add_whl01c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c1_To_Orderings;


   procedure Add_whl01c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c2_To_Orderings;


   procedure Add_whl01c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c3_To_Orderings;


   procedure Add_whl01c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c4_To_Orderings;


   procedure Add_whl01c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c5_To_Orderings;


   procedure Add_whl01c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c6_To_Orderings;


   procedure Add_whl01c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c7_To_Orderings;


   procedure Add_whl01c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c8_To_Orderings;


   procedure Add_whl01c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl01c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl01c9_To_Orderings;


   procedure Add_whl02c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c1_To_Orderings;


   procedure Add_whl02c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c2_To_Orderings;


   procedure Add_whl02c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c3_To_Orderings;


   procedure Add_whl02c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c4_To_Orderings;


   procedure Add_whl02c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c5_To_Orderings;


   procedure Add_whl02c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c6_To_Orderings;


   procedure Add_whl02c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c7_To_Orderings;


   procedure Add_whl02c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c8_To_Orderings;


   procedure Add_whl02c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl02c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl02c9_To_Orderings;


   procedure Add_whl03c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c1_To_Orderings;


   procedure Add_whl03c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c2_To_Orderings;


   procedure Add_whl03c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c3_To_Orderings;


   procedure Add_whl03c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c4_To_Orderings;


   procedure Add_whl03c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c5_To_Orderings;


   procedure Add_whl03c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c6_To_Orderings;


   procedure Add_whl03c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c7_To_Orderings;


   procedure Add_whl03c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c8_To_Orderings;


   procedure Add_whl03c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl03c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl03c9_To_Orderings;


   procedure Add_whl04c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c1_To_Orderings;


   procedure Add_whl04c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c2_To_Orderings;


   procedure Add_whl04c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c3_To_Orderings;


   procedure Add_whl04c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c4_To_Orderings;


   procedure Add_whl04c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c5_To_Orderings;


   procedure Add_whl04c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c6_To_Orderings;


   procedure Add_whl04c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c7_To_Orderings;


   procedure Add_whl04c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c8_To_Orderings;


   procedure Add_whl04c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl04c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl04c9_To_Orderings;


   procedure Add_whl05c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c1_To_Orderings;


   procedure Add_whl05c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c2_To_Orderings;


   procedure Add_whl05c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c3_To_Orderings;


   procedure Add_whl05c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c4_To_Orderings;


   procedure Add_whl05c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c5_To_Orderings;


   procedure Add_whl05c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c6_To_Orderings;


   procedure Add_whl05c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c7_To_Orderings;


   procedure Add_whl05c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c8_To_Orderings;


   procedure Add_whl05c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl05c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl05c9_To_Orderings;


   procedure Add_whl06c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c1_To_Orderings;


   procedure Add_whl06c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c2_To_Orderings;


   procedure Add_whl06c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c3_To_Orderings;


   procedure Add_whl06c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c4_To_Orderings;


   procedure Add_whl06c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c5_To_Orderings;


   procedure Add_whl06c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c6_To_Orderings;


   procedure Add_whl06c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c7_To_Orderings;


   procedure Add_whl06c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c8_To_Orderings;


   procedure Add_whl06c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl06c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl06c9_To_Orderings;


   procedure Add_whl07c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c1_To_Orderings;


   procedure Add_whl07c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c2_To_Orderings;


   procedure Add_whl07c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c3_To_Orderings;


   procedure Add_whl07c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c4_To_Orderings;


   procedure Add_whl07c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c5_To_Orderings;


   procedure Add_whl07c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c6_To_Orderings;


   procedure Add_whl07c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c7_To_Orderings;


   procedure Add_whl07c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c8_To_Orderings;


   procedure Add_whl07c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl07c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl07c9_To_Orderings;


   procedure Add_whl08c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c1_To_Orderings;


   procedure Add_whl08c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c2_To_Orderings;


   procedure Add_whl08c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c3_To_Orderings;


   procedure Add_whl08c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c4_To_Orderings;


   procedure Add_whl08c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c5_To_Orderings;


   procedure Add_whl08c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c6_To_Orderings;


   procedure Add_whl08c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c7_To_Orderings;


   procedure Add_whl08c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c8_To_Orderings;


   procedure Add_whl08c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl08c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl08c9_To_Orderings;


   procedure Add_whl09c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c1_To_Orderings;


   procedure Add_whl09c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c2_To_Orderings;


   procedure Add_whl09c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c3_To_Orderings;


   procedure Add_whl09c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c4_To_Orderings;


   procedure Add_whl09c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c5_To_Orderings;


   procedure Add_whl09c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c6_To_Orderings;


   procedure Add_whl09c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c7_To_Orderings;


   procedure Add_whl09c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c8_To_Orderings;


   procedure Add_whl09c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl09c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl09c9_To_Orderings;


   procedure Add_whl10c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c1_To_Orderings;


   procedure Add_whl10c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c2_To_Orderings;


   procedure Add_whl10c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c3_To_Orderings;


   procedure Add_whl10c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c4_To_Orderings;


   procedure Add_whl10c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c5_To_Orderings;


   procedure Add_whl10c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c6_To_Orderings;


   procedure Add_whl10c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c7_To_Orderings;


   procedure Add_whl10c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c8_To_Orderings;


   procedure Add_whl10c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl10c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl10c9_To_Orderings;


   procedure Add_whl11c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c1_To_Orderings;


   procedure Add_whl11c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c2_To_Orderings;


   procedure Add_whl11c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c3_To_Orderings;


   procedure Add_whl11c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c4_To_Orderings;


   procedure Add_whl11c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c5_To_Orderings;


   procedure Add_whl11c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c6_To_Orderings;


   procedure Add_whl11c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c7_To_Orderings;


   procedure Add_whl11c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c8_To_Orderings;


   procedure Add_whl11c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl11c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl11c9_To_Orderings;


   procedure Add_whl12c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c1_To_Orderings;


   procedure Add_whl12c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c2_To_Orderings;


   procedure Add_whl12c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c3_To_Orderings;


   procedure Add_whl12c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c4_To_Orderings;


   procedure Add_whl12c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c5_To_Orderings;


   procedure Add_whl12c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c6_To_Orderings;


   procedure Add_whl12c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c7_To_Orderings;


   procedure Add_whl12c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c8_To_Orderings;


   procedure Add_whl12c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl12c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl12c9_To_Orderings;


   procedure Add_whl13c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c1_To_Orderings;


   procedure Add_whl13c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c2_To_Orderings;


   procedure Add_whl13c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c3_To_Orderings;


   procedure Add_whl13c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c4_To_Orderings;


   procedure Add_whl13c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c5_To_Orderings;


   procedure Add_whl13c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c6_To_Orderings;


   procedure Add_whl13c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c7_To_Orderings;


   procedure Add_whl13c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c8_To_Orderings;


   procedure Add_whl13c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl13c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl13c9_To_Orderings;


   procedure Add_whl14c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c1_To_Orderings;


   procedure Add_whl14c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c2_To_Orderings;


   procedure Add_whl14c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c3_To_Orderings;


   procedure Add_whl14c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c4_To_Orderings;


   procedure Add_whl14c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c5_To_Orderings;


   procedure Add_whl14c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c6_To_Orderings;


   procedure Add_whl14c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c7_To_Orderings;


   procedure Add_whl14c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c8_To_Orderings;


   procedure Add_whl14c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl14c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl14c9_To_Orderings;


   procedure Add_whl15c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c1_To_Orderings;


   procedure Add_whl15c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c2_To_Orderings;


   procedure Add_whl15c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c3_To_Orderings;


   procedure Add_whl15c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c4_To_Orderings;


   procedure Add_whl15c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c5_To_Orderings;


   procedure Add_whl15c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c6_To_Orderings;


   procedure Add_whl15c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c7_To_Orderings;


   procedure Add_whl15c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c8_To_Orderings;


   procedure Add_whl15c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl15c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl15c9_To_Orderings;


   procedure Add_whl16c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c1_To_Orderings;


   procedure Add_whl16c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c2_To_Orderings;


   procedure Add_whl16c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c3_To_Orderings;


   procedure Add_whl16c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c4_To_Orderings;


   procedure Add_whl16c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c5_To_Orderings;


   procedure Add_whl16c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c6_To_Orderings;


   procedure Add_whl16c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c7_To_Orderings;


   procedure Add_whl16c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c8_To_Orderings;


   procedure Add_whl16c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl16c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl16c9_To_Orderings;


   procedure Add_whl17c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c1_To_Orderings;


   procedure Add_whl17c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c2_To_Orderings;


   procedure Add_whl17c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c3_To_Orderings;


   procedure Add_whl17c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c4_To_Orderings;


   procedure Add_whl17c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c5_To_Orderings;


   procedure Add_whl17c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c6_To_Orderings;


   procedure Add_whl17c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c7_To_Orderings;


   procedure Add_whl17c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c8_To_Orderings;


   procedure Add_whl17c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl17c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl17c9_To_Orderings;


   procedure Add_whl18c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c1_To_Orderings;


   procedure Add_whl18c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c2_To_Orderings;


   procedure Add_whl18c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c3_To_Orderings;


   procedure Add_whl18c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c4_To_Orderings;


   procedure Add_whl18c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c5_To_Orderings;


   procedure Add_whl18c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c6_To_Orderings;


   procedure Add_whl18c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c7_To_Orderings;


   procedure Add_whl18c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c8_To_Orderings;


   procedure Add_whl18c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl18c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl18c9_To_Orderings;


   procedure Add_whl19c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c1_To_Orderings;


   procedure Add_whl19c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c2_To_Orderings;


   procedure Add_whl19c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c3_To_Orderings;


   procedure Add_whl19c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c4_To_Orderings;


   procedure Add_whl19c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c5_To_Orderings;


   procedure Add_whl19c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c6_To_Orderings;


   procedure Add_whl19c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c7_To_Orderings;


   procedure Add_whl19c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c8_To_Orderings;


   procedure Add_whl19c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl19c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl19c9_To_Orderings;


   procedure Add_whl20c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c1_To_Orderings;


   procedure Add_whl20c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c2_To_Orderings;


   procedure Add_whl20c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c3_To_Orderings;


   procedure Add_whl20c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c4_To_Orderings;


   procedure Add_whl20c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c5_To_Orderings;


   procedure Add_whl20c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c6_To_Orderings;


   procedure Add_whl20c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c7_To_Orderings;


   procedure Add_whl20c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c8_To_Orderings;


   procedure Add_whl20c9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whl20c9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whl20c9_To_Orderings;


   procedure Add_agec1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec1_To_Orderings;


   procedure Add_agec2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec2_To_Orderings;


   procedure Add_agec3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec3_To_Orderings;


   procedure Add_agec4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec4_To_Orderings;


   procedure Add_agec5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec5_To_Orderings;


   procedure Add_agec6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec6_To_Orderings;


   procedure Add_agec7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec7_To_Orderings;


   procedure Add_agec8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "agec8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_agec8_To_Orderings;


   procedure Add_cameyrc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc1_To_Orderings;


   procedure Add_cameyrc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc2_To_Orderings;


   procedure Add_cameyrc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc3_To_Orderings;


   procedure Add_cameyrc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc4_To_Orderings;


   procedure Add_cameyrc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc5_To_Orderings;


   procedure Add_cameyrc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc6_To_Orderings;


   procedure Add_cameyrc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc7_To_Orderings;


   procedure Add_cameyrc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cameyrc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cameyrc8_To_Orderings;


   procedure Add_chcrec1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec1_To_Orderings;


   procedure Add_chcrec2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec2_To_Orderings;


   procedure Add_chcrec3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec3_To_Orderings;


   procedure Add_chcrec4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec4_To_Orderings;


   procedure Add_chcrec5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec5_To_Orderings;


   procedure Add_chcrec6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec6_To_Orderings;


   procedure Add_chcrec7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec7_To_Orderings;


   procedure Add_chcrec8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcrec8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcrec8_To_Orderings;


   procedure Add_creabc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc1_To_Orderings;


   procedure Add_creabc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc2_To_Orderings;


   procedure Add_creabc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc3_To_Orderings;


   procedure Add_creabc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc4_To_Orderings;


   procedure Add_creabc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc5_To_Orderings;


   procedure Add_creabc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc6_To_Orderings;


   procedure Add_creabc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc7_To_Orderings;


   procedure Add_creabc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creabc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creabc8_To_Orderings;


   procedure Add_creahc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc1_To_Orderings;


   procedure Add_creahc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc2_To_Orderings;


   procedure Add_creahc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc3_To_Orderings;


   procedure Add_creahc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc4_To_Orderings;


   procedure Add_creahc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc5_To_Orderings;


   procedure Add_creahc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc6_To_Orderings;


   procedure Add_creahc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc7_To_Orderings;


   procedure Add_creahc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creahc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creahc8_To_Orderings;


   procedure Add_crecbc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc1_To_Orderings;


   procedure Add_crecbc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc2_To_Orderings;


   procedure Add_crecbc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc3_To_Orderings;


   procedure Add_crecbc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc4_To_Orderings;


   procedure Add_crecbc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc5_To_Orderings;


   procedure Add_crecbc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc6_To_Orderings;


   procedure Add_crecbc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc7_To_Orderings;


   procedure Add_crecbc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crecbc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crecbc8_To_Orderings;


   procedure Add_crechc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc1_To_Orderings;


   procedure Add_crechc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc2_To_Orderings;


   procedure Add_crechc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc3_To_Orderings;


   procedure Add_crechc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc4_To_Orderings;


   procedure Add_crechc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc5_To_Orderings;


   procedure Add_crechc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc6_To_Orderings;


   procedure Add_crechc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc7_To_Orderings;


   procedure Add_crechc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crechc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crechc8_To_Orderings;


   procedure Add_creclc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc1_To_Orderings;


   procedure Add_creclc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc2_To_Orderings;


   procedure Add_creclc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc3_To_Orderings;


   procedure Add_creclc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc4_To_Orderings;


   procedure Add_creclc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc5_To_Orderings;


   procedure Add_creclc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc6_To_Orderings;


   procedure Add_creclc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc7_To_Orderings;


   procedure Add_creclc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creclc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creclc8_To_Orderings;


   procedure Add_crefrc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc1_To_Orderings;


   procedure Add_crefrc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc2_To_Orderings;


   procedure Add_crefrc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc3_To_Orderings;


   procedure Add_crefrc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc4_To_Orderings;


   procedure Add_crefrc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc5_To_Orderings;


   procedure Add_crefrc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc6_To_Orderings;


   procedure Add_crefrc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc7_To_Orderings;


   procedure Add_crefrc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crefrc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crefrc8_To_Orderings;


   procedure Add_creotc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc1_To_Orderings;


   procedure Add_creotc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc2_To_Orderings;


   procedure Add_creotc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc3_To_Orderings;


   procedure Add_creotc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc4_To_Orderings;


   procedure Add_creotc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc5_To_Orderings;


   procedure Add_creotc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc6_To_Orderings;


   procedure Add_creotc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc7_To_Orderings;


   procedure Add_creotc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "creotc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_creotc8_To_Orderings;


   procedure Add_carerc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc1_To_Orderings;


   procedure Add_carerc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc2_To_Orderings;


   procedure Add_carerc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc3_To_Orderings;


   procedure Add_carerc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc4_To_Orderings;


   procedure Add_carerc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc5_To_Orderings;


   procedure Add_carerc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc6_To_Orderings;


   procedure Add_carerc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc7_To_Orderings;


   procedure Add_carerc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carerc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carerc8_To_Orderings;


   procedure Add_cdatrec1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec1_To_Orderings;


   procedure Add_cdatrec2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec2_To_Orderings;


   procedure Add_cdatrec3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec3_To_Orderings;


   procedure Add_cdatrec4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec4_To_Orderings;


   procedure Add_cdatrec5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec5_To_Orderings;


   procedure Add_cdatrec6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec6_To_Orderings;


   procedure Add_cdatrec7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec7_To_Orderings;


   procedure Add_cdatrec8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdatrec8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdatrec8_To_Orderings;


   procedure Add_cdtrepc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc1_To_Orderings;


   procedure Add_cdtrepc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc2_To_Orderings;


   procedure Add_cdtrepc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc3_To_Orderings;


   procedure Add_cdtrepc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc4_To_Orderings;


   procedure Add_cdtrepc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc5_To_Orderings;


   procedure Add_cdtrepc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc6_To_Orderings;


   procedure Add_cdtrepc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc7_To_Orderings;


   procedure Add_cdtrepc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdtrepc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdtrepc8_To_Orderings;


   procedure Add_cdis1c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c1_To_Orderings;


   procedure Add_cdis1c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c2_To_Orderings;


   procedure Add_cdis1c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c3_To_Orderings;


   procedure Add_cdis1c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c4_To_Orderings;


   procedure Add_cdis1c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c5_To_Orderings;


   procedure Add_cdis1c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c6_To_Orderings;


   procedure Add_cdis1c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c7_To_Orderings;


   procedure Add_cdis1c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis1c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis1c8_To_Orderings;


   procedure Add_cdis2c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c1_To_Orderings;


   procedure Add_cdis2c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c2_To_Orderings;


   procedure Add_cdis2c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c3_To_Orderings;


   procedure Add_cdis2c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c4_To_Orderings;


   procedure Add_cdis2c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c5_To_Orderings;


   procedure Add_cdis2c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c6_To_Orderings;


   procedure Add_cdis2c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c7_To_Orderings;


   procedure Add_cdis2c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis2c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis2c8_To_Orderings;


   procedure Add_cdis3c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c1_To_Orderings;


   procedure Add_cdis3c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c2_To_Orderings;


   procedure Add_cdis3c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c3_To_Orderings;


   procedure Add_cdis3c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c4_To_Orderings;


   procedure Add_cdis3c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c5_To_Orderings;


   procedure Add_cdis3c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c6_To_Orderings;


   procedure Add_cdis3c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c7_To_Orderings;


   procedure Add_cdis3c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis3c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis3c8_To_Orderings;


   procedure Add_cdis4c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c1_To_Orderings;


   procedure Add_cdis4c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c2_To_Orderings;


   procedure Add_cdis4c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c3_To_Orderings;


   procedure Add_cdis4c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c4_To_Orderings;


   procedure Add_cdis4c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c5_To_Orderings;


   procedure Add_cdis4c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c6_To_Orderings;


   procedure Add_cdis4c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c7_To_Orderings;


   procedure Add_cdis4c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis4c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis4c8_To_Orderings;


   procedure Add_cdis5c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c1_To_Orderings;


   procedure Add_cdis5c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c2_To_Orderings;


   procedure Add_cdis5c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c3_To_Orderings;


   procedure Add_cdis5c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c4_To_Orderings;


   procedure Add_cdis5c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c5_To_Orderings;


   procedure Add_cdis5c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c6_To_Orderings;


   procedure Add_cdis5c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c7_To_Orderings;


   procedure Add_cdis5c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis5c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis5c8_To_Orderings;


   procedure Add_cdis6c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c1_To_Orderings;


   procedure Add_cdis6c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c2_To_Orderings;


   procedure Add_cdis6c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c3_To_Orderings;


   procedure Add_cdis6c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c4_To_Orderings;


   procedure Add_cdis6c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c5_To_Orderings;


   procedure Add_cdis6c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c6_To_Orderings;


   procedure Add_cdis6c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c7_To_Orderings;


   procedure Add_cdis6c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis6c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis6c8_To_Orderings;


   procedure Add_cdis7c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c1_To_Orderings;


   procedure Add_cdis7c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c2_To_Orderings;


   procedure Add_cdis7c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c3_To_Orderings;


   procedure Add_cdis7c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c4_To_Orderings;


   procedure Add_cdis7c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c5_To_Orderings;


   procedure Add_cdis7c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c6_To_Orderings;


   procedure Add_cdis7c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c7_To_Orderings;


   procedure Add_cdis7c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis7c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis7c8_To_Orderings;


   procedure Add_cdis8c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c1_To_Orderings;


   procedure Add_cdis8c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c2_To_Orderings;


   procedure Add_cdis8c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c3_To_Orderings;


   procedure Add_cdis8c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c4_To_Orderings;


   procedure Add_cdis8c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c5_To_Orderings;


   procedure Add_cdis8c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c6_To_Orderings;


   procedure Add_cdis8c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c7_To_Orderings;


   procedure Add_cdis8c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis8c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis8c8_To_Orderings;


   procedure Add_cdis9c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c1_To_Orderings;


   procedure Add_cdis9c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c2_To_Orderings;


   procedure Add_cdis9c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c3_To_Orderings;


   procedure Add_cdis9c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c4_To_Orderings;


   procedure Add_cdis9c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c5_To_Orderings;


   procedure Add_cdis9c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c6_To_Orderings;


   procedure Add_cdis9c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c7_To_Orderings;


   procedure Add_cdis9c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis9c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis9c8_To_Orderings;


   procedure Add_cdis10c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c1_To_Orderings;


   procedure Add_cdis10c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c2_To_Orderings;


   procedure Add_cdis10c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c3_To_Orderings;


   procedure Add_cdis10c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c4_To_Orderings;


   procedure Add_cdis10c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c5_To_Orderings;


   procedure Add_cdis10c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c6_To_Orderings;


   procedure Add_cdis10c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c7_To_Orderings;


   procedure Add_cdis10c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdis10c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdis10c8_To_Orderings;


   procedure Add_cdifc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc1_To_Orderings;


   procedure Add_cdifc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc2_To_Orderings;


   procedure Add_cdifc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc3_To_Orderings;


   procedure Add_cdifc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc4_To_Orderings;


   procedure Add_cdifc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc5_To_Orderings;


   procedure Add_cdifc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc6_To_Orderings;


   procedure Add_cdifc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc7_To_Orderings;


   procedure Add_cdifc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdifc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdifc8_To_Orderings;


   procedure Add_ernamc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc1_To_Orderings;


   procedure Add_ernamc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc2_To_Orderings;


   procedure Add_ernamc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc3_To_Orderings;


   procedure Add_ernamc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc4_To_Orderings;


   procedure Add_ernamc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc5_To_Orderings;


   procedure Add_ernamc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc6_To_Orderings;


   procedure Add_ernamc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc7_To_Orderings;


   procedure Add_ernamc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ernamc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ernamc8_To_Orderings;


   procedure Add_trustc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc1_To_Orderings;


   procedure Add_trustc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc2_To_Orderings;


   procedure Add_trustc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc3_To_Orderings;


   procedure Add_trustc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc4_To_Orderings;


   procedure Add_trustc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc5_To_Orderings;


   procedure Add_trustc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc6_To_Orderings;


   procedure Add_trustc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc7_To_Orderings;


   procedure Add_trustc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trustc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trustc8_To_Orderings;


   procedure Add_chbfdc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc1_To_Orderings;


   procedure Add_chbfdc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc2_To_Orderings;


   procedure Add_chbfdc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc3_To_Orderings;


   procedure Add_chbfdc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc4_To_Orderings;


   procedure Add_chbfdc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc5_To_Orderings;


   procedure Add_chbfdc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc6_To_Orderings;


   procedure Add_chbfdc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc7_To_Orderings;


   procedure Add_chbfdc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chbfdc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chbfdc8_To_Orderings;


   procedure Add_cbfamtc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc1_To_Orderings;


   procedure Add_cbfamtc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc2_To_Orderings;


   procedure Add_cbfamtc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc3_To_Orderings;


   procedure Add_cbfamtc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc4_To_Orderings;


   procedure Add_cbfamtc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc5_To_Orderings;


   procedure Add_cbfamtc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc6_To_Orderings;


   procedure Add_cbfamtc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc7_To_Orderings;


   procedure Add_cbfamtc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfamtc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfamtc8_To_Orderings;


   procedure Add_pbfamtc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc1_To_Orderings;


   procedure Add_pbfamtc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc2_To_Orderings;


   procedure Add_pbfamtc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc3_To_Orderings;


   procedure Add_pbfamtc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc4_To_Orderings;


   procedure Add_pbfamtc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc5_To_Orderings;


   procedure Add_pbfamtc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc6_To_Orderings;


   procedure Add_pbfamtc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc7_To_Orderings;


   procedure Add_pbfamtc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pbfamtc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pbfamtc8_To_Orderings;


   procedure Add_cbfvalc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc1_To_Orderings;


   procedure Add_cbfvalc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc2_To_Orderings;


   procedure Add_cbfvalc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc3_To_Orderings;


   procedure Add_cbfvalc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc4_To_Orderings;


   procedure Add_cbfvalc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc5_To_Orderings;


   procedure Add_cbfvalc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc6_To_Orderings;


   procedure Add_cbfvalc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc7_To_Orderings;


   procedure Add_cbfvalc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cbfvalc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cbfvalc8_To_Orderings;


   procedure Add_chcondc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc1_To_Orderings;


   procedure Add_chcondc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc2_To_Orderings;


   procedure Add_chcondc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc3_To_Orderings;


   procedure Add_chcondc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc4_To_Orderings;


   procedure Add_chcondc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc5_To_Orderings;


   procedure Add_chcondc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc6_To_Orderings;


   procedure Add_chcondc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc7_To_Orderings;


   procedure Add_chcondc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcondc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcondc8_To_Orderings;


   procedure Add_cdla1c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c1_To_Orderings;


   procedure Add_cdla1c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c2_To_Orderings;


   procedure Add_cdla1c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c3_To_Orderings;


   procedure Add_cdla1c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c4_To_Orderings;


   procedure Add_cdla1c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c5_To_Orderings;


   procedure Add_cdla1c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c6_To_Orderings;


   procedure Add_cdla1c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c7_To_Orderings;


   procedure Add_cdla1c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla1c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla1c8_To_Orderings;


   procedure Add_cdla2c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c1_To_Orderings;


   procedure Add_cdla2c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c2_To_Orderings;


   procedure Add_cdla2c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c3_To_Orderings;


   procedure Add_cdla2c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c4_To_Orderings;


   procedure Add_cdla2c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c5_To_Orderings;


   procedure Add_cdla2c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c6_To_Orderings;


   procedure Add_cdla2c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c7_To_Orderings;


   procedure Add_cdla2c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdla2c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdla2c8_To_Orderings;


   procedure Add_chelfc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc1_To_Orderings;


   procedure Add_chelfc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc2_To_Orderings;


   procedure Add_chelfc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc3_To_Orderings;


   procedure Add_chelfc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc4_To_Orderings;


   procedure Add_chelfc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc5_To_Orderings;


   procedure Add_chelfc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc6_To_Orderings;


   procedure Add_chelfc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc7_To_Orderings;


   procedure Add_chelfc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chelfc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chelfc8_To_Orderings;


   procedure Add_chernc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc1_To_Orderings;


   procedure Add_chernc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc2_To_Orderings;


   procedure Add_chernc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc3_To_Orderings;


   procedure Add_chernc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc4_To_Orderings;


   procedure Add_chernc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc5_To_Orderings;


   procedure Add_chernc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc6_To_Orderings;


   procedure Add_chernc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc7_To_Orderings;


   procedure Add_chernc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chernc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chernc8_To_Orderings;


   procedure Add_crns1c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c1_To_Orderings;


   procedure Add_crns1c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c2_To_Orderings;


   procedure Add_crns1c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c3_To_Orderings;


   procedure Add_crns1c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c4_To_Orderings;


   procedure Add_crns1c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c5_To_Orderings;


   procedure Add_crns1c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c6_To_Orderings;


   procedure Add_crns1c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c7_To_Orderings;


   procedure Add_crns1c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns1c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns1c8_To_Orderings;


   procedure Add_crns2c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c1_To_Orderings;


   procedure Add_crns2c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c2_To_Orderings;


   procedure Add_crns2c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c3_To_Orderings;


   procedure Add_crns2c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c4_To_Orderings;


   procedure Add_crns2c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c5_To_Orderings;


   procedure Add_crns2c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c6_To_Orderings;


   procedure Add_crns2c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c7_To_Orderings;


   procedure Add_crns2c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns2c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns2c8_To_Orderings;


   procedure Add_crns3c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c1_To_Orderings;


   procedure Add_crns3c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c2_To_Orderings;


   procedure Add_crns3c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c3_To_Orderings;


   procedure Add_crns3c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c4_To_Orderings;


   procedure Add_crns3c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c5_To_Orderings;


   procedure Add_crns3c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c6_To_Orderings;


   procedure Add_crns3c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c7_To_Orderings;


   procedure Add_crns3c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "crns3c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_crns3c8_To_Orderings;


   procedure Add_chemac1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac1_To_Orderings;


   procedure Add_chemac2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac2_To_Orderings;


   procedure Add_chemac3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac3_To_Orderings;


   procedure Add_chemac4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac4_To_Orderings;


   procedure Add_chemac5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac5_To_Orderings;


   procedure Add_chemac6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac6_To_Orderings;


   procedure Add_chemac7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac7_To_Orderings;


   procedure Add_chemac8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chemac8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chemac8_To_Orderings;


   procedure Add_emamtc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc1_To_Orderings;


   procedure Add_emamtc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc2_To_Orderings;


   procedure Add_emamtc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc3_To_Orderings;


   procedure Add_emamtc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc4_To_Orderings;


   procedure Add_emamtc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc5_To_Orderings;


   procedure Add_emamtc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc6_To_Orderings;


   procedure Add_emamtc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc7_To_Orderings;


   procedure Add_emamtc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emamtc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emamtc8_To_Orderings;


   procedure Add_emapdc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc1_To_Orderings;


   procedure Add_emapdc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc2_To_Orderings;


   procedure Add_emapdc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc3_To_Orderings;


   procedure Add_emapdc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc4_To_Orderings;


   procedure Add_emapdc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc5_To_Orderings;


   procedure Add_emapdc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc6_To_Orderings;


   procedure Add_emapdc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc7_To_Orderings;


   procedure Add_emapdc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "emapdc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_emapdc8_To_Orderings;


   procedure Add_chidvc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc1_To_Orderings;


   procedure Add_chidvc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc2_To_Orderings;


   procedure Add_chidvc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc3_To_Orderings;


   procedure Add_chidvc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc4_To_Orderings;


   procedure Add_chidvc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc5_To_Orderings;


   procedure Add_chidvc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc6_To_Orderings;


   procedure Add_chidvc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc7_To_Orderings;


   procedure Add_chidvc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chidvc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chidvc8_To_Orderings;


   procedure Add_climitc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc1_To_Orderings;


   procedure Add_climitc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc2_To_Orderings;


   procedure Add_climitc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc3_To_Orderings;


   procedure Add_climitc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc4_To_Orderings;


   procedure Add_climitc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc5_To_Orderings;


   procedure Add_climitc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc6_To_Orderings;


   procedure Add_climitc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc7_To_Orderings;


   procedure Add_climitc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "climitc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_climitc8_To_Orderings;


   procedure Add_pearnc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc1_To_Orderings;


   procedure Add_pearnc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc2_To_Orderings;


   procedure Add_pearnc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc3_To_Orderings;


   procedure Add_pearnc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc4_To_Orderings;


   procedure Add_pearnc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc5_To_Orderings;


   procedure Add_pearnc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc6_To_Orderings;


   procedure Add_pearnc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc7_To_Orderings;


   procedure Add_pearnc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pearnc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pearnc8_To_Orderings;


   procedure Add_ptrusc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc1_To_Orderings;


   procedure Add_ptrusc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc2_To_Orderings;


   procedure Add_ptrusc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc3_To_Orderings;


   procedure Add_ptrusc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc4_To_Orderings;


   procedure Add_ptrusc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc5_To_Orderings;


   procedure Add_ptrusc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc6_To_Orderings;


   procedure Add_ptrusc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc7_To_Orderings;


   procedure Add_ptrusc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrusc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrusc8_To_Orderings;


   procedure Add_chrinc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc1_To_Orderings;


   procedure Add_chrinc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc2_To_Orderings;


   procedure Add_chrinc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc3_To_Orderings;


   procedure Add_chrinc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc4_To_Orderings;


   procedure Add_chrinc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc5_To_Orderings;


   procedure Add_chrinc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc6_To_Orderings;


   procedure Add_chrinc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc7_To_Orderings;


   procedure Add_chrinc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrinc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrinc8_To_Orderings;


   procedure Add_csavec1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec1_To_Orderings;


   procedure Add_csavec2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec2_To_Orderings;


   procedure Add_csavec3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec3_To_Orderings;


   procedure Add_csavec4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec4_To_Orderings;


   procedure Add_csavec5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec5_To_Orderings;


   procedure Add_csavec6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec6_To_Orderings;


   procedure Add_csavec7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec7_To_Orderings;


   procedure Add_csavec8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csavec8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csavec8_To_Orderings;


   procedure Add_tramtc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc1_To_Orderings;


   procedure Add_tramtc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc2_To_Orderings;


   procedure Add_tramtc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc3_To_Orderings;


   procedure Add_tramtc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc4_To_Orderings;


   procedure Add_tramtc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc5_To_Orderings;


   procedure Add_tramtc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc6_To_Orderings;


   procedure Add_tramtc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc7_To_Orderings;


   procedure Add_tramtc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tramtc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tramtc8_To_Orderings;


   procedure Add_trnpdc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc1_To_Orderings;


   procedure Add_trnpdc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc2_To_Orderings;


   procedure Add_trnpdc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc3_To_Orderings;


   procedure Add_trnpdc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc4_To_Orderings;


   procedure Add_trnpdc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc5_To_Orderings;


   procedure Add_trnpdc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc6_To_Orderings;


   procedure Add_trnpdc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc7_To_Orderings;


   procedure Add_trnpdc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trnpdc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trnpdc8_To_Orderings;


   procedure Add_cohabc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc1_To_Orderings;


   procedure Add_cohabc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc2_To_Orderings;


   procedure Add_cohabc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc3_To_Orderings;


   procedure Add_cohabc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc4_To_Orderings;


   procedure Add_cohabc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc5_To_Orderings;


   procedure Add_cohabc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc6_To_Orderings;


   procedure Add_cohabc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc7_To_Orderings;


   procedure Add_cohabc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cohabc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cohabc8_To_Orderings;


   procedure Add_curqulc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc1_To_Orderings;


   procedure Add_curqulc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc2_To_Orderings;


   procedure Add_curqulc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc3_To_Orderings;


   procedure Add_curqulc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc4_To_Orderings;


   procedure Add_curqulc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc5_To_Orderings;


   procedure Add_curqulc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc6_To_Orderings;


   procedure Add_curqulc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc7_To_Orderings;


   procedure Add_curqulc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "curqulc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_curqulc8_To_Orderings;


   procedure Add_disacc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc1_To_Orderings;


   procedure Add_disacc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc2_To_Orderings;


   procedure Add_disacc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc3_To_Orderings;


   procedure Add_disacc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc4_To_Orderings;


   procedure Add_disacc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc5_To_Orderings;


   procedure Add_disacc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc6_To_Orderings;


   procedure Add_disacc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc7_To_Orderings;


   procedure Add_disacc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "disacc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_disacc8_To_Orderings;


   procedure Add_discoc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc1_To_Orderings;


   procedure Add_discoc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc2_To_Orderings;


   procedure Add_discoc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc3_To_Orderings;


   procedure Add_discoc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc4_To_Orderings;


   procedure Add_discoc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc5_To_Orderings;


   procedure Add_discoc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc6_To_Orderings;


   procedure Add_discoc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc7_To_Orderings;


   procedure Add_discoc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "discoc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_discoc8_To_Orderings;


   procedure Add_dobc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc1_To_Orderings;


   procedure Add_dobc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc2_To_Orderings;


   procedure Add_dobc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc3_To_Orderings;


   procedure Add_dobc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc4_To_Orderings;


   procedure Add_dobc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc5_To_Orderings;


   procedure Add_dobc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc6_To_Orderings;


   procedure Add_dobc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc7_To_Orderings;


   procedure Add_dobc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dobc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dobc8_To_Orderings;


   procedure Add_dvmarc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc1_To_Orderings;


   procedure Add_dvmarc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc2_To_Orderings;


   procedure Add_dvmarc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc3_To_Orderings;


   procedure Add_dvmarc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc4_To_Orderings;


   procedure Add_dvmarc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc5_To_Orderings;


   procedure Add_dvmarc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc6_To_Orderings;


   procedure Add_dvmarc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc7_To_Orderings;


   procedure Add_dvmarc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvmarc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvmarc8_To_Orderings;


   procedure Add_fsvvlc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc1_To_Orderings;


   procedure Add_fsvvlc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc2_To_Orderings;


   procedure Add_fsvvlc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc3_To_Orderings;


   procedure Add_fsvvlc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc4_To_Orderings;


   procedure Add_fsvvlc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc5_To_Orderings;


   procedure Add_fsvvlc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc6_To_Orderings;


   procedure Add_fsvvlc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc7_To_Orderings;


   procedure Add_fsvvlc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsvvlc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsvvlc8_To_Orderings;


   procedure Add_fsmkvc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc1_To_Orderings;


   procedure Add_fsmkvc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc2_To_Orderings;


   procedure Add_fsmkvc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc3_To_Orderings;


   procedure Add_fsmkvc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc4_To_Orderings;


   procedure Add_fsmkvc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc5_To_Orderings;


   procedure Add_fsmkvc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc6_To_Orderings;


   procedure Add_fsmkvc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc7_To_Orderings;


   procedure Add_fsmkvc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmkvc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmkvc8_To_Orderings;


   procedure Add_fsmlvc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc1_To_Orderings;


   procedure Add_fsmlvc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc2_To_Orderings;


   procedure Add_fsmlvc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc3_To_Orderings;


   procedure Add_fsmlvc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc4_To_Orderings;


   procedure Add_fsmlvc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc5_To_Orderings;


   procedure Add_fsmlvc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc6_To_Orderings;


   procedure Add_fsmlvc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc7_To_Orderings;


   procedure Add_fsmlvc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fsmlvc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fsmlvc8_To_Orderings;


   procedure Add_ftedc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc1_To_Orderings;


   procedure Add_ftedc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc2_To_Orderings;


   procedure Add_ftedc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc3_To_Orderings;


   procedure Add_ftedc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc4_To_Orderings;


   procedure Add_ftedc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc5_To_Orderings;


   procedure Add_ftedc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc6_To_Orderings;


   procedure Add_ftedc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc7_To_Orderings;


   procedure Add_ftedc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftedc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftedc8_To_Orderings;


   procedure Add_g1valc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc1_To_Orderings;


   procedure Add_g1valc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc2_To_Orderings;


   procedure Add_g1valc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc3_To_Orderings;


   procedure Add_g1valc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc4_To_Orderings;


   procedure Add_g1valc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc5_To_Orderings;


   procedure Add_g1valc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc6_To_Orderings;


   procedure Add_g1valc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc7_To_Orderings;


   procedure Add_g1valc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1valc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1valc8_To_Orderings;


   procedure Add_g2valc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc1_To_Orderings;


   procedure Add_g2valc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc2_To_Orderings;


   procedure Add_g2valc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc3_To_Orderings;


   procedure Add_g2valc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc4_To_Orderings;


   procedure Add_g2valc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc5_To_Orderings;


   procedure Add_g2valc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc6_To_Orderings;


   procedure Add_g2valc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc7_To_Orderings;


   procedure Add_g2valc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2valc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2valc8_To_Orderings;


   procedure Add_g1dirc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc1_To_Orderings;


   procedure Add_g1dirc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc2_To_Orderings;


   procedure Add_g1dirc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc3_To_Orderings;


   procedure Add_g1dirc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc4_To_Orderings;


   procedure Add_g1dirc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc5_To_Orderings;


   procedure Add_g1dirc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc6_To_Orderings;


   procedure Add_g1dirc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc7_To_Orderings;


   procedure Add_g1dirc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g1dirc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g1dirc8_To_Orderings;


   procedure Add_g2dirc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc1_To_Orderings;


   procedure Add_g2dirc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc2_To_Orderings;


   procedure Add_g2dirc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc3_To_Orderings;


   procedure Add_g2dirc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc4_To_Orderings;


   procedure Add_g2dirc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc5_To_Orderings;


   procedure Add_g2dirc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc6_To_Orderings;


   procedure Add_g2dirc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc7_To_Orderings;


   procedure Add_g2dirc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "g2dirc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_g2dirc8_To_Orderings;


   procedure Add_gtnumc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc1_To_Orderings;


   procedure Add_gtnumc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc2_To_Orderings;


   procedure Add_gtnumc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc3_To_Orderings;


   procedure Add_gtnumc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc4_To_Orderings;


   procedure Add_gtnumc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc5_To_Orderings;


   procedure Add_gtnumc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc6_To_Orderings;


   procedure Add_gtnumc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc7_To_Orderings;


   procedure Add_gtnumc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gtnumc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gtnumc8_To_Orderings;


   procedure Add_gt1scc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc1_To_Orderings;


   procedure Add_gt1scc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc2_To_Orderings;


   procedure Add_gt1scc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc3_To_Orderings;


   procedure Add_gt1scc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc4_To_Orderings;


   procedure Add_gt1scc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc5_To_Orderings;


   procedure Add_gt1scc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc6_To_Orderings;


   procedure Add_gt1scc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc7_To_Orderings;


   procedure Add_gt1scc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt1scc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt1scc8_To_Orderings;


   procedure Add_gt2scc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc1_To_Orderings;


   procedure Add_gt2scc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc2_To_Orderings;


   procedure Add_gt2scc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc3_To_Orderings;


   procedure Add_gt2scc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc4_To_Orderings;


   procedure Add_gt2scc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc5_To_Orderings;


   procedure Add_gt2scc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc6_To_Orderings;


   procedure Add_gt2scc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc7_To_Orderings;


   procedure Add_gt2scc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt2scc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt2scc8_To_Orderings;


   procedure Add_gt10sc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc1_To_Orderings;


   procedure Add_gt10sc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc2_To_Orderings;


   procedure Add_gt10sc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc3_To_Orderings;


   procedure Add_gt10sc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc4_To_Orderings;


   procedure Add_gt10sc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc5_To_Orderings;


   procedure Add_gt10sc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc6_To_Orderings;


   procedure Add_gt10sc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc7_To_Orderings;


   procedure Add_gt10sc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt10sc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt10sc8_To_Orderings;


   procedure Add_gt20sc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc1_To_Orderings;


   procedure Add_gt20sc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc2_To_Orderings;


   procedure Add_gt20sc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc3_To_Orderings;


   procedure Add_gt20sc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc4_To_Orderings;


   procedure Add_gt20sc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc5_To_Orderings;


   procedure Add_gt20sc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc6_To_Orderings;


   procedure Add_gt20sc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc7_To_Orderings;


   procedure Add_gt20sc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gt20sc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gt20sc8_To_Orderings;


   procedure Add_hartvc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc1_To_Orderings;


   procedure Add_hartvc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc2_To_Orderings;


   procedure Add_hartvc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc3_To_Orderings;


   procedure Add_hartvc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc4_To_Orderings;


   procedure Add_hartvc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc5_To_Orderings;


   procedure Add_hartvc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc6_To_Orderings;


   procedure Add_hartvc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc7_To_Orderings;


   procedure Add_hartvc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hartvc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hartvc8_To_Orderings;


   procedure Add_heatchc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc1_To_Orderings;


   procedure Add_heatchc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc2_To_Orderings;


   procedure Add_heatchc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc3_To_Orderings;


   procedure Add_heatchc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc4_To_Orderings;


   procedure Add_heatchc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc5_To_Orderings;


   procedure Add_heatchc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc6_To_Orderings;


   procedure Add_heatchc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc7_To_Orderings;


   procedure Add_heatchc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heatchc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heatchc8_To_Orderings;


   procedure Add_hhldrc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc1_To_Orderings;


   procedure Add_hhldrc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc2_To_Orderings;


   procedure Add_hhldrc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc3_To_Orderings;


   procedure Add_hhldrc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc4_To_Orderings;


   procedure Add_hhldrc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc5_To_Orderings;


   procedure Add_hhldrc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc6_To_Orderings;


   procedure Add_hhldrc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc7_To_Orderings;


   procedure Add_hhldrc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldrc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldrc8_To_Orderings;


   procedure Add_hurabc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc1_To_Orderings;


   procedure Add_hurabc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc2_To_Orderings;


   procedure Add_hurabc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc3_To_Orderings;


   procedure Add_hurabc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc4_To_Orderings;


   procedure Add_hurabc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc5_To_Orderings;


   procedure Add_hurabc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc6_To_Orderings;


   procedure Add_hurabc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc7_To_Orderings;


   procedure Add_hurabc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurabc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurabc8_To_Orderings;


   procedure Add_hurahc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc1_To_Orderings;


   procedure Add_hurahc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc2_To_Orderings;


   procedure Add_hurahc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc3_To_Orderings;


   procedure Add_hurahc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc4_To_Orderings;


   procedure Add_hurahc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc5_To_Orderings;


   procedure Add_hurahc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc6_To_Orderings;


   procedure Add_hurahc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc7_To_Orderings;


   procedure Add_hurahc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurahc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurahc8_To_Orderings;


   procedure Add_hurcbc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc1_To_Orderings;


   procedure Add_hurcbc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc2_To_Orderings;


   procedure Add_hurcbc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc3_To_Orderings;


   procedure Add_hurcbc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc4_To_Orderings;


   procedure Add_hurcbc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc5_To_Orderings;


   procedure Add_hurcbc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc6_To_Orderings;


   procedure Add_hurcbc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc7_To_Orderings;


   procedure Add_hurcbc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurcbc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurcbc8_To_Orderings;


   procedure Add_hurchc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc1_To_Orderings;


   procedure Add_hurchc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc2_To_Orderings;


   procedure Add_hurchc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc3_To_Orderings;


   procedure Add_hurchc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc4_To_Orderings;


   procedure Add_hurchc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc5_To_Orderings;


   procedure Add_hurchc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc6_To_Orderings;


   procedure Add_hurchc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc7_To_Orderings;


   procedure Add_hurchc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurchc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurchc8_To_Orderings;


   procedure Add_hurclc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc1_To_Orderings;


   procedure Add_hurclc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc2_To_Orderings;


   procedure Add_hurclc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc3_To_Orderings;


   procedure Add_hurclc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc4_To_Orderings;


   procedure Add_hurclc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc5_To_Orderings;


   procedure Add_hurclc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc6_To_Orderings;


   procedure Add_hurclc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc7_To_Orderings;


   procedure Add_hurclc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurclc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurclc8_To_Orderings;


   procedure Add_hurfrc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc1_To_Orderings;


   procedure Add_hurfrc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc2_To_Orderings;


   procedure Add_hurfrc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc3_To_Orderings;


   procedure Add_hurfrc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc4_To_Orderings;


   procedure Add_hurfrc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc5_To_Orderings;


   procedure Add_hurfrc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc6_To_Orderings;


   procedure Add_hurfrc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc7_To_Orderings;


   procedure Add_hurfrc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurfrc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurfrc8_To_Orderings;


   procedure Add_hurotc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc1_To_Orderings;


   procedure Add_hurotc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc2_To_Orderings;


   procedure Add_hurotc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc3_To_Orderings;


   procedure Add_hurotc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc4_To_Orderings;


   procedure Add_hurotc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc5_To_Orderings;


   procedure Add_hurotc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc6_To_Orderings;


   procedure Add_hurotc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc7_To_Orderings;


   procedure Add_hurotc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurotc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurotc8_To_Orderings;


   procedure Add_hurrec1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec1_To_Orderings;


   procedure Add_hurrec2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec2_To_Orderings;


   procedure Add_hurrec3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec3_To_Orderings;


   procedure Add_hurrec4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec4_To_Orderings;


   procedure Add_hurrec5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec5_To_Orderings;


   procedure Add_hurrec6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec6_To_Orderings;


   procedure Add_hurrec7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec7_To_Orderings;


   procedure Add_hurrec8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hurrec8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hurrec8_To_Orderings;


   procedure Add_hpersc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc1_To_Orderings;


   procedure Add_hpersc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc2_To_Orderings;


   procedure Add_hpersc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc3_To_Orderings;


   procedure Add_hpersc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc4_To_Orderings;


   procedure Add_hpersc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc5_To_Orderings;


   procedure Add_hpersc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc6_To_Orderings;


   procedure Add_hpersc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc7_To_Orderings;


   procedure Add_hpersc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpersc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpersc8_To_Orderings;


   procedure Add_hrsedc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc1_To_Orderings;


   procedure Add_hrsedc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc2_To_Orderings;


   procedure Add_hrsedc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc3_To_Orderings;


   procedure Add_hrsedc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc4_To_Orderings;


   procedure Add_hrsedc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc5_To_Orderings;


   procedure Add_hrsedc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc6_To_Orderings;


   procedure Add_hrsedc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc7_To_Orderings;


   procedure Add_hrsedc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrsedc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrsedc8_To_Orderings;


   procedure Add_hsvprc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc1_To_Orderings;


   procedure Add_hsvprc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc2_To_Orderings;


   procedure Add_hsvprc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc3_To_Orderings;


   procedure Add_hsvprc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc4_To_Orderings;


   procedure Add_hsvprc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc5_To_Orderings;


   procedure Add_hsvprc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc6_To_Orderings;


   procedure Add_hsvprc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc7_To_Orderings;


   procedure Add_hsvprc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hsvprc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hsvprc8_To_Orderings;


   procedure Add_laregc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc1_To_Orderings;


   procedure Add_laregc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc2_To_Orderings;


   procedure Add_laregc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc3_To_Orderings;


   procedure Add_laregc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc4_To_Orderings;


   procedure Add_laregc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc5_To_Orderings;


   procedure Add_laregc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc6_To_Orderings;


   procedure Add_laregc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc7_To_Orderings;


   procedure Add_laregc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "laregc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_laregc8_To_Orderings;


   procedure Add_msc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc1_To_Orderings;


   procedure Add_msc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc2_To_Orderings;


   procedure Add_msc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc3_To_Orderings;


   procedure Add_msc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc4_To_Orderings;


   procedure Add_msc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc5_To_Orderings;


   procedure Add_msc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc6_To_Orderings;


   procedure Add_msc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc7_To_Orderings;


   procedure Add_msc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "msc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_msc8_To_Orderings;


   procedure Add_prsonc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc1_To_Orderings;


   procedure Add_prsonc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc2_To_Orderings;


   procedure Add_prsonc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc3_To_Orderings;


   procedure Add_prsonc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc4_To_Orderings;


   procedure Add_prsonc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc5_To_Orderings;


   procedure Add_prsonc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc6_To_Orderings;


   procedure Add_prsonc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc7_To_Orderings;


   procedure Add_prsonc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prsonc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prsonc8_To_Orderings;


   procedure Add_rlp1c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c1_To_Orderings;


   procedure Add_rlp1c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c2_To_Orderings;


   procedure Add_rlp1c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c3_To_Orderings;


   procedure Add_rlp1c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c4_To_Orderings;


   procedure Add_rlp1c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c5_To_Orderings;


   procedure Add_rlp1c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c6_To_Orderings;


   procedure Add_rlp1c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c7_To_Orderings;


   procedure Add_rlp1c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp1c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp1c8_To_Orderings;


   procedure Add_rlp2c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c1_To_Orderings;


   procedure Add_rlp2c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c2_To_Orderings;


   procedure Add_rlp2c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c3_To_Orderings;


   procedure Add_rlp2c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c4_To_Orderings;


   procedure Add_rlp2c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c5_To_Orderings;


   procedure Add_rlp2c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c6_To_Orderings;


   procedure Add_rlp2c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c7_To_Orderings;


   procedure Add_rlp2c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp2c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp2c8_To_Orderings;


   procedure Add_rlp3c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c1_To_Orderings;


   procedure Add_rlp3c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c2_To_Orderings;


   procedure Add_rlp3c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c3_To_Orderings;


   procedure Add_rlp3c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c4_To_Orderings;


   procedure Add_rlp3c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c5_To_Orderings;


   procedure Add_rlp3c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c6_To_Orderings;


   procedure Add_rlp3c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c7_To_Orderings;


   procedure Add_rlp3c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp3c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp3c8_To_Orderings;


   procedure Add_rlp4c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c1_To_Orderings;


   procedure Add_rlp4c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c2_To_Orderings;


   procedure Add_rlp4c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c3_To_Orderings;


   procedure Add_rlp4c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c4_To_Orderings;


   procedure Add_rlp4c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c5_To_Orderings;


   procedure Add_rlp4c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c6_To_Orderings;


   procedure Add_rlp4c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c7_To_Orderings;


   procedure Add_rlp4c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp4c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp4c8_To_Orderings;


   procedure Add_rlp5c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c1_To_Orderings;


   procedure Add_rlp5c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c2_To_Orderings;


   procedure Add_rlp5c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c3_To_Orderings;


   procedure Add_rlp5c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c4_To_Orderings;


   procedure Add_rlp5c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c5_To_Orderings;


   procedure Add_rlp5c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c6_To_Orderings;


   procedure Add_rlp5c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c7_To_Orderings;


   procedure Add_rlp5c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp5c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp5c8_To_Orderings;


   procedure Add_rlp6c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c1_To_Orderings;


   procedure Add_rlp6c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c2_To_Orderings;


   procedure Add_rlp6c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c3_To_Orderings;


   procedure Add_rlp6c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c4_To_Orderings;


   procedure Add_rlp6c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c5_To_Orderings;


   procedure Add_rlp6c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c6_To_Orderings;


   procedure Add_rlp6c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c7_To_Orderings;


   procedure Add_rlp6c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp6c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp6c8_To_Orderings;


   procedure Add_rlp7c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c1_To_Orderings;


   procedure Add_rlp7c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c2_To_Orderings;


   procedure Add_rlp7c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c3_To_Orderings;


   procedure Add_rlp7c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c4_To_Orderings;


   procedure Add_rlp7c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c5_To_Orderings;


   procedure Add_rlp7c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c6_To_Orderings;


   procedure Add_rlp7c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c7_To_Orderings;


   procedure Add_rlp7c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp7c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp7c8_To_Orderings;


   procedure Add_rlp8c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c1_To_Orderings;


   procedure Add_rlp8c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c2_To_Orderings;


   procedure Add_rlp8c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c3_To_Orderings;


   procedure Add_rlp8c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c4_To_Orderings;


   procedure Add_rlp8c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c5_To_Orderings;


   procedure Add_rlp8c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c6_To_Orderings;


   procedure Add_rlp8c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c7_To_Orderings;


   procedure Add_rlp8c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp8c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp8c8_To_Orderings;


   procedure Add_rlp9c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c1_To_Orderings;


   procedure Add_rlp9c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c2_To_Orderings;


   procedure Add_rlp9c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c3_To_Orderings;


   procedure Add_rlp9c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c4_To_Orderings;


   procedure Add_rlp9c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c5_To_Orderings;


   procedure Add_rlp9c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c6_To_Orderings;


   procedure Add_rlp9c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c7_To_Orderings;


   procedure Add_rlp9c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp9c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp9c8_To_Orderings;


   procedure Add_rlp10c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c1_To_Orderings;


   procedure Add_rlp10c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c2_To_Orderings;


   procedure Add_rlp10c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c3_To_Orderings;


   procedure Add_rlp10c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c4_To_Orderings;


   procedure Add_rlp10c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c5_To_Orderings;


   procedure Add_rlp10c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c6_To_Orderings;


   procedure Add_rlp10c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c7_To_Orderings;


   procedure Add_rlp10c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp10c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp10c8_To_Orderings;


   procedure Add_rlp11c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c1_To_Orderings;


   procedure Add_rlp11c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c2_To_Orderings;


   procedure Add_rlp11c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c3_To_Orderings;


   procedure Add_rlp11c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c4_To_Orderings;


   procedure Add_rlp11c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c5_To_Orderings;


   procedure Add_rlp11c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c6_To_Orderings;


   procedure Add_rlp11c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c7_To_Orderings;


   procedure Add_rlp11c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp11c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp11c8_To_Orderings;


   procedure Add_rlp12c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c1_To_Orderings;


   procedure Add_rlp12c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c2_To_Orderings;


   procedure Add_rlp12c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c3_To_Orderings;


   procedure Add_rlp12c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c4_To_Orderings;


   procedure Add_rlp12c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c5_To_Orderings;


   procedure Add_rlp12c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c6_To_Orderings;


   procedure Add_rlp12c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c7_To_Orderings;


   procedure Add_rlp12c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp12c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp12c8_To_Orderings;


   procedure Add_rlp13c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c1_To_Orderings;


   procedure Add_rlp13c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c2_To_Orderings;


   procedure Add_rlp13c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c3_To_Orderings;


   procedure Add_rlp13c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c4_To_Orderings;


   procedure Add_rlp13c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c5_To_Orderings;


   procedure Add_rlp13c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c6_To_Orderings;


   procedure Add_rlp13c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c7_To_Orderings;


   procedure Add_rlp13c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp13c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp13c8_To_Orderings;


   procedure Add_rlp14c1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c1_To_Orderings;


   procedure Add_rlp14c2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c2_To_Orderings;


   procedure Add_rlp14c3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c3_To_Orderings;


   procedure Add_rlp14c4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c4_To_Orderings;


   procedure Add_rlp14c5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c5_To_Orderings;


   procedure Add_rlp14c6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c6_To_Orderings;


   procedure Add_rlp14c7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c7_To_Orderings;


   procedure Add_rlp14c8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rlp14c8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rlp14c8_To_Orderings;


   procedure Add_rhrpcc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc1_To_Orderings;


   procedure Add_rhrpcc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc2_To_Orderings;


   procedure Add_rhrpcc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc3_To_Orderings;


   procedure Add_rhrpcc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc4_To_Orderings;


   procedure Add_rhrpcc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc5_To_Orderings;


   procedure Add_rhrpcc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc6_To_Orderings;


   procedure Add_rhrpcc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc7_To_Orderings;


   procedure Add_rhrpcc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rhrpcc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rhrpcc8_To_Orderings;


   procedure Add_sbkitc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc1_To_Orderings;


   procedure Add_sbkitc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc2_To_Orderings;


   procedure Add_sbkitc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc3_To_Orderings;


   procedure Add_sbkitc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc4_To_Orderings;


   procedure Add_sbkitc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc5_To_Orderings;


   procedure Add_sbkitc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc6_To_Orderings;


   procedure Add_sbkitc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc7_To_Orderings;


   procedure Add_sbkitc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sbkitc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sbkitc8_To_Orderings;


   procedure Add_sexc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc1_To_Orderings;


   procedure Add_sexc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc2_To_Orderings;


   procedure Add_sexc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc3_To_Orderings;


   procedure Add_sexc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc4_To_Orderings;


   procedure Add_sexc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc5_To_Orderings;


   procedure Add_sexc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc6_To_Orderings;


   procedure Add_sexc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc7_To_Orderings;


   procedure Add_sexc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sexc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sexc8_To_Orderings;


   procedure Add_sfvitc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc1_To_Orderings;


   procedure Add_sfvitc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc2_To_Orderings;


   procedure Add_sfvitc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc3_To_Orderings;


   procedure Add_sfvitc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc4_To_Orderings;


   procedure Add_sfvitc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc5_To_Orderings;


   procedure Add_sfvitc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc6_To_Orderings;


   procedure Add_sfvitc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc7_To_Orderings;


   procedure Add_sfvitc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sfvitc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sfvitc8_To_Orderings;


   procedure Add_fmctsc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc1_To_Orderings;


   procedure Add_fmctsc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc2_To_Orderings;


   procedure Add_fmctsc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc3_To_Orderings;


   procedure Add_fmctsc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc4_To_Orderings;


   procedure Add_fmctsc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc5_To_Orderings;


   procedure Add_fmctsc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc6_To_Orderings;


   procedure Add_fmctsc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc7_To_Orderings;


   procedure Add_fmctsc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmctsc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmctsc8_To_Orderings;


   procedure Add_fmealc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc1_To_Orderings;


   procedure Add_fmealc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc2_To_Orderings;


   procedure Add_fmealc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc3_To_Orderings;


   procedure Add_fmealc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc4_To_Orderings;


   procedure Add_fmealc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc5_To_Orderings;


   procedure Add_fmealc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc6_To_Orderings;


   procedure Add_fmealc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc7_To_Orderings;


   procedure Add_fmealc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fmealc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fmealc8_To_Orderings;


   procedure Add_cblndc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc1_To_Orderings;


   procedure Add_cblndc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc2_To_Orderings;


   procedure Add_cblndc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc3_To_Orderings;


   procedure Add_cblndc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc4_To_Orderings;


   procedure Add_cblndc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc5_To_Orderings;


   procedure Add_cblndc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc6_To_Orderings;


   procedure Add_cblndc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc7_To_Orderings;


   procedure Add_cblndc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cblndc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cblndc8_To_Orderings;


   procedure Add_cparsc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc1_To_Orderings;


   procedure Add_cparsc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc2_To_Orderings;


   procedure Add_cparsc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc3_To_Orderings;


   procedure Add_cparsc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc4_To_Orderings;


   procedure Add_cparsc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc5_To_Orderings;


   procedure Add_cparsc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc6_To_Orderings;


   procedure Add_cparsc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc7_To_Orderings;


   procedure Add_cparsc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cparsc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cparsc8_To_Orderings;


   procedure Add_cdeafc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc1_To_Orderings;


   procedure Add_cdeafc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc2_To_Orderings;


   procedure Add_cdeafc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc3_To_Orderings;


   procedure Add_cdeafc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc4_To_Orderings;


   procedure Add_cdeafc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc5_To_Orderings;


   procedure Add_cdeafc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc6_To_Orderings;


   procedure Add_cdeafc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc7_To_Orderings;


   procedure Add_cdeafc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cdeafc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cdeafc8_To_Orderings;


   procedure Add_totgtc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc1_To_Orderings;


   procedure Add_totgtc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc2_To_Orderings;


   procedure Add_totgtc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc3_To_Orderings;


   procedure Add_totgtc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc4_To_Orderings;


   procedure Add_totgtc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc5_To_Orderings;


   procedure Add_totgtc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc6_To_Orderings;


   procedure Add_totgtc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc7_To_Orderings;


   procedure Add_totgtc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totgtc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totgtc8_To_Orderings;


   procedure Add_totsvc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc1_To_Orderings;


   procedure Add_totsvc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc2_To_Orderings;


   procedure Add_totsvc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc3_To_Orderings;


   procedure Add_totsvc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc4_To_Orderings;


   procedure Add_totsvc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc5_To_Orderings;


   procedure Add_totsvc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc6_To_Orderings;


   procedure Add_totsvc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc7_To_Orderings;


   procedure Add_totsvc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totsvc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totsvc8_To_Orderings;


   procedure Add_tacamc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc1_To_Orderings;


   procedure Add_tacamc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc2_To_Orderings;


   procedure Add_tacamc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc3_To_Orderings;


   procedure Add_tacamc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc4_To_Orderings;


   procedure Add_tacamc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc5_To_Orderings;


   procedure Add_tacamc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc6_To_Orderings;


   procedure Add_tacamc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc7_To_Orderings;


   procedure Add_tacamc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tacamc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tacamc8_To_Orderings;


   procedure Add_tpeedc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc1_To_Orderings;


   procedure Add_tpeedc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc2_To_Orderings;


   procedure Add_tpeedc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc3_To_Orderings;


   procedure Add_tpeedc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc4_To_Orderings;


   procedure Add_tpeedc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc5_To_Orderings;


   procedure Add_tpeedc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc6_To_Orderings;


   procedure Add_tpeedc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc7_To_Orderings;


   procedure Add_tpeedc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tpeedc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tpeedc8_To_Orderings;


   procedure Add_uprsoc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc1_To_Orderings;


   procedure Add_uprsoc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc2_To_Orderings;


   procedure Add_uprsoc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc3_To_Orderings;


   procedure Add_uprsoc4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc4_To_Orderings;


   procedure Add_uprsoc5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc5_To_Orderings;


   procedure Add_uprsoc6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc6_To_Orderings;


   procedure Add_uprsoc7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc7_To_Orderings;


   procedure Add_uprsoc8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uprsoc8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uprsoc8_To_Orderings;


   procedure Add_govpy1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy1hd_To_Orderings;


   procedure Add_govpy2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy2hd_To_Orderings;


   procedure Add_govpy3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy3hd_To_Orderings;


   procedure Add_govpy4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy4hd_To_Orderings;


   procedure Add_govpy5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy5hd_To_Orderings;


   procedure Add_govpy6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy6hd_To_Orderings;


   procedure Add_govpy7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy7hd_To_Orderings;


   procedure Add_govpy8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy8hd_To_Orderings;


   procedure Add_govpy9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy9hd_To_Orderings;


   procedure Add_gvpy10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvpy10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy10hd_To_Orderings;


   procedure Add_gvpy11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvpy11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy11hd_To_Orderings;


   procedure Add_govpy1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy1sp_To_Orderings;


   procedure Add_govpy2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy2sp_To_Orderings;


   procedure Add_govpy3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy3sp_To_Orderings;


   procedure Add_govpy4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy4sp_To_Orderings;


   procedure Add_govpy5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy5sp_To_Orderings;


   procedure Add_govpy6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy6sp_To_Orderings;


   procedure Add_govpy7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy7sp_To_Orderings;


   procedure Add_govpy8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy8sp_To_Orderings;


   procedure Add_govpy9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "govpy9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_govpy9sp_To_Orderings;


   procedure Add_gvpy10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvpy10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy10sp_To_Orderings;


   procedure Add_gvpy11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvpy11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvpy11sp_To_Orderings;


   procedure Add_nhhamt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhamt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt1_To_Orderings;


   procedure Add_nhhamt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhamt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt2_To_Orderings;


   procedure Add_nhhamt3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhamt3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt3_To_Orderings;


   procedure Add_nhhamt4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhamt4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhamt4_To_Orderings;


   procedure Add_nhhfee1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhfee1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee1_To_Orderings;


   procedure Add_nhhfee2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhfee2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee2_To_Orderings;


   procedure Add_nhhfee3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhfee3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee3_To_Orderings;


   procedure Add_nhhfee4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nhhfee4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nhhfee4_To_Orderings;


   procedure Add_pnhhamt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pnhhamt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt1_To_Orderings;


   procedure Add_pnhhamt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pnhhamt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt2_To_Orderings;


   procedure Add_pnhhamt3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pnhhamt3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt3_To_Orderings;


   procedure Add_pnhhamt4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pnhhamt4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pnhhamt4_To_Orderings;


   procedure Add_bona11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona11hd_To_Orderings;


   procedure Add_bona12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona12hd_To_Orderings;


   procedure Add_bona13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona13hd_To_Orderings;


   procedure Add_bona11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona11sp_To_Orderings;


   procedure Add_bona12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona12sp_To_Orderings;


   procedure Add_bona13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona13sp_To_Orderings;


   procedure Add_bona21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona21hd_To_Orderings;


   procedure Add_bona22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona22hd_To_Orderings;


   procedure Add_bona23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona23hd_To_Orderings;


   procedure Add_bona21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona21sp_To_Orderings;


   procedure Add_bona22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona22sp_To_Orderings;


   procedure Add_bona23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona23sp_To_Orderings;


   procedure Add_bona31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona31hd_To_Orderings;


   procedure Add_bona32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona32hd_To_Orderings;


   procedure Add_bona33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona33hd_To_Orderings;


   procedure Add_bona31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona31sp_To_Orderings;


   procedure Add_bona32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona32sp_To_Orderings;


   procedure Add_bona33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona33sp_To_Orderings;


   procedure Add_bona41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona41hd_To_Orderings;


   procedure Add_bona42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona42hd_To_Orderings;


   procedure Add_bona43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona43hd_To_Orderings;


   procedure Add_bona41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona41sp_To_Orderings;


   procedure Add_bona42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona42sp_To_Orderings;


   procedure Add_bona43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona43sp_To_Orderings;


   procedure Add_bona51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona51hd_To_Orderings;


   procedure Add_bona52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona52hd_To_Orderings;


   procedure Add_bona53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona53hd_To_Orderings;


   procedure Add_bona51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona51sp_To_Orderings;


   procedure Add_bona52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona52sp_To_Orderings;


   procedure Add_bona53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona53sp_To_Orderings;


   procedure Add_bona61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona61hd_To_Orderings;


   procedure Add_bona62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona62hd_To_Orderings;


   procedure Add_bona63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona63hd_To_Orderings;


   procedure Add_bona61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona61sp_To_Orderings;


   procedure Add_bona62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona62sp_To_Orderings;


   procedure Add_bona63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bona63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bona63sp_To_Orderings;


   procedure Add_bont11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont11hd_To_Orderings;


   procedure Add_bont12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont12hd_To_Orderings;


   procedure Add_bont13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont13hd_To_Orderings;


   procedure Add_bont11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont11sp_To_Orderings;


   procedure Add_bont12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont12sp_To_Orderings;


   procedure Add_bont13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont13sp_To_Orderings;


   procedure Add_bont21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont21hd_To_Orderings;


   procedure Add_bont22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont22hd_To_Orderings;


   procedure Add_bont23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont23hd_To_Orderings;


   procedure Add_bont21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont21sp_To_Orderings;


   procedure Add_bont22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont22sp_To_Orderings;


   procedure Add_bont23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont23sp_To_Orderings;


   procedure Add_bont31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont31hd_To_Orderings;


   procedure Add_bont32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont32hd_To_Orderings;


   procedure Add_bont33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont33hd_To_Orderings;


   procedure Add_bont31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont31sp_To_Orderings;


   procedure Add_bont32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont32sp_To_Orderings;


   procedure Add_bont33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont33sp_To_Orderings;


   procedure Add_bont41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont41hd_To_Orderings;


   procedure Add_bont42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont42hd_To_Orderings;


   procedure Add_bont43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont43hd_To_Orderings;


   procedure Add_bont41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont41sp_To_Orderings;


   procedure Add_bont42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont42sp_To_Orderings;


   procedure Add_bont43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont43sp_To_Orderings;


   procedure Add_bont51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont51hd_To_Orderings;


   procedure Add_bont52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont52hd_To_Orderings;


   procedure Add_bont53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont53hd_To_Orderings;


   procedure Add_bont51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont51sp_To_Orderings;


   procedure Add_bont52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont52sp_To_Orderings;


   procedure Add_bont53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont53sp_To_Orderings;


   procedure Add_bont61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont61hd_To_Orderings;


   procedure Add_bont62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont62hd_To_Orderings;


   procedure Add_bont63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont63hd_To_Orderings;


   procedure Add_bont61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont61sp_To_Orderings;


   procedure Add_bont62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont62sp_To_Orderings;


   procedure Add_bont63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bont63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bont63sp_To_Orderings;


   procedure Add_btax11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax11hd_To_Orderings;


   procedure Add_btax12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax12hd_To_Orderings;


   procedure Add_btax13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax13hd_To_Orderings;


   procedure Add_btax11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax11sp_To_Orderings;


   procedure Add_btax12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax12sp_To_Orderings;


   procedure Add_btax13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax13sp_To_Orderings;


   procedure Add_btax21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax21hd_To_Orderings;


   procedure Add_btax22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax22hd_To_Orderings;


   procedure Add_btax23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax23hd_To_Orderings;


   procedure Add_btax21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax21sp_To_Orderings;


   procedure Add_btax22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax22sp_To_Orderings;


   procedure Add_btax23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax23sp_To_Orderings;


   procedure Add_btax31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax31hd_To_Orderings;


   procedure Add_btax32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax32hd_To_Orderings;


   procedure Add_btax33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax33hd_To_Orderings;


   procedure Add_btax31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax31sp_To_Orderings;


   procedure Add_btax32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax32sp_To_Orderings;


   procedure Add_btax33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax33sp_To_Orderings;


   procedure Add_btax41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax41hd_To_Orderings;


   procedure Add_btax42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax42hd_To_Orderings;


   procedure Add_btax43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax43hd_To_Orderings;


   procedure Add_btax41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax41sp_To_Orderings;


   procedure Add_btax42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax42sp_To_Orderings;


   procedure Add_btax43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax43sp_To_Orderings;


   procedure Add_btax51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax51hd_To_Orderings;


   procedure Add_btax52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax52hd_To_Orderings;


   procedure Add_btax53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax53hd_To_Orderings;


   procedure Add_btax51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax51sp_To_Orderings;


   procedure Add_btax52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax52sp_To_Orderings;


   procedure Add_btax53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax53sp_To_Orderings;


   procedure Add_btax61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax61hd_To_Orderings;


   procedure Add_btax62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax62hd_To_Orderings;


   procedure Add_btax63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax63hd_To_Orderings;


   procedure Add_btax61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax61sp_To_Orderings;


   procedure Add_btax62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax62sp_To_Orderings;


   procedure Add_btax63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "btax63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_btax63sp_To_Orderings;


   procedure Add_busac1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busac1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac1hd_To_Orderings;


   procedure Add_busac2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busac2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac2hd_To_Orderings;


   procedure Add_busac3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busac3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac3hd_To_Orderings;


   procedure Add_busac1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busac1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac1sp_To_Orderings;


   procedure Add_busac2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busac2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac2sp_To_Orderings;


   procedure Add_busac3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busac3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busac3sp_To_Orderings;


   procedure Add_caram1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "caram1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram1hd_To_Orderings;


   procedure Add_caram2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "caram2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram2hd_To_Orderings;


   procedure Add_caram3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "caram3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram3hd_To_Orderings;


   procedure Add_caram1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "caram1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram1sp_To_Orderings;


   procedure Add_caram2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "caram2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram2sp_To_Orderings;


   procedure Add_caram3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "caram3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_caram3sp_To_Orderings;


   procedure Add_carcn1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carcn1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn1hd_To_Orderings;


   procedure Add_carcn2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carcn2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn2hd_To_Orderings;


   procedure Add_carcn3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carcn3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn3hd_To_Orderings;


   procedure Add_carcn1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carcn1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn1sp_To_Orderings;


   procedure Add_carcn2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carcn2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn2sp_To_Orderings;


   procedure Add_carcn3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carcn3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carcn3sp_To_Orderings;


   procedure Add_carvl1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carvl1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl1hd_To_Orderings;


   procedure Add_carvl2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carvl2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl2hd_To_Orderings;


   procedure Add_carvl3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carvl3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl3hd_To_Orderings;


   procedure Add_carvl1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carvl1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl1sp_To_Orderings;


   procedure Add_carvl2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carvl2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl2sp_To_Orderings;


   procedure Add_carvl3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "carvl3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_carvl3sp_To_Orderings;


   procedure Add_chktx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chktx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx1hd_To_Orderings;


   procedure Add_chktx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chktx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx2hd_To_Orderings;


   procedure Add_chktx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chktx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx3hd_To_Orderings;


   procedure Add_chktx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chktx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx1sp_To_Orderings;


   procedure Add_chktx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chktx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx2sp_To_Orderings;


   procedure Add_chktx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chktx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chktx3sp_To_Orderings;


   procedure Add_chcom1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcom1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom1hd_To_Orderings;


   procedure Add_chcom2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcom2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom2hd_To_Orderings;


   procedure Add_chcom3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcom3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom3hd_To_Orderings;


   procedure Add_chcom1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcom1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom1sp_To_Orderings;


   procedure Add_chcom2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcom2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom2sp_To_Orderings;


   procedure Add_chcom3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chcom3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chcom3sp_To_Orderings;


   procedure Add_chvam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam1hd_To_Orderings;


   procedure Add_chvam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam2hd_To_Orderings;


   procedure Add_chvam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam3hd_To_Orderings;


   procedure Add_chvam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam1sp_To_Orderings;


   procedure Add_chvam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam2sp_To_Orderings;


   procedure Add_chvam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvam3sp_To_Orderings;


   procedure Add_chvpd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvpd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd1hd_To_Orderings;


   procedure Add_chvpd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvpd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd2hd_To_Orderings;


   procedure Add_chvpd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvpd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd3hd_To_Orderings;


   procedure Add_chvpd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvpd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd1sp_To_Orderings;


   procedure Add_chvpd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvpd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd2sp_To_Orderings;


   procedure Add_chvpd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chvpd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chvpd3sp_To_Orderings;


   procedure Add_chsac1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chsac1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac1hd_To_Orderings;


   procedure Add_chsac2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chsac2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac2hd_To_Orderings;


   procedure Add_chsac3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chsac3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac3hd_To_Orderings;


   procedure Add_chsac1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chsac1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac1sp_To_Orderings;


   procedure Add_chsac2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chsac2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac2sp_To_Orderings;


   procedure Add_chsac3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chsac3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chsac3sp_To_Orderings;


   procedure Add_chuam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chuam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam1hd_To_Orderings;


   procedure Add_chuam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chuam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam2hd_To_Orderings;


   procedure Add_chuam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chuam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam3hd_To_Orderings;


   procedure Add_chuam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chuam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam1sp_To_Orderings;


   procedure Add_chuam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chuam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam2sp_To_Orderings;


   procedure Add_chuam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chuam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chuam3sp_To_Orderings;


   procedure Add_chupd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chupd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd1hd_To_Orderings;


   procedure Add_chupd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chupd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd2hd_To_Orderings;


   procedure Add_chupd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chupd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd3hd_To_Orderings;


   procedure Add_chupd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chupd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd1sp_To_Orderings;


   procedure Add_chupd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chupd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd2sp_To_Orderings;


   procedure Add_chupd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chupd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chupd3sp_To_Orderings;


   procedure Add_chusu1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chusu1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu1hd_To_Orderings;


   procedure Add_chusu2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chusu2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu2hd_To_Orderings;


   procedure Add_chusu3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chusu3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu3hd_To_Orderings;


   procedure Add_chusu1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chusu1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu1sp_To_Orderings;


   procedure Add_chusu2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chusu2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu2sp_To_Orderings;


   procedure Add_chusu3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chusu3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chusu3sp_To_Orderings;


   procedure Add_doth1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "doth1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth1hd_To_Orderings;


   procedure Add_doth2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "doth2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth2hd_To_Orderings;


   procedure Add_doth3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "doth3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth3hd_To_Orderings;


   procedure Add_doth1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "doth1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth1sp_To_Orderings;


   procedure Add_doth2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "doth2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth2sp_To_Orderings;


   procedure Add_doth3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "doth3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_doth3sp_To_Orderings;


   procedure Add_dpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen1hd_To_Orderings;


   procedure Add_dpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen2hd_To_Orderings;


   procedure Add_dpen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dpen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen3hd_To_Orderings;


   procedure Add_dpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen1sp_To_Orderings;


   procedure Add_dpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen2sp_To_Orderings;


   procedure Add_dpen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dpen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dpen3sp_To_Orderings;


   procedure Add_davc1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "davc1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc1hd_To_Orderings;


   procedure Add_davc2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "davc2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc2hd_To_Orderings;


   procedure Add_davc3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "davc3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc3hd_To_Orderings;


   procedure Add_davc1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "davc1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc1sp_To_Orderings;


   procedure Add_davc2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "davc2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc2sp_To_Orderings;


   procedure Add_davc3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "davc3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_davc3sp_To_Orderings;


   procedure Add_dtuf1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dtuf1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf1hd_To_Orderings;


   procedure Add_dtuf2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dtuf2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf2hd_To_Orderings;


   procedure Add_dtuf3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dtuf3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf3hd_To_Orderings;


   procedure Add_dtuf1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dtuf1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf1sp_To_Orderings;


   procedure Add_dtuf2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dtuf2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf2sp_To_Orderings;


   procedure Add_dtuf3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dtuf3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dtuf3sp_To_Orderings;


   procedure Add_dfrso1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dfrso1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso1hd_To_Orderings;


   procedure Add_dfrso2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dfrso2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso2hd_To_Orderings;


   procedure Add_dfrso3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dfrso3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso3hd_To_Orderings;


   procedure Add_dfrso1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dfrso1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso1sp_To_Orderings;


   procedure Add_dfrso2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dfrso2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso2sp_To_Orderings;


   procedure Add_dfrso3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dfrso3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dfrso3sp_To_Orderings;


   procedure Add_dspor1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dspor1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor1hd_To_Orderings;


   procedure Add_dspor2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dspor2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor2hd_To_Orderings;


   procedure Add_dspor3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dspor3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor3hd_To_Orderings;


   procedure Add_dspor1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dspor1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor1sp_To_Orderings;


   procedure Add_dspor2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dspor2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor2sp_To_Orderings;


   procedure Add_dspor3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dspor3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dspor3sp_To_Orderings;


   procedure Add_drepl1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "drepl1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl1hd_To_Orderings;


   procedure Add_drepl2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "drepl2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl2hd_To_Orderings;


   procedure Add_drepl3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "drepl3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl3hd_To_Orderings;


   procedure Add_drepl1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "drepl1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl1sp_To_Orderings;


   procedure Add_drepl2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "drepl2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl2sp_To_Orderings;


   procedure Add_drepl3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "drepl3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_drepl3sp_To_Orderings;


   procedure Add_dmed1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmed1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed1hd_To_Orderings;


   procedure Add_dmed2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmed2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed2hd_To_Orderings;


   procedure Add_dmed3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmed3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed3hd_To_Orderings;


   procedure Add_dmed1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmed1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed1sp_To_Orderings;


   procedure Add_dmed2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmed2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed2sp_To_Orderings;


   procedure Add_dmed3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dmed3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dmed3sp_To_Orderings;


   procedure Add_dchar1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dchar1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar1hd_To_Orderings;


   procedure Add_dchar2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dchar2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar2hd_To_Orderings;


   procedure Add_dchar3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dchar3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar3hd_To_Orderings;


   procedure Add_dchar1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dchar1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar1sp_To_Orderings;


   procedure Add_dchar2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dchar2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar2sp_To_Orderings;


   procedure Add_dchar3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dchar3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dchar3sp_To_Orderings;


   procedure Add_dslrp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dslrp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp1hd_To_Orderings;


   procedure Add_dslrp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dslrp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp2hd_To_Orderings;


   procedure Add_dslrp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dslrp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp3hd_To_Orderings;


   procedure Add_dslrp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dslrp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp1sp_To_Orderings;


   procedure Add_dslrp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dslrp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp2sp_To_Orderings;


   procedure Add_dslrp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dslrp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dslrp3sp_To_Orderings;


   procedure Add_dirni1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dirni1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni1hd_To_Orderings;


   procedure Add_dirni2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dirni2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni2hd_To_Orderings;


   procedure Add_dirni3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dirni3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni3hd_To_Orderings;


   procedure Add_dirni1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dirni1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni1sp_To_Orderings;


   procedure Add_dirni2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dirni2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni2sp_To_Orderings;


   procedure Add_dirni3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dirni3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dirni3sp_To_Orderings;


   procedure Add_totov1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totov1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov1hd_To_Orderings;


   procedure Add_totov2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totov2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov2hd_To_Orderings;


   procedure Add_totov3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totov3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov3hd_To_Orderings;


   procedure Add_totov1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totov1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov1sp_To_Orderings;


   procedure Add_totov2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totov2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov2sp_To_Orderings;


   procedure Add_totov3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "totov3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_totov3sp_To_Orderings;


   procedure Add_dvuhr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvuhr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr1hd_To_Orderings;


   procedure Add_dvuhr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvuhr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr2hd_To_Orderings;


   procedure Add_dvuhr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvuhr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr3hd_To_Orderings;


   procedure Add_dvuhr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvuhr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr1sp_To_Orderings;


   procedure Add_dvuhr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvuhr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr2sp_To_Orderings;


   procedure Add_dvuhr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dvuhr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dvuhr3sp_To_Orderings;


   procedure Add_empan1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empan1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan1hd_To_Orderings;


   procedure Add_empan2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empan2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan2hd_To_Orderings;


   procedure Add_empan3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empan3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan3hd_To_Orderings;


   procedure Add_empan1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empan1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan1sp_To_Orderings;


   procedure Add_empan2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empan2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan2sp_To_Orderings;


   procedure Add_empan3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empan3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empan3sp_To_Orderings;


   procedure Add_empen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen1hd_To_Orderings;


   procedure Add_empen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen2hd_To_Orderings;


   procedure Add_empen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen3hd_To_Orderings;


   procedure Add_empen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen1sp_To_Orderings;


   procedure Add_empen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen2sp_To_Orderings;


   procedure Add_empen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "empen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_empen3sp_To_Orderings;


   procedure Add_etype1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etype1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype1hd_To_Orderings;


   procedure Add_etype2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etype2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype2hd_To_Orderings;


   procedure Add_etype3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etype3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype3hd_To_Orderings;


   procedure Add_etype1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etype1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype1sp_To_Orderings;


   procedure Add_etype2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etype2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype2sp_To_Orderings;


   procedure Add_etype3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "etype3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_etype3sp_To_Orderings;


   procedure Add_evrot1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "evrot1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot1hd_To_Orderings;


   procedure Add_evrot2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "evrot2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot2hd_To_Orderings;


   procedure Add_evrot3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "evrot3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot3hd_To_Orderings;


   procedure Add_evrot1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "evrot1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot1sp_To_Orderings;


   procedure Add_evrot2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "evrot2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot2sp_To_Orderings;


   procedure Add_evrot3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "evrot3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_evrot3sp_To_Orderings;


   procedure Add_exb011hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb011hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb011hd_To_Orderings;


   procedure Add_exb012hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb012hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb012hd_To_Orderings;


   procedure Add_exb013hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb013hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb013hd_To_Orderings;


   procedure Add_exb011sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb011sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb011sp_To_Orderings;


   procedure Add_exb012sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb012sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb012sp_To_Orderings;


   procedure Add_exb013sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb013sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb013sp_To_Orderings;


   procedure Add_exb021hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb021hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb021hd_To_Orderings;


   procedure Add_exb022hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb022hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb022hd_To_Orderings;


   procedure Add_exb023hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb023hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb023hd_To_Orderings;


   procedure Add_exb021sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb021sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb021sp_To_Orderings;


   procedure Add_exb022sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb022sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb022sp_To_Orderings;


   procedure Add_exb023sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb023sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb023sp_To_Orderings;


   procedure Add_exb031hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb031hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb031hd_To_Orderings;


   procedure Add_exb032hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb032hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb032hd_To_Orderings;


   procedure Add_exb033hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb033hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb033hd_To_Orderings;


   procedure Add_exb031sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb031sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb031sp_To_Orderings;


   procedure Add_exb032sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb032sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb032sp_To_Orderings;


   procedure Add_exb033sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb033sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb033sp_To_Orderings;


   procedure Add_exb041hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb041hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb041hd_To_Orderings;


   procedure Add_exb042hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb042hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb042hd_To_Orderings;


   procedure Add_exb043hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb043hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb043hd_To_Orderings;


   procedure Add_exb041sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb041sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb041sp_To_Orderings;


   procedure Add_exb042sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb042sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb042sp_To_Orderings;


   procedure Add_exb043sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb043sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb043sp_To_Orderings;


   procedure Add_exb051hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb051hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb051hd_To_Orderings;


   procedure Add_exb052hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb052hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb052hd_To_Orderings;


   procedure Add_exb053hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb053hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb053hd_To_Orderings;


   procedure Add_exb051sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb051sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb051sp_To_Orderings;


   procedure Add_exb052sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb052sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb052sp_To_Orderings;


   procedure Add_exb053sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb053sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb053sp_To_Orderings;


   procedure Add_exb061hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb061hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb061hd_To_Orderings;


   procedure Add_exb062hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb062hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb062hd_To_Orderings;


   procedure Add_exb063hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb063hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb063hd_To_Orderings;


   procedure Add_exb061sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb061sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb061sp_To_Orderings;


   procedure Add_exb062sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb062sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb062sp_To_Orderings;


   procedure Add_exb063sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb063sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb063sp_To_Orderings;


   procedure Add_exb071hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb071hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb071hd_To_Orderings;


   procedure Add_exb072hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb072hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb072hd_To_Orderings;


   procedure Add_exb073hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb073hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb073hd_To_Orderings;


   procedure Add_exb071sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb071sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb071sp_To_Orderings;


   procedure Add_exb072sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb072sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb072sp_To_Orderings;


   procedure Add_exb073sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb073sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb073sp_To_Orderings;


   procedure Add_exb081hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb081hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb081hd_To_Orderings;


   procedure Add_exb082hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb082hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb082hd_To_Orderings;


   procedure Add_exb083hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb083hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb083hd_To_Orderings;


   procedure Add_exb081sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb081sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb081sp_To_Orderings;


   procedure Add_exb082sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb082sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb082sp_To_Orderings;


   procedure Add_exb083sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb083sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb083sp_To_Orderings;


   procedure Add_exb091hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb091hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb091hd_To_Orderings;


   procedure Add_exb092hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb092hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb092hd_To_Orderings;


   procedure Add_exb093hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb093hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb093hd_To_Orderings;


   procedure Add_exb091sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb091sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb091sp_To_Orderings;


   procedure Add_exb092sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb092sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb092sp_To_Orderings;


   procedure Add_exb093sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb093sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb093sp_To_Orderings;


   procedure Add_exb101hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb101hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb101hd_To_Orderings;


   procedure Add_exb102hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb102hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb102hd_To_Orderings;


   procedure Add_exb103hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb103hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb103hd_To_Orderings;


   procedure Add_exb101sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb101sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb101sp_To_Orderings;


   procedure Add_exb102sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb102sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb102sp_To_Orderings;


   procedure Add_exb103sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb103sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb103sp_To_Orderings;


   procedure Add_exb111hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb111hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb111hd_To_Orderings;


   procedure Add_exb112hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb112hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb112hd_To_Orderings;


   procedure Add_exb113hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb113hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb113hd_To_Orderings;


   procedure Add_exb111sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb111sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb111sp_To_Orderings;


   procedure Add_exb112sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb112sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb112sp_To_Orderings;


   procedure Add_exb113sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb113sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb113sp_To_Orderings;


   procedure Add_exb121hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb121hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb121hd_To_Orderings;


   procedure Add_exb122hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb122hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb122hd_To_Orderings;


   procedure Add_exb123hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb123hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb123hd_To_Orderings;


   procedure Add_exb121sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb121sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb121sp_To_Orderings;


   procedure Add_exb122sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb122sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb122sp_To_Orderings;


   procedure Add_exb123sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exb123sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exb123sp_To_Orderings;


   procedure Add_ftpt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftpt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt1hd_To_Orderings;


   procedure Add_ftpt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftpt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt2hd_To_Orderings;


   procedure Add_ftpt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftpt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt3hd_To_Orderings;


   procedure Add_ftpt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftpt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt1sp_To_Orderings;


   procedure Add_ftpt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftpt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt2sp_To_Orderings;


   procedure Add_ftpt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ftpt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ftpt3sp_To_Orderings;


   procedure Add_fulam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam1hd_To_Orderings;


   procedure Add_fulam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam2hd_To_Orderings;


   procedure Add_fulam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam3hd_To_Orderings;


   procedure Add_fulam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam1sp_To_Orderings;


   procedure Add_fulam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam2sp_To_Orderings;


   procedure Add_fulam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulam3sp_To_Orderings;


   procedure Add_fulbn1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulbn1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn1hd_To_Orderings;


   procedure Add_fulbn2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulbn2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn2hd_To_Orderings;


   procedure Add_fulbn3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulbn3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn3hd_To_Orderings;


   procedure Add_fulbn1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulbn1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn1sp_To_Orderings;


   procedure Add_fulbn2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulbn2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn2sp_To_Orderings;


   procedure Add_fulbn3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulbn3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulbn3sp_To_Orderings;


   procedure Add_fulpd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulpd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd1hd_To_Orderings;


   procedure Add_fulpd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulpd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd2hd_To_Orderings;


   procedure Add_fulpd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulpd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd3hd_To_Orderings;


   procedure Add_fulpd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulpd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd1sp_To_Orderings;


   procedure Add_fulpd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulpd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd2sp_To_Orderings;


   procedure Add_fulpd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulpd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulpd3sp_To_Orderings;


   procedure Add_fulty1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulty1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty1hd_To_Orderings;


   procedure Add_fulty2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulty2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty2hd_To_Orderings;


   procedure Add_fulty3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulty3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty3hd_To_Orderings;


   procedure Add_fulty1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulty1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty1sp_To_Orderings;


   procedure Add_fulty2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulty2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty2sp_To_Orderings;


   procedure Add_fulty3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fulty3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fulty3sp_To_Orderings;


   procedure Add_fluam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fluam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam1hd_To_Orderings;


   procedure Add_fluam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fluam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam2hd_To_Orderings;


   procedure Add_fluam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fluam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam3hd_To_Orderings;


   procedure Add_fluam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fluam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam1sp_To_Orderings;


   procedure Add_fluam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fluam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam2sp_To_Orderings;


   procedure Add_fluam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fluam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fluam3sp_To_Orderings;


   procedure Add_flupd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flupd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd1hd_To_Orderings;


   procedure Add_flupd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flupd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd2hd_To_Orderings;


   procedure Add_flupd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flupd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd3hd_To_Orderings;


   procedure Add_flupd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flupd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd1sp_To_Orderings;


   procedure Add_flupd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flupd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd2sp_To_Orderings;


   procedure Add_flupd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flupd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flupd3sp_To_Orderings;


   procedure Add_flusu1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flusu1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu1hd_To_Orderings;


   procedure Add_flusu2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flusu2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu2hd_To_Orderings;


   procedure Add_flusu3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flusu3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu3hd_To_Orderings;


   procedure Add_flusu1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flusu1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu1sp_To_Orderings;


   procedure Add_flusu2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flusu2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu2sp_To_Orderings;


   procedure Add_flusu3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "flusu3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_flusu3sp_To_Orderings;


   procedure Add_grwag1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwag1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag1hd_To_Orderings;


   procedure Add_grwag2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwag2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag2hd_To_Orderings;


   procedure Add_grwag3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwag3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag3hd_To_Orderings;


   procedure Add_grwag1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwag1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag1sp_To_Orderings;


   procedure Add_grwag2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwag2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag2sp_To_Orderings;


   procedure Add_grwag3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwag3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwag3sp_To_Orderings;


   procedure Add_grwap1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwap1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap1hd_To_Orderings;


   procedure Add_grwap2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwap2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap2hd_To_Orderings;


   procedure Add_grwap3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwap3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap3hd_To_Orderings;


   procedure Add_grwap1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwap1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap1sp_To_Orderings;


   procedure Add_grwap2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwap2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap2sp_To_Orderings;


   procedure Add_grwap3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grwap3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grwap3sp_To_Orderings;


   procedure Add_hha11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha11hd_To_Orderings;


   procedure Add_hha12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha12hd_To_Orderings;


   procedure Add_hha13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha13hd_To_Orderings;


   procedure Add_hha11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha11sp_To_Orderings;


   procedure Add_hha12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha12sp_To_Orderings;


   procedure Add_hha13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha13sp_To_Orderings;


   procedure Add_hha21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha21hd_To_Orderings;


   procedure Add_hha22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha22hd_To_Orderings;


   procedure Add_hha23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha23hd_To_Orderings;


   procedure Add_hha21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha21sp_To_Orderings;


   procedure Add_hha22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha22sp_To_Orderings;


   procedure Add_hha23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha23sp_To_Orderings;


   procedure Add_hha31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha31hd_To_Orderings;


   procedure Add_hha32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha32hd_To_Orderings;


   procedure Add_hha33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha33hd_To_Orderings;


   procedure Add_hha31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha31sp_To_Orderings;


   procedure Add_hha32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha32sp_To_Orderings;


   procedure Add_hha33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hha33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hha33sp_To_Orderings;


   procedure Add_hour1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hour1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour1hd_To_Orderings;


   procedure Add_hour2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hour2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour2hd_To_Orderings;


   procedure Add_hour3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hour3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour3hd_To_Orderings;


   procedure Add_hour1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hour1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour1sp_To_Orderings;


   procedure Add_hour2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hour2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour2sp_To_Orderings;


   procedure Add_hour3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hour3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hour3sp_To_Orderings;


   procedure Add_hrrte1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrrte1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte1hd_To_Orderings;


   procedure Add_hrrte2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrrte2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte2hd_To_Orderings;


   procedure Add_hrrte3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrrte3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte3hd_To_Orderings;


   procedure Add_hrrte1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrrte1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte1sp_To_Orderings;


   procedure Add_hrrte2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrrte2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte2sp_To_Orderings;


   procedure Add_hrrte3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hrrte3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hrrte3sp_To_Orderings;


   procedure Add_ipay11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay11hd_To_Orderings;


   procedure Add_ipay12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay12hd_To_Orderings;


   procedure Add_ipay13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay13hd_To_Orderings;


   procedure Add_ipay11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay11sp_To_Orderings;


   procedure Add_ipay12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay12sp_To_Orderings;


   procedure Add_ipay13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay13sp_To_Orderings;


   procedure Add_ipay21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay21hd_To_Orderings;


   procedure Add_ipay22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay22hd_To_Orderings;


   procedure Add_ipay23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay23hd_To_Orderings;


   procedure Add_ipay21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay21sp_To_Orderings;


   procedure Add_ipay22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay22sp_To_Orderings;


   procedure Add_ipay23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay23sp_To_Orderings;


   procedure Add_ipay31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay31hd_To_Orderings;


   procedure Add_ipay32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay32hd_To_Orderings;


   procedure Add_ipay33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay33hd_To_Orderings;


   procedure Add_ipay31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay31sp_To_Orderings;


   procedure Add_ipay32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay32sp_To_Orderings;


   procedure Add_ipay33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay33sp_To_Orderings;


   procedure Add_ipay41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay41hd_To_Orderings;


   procedure Add_ipay42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay42hd_To_Orderings;


   procedure Add_ipay43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay43hd_To_Orderings;


   procedure Add_ipay41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay41sp_To_Orderings;


   procedure Add_ipay42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay42sp_To_Orderings;


   procedure Add_ipay43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay43sp_To_Orderings;


   procedure Add_ipay51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay51hd_To_Orderings;


   procedure Add_ipay52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay52hd_To_Orderings;


   procedure Add_ipay53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay53hd_To_Orderings;


   procedure Add_ipay51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay51sp_To_Orderings;


   procedure Add_ipay52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay52sp_To_Orderings;


   procedure Add_ipay53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay53sp_To_Orderings;


   procedure Add_ipay61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay61hd_To_Orderings;


   procedure Add_ipay62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay62hd_To_Orderings;


   procedure Add_ipay63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay63hd_To_Orderings;


   procedure Add_ipay61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay61sp_To_Orderings;


   procedure Add_ipay62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay62sp_To_Orderings;


   procedure Add_ipay63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay63sp_To_Orderings;


   procedure Add_ipay71hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay71hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay71hd_To_Orderings;


   procedure Add_ipay72hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay72hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay72hd_To_Orderings;


   procedure Add_ipay73hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay73hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay73hd_To_Orderings;


   procedure Add_ipay71sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay71sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay71sp_To_Orderings;


   procedure Add_ipay72sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay72sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay72sp_To_Orderings;


   procedure Add_ipay73sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ipay73sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ipay73sp_To_Orderings;


   procedure Add_jbchg1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbchg1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg1hd_To_Orderings;


   procedure Add_jbchg2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbchg2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg2hd_To_Orderings;


   procedure Add_jbchg3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbchg3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg3hd_To_Orderings;


   procedure Add_jbchg1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbchg1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg1sp_To_Orderings;


   procedure Add_jbchg2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbchg2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg2sp_To_Orderings;


   procedure Add_jbchg3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbchg3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbchg3sp_To_Orderings;


   procedure Add_jobus1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobus1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus1hd_To_Orderings;


   procedure Add_jobus2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobus2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus2hd_To_Orderings;


   procedure Add_jobus3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobus3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus3hd_To_Orderings;


   procedure Add_jobus1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobus1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus1sp_To_Orderings;


   procedure Add_jobus2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobus2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus2sp_To_Orderings;


   procedure Add_jobus3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobus3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobus3sp_To_Orderings;


   procedure Add_jbhrs1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbhrs1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs1hd_To_Orderings;


   procedure Add_jbhrs2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbhrs2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs2hd_To_Orderings;


   procedure Add_jbhrs3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbhrs3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs3hd_To_Orderings;


   procedure Add_jbhrs1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbhrs1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs1sp_To_Orderings;


   procedure Add_jbhrs2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbhrs2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs2sp_To_Orderings;


   procedure Add_jbhrs3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jbhrs3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jbhrs3sp_To_Orderings;


   procedure Add_lt301hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lt301hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt301hd_To_Orderings;


   procedure Add_lt302hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lt302hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt302hd_To_Orderings;


   procedure Add_lt303hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lt303hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt303hd_To_Orderings;


   procedure Add_lt301sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lt301sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt301sp_To_Orderings;


   procedure Add_lt302sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lt302sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt302sp_To_Orderings;


   procedure Add_lt303sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lt303sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lt303sp_To_Orderings;


   procedure Add_madem1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "madem1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem1hd_To_Orderings;


   procedure Add_madem2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "madem2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem2hd_To_Orderings;


   procedure Add_madem3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "madem3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem3hd_To_Orderings;


   procedure Add_madem1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "madem1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem1sp_To_Orderings;


   procedure Add_madem2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "madem2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem2sp_To_Orderings;


   procedure Add_madem3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "madem3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_madem3sp_To_Orderings;


   procedure Add_mile1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mile1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile1hd_To_Orderings;


   procedure Add_mile2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mile2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile2hd_To_Orderings;


   procedure Add_mile3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mile3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile3hd_To_Orderings;


   procedure Add_mile1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mile1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile1sp_To_Orderings;


   procedure Add_mile2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mile2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile2sp_To_Orderings;


   procedure Add_mile3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mile3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mile3sp_To_Orderings;


   procedure Add_moref1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "moref1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref1hd_To_Orderings;


   procedure Add_moref2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "moref2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref2hd_To_Orderings;


   procedure Add_moref3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "moref3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref3hd_To_Orderings;


   procedure Add_moref1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "moref1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref1sp_To_Orderings;


   procedure Add_moref2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "moref2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref2sp_To_Orderings;


   procedure Add_moref3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "moref3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_moref3sp_To_Orderings;


   procedure Add_nic1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nic1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic1hd_To_Orderings;


   procedure Add_nic2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nic2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic2hd_To_Orderings;


   procedure Add_nic3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nic3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic3hd_To_Orderings;


   procedure Add_nic1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nic1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic1sp_To_Orderings;


   procedure Add_nic2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nic2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic2sp_To_Orderings;


   procedure Add_nic3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nic3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nic3sp_To_Orderings;


   procedure Add_nidam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam1hd_To_Orderings;


   procedure Add_nidam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam2hd_To_Orderings;


   procedure Add_nidam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam3hd_To_Orderings;


   procedure Add_nidam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam1sp_To_Orderings;


   procedure Add_nidam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam2sp_To_Orderings;


   procedure Add_nidam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidam3sp_To_Orderings;


   procedure Add_nipd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nipd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd1hd_To_Orderings;


   procedure Add_nipd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nipd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd2hd_To_Orderings;


   procedure Add_nipd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nipd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd3hd_To_Orderings;


   procedure Add_nipd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nipd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd1sp_To_Orderings;


   procedure Add_nipd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nipd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd2sp_To_Orderings;


   procedure Add_nipd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nipd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nipd3sp_To_Orderings;


   procedure Add_noemp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "noemp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp1hd_To_Orderings;


   procedure Add_noemp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "noemp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp2hd_To_Orderings;


   procedure Add_noemp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "noemp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp3hd_To_Orderings;


   procedure Add_noemp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "noemp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp1sp_To_Orderings;


   procedure Add_noemp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "noemp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp2sp_To_Orderings;


   procedure Add_noemp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "noemp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_noemp3sp_To_Orderings;


   procedure Add_oremp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oremp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp1hd_To_Orderings;


   procedure Add_oremp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oremp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp2hd_To_Orderings;


   procedure Add_oremp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oremp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp3hd_To_Orderings;


   procedure Add_oremp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oremp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp1sp_To_Orderings;


   procedure Add_oremp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oremp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp2sp_To_Orderings;


   procedure Add_oremp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oremp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oremp3sp_To_Orderings;


   procedure Add_othd11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd11hd_To_Orderings;


   procedure Add_othd12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd12hd_To_Orderings;


   procedure Add_othd13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd13hd_To_Orderings;


   procedure Add_othd11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd11sp_To_Orderings;


   procedure Add_othd12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd12sp_To_Orderings;


   procedure Add_othd13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd13sp_To_Orderings;


   procedure Add_othd21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd21hd_To_Orderings;


   procedure Add_othd22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd22hd_To_Orderings;


   procedure Add_othd23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd23hd_To_Orderings;


   procedure Add_othd21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd21sp_To_Orderings;


   procedure Add_othd22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd22sp_To_Orderings;


   procedure Add_othd23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd23sp_To_Orderings;


   procedure Add_othd31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd31hd_To_Orderings;


   procedure Add_othd32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd32hd_To_Orderings;


   procedure Add_othd33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd33hd_To_Orderings;


   procedure Add_othd31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd31sp_To_Orderings;


   procedure Add_othd32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd32sp_To_Orderings;


   procedure Add_othd33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd33sp_To_Orderings;


   procedure Add_othd41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd41hd_To_Orderings;


   procedure Add_othd42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd42hd_To_Orderings;


   procedure Add_othd43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd43hd_To_Orderings;


   procedure Add_othd41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd41sp_To_Orderings;


   procedure Add_othd42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd42sp_To_Orderings;


   procedure Add_othd43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd43sp_To_Orderings;


   procedure Add_othd51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd51hd_To_Orderings;


   procedure Add_othd52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd52hd_To_Orderings;


   procedure Add_othd53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd53hd_To_Orderings;


   procedure Add_othd51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd51sp_To_Orderings;


   procedure Add_othd52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd52sp_To_Orderings;


   procedure Add_othd53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd53sp_To_Orderings;


   procedure Add_othd61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd61hd_To_Orderings;


   procedure Add_othd62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd62hd_To_Orderings;


   procedure Add_othd63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd63hd_To_Orderings;


   procedure Add_othd61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd61sp_To_Orderings;


   procedure Add_othd62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd62sp_To_Orderings;


   procedure Add_othd63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd63sp_To_Orderings;


   procedure Add_othd71hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd71hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd71hd_To_Orderings;


   procedure Add_othd72hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd72hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd72hd_To_Orderings;


   procedure Add_othd73hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd73hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd73hd_To_Orderings;


   procedure Add_othd71sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd71sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd71sp_To_Orderings;


   procedure Add_othd72sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd72sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd72sp_To_Orderings;


   procedure Add_othd73sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd73sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd73sp_To_Orderings;


   procedure Add_othd81hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd81hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd81hd_To_Orderings;


   procedure Add_othd82hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd82hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd82hd_To_Orderings;


   procedure Add_othd83hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd83hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd83hd_To_Orderings;


   procedure Add_othd81sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd81sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd81sp_To_Orderings;


   procedure Add_othd82sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd82sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd82sp_To_Orderings;


   procedure Add_othd83sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd83sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd83sp_To_Orderings;


   procedure Add_othd91hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd91hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd91hd_To_Orderings;


   procedure Add_othd92hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd92hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd92hd_To_Orderings;


   procedure Add_othd93hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd93hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd93hd_To_Orderings;


   procedure Add_othd91sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd91sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd91sp_To_Orderings;


   procedure Add_othd92sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd92sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd92sp_To_Orderings;


   procedure Add_othd93sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othd93sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othd93sp_To_Orderings;


   procedure Add_otd101hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otd101hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd101hd_To_Orderings;


   procedure Add_otd102hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otd102hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd102hd_To_Orderings;


   procedure Add_otd103hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otd103hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd103hd_To_Orderings;


   procedure Add_otd101sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otd101sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd101sp_To_Orderings;


   procedure Add_otd102sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otd102sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd102sp_To_Orderings;


   procedure Add_otd103sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "otd103sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_otd103sp_To_Orderings;


   procedure Add_ownam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam1hd_To_Orderings;


   procedure Add_ownam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam2hd_To_Orderings;


   procedure Add_ownam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam3hd_To_Orderings;


   procedure Add_ownam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam1sp_To_Orderings;


   procedure Add_ownam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam2sp_To_Orderings;


   procedure Add_ownam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownam3sp_To_Orderings;


   procedure Add_ownoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa1hd_To_Orderings;


   procedure Add_ownoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa2hd_To_Orderings;


   procedure Add_ownoa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownoa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa3hd_To_Orderings;


   procedure Add_ownoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa1sp_To_Orderings;


   procedure Add_ownoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa2sp_To_Orderings;


   procedure Add_ownoa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownoa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownoa3sp_To_Orderings;


   procedure Add_ownot1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownot1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot1hd_To_Orderings;


   procedure Add_ownot2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownot2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot2hd_To_Orderings;


   procedure Add_ownot3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownot3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot3hd_To_Orderings;


   procedure Add_ownot1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownot1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot1sp_To_Orderings;


   procedure Add_ownot2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownot2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot2sp_To_Orderings;


   procedure Add_ownot3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownot3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownot3sp_To_Orderings;


   procedure Add_ownsm1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownsm1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm1hd_To_Orderings;


   procedure Add_ownsm2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownsm2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm2hd_To_Orderings;


   procedure Add_ownsm3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownsm3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm3hd_To_Orderings;


   procedure Add_ownsm1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownsm1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm1sp_To_Orderings;


   procedure Add_ownsm2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownsm2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm2sp_To_Orderings;


   procedure Add_ownsm3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ownsm3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ownsm3sp_To_Orderings;


   procedure Add_pappd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pappd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd1hd_To_Orderings;


   procedure Add_pappd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pappd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd2hd_To_Orderings;


   procedure Add_pappd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pappd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd3hd_To_Orderings;


   procedure Add_pappd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pappd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd1sp_To_Orderings;


   procedure Add_pappd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pappd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd2sp_To_Orderings;


   procedure Add_pappd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pappd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pappd3sp_To_Orderings;


   procedure Add_payam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam1hd_To_Orderings;


   procedure Add_payam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam2hd_To_Orderings;


   procedure Add_payam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam3hd_To_Orderings;


   procedure Add_payam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam1sp_To_Orderings;


   procedure Add_payam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam2sp_To_Orderings;


   procedure Add_payam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payam3sp_To_Orderings;


   procedure Add_pdate1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdate1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate1hd_To_Orderings;


   procedure Add_pdate2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdate2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate2hd_To_Orderings;


   procedure Add_pdate3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdate3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate3hd_To_Orderings;


   procedure Add_pdate1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdate1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate1sp_To_Orderings;


   procedure Add_pdate2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdate2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate2sp_To_Orderings;


   procedure Add_pdate3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pdate3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pdate3sp_To_Orderings;


   procedure Add_paye1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paye1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye1hd_To_Orderings;


   procedure Add_paye2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paye2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye2hd_To_Orderings;


   procedure Add_paye3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paye3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye3hd_To_Orderings;


   procedure Add_paye1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paye1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye1sp_To_Orderings;


   procedure Add_paye2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paye2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye2sp_To_Orderings;


   procedure Add_paye3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paye3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paye3sp_To_Orderings;


   procedure Add_paype1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paype1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype1hd_To_Orderings;


   procedure Add_paype2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paype2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype2hd_To_Orderings;


   procedure Add_paype3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paype3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype3hd_To_Orderings;


   procedure Add_paype1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paype1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype1sp_To_Orderings;


   procedure Add_paype2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paype2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype2sp_To_Orderings;


   procedure Add_paype3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paype3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paype3sp_To_Orderings;


   procedure Add_paysl1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paysl1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl1hd_To_Orderings;


   procedure Add_paysl2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paysl2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl2hd_To_Orderings;


   procedure Add_paysl3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paysl3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl3hd_To_Orderings;


   procedure Add_paysl1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paysl1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl1sp_To_Orderings;


   procedure Add_paysl2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paysl2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl2sp_To_Orderings;


   procedure Add_paysl3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "paysl3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_paysl3sp_To_Orderings;


   procedure Add_payus1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payus1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus1hd_To_Orderings;


   procedure Add_payus2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payus2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus2hd_To_Orderings;


   procedure Add_payus3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payus3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus3hd_To_Orderings;


   procedure Add_payus1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payus1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus1sp_To_Orderings;


   procedure Add_payus2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payus2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus2sp_To_Orderings;


   procedure Add_payus3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payus3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payus3sp_To_Orderings;


   procedure Add_pothr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr1hd_To_Orderings;


   procedure Add_pothr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr2hd_To_Orderings;


   procedure Add_pothr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr3hd_To_Orderings;


   procedure Add_pothr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr1sp_To_Orderings;


   procedure Add_pothr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr2sp_To_Orderings;


   procedure Add_pothr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pothr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pothr3sp_To_Orderings;


   procedure Add_ppppd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppppd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd1hd_To_Orderings;


   procedure Add_ppppd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppppd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd2hd_To_Orderings;


   procedure Add_ppppd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppppd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd3hd_To_Orderings;


   procedure Add_ppppd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppppd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd1sp_To_Orderings;


   procedure Add_ppppd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppppd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd2sp_To_Orderings;


   procedure Add_ppppd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppppd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppppd3sp_To_Orderings;


   procedure Add_prbef1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prbef1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef1hd_To_Orderings;


   procedure Add_prbef2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prbef2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef2hd_To_Orderings;


   procedure Add_prbef3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prbef3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef3hd_To_Orderings;


   procedure Add_prbef1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prbef1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef1sp_To_Orderings;


   procedure Add_prbef2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prbef2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef2sp_To_Orderings;


   procedure Add_prbef3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prbef3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prbef3sp_To_Orderings;


   procedure Add_prdoc1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prdoc1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc1hd_To_Orderings;


   procedure Add_prdoc2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prdoc2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc2hd_To_Orderings;


   procedure Add_prdoc3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prdoc3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc3hd_To_Orderings;


   procedure Add_prdoc1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prdoc1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc1sp_To_Orderings;


   procedure Add_prdoc2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prdoc2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc2sp_To_Orderings;


   procedure Add_prdoc3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prdoc3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prdoc3sp_To_Orderings;


   procedure Add_sepro1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sepro1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro1hd_To_Orderings;


   procedure Add_sepro2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sepro2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro2hd_To_Orderings;


   procedure Add_sepro3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sepro3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro3hd_To_Orderings;


   procedure Add_sepro1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sepro1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro1sp_To_Orderings;


   procedure Add_sepro2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sepro2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro2sp_To_Orderings;


   procedure Add_sepro3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sepro3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sepro3sp_To_Orderings;


   procedure Add_prolo1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prolo1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo1hd_To_Orderings;


   procedure Add_prolo2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prolo2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo2hd_To_Orderings;


   procedure Add_prolo3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prolo3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo3hd_To_Orderings;


   procedure Add_prolo1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prolo1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo1sp_To_Orderings;


   procedure Add_prolo2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prolo2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo2sp_To_Orderings;


   procedure Add_prolo3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prolo3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prolo3sp_To_Orderings;


   procedure Add_profn1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "profn1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn1hd_To_Orderings;


   procedure Add_profn2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "profn2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn2hd_To_Orderings;


   procedure Add_profn3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "profn3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn3hd_To_Orderings;


   procedure Add_profn1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "profn1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn1sp_To_Orderings;


   procedure Add_profn2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "profn2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn2sp_To_Orderings;


   procedure Add_profn3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "profn3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_profn3sp_To_Orderings;


   procedure Add_protx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "protx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx1hd_To_Orderings;


   procedure Add_protx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "protx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx2hd_To_Orderings;


   procedure Add_protx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "protx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx3hd_To_Orderings;


   procedure Add_protx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "protx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx1sp_To_Orderings;


   procedure Add_protx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "protx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx2sp_To_Orderings;


   procedure Add_protx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "protx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_protx3sp_To_Orderings;


   procedure Add_rspvr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rspvr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr1hd_To_Orderings;


   procedure Add_rspvr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rspvr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr2hd_To_Orderings;


   procedure Add_rspvr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rspvr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr3hd_To_Orderings;


   procedure Add_rspvr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rspvr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr1sp_To_Orderings;


   procedure Add_rspvr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rspvr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr2sp_To_Orderings;


   procedure Add_rspvr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rspvr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rspvr3sp_To_Orderings;


   procedure Add_apamt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apamt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt1hd_To_Orderings;


   procedure Add_apamt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apamt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt2hd_To_Orderings;


   procedure Add_apamt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apamt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt3hd_To_Orderings;


   procedure Add_apamt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apamt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt1sp_To_Orderings;


   procedure Add_apamt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apamt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt2sp_To_Orderings;


   procedure Add_apamt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apamt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apamt3sp_To_Orderings;


   procedure Add_sebeg1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sebeg1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg1hd_To_Orderings;


   procedure Add_sebeg2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sebeg2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg2hd_To_Orderings;


   procedure Add_sebeg3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sebeg3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg3hd_To_Orderings;


   procedure Add_sebeg1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sebeg1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg1sp_To_Orderings;


   procedure Add_sebeg2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sebeg2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg2sp_To_Orderings;


   procedure Add_sebeg3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sebeg3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sebeg3sp_To_Orderings;


   procedure Add_seend1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seend1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend1hd_To_Orderings;


   procedure Add_seend2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seend2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend2hd_To_Orderings;


   procedure Add_seend3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seend3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend3hd_To_Orderings;


   procedure Add_seend1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seend1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend1sp_To_Orderings;


   procedure Add_seend2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seend2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend2sp_To_Orderings;


   procedure Add_seend3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seend3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seend3sp_To_Orderings;


   procedure Add_sectr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr1hd_To_Orderings;


   procedure Add_sectr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr2hd_To_Orderings;


   procedure Add_sectr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr3hd_To_Orderings;


   procedure Add_sectr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr1sp_To_Orderings;


   procedure Add_sectr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr2sp_To_Orderings;


   procedure Add_sectr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectr3sp_To_Orderings;


   procedure Add_sectt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt1hd_To_Orderings;


   procedure Add_sectt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt2hd_To_Orderings;


   procedure Add_sectt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt3hd_To_Orderings;


   procedure Add_sectt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt1sp_To_Orderings;


   procedure Add_sectt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt2sp_To_Orderings;


   procedure Add_sectt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sectt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sectt3sp_To_Orderings;


   procedure Add_sefin1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sefin1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin1hd_To_Orderings;


   procedure Add_sefin2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sefin2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin2hd_To_Orderings;


   procedure Add_sefin3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sefin3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin3hd_To_Orderings;


   procedure Add_sefin1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sefin1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin1sp_To_Orderings;


   procedure Add_sefin2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sefin2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin2sp_To_Orderings;


   procedure Add_sefin3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sefin3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sefin3sp_To_Orderings;


   procedure Add_secam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam1hd_To_Orderings;


   procedure Add_secam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam2hd_To_Orderings;


   procedure Add_secam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam3hd_To_Orderings;


   procedure Add_secam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam1sp_To_Orderings;


   procedure Add_secam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam2sp_To_Orderings;


   procedure Add_secam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secam3sp_To_Orderings;


   procedure Add_seciw1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seciw1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw1hd_To_Orderings;


   procedure Add_seciw2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seciw2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw2hd_To_Orderings;


   procedure Add_seciw3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seciw3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw3hd_To_Orderings;


   procedure Add_seciw1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seciw1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw1sp_To_Orderings;


   procedure Add_seciw2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seciw2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw2sp_To_Orderings;


   procedure Add_seciw3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seciw3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seciw3sp_To_Orderings;


   procedure Add_sewks1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewks1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks1hd_To_Orderings;


   procedure Add_sewks2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewks2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks2hd_To_Orderings;


   procedure Add_sewks3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewks3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks3hd_To_Orderings;


   procedure Add_sewks1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewks1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks1sp_To_Orderings;


   procedure Add_sewks2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewks2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks2sp_To_Orderings;


   procedure Add_sewks3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewks3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewks3sp_To_Orderings;


   procedure Add_senam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam1hd_To_Orderings;


   procedure Add_senam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam2hd_To_Orderings;


   procedure Add_senam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam3hd_To_Orderings;


   procedure Add_senam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam1sp_To_Orderings;


   procedure Add_senam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam2sp_To_Orderings;


   procedure Add_senam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senam3sp_To_Orderings;


   procedure Add_seiin1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seiin1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin1hd_To_Orderings;


   procedure Add_seiin2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seiin2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin2hd_To_Orderings;


   procedure Add_seiin3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seiin3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin3hd_To_Orderings;


   procedure Add_seiin1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seiin1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin1sp_To_Orderings;


   procedure Add_seiin2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seiin2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin2sp_To_Orderings;


   procedure Add_seiin3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seiin3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seiin3sp_To_Orderings;


   procedure Add_senil1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senil1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil1hd_To_Orderings;


   procedure Add_senil2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senil2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil2hd_To_Orderings;


   procedure Add_senil3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senil3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil3hd_To_Orderings;


   procedure Add_senil1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senil1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil1sp_To_Orderings;


   procedure Add_senil2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senil2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil2sp_To_Orderings;


   procedure Add_senil3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senil3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senil3sp_To_Orderings;


   procedure Add_senir1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senir1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir1hd_To_Orderings;


   procedure Add_senir2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senir2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir2hd_To_Orderings;


   procedure Add_senir3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senir3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir3hd_To_Orderings;


   procedure Add_senir1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senir1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir1sp_To_Orderings;


   procedure Add_senir2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senir2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir2sp_To_Orderings;


   procedure Add_senir3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "senir3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_senir3sp_To_Orderings;


   procedure Add_psenr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psenr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr1hd_To_Orderings;


   procedure Add_psenr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psenr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr2hd_To_Orderings;


   procedure Add_psenr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psenr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr3hd_To_Orderings;


   procedure Add_psenr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psenr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr1sp_To_Orderings;


   procedure Add_psenr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psenr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr2sp_To_Orderings;


   procedure Add_psenr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "psenr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_psenr3sp_To_Orderings;


   procedure Add_setax1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "setax1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax1hd_To_Orderings;


   procedure Add_setax2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "setax2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax2hd_To_Orderings;


   procedure Add_setax3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "setax3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax3hd_To_Orderings;


   procedure Add_setax1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "setax1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax1sp_To_Orderings;


   procedure Add_setax2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "setax2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax2sp_To_Orderings;


   procedure Add_setax3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "setax3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_setax3sp_To_Orderings;


   procedure Add_smpam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam1hd_To_Orderings;


   procedure Add_smpam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam2hd_To_Orderings;


   procedure Add_smpam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam3hd_To_Orderings;


   procedure Add_smpam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam1sp_To_Orderings;


   procedure Add_smpam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam2sp_To_Orderings;


   procedure Add_smpam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smpam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smpam3sp_To_Orderings;


   procedure Add_smprt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smprt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt1hd_To_Orderings;


   procedure Add_smprt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smprt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt2hd_To_Orderings;


   procedure Add_smprt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smprt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt3hd_To_Orderings;


   procedure Add_smprt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smprt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt1sp_To_Orderings;


   procedure Add_smprt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smprt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt2sp_To_Orderings;


   procedure Add_smprt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "smprt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_smprt3sp_To_Orderings;


   procedure Add_sole1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sole1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole1hd_To_Orderings;


   procedure Add_sole2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sole2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole2hd_To_Orderings;


   procedure Add_sole3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sole3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole3hd_To_Orderings;


   procedure Add_sole1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sole1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole1sp_To_Orderings;


   procedure Add_sole2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sole2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole2sp_To_Orderings;


   procedure Add_sole3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sole3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sole3sp_To_Orderings;


   procedure Add_spamt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spamt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt1hd_To_Orderings;


   procedure Add_spamt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spamt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt2hd_To_Orderings;


   procedure Add_spamt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spamt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt3hd_To_Orderings;


   procedure Add_spamt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spamt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt1sp_To_Orderings;


   procedure Add_spamt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spamt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt2sp_To_Orderings;


   procedure Add_spamt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spamt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spamt3sp_To_Orderings;


   procedure Add_sppd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd1hd_To_Orderings;


   procedure Add_sppd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd2hd_To_Orderings;


   procedure Add_sppd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd3hd_To_Orderings;


   procedure Add_sppd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd1sp_To_Orderings;


   procedure Add_sppd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd2sp_To_Orderings;


   procedure Add_sppd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sppd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sppd3sp_To_Orderings;


   procedure Add_spsac1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsac1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac1hd_To_Orderings;


   procedure Add_spsac2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsac2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac2hd_To_Orderings;


   procedure Add_spsac3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsac3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac3hd_To_Orderings;


   procedure Add_spsac1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsac1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac1sp_To_Orderings;


   procedure Add_spsac2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsac2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac2sp_To_Orderings;


   procedure Add_spsac3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsac3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsac3sp_To_Orderings;


   procedure Add_spuam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spuam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam1hd_To_Orderings;


   procedure Add_spuam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spuam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam2hd_To_Orderings;


   procedure Add_spuam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spuam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam3hd_To_Orderings;


   procedure Add_spuam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spuam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam1sp_To_Orderings;


   procedure Add_spuam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spuam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam2sp_To_Orderings;


   procedure Add_spuam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spuam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spuam3sp_To_Orderings;


   procedure Add_spupd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spupd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd1hd_To_Orderings;


   procedure Add_spupd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spupd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd2hd_To_Orderings;


   procedure Add_spupd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spupd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd3hd_To_Orderings;


   procedure Add_spupd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spupd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd1sp_To_Orderings;


   procedure Add_spupd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spupd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd2sp_To_Orderings;


   procedure Add_spupd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spupd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spupd3sp_To_Orderings;


   procedure Add_spusu1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spusu1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu1hd_To_Orderings;


   procedure Add_spusu2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spusu2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu2hd_To_Orderings;


   procedure Add_spusu3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spusu3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu3hd_To_Orderings;


   procedure Add_spusu1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spusu1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu1sp_To_Orderings;


   procedure Add_spusu2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spusu2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu2sp_To_Orderings;


   procedure Add_spusu3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spusu3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spusu3sp_To_Orderings;


   procedure Add_ppamt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppamt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt1hd_To_Orderings;


   procedure Add_ppamt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppamt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt2hd_To_Orderings;


   procedure Add_ppamt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppamt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt3hd_To_Orderings;


   procedure Add_ppamt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppamt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt1sp_To_Orderings;


   procedure Add_ppamt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppamt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt2sp_To_Orderings;


   procedure Add_ppamt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppamt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppamt3sp_To_Orderings;


   procedure Add_sspam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam1hd_To_Orderings;


   procedure Add_sspam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam2hd_To_Orderings;


   procedure Add_sspam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam3hd_To_Orderings;


   procedure Add_sspam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam1sp_To_Orderings;


   procedure Add_sspam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam2sp_To_Orderings;


   procedure Add_sspam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sspam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sspam3sp_To_Orderings;


   procedure Add_spsmp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsmp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp1hd_To_Orderings;


   procedure Add_spsmp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsmp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp2hd_To_Orderings;


   procedure Add_spsmp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsmp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp3hd_To_Orderings;


   procedure Add_spsmp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsmp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp1sp_To_Orderings;


   procedure Add_spsmp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsmp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp2sp_To_Orderings;


   procedure Add_spsmp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "spsmp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_spsmp3sp_To_Orderings;


   procedure Add_taxam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam1hd_To_Orderings;


   procedure Add_taxam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam2hd_To_Orderings;


   procedure Add_taxam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam3hd_To_Orderings;


   procedure Add_taxam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam1sp_To_Orderings;


   procedure Add_taxam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam2sp_To_Orderings;


   procedure Add_taxam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxam3sp_To_Orderings;


   procedure Add_taxda1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxda1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda1hd_To_Orderings;


   procedure Add_taxda2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxda2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda2hd_To_Orderings;


   procedure Add_taxda3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxda3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda3hd_To_Orderings;


   procedure Add_taxda1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxda1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda1sp_To_Orderings;


   procedure Add_taxda2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxda2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda2sp_To_Orderings;


   procedure Add_taxda3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxda3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxda3sp_To_Orderings;


   procedure Add_taxpd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxpd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd1hd_To_Orderings;


   procedure Add_taxpd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxpd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd2hd_To_Orderings;


   procedure Add_taxpd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxpd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd3hd_To_Orderings;


   procedure Add_taxpd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxpd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd1sp_To_Orderings;


   procedure Add_taxpd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxpd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd2sp_To_Orderings;


   procedure Add_taxpd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "taxpd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_taxpd3sp_To_Orderings;


   procedure Add_to1hr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to1hr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr1hd_To_Orderings;


   procedure Add_to1hr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to1hr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr2hd_To_Orderings;


   procedure Add_to1hr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to1hr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr3hd_To_Orderings;


   procedure Add_to1hr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to1hr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr1sp_To_Orderings;


   procedure Add_to1hr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to1hr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr2sp_To_Orderings;


   procedure Add_to1hr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to1hr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to1hr3sp_To_Orderings;


   procedure Add_boinu1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boinu1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu1hd_To_Orderings;


   procedure Add_boinu2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boinu2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu2hd_To_Orderings;


   procedure Add_boinu3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boinu3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu3hd_To_Orderings;


   procedure Add_boinu1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boinu1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu1sp_To_Orderings;


   procedure Add_boinu2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boinu2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu2sp_To_Orderings;


   procedure Add_boinu3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "boinu3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_boinu3sp_To_Orderings;


   procedure Add_uincb1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uincb1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb1hd_To_Orderings;


   procedure Add_uincb2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uincb2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb2hd_To_Orderings;


   procedure Add_uincb3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uincb3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb3hd_To_Orderings;


   procedure Add_uincb1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uincb1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb1sp_To_Orderings;


   procedure Add_uincb2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uincb2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb2sp_To_Orderings;


   procedure Add_uincb3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uincb3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uincb3sp_To_Orderings;


   procedure Add_uded11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded11hd_To_Orderings;


   procedure Add_uded12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded12hd_To_Orderings;


   procedure Add_uded13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded13hd_To_Orderings;


   procedure Add_uded11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded11sp_To_Orderings;


   procedure Add_uded12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded12sp_To_Orderings;


   procedure Add_uded13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded13sp_To_Orderings;


   procedure Add_uded21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded21hd_To_Orderings;


   procedure Add_uded22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded22hd_To_Orderings;


   procedure Add_uded23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded23hd_To_Orderings;


   procedure Add_uded21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded21sp_To_Orderings;


   procedure Add_uded22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded22sp_To_Orderings;


   procedure Add_uded23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded23sp_To_Orderings;


   procedure Add_uded31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded31hd_To_Orderings;


   procedure Add_uded32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded32hd_To_Orderings;


   procedure Add_uded33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded33hd_To_Orderings;


   procedure Add_uded31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded31sp_To_Orderings;


   procedure Add_uded32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded32sp_To_Orderings;


   procedure Add_uded33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded33sp_To_Orderings;


   procedure Add_uded41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded41hd_To_Orderings;


   procedure Add_uded42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded42hd_To_Orderings;


   procedure Add_uded43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded43hd_To_Orderings;


   procedure Add_uded41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded41sp_To_Orderings;


   procedure Add_uded42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded42sp_To_Orderings;


   procedure Add_uded43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded43sp_To_Orderings;


   procedure Add_uded51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded51hd_To_Orderings;


   procedure Add_uded52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded52hd_To_Orderings;


   procedure Add_uded53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded53hd_To_Orderings;


   procedure Add_uded51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded51sp_To_Orderings;


   procedure Add_uded52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded52sp_To_Orderings;


   procedure Add_uded53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded53sp_To_Orderings;


   procedure Add_uded61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded61hd_To_Orderings;


   procedure Add_uded62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded62hd_To_Orderings;


   procedure Add_uded63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded63hd_To_Orderings;


   procedure Add_uded61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded61sp_To_Orderings;


   procedure Add_uded62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded62sp_To_Orderings;


   procedure Add_uded63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded63sp_To_Orderings;


   procedure Add_uded71hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded71hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded71hd_To_Orderings;


   procedure Add_uded72hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded72hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded72hd_To_Orderings;


   procedure Add_uded73hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded73hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded73hd_To_Orderings;


   procedure Add_uded71sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded71sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded71sp_To_Orderings;


   procedure Add_uded72sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded72sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded72sp_To_Orderings;


   procedure Add_uded73sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded73sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded73sp_To_Orderings;


   procedure Add_uded81hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded81hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded81hd_To_Orderings;


   procedure Add_uded82hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded82hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded82hd_To_Orderings;


   procedure Add_uded83hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded83hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded83hd_To_Orderings;


   procedure Add_uded81sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded81sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded81sp_To_Orderings;


   procedure Add_uded82sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded82sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded82sp_To_Orderings;


   procedure Add_uded83sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded83sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded83sp_To_Orderings;


   procedure Add_uded91hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded91hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded91hd_To_Orderings;


   procedure Add_uded92hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded92hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded92hd_To_Orderings;


   procedure Add_uded93hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded93hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded93hd_To_Orderings;


   procedure Add_uded91sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded91sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded91sp_To_Orderings;


   procedure Add_uded92sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded92sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded92sp_To_Orderings;


   procedure Add_uded93sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uded93sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uded93sp_To_Orderings;


   procedure Add_ugros1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugros1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros1hd_To_Orderings;


   procedure Add_ugros2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugros2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros2hd_To_Orderings;


   procedure Add_ugros3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugros3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros3hd_To_Orderings;


   procedure Add_ugros1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugros1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros1sp_To_Orderings;


   procedure Add_ugros2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugros2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros2sp_To_Orderings;


   procedure Add_ugros3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugros3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugros3sp_To_Orderings;


   procedure Add_ugrsp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugrsp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp1hd_To_Orderings;


   procedure Add_ugrsp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugrsp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp2hd_To_Orderings;


   procedure Add_ugrsp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugrsp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp3hd_To_Orderings;


   procedure Add_ugrsp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugrsp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp1sp_To_Orderings;


   procedure Add_ugrsp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugrsp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp2sp_To_Orderings;


   procedure Add_ugrsp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ugrsp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ugrsp3sp_To_Orderings;


   procedure Add_uinc11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc11hd_To_Orderings;


   procedure Add_uinc12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc12hd_To_Orderings;


   procedure Add_uinc13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc13hd_To_Orderings;


   procedure Add_uinc11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc11sp_To_Orderings;


   procedure Add_uinc12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc12sp_To_Orderings;


   procedure Add_uinc13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc13sp_To_Orderings;


   procedure Add_uinc21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc21hd_To_Orderings;


   procedure Add_uinc22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc22hd_To_Orderings;


   procedure Add_uinc23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc23hd_To_Orderings;


   procedure Add_uinc21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc21sp_To_Orderings;


   procedure Add_uinc22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc22sp_To_Orderings;


   procedure Add_uinc23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc23sp_To_Orderings;


   procedure Add_uinc31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc31hd_To_Orderings;


   procedure Add_uinc32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc32hd_To_Orderings;


   procedure Add_uinc33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc33hd_To_Orderings;


   procedure Add_uinc31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc31sp_To_Orderings;


   procedure Add_uinc32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc32sp_To_Orderings;


   procedure Add_uinc33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc33sp_To_Orderings;


   procedure Add_uinc41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc41hd_To_Orderings;


   procedure Add_uinc42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc42hd_To_Orderings;


   procedure Add_uinc43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc43hd_To_Orderings;


   procedure Add_uinc41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc41sp_To_Orderings;


   procedure Add_uinc42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc42sp_To_Orderings;


   procedure Add_uinc43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc43sp_To_Orderings;


   procedure Add_uinc51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc51hd_To_Orderings;


   procedure Add_uinc52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc52hd_To_Orderings;


   procedure Add_uinc53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc53hd_To_Orderings;


   procedure Add_uinc51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc51sp_To_Orderings;


   procedure Add_uinc52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc52sp_To_Orderings;


   procedure Add_uinc53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc53sp_To_Orderings;


   procedure Add_uinc61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc61hd_To_Orderings;


   procedure Add_uinc62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc62hd_To_Orderings;


   procedure Add_uinc63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc63hd_To_Orderings;


   procedure Add_uinc61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc61sp_To_Orderings;


   procedure Add_uinc62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc62sp_To_Orderings;


   procedure Add_uinc63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc63sp_To_Orderings;


   procedure Add_uinc71hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc71hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc71hd_To_Orderings;


   procedure Add_uinc72hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc72hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc72hd_To_Orderings;


   procedure Add_uinc73hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc73hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc73hd_To_Orderings;


   procedure Add_uinc71sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc71sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc71sp_To_Orderings;


   procedure Add_uinc72sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc72sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc72sp_To_Orderings;


   procedure Add_uinc73sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uinc73sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uinc73sp_To_Orderings;


   procedure Add_umile1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umile1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile1hd_To_Orderings;


   procedure Add_umile2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umile2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile2hd_To_Orderings;


   procedure Add_umile3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umile3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile3hd_To_Orderings;


   procedure Add_umile1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umile1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile1sp_To_Orderings;


   procedure Add_umile2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umile2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile2sp_To_Orderings;


   procedure Add_umile3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umile3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umile3sp_To_Orderings;


   procedure Add_umot1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umot1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot1hd_To_Orderings;


   procedure Add_umot2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umot2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot2hd_To_Orderings;


   procedure Add_umot3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umot3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot3hd_To_Orderings;


   procedure Add_umot1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umot1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot1sp_To_Orderings;


   procedure Add_umot2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umot2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot2sp_To_Orderings;


   procedure Add_umot3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "umot3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_umot3sp_To_Orderings;


   procedure Add_unett1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unett1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett1hd_To_Orderings;


   procedure Add_unett2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unett2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett2hd_To_Orderings;


   procedure Add_unett3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unett3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett3hd_To_Orderings;


   procedure Add_unett1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unett1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett1sp_To_Orderings;


   procedure Add_unett2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unett2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett2sp_To_Orderings;


   procedure Add_unett3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "unett3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_unett3sp_To_Orderings;


   procedure Add_uoth11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth11hd_To_Orderings;


   procedure Add_uoth12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth12hd_To_Orderings;


   procedure Add_uoth13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth13hd_To_Orderings;


   procedure Add_uoth11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth11sp_To_Orderings;


   procedure Add_uoth12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth12sp_To_Orderings;


   procedure Add_uoth13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth13sp_To_Orderings;


   procedure Add_uoth21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth21hd_To_Orderings;


   procedure Add_uoth22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth22hd_To_Orderings;


   procedure Add_uoth23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth23hd_To_Orderings;


   procedure Add_uoth21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth21sp_To_Orderings;


   procedure Add_uoth22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth22sp_To_Orderings;


   procedure Add_uoth23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth23sp_To_Orderings;


   procedure Add_uoth31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth31hd_To_Orderings;


   procedure Add_uoth32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth32hd_To_Orderings;


   procedure Add_uoth33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth33hd_To_Orderings;


   procedure Add_uoth31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth31sp_To_Orderings;


   procedure Add_uoth32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth32sp_To_Orderings;


   procedure Add_uoth33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth33sp_To_Orderings;


   procedure Add_uoth41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth41hd_To_Orderings;


   procedure Add_uoth42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth42hd_To_Orderings;


   procedure Add_uoth43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth43hd_To_Orderings;


   procedure Add_uoth41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth41sp_To_Orderings;


   procedure Add_uoth42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth42sp_To_Orderings;


   procedure Add_uoth43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth43sp_To_Orderings;


   procedure Add_uoth51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth51hd_To_Orderings;


   procedure Add_uoth52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth52hd_To_Orderings;


   procedure Add_uoth53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth53hd_To_Orderings;


   procedure Add_uoth51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth51sp_To_Orderings;


   procedure Add_uoth52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth52sp_To_Orderings;


   procedure Add_uoth53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth53sp_To_Orderings;


   procedure Add_uoth61hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth61hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth61hd_To_Orderings;


   procedure Add_uoth62hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth62hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth62hd_To_Orderings;


   procedure Add_uoth63hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth63hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth63hd_To_Orderings;


   procedure Add_uoth61sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth61sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth61sp_To_Orderings;


   procedure Add_uoth62sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth62sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth62sp_To_Orderings;


   procedure Add_uoth63sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth63sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth63sp_To_Orderings;


   procedure Add_uoth71hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth71hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth71hd_To_Orderings;


   procedure Add_uoth72hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth72hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth72hd_To_Orderings;


   procedure Add_uoth73hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth73hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth73hd_To_Orderings;


   procedure Add_uoth71sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth71sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth71sp_To_Orderings;


   procedure Add_uoth72sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth72sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth72sp_To_Orderings;


   procedure Add_uoth73sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth73sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth73sp_To_Orderings;


   procedure Add_uoth81hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth81hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth81hd_To_Orderings;


   procedure Add_uoth82hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth82hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth82hd_To_Orderings;


   procedure Add_uoth83hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth83hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth83hd_To_Orderings;


   procedure Add_uoth81sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth81sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth81sp_To_Orderings;


   procedure Add_uoth82sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth82sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth82sp_To_Orderings;


   procedure Add_uoth83sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth83sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth83sp_To_Orderings;


   procedure Add_uoth91hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth91hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth91hd_To_Orderings;


   procedure Add_uoth92hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth92hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth92hd_To_Orderings;


   procedure Add_uoth93hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth93hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth93hd_To_Orderings;


   procedure Add_uoth91sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth91sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth91sp_To_Orderings;


   procedure Add_uoth92sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth92sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth92sp_To_Orderings;


   procedure Add_uoth93sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uoth93sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uoth93sp_To_Orderings;


   procedure Add_uot101hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uot101hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot101hd_To_Orderings;


   procedure Add_uot102hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uot102hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot102hd_To_Orderings;


   procedure Add_uot103hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uot103hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot103hd_To_Orderings;


   procedure Add_uot101sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uot101sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot101sp_To_Orderings;


   procedure Add_uot102sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uot102sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot102sp_To_Orderings;


   procedure Add_uot103sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uot103sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uot103sp_To_Orderings;


   procedure Add_uotht1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uotht1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht1hd_To_Orderings;


   procedure Add_uotht2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uotht2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht2hd_To_Orderings;


   procedure Add_uotht3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uotht3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht3hd_To_Orderings;


   procedure Add_uotht1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uotht1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht1sp_To_Orderings;


   procedure Add_uotht2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uotht2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht2sp_To_Orderings;


   procedure Add_uotht3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uotht3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uotht3sp_To_Orderings;


   procedure Add_uothr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uothr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr1hd_To_Orderings;


   procedure Add_uothr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uothr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr2hd_To_Orderings;


   procedure Add_uothr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uothr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr3hd_To_Orderings;


   procedure Add_uothr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uothr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr1sp_To_Orderings;


   procedure Add_uothr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uothr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr2sp_To_Orderings;


   procedure Add_uothr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uothr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uothr3sp_To_Orderings;


   procedure Add_upay1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upay1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay1hd_To_Orderings;


   procedure Add_upay2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upay2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay2hd_To_Orderings;


   procedure Add_upay3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upay3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay3hd_To_Orderings;


   procedure Add_upay1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upay1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay1sp_To_Orderings;


   procedure Add_upay2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upay2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay2sp_To_Orderings;


   procedure Add_upay3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "upay3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_upay3sp_To_Orderings;


   procedure Add_usapa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usapa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa1hd_To_Orderings;


   procedure Add_usapa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usapa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa2hd_To_Orderings;


   procedure Add_usapa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usapa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa3hd_To_Orderings;


   procedure Add_usapa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usapa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa1sp_To_Orderings;


   procedure Add_usapa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usapa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa2sp_To_Orderings;


   procedure Add_usapa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usapa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usapa3sp_To_Orderings;


   procedure Add_uspam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam1hd_To_Orderings;


   procedure Add_uspam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam2hd_To_Orderings;


   procedure Add_uspam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam3hd_To_Orderings;


   procedure Add_uspam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam1sp_To_Orderings;


   procedure Add_uspam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam2sp_To_Orderings;


   procedure Add_uspam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspam3sp_To_Orderings;


   procedure Add_uspra1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspra1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra1hd_To_Orderings;


   procedure Add_uspra2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspra2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra2hd_To_Orderings;


   procedure Add_uspra3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspra3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra3hd_To_Orderings;


   procedure Add_uspra1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspra1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra1sp_To_Orderings;


   procedure Add_uspra2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspra2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra2sp_To_Orderings;


   procedure Add_uspra3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uspra3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uspra3sp_To_Orderings;


   procedure Add_uppam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uppam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam1hd_To_Orderings;


   procedure Add_uppam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uppam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam2hd_To_Orderings;


   procedure Add_uppam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uppam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam3hd_To_Orderings;


   procedure Add_uppam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uppam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam1sp_To_Orderings;


   procedure Add_uppam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uppam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam2sp_To_Orderings;


   procedure Add_uppam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "uppam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_uppam3sp_To_Orderings;


   procedure Add_usspa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usspa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa1hd_To_Orderings;


   procedure Add_usspa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usspa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa2hd_To_Orderings;


   procedure Add_usspa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usspa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa3hd_To_Orderings;


   procedure Add_usspa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usspa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa1sp_To_Orderings;


   procedure Add_usspa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usspa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa2sp_To_Orderings;


   procedure Add_usspa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "usspa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_usspa3sp_To_Orderings;


   procedure Add_to2hr1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to2hr1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr1hd_To_Orderings;


   procedure Add_to2hr2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to2hr2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr2hd_To_Orderings;


   procedure Add_to2hr3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to2hr3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr3hd_To_Orderings;


   procedure Add_to2hr1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to2hr1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr1sp_To_Orderings;


   procedure Add_to2hr2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to2hr2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr2sp_To_Orderings;


   procedure Add_to2hr3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "to2hr3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_to2hr3sp_To_Orderings;


   procedure Add_utaxa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "utaxa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa1hd_To_Orderings;


   procedure Add_utaxa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "utaxa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa2hd_To_Orderings;


   procedure Add_utaxa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "utaxa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa3hd_To_Orderings;


   procedure Add_utaxa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "utaxa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa1sp_To_Orderings;


   procedure Add_utaxa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "utaxa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa2sp_To_Orderings;


   procedure Add_utaxa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "utaxa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_utaxa3sp_To_Orderings;


   procedure Add_vcamt1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcamt1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt1hd_To_Orderings;


   procedure Add_vcamt2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcamt2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt2hd_To_Orderings;


   procedure Add_vcamt3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcamt3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt3hd_To_Orderings;


   procedure Add_vcamt1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcamt1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt1sp_To_Orderings;


   procedure Add_vcamt2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcamt2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt2sp_To_Orderings;


   procedure Add_vcamt3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcamt3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcamt3sp_To_Orderings;


   procedure Add_vcpd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcpd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd1hd_To_Orderings;


   procedure Add_vcpd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcpd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd2hd_To_Orderings;


   procedure Add_vcpd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcpd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd3hd_To_Orderings;


   procedure Add_vcpd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcpd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd1sp_To_Orderings;


   procedure Add_vcpd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcpd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd2sp_To_Orderings;


   procedure Add_vcpd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcpd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcpd3sp_To_Orderings;


   procedure Add_vcsac1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcsac1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac1hd_To_Orderings;


   procedure Add_vcsac2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcsac2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac2hd_To_Orderings;


   procedure Add_vcsac3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcsac3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac3hd_To_Orderings;


   procedure Add_vcsac1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcsac1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac1sp_To_Orderings;


   procedure Add_vcsac2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcsac2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac2sp_To_Orderings;


   procedure Add_vcsac3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcsac3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcsac3sp_To_Orderings;


   procedure Add_vcuam1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcuam1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam1hd_To_Orderings;


   procedure Add_vcuam2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcuam2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam2hd_To_Orderings;


   procedure Add_vcuam3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcuam3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam3hd_To_Orderings;


   procedure Add_vcuam1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcuam1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam1sp_To_Orderings;


   procedure Add_vcuam2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcuam2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam2sp_To_Orderings;


   procedure Add_vcuam3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcuam3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcuam3sp_To_Orderings;


   procedure Add_vcupd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcupd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd1hd_To_Orderings;


   procedure Add_vcupd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcupd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd2hd_To_Orderings;


   procedure Add_vcupd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcupd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd3hd_To_Orderings;


   procedure Add_vcupd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcupd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd1sp_To_Orderings;


   procedure Add_vcupd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcupd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd2sp_To_Orderings;


   procedure Add_vcupd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcupd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcupd3sp_To_Orderings;


   procedure Add_vcusu1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcusu1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu1hd_To_Orderings;


   procedure Add_vcusu2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcusu2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu2hd_To_Orderings;


   procedure Add_vcusu3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcusu3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu3hd_To_Orderings;


   procedure Add_vcusu1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcusu1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu1sp_To_Orderings;


   procedure Add_vcusu2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcusu2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu2sp_To_Orderings;


   procedure Add_vcusu3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "vcusu3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_vcusu3sp_To_Orderings;


   procedure Add_nou011hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou011hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou011hd_To_Orderings;


   procedure Add_nou012hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou012hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou012hd_To_Orderings;


   procedure Add_nou013hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou013hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou013hd_To_Orderings;


   procedure Add_nou011sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou011sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou011sp_To_Orderings;


   procedure Add_nou012sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou012sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou012sp_To_Orderings;


   procedure Add_nou013sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou013sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou013sp_To_Orderings;


   procedure Add_nou021hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou021hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou021hd_To_Orderings;


   procedure Add_nou022hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou022hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou022hd_To_Orderings;


   procedure Add_nou023hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou023hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou023hd_To_Orderings;


   procedure Add_nou021sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou021sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou021sp_To_Orderings;


   procedure Add_nou022sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou022sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou022sp_To_Orderings;


   procedure Add_nou023sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou023sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou023sp_To_Orderings;


   procedure Add_nou031hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou031hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou031hd_To_Orderings;


   procedure Add_nou032hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou032hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou032hd_To_Orderings;


   procedure Add_nou033hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou033hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou033hd_To_Orderings;


   procedure Add_nou031sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou031sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou031sp_To_Orderings;


   procedure Add_nou032sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou032sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou032sp_To_Orderings;


   procedure Add_nou033sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou033sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou033sp_To_Orderings;


   procedure Add_nou041hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou041hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou041hd_To_Orderings;


   procedure Add_nou042hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou042hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou042hd_To_Orderings;


   procedure Add_nou043hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou043hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou043hd_To_Orderings;


   procedure Add_nou041sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou041sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou041sp_To_Orderings;


   procedure Add_nou042sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou042sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou042sp_To_Orderings;


   procedure Add_nou043sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou043sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou043sp_To_Orderings;


   procedure Add_nou051hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou051hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou051hd_To_Orderings;


   procedure Add_nou052hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou052hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou052hd_To_Orderings;


   procedure Add_nou053hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou053hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou053hd_To_Orderings;


   procedure Add_nou051sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou051sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou051sp_To_Orderings;


   procedure Add_nou052sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou052sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou052sp_To_Orderings;


   procedure Add_nou053sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou053sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou053sp_To_Orderings;


   procedure Add_nou061hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou061hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou061hd_To_Orderings;


   procedure Add_nou062hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou062hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou062hd_To_Orderings;


   procedure Add_nou063hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou063hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou063hd_To_Orderings;


   procedure Add_nou061sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou061sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou061sp_To_Orderings;


   procedure Add_nou062sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou062sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou062sp_To_Orderings;


   procedure Add_nou063sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou063sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou063sp_To_Orderings;


   procedure Add_nou071hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou071hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou071hd_To_Orderings;


   procedure Add_nou072hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou072hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou072hd_To_Orderings;


   procedure Add_nou073hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou073hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou073hd_To_Orderings;


   procedure Add_nou071sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou071sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou071sp_To_Orderings;


   procedure Add_nou072sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou072sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou072sp_To_Orderings;


   procedure Add_nou073sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou073sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou073sp_To_Orderings;


   procedure Add_nou081hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou081hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou081hd_To_Orderings;


   procedure Add_nou082hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou082hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou082hd_To_Orderings;


   procedure Add_nou083hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou083hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou083hd_To_Orderings;


   procedure Add_nou081sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou081sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou081sp_To_Orderings;


   procedure Add_nou082sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou082sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou082sp_To_Orderings;


   procedure Add_nou083sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou083sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou083sp_To_Orderings;


   procedure Add_nou091hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou091hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou091hd_To_Orderings;


   procedure Add_nou092hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou092hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou092hd_To_Orderings;


   procedure Add_nou093hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou093hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou093hd_To_Orderings;


   procedure Add_nou091sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou091sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou091sp_To_Orderings;


   procedure Add_nou092sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou092sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou092sp_To_Orderings;


   procedure Add_nou093sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou093sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou093sp_To_Orderings;


   procedure Add_nou101hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou101hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou101hd_To_Orderings;


   procedure Add_nou102hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou102hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou102hd_To_Orderings;


   procedure Add_nou103hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou103hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou103hd_To_Orderings;


   procedure Add_nou101sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou101sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou101sp_To_Orderings;


   procedure Add_nou102sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou102sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou102sp_To_Orderings;


   procedure Add_nou103sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou103sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou103sp_To_Orderings;


   procedure Add_nou111hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou111hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou111hd_To_Orderings;


   procedure Add_nou112hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou112hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou112hd_To_Orderings;


   procedure Add_nou113hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou113hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou113hd_To_Orderings;


   procedure Add_nou111sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou111sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou111sp_To_Orderings;


   procedure Add_nou112sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou112sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou112sp_To_Orderings;


   procedure Add_nou113sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou113sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou113sp_To_Orderings;


   procedure Add_nou121hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou121hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou121hd_To_Orderings;


   procedure Add_nou122hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou122hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou122hd_To_Orderings;


   procedure Add_nou123hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou123hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou123hd_To_Orderings;


   procedure Add_nou121sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou121sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou121sp_To_Orderings;


   procedure Add_nou122sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou122sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou122sp_To_Orderings;


   procedure Add_nou123sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou123sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou123sp_To_Orderings;


   procedure Add_nou131hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou131hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou131hd_To_Orderings;


   procedure Add_nou132hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou132hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou132hd_To_Orderings;


   procedure Add_nou133hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou133hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou133hd_To_Orderings;


   procedure Add_nou131sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou131sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou131sp_To_Orderings;


   procedure Add_nou132sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou132sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou132sp_To_Orderings;


   procedure Add_nou133sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou133sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou133sp_To_Orderings;


   procedure Add_nou141hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou141hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou141hd_To_Orderings;


   procedure Add_nou142hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou142hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou142hd_To_Orderings;


   procedure Add_nou143hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou143hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou143hd_To_Orderings;


   procedure Add_nou141sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou141sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou141sp_To_Orderings;


   procedure Add_nou142sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou142sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou142sp_To_Orderings;


   procedure Add_nou143sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nou143sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nou143sp_To_Orderings;


   procedure Add_worka1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worka1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka1hd_To_Orderings;


   procedure Add_worka2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worka2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka2hd_To_Orderings;


   procedure Add_worka3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worka3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka3hd_To_Orderings;


   procedure Add_worka1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worka1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka1sp_To_Orderings;


   procedure Add_worka2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worka2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka2sp_To_Orderings;


   procedure Add_worka3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worka3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worka3sp_To_Orderings;


   procedure Add_workm1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workm1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm1hd_To_Orderings;


   procedure Add_workm2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workm2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm2hd_To_Orderings;


   procedure Add_workm3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workm3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm3hd_To_Orderings;


   procedure Add_workm1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workm1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm1sp_To_Orderings;


   procedure Add_workm2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workm2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm2sp_To_Orderings;


   procedure Add_workm3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "workm3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_workm3sp_To_Orderings;


   procedure Add_worky1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worky1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky1hd_To_Orderings;


   procedure Add_worky2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worky2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky2hd_To_Orderings;


   procedure Add_worky3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worky3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky3hd_To_Orderings;


   procedure Add_worky1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worky1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky1sp_To_Orderings;


   procedure Add_worky2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worky2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky2sp_To_Orderings;


   procedure Add_worky3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "worky3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_worky3sp_To_Orderings;


   procedure Add_yjchg1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjchg1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg1hd_To_Orderings;


   procedure Add_yjchg2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjchg2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg2hd_To_Orderings;


   procedure Add_yjchg3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjchg3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg3hd_To_Orderings;


   procedure Add_yjchg1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjchg1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg1sp_To_Orderings;


   procedure Add_yjchg2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjchg2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg2sp_To_Orderings;


   procedure Add_yjchg3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yjchg3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yjchg3sp_To_Orderings;


   procedure Add_mp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp1hd_To_Orderings;


   procedure Add_mp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp2hd_To_Orderings;


   procedure Add_mp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp3hd_To_Orderings;


   procedure Add_mp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp1sp_To_Orderings;


   procedure Add_mp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp2sp_To_Orderings;


   procedure Add_mp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mp3sp_To_Orderings;


   procedure Add_mrar11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar11hd_To_Orderings;


   procedure Add_mrar12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar12hd_To_Orderings;


   procedure Add_mrar13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar13hd_To_Orderings;


   procedure Add_mrar11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar11sp_To_Orderings;


   procedure Add_mrar12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar12sp_To_Orderings;


   procedure Add_mrar13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar13sp_To_Orderings;


   procedure Add_mrar21hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar21hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar21hd_To_Orderings;


   procedure Add_mrar22hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar22hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar22hd_To_Orderings;


   procedure Add_mrar23hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar23hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar23hd_To_Orderings;


   procedure Add_mrar21sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar21sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar21sp_To_Orderings;


   procedure Add_mrar22sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar22sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar22sp_To_Orderings;


   procedure Add_mrar23sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar23sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar23sp_To_Orderings;


   procedure Add_mrar31hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar31hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar31hd_To_Orderings;


   procedure Add_mrar32hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar32hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar32hd_To_Orderings;


   procedure Add_mrar33hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar33hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar33hd_To_Orderings;


   procedure Add_mrar31sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar31sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar31sp_To_Orderings;


   procedure Add_mrar32sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar32sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar32sp_To_Orderings;


   procedure Add_mrar33sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar33sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar33sp_To_Orderings;


   procedure Add_mrar41hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar41hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar41hd_To_Orderings;


   procedure Add_mrar42hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar42hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar42hd_To_Orderings;


   procedure Add_mrar43hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar43hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar43hd_To_Orderings;


   procedure Add_mrar41sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar41sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar41sp_To_Orderings;


   procedure Add_mrar42sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar42sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar42sp_To_Orderings;


   procedure Add_mrar43sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar43sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar43sp_To_Orderings;


   procedure Add_mrar51hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar51hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar51hd_To_Orderings;


   procedure Add_mrar52hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar52hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar52hd_To_Orderings;


   procedure Add_mrar53hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar53hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar53hd_To_Orderings;


   procedure Add_mrar51sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar51sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar51sp_To_Orderings;


   procedure Add_mrar52sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar52sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar52sp_To_Orderings;


   procedure Add_mrar53sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mrar53sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mrar53sp_To_Orderings;


   procedure Add_mpnch1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpnch1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch1hd_To_Orderings;


   procedure Add_mpnch2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpnch2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch2hd_To_Orderings;


   procedure Add_mpnch3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpnch3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch3hd_To_Orderings;


   procedure Add_mpnch1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpnch1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch1sp_To_Orderings;


   procedure Add_mpnch2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpnch2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch2sp_To_Orderings;


   procedure Add_mpnch3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpnch3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpnch3sp_To_Orderings;


   procedure Add_pmp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp1hd_To_Orderings;


   procedure Add_pmp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp2hd_To_Orderings;


   procedure Add_pmp3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmp3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp3hd_To_Orderings;


   procedure Add_pmp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp1sp_To_Orderings;


   procedure Add_pmp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp2sp_To_Orderings;


   procedure Add_pmp3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmp3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmp3sp_To_Orderings;


   procedure Add_ump1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ump1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump1hd_To_Orderings;


   procedure Add_ump2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ump2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump2hd_To_Orderings;


   procedure Add_ump3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ump3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump3hd_To_Orderings;


   procedure Add_ump1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ump1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump1sp_To_Orderings;


   procedure Add_ump2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ump2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump2sp_To_Orderings;


   procedure Add_ump3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ump3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ump3sp_To_Orderings;


   procedure Add_pump1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pump1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump1hd_To_Orderings;


   procedure Add_pump2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pump2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump2hd_To_Orderings;


   procedure Add_pump3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pump3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump3hd_To_Orderings;


   procedure Add_pump1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pump1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump1sp_To_Orderings;


   procedure Add_pump2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pump2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump2sp_To_Orderings;


   procedure Add_pump3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pump3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pump3sp_To_Orderings;


   procedure Add_isump1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isump1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump1hd_To_Orderings;


   procedure Add_isump2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isump2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump2hd_To_Orderings;


   procedure Add_isump3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isump3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump3hd_To_Orderings;


   procedure Add_isump1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isump1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump1sp_To_Orderings;


   procedure Add_isump2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isump2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump2sp_To_Orderings;


   procedure Add_isump3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "isump3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_isump3sp_To_Orderings;


   procedure Add_jobst1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobst1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst1hd_To_Orderings;


   procedure Add_jobst2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobst2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst2hd_To_Orderings;


   procedure Add_jobst1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobst1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst1sp_To_Orderings;


   procedure Add_jobst2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "jobst2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_jobst2sp_To_Orderings;


   procedure Add_oddtp1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddtp1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp1hd_To_Orderings;


   procedure Add_oddtp2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddtp2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp2hd_To_Orderings;


   procedure Add_oddtp1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddtp1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp1sp_To_Orderings;


   procedure Add_oddtp2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddtp2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddtp2sp_To_Orderings;


   procedure Add_oddjb1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjb1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb1hd_To_Orderings;


   procedure Add_oddjb2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjb2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb2hd_To_Orderings;


   procedure Add_oddjb1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjb1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb1sp_To_Orderings;


   procedure Add_oddjb2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjb2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjb2sp_To_Orderings;


   procedure Add_oddjn1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjn1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn1hd_To_Orderings;


   procedure Add_oddjn2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjn2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn2hd_To_Orderings;


   procedure Add_oddjn1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjn1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn1sp_To_Orderings;


   procedure Add_oddjn2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "oddjn2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_oddjn2sp_To_Orderings;


   procedure Add_poth1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth1hd_To_Orderings;


   procedure Add_poth2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth2hd_To_Orderings;


   procedure Add_poth3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth3hd_To_Orderings;


   procedure Add_poth4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth4hd_To_Orderings;


   procedure Add_poth5hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth5hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth5hd_To_Orderings;


   procedure Add_poth6hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth6hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth6hd_To_Orderings;


   procedure Add_poth7hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth7hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth7hd_To_Orderings;


   procedure Add_poth8hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth8hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth8hd_To_Orderings;


   procedure Add_poth9hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth9hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth9hd_To_Orderings;


   procedure Add_poth10hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth10hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth10hd_To_Orderings;


   procedure Add_poth11hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth11hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth11hd_To_Orderings;


   procedure Add_poth12hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth12hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth12hd_To_Orderings;


   procedure Add_poth13hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth13hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth13hd_To_Orderings;


   procedure Add_poth14hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth14hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth14hd_To_Orderings;


   procedure Add_poth15hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth15hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth15hd_To_Orderings;


   procedure Add_poth16hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth16hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth16hd_To_Orderings;


   procedure Add_poth17hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth17hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth17hd_To_Orderings;


   procedure Add_poth18hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth18hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth18hd_To_Orderings;


   procedure Add_poth19hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth19hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth19hd_To_Orderings;


   procedure Add_poth1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth1sp_To_Orderings;


   procedure Add_poth2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth2sp_To_Orderings;


   procedure Add_poth3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth3sp_To_Orderings;


   procedure Add_poth4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth4sp_To_Orderings;


   procedure Add_poth5sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth5sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth5sp_To_Orderings;


   procedure Add_poth6sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth6sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth6sp_To_Orderings;


   procedure Add_poth7sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth7sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth7sp_To_Orderings;


   procedure Add_poth8sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth8sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth8sp_To_Orderings;


   procedure Add_poth9sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth9sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth9sp_To_Orderings;


   procedure Add_poth10sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth10sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth10sp_To_Orderings;


   procedure Add_poth11sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth11sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth11sp_To_Orderings;


   procedure Add_poth12sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth12sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth12sp_To_Orderings;


   procedure Add_poth13sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth13sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth13sp_To_Orderings;


   procedure Add_poth14sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth14sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth14sp_To_Orderings;


   procedure Add_poth15sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth15sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth15sp_To_Orderings;


   procedure Add_poth16sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth16sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth16sp_To_Orderings;


   procedure Add_poth17sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth17sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth17sp_To_Orderings;


   procedure Add_poth18sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth18sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth18sp_To_Orderings;


   procedure Add_poth19sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "poth19sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_poth19sp_To_Orderings;


   procedure Add_ocpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen1hd_To_Orderings;


   procedure Add_ocpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen2hd_To_Orderings;


   procedure Add_ocpen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen3hd_To_Orderings;


   procedure Add_ocpen4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen4hd_To_Orderings;


   procedure Add_wpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen1hd_To_Orderings;


   procedure Add_wpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen2hd_To_Orderings;


   procedure Add_wpen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen3hd_To_Orderings;


   procedure Add_ppen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen1hd_To_Orderings;


   procedure Add_ppen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen2hd_To_Orderings;


   procedure Add_ppen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen3hd_To_Orderings;


   procedure Add_tupen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen1hd_To_Orderings;


   procedure Add_tupen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen2hd_To_Orderings;


   procedure Add_anpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen1hd_To_Orderings;


   procedure Add_anpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen2hd_To_Orderings;


   procedure Add_anpen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anpen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen3hd_To_Orderings;


   procedure Add_trust1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trust1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust1hd_To_Orderings;


   procedure Add_trust2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trust2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust2hd_To_Orderings;


   procedure Add_expen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen1hd_To_Orderings;


   procedure Add_expen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen2hd_To_Orderings;


   procedure Add_ocpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen1sp_To_Orderings;


   procedure Add_ocpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen2sp_To_Orderings;


   procedure Add_ocpen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen3sp_To_Orderings;


   procedure Add_ocpen4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpen4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpen4sp_To_Orderings;


   procedure Add_wpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen1sp_To_Orderings;


   procedure Add_wpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen2sp_To_Orderings;


   procedure Add_wpen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpen3sp_To_Orderings;


   procedure Add_ppen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen1sp_To_Orderings;


   procedure Add_ppen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen2sp_To_Orderings;


   procedure Add_ppen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppen3sp_To_Orderings;


   procedure Add_tupen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen1sp_To_Orderings;


   procedure Add_tupen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupen2sp_To_Orderings;


   procedure Add_anpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen1sp_To_Orderings;


   procedure Add_anpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen2sp_To_Orderings;


   procedure Add_anpen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "anpen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_anpen3sp_To_Orderings;


   procedure Add_trust1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trust1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust1sp_To_Orderings;


   procedure Add_trust2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trust2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trust2sp_To_Orderings;


   procedure Add_expen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen1sp_To_Orderings;


   procedure Add_expen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expen2sp_To_Orderings;


   procedure Add_pcpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen1hd_To_Orderings;


   procedure Add_pcpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen2hd_To_Orderings;


   procedure Add_pcpen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen3hd_To_Orderings;


   procedure Add_pcpen4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen4hd_To_Orderings;


   procedure Add_pwpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen1hd_To_Orderings;


   procedure Add_pwpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen2hd_To_Orderings;


   procedure Add_pwpen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen3hd_To_Orderings;


   procedure Add_pppen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pppen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen1hd_To_Orderings;


   procedure Add_pppen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pppen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen2hd_To_Orderings;


   procedure Add_pppen3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pppen3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen3hd_To_Orderings;


   procedure Add_ptupn1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptupn1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn1hd_To_Orderings;


   procedure Add_ptupn2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptupn2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn2hd_To_Orderings;


   procedure Add_panpn1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "panpn1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn1hd_To_Orderings;


   procedure Add_panpn2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "panpn2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn2hd_To_Orderings;


   procedure Add_panpn3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "panpn3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn3hd_To_Orderings;


   procedure Add_ptrst1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrst1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst1hd_To_Orderings;


   procedure Add_ptrst2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrst2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst2hd_To_Orderings;


   procedure Add_pxpen1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pxpen1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen1hd_To_Orderings;


   procedure Add_pxpen2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pxpen2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen2hd_To_Orderings;


   procedure Add_pcpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen1sp_To_Orderings;


   procedure Add_pcpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen2sp_To_Orderings;


   procedure Add_pcpen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen3sp_To_Orderings;


   procedure Add_pcpen4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pcpen4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pcpen4sp_To_Orderings;


   procedure Add_pwpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen1sp_To_Orderings;


   procedure Add_pwpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen2sp_To_Orderings;


   procedure Add_pwpen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pwpen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pwpen3sp_To_Orderings;


   procedure Add_pppen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pppen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen1sp_To_Orderings;


   procedure Add_pppen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pppen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen2sp_To_Orderings;


   procedure Add_pppen3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pppen3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pppen3sp_To_Orderings;


   procedure Add_ptupn1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptupn1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn1sp_To_Orderings;


   procedure Add_ptupn2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptupn2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptupn2sp_To_Orderings;


   procedure Add_panpn1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "panpn1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn1sp_To_Orderings;


   procedure Add_panpn2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "panpn2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn2sp_To_Orderings;


   procedure Add_panpn3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "panpn3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_panpn3sp_To_Orderings;


   procedure Add_ptrst1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrst1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst1sp_To_Orderings;


   procedure Add_ptrst2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptrst2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptrst2sp_To_Orderings;


   procedure Add_pxpen1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pxpen1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen1sp_To_Orderings;


   procedure Add_pxpen2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pxpen2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pxpen2sp_To_Orderings;


   procedure Add_ocptd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd1hd_To_Orderings;


   procedure Add_ocptd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd2hd_To_Orderings;


   procedure Add_ocptd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd3hd_To_Orderings;


   procedure Add_ocptd4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd4hd_To_Orderings;


   procedure Add_wpptd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd1hd_To_Orderings;


   procedure Add_wpptd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd2hd_To_Orderings;


   procedure Add_wpptd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd3hd_To_Orderings;


   procedure Add_ppetd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd1hd_To_Orderings;


   procedure Add_ppetd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd2hd_To_Orderings;


   procedure Add_ppetd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd3hd_To_Orderings;


   procedure Add_tuptd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd1hd_To_Orderings;


   procedure Add_tuptd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd2hd_To_Orderings;


   procedure Add_aptd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd1hd_To_Orderings;


   procedure Add_aptd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd2hd_To_Orderings;


   procedure Add_aptd3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptd3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd3hd_To_Orderings;


   procedure Add_trutd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trutd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd1hd_To_Orderings;


   procedure Add_trutd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trutd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd2hd_To_Orderings;


   procedure Add_exptd1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptd1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd1hd_To_Orderings;


   procedure Add_exptd2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptd2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd2hd_To_Orderings;


   procedure Add_ocptd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd1sp_To_Orderings;


   procedure Add_ocptd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd2sp_To_Orderings;


   procedure Add_ocptd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd3sp_To_Orderings;


   procedure Add_ocptd4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptd4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptd4sp_To_Orderings;


   procedure Add_wpptd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd1sp_To_Orderings;


   procedure Add_wpptd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd2sp_To_Orderings;


   procedure Add_wpptd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptd3sp_To_Orderings;


   procedure Add_ppetd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd1sp_To_Orderings;


   procedure Add_ppetd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd2sp_To_Orderings;


   procedure Add_ppetd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetd3sp_To_Orderings;


   procedure Add_tuptd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd1sp_To_Orderings;


   procedure Add_tuptd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptd2sp_To_Orderings;


   procedure Add_aptd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd1sp_To_Orderings;


   procedure Add_aptd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd2sp_To_Orderings;


   procedure Add_aptd3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptd3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptd3sp_To_Orderings;


   procedure Add_trutd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trutd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd1sp_To_Orderings;


   procedure Add_trutd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "trutd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_trutd2sp_To_Orderings;


   procedure Add_exptd1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptd1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd1sp_To_Orderings;


   procedure Add_exptd2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptd2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptd2sp_To_Orderings;


   procedure Add_ocpid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid1hd_To_Orderings;


   procedure Add_ocpid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid2hd_To_Orderings;


   procedure Add_ocpid3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid3hd_To_Orderings;


   procedure Add_ocpid4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid4hd_To_Orderings;


   procedure Add_wwpid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid1hd_To_Orderings;


   procedure Add_wwpid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid2hd_To_Orderings;


   procedure Add_wwpid3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpid3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid3hd_To_Orderings;


   procedure Add_ppeid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid1hd_To_Orderings;


   procedure Add_ppeid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid2hd_To_Orderings;


   procedure Add_ppeid3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeid3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid3hd_To_Orderings;


   procedure Add_tupid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid1hd_To_Orderings;


   procedure Add_tupid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid2hd_To_Orderings;


   procedure Add_apid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid1hd_To_Orderings;


   procedure Add_apid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid2hd_To_Orderings;


   procedure Add_apid3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apid3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid3hd_To_Orderings;


   procedure Add_truid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid1hd_To_Orderings;


   procedure Add_truid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid2hd_To_Orderings;


   procedure Add_expid1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expid1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid1hd_To_Orderings;


   procedure Add_expid2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expid2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid2hd_To_Orderings;


   procedure Add_ocpid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid1sp_To_Orderings;


   procedure Add_ocpid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid2sp_To_Orderings;


   procedure Add_ocpid3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid3sp_To_Orderings;


   procedure Add_ocpid4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpid4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpid4sp_To_Orderings;


   procedure Add_wwpid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid1sp_To_Orderings;


   procedure Add_wwpid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid2sp_To_Orderings;


   procedure Add_wwpid3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpid3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpid3sp_To_Orderings;


   procedure Add_ppeid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid1sp_To_Orderings;


   procedure Add_ppeid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid2sp_To_Orderings;


   procedure Add_ppeid3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeid3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeid3sp_To_Orderings;


   procedure Add_tupid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid1sp_To_Orderings;


   procedure Add_tupid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupid2sp_To_Orderings;


   procedure Add_apid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid1sp_To_Orderings;


   procedure Add_apid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid2sp_To_Orderings;


   procedure Add_apid3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apid3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apid3sp_To_Orderings;


   procedure Add_truid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid1sp_To_Orderings;


   procedure Add_truid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truid2sp_To_Orderings;


   procedure Add_expid1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expid1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid1sp_To_Orderings;


   procedure Add_expid2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expid2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expid2sp_To_Orderings;


   procedure Add_ocptx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx1hd_To_Orderings;


   procedure Add_ocptx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx2hd_To_Orderings;


   procedure Add_ocptx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx3hd_To_Orderings;


   procedure Add_ocptx4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx4hd_To_Orderings;


   procedure Add_wptx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wptx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wptx1hd_To_Orderings;


   procedure Add_wpptx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx2hd_To_Orderings;


   procedure Add_wpptx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx3hd_To_Orderings;


   procedure Add_ppetx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx1hd_To_Orderings;


   procedure Add_ppetx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx2hd_To_Orderings;


   procedure Add_ppetx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx3hd_To_Orderings;


   procedure Add_tuptx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx1hd_To_Orderings;


   procedure Add_tuptx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx2hd_To_Orderings;


   procedure Add_aptx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx1hd_To_Orderings;


   procedure Add_aptx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx2hd_To_Orderings;


   procedure Add_aptx3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptx3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx3hd_To_Orderings;


   procedure Add_ttrtx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ttrtx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx1hd_To_Orderings;


   procedure Add_ttrtx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ttrtx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx2hd_To_Orderings;


   procedure Add_exptx1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptx1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx1hd_To_Orderings;


   procedure Add_exptx2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptx2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx2hd_To_Orderings;


   procedure Add_ocptx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx1sp_To_Orderings;


   procedure Add_ocptx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx2sp_To_Orderings;


   procedure Add_ocptx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx3sp_To_Orderings;


   procedure Add_ocptx4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocptx4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocptx4sp_To_Orderings;


   procedure Add_wptx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wptx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wptx1sp_To_Orderings;


   procedure Add_wpptx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx2sp_To_Orderings;


   procedure Add_wpptx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpptx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpptx3sp_To_Orderings;


   procedure Add_ppetx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx1sp_To_Orderings;


   procedure Add_ppetx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx2sp_To_Orderings;


   procedure Add_ppetx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppetx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppetx3sp_To_Orderings;


   procedure Add_tuptx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx1sp_To_Orderings;


   procedure Add_tuptx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuptx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuptx2sp_To_Orderings;


   procedure Add_aptx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx1sp_To_Orderings;


   procedure Add_aptx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx2sp_To_Orderings;


   procedure Add_aptx3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "aptx3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_aptx3sp_To_Orderings;


   procedure Add_ttrtx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ttrtx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx1sp_To_Orderings;


   procedure Add_ttrtx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ttrtx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ttrtx2sp_To_Orderings;


   procedure Add_exptx1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptx1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx1sp_To_Orderings;


   procedure Add_exptx2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "exptx2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_exptx2sp_To_Orderings;


   procedure Add_ocpoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa1hd_To_Orderings;


   procedure Add_ocpoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa2hd_To_Orderings;


   procedure Add_ocpoa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa3hd_To_Orderings;


   procedure Add_ocpoa4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa4hd_To_Orderings;


   procedure Add_wpoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoa1hd_To_Orderings;


   procedure Add_wwpoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa2hd_To_Orderings;


   procedure Add_wwpoa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa3hd_To_Orderings;


   procedure Add_ppeoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa1hd_To_Orderings;


   procedure Add_ppeoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa2hd_To_Orderings;


   procedure Add_ppeoa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa3hd_To_Orderings;


   procedure Add_tupoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa1hd_To_Orderings;


   procedure Add_tupoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa2hd_To_Orderings;


   procedure Add_apoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa1hd_To_Orderings;


   procedure Add_apoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa2hd_To_Orderings;


   procedure Add_apoa3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoa3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa3hd_To_Orderings;


   procedure Add_truoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa1hd_To_Orderings;


   procedure Add_truoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa2hd_To_Orderings;


   procedure Add_expoa1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoa1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa1hd_To_Orderings;


   procedure Add_expoa2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoa2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa2hd_To_Orderings;


   procedure Add_ocpoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa1sp_To_Orderings;


   procedure Add_ocpoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa2sp_To_Orderings;


   procedure Add_ocpoa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa3sp_To_Orderings;


   procedure Add_ocpoa4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoa4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoa4sp_To_Orderings;


   procedure Add_wpoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoa1sp_To_Orderings;


   procedure Add_wwpoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa2sp_To_Orderings;


   procedure Add_wwpoa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoa3sp_To_Orderings;


   procedure Add_ppeoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa1sp_To_Orderings;


   procedure Add_ppeoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa2sp_To_Orderings;


   procedure Add_ppeoa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoa3sp_To_Orderings;


   procedure Add_tupoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa1sp_To_Orderings;


   procedure Add_tupoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoa2sp_To_Orderings;


   procedure Add_apoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa1sp_To_Orderings;


   procedure Add_apoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa2sp_To_Orderings;


   procedure Add_apoa3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoa3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoa3sp_To_Orderings;


   procedure Add_truoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa1sp_To_Orderings;


   procedure Add_truoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoa2sp_To_Orderings;


   procedure Add_expoa1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoa1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa1sp_To_Orderings;


   procedure Add_expoa2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoa2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoa2sp_To_Orderings;


   procedure Add_ocpoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi1hd_To_Orderings;


   procedure Add_ocpoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi2hd_To_Orderings;


   procedure Add_ocpoi3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi3hd_To_Orderings;


   procedure Add_ocpoi4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi4hd_To_Orderings;


   procedure Add_wpoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoi1hd_To_Orderings;


   procedure Add_wwpoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi2hd_To_Orderings;


   procedure Add_wwpoi3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoi3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi3hd_To_Orderings;


   procedure Add_ppeoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi1hd_To_Orderings;


   procedure Add_ppeoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi2hd_To_Orderings;


   procedure Add_ppeoi3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoi3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi3hd_To_Orderings;


   procedure Add_tupoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi1hd_To_Orderings;


   procedure Add_tupoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi2hd_To_Orderings;


   procedure Add_apoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi1hd_To_Orderings;


   procedure Add_apoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi2hd_To_Orderings;


   procedure Add_apoi3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoi3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi3hd_To_Orderings;


   procedure Add_truoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi1hd_To_Orderings;


   procedure Add_truoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi2hd_To_Orderings;


   procedure Add_expoi1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoi1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi1hd_To_Orderings;


   procedure Add_expoi2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoi2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi2hd_To_Orderings;


   procedure Add_ocpoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi1sp_To_Orderings;


   procedure Add_ocpoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi2sp_To_Orderings;


   procedure Add_ocpoi3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi3sp_To_Orderings;


   procedure Add_ocpoi4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpoi4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpoi4sp_To_Orderings;


   procedure Add_wpoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpoi1sp_To_Orderings;


   procedure Add_wwpoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi2sp_To_Orderings;


   procedure Add_wwpoi3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wwpoi3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wwpoi3sp_To_Orderings;


   procedure Add_ppeoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi1sp_To_Orderings;


   procedure Add_ppeoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi2sp_To_Orderings;


   procedure Add_ppeoi3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeoi3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeoi3sp_To_Orderings;


   procedure Add_tupoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi1sp_To_Orderings;


   procedure Add_tupoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupoi2sp_To_Orderings;


   procedure Add_apoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi1sp_To_Orderings;


   procedure Add_apoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi2sp_To_Orderings;


   procedure Add_apoi3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apoi3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apoi3sp_To_Orderings;


   procedure Add_truoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi1sp_To_Orderings;


   procedure Add_truoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truoi2sp_To_Orderings;


   procedure Add_expoi1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoi1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi1sp_To_Orderings;


   procedure Add_expoi2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expoi2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expoi2sp_To_Orderings;


   procedure Add_ocpta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta1hd_To_Orderings;


   procedure Add_ocpta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta2hd_To_Orderings;


   procedure Add_ocpta3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta3hd_To_Orderings;


   procedure Add_ocpta4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta4hd_To_Orderings;


   procedure Add_wpta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpta1hd_To_Orderings;


   procedure Add_wppta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta2hd_To_Orderings;


   procedure Add_wppta3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppta3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta3hd_To_Orderings;


   procedure Add_ppeta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta1hd_To_Orderings;


   procedure Add_ppeta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta2hd_To_Orderings;


   procedure Add_ppeta3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeta3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta3hd_To_Orderings;


   procedure Add_tupta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta1hd_To_Orderings;


   procedure Add_tupta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta2hd_To_Orderings;


   procedure Add_apta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta1hd_To_Orderings;


   procedure Add_apta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta2hd_To_Orderings;


   procedure Add_apta3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apta3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta3hd_To_Orderings;


   procedure Add_truta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta1hd_To_Orderings;


   procedure Add_truta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta2hd_To_Orderings;


   procedure Add_expta1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expta1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta1hd_To_Orderings;


   procedure Add_expta2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expta2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta2hd_To_Orderings;


   procedure Add_ocpta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta1sp_To_Orderings;


   procedure Add_ocpta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta2sp_To_Orderings;


   procedure Add_ocpta3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta3sp_To_Orderings;


   procedure Add_ocpta4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpta4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpta4sp_To_Orderings;


   procedure Add_wpta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpta1sp_To_Orderings;


   procedure Add_wppta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta2sp_To_Orderings;


   procedure Add_wppta3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppta3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppta3sp_To_Orderings;


   procedure Add_ppeta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta1sp_To_Orderings;


   procedure Add_ppeta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta2sp_To_Orderings;


   procedure Add_ppeta3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeta3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeta3sp_To_Orderings;


   procedure Add_tupta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta1sp_To_Orderings;


   procedure Add_tupta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupta2sp_To_Orderings;


   procedure Add_apta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta1sp_To_Orderings;


   procedure Add_apta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta2sp_To_Orderings;


   procedure Add_apta3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apta3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apta3sp_To_Orderings;


   procedure Add_truta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta1sp_To_Orderings;


   procedure Add_truta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truta2sp_To_Orderings;


   procedure Add_expta1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expta1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta1sp_To_Orderings;


   procedure Add_expta2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expta2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expta2sp_To_Orderings;


   procedure Add_ocpti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti1hd_To_Orderings;


   procedure Add_ocpti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti2hd_To_Orderings;


   procedure Add_ocpti3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti3hd_To_Orderings;


   procedure Add_ocpti4hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti4hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti4hd_To_Orderings;


   procedure Add_wpti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpti1hd_To_Orderings;


   procedure Add_wppti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti2hd_To_Orderings;


   procedure Add_wppti3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppti3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti3hd_To_Orderings;


   procedure Add_ppeti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti1hd_To_Orderings;


   procedure Add_ppeti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti2hd_To_Orderings;


   procedure Add_ppeti3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeti3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti3hd_To_Orderings;


   procedure Add_tupti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti1hd_To_Orderings;


   procedure Add_tupti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti2hd_To_Orderings;


   procedure Add_apti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti1hd_To_Orderings;


   procedure Add_apti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti2hd_To_Orderings;


   procedure Add_apti3hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apti3hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti3hd_To_Orderings;


   procedure Add_truti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti1hd_To_Orderings;


   procedure Add_truti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti2hd_To_Orderings;


   procedure Add_expti1hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expti1hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti1hd_To_Orderings;


   procedure Add_expti2hd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expti2hd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti2hd_To_Orderings;


   procedure Add_ocpti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti1sp_To_Orderings;


   procedure Add_ocpti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti2sp_To_Orderings;


   procedure Add_ocpti3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti3sp_To_Orderings;


   procedure Add_ocpti4sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ocpti4sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ocpti4sp_To_Orderings;


   procedure Add_wpti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wpti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wpti1sp_To_Orderings;


   procedure Add_wppti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti2sp_To_Orderings;


   procedure Add_wppti3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wppti3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wppti3sp_To_Orderings;


   procedure Add_ppeti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti1sp_To_Orderings;


   procedure Add_ppeti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti2sp_To_Orderings;


   procedure Add_ppeti3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ppeti3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ppeti3sp_To_Orderings;


   procedure Add_tupti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti1sp_To_Orderings;


   procedure Add_tupti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tupti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tupti2sp_To_Orderings;


   procedure Add_apti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti1sp_To_Orderings;


   procedure Add_apti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti2sp_To_Orderings;


   procedure Add_apti3sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "apti3sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_apti3sp_To_Orderings;


   procedure Add_truti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti1sp_To_Orderings;


   procedure Add_truti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "truti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_truti2sp_To_Orderings;


   procedure Add_expti1sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expti1sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti1sp_To_Orderings;


   procedure Add_expti2sp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "expti2sp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_expti2sp_To_Orderings;


   procedure Add_menpin11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin11_To_Orderings;


   procedure Add_menpin12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin12_To_Orderings;


   procedure Add_menpin13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin13_To_Orderings;


   procedure Add_menpin21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin21_To_Orderings;


   procedure Add_menpin22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin22_To_Orderings;


   procedure Add_menpin23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin23_To_Orderings;


   procedure Add_menpin31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin31_To_Orderings;


   procedure Add_menpin32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin32_To_Orderings;


   procedure Add_menpin33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpin33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpin33_To_Orderings;


   procedure Add_menpol11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol11_To_Orderings;


   procedure Add_menpol12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol12_To_Orderings;


   procedure Add_menpol13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol13_To_Orderings;


   procedure Add_menpol21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol21_To_Orderings;


   procedure Add_menpol22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol22_To_Orderings;


   procedure Add_menpol23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol23_To_Orderings;


   procedure Add_menpol31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol31_To_Orderings;


   procedure Add_menpol32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol32_To_Orderings;


   procedure Add_menpol33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol33_To_Orderings;


   procedure Add_pmenpo11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo11_To_Orderings;


   procedure Add_pmenpo12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo12_To_Orderings;


   procedure Add_pmenpo13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo13_To_Orderings;


   procedure Add_pmenpo21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo21_To_Orderings;


   procedure Add_pmenpo22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo22_To_Orderings;


   procedure Add_pmenpo23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo23_To_Orderings;


   procedure Add_pmenpo31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo31_To_Orderings;


   procedure Add_pmenpo32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo32_To_Orderings;


   procedure Add_pmenpo33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmenpo33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmenpo33_To_Orderings;


   procedure Add_bedroom_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bedroom", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bedroom_To_Orderings;


   procedure Add_benunits_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "benunits", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_benunits_To_Orderings;


   procedure Add_billrate_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "billrate", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_billrate_To_Orderings;


   procedure Add_brma_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "brma", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_brma_To_Orderings;


   procedure Add_burden_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "burden", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_burden_To_Orderings;


   procedure Add_busroom_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "busroom", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_busroom_To_Orderings;


   procedure Add_capval_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "capval", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_capval_To_Orderings;


   procedure Add_charge1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge1_To_Orderings;


   procedure Add_charge2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge2_To_Orderings;


   procedure Add_charge3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge3_To_Orderings;


   procedure Add_charge4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge4_To_Orderings;


   procedure Add_charge5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge5_To_Orderings;


   procedure Add_charge6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge6_To_Orderings;


   procedure Add_charge7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge7_To_Orderings;


   procedure Add_charge8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge8_To_Orderings;


   procedure Add_charge9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "charge9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_charge9_To_Orderings;


   procedure Add_chins_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chins", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chins_To_Orderings;


   procedure Add_chrgpd1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd1_To_Orderings;


   procedure Add_chrgpd2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd2_To_Orderings;


   procedure Add_chrgpd3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd3_To_Orderings;


   procedure Add_chrgpd4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd4_To_Orderings;


   procedure Add_chrgpd5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd5_To_Orderings;


   procedure Add_chrgpd6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd6_To_Orderings;


   procedure Add_chrgpd7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd7_To_Orderings;


   procedure Add_chrgpd8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd8_To_Orderings;


   procedure Add_chrgpd9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "chrgpd9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_chrgpd9_To_Orderings;


   procedure Add_covoths_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "covoths", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_covoths_To_Orderings;


   procedure Add_csewamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csewamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csewamt_To_Orderings;


   procedure Add_csewamt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "csewamt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_csewamt1_To_Orderings;


   procedure Add_ct25d50d_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ct25d50d", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ct25d50d_To_Orderings;


   procedure Add_ctamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctamt_To_Orderings;


   procedure Add_ctannual_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctannual", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctannual_To_Orderings;


   procedure Add_ctband_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctband", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctband_To_Orderings;


   procedure Add_ctbwait_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctbwait", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctbwait_To_Orderings;


   procedure Add_ctcondoc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctcondoc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctcondoc_To_Orderings;


   procedure Add_ctdisc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctdisc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctdisc_To_Orderings;


   procedure Add_ctinstal_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctinstal", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctinstal_To_Orderings;


   procedure Add_ctlvband_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctlvband", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctlvband_To_Orderings;


   procedure Add_ctlvchk_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctlvchk", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctlvchk_To_Orderings;


   procedure Add_ctreb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctreb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctreb_To_Orderings;


   procedure Add_ctrebamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctrebamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctrebamt_To_Orderings;


   procedure Add_ctrebpd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctrebpd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctrebpd_To_Orderings;


   procedure Add_cttime_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cttime", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cttime_To_Orderings;


   procedure Add_cwatamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cwatamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cwatamt_To_Orderings;


   procedure Add_cwatamt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cwatamt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cwatamt1_To_Orderings;


   procedure Add_entry1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "entry1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry1_To_Orderings;


   procedure Add_entry2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "entry2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry2_To_Orderings;


   procedure Add_entry3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "entry3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry3_To_Orderings;


   procedure Add_entry4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "entry4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_entry4_To_Orderings;


   procedure Add_gvtregn_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvtregn", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvtregn_To_Orderings;


   procedure Add_gvtregno_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvtregno", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvtregno_To_Orderings;


   procedure Add_hhldr01_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr01", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr01_To_Orderings;


   procedure Add_hhldr02_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr02", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr02_To_Orderings;


   procedure Add_hhldr03_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr03", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr03_To_Orderings;


   procedure Add_hhldr04_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr04", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr04_To_Orderings;


   procedure Add_hhldr05_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr05", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr05_To_Orderings;


   procedure Add_hhldr06_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr06", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr06_To_Orderings;


   procedure Add_hhldr07_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr07", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr07_To_Orderings;


   procedure Add_hhldr08_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr08", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr08_To_Orderings;


   procedure Add_hhldr09_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr09", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr09_To_Orderings;


   procedure Add_hhldr10_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr10", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr10_To_Orderings;


   procedure Add_hhldr11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr11_To_Orderings;


   procedure Add_hhldr12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr12_To_Orderings;


   procedure Add_hhldr13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr13_To_Orderings;


   procedure Add_hhldr14_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr14", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr14_To_Orderings;


   procedure Add_hhldr97_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhldr97", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhldr97_To_Orderings;


   procedure Add_hhstat_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhstat", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhstat_To_Orderings;


   procedure Add_hlthst_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hlthst", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hlthst_To_Orderings;


   procedure Add_intdate_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intdate", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intdate_To_Orderings;


   procedure Add_mainacc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mainacc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mainacc_To_Orderings;


   procedure Add_mnthcode_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mnthcode", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mnthcode_To_Orderings;


   procedure Add_monlive_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "monlive", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_monlive_To_Orderings;


   procedure Add_multi_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "multi", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_multi_To_Orderings;


   procedure Add_nicoun_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nicoun", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nicoun_To_Orderings;


   procedure Add_nidpnd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nidpnd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nidpnd_To_Orderings;


   procedure Add_nmrmshar_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nmrmshar", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nmrmshar_To_Orderings;


   procedure Add_nopay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nopay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nopay_To_Orderings;


   procedure Add_norate_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "norate", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_norate_To_Orderings;


   procedure Add_onbsroom_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "onbsroom", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_onbsroom_To_Orderings;


   procedure Add_orgid_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "orgid", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_orgid_To_Orderings;


   procedure Add_payrate_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "payrate", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_payrate_To_Orderings;


   procedure Add_ptbsroom_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptbsroom", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptbsroom_To_Orderings;


   procedure Add_rooms_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rooms", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rooms_To_Orderings;


   procedure Add_roomshr_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "roomshr", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_roomshr_To_Orderings;


   procedure Add_rt2rebam_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rt2rebam", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rt2rebam_To_Orderings;


   procedure Add_rtannual_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtannual", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtannual_To_Orderings;


   procedure Add_rtcondoc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtcondoc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtcondoc_To_Orderings;


   procedure Add_rtdpa_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtdpa", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtdpa_To_Orderings;


   procedure Add_rtdpaamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtdpaamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtdpaamt_To_Orderings;


   procedure Add_rtene_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtene", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtene_To_Orderings;


   procedure Add_rteneamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rteneamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rteneamt_To_Orderings;


   procedure Add_rtgen_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtgen", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtgen_To_Orderings;


   procedure Add_rtinstal_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtinstal", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtinstal_To_Orderings;


   procedure Add_rtlpa_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtlpa", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtlpa_To_Orderings;


   procedure Add_rtlpaamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtlpaamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtlpaamt_To_Orderings;


   procedure Add_rtothamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtothamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtothamt_To_Orderings;


   procedure Add_rtother_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtother", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtother_To_Orderings;


   procedure Add_rtreb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtreb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtreb_To_Orderings;


   procedure Add_rtrebamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtrebamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtrebamt_To_Orderings;


   procedure Add_rtrtramt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rtrtramt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rtrtramt_To_Orderings;


   procedure Add_rttimepd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rttimepd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rttimepd_To_Orderings;


   procedure Add_schbrk_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "schbrk", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_schbrk_To_Orderings;


   procedure Add_schfrt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "schfrt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_schfrt_To_Orderings;


   procedure Add_schmeal_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "schmeal", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_schmeal_To_Orderings;


   procedure Add_schmilk_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "schmilk", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_schmilk_To_Orderings;


   procedure Add_seramt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seramt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt1_To_Orderings;


   procedure Add_seramt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seramt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt2_To_Orderings;


   procedure Add_seramt3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seramt3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt3_To_Orderings;


   procedure Add_seramt4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seramt4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt4_To_Orderings;


   procedure Add_seramt5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "seramt5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_seramt5_To_Orderings;


   procedure Add_sercomb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sercomb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sercomb_To_Orderings;


   procedure Add_serpay1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpay1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay1_To_Orderings;


   procedure Add_serpay2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpay2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay2_To_Orderings;


   procedure Add_serpay3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpay3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay3_To_Orderings;


   procedure Add_serpay4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpay4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay4_To_Orderings;


   procedure Add_serpay5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpay5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpay5_To_Orderings;


   procedure Add_sewamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewamt_To_Orderings;


   procedure Add_sewanul_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewanul", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewanul_To_Orderings;


   procedure Add_sewerpay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewerpay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewerpay_To_Orderings;


   procedure Add_sewsep_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewsep", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewsep_To_Orderings;


   procedure Add_sewtime_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sewtime", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sewtime_To_Orderings;


   procedure Add_shelter_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "shelter", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_shelter_To_Orderings;


   procedure Add_sobuy_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sobuy", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sobuy_To_Orderings;


   procedure Add_stramt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stramt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stramt1_To_Orderings;


   procedure Add_stramt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stramt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stramt2_To_Orderings;


   procedure Add_strcov_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "strcov", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_strcov_To_Orderings;


   procedure Add_strmort_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "strmort", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_strmort_To_Orderings;


   procedure Add_stroths_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "stroths", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_stroths_To_Orderings;


   procedure Add_strpd1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "strpd1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_strpd1_To_Orderings;


   procedure Add_strpd2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "strpd2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_strpd2_To_Orderings;


   procedure Add_suballow_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "suballow", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_suballow_To_Orderings;


   procedure Add_sublet_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sublet", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sublet_To_Orderings;


   procedure Add_sublety_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "sublety", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_sublety_To_Orderings;


   procedure Add_subrent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "subrent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_subrent_To_Orderings;


   procedure Add_tenure_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tenure", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tenure_To_Orderings;


   procedure Add_tvlic_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tvlic", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tvlic_To_Orderings;


   procedure Add_typeacc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "typeacc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_typeacc_To_Orderings;


   procedure Add_urb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "urb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_urb_To_Orderings;


   procedure Add_urbrur_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "urbrur", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_urbrur_To_Orderings;


   procedure Add_urindew_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "urindew", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_urindew_To_Orderings;


   procedure Add_urinds_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "urinds", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_urinds_To_Orderings;


   procedure Add_watamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "watamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_watamt_To_Orderings;


   procedure Add_watanul_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "watanul", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_watanul_To_Orderings;


   procedure Add_watermet_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "watermet", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_watermet_To_Orderings;


   procedure Add_waterpay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "waterpay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_waterpay_To_Orderings;


   procedure Add_watrb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "watrb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_watrb_To_Orderings;


   procedure Add_wattime_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wattime", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wattime_To_Orderings;


   procedure Add_whoctbot_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whoctbot", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whoctbot_To_Orderings;


   procedure Add_whorsp01_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp01", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp01_To_Orderings;


   procedure Add_whorsp02_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp02", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp02_To_Orderings;


   procedure Add_whorsp03_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp03", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp03_To_Orderings;


   procedure Add_whorsp04_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp04", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp04_To_Orderings;


   procedure Add_whorsp05_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp05", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp05_To_Orderings;


   procedure Add_whorsp06_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp06", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp06_To_Orderings;


   procedure Add_whorsp07_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp07", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp07_To_Orderings;


   procedure Add_whorsp08_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp08", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp08_To_Orderings;


   procedure Add_whorsp09_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp09", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp09_To_Orderings;


   procedure Add_whorsp10_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp10", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp10_To_Orderings;


   procedure Add_whorsp11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp11_To_Orderings;


   procedure Add_whorsp12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp12_To_Orderings;


   procedure Add_whorsp13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp13_To_Orderings;


   procedure Add_whorsp14_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whorsp14", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whorsp14_To_Orderings;


   procedure Add_whynoct_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "whynoct", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_whynoct_To_Orderings;


   procedure Add_wsewamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsewamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsewamt_To_Orderings;


   procedure Add_wsewanul_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsewanul", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsewanul_To_Orderings;


   procedure Add_wsewtime_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsewtime", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsewtime_To_Orderings;


   procedure Add_yearlive_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yearlive", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yearlive_To_Orderings;


   procedure Add_yearwhc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "yearwhc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_yearwhc_To_Orderings;


   procedure Add_adulth_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "adulth", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_adulth_To_Orderings;


   procedure Add_cwatamtd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "cwatamtd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_cwatamtd_To_Orderings;


   procedure Add_depchldh_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "depchldh", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_depchldh_To_Orderings;


   procedure Add_dischha1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dischha1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dischha1_To_Orderings;


   procedure Add_dischhc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "dischhc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_dischhc1_To_Orderings;


   procedure Add_diswhha1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "diswhha1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswhha1_To_Orderings;


   procedure Add_diswhhc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "diswhhc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_diswhhc1_To_Orderings;


   procedure Add_endowpay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endowpay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endowpay_To_Orderings;


   procedure Add_gbhscost_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gbhscost", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gbhscost_To_Orderings;


   procedure Add_grossct_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "grossct", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_grossct_To_Orderings;


   procedure Add_hbeninc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbeninc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbeninc_To_Orderings;


   procedure Add_hbindhh_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbindhh", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindhh_To_Orderings;


   procedure Add_hbindhh2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbindhh2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbindhh2_To_Orderings;


   procedure Add_hearns_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hearns", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hearns_To_Orderings;


   procedure Add_hhdisben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhdisben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhdisben_To_Orderings;


   procedure Add_hhinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhinc_To_Orderings;


   procedure Add_hhinv_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhinv", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhinv_To_Orderings;


   procedure Add_hhirben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhirben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhirben_To_Orderings;


   procedure Add_hhnirben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhnirben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhnirben_To_Orderings;


   procedure Add_hhothben_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhothben", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhothben_To_Orderings;


   procedure Add_hhrent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhrent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhrent_To_Orderings;


   procedure Add_hhrinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhrinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhrinc_To_Orderings;


   procedure Add_hhrpinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhrpinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhrpinc_To_Orderings;


   procedure Add_hhtvlic_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhtvlic", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhtvlic_To_Orderings;


   procedure Add_hhtxcred_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hhtxcred", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hhtxcred_To_Orderings;


   procedure Add_hothinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hothinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hothinc_To_Orderings;


   procedure Add_hpeninc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hpeninc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hpeninc_To_Orderings;


   procedure Add_hseinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hseinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hseinc_To_Orderings;


   procedure Add_london_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "london", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_london_To_Orderings;


   procedure Add_mortint_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortint", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortint_To_Orderings;


   procedure Add_nihscost_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "nihscost", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_nihscost_To_Orderings;


   procedure Add_penage_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penage", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penage_To_Orderings;


   procedure Add_penhrp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "penhrp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_penhrp_To_Orderings;


   procedure Add_ptentyp2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ptentyp2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ptentyp2_To_Orderings;


   procedure Add_servpay_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "servpay", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_servpay_To_Orderings;


   procedure Add_struins_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "struins", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_struins_To_Orderings;


   procedure Add_tentyp2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tentyp2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tentyp2_To_Orderings;


   procedure Add_tuhhrent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuhhrent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuhhrent_To_Orderings;


   procedure Add_tuwatsew_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tuwatsew", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tuwatsew_To_Orderings;


   procedure Add_watsewrt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "watsewrt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_watsewrt_To_Orderings;


   procedure Add_hcgrent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcgrent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcgrent_To_Orderings;


   procedure Add_hcfeudut_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcfeudut", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcfeudut_To_Orderings;


   procedure Add_hcchrent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcchrent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcchrent_To_Orderings;


   procedure Add_hcservch_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcservch", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcservch_To_Orderings;


   procedure Add_hcmaint_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcmaint", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcmaint_To_Orderings;


   procedure Add_hcsirent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcsirent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcsirent_To_Orderings;


   procedure Add_hcfactor_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcfactor", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcfactor_To_Orderings;


   procedure Add_hcother_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcother", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcother_To_Orderings;


   procedure Add_hcpcomb_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hcpcomb", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hcpcomb_To_Orderings;


   procedure Add_gvhelp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gvhelp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gvhelp_To_Orderings;


   procedure Add_lacode_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lacode", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lacode_To_Orderings;


   procedure Add_lauacode_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lauacode", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lauacode_To_Orderings;


   procedure Add_llcare_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "llcare", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_llcare_To_Orderings;


   procedure Add_needcare_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "needcare", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_needcare_To_Orderings;


   procedure Add_colourtv_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "colourtv", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_colourtv_To_Orderings;


   procedure Add_bwtv_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "bwtv", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_bwtv_To_Orderings;


   procedure Add_serpd1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpd1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd1_To_Orderings;


   procedure Add_serpd2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpd2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd2_To_Orderings;


   procedure Add_serpd3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpd3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd3_To_Orderings;


   procedure Add_serpd4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpd4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd4_To_Orderings;


   procedure Add_serpd5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serpd5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serpd5_To_Orderings;


   procedure Add_outsam11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsam11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam11_To_Orderings;


   procedure Add_outsam12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsam12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam12_To_Orderings;


   procedure Add_outsam21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsam21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam21_To_Orderings;


   procedure Add_outsam22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsam22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam22_To_Orderings;


   procedure Add_outsam31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsam31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam31_To_Orderings;


   procedure Add_outsam32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsam32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsam32_To_Orderings;


   procedure Add_outsin11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsin11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin11_To_Orderings;


   procedure Add_outsin12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsin12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin12_To_Orderings;


   procedure Add_outsin21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsin21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin21_To_Orderings;


   procedure Add_outsin22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsin22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin22_To_Orderings;


   procedure Add_outsin31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsin31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin31_To_Orderings;


   procedure Add_outsin32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsin32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsin32_To_Orderings;


   procedure Add_outspa11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspa11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa11_To_Orderings;


   procedure Add_outspa12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspa12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa12_To_Orderings;


   procedure Add_outspa21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspa21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa21_To_Orderings;


   procedure Add_outspa22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspa22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa22_To_Orderings;


   procedure Add_outspa31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspa31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa31_To_Orderings;


   procedure Add_outspa32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspa32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspa32_To_Orderings;


   procedure Add_outspd11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspd11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd11_To_Orderings;


   procedure Add_outspd12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspd12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd12_To_Orderings;


   procedure Add_outspd21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspd21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd21_To_Orderings;


   procedure Add_outspd22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspd22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd22_To_Orderings;


   procedure Add_outspd31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspd31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd31_To_Orderings;


   procedure Add_outspd32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outspd32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outspd32_To_Orderings;


   procedure Add_borramt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "borramt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_borramt1_To_Orderings;


   procedure Add_borramt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "borramt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_borramt2_To_Orderings;


   procedure Add_borramt3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "borramt3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_borramt3_To_Orderings;


   procedure Add_endwp11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp11_To_Orderings;


   procedure Add_endwp12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp12_To_Orderings;


   procedure Add_endwp13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp13_To_Orderings;


   procedure Add_endwp21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp21_To_Orderings;


   procedure Add_endwp22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp22_To_Orderings;


   procedure Add_endwp23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp23_To_Orderings;


   procedure Add_endwp31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp31_To_Orderings;


   procedure Add_endwp32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp32_To_Orderings;


   procedure Add_endwp33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp33_To_Orderings;


   procedure Add_endwp41_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp41", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp41_To_Orderings;


   procedure Add_endwp42_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp42", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp42_To_Orderings;


   procedure Add_endwp43_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp43", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp43_To_Orderings;


   procedure Add_endwp51_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp51", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp51_To_Orderings;


   procedure Add_endwp52_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp52", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp52_To_Orderings;


   procedure Add_endwp53_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "endwp53", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_endwp53_To_Orderings;


   procedure Add_incmin11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin11_To_Orderings;


   procedure Add_incmin12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin12_To_Orderings;


   procedure Add_incmin13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin13_To_Orderings;


   procedure Add_incmin21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin21_To_Orderings;


   procedure Add_incmin22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin22_To_Orderings;


   procedure Add_incmin23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin23_To_Orderings;


   procedure Add_incmin31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin31_To_Orderings;


   procedure Add_incmin32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin32_To_Orderings;


   procedure Add_incmin33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmin33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmin33_To_Orderings;


   procedure Add_incmp11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp11_To_Orderings;


   procedure Add_incmp12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp12_To_Orderings;


   procedure Add_incmp13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp13_To_Orderings;


   procedure Add_incmp21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp21_To_Orderings;


   procedure Add_incmp22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp22_To_Orderings;


   procedure Add_incmp23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp23_To_Orderings;


   procedure Add_incmp31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp31_To_Orderings;


   procedure Add_incmp32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp32_To_Orderings;


   procedure Add_incmp33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmp33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmp33_To_Orderings;


   procedure Add_incmpa11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa11_To_Orderings;


   procedure Add_incmpa12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa12_To_Orderings;


   procedure Add_incmpa13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa13_To_Orderings;


   procedure Add_incmpa21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa21_To_Orderings;


   procedure Add_incmpa22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa22_To_Orderings;


   procedure Add_incmpa23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa23_To_Orderings;


   procedure Add_incmpa31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa31_To_Orderings;


   procedure Add_incmpa32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa32_To_Orderings;


   procedure Add_incmpa33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "incmpa33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_incmpa33_To_Orderings;


   procedure Add_pincmp11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp11_To_Orderings;


   procedure Add_pincmp12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp12_To_Orderings;


   procedure Add_pincmp13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp13_To_Orderings;


   procedure Add_pincmp21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp21_To_Orderings;


   procedure Add_pincmp22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp22_To_Orderings;


   procedure Add_pincmp23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp23_To_Orderings;


   procedure Add_pincmp31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp31_To_Orderings;


   procedure Add_pincmp32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp32_To_Orderings;


   procedure Add_pincmp33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pincmp33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pincmp33_To_Orderings;


   procedure Add_intpri1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intpri1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intpri1_To_Orderings;


   procedure Add_intpri2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intpri2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intpri2_To_Orderings;


   procedure Add_intpri3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "intpri3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_intpri3_To_Orderings;


   procedure Add_pintrpi1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pintrpi1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pintrpi1_To_Orderings;


   procedure Add_pintrpi2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pintrpi2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pintrpi2_To_Orderings;


   procedure Add_pintrpi3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pintrpi3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pintrpi3_To_Orderings;


   procedure Add_loanyr1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loanyr1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanyr1_To_Orderings;


   procedure Add_loanyr2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loanyr2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanyr2_To_Orderings;


   procedure Add_loanyr3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "loanyr3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_loanyr3_To_Orderings;


   procedure Add_menpol1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol1_To_Orderings;


   procedure Add_menpol2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol2_To_Orderings;


   procedure Add_menpol3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "menpol3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_menpol3_To_Orderings;


   procedure Add_morall1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morall1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morall1_To_Orderings;


   procedure Add_morall2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morall2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morall2_To_Orderings;


   procedure Add_morall3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morall3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morall3_To_Orderings;


   procedure Add_morflc1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morflc1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morflc1_To_Orderings;


   procedure Add_morflc2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morflc2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morflc2_To_Orderings;


   procedure Add_morflc3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morflc3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morflc3_To_Orderings;


   procedure Add_morinp1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morinp1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinp1_To_Orderings;


   procedure Add_morinp2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morinp2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinp2_To_Orderings;


   procedure Add_morinp3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morinp3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinp3_To_Orderings;


   procedure Add_pmorinp1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmorinp1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmorinp1_To_Orderings;


   procedure Add_pmorinp2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmorinp2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmorinp2_To_Orderings;


   procedure Add_pmorinp3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "pmorinp3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_pmorinp3_To_Orderings;


   procedure Add_morinus1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morinus1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinus1_To_Orderings;


   procedure Add_morinus2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morinus2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinus2_To_Orderings;


   procedure Add_morinus3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morinus3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morinus3_To_Orderings;


   procedure Add_mortend1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortend1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortend1_To_Orderings;


   procedure Add_mortend2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortend2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortend2_To_Orderings;


   procedure Add_mortend3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortend3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortend3_To_Orderings;


   procedure Add_mortlef1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortlef1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortlef1_To_Orderings;


   procedure Add_mortlef2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortlef2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortlef2_To_Orderings;


   procedure Add_mortlef3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortlef3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortlef3_To_Orderings;


   procedure Add_mortpro1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortpro1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortpro1_To_Orderings;


   procedure Add_mortpro2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortpro2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortpro2_To_Orderings;


   procedure Add_mortpro3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mortpro3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mortpro3_To_Orderings;


   procedure Add_morttyp1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morttyp1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morttyp1_To_Orderings;


   procedure Add_morttyp2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morttyp2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morttyp2_To_Orderings;


   procedure Add_morttyp3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morttyp3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morttyp3_To_Orderings;


   procedure Add_morupd1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morupd1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morupd1_To_Orderings;


   procedure Add_morupd2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morupd2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morupd2_To_Orderings;


   procedure Add_morupd3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morupd3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morupd3_To_Orderings;


   procedure Add_morus1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morus1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morus1_To_Orderings;


   procedure Add_morus2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morus2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morus2_To_Orderings;


   procedure Add_morus3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "morus3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_morus3_To_Orderings;


   procedure Add_mpcove11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove11_To_Orderings;


   procedure Add_mpcove12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove12_To_Orderings;


   procedure Add_mpcove13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove13_To_Orderings;


   procedure Add_mpcove21_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove21", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove21_To_Orderings;


   procedure Add_mpcove22_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove22", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove22_To_Orderings;


   procedure Add_mpcove23_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove23", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove23_To_Orderings;


   procedure Add_mpcove31_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove31", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove31_To_Orderings;


   procedure Add_mpcove32_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove32", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove32_To_Orderings;


   procedure Add_mpcove33_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "mpcove33", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_mpcove33_To_Orderings;


   procedure Add_outsmor1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsmor1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsmor1_To_Orderings;


   procedure Add_outsmor2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsmor2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsmor2_To_Orderings;


   procedure Add_outsmor3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "outsmor3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_outsmor3_To_Orderings;


   procedure Add_rmamt1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmamt1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmamt1_To_Orderings;


   procedure Add_rmamt2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmamt2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmamt2_To_Orderings;


   procedure Add_rmamt3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmamt3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmamt3_To_Orderings;


   procedure Add_rmort1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmort1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmort1_To_Orderings;


   procedure Add_rmort2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmort2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmort2_To_Orderings;


   procedure Add_rmort3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmort3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmort3_To_Orderings;


   procedure Add_rmortyr1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmortyr1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmortyr1_To_Orderings;


   procedure Add_rmortyr2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmortyr2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmortyr2_To_Orderings;


   procedure Add_rmortyr3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmortyr3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmortyr3_To_Orderings;


   procedure Add_rmpur011_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur011", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur011_To_Orderings;


   procedure Add_rmpur012_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur012", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur012_To_Orderings;


   procedure Add_rmpur013_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur013", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur013_To_Orderings;


   procedure Add_rmpur021_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur021", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur021_To_Orderings;


   procedure Add_rmpur022_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur022", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur022_To_Orderings;


   procedure Add_rmpur023_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur023", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur023_To_Orderings;


   procedure Add_rmpur031_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur031", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur031_To_Orderings;


   procedure Add_rmpur032_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur032", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur032_To_Orderings;


   procedure Add_rmpur033_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur033", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur033_To_Orderings;


   procedure Add_rmpur041_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur041", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur041_To_Orderings;


   procedure Add_rmpur042_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur042", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur042_To_Orderings;


   procedure Add_rmpur043_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur043", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur043_To_Orderings;


   procedure Add_rmpur051_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur051", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur051_To_Orderings;


   procedure Add_rmpur052_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur052", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur052_To_Orderings;


   procedure Add_rmpur053_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur053", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur053_To_Orderings;


   procedure Add_rmpur061_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur061", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur061_To_Orderings;


   procedure Add_rmpur062_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur062", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur062_To_Orderings;


   procedure Add_rmpur063_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur063", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur063_To_Orderings;


   procedure Add_rmpur071_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur071", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur071_To_Orderings;


   procedure Add_rmpur072_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur072", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur072_To_Orderings;


   procedure Add_rmpur073_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur073", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur073_To_Orderings;


   procedure Add_rmpur081_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur081", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur081_To_Orderings;


   procedure Add_rmpur082_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur082", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur082_To_Orderings;


   procedure Add_rmpur083_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rmpur083", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rmpur083_To_Orderings;


   procedure Add_buyyear_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "buyyear", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_buyyear_To_Orderings;


   procedure Add_purcamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "purcamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_purcamt_To_Orderings;


   procedure Add_purcloan_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "purcloan", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_purcloan_To_Orderings;


   procedure Add_secmpur3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur3_To_Orderings;


   procedure Add_secmpur4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur4_To_Orderings;


   procedure Add_secmpur1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur1_To_Orderings;


   procedure Add_secmpur5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur5_To_Orderings;


   procedure Add_secmpur6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur6_To_Orderings;


   procedure Add_secmpur2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur2_To_Orderings;


   procedure Add_secmpur7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "secmpur7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_secmpur7_To_Orderings;


   procedure Add_rexhham1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rexhham1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rexhham1_To_Orderings;


   procedure Add_accchk1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accchk1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accchk1_To_Orderings;


   procedure Add_rexhhwh1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rexhhwh1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rexhhwh1_To_Orderings;


   procedure Add_prexhha1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "prexhha1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_prexhha1_To_Orderings;


   procedure Add_accjbp10_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp10", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp10_To_Orderings;


   procedure Add_accjbp11_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp11", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp11_To_Orderings;


   procedure Add_accjbp12_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp12", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp12_To_Orderings;


   procedure Add_accjbp13_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp13", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp13_To_Orderings;


   procedure Add_accjbp14_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp14", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp14_To_Orderings;


   procedure Add_accjob_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjob", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjob_To_Orderings;


   procedure Add_ctract_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ctract", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ctract_To_Orderings;


   procedure Add_eligamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "eligamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_eligamt_To_Orderings;


   procedure Add_eligpd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "eligpd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_eligpd_To_Orderings;


   procedure Add_fairrent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fairrent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fairrent_To_Orderings;


   procedure Add_furnish_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "furnish", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_furnish_To_Orderings;


   procedure Add_hbenamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbenamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenamt_To_Orderings;


   procedure Add_hbenchk_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbenchk", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenchk_To_Orderings;


   procedure Add_hbenefit_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbenefit", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenefit_To_Orderings;


   procedure Add_hbenpd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbenpd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenpd_To_Orderings;


   procedure Add_hbenwait_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbenwait", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbenwait_To_Orderings;


   procedure Add_hbmnth_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbmnth", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbmnth_To_Orderings;


   procedure Add_hbrecp_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbrecp", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbrecp_To_Orderings;


   procedure Add_hbweeks_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbweeks", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbweeks_To_Orderings;


   procedure Add_hbyear_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbyear", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbyear_To_Orderings;


   procedure Add_hbyears_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hbyears", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hbyears_To_Orderings;


   procedure Add_landlord_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "landlord", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_landlord_To_Orderings;


   procedure Add_niystart_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "niystart", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_niystart_To_Orderings;


   procedure Add_othtype_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "othtype", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_othtype_To_Orderings;


   procedure Add_rebate_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rebate", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rebate_To_Orderings;


   procedure Add_rent_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rent", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rent_To_Orderings;


   procedure Add_rentdoc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rentdoc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentdoc_To_Orderings;


   procedure Add_renthol_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "renthol", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_renthol_To_Orderings;


   procedure Add_rentpd_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rentpd", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentpd_To_Orderings;


   procedure Add_rentpd1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rentpd1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentpd1_To_Orderings;


   procedure Add_rentpd2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rentpd2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rentpd2_To_Orderings;


   procedure Add_resll_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "resll", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_resll_To_Orderings;


   procedure Add_resll2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "resll2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_resll2_To_Orderings;


   procedure Add_serincam_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "serincam", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_serincam_To_Orderings;


   procedure Add_tentype_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tentype", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tentype_To_Orderings;


   procedure Add_weekhol_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "weekhol", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_weekhol_To_Orderings;


   procedure Add_wsinc_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsinc", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsinc_To_Orderings;


   procedure Add_wsincamt_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "wsincamt", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_wsincamt_To_Orderings;


   procedure Add_ystartr_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "ystartr", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_ystartr_To_Orderings;


   procedure Add_accjbp1_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp1", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp1_To_Orderings;


   procedure Add_accjbp2_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp2", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp2_To_Orderings;


   procedure Add_accjbp3_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp3", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp3_To_Orderings;


   procedure Add_accjbp4_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp4", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp4_To_Orderings;


   procedure Add_accjbp5_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp5", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp5_To_Orderings;


   procedure Add_accjbp6_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp6", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp6_To_Orderings;


   procedure Add_accjbp7_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp7", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp7_To_Orderings;


   procedure Add_accjbp8_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp8", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp8_To_Orderings;


   procedure Add_accjbp9_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "accjbp9", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_accjbp9_To_Orderings;


   procedure Add_rexhh_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rexhh", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rexhh_To_Orderings;


   procedure Add_rntfull_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "rntfull", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_rntfull_To_Orderings;


   procedure Add_lighting_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lighting", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lighting_To_Orderings;


   procedure Add_heating_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "heating", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_heating_To_Orderings;


   procedure Add_hotwater_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "hotwater", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_hotwater_To_Orderings;


   procedure Add_fuelcook_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "fuelcook", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_fuelcook_To_Orderings;


   procedure Add_tvlice_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "tvlice", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_tvlice_To_Orderings;


   procedure Add_elec_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "elec", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_elec_To_Orderings;


   procedure Add_gas_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "gas", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_gas_To_Orderings;


   procedure Add_lsf_To_Orderings( c : in out d.Criteria; direction : d.Asc_Or_Desc ) is   
   elem : d.Order_By_Element := d.Make_Order_By_Element( "lsf", direction  );
   begin
      d.add_to_criteria( c, elem );
   end Add_lsf_To_Orderings;



   -- === CUSTOM PROCS START ===
   -- === CUSTOM PROCS END ===

end Ukds.Frs.Frs1516_IO;
