FORMASY 2 : handleiding bij een conversationeel personeelsplanningssysteem

personeelsplanningssysteem

Citation for published version (APA):

Verhoeven, C. J. (1977). FORMASY 2 : handleiding bij een conversationeel personeelsplanningssysteem. (Memorandum COSOR; Vol. 7719). Technische Hogeschool Eindhoven.

Document status and date: Gepubliceerd: 01/01/1977

Document Version:

Uitgevers PDF, ook bekend als Version of Record

Please check the document version of this publication:

• A submitted manuscript is the version of the article upon submission and before peer-review. There can be important differences between the submitted version and the official published version of record. People interested in the research are advised to contact the author for the final version of the publication, or visit the DOI to the publisher's website.

• The final author version and the galley proof are versions of the publication after peer review.

• The final published version features the final layout of the paper including the volume, issue and page numbers.

Link to publication

General rights

Copyright and moral rights for the publications made accessible in the public portal are retained by the authors and/or other copyright owners and it is a condition of accessing publications that users recognise and abide by the legal requirements associated with these rights. • Users may download and print one copy of any publication from the public portal for the purpose of private study or research. • You may not further distribute the material or use it for any profit-making activity or commercial gain

• You may freely distribute the URL identifying the publication in the public portal.

If the publication is distributed under the terms of Article 25fa of the Dutch Copyright Act, indicated by the “Taverne” license above, please follow below link for the End User Agreement:

www.tue.nl/taverne

Take down policy

If you believe that this document breaches copyright please contact us at:

openaccess@tue.nl

providing details and we will investigate your claim.

TECHNISCHE HOGESCHOOL EINDHOVEN

Onderafdeling der Wiskunde

SECTIE KANSREKENING, STATISTIEK EN OPERATIONS RESEARCH GROEP

FORMASY 2:

Handleiding bij een conversationeel personeelsplanningssysteem door C.J. Verhoeven Memorandum COSOR 77~19 Eindhoven, september 1977 Nederland

1 •

Handleiding bij een conversationeel personeelsplanningssysteem

Inleiding

Doel van het computerprogramma FORMASY 2, dat via een terminalaansluiting op een computersysteen kan worden gebruikt, is het voorspellen van de ontwikkeling van een zekere personeelsbezetting over een middellange termijnperiode en het onderzoeken van de invloed van mogelijke beleids-wijzigingen op deze ontwikkeling. Het gehanteerde promotiebeleid

is daarbij mede bepalend voor de beschikbaarheid van personeel in verschillende categorieen in de toekomst. Zo'n categorie wordt in

d~t pl~nningssysteem bijvoorbeeld gede£ipieerd door de kenmerken:

'V1A vo (;!' ~. 'i.~~" (,!~ci.AA- ~~<>i

:t:an8 ~it:m.eti:egl!!eel'~, leeftij dsgroep,....ephioaMtgsfti y6~J.e.eptijd (d. V. z.

he~ 8afttal ja~ea eat iem&ft8 ~ de rang VQ~bl~ji~, ofwat-aaeienniteit

i~ de yHftg'T-:

Het computerprogramma is geschreven in BEA (Burrough's Extended Algol), een versie van ALGOL 60.

FORMASY 2 is gebaseerd op Markov-modellen waarbij de verandering van de bezetting in de toekomst wordt beschreven met behulp van promotie-en verlooppercpromotie-entages. Door het kiezpromotie-en van wervingsaantallpromotie-en in

verschillende categorieen kan word~n nagegaan hoe een streefbezetting op middellange termijn eventueel kan worden bereikt. Het

conver-sationele karakter maakt het mogelijk om op snelle wijze de effecten van wijzigingen in promotie- en/of verlooppercentages alsmede van veranderingen in recruteringsaantallen op de personeelsbezetting weer

te geven.

Dit systeem FORMASY 2 is een vervolg op het (niet conversationele)

computerprogramma FORMASY waarmede het bovendien mogelijk was rechtstreeks efficiente wervingsaantallen in de onderscheiden categorieen te berekenen. Er zal getracht worden een verbeterde versie van dit "recruteringsge-deelte" binnenkort toe te voegen. Voor een uitgebreide beschrijving van FORMASY zij verwezen naar: J. Wessels en J.A.E.E. van Nunen [2];

zie voor een toepassing hiervan: C.J. Verhoeven [1] •

FORMASY 2 bestaat uit een aantal procedures en het hoo£dprogramma waarin deze, afbankelijk van de wensen van de gebruiker, worden aangeroepen. De noodzakelijke gegevens worden ingevoerd door middel van een tevoren vastgesteld bestand dat onder een bepaalde naam in het geheugen is opgeslagen. Tijdens het verwerken van het programma beantwoordt de gebruiker vragen waarmee hij zijn wensen kan opgeven ten aanzien van de resultatenverzorging (output), opslaan van gewijzigde gegevens, te

·

.,

c • ₂

2

-hanteren opties, etc.

In par. 2 zullen wij een toelichting geven op de wijze waarop de ont-wikkeling van de personeelsbezetting wordt berekend en de mogelijk-heden met betrekking tot het onderzoeken van effecten van beleids-veranderingen. In par. 3 voIgt dan een beschrijving van de vereiste handelingen en input van gegevens voor het concrete gebruik van FORMASY 2 alsmede een voorbeeld van toepassing van dit systeem.

Tenslotte worJen in par. 4 met behulp van een blokschema de gedeelten belicht waaruit het programma is opgebouwd. Aan het einde van deze paragraaf volgen nog enige slotopmerkingen m.b.t. latere wijzigingen en de literatuurverwijzingen. In appendix A geven wij de

computer-gutput bij het voorbeeld van par. 3. Appendix B beschrijft de procedures van FORMASY 2 en appendix C bevat een listing van het computerprogramma.

2. Ontwikkeling van de personeelsbezetting in de toekomst

Voor het gebruik van het systeem FORMASY 2 worden de personeelsleden naar een aantal kenmerken ingedeeld in klassen of categorieen,

bijvoor-~ ~~

beeld (g, a, q, c~ met: g - functiegroep (~, a

=

leeftijdsgroep, q

=

~E!1cfL'lgsu;a'Wy

l, ..

~pts~~~Q.,~.

Tussen de categorieen

zijn overgangen mogelijk ten gevolge van promoties en verloop (fig. 1).

...

Een personeelslid in d~ klasse C

1 wordt dus gekenmerkt door: functiegroep 2,

t-I.v~~')J

leeftijdsgroep

l'

oplei4~

1

~Een

hoger nummer in de leeftijdsgroep duidt op een oudere leeftijdscategorie.

100,0,0 Igeeft de categorie weer waarnaar personeelsleden overgaan die het systeem verlaten (verloopcategorie).

+-beicllrijft de mogelijke ~rriere van een bepaald personeelslid. De overgangen worden hier jaarlijks geregistreerd.

In het vervolg zullen wij een categorie of klasse definieren als (g,a,q) •

. ,

Uitgaande van de huidige bezetting verdeeld over de categorieen en de promotie- resp. verlooppercentages, wordt nu de verwachte bezetting in elk der klassen voor de volgende jaren berekend. De ingevoerde percen-tages die hetzij fictief, hetzij op historische cijfers gebaseerd zijn, kunnen steeds met behulp van procedures op een drietal manieren worden aangepast:

a. het wijzigen van afzonderlijke overgangspercentages behorende bij een zekere looptijd tussen de categorieen. Dit noemen wij

"individuele wijzigingen".

..~~"-""''':~

kunnen de over#~+~,~'@fi1:'ages behorende bij

de

looptijden aa Yuere looptijden worden toegekend, tijd een me r in een klasse doorbrengt totdat

aatsvindt, wordt een

o~n

verlengt

o rkort. Dit gebeurt dan voor aIle looptijden . n overgang. c.

m~~~~~,QS;u~<!:!:!t',~",#~.,

worden

~:J.~1!'.!""en7'ot'k:;~rlooP-·

percentages bij een bepa ~".e;Q,;:.!! voor ane looptijden met

• -·~V,9!;~t""~"':;''1'$

een door de gebru bepalen factor vermeefttg¥ul~~gl

een of daling van promoties c.q.

Voor de resultaten die het computerprogramma levert, verwijzen wij naar het einde van deze paragraaf.

overgangspercentages van

1, 1) zijn voor een viertal~" ___ _ loopdjden als voIgt: looptij~ ~' ..,. promotiepercentage: 3 20 10

4

-ad a): "individuele wijziging"

"

5%,

;S~,

20%,

>,

"

-"

resu~ nu bijvoorbeeld ' in: ad b): het verla,nge looptijden met een jaar geeft:

ermenigvuldi~n

met een factor 1,2 levert:

6%, 12%, 24% ,

i2.~.

Naast de mogelijkheid van het "sturen" van de bezetting in de volgende jaren door wijzigingen in promotie- c.q. verlooppercentages, kan door het opgeven van wervingsaantallen in de verschillende categorieen naar een redelijke bezetting worden gezocht. Ook deze recruterings-aantallen kun~en, dank zij het conversationele karakter van FORMASY 2, steeds worden aangepast.

Als resultaten kunnen voorlopig uit. dit computerprogramma verkregen worden:

per promoveert syst

b)

VO,~,~'-~1fe ~Ss~\~et J!~~ ta~,,~/;te~;,!-,~>~y~d1ttUl'trindrnjit"pro­

m6he

m~t

resp.

~

verlOt:fpperc~age.

c) Het epaald waar~~~!an):

in ~rangenstelsel

d) De ontwikkeling van de personeelsbezetting in de rangen op

middel-lange

termi.i$v~~l

uitgesplitst in

leeftijd~groepen)

ep.;r

~

~

..

~=.-*

leidjpgsuilTe's, .oo~~n of welke andere kenmerken dan ook zijn opgenomen.

e) De jaarlijkse stromen (recruteringen, promoties, verloop) die in de onderscheiden functiegroepen plaatsvinden.

3. Toepassing van FORMASY 2

Voor het gebruik van het computerprogramma is een databestand nodig dat de volgende gegevens bevat:

a) opties:

Op een regel worden achtereenvolgens ingelezen:

'(VA. ¥-~ I j

aantalrangen (functiegroepen), aantal leeftijdsgroepen,

aantal gp'e.aiftgsftrvoJs, aantal onderscheiden looptijden

(=)1),

.

..

1 . .. 1) 1 l' 'k

aanta categor1een , totaa1 aanta moge 1J e overgangen tussen de k1assen.

b) Definitie van de categorieenl'

S_a",

uU;laltis&a

~g,'l'f';q~" ""'~-l'I.ne

verloopcategorie aIs 1aatste in1ezen. Intern worden aan deze klassen naar de ingevoerde volgorde de nummers 1,2, ••• toegekend.

c) Nu wordt voor e1ke mogelijke overgang opgegeven:

~ nummer van de categorie van waaruit de over gang kan p1aatsvinden en het nummer van de klasse waarheen de overgang kan plaatsvinden ~

~ ~p

de eweede

fegel:~hierbij

behorende overgangspercentage.

d) Het jaartal waarop de startbezetting betrekking heeft. e) Huidige bezettingt

~

~pg.re!el WdI~ de startbezetting in elk der categorieen (naar ingelezen volgorde!) in_dl"QlI'dI;~O&ptijdeI2.J

_,

,,*,- ~

Uiteraard b1ijft de verloopcategorie hier buiten beschouwing.

f)

~I ~l~~

r:t""

t+.,c4-

te-~"""

~ ~ : II!)) ~~~, Pt-.~ye·

AIle getal1en worden gescneiden'door een komma.

Ais voorbeeld geven wij hier een bestand van het korps technische

ambtenaren bij een overheidsorganisatie (tabel 1). Er wordt hier aileen een inde1ing gemaakt in vijf functiegroepen2) en dertien looptijdenj het aantal opleidingsnivo's en leeftijdsgroepen is een. De zes klassen zijn nu: C)-CI,I,I), C

2-(2,1,1), C3-(3,1,1), C4=(4,1,1), C5=(5,1,1) en

C

6-(0,O,O). Er zijn in dit geval negen mogelijke overgangen: 1,2; 1,6;

2,3; 2,6; 3,4; 3,6;4,5; 4,6; 5,6. De be~ettingseij~ers duid,en op het jaar

1977. Deze worden tenslotte opgegeven voor de dertien onderscheiden looptijden bij de categorieen I tIm 5.

I) 0pm.l: Let op: Een categorie is gedefinieerd als (g,a,q).

»8

100ptijd ¥ordt

.. ~ee.·"'i'ft"·hee i-ftt!erfte' " pf 'Cgt anma t;:eegeveegd..

Opm.2: In plaats van deze kenmerken kunnen ook andere antecedenten worden opgenomen.

Opm.3: De verloopklasse definierenwij door (0,0,0) en moet ook bij het aantal categorieen worden meegeteld.

2) De rang en zijn hier: technisch ambtenaK", techal.sch ambteuaar Ie kl . . . . , technisch hoofdambtenaar, technisch-hoofdBrnbtenaar Ie klasse, technisch hoofdambtenaar voor bijzondere diensten en hoger.

-100 200 300 400 500 600 700

.

-

₈₀₀ 900 1000 1100 1200 1300 1400 1500 1600 1700 1800 1900 2000 2100 2200 2300 2400

....

2500 2600 2700 2800 2900 3000 3100

•

---~ ... -. 6 -Tabel 1 Geaevensbestand ----~ .--~ -5r1,1,13,6,9 1,1,1 2,1,1 3,1,1 4,t ,1 5,1 rl 0,0,0 1,2 8.1,23.3,60.0,51.9,44.9,30.0,30.0,30.0,30.0,30.0,30.0,30.0,30.0 1,6 8.2, 9.5, 6.8, 9.0,10.3, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0 2,3 2.1, 3.3, 6.0,15.8,24.2,23.5,32.3,13.0,21.3,15.9,22.8, 5.0, 5.0 2,6 5.8, 3.9, 4.0, 3.8, 2.6, 0.9, 5.7, 2.0, 2.2, 5.8, 7.0, 7.0, 7.0 3,4 0.0, 0.7, 7.9, 8.9, 9.8,16.3,15.3,10.7,32.4,20.8, 2.0, 2.0, 2.0 3,6 0.4, 0.5, 1.4, 6.5, 2.3, 3.9, 3.4, 4.5, 2.7,15.1, 6.0, 6.0, 6.0 4,5 0.8, 1.4, 4.8,14.7, 8.8,20.1,10.4,23.8, 4.0, 4.0, 4.0, 4.0, 4.0 4,6 1.5, 2.7, 1.6, 3.4, 3.5, 4.5,10.4, 4.8, 4.0, 4.0, 4.0, 4.0, 4.0 5,6 0.9, 5.4, 7.4, 5.3,12.2,10.5,20.0,20.0,20.0,30.0,30.0,30.0,30.0 1977 63,77,49,33, 3, 3, 1P 0, 0, 0, 0, 0, 0 91,82,91,61,45,79,42,12, 9, 4, 6, 2,31 45,61,51,42,21,51,40,23,17,12, 6, 5r10 15,35,29,19, 8,25,25,13, 4, 3, 5, 2, 1 10,11,12,13, 5, 8,13, 2, 2, 2, 1, 0, 0

In tegenstelling tot de situatie bij het korps technische ambtenaren (H.B.O'ers) bleek bij het rangenstelsel van de opzichters bij dezelfde overheidsdienst de noodzakelijkheid om het opleidingsnivo van de functio-narissen bij de parameters op te nemen. Dit model wordt dan gespecifi-ceerd door vijf functiegroepen, vier opleidingsnivo's en twaalf loop-tijden.

Wij zullen nu de achtereenvolgens geleverde output en te beantwoorden vragen bij het verwerken van FORMASY 2 bespreken. Appendix A dat een voorbeeld van toepassing van het computerprogramma met het eerder genoemde databestand (tabel 1) beschrijft, kan daartoe als leidraad dienen. De nummers in onderstaande beschrijving corresponderen met de

. d' 1)

nummers 1n appen 1X A

---

. I) duidt op een vraag die door de gebruiker dient te worden beantwoord.

11: bij deze vraa& kan het woord HELP worden ingetypt; de computer geeft

.

..

1. Allereerst wordt een begintekst gegeven. 2. Vervolgens moet men de vraag beantwoorden:

? VAN WELK BESTAND WILT U GEGEVENS INLEZEN?

Hiertoe wordt de naam van het databestand, afgesloten door een punt, ingetypt.

In ons voorbeeld is dit TECHNAMBT77 •

3. De volgende opdracht aan de gebruiker luidt:

$1 LEES NU CODENAMEN IN A.U.B.

Met behulp van een aantal codewoorden, die worden afgesloten door een cijfer op een volgende regel, stuurt men de door de computer te verrichten opdrachten.

De codenamen zijn:

a) INPUTPRINT, wanneer men een weergave in tabelvorm van de ingevoerde gegevens van het databestand wenst.

b) EXTRAPRINT, leidt tot het uitprinten van de minimale, maximale en gemiddelde looptijden waarbij promotie of verloop plaatsvindt in de verschillende categorieen. Ook het cumulatieve percentage dat uiteindelijk promoveert of het systeem verlaat c.q. in de klasse blijft, wordt meegedeeld. Wanneer er bovendien sprake is van een

leeftijds- en een opleidingsgroep krijgt men, na opgave van de gemiddelde leeftijd van de personeelsleden bij

indiensttreding het promotieschena in het rangenstelsel, d.w.z. de gemiddelde leeftijden waarbij promotie plaats-vindt.

c) TOPMAX, resulteert in de vraag met hoeveel jaren de grootste looptijd in de rang (-L) vermeerderd moet worden om de cumulatieve promotie-, verloop en blijverspercentages onder b) te bepalen. Zo kunnen deze percentages worden verkregen om de situatie in een rang tussen L en L+20 jaren weer te geven. Deze codenaam is aIleen zinvol in combinatie met EXTRAPRINT.

d) RECRU, biedt de mogelijkheid om recruterings~antallen in de ver-schillende categorie;u op te geven.

4. Duma moet worden Deantwoorct:

? HOEVEEL JAREN (MAX. 20) WILT U VOORUIT VOORSPELLEN? De gebruiker typt nu het gewenste cijfer in.

8

-5. Na het uitprinten van de eventueel gewenste output via INPUTPRINT en/of EXTRAPRINT voIgt nu:

?

WILT U DE OVERGANGSPERCENTAGES WIJZIGEN?

Wanneer nu bevestigend(JA) wordt gereageerd, moet men bet aantal te wijzigen overgangen opgeven en daama de nummers daarvan (op

af-zonderlijke regels).

Vervolgens geeft men aan van welke wijzigingsmogelijkheden men gebruik wil maken (individueel of procedureel) na de vraag: i? HOE WILT U IN OVERGANG •• WIJZIGEN?

Tenslotte krijgt men de mogelijkheid am eventueel gemaakte

fouten tijdens het aanbrengen van de veranderingen nog te corrigeren. 6. Wanneer de codenaam RECRU werd ingetypt, kan men nu het aantal

klassen opgeven waarin gerecruteerd moet worden en daama steeds het nummer van de categorie met op de volgende regel de te werven aantallen in de voorspellingsperiode.

7. Vervolgens worden de verwachte bezettingsaantallen.per rang uit-geprint voor de gewenste periode in de toekomst.

8. Daarna verschijnt de vraag: i? WELKE OUTPUT WENST U NU?

Door het intypen van een cijfer geeft de gebruiker hier aan of, en zo ja welke tabellen hij wenst te zien:

0: geen verdere outputtabellen

1: voorspelde bezetting gesplitst in leeftijdsgroepen 2: voorspelde bezetting gesplitst in opleidingsnivo's 3: voorspelde bezetting gesplitst in looptijden in de rang 4: recruterings-, promotie- en verloopaantallen per rang in de

toekomst (zgn. flows)

Deze vraag wordt steeds herhaald totdat voldoende informatie is verstrekt en uiteindelijk 0 is ingetypt.

9. Hierna moet worden beantwoord:

i? HOE WILT U HET PROGRAMMA VERVOLGEN?

Het programma wordt nu verder gestuurd door het opgeven van' codenamen, die weer worden afgesloten door een cijfer op een nieuwe rege 1.

De codewoorden zijn hier: a) INPUTPRINT

b) EXTRAPRINT

c) BESTAND: de eventueel gewijzigde gegevens kunnen dan naar een nieuw databestand onder een door de gebruiker gekozen naam worden overgebracht. Het oude

d) RECRU: als men opnieuw wil voorspellen met gewijzigde recruteringsaantallen1)

e) KANS als men nogmaals de voorspelde aantallen voor de toekomst wil berekenen op basis van weer gewijzigde overgangspercentages (er wordt steeds gerekend met de laatstgekozen overgangspercentages). f) STOP : einde van het computerprogramma

Bet programma wordt nu vervolgd totdattenslotte de codenaam STOP

is ingelezen

10) Aan het einde van FORMASY 2 wordt nog een afsluitende tekstregel gegeven.

AIle ingetypte antwoorden op door de computer gestelde vragen worden gecontroleerd, waarna indien nodig een foutmelding voIgt.

4. Opbouw van het camputerprogramma

In deze paragraaf zullen wij met behulp van een blokschema (fig. 2) een beschrijving geven van de gedeelten waaruit FORMASY 2 is opgebouwd. Een overzicht van de procedures van het computerprogramma is weergegeven

in appendix B.

Naar de aard van de bewerkingen kunnen een viertal gedeelten in FORMASY 2 worden onderscheiden:

a) procedures t.b.v. het inlezen van de gegevens

b) rekenprocedures t.a.v. ingevoerde data, telprogramma's, etc. c) voorspellingsprocedure

d) procedures ten behoeve van output van de resultaten, teksten, foutmeldingen, etc.

ad a) Deze procedures regelen het inlezenvan de naam van het databestand, codenamen, lengte van de voorspellingsperiode en de verdere gegevens van het bestand betreffende overgangspercentages,

bezettings-cijfers, enz~

ad b) Deze procedures zorgen o.a. voor het berekenen van de gemiddelde looptijden totdat promotie c.q. verloop plaatsheeft, het bepalen van de cumulatieve promotie- en verlooppercentages, enz.

ad c) Dit is de basisprocedure van het computerprogramma welke de voor-spelde bezetting in de toekamst berekent.

ad d) Deze verzorgen het afdrukken van de tabellen en teksten.

" _{Blok.chea. rORMASY2} ---~' FiS- 2

(

II!61NlWT ) t

I

I'J!STAJIlSIIIWI'

I

...

I

cmowa,

I

t

I

'«l!JIS1IW.l-" I'£lIJIIlE

J

J

.

-

1 lUWlCt l ..L I JIII\IIf'IIIIIT l I EX'IIWItJIIT 1

•

L _• ....

.

I

PEIIC. VIm . . ,

I

-

..

[

-

..

_{I 1&}

l

lIOIVJDUm.'

J

I

I"IICCID. , ,

J

I

_{PADCfJ). t ,}

J

I I I

+

_I

.

..." I - _~ ~

I~-I

.

I

lID CIUII'V1"

I

JA

r

I ~ i 1&

" l

TAla. 17

I I

TAla.

I'

J

f

_{TAla. "}

J

I

R.OIIII t

J

I I I I

I

.. \VMIL.,

J

j III'VlPIUIIf L

--I IlOIW'IUIIT L I l1li0 IESTAIIII , L j

_•

r I IWC

-I L

--t: te beantvoorden yraa8 SlIP

.,

.

-Wij zullen nu het blokschema van FORMASY 2 bespreken. Het programma start met het afdrukken van een begintekst en vervolgens wordt de naam van het gegevensbestand gevraagd. Na het inlezen van de codenamen die de wensen van de gebruiker moe ten weergeven, wordt dan het aantal te voorspellen jaren ingevoerd. Daarna worden het aantal functiegroepen,

leeftijdsgroepen etc. van het databestand gelezen, evenals de definities van de categorieen en de overgangen daartussen. Hiermee zijn de dimensies van de matrices in het programma bepaald.

Vervolgens worden de overige gegevens van het bestand gelezen (overgangs-percentages, basisjaartal en bezettingscijfers) en worden een aantal bewerkingen met de overgangspercentages uitgevoerd (bepalen van

minimale, maximale en gemiddelde looptijd tot promoties c. q. verloop, etc.). Hierna kan de gebruiker percentages wijzigen1) en/of

recruterings-aantallen inlezen. Vervolgens worden de voorspellingen berekend

(m.b.v. procedure 34/appendix B) en kunnen de diverse outputmogelijkheden worden benut.

Tenslotte kan de gebruiker aangeven hoe het programma moet worden ver-volgd d.m.v. het inlezen van codenamen.

Aan het einde van FORMASY 2 voIgt een afsluitende tekstregel.

Dit computerprogramma kan rechtstreeks worden verwerkt via de B-7700 computer van de Technische Hogeschool Eindhoven. Het geheugenbeslag voor het voorbeeld uit par. 3 is ongeveer 6K w~or~en en de rekentijd' bedroeg 2,8 sec. Een listing van FORMASY 2 is gegeven in appendiK C.

Slotopmerkingen

Inmiddels zijn een klein aantal wijzigingen in het computerprogramma aangebracht. Aangezien het systeem in voortdurende ontwikkeling is, zullen veranderingen ook in de toekomst noodzakelijk blijven.

Eventuele wijzigingen zullen echter steeds aan de gebruikers worden meegedeeld.

De voornaamste veranderingen z1Jn op dit moment:

1. De codenaam TOPMAX is komen te vervallen.

De cumulatieve promotie-, verloop- en blijverspercentagesworden nu berekend na L(=max.looptijd) jaren en verder worden de percentages bepaald die uiteindelijk pramoveren c.q. het systeem verlaten. Ook de gemiddelde looptijde~ worden op deze basis berekend.

---1) Deze wijzigingsprocedures zijn beschreven in appendix B, procedures

.

-- 12

-2. Door het opgeven van de codenaam EXTRAPRINT wordt ook de gemiddelde verblijftijd in iedere categorie uitgeprint.

Literatuurverwijzingen:

[IJ C.J. Verhoeven: Een personeelsplanningssysteem gebaseerd op Markov-modellen, COSOR-memorandum 77-05, Technische Hogeschool Eindhoven (1977) [2] J. Wessels en J.A.E.E. van Nunen: FORMASY, FOrecasting and

Recruitment in MAnpower SYstems, Statistica Neerlandia 30 (1977), pag. 173-193.

1

-2

-3

-Appendix A Toepassing van FORMASY 2 op databestand TECHNAMBT77

************************************************************************

FffiMASY2 IS EEN CIJMPUTERPR0GRAMMA VAN DE TECHNISCHE H0GESCHIi)f)L EINDHfJVEN T.B.V. PERS0NEELSPLANNING •

HEBT U fjP- OF AANMERKINGEN # WENDT U ZICH DA\J Ti1:IT :

C.J. VEKH~EVEN # H.G.8.61 I TEL. 040 - 472378 I!!

************************************************************************

VPN "'JELK BESTAND WILT U GEGEVENS INLEZEl'l ?

#1

TECHNAMBT77.

LEES NU CtiDENAMEN IN A. U. B.

HELP

DE C~DENAMEN ZIJN :

I NPUTPR I NT PRINTEN VA\J INV:uEHGEGEVENS

EXTP-APRINT : EXTRA GUTPUT BETREF'FENDE 0VEf~GANGSPERCENTAGES ETC. RECRU : RECRUTERINGSAANTALLEN ePGEVEN

TtlPMAX : EXTRA INVtlER I.V.M. FJ<TP-APRINT NA LAATSTE C~1DENAAM EEN CIJFER {WGEVEN HJPMAX

INPlTfPRINT

HECRU 9

7

H!}EVEEL JAf<EN (MAX. 20) WILT U V~10hUIT V0t1RSPFLLEN ?

MET H0EVEEL JAREN (MAX.20) WILT U DE MAX. L00PTIJD VEPl..ENGEN

.

-""

14

-PRINTEN VPN DATA-INPUT

APNTAL F1J\lCTIEGH@JEPEN CEXCL. VERLO"?> = 5

IW-JTAL LEEFTIJDSGReEPEN

=

1

AA~TAL 0PLEIDINGSGR0EPEN :: 1

GRfJOTSTE LVrJPTIJD PER CATEG®RIE

=

13

AANTAL eNDERSCHEIDEN CATEGeRIEEN :: 6

AA~TAL MGGELIJKE elVERGANGEN TUSSEN CATEOORlEEN:: 9

************************************************************

NlMvlE1<S VA'J DE CATEOORIEEN

---NtlVlMER FlNCTI EGR0EP LEEFTIJDSGR0EP tlPLEID INGSGReJEP

---

--- --.---

---1 1 1 1 2 2 1 1 3 3 1 1 4 4 1 1 5 5 1 1 6 0 0 0

************************************************************

NlMMERS VAN DE eVERGANGEN

0~~GANG NR. VAN CATEG0RIE NR. NAAR CATEG0RIE NR.

---

---

---1 ---1 2 2 1 6 3 2 3 4 2 6 5 3 4 6 3 6 7 4 5 8 4 6 9 5 6

************************************************************

0VERGANGSPERCENTAGES VANUIT CATEG0RIE _••

_•

N.AAk CATEG~J}<IE _•••

MEl' L0~PT 1 J[) _•••

---I, 2, 1 : 8.1 _1" 6, 1 : 8.2 I, 2, 2: 23.3 1, 6, 2: 9.5 t, 2, 3: 60.0 L~ 6, 3: 6.8 h 2, 4: 51.9 1, _6" 4: 9.0 1" 2, 5: 44.9 _1" 6, 5: 10.3 I, 2, 6: 30.0 b 6, 6: 1.0 I, 2, 7: 30.0 1, 6, 7: 1.0 I, 2, 8: 30.0 1, 6, 8: 1.0 1, 2, 9: 30.0 1, 6, 9: 1.0 1" 2,10: 30.0 I, 6,10: 1.0 1, 2,11 : 30.0 I, 6,11 : 1.0 I, 2,,12: 30.0 I, 6,12: 1.0 I" 2,13: 30.0 I" 6,13: 1.0 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••

2", 3 .. 1: 2.1 2.1 6.1 1: 5.8 2.1 3.1 2: 3.3 _{2" 6" 2: 3.9} 2" 3 .. 3: 6.0 2.1 6.1 3: 4.0 2.1 3.1 4: 15.8 2.1 6.1 4: 3.8 2.1 3 .. 5: 24.2 2 .. 6.1 5: 2.6 2 .. 3 .. 6: 23.5 2.1 6.1 6: 0.9 2 .. 3 .. 7: 32.3 _2" 6, 7: 5.7 2 ... 3.1 8: 13.0 2.1 6 .. 8: 2.0 2 .. 3 .. 9: 21.3 2 .. 6 .. 9: 2.2

.

2.1 3 .. 10: 15.9 2 ... 6.110: 5.8 2 .. 3 .. 11 : 22.8 2 .. 6",11 : 7.0 2 ... 3.112: 5.0 2.1 6" 12: 7.0 2 .. 3 .. 13: 5.0 2 .. 6 .. 13: 7.0 •••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 3 .. 4.1 1: 0.0 3 .. 6.1 1: 0.4 3.1 4 .. 2: 0.7 3.1 6.1 2: 0.5 3 .. _{4" 3: 7.9} 3.1 6 .. 3: 1.4 3 ... 4 .. 4: 8.9 3 .. 6 ... 4: 6.5 3 ... 4", 5: 9.8 _{3" 6" 5: 2.3} 3 ... 4.. 6: 16.3 3 .. _{6" 6: 3.9} 3" Lb 7: 15.3 _3" 6 ... 7: 3.4 3, 4", 8: to.7 3", 6.1 8: 4.5 3, 4, 9: 32.4 3", 6 ... 9: 2.7 3" 4..10: 20.8 3", 6 ... 10: 15.1 3 ... 4 ... 11 : 2.0 3 ... 6 ... 11 : 6.0 3 ... 4,12: 2.0 3 .. 6,12: 6.0 3 .. 4,,13: 2.0 _3" 6" 13: 6.0

...•...•...

~

•..•.•••...•..•...

4" 5 .. 1 : 0.8 _{4" 6"} 1 : 1.5 4" 5, 2: 1.4 4" 6" 2: 2.7 4, _{5" 3: 4.8 4"} 6 ... 3: 1.6 4" 5" 4: 14.7 4 ... 6", 4: 3.4 4,. 5,. 5: 8.8 4 ... _{6" 5: 3.5} 4 ... _{5" 6: 20.1} 4 ... _{6" 6:} 4.5 4 .. _{5" 7: 10.4} 4" 6" 7: 10.4 4 .. _{5" 8: 23.8} 4 ... 6 ... 8: 4.8 4 ... 5 .. 9: 4.0 _4" 6 ... 9: 4.0 4 ... 5 ... 10: 4.0 _4" 6 .. 10: 4.0 4 .. 5 .. 11 : 4.0 4 ... 6 ... 11: 4.0 4 .. 5 ... 12: 4.0 4 ... 6 ... 12: 4.0 4 ... 5" 13: 4.0 _4" 6" 13: 4.0 •••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 5" 6,. 1 : 0.9 5,. 6,. 2: 5.4 5 .. _{6" 3: 7.4} 5, 6 ... 4: 5.3 5 .. 6 .. 5: 12.2 5 .. _{6" 6: 10.5} 5 .. 6 ... 7: 20.0 5 ... 6, 8: 20.0

--

5 ... 6" 9: 20.0 5:11 6.110: 30.0 5 ... 6 ... 11 : 30.0 5 .. 6 ... 12: 30.0 5 ... 6 ... 13: 30.0 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••

.

.

5

- --- 16 -HUIDIGE BEZETTING

.

_• 1977

---.---CATEG®RIE NR. L€l0PTIJDEN 1 2 3 4 5 6 7 8 9 10 11 12 13

---1 63 77 49 33 3 3 1 0 0 0 0 0 0 2 91 82 91 61 45 79 42 12 9 4 6 2 31 3 45 61 51 42 21 51 40 23 17 12 6 5 10 4 15 35 29 19 8 25 25 13 4 3 5 2 1 5 10 11 12 13 5 8 13 2 2 2 1 0 0

---EINDE VAN INPL~PRINT

************************************************************

t'llLT IJ DE €JVERGANGSPERCENTAGES ltJIJZIGEN ? ,JA 5 1 3 5 7 8

IN H0EVEEL 0VERGAt\JGEN ~\iILT U lrilJZlGEN ?

GEEF' DE NtJ1.VIERS VAN DE TE v.JIJZIGEN 0VmGANGEN

---H0E \4ILT U IN fJVERGANG 1 WIJZIGEN ?

HELP

TYPE IN

o :

AFZ0NDERLIJKE PERCENTAG~~ WIJZIGEN

1 : OPSCHUIVEN VA'J PERCENTAGES BEH0RENDE BIJ DE L0tJPTIJDEN

2 : PERCENTAGES BIJ EEN 0VErmANG VERMEN lGVlILD I GfJ\J MET fACT0f<

o

HDEVEEL LOOPTlJDEl'J HILT U ItJlJZIGEN IN OVEHGANG 1 '(

3

GEEF' NU DE ~llJZIGINGF.N BIJ DEZE ~JVEkt;ANG : U)€)PlIJD I PFJ-<CfNfAGE

1 .. 0.0 2 .. 20.0

3 .. 30.0

---H0E HILT U IN 0VERGANG 3 HIJZIGEN ?

MET H(!)EVEEL JAREN \!JIL TUDE L®®PTIJDEN VEHSCHUIVEN ?

+

=

VERLENGING VAN L00PTIJDEN I - = VERLAGING VAN LU!Jt'TIJDEi\l 4

---.

.

.'

H~E WILT U IN ~VERGANG 5 WIJZIGEN ?

i"lET HfJEVEEL JAREN \-JILT U DE L0fJPTIJDEN VERSCHlIIVEt\J ?

+

=

VERLENGING VAN L~®PTIJDEN ~ -

=

\~GING VAN LOOPTIJDEN

4

---HfJE \t<lILT U IN OVERGANG 7 t.JIJZIGEN ?

1

MET H0EVEEL JAREN WILT U DE L0ePTIJDEN VERSCHUIVEN ?

+ = VERLENGING VAN L00PTIJDEN ~ -

=

VEHLAGING VAN U:l0PTlJDEN

3

---H0E WILT U IN 0VERGANG 8 ~~IJZlGEN ?

2

MET HELKE I'ACTl'R HILT U DE VVERGA\JGSPERCENTAGES VEl:;:MENIGVLLDIGEN

18

0.90

t'!lL T U DElE 0VE'RGANGSPERCENTAGES N0G FENS \HJZ I GEN ?

NEEN

6

IN H0EVEEL CATEGflRIEEN

~-10ET

VERPLICtIT

GERECRurEF1~D

WUfXDEN ?

1

-

_{GEEI' VAN ALLE CATEGetRIEEN HET NUvlMER EN DAMNA}

DE RECRUTERINGSAA'JTALLEN V00R DE 5 JAREN IN DE T0EXUMST 1

65~ 65~ 65~ 65~ 65

************************************************************

7

BEZETTING PER FlJ'.JCTIEGROEP IN

\}~0RSPELPE'Rlf)DE

---

... .

JAM

*

1 I'lNCTIEGR~EP 2 3 4 5

*

_T0TAAL

---1977

*

229 555 384 184 79

_*

1431 1978

*

225 563 378 182 80

*

1428 1979

*

220 568 371 183 80

_*

1422 1980

*

217 566 371 185 80

_*

1419 1981

_*

217 556 373 187 81

_*

1414 1982

*

218 541 376 190 83

*

1408

************************************************************

c

8

-. -.

,"

18

-WELKE 0lITPUT WENST U NU ?

HEl...P

TYPE IN

4

o :

GEEN VERDERE rJUfPUTTARELLEN

1 : TAREL VAN AANTALLEN IN LEEFTIJDSGR0EPE!'J

2: : TABEL VAl'J AMlTALLEN IN 0PLEIDINGSGR0EPEN

3 : TABEL Vf::t.J AANTALLEN IN L0€lPTIJDEN 4 : Fl..I1jWS IN HET SYSTEEM

Fl.tlltJS IN HET SYSTEEl-1

••••••••••••••••••••

rUNCTIEGR.* FLOW * JAAR

1977 1978 1919 1980 1981

---1 RECR. IN 0 0 0 0 0 1 PRfIM.

IN

0 0 0 0 0 1

nJT.

IN 0 0 0 0 0 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• I

PReM.

~:'Ilrr 50 51 50 41 47 1

VFRL.0UT

19 19 18 18 17 1 TflT .0lJT 69 10 68 65 64 ---~--- ---2 RECR. IN 0 0 0 0 0 2 PRf!M.

IN

50 51 50 47 47 2 TOT.

IN

50 51 50 47 47 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 2 PR0M.OUT 20 23 32 37 41 2 VERL.alIT 22 22 20 20 21 2 Tt)T.{JUT 42 46 52 57 62 3 RECR. IN 0 0 0 0 0 3 PRfJM. IN 20 23 32 37 41 3

nne

IN 20 23 32 37 41 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 3 PR6N.IJUT 14 17 11 19 22 3 VERL.0UT 12 14 15 15 16 3 T€lT.fJUT 26 30 32 35 38

---4 RECR. IN 0 0 0 0 0 4 PR0M. IN 14 17 11 19 22 4 T0T. IN 14 17 17 19 I 22

...

,

.•..•...

4 PRfJM.OUT 9 9 9 11 12 4 VERL.(:JUT 7 7 6 7 7 4 TflT.0UT 15 16 15 18 19

---.---5 RECR. IN 0 0 0 0 0 5 PR0l:v1. IN 9 9 9 11 12 5 T0T. IN 9 9 9 11 12 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 5 PR£lM.0UT 0 0 0 0 0 5 VERL.~lJT 8 9 9 10 10 5 T0T. (Jill 8 9 9 10 10

---9

-·

-

--~oJEl.KE ®lffPlIT WENST U NLJ ?

o

H0E HILT U HET PR0GRAfwtv1A VER\ftjLGEN ?

HELP

DE CeDENAMEN ZIJN :

INPl~RINT : PRINTEN VA~ INV0Ef<GEGEVENS

EXTRAPRINT : EXTRA fJlIfPlJf BETREF'F'ENDE CvrnGANGSPEHCENTAGES

F.:Te.

RECRIJ : RECRlITERINGSAA\JTALLEN 0PGEVEN Kf.rtNS : \>llJZIGEN VAN 0VERGANGSPERCENTAGES PLANNING : VERWLG MET PJ...Al'.X\lINGSPR0GRAMMA ST~P : EINDE PR0GRAMMA

BESTAND : GEGEVENS NfiAR NI EU,·J BESTAND 0VFRBRENGEN NA LAATSTE CfJDENAAM EEN CIJFER 0PGEVEN

EXTRAPRINT BESTAND 9 PR I NTFN VAN F){Tt~A ~Jlrrplrr

---eVER,GANG 1 MIN. L00PTIJD= 2.0 MAX. L00PTIJD=13.0 GEM. L~0PTIJD= 3.1 0VERGA~G 2 MIN. L00PTIJD= 1.0 MAX. L~~PTIJD=13.0 GEM. L08PTIJD= 2.4

CUI1. 0VERC-ANGSPERCENTAGE NA 20 JARE:N UIT CATEGORIE 1 : PR~eTl E VERLflOP BLIJVERS

13.1 26.9 0.0 0VERGANG 3 MIN. L0~PTIJD= 5.0

MAX.

L60PTIJD=13.0 GEM. L®ePTIJD= 9.9 flVERGANG 4 MIN. L66PTIJD= 1.0 MAX. L60PTIJD=13.0 GEM. L00PTIJD= 6.1

CtJv1. eVERGANGSPEf~CFNTAGE NA 20 JAREN UIT CATEG0RIE 2

PR0MOTIE VE'RL00P BLIJVERS

64.0 35.0 1.0

~IJ IN.. V~"PTl JD= 6. 0 MAX. L¥lOPTIJD=13.0 GEM. L0~PTIJD=11.1

.

.

0\JERGANG 6 MIN. L00PTIJD= 1.0 MAX. L00PTIJD=13.0 GEM. L~ePTIJD= 8.1 20

-CU.,. 0VERGANGSPERCE)"lJTAGE NA 20 JAREN UIT CATEGflRIE 3:

PR0M0TIE VERL~0P BLIJVERS

60.4 39.1 0.5 0VERGANG 7 ~nN. L0GPTIJD= 4.0 MAX. L0ePTIJD=13.0 ~EM. L00PTIJD= 9.3 ~VERGANG 8 MIN. L~~PTIJD= 1.0 MAX. L0~TIJD=13.0 GEM. L0~PTIJD= 7.7

CLM. 0VffiGANGSPERCENTAGE NA 20 JAREN

un CATEGeRIE

4 :

PROM~TIE VERL00P BLIJVERS

52.7 35.0 12.2

0VERGA\JG 9

MIN. L~~PTIJD= 1.0

r'1AX. L00PTIJD=13.0 GEM. L00PTIJD= 7.9

CLM. 0VERGANGSPERCENTAGE NA 20 JAREN

un CATEG€JRIE

5 : VERU)@P BLI

Jvms

99.3 0.7

H®EVEEL IS DE GEM. LEEF'TIJD BIJ INDIENSTIRE'DING IN FU\lCTIEC-ROEP 1 ?

24 GB1IDDELD PR~~0TIESCHEMA

---FLNCTI EGROEP : 2 3 5 GEM. LEEF'TIJD: 24.0 27.7 37.6 48.7 58.0

*

* *

* *

*

* *

*

GEM. L0E:1PTIJD : 3.7 9.9

* *

*

* * * *

11.1 9.3

************************************************************

10

\<1ILT U DE GEGEVENS NAAR EEN NIElJ.I BESTANO fJVERBHENGEN ?

JA

l.JEl..KE NAAM KRIJGT HEr NIELIWE BESTAND ?

NEWTECHN.

H£lE t-lILT U HET PR0GRPMMA VERVOLGEN ?

STOP

************************************************************

ad A

ad B

ad C

22

-deze vraag is een gevolg van de ingevoerde codenaam TOPMAX. De cumulative percentages van pramotie, verloop en blijvers in een categorie worden nu berekend voor 7 + 13 (maxUnale looptijd) jaren.

het betreft hier het verloop uit functiegroep 4 dat 10% lager ligt dan uit historische gegevens is gebleken; de vermenig-vuldigings£actor wordt dientengevolge 0.90.

deze wervingsaantallen zijn zodanig gekozen dat een vrijwel constante bezetting in rang een resulteert. Ook de wijzingen in de pramotiepercentages zijn hier geconcentreerd op het streven naar een constante bezetting in de rangen.

Bet nieuwe bestand dat onder de naam NEWTECHN is gecreeerd ziet er nu als volgt uit:

J,OO 5, 1. 1, 13, 6, 9, 200 1, 1, :I., 300 2, 1, 1, 400 3, 1, 1, 500 4, :I., 1, 600 5, 1, 1, 700 0, 0, 0, 800 1, 2, 900 0.0, 20.0, 30.0, 51.9, 44.9, 30.0, 30.0, 30.0, 30.0, 30.0, 30.0, 30.0, 30. 1000 1, 6, 1100 8.2, 9.5, 6.8, 9.0, 10.3, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1200 2, 3, 1300 0.0, 0.0, 0.0, 0.0, 2.1, 3.3, 6.0, 15.8, 24.2, 23.5, 32.3, 13.0, 21.3, 1400 2, 6, 1500 5.8, 3.9, 4.0, 3.8, 2.6, 0.9, 5.7, 2.0, 2.2, 5.8, 7.0, 7.0, 7.0, 1600 3, 4, ·1700 0.0, 0.0, 0.0, 0.0, 0.0, 0.7, 7.9, 8.9, 9.8, 16.3, 15.3, 10.7, 32.4, 1800 3, 6, 1900 0.4, 0.5, 1.4, 6.5, 2.3, 3.9, 3.4, 4.5, 2.7, 15.1, 6.0, 6.0, 6.0, 2000 4, 5, 2100 0.0, 0.0, 0.0, 0.8, 1.4, 4.8, 14.7, 8.8, 20.1, 10.4, 23.8, 4.0, 4.0, 2200 4, 6, 2300 1.35, 2.43, 1.44, 3.06, 3.15, 4.05, 9.36, 4.32, 3.6, 3.6, 3.6, 3.6, 3.6, 2400 5, 6,

2~00

0.9, 5.4, 7.4, 5.3, 12.2, 10.5, 20.0, 20.0, 20.0, 30.0, 30.0, 30.0, 30.0, 2600 1977, 2700 63.0, 77.0, 49.0, 2800 91.0, 82.0, 91.0, Z900 45.0, 61.0, 51.0, 3000 15.0, 35.0, 29.0, 3100 10.0, 11.0, 12.0, t 33.0, 61.0, 42.0, 19.0, 13.0, 3.0, 3.0, 1.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 45.0, 79.0, 42.0, 12.0, 9.0, 4.0, 6.0, 2.0, 31.0, 21.0, 51.0, 40.0, 23.0, 17.0, 12.0, 6.0, 5.0, 10. 8.0, 25.0, 25.0, 13.0, 4.0, 3.0, 5.0, 2.0, 1.0, 5.0, 8.0, 13.0, 2.0, 2.0, 2.0, 1.0, 0.0, 0.0,

.

.

Appendix B: beschrijving van de procedures van FORMASY 2

Wij zullen in deze paragraaf zeer beknopt de procedures van het cam-puterprogramma beschrijven.

1. procedure FOUT.

Deze procedure zorgt voor het uitprinten van fouaneldingen wanneer door de gebruiker niet toegestane an two orden op door de computer gesteide vragen zijn gegeven •

2. procedure TEKSTEN

Hierin staan de verschillende teksten opgeslagen die worden weerge-geven wanneer het woord HELP is ingetypt op de plaatsen waar dit

is toegestaan.

3. procedures STER~ STREEP en PUNT.

Hierdoor wordt het afdrukken van resp. sterretjes~ streepjes en punten verzorgd ten behoeve van een goede lay-out.

4. boolean procedure JA

Door het aanroepen van deze procedure wordt een door de gebruiker ingetypt antwoord gelezen en geconstateerd of die "ja" dan weI "nee" Iuidde; in aIle andere gevallen wordt de vraag herhaald. 5. procedure HEADING

Hierin wordt de begintekst boven de camputeroutput weergegeven. 6. procedure LEESBESTAND

Dit programmagedeelte vraagt am de naam van het databestand en geeft een foutmelding wanneer het bestand niet bestaat dan weI geen

punt werd ingelezen achter de naam. Men krijgt vervolgens gelegenheid om te corrigeren.

7. procedure HULPTEKST

Hierbij wordt een ingetypte naam gelezen en gecontroleerd of dit

een cijfer is, of het woord HELP. In dit laatste geval is klaarblijkelijk verzocht om aanvuIIend commentaar, hetgeen wordt ingeprint met

behulp van de procedure TEKSTEN(l). 8. procedure LEESCODE

Deze procedure leest en controleert de ingetypte stuurnamen bij de aanvang van het computerprogramma

9. integer procedure MINI

In deze huipprocedure wordt het minimum van twee getallen bepaald ten behoeve van de lay-out van de afgedrukte resultaten.

10. procedure LEESPERIODE

Hierbij wordt het aantal jaren gelezen dat men vooruit wil voor-spellen. Dit aantal mag maximaal twintig bedragen. In de praktijk

, '"

':'24

-II. procedure LEESGEGEVENS

Deze leest de opties (aantal rangen, leeftijdsgroepen, etc.) van het databestand.

12. procedure WRlTEGEGEVENS

Nu worden de onder LEESGEGEVENS (II) ingevoerde opties uitgeprint wanneer de codenaam INPUTPRINT wordt ingetypt.

13. procedure NUMCATEG

Hierbij worden de categorieen van het databestand gelezen en het

aantal klassen per rang geteld. Verder wordt het aantal jaren gevraagd dat bij de maximale looptijd moet worden opgeteld bij de berekening van de cumiIatieveprcwoHe.:.,verloop,:: en blijverlpercentages

(standaard is dit cijfer: vijf).

14. procedure WRlTECATEG

De klassen die onder NUMCATEG

(11)

werden ingevoerd, worden nu in overzichtelijke vorm uitgeprint na codewoord INPUTPRINT.

IS.

procedure RECRUTOEST

Hierin worden de categorieen bepaald waarheen geen overgang mogelijk is ten dienste van de voorspellingsprocedure.

16. procedure LEESKANSEN

Deze verzorgt het inleze~. van de overgangspercentages tussen de categorieen bij de verschillende looptijden. De percentages worden daarna vervangen door fracties of kansen door middel van deling door het getal honderd.

17. procedure WRITEKANSEN

Hierbij worden de onder LEESKANSEN

(l!)

ingevoerde percentages afge-print na de codenaam INPUTPRINT.

18. procedure MINMAXLOOP

Deze procedure berekent voor elke mogelijke overgang tussen de klassen de minimale en maximale looptijd waarbij deze overgang kan plaatsvinden en print deze uit als de codenaam EXTRAPRINT is ingelezen.

Voorbeeld. Wanneer zes looptijden worden onderscheiden met de volgende percentages bij een bepaalde overgang:

0, 10, 20, 10, 5, 0,

dan bedraagt de minimale looptijd waarbij deze overgang kan plaats-hebben: 2 en de maximale looptijd: 5 jaren.

19. procedure GEMLOOP

Deze berekent de gemiddelde looptijd totdat promotie of verloop uit een categorie optreedt, onder het gegeven dat dit zal plaatsvinden: Zij nu:

.

...

p. n

=

kansl) om overgang j te malen als men t jaren in de categorie

J,N

heeft doorgebracht

w. n

=

kans am in ~ategorie i te blijven als men reeds Jl. jaren

1.,N

hierin verblijft.

g . . • gemiddelde looptijd in categorie i totdat overgang j

plaats-1d

vindt •

top

=

aantal jaren dat wordt opgeteld bij maximale looptijd L voor de berekening van de cumulatieve percentages2)

De gemiddelde looptijd g; • wordt dan al~ voIgt berekend:

1tJ

L+top

L

Jl.=1

20. procedure DRUK

waarbij w. 0

=

1, voor alle categorieen i.

1,

Dit is een procedure ten behoeve van de lay-out bij gevraagde EXTRAPRINT •.

21. procedure LOOPBAAN

Wanneer wij aIleen de kenmerken rang en looptijd in de rang onder-scheiden, geeft deze procedure het gemiddelde carriereschema. Daartoe wordt de gemiddeldeleeftijd bij indiensttreding in de laagste

functiegroep ingetypt. De gemiddelde looptijden in iedere rang worden steeds hierbij opgeteld am de verwachte promotieleeftijden te be-palen. Deze procedure wordt toegepast als om EXTRAPRINT is gevraagd. 22. procedure NUMOVERGANG

Hierbij worden de mogelijke overgangen tussen de catgeorieen uit-geprint wanneer de codenaam INPUTPRINT is ingelezen.

23. procedure WERKKANSEN

In deze procedure worden een aantal berekeningen betreffende de overgangspercentages uitgevoerd , zoals:

---J) Een kans is gedefinieerd als het overgangspercentage gedeeld door 100. 2) Wij nemen aan dat de bijdrage aan de gemiddelde looptijd na L + top jaren

te verwaarlozen is. Het getal "top" kan worden ingelezen m.b.v. de code-naam TOPMAX.; de s tandaardwaarde is 5.

.

.~

26

-a. het bepalen van q. 0 - kans dat overgang j heeft plaatsgevonden

J,""

bij looptijd t; dit geeft dus het cumulatieve overgangspercen-tage.

b. het aanroepen van de procedures MINMAXLOOP

(l!)

en GEMLOOP

(l!)

c. het afdrukken van meerdere resultaten: minimale, maximale en gemiddelde looptijden en het loopbaanschema als om EXTRAPRINT is gevraagd.

24. procedure INDUCHANGE

Hierbij worden de afzonderlijke wijzigingen in de overgangspercentages aangebracht. Als percentages van meer dan 100 worden ingetypt,

worden de wijzigingen niet uitgevoerd. 25. procedure PROCCHANGE 1

Deze wijzigt de overgangspercentages door verschuiven van de percen-tages bij de looptijden met een of meerdere jaren. Men dient echter voorzichtig te zijn bij de minimale en maximale looptijden omdat steeds de laatste percentages verdwijnen bij looptijdverlenging en de eerste percentages bij looptijdverkorting.

voorbeeld. Beschouw de volgende percentages bij een overgang:

looptijd

II

2 3 4

~51

percentage 5 10 30 20 10

looptijdverlenging met twee jaren geeft als percentages:

o

0 5 10 30 looptijdverkorting met twee jaren levert:

30 20 10 10 10

26. procedure PROCCBANGE 2

De overgangspercentages behorende bij een overgang worden hier gewijzigd door vermenigvuldiging met een factor voor aIle looptijden. Wanneer hierdoor percentages groter worden dan 100, dan worden deze in het programma op 100 gesteld.

27. procedure CORRECKANSEN

Hierin worden de percentages gewijzigd met behulp van bovenstaande procedures 24, 25 en

1§.

volgens de wens en van de gebruiker.

28. procedure PLICHTRECRU

Hierbij worden de te werven aantallen in de verschillende categorieen ingelezen.

29. procedure BEZETTING

Hierin wordt de huidige bezetting in de onderscheiden categorieen ingevoerd.

30. procedure WRITEBEZETTING

Dezevraagthet uitprinten van de huidige bezetting na INPUTPR!NT'

31. procedure DATAPR!NT

Dit is de hoofdprocedure die het uitprinten van het databestand verzorgt en wordt aangeroepen door INPUTPRINT. In deze procedure worden de subprocedures

l!,

~, 22,

11

en ~ aangeroepen.

32. procedure MATRIXPRINTEN

Deze geeft voor ieder gewenst kenmerk de bezetting per functiegroep in de voorspelperiode.

33. procedure SOM

Bierin worden de aantallen per functiegroep in de toekomst berekend voor ieder gewenst kenmerk uit de voorspelde aantallen per categorie

in de voorspelperiode. Bet uitprinten gebeurt met behulp van de procedure MATRIXPRINTEN (It) .

34. procedure VOORSPELLING

Dit is de basisprocedure van het computerprogramma. Zij nu:

B • bezetting in categorie i met looptijd 1 in het jaar t. i,1,t

R. t - recruteringsaantallen in categorie i in jaar t.

1,

T = aantal te voorspellen jaren.

De bereking van de verwachte bezetting in de toekomst gaat dan als voIgt: L (2) B

=

i, I, t R. 1,t-1 +

L (L

Bk JI. t-I p. n) k KE • IV OmI " J,IV , t = I, ••• ,T 1

voor looptijd I, waarbij K. de categorieen aangeeft van waaruit de

1

overgangen j naar categorie i mogelijk zijn. Voor de Iooptijden

JI. > 1 geldt

(3) B. JI. ... B • w

t . 0 1 t I l ' , °-1

1" 1,1V- , - IV , t m l , ••• ,T

JI. = 2, ••• ,L

Voor de categorieen waarheen geen overgang plaatsvindt (bepaald in de procedure RECRUTOEST (15» is de verzameling K. leeg.

- 1

De promotie- en verloopstromen worden bovendien opgeslagen om later op verzoek van de gebruiker te worden uitgeprint.

35. procedure PRINTMATRIX

Deze drukt de verwachte bezetting per functiegroep in de voorspel-periode af.

28

-36. procedure SOMLOOPTIJD

Hierin wordt de verwachte bezetting gesammeerd over de looptijden en de categorieen tot de voorspelde bezetting per functiegro~p.

Deze wordt vervolgens uitgeprint met behulp van de procedure PRINTMATRIX

(12).

37. procedure WRITE BE STAND

Deze procedure schrijft de (eventueel gewijzigde) in te voeren gegevens naar een door de gebruiker op te geven nieuw bestand. Het oude databestand blijft dan bewaard terwijl het nieuwe direct ala invoer voor FORMASY 2 kan worden gebruikt.

38. procedure FLOWS

Deze print de in de voorspellingsprocedure (~) berekende pramotie-en verloopstrampramotie-en tusspramotie-en de categoriepramotie-en uit op verzoek van de gebruiker.

39. procedure OUTPUT

Door middel van deze procedure wordt het afdrukken van de gewenste tabellen geregeld. Verkrijgbaar zijn de voorspelde aantallen per functiegroep in de toekamst, uitgesplitst naar leeftijdsgroepen, opleidingsnivo's of looptijden. Verder kan men de stromen in het systeem laten uitprinten (procedure FLOWS (38)).

40. procedure VERVOLG

Hierin worden een aantal codenamen ingelezen op basis waarv~

het programma wordt vervolgd. Zo kan men opnieuw ingevoerde gegevens (INPUTPRINT) of extra resultaten (EXTRAPRINT) opvragen, naar een nieuwbestand schrijven, overgangspercentages wijzigen of voor-spellen met nieuwe recruteringsaantallen.

41. procedure EINDTEKST

Deze drukt een tekst af die het eind~ v~n het canputerprogranma aangeeft.

100 110 115 117 120 125 130

1-75

180 190 200 210 220 230 240 250 260

262

264

266

267

268

269

270 271

272

273

275 276

277

'.278

279 280

281

282

283

284 285

286

287

288

289

290 293

294

295 296

297

298 299

300

'301 .302

303

.. 304 '305 306

307

308 309 310

311

314

BEGIN FILE FIN(KIND=REHOTE),OUT(KIND=REHOTE),DF(KIND=DISKPACK,

TITLE=·KNAL.·,PACKNAHE=uBDK2.·,FILETYPE=7),

DAF(KIND~DISKPACK,TITLE=·KLOS~·,PACKNAHE=·8DK2.·,HAXRECSIZE-14,

MINRECSIZE=O,BLOCKSIZE=420,UNITS=O);

ARRAY

NAAH[I:18J,TEKST[1:12]~

INTEGER JAAR,El,RE,TOP,NF,AH,OH,LH,TO,OV; REAL BF;

BOOLEAN EXTRAPRINT,INPUTPRINT,HELP,RECRU,PLANNING,TOPHAX,BESTAND;

%---

_{PROCEDURE FOUT(I); VALUE I; INTEGER I;}

7.

AFDRUKKEN VAN FOUTHELDINGEN

BEGIN

IF 1=1 THEN

WRITE(OUT,(IFOUTIEF ANTWOORD •••• CORRECTIE A.U.B.·»

ELSE IF 1=2 THEN

WRITE(OUT,(SDIT BESTAND BESTAAT NIET •••• CORRECTIE A.U.B.'»

ELSE IF 1=3 THEN

WRITE(OUT,(IDEZE CODENAAH IS NIET TOEGELATEN •••• CORRECTIE A.U.I.

.»

ELSE IF 1=4 THEN

WRITE(OUT,(IU HEBT EEN PUNT VERGETEN •••• TYPE DE NAAH •

IOPNIEUW IN A.U.B. I »

ELSE IF 1=5 THEN

WRITE(OUT,(·DIT BESTAND BESTAAT REEDS •••• CORRECTIE A.U.B.·»

ELSE IF 1=6 THEN

WRITE(OUT,(IOVERGANGSPERC. IS NEG. OF GROTER I

IDAN

100 ••••

CORRECTIE NIET UITGEVOERD ,I»

ELSE

END OF FOUT ;

7.---PROCEDURE TEKSTEN(K);

VALUE K; INTEGER K;

BEGIN

IF K=I THEN

%

PRINTEN VAN HULPTEKSTEN

WRITE(OUT,<//I

TYPE IN : 1/,XI2,

·0 : GEEN VERDERE OUTPUTTABELLEN 1/,XI2,

81 :

TABEL VAN AANTALLEN IN LEEFTIJDSGROEPEN 1/,X12,

12 : TABEL VAN AANTALLEN IN OPLEIDINGSGROEPEN I /,X12,

83 :

TABEL VAN AANTALLEN IN LOOPTIJDEN 1/,X12,

84 : FLOWS IN HET SYSTEEH

1

_»

ELSE IF K=2 THEN WRITE(OUT,(//I

DE CODENAHEN ZIJN

:1,/,

X6,IINPUTPRINT : PRINTEN VAN INVOERGEGEVENS I ,/,

X6,IEXTRAPRINT : EXTRA OUTPUT BETREFFENDE OVERGANGS I

·PERCENTAGES ETC. I ,/,

X6,uRECRU

: RECRUTERINGSAANTALLEN OPGEVEN

1

, / ,

X6,ITOPHAX

: EXTRA INVOER I.V.H. EXTRAPRINT·,/,

X6,· NA LAATSTE CODENAAH EEN CIJFER OPGEVEN 'I»

ELSE IF K=3 THEN

WRITE(OUT,(//I

TYPE IN :·,/,XI2,

·0 :

AFZONDERLIJKE PERCENTAGES WIJZIGEN I ,/,X12,

II : OPSCHUIVEN VAN PERCENTAGES BEHORENDE BIJ DE •

ILOOPTIJDEN-,/,X12,

12 : PERCENTAGES BIJ EEN OVERGANG VERHENIGVULDIGEN '

-HET FACTOR I

»

ELSE IF K=4 THEN

WRITE(OUT,(//I

X6,-INPUTPRINT

X6,·EXTRAPRINT

DE CODENAHEN ZIJN :.,/,

: PRINTEN VAN INVOERGEGEVENS I ,/,

: EXTRA OUTPUT BETREFFENDE OVERGANGS I

END OF

·PERCENTAGES ETC.·,/,

: RECRUTERINGSAANTALLEN OPGEVEN I ,/,

: WIJZIGEN VAN OVERGANGSPERCENTAGES·,/,

: VERVOLG HET PLANNINGSPROGRAHHA',/,

: EIHDE PROGRAMHA',/,X6,

X6,'RECRU

X6,'KANS

X6,'PLANNING

X6,'STOP

'BESTAND

,/,X6,· NA

TEKSTEN ;

: GEGEVENS NAAR NIEUW BESTAND OVERBRENGEN'

316

317

318

320 330 340 350 360 370 ·380 381 " 383 385

387

388 390 400 410 420 430 440 450 460 470 480 490 500 502 503 - .504 506 . 508 - 4510 511 512 515 518 520 530 540 550 552 554 556 560 561 570 575 580 590 591 592 593 .5'4 - 595 596 -597 598 599 600 601 603 604 609 30

-PROCEDURE STER(K); VALUE KI INTEGER K;

__ •

_ .

" PR{HTEH

YAN

STERRET

JE.ii

BEGIN WRITE(OUT,(*<a*-»,K)

END OF' STER ;

x---PROCEDURE STREEP(K); VALUE K; INTEGER K;

BEGIN WRITE(OUT,<*<a-R»,K);

END OF' STREEP ;

" PRINTEN VAN STREEPJES

,x---PROCEDURE PUNT(K); VALUE K; INTEGER K;

BEGIN WRITE(OUT,<*<·.I»,K)

END OF PUNT

~

" PRINTEN VAN PUNTEN

,,---BOOLEAN PROCEDURE JA;

" TRUE BIJ INTYPEN VAN IJA- ,

" FALSE BIJ INTYPEN VAN -NEE I ,

BEGIN POINTER 0; ARRAY

ANSWERl=FALSE;

" ANDERS : HERHAAL VRAAG

+

AC1:31; BOOLEAN ANSWER;

DO BEGIN

O:=POINTER(A);

IF O=IJA-

THEN

IF O=·NEE- THEN

END UNTIL ANSWER

END OF JA ,

READ<FIN,(A3),O);

ANSWERf=JA:=TRUE ELSE

BEGIN ANSWER:=TRUE; JA:=F'ALSE

END ELSE FOUT(l)

x---PROCEDURE HEADING;

" BEGINTEKST

BEGIN WRITE(OUT,<II»;

STER(72);

WRITE(OUT,(IIIIIFORHASY2 IS EEN COHPUTERPROGRAMMA VAN •

IDE TECHNISCHE HOGESCHOOL EINDHOVENI/IT.B.V. PERSONEELSPLANNING

.1

IIIHEBT U OP- OF AANHERKINGEN , WENDT U ZICH DAN TOT :./

I C.J. VERHOEVEN,

H.G.8.61

, TEL.

040 -

472378

!!!·//I»;

STER(72)

ENII OF HEADING ;

%---PROCEDURE LEESBESTAND'

" LEZEN VAN GEGEVENSBESTAND

BEGIN ARRAY AC1:3J' POINTER P,O; BOOLEAN ANSWER;

WRITE(OUT,(II D

VAN WELK BESTAND WILT U GEGEVENS INLEZEN ,I»,

ANSWER:=FALSE'

DO BEGIN

O:=POINTERCNAAM)' READCFIN,(A22),Q);

SCAN PlO FOR

18

UNTIL=-.D;

IF P=D._ THEN

BEGIN

REPLACE DF. TITLE BY OJ

CLOSECDF);

IF NOT (DF. PRESENT) THEN FOUT(2) ELSE ANSWER:=TRUE

END

ELSE FOUT(4)

END UNTIL ANSWER ;

END OF LEESBESTANDf

,,---PROCEDURE HULPTEKST(X,K)'

" VERZOEK OM HULPTEKST BIJ

7.

ONDUIDELIJKE VRAAG

INTEGER X,K'

BEGIN BOOLEAN ANTWOORD; POINTER P,O' ARRAY AC1:2J'

ANTWOORD:=HELP:=FAlSE'

WHILE NOT ANTWOORD DO

BEGIN O:=POINTER(TEKST); READCFIN,(A12),O);SCAN P:O FOR 12

WHILE =. -;IF P=·HELP- THEN BEGIN ANTWOORD:=HELPl=TRUEj

TEKSTENCK); READ(FIN,/,X)f

END ELSE

IF READ(P,I,X) THEN FOUT(t) ELSE ANTWOORD:=TRUE

END

END OF HULPTEKST ;

%---~3Jl 670 685 700 710 720 725

.730

735

740

750

760

780

800

820

821

822

823

824

920 930

940

950 960 .970 -980 990 1000 -1.010 1020 1022 1025

1030

1035

1040

1045

1050

1080

1085 1090 1100 1105 1110 1120 1130 1150 1160 1162

1163

.1164

1166 . 1167 _-1168 116' 1170 1174

________ jlRllE (qUI,

<IL ·ke;_e;S_NJ.L __

kODENAJi~ti_ntA. U~B ._~:>!;

_

INPUTPRINT:=EXTRA?RINT:=HELP:=RECRU:=TOPMAX:=FALSE'

ANSWER:=FALSE;

WHI~E

NOT ANSWER DO

BEGIN

Q:

=POINTER(TEKS',.-n

-READ(FIN,<A12),O)'

SCAN P:G FOR 12 WHILE =

" f

IF P IN NUMBERS THEN ANSWER:-TRUE ELSE

IF P=IINPUTPRINT

1

_{THEN INPUTPRINT'=TRUE ELSE}

IF P=MHELP'

THEN TEKSTEN(2) ELSE

IF P=IEXTRAPRINT' THEN EXTRAPRINT:=TRUE

IF P='TOPMAX·

THEN TOPMAX:=TRUE

IF P='RECRU·

THEN RECRU:=TRUE ELSE

END

END OF LEESCODE ;

ELSE

ELSE

FOUT(3) ;

%---

_{INTEGER PROCEDURE MINI(A,B);}

_%

_{MINIMUM VAN A EN B BEREKENEN}

VALUE A,B; INTEGER

A,B~

BEGIN HINI:= IF A LEO B THEN A ELSE B

END OF HINI ;

%---

_{PROCEDURE LEESPERIODE;}

_%

_{LEZEN VAN AANTAL JAREN VOORUIT}

%

VOORSPELLEN

BEGIN BOOLEAN ANSWER'

WRITECOUT,(//'

HOEVEEL JAREN (MAX.

20)

WILT U VOORUIT •

'VOORSPELLEN

1'»;

ANSWER:=FALSE; WHILE NOT ANSWER DO

BEGIN READ(FIN,/,El);

IF E1(0 OR E1)20 THEN FOUT(l) ELSE ANSWERt=TRUE

END

END OF LEESPERIODE ;

1.---PROCEDURE LEESGEGEVENS'

X

LEZEN VAN OPTIES

BEGIN

READ(DF,/,NF,AM,OH,LH,TO,OV)'

END OF LEESGEGEVENS ;

%---

_{PROCEDURE WRITEGEGEVENS'}

_%

_{PRINTEN VAN OPTIES}

BEGIN

WRITE(OUT,(/'AANTAL FUNCTIEGROEPEN (EXCL. VERLOOP)

: 1 ,

X9,I3,/,

'AANTAL LEEFTIJDSGROEPEN =',X23,I3,/,

'AANTAL OPLEIDINGSGROEPEN =',X22,I3,/,

'GROOTSTE LOOPTIJD PER CATEGORIE =',X15,I3,/,

'AANTAL ONDERSCHEIDEN CATEGORIEEN =',X14,I3,/,

'AANTAl HOGElIJKE OVERGANGEN TUSSEN CATEGORIEEN

=',13,1,)

,NF,AH,GM,LM,TO,OV)

END OF WRITEGEGEVENS ;

X*************************************************

DEFINE EIHIN1=El-lt,TOHIN1=TO-lt;

HEADING'LEESBESTAND;LEESCODEfLEESPERIODE9LEESGEGEVENS'

BEGIN INTEGER ARRAY N,M,P[l:TOJ,VAN,NAARCO:OVl,RECR,AOTCO:TOJ,

ATFCOtNFJ,TOTIN,TOTOUT(ltNF,O:EIMINIJf

ARRAY WSCHAT,HSCHAT[1:rO,lt<LM+20)],PSC1:0V,llLHl,

OSC1:0V,O:(LH+20)J,MINL,HAXL,GEHLtl:0VJ,PLRECRCltTO,1:El],

BEZ[1:TO,lfLH,O:EIJ,BEZRAC1SNF,1:LM,O:Ell,BERA[I:NF,0:El],

RECRIN,PROHIN,PROHOUT,VERLOUTtl:NF,0:ElHIN1];

%*************************************************

1175

1180

1190

1250

1260

- 1275

1280

1290

• 1300 1305 1310 1320 1330

1340

1350

1356

1357

1358

1359

1360 1361

1362

1363

1365

1366 1367

1368

1369

1370

1390 1400 1410

1420

1430 1440 1450 1455

1470

1480 1490 1500 1510 1520

1530

1550 1560 1570 1580 1590

1610

~ 1615 1620 1630

1632

1633 32

-PROCEDURE NUMCATEG;

X NUMMERINB VAN

CAT~GDRIEEN

BEGIN INTEGER If BOOLEAN ANSWER'

FOR

1:=0

STEP

1

UNTIL NF DO ATF[IlS-Of

FOR I :=1 STEP

1

UNTIL TO DO

BEGIN READ(DF,/,NtIl,MtI],P[IJ)'

ATFtNt I

J J t

=*+U

END;

TOP:=5;

IF TOPHAX THEN

BEGIN ANSWERf=FALSE;

WRITECOUT,(//a

MET HOEVEEL JAREN (HAX.20) WILT U DE MAX. •

-LOOPTIJD

VERLENGEti~I- ~~OOR

Jut

~llEB~KENINLYAN,.J)~_­

aCUM. PERCENTAGES

1-»;

WHILE NOT ANSWER DO

BEGIN READCFIN,/,TOP)'

IF TOP(O OR TOP)20 THEN FOUT(I) ELSE ANSWER:=TRUE

END

END

END OF NUHCATEG ;

%---

_{PROCEDURE WRITECATEG;}

_%

_{PRINTEN VAN CATEGORIEEN}

BEGIN INTEGER

II

STER(60);

WRITECOUT,(/aNUMHERS VAN DE CATEGORIEEN a

»;

STREEP(26)'

WRITE(OUT,(/-NUMMER

FUNCTIEGROEP

LEEFTIJDSGROEP

-,

·OPLEIDINGSGROEp·,/,·---

---

---.

,a _______________

.»;

FOR 1:=1 STEP

1

UNTIL TO DO

WRITE(OUT,(I4,Il1,I14,I17),I,NCIl,MCIl,P[Il);

END OF WRITECATEG ,

x---PROCEDURE RECRUTOEST'

%

BEPALEN VAN CATEGORIEEN WAARNAAR

%

GEEN OVERGANG MOGELIJK IS

BEGIN INTEGER I,J; BOOLEAN ANSWER;

REt=1'

FOR 1:=1 STEP

1

UNTIL TO DO

BEGIN ANSWER:=FALSE;

FOR Jt=1,Jt1 WHILE (NOT ANSWER) AND J LEG OV DO

BEGIN IF I=NAARtJl THEN ANSWER:=TRUE ELSE

END

END

IF J=OV THEN BEGIN RECRCREJt=I; RE:=REtl END ELSE

END OF RECRUTOEST;

x---PROCEDURE LEESKANSEN;

%

LEZEN VAN OVERGANGSPERCENTAGES

BEGIN INTEGER I,L;

FOR 1:=0 STEP 1 UNTIL TO DO AOTtIJ:=O'

FOR 1:=1 STEP

1

UNTIL OV DO

BEGIN READ(DF,/,VANCIJ,NAARCIJ);

AOTtVANCIJJt=* tl;

READ(DF,/, FOR L:=l STEP

1

UNTIL LH DO PSCI,LJ);

FOR L:=l STEP

1

UNTIL LM DO PStI,Ll:=PSCI,LJ/I00

END;

%

PERCENTAGES ZIJN VERVANGEN DOOR KANSEN

'I'

END OF LEESKANSEN

~