1EXTRA_INFO.TYP3.EC  := EC;
2EXTRA_INFO.TYP3.TEXT:= 'CONNECT_SERVICE TO OAM FAILED';
3
4G9PXYA1S!G9TE500_EHP_P(
5'G9IBSA1C003',                      /*@@ID*/
6G9PXYA1S!G9TE102_ERR_CLASS_SWERR,   /*@@CLASS*/
7ADDR(EXTRA_INFO.ERROR_HANDLER),     /* EXTRA-INFO ADDR */
8G9PXYA1S!G9TE100_GB_LM,             /* USER-ID */
9NULL                                /* OPTIONAL-SWET-INFO ADDR */
10);
11/***@@@ END OF ERROR ***/
12
13@K@FREEZE
14917596041
15@K@NAME
16T_ERR4_1
17@K@INSCRIPT
18ERROR_HANDLING:
19DB_OVERFLOW
20MP/NSEI
21@K@CODE
22/***@@@ ERROR ***/
23/*@@ERRORTEXT
24*@ DB-OVERFLOW
25*@
26*@
27*@@DESCRIPTION
28*@ THE INSTANCE-CREATION WAS NOT POSSIBLE
29*@ BECAUSE THE DATABASE WOULD OVERFLOW
30*@
31*@@EXTRA INFO
32*@ (EXTRA_INFO_4_STRUCT)
33*@  NSEI
34*@  NSVCI
35*@  TEXT
36*@
37*/
38
39EXTRA_INFO.TYP4.NSEI := EVD_PTR->.KEYS.INT_ARR(0);
40EXTRA_INFO.TYP4.NSVCI:= EVD_PTR->.KEYS.INT_ARR(1);
41EXTRA_INFO.TYP4.TEXT := 'NSVC-HAND.: MP/NSEI-OVERFLOW';
42
43G9PXYA1S!G9TE500_EHP_P(
44'G9IBSA1C004',                          /*@@ID*/
45G9PXYA1S!G9TE102_ERR_CLASS_ESC_MAX_ANY, /*@@CLASS*/
46ADDR(EXTRA_INFO.ERROR_HANDLER),         /* EXTRA-INFO ADDR */
47G9PXYA1S!G9TE100_GB_LM,                 /* USER-ID */
48NULL                                    /* OPTIONAL-SWET-INFO ADDR */
49);
50/***@@@ END OF ERROR ***/
51
52@K@FREEZE
53920903219
54@K@NAME
55T_ERR4_2
56@K@INSCRIPT
57ERROR_HANDLING:
58DB_OVERFLOW
59MP/NSVCI
60@K@CODE
61/***@@@ ERROR ***/
62/*@@ERRORTEXT
63*@ DB-OVERFLOW
64*@
65*@
66*@@DESCRIPTION
67*@ THE INSTANCE-CREATION WAS NOT POSSIBLE
68*@ BECAUSE THE DATABASE WOULD OVERFLOW
69*@
70*@@EXTRA INFO
71*@ (EXTRA_INFO_4_STRUCT)
72*@  NSEI
73*@  NSVCI
74*@  TEXT
75*@
76*/
77
78EXTRA_INFO.TYP4.NSEI := EVD_PTR->.KEYS.INT_ARR(0);
79EXTRA_INFO.TYP4.NSVCI:= EVD_PTR->.KEYS.INT_ARR(1);
80EXTRA_INFO.TYP4.TEXT := 'NSVC-HAND.: MP/NSVCI-OVERFLOW';
81
82G9PXYA1S!G9TE500_EHP_P(
83'G9IBSA1C004',                          /*@@ID*/
84G9PXYA1S!G9TE102_ERR_CLASS_ESC_MAX_ANY, /*@@CLASS*/
85ADDR(EXTRA_INFO.ERROR_HANDLER),         /* EXTRA-INFO ADDR */
86G9PXYA1S!G9TE100_GB_LM,                 /* USER-ID */
87NULL                                    /* OPTIONAL-SWET-INFO ADDR */
88);
89/***@@@ END OF ERROR ***/
90
91@K@FREEZE
92920903222
93@K@NAME
94T_ERR4_3
95@K@INSCRIPT
96ERROR_HANDLING:
97DB_OVERFLOW
98NSEI/NSVCI
99@K@CODE
100/***@@@ ERROR ***/
101/*@@ERRORTEXT
102*@ DB-OVERFLOW
103*@
104*@
105*@@DESCRIPTION
106*@ THE INSTANCE-CREATION WAS NOT POSSIBLE
107*@ BECAUSE THE DATABASE WOULD OVERFLOW
108*@
109*@@EXTRA INFO
110*@ (EXTRA_INFO_4_STRUCT)
111*@  NSEI
112*@  NSVCI
113*@  TEXT
114*@
115*/
116
117EXTRA_INFO.TYP4.NSEI := EVD_PTR->.KEYS.INT_ARR(0);
118EXTRA_INFO.TYP4.NSVCI:= EVD_PTR->.KEYS.INT_ARR(1);
119EXTRA_INFO.TYP4.TEXT := 'NSVC-HAND.: NSEI/NSVC-OVERFLOW';
120
121G9PXYA1S!G9TE500_EHP_P(
122'G9IBSA1C004',                          /*@@ID*/
123G9PXYA1S!G9TE102_ERR_CLASS_ESC_MAX_ANY, /*@@CLASS*/
124ADDR(EXTRA_INFO.ERROR_HANDLER),         /* EXTRA-INFO ADDR */
125G9PXYA1S!G9TE100_GB_LM,                 /* USER-ID */
126NULL                                    /* OPTIONAL-SWET-INFO ADDR */
127);
128/***@@@ END OF ERROR ***/
129
130@K@FREEZE
131920903226
132@K@NAME
133TR_RESET
134@K@INSCRIPT
135RESTART_
136TNS_RESET_
137TIMER
138@K@CODE
139/* TIMER EVENT DESCRIPTOR STILL THERE */
140
141/* INITIALIZATION OF THE TIMER-EVENT-DESCRIPTOR STILL VALID */
142NSVCI_CON_PTR->.TIM_EVD_PTR->.TIMER:= TNS_RESET_MAP;
143
144/* START TIMER */
145G9PX508_START_TIMER_P
146(
147NSVCI_CON_PTR->.TIM_EVD_PTR
148);
149
150@K@FREEZE
151924684867
152@K@NAME
153TX_AUDIT
154@K@INSCRIPT
155FOR
156AUDIT
157
158@K@NAME
159M_BLKOACKM
160@K@INSCRIPT
161NS_
162BLOCK_ACK
163@K@CODE
164/* GETTING THE EVENT DESCRIPTOR */
165G9PB511_GET_MSG_BOUND_EV_DESCR_P
166(
167SID_GBNSVC,
168(SIZE(G9IBDF4_NS_LM_M) + G9IBD44_NS_PDU_DATA_OFFSET_C),
169TX_EVD_PTR
170);
171
172/* COMPOSING THE EVENT */
173/* FIRST THE DESCRIPTOR */
174TX_EVD_PTR->.EVENT_CMD:=         G9IBD40_NS_LM_PDU_C;
175TX_EVD_PTR->.EVENT_DESTINATION:= GBDL_HANDLE;
176
177IF
178/* 'OTHER' ALIVE NSVC TO THIS NSEI EXISTING? */
179NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR /= NULL
180THEN
181/* USE THIS 'OTHER' FOR TRANSPORT */
182TX_EVD_PTR->.KEYS.INT_ARR(0):=
183
184NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;
185/* NSEI TO BE USED FOR TRANSPORT */
186TX_EVD_PTR->.KEYS.INT_ARR(1):=
187
188NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
189/* NSVCI TO BE USED FOR TRANSPORT */
190ELSE
191/* USE AFFECTED NSVC AGAIN FOR TRANSPORT */
192TX_EVD_PTR->.KEYS.INT_ARR(0):=
193 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;  /* NSEI TO BE USED FOR
194TRANSPORT */
195TX_EVD_PTR->.KEYS.INT_ARR(1):=
196 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVCI TO BE USED FOR
197TRANSPORT */
198FI;
199
200
201/* POINTER TO PDU IN POOL-ELEMENT */
202NS_PDU_PTR:= NS_PDU_REF_M (INT(TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT)
203                           + G9IBD44_NS_PDU_DATA_OFFSET_C);
204/* OFFSET OF THE PDU IN POOL-ELEMENT */
205TX_EVD_PTR->.BOUND.DATA_OFFSET:= G9IBD44_NS_PDU_DATA_OFFSET_C;
206/* LENGTH OF THE PDU IN POOL-ELEMENT */
207TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(NS_PDU_PTR->.G9IBDF4_PDU_TYPE) +
208SIZE(NS_PDU_PTR->.D3);
209
210/* NOW THE POOL-ELEMENT */
211NS_PDU_PTR->.G9IBDF4_PDU_TYPE:= G9IBDR2_NS_BLOCK_ACK_C; /* PDU-TYPE */
212
213NS_PDU_PTR->.D3.NSVCI_TLV.NSVCI_VAL :=
214 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVC TO BE BLOCKED */
215
216
217/* SENDING */
218G9PX503_POST_EVENT_P(TX_EVD_PTR);
219
220@K@FREEZE
221938805885
222@K@NAME
223T_RCTRUE
224@K@INSCRIPT
225RC
226=
227TRUE
228@K@CODE
229RC:= TRUE;
230
231@K@FREEZE
232922176328
233@K@NAME
234M_AC_SBVCN
235@K@INSCRIPT
236G9IBME0_
237ACT_
238SIGN_BVC_C
239@K@CODE
240/* GETTING THE EVENT DESCRIPTOR */
241G9PB512_GET_MSG_LESS_EV_DESCR_P
242(
243SID_GBNSVC,
244TX_EVD_PTR
245);
246
247
248/* COMPOSING THE EVENT */
249TX_EVD_PTR->.EVENT_CMD:=         G9IBME0_ACT_SIGN_BVC_C;
250TX_EVD_PTR->.EVENT_DESTINATION:= GBBVC_HANDLE;
251TX_EVD_PTR->.KEYS.INT_ARR(0):=   EVD_PTR->.KEYS.INT_ARR(0);
252TX_EVD_PTR->.KEYS.INT_ARR(1):=   SIGN_BVCI;
253
254
255
256/* SENDING */
257G9PX503_POST_EVENT_P(TX_EVD_PTR);
258
259@K@FREEZE
260938788211
261@K@NAME
262T_RC_EOD
263@K@INSCRIPT
264RC
265=
266END OF DATA
267
268@K@CODE
269RC:= G9IBSM4_RC_END_OF_DATA;
270
271@K@FREEZE
272921083785
273@K@NAME
274T_RC_EMP
275@K@INSCRIPT
276RC
277=
278EMPTY
279
280@K@CODE
281RC:= G9IBSM4_RC_EMPTY;
282
283@K@FREEZE
284921083757
285@K@NAME
286T_RC_ERR
287@K@INSCRIPT
288RC
289=
290ERROR
291
292@K@CODE
293RC:= G9IBSM4_RC_ERROR;
294
295@K@FREEZE
296921083731
297@K@NAME
298S_UNUSED
299@K@INSCRIPT
300G9IBSM0_
301UNUSED
302@K@CODE
303
304
305@K@FREEZE
306919416670
307@K@NAME
308TA_UNBLOCK
309@K@INSCRIPT
310START_
311TNS_UNBLOCK_
312TIMER
313@K@CODE
314/* GET TIMER-EVENT DESCRIPTOR */
315G9PB513_GET_TIMER_EV_DESCR_P
316(
317SID_GBNSVC,
318NSVCI_CON_PTR->.TIM_EVD_PTR
319);
320
321/* INITIALIZATION OF THE TIMER-EVENT-DESCRIPTOR */
322NSVCI_CON_PTR->.TIM_EVD_PTR->.EVENT_CMD:= G9IBSE4_TO_TNS_C;
323NSVCI_CON_PTR->.TIM_EVD_PTR->.EVENT_DESTINATION:= GBNSVC_HANDLE;
324NSVCI_CON_PTR->.TIM_EVD_PTR->.KEYS.INT_ARR(0):=
325NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;
326NSVCI_CON_PTR->.TIM_EVD_PTR->.KEYS.INT_ARR(1):=
327NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
328NSVCI_CON_PTR->.TIM_EVD_PTR->.TIMER:= TNS_UNBLOCK_MAP;
329
330/* START TIMER */
331G9PX508_START_TIMER_P
332(
333NSVCI_CON_PTR->.TIM_EVD_PTR
334);
335
336@K@FREEZE
337924686210
338@K@NAME
339M_BLK_ACKM
340@K@INSCRIPT
341NS_
342BLOCK_ACK
343@K@CODE
344/* GETTING THE EVENT DESCRIPTOR */
345G9PB511_GET_MSG_BOUND_EV_DESCR_P
346(
347SID_GBNSVC,
348(SIZE(G9IBDF4_NS_LM_M) + G9IBD44_NS_PDU_DATA_OFFSET_C),
349TX_EVD_PTR
350);
351
352/* COMPOSING THE EVENT */
353/* FIRST THE DESCRIPTOR */
354TX_EVD_PTR->.EVENT_CMD:=         G9IBD40_NS_LM_PDU_C;
355TX_EVD_PTR->.EVENT_DESTINATION:= GBDL_HANDLE;
356TX_EVD_PTR->.KEYS.INT_ARR(0):=
357NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;  /* NSEI TO BE USED FOR
358TRANSPORT */
359TX_EVD_PTR->.KEYS.INT_ARR(1):=
360NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVCI TO BE USED FOR
361TRANSPORT */
362/* POINTER TO PDU IN POOL-ELEMENT */
363NS_PDU_PTR:= NS_PDU_REF_M (INT(TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT)
364                           + G9IBD44_NS_PDU_DATA_OFFSET_C);
365/* OFFSET OF THE PDU IN POOL-ELEMENT */
366TX_EVD_PTR->.BOUND.DATA_OFFSET:= G9IBD44_NS_PDU_DATA_OFFSET_C;
367/* LENGTH OF THE PDU IN POOL-ELEMENT */
368TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(NS_PDU_PTR->.G9IBDF4_PDU_TYPE) +
369SIZE(NS_PDU_PTR->.D3);
370
371/* NOW THE POOL-ELEMENT */
372NS_PDU_PTR->.G9IBDF4_PDU_TYPE:= G9IBDR2_NS_BLOCK_ACK_C; /* PDU-TYPE */
373
374NS_PDU_PTR->.D3.NSVCI_TLV.NSVCI_VAL :=
375 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVC TO BE BLOCKED */
376
377
378/* SENDING */
379G9PX503_POST_EVENT_P(TX_EVD_PTR);
380
381@K@FREEZE
382926348442
383@K@NAME
384TA_NXTALIV
385@K@INSCRIPT
386DEFINE
387NEW 'NEXT_
388ALIVE'
389@K@CODE
390IF
391/* ALIVE NSVC TO THE NSEI EXISTING? */
392NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR /= NULL
393
394THEN
395/* TAKE NEXT ELEMENT IN THE LINKED LIST AS THE NEXT ALIVE NSVC */
396NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR:=
397
398NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR->.NEXT_ALV_NSVCI_CON_PTR;
399
400FI;
401
402@K@FREEZE
403938801086
404@K@NAME
405M_DE_CBVCN
406@K@INSCRIPT
407G9IBME2_
408DEACT_
409CELL_BVC_C
410
411@K@CODE
412/* GETTING THE EVENT DESCRIPTOR */
413G9PB512_GET_MSG_LESS_EV_DESCR_P
414(
415SID_GBNSVC,
416TX_EVD_PTR
417);
418
419
420/* COMPOSING THE EVENT */
421TX_EVD_PTR->.EVENT_CMD:=         G9IBME2_DEACT_CELL_BVC_C;
422TX_EVD_PTR->.EVENT_DESTINATION:= GBBVC_HANDLE;
423TX_EVD_PTR->.KEYS.INT_ARR(0):=
424NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;
425TX_EVD_PTR->.KEYS.INT_ARR(1):=   EVD_PTR->.ADD_DATA(3);
426
427
428
429/* SENDING */
430G9PX503_POST_EVENT_P(TX_EVD_PTR);
431
432@K@FREEZE
433933318270
434@K@NAME
435TA_NXTRESP
436@K@INSCRIPT
437DEFINE
438NEW 'NEXT_
439RESPONSIBLE'
440@K@CODE
441NSEI_CON_PTR->.NEXT_RESP_NSVCI_CON_PTR:=
442 NSEI_CON_PTR->.NEXT_RESP_NSVCI_CON_PTR->.NEXT_LSP_NSVCI_CON_PTR;
443
444
445@K@FREEZE
446938005006
447@K@NAME
448TA_NXTSUBS
449@K@INSCRIPT
450DEFINE
451NEW 'NEXT_
452SUBSTITUTE'
453@K@CODE
454NSEI_CON_PTR->.NEXT_SUBS_NSVCI_CON_PTR:=
455 NSEI_CON_PTR->.NEXT_SUBS_NSVCI_CON_PTR->.NEXT_UBL_NSVCI_CON_PTR;
456
457@K@NAME
458M_BLK_O__M
459@K@INSCRIPT
460NS_
461BLOCK
462@K@CODE
463/* GETTING THE EVENT DESCRIPTOR */
464G9PB511_GET_MSG_BOUND_EV_DESCR_P
465(
466SID_GBNSVC,
467(SIZE(G9IBDF4_NS_LM_M) + G9IBD44_NS_PDU_DATA_OFFSET_C),
468TX_EVD_PTR
469);
470
471/* COMPOSING THE EVENT */
472/* FIRST THE DESCRIPTOR */
473TX_EVD_PTR->.EVENT_CMD:=         G9IBD40_NS_LM_PDU_C;
474TX_EVD_PTR->.EVENT_DESTINATION:= GBDL_HANDLE;
475
476IF
477/* 'OTHER' ALIVE NSVC TO THIS NSEI EXISTING? */
478NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR /= NULL
479THEN
480/* USE THIS 'OTHER' FOR TRANSPORT */
481TX_EVD_PTR->.KEYS.INT_ARR(0):=
482
483NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;
484/* NSEI TO BE USED FOR TRANSPORT */
485TX_EVD_PTR->.KEYS.INT_ARR(1):=
486
487NSVCI_CON_PTR->.OWN_NSEI_CON_PTR->.NEXT_ALIV_NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
488/* NSVCI TO BE USED FOR TRANSPORT */
489ELSE
490/* USE AFFECTED NSVC AGAIN FOR TRANSPORT */
491TX_EVD_PTR->.KEYS.INT_ARR(0):=
492 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;  /* NSEI TO BE USED FOR
493TRANSPORT */
494TX_EVD_PTR->.KEYS.INT_ARR(1):=
495 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVCI TO BE USED FOR
496TRANSPORT */
497FI;
498
499
500/* POINTER TO PDU IN POOL-ELEMENT */
501NS_PDU_PTR:= NS_PDU_REF_M (INT(TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT)
502                           + G9IBD44_NS_PDU_DATA_OFFSET_C);
503/* OFFSET OF THE PDU IN POOL-ELEMENT */
504TX_EVD_PTR->.BOUND.DATA_OFFSET:= G9IBD44_NS_PDU_DATA_OFFSET_C;
505/* LENGTH OF THE PDU IN POOL-ELEMENT */
506TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(NS_PDU_PTR->.G9IBDF4_PDU_TYPE) +
507SIZE(NS_PDU_PTR->.D2);
508
509
510/* NOW THE POOL-ELEMENT */
511NS_PDU_PTR->.G9IBDF4_PDU_TYPE:= G9IBDR1_NS_BLOCK_C; /* PDU-TYPE */
512
513NS_PDU_PTR->.D2.CAUSE_TLV.CAUSE_VAL:=
514 G9IBBA2_NS_TRANSIT_NETWORK_FAILURE;       /* CAUSE FOR BLOCK */
515NS_PDU_PTR->.D2.NSVCI_TLV.NSVCI_VAL :=
516 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVC TO BE BLOCKED */
517
518
519/* SENDING */
520G9PX503_POST_EVENT_P(TX_EVD_PTR);
521
522@K@TEXT
523GSM 8.16 CHAP. 7.2:
524THE NS-BLOCK-PDU MAY BE SENT IN ANY ALIVE
525(BLOCKED OR UNBLOCKED) NS-VC...
526@K@FREEZE
527938803215
528@K@NAME
529M_DE_SBVCN
530@K@INSCRIPT
531G9IBME1_
532DEACT_
533SIGN_BVC_C
534@K@CODE
535/* GETTING THE EVENT DESCRIPTOR */
536G9PB512_GET_MSG_LESS_EV_DESCR_P
537(
538SID_GBNSVC,
539TX_EVD_PTR
540);
541
542
543/* COMPOSING THE EVENT */
544TX_EVD_PTR->.EVENT_CMD:=         G9IBME1_DEACT_SIGN_BVC_C;
545TX_EVD_PTR->.EVENT_DESTINATION:= GBBVC_HANDLE;
546TX_EVD_PTR->.KEYS.INT_ARR(0):=   EVD_PTR->.KEYS.INT_ARR(0);
547TX_EVD_PTR->.KEYS.INT_ARR(1):=   SIGN_BVCI;
548
549
550
551/* SENDING */
552G9PX503_POST_EVENT_P(TX_EVD_PTR);
553
554@K@FREEZE
555938788201
556@K@NAME
557M_OAME401M
558@K@INSCRIPT
559ERROR_MESSAGE:
560ERRONOUS_PDU
561RESET_PDU
562
563@K@CODE
564/* GETTING THE EVENT DESCRIPTOR */
565G9PB511_GET_MSG_BOUND_EV_DESCR_P
566(
567SID_GBNSVC,
568(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
569TX_EVD_PTR
570);
571
572
573/* COMPOSING THE EVENT */
574/* FIRST THE DESCRIPTOR */
575TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
576TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
577TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
578TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
579TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
580
581/* NOW THE POOL-ELEMENT */
582/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
583OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
584
585/* COMPOSING THE MESSAGE */
586/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSE */
587OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSE;
588OAM_MSG_PTR->.HANDLED_OBJECT.NSE_ID:=      EVD_PTR->.KEYS.INT_ARR(0); /*
589USED NSEI (FROM ECI) */
590
591/* ERROR-CAUSE = ERRONEOUS_PDU */
592OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ERRONEOUS_PDU;
593/* ADDITIONAL_PDU_INFO */
594OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_PDU_TYPE:=
595 G9OC124_RESET_PDU;
596OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSEI:=
597 EVD_PTR->.ADD_DATA(0); /* AFFECTED NSEI (FROM PDU) */
598OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSVC:=
599 EVD_PTR->.ADD_DATA(1); /* AFFECTED NSVCI (FROM PDU) */
600
601
602
603/* SENDING */
604G9PX503_POST_EVENT_P(TX_EVD_PTR);
605
606@K@FREEZE
607935766108
608@K@NAME
609M_OAME402M
610@K@INSCRIPT
611ERROR_MESSAGE:
612ERRONOUS_PDU
613RESET_PDU
614
615@K@CODE
616/* GETTING THE EVENT DESCRIPTOR */
617G9PB511_GET_MSG_BOUND_EV_DESCR_P
618(
619SID_GBNSVC,
620(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
621TX_EVD_PTR
622);
623
624
625/* COMPOSING THE EVENT */
626/* FIRST THE DESCRIPTOR */
627TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
628TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
629TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
630TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
631TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
632
633/* NOW THE POOL-ELEMENT */
634/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
635OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
636
637/* COMPOSING THE MESSAGE */
638/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
639OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
640OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=     EVD_PTR->.KEYS.INT_ARR(1); /*
641USED NSVCI (FROM ECI) */
642
643/* ERROR-CAUSE = ERRONEOUS_PDU */
644OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ERRONEOUS_PDU;
645/* ADDITIONAL_PDU_INFO */
646OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_PDU_TYPE:=
647 G9OC124_RESET_PDU;
648OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSEI:=
649 EVD_PTR->.ADD_DATA(0); /* NSEI FROM PDU */
650OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSVC:=
651 EVD_PTR->.ADD_DATA(1); /* NSVCI FROM PDU */
652
653
654
655/* SENDING */
656G9PX503_POST_EVENT_P(TX_EVD_PTR);
657
658@K@FREEZE
659935766407
660@K@NAME
661M_OAME411M
662@K@INSCRIPT
663ERROR_MESSAGE:
664ERRONOUS_PDU
665RESET_ACK_PDU
666
667@K@CODE
668/* GETTING THE EVENT DESCRIPTOR */
669G9PB511_GET_MSG_BOUND_EV_DESCR_P
670(
671SID_GBNSVC,
672(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
673TX_EVD_PTR
674);
675
676
677/* COMPOSING THE EVENT */
678/* FIRST THE DESCRIPTOR */
679TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
680TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
681TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
682TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
683TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
684
685/* NOW THE POOL-ELEMENT */
686/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
687OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
688
689/* COMPOSING THE MESSAGE */
690/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSE */
691OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSE;
692OAM_MSG_PTR->.HANDLED_OBJECT.NSE_ID:=      EVD_PTR->.KEYS.INT_ARR(0); /*
693USED NSEI (FROM ECI) */
694
695/* ERROR-CAUSE = ERRONEOUS_PDU */
696OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ERRONEOUS_PDU;
697/* ADDITIONAL_PDU_INFO */
698OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_PDU_TYPE:=
699 G9OC124_RESET_ACK_PDU;
700OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSEI:=
701 EVD_PTR->.ADD_DATA(0); /* NSEI FROM PDU */
702OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSVC:=
703 EVD_PTR->.ADD_DATA(1); /* NSVCI FROM PDU */
704
705
706
707/* SENDING */
708G9PX503_POST_EVENT_P(TX_EVD_PTR);
709
710@K@FREEZE
711935767332
712@K@NAME
713M_OAME412M
714@K@INSCRIPT
715ERROR_MESSAGE:
716ERRONOUS_PDU
717RESET_ACK_PDU
718
719@K@CODE
720/* GETTING THE EVENT DESCRIPTOR */
721G9PB511_GET_MSG_BOUND_EV_DESCR_P
722(
723SID_GBNSVC,
724(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
725TX_EVD_PTR
726);
727
728
729/* COMPOSING THE EVENT */
730/* FIRST THE DESCRIPTOR */
731TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
732TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
733TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
734TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
735TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
736
737/* NOW THE POOL-ELEMENT */
738/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
739OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
740
741/* COMPOSING THE MESSAGE */
742/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
743OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
744OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=     EVD_PTR->.KEYS.INT_ARR(1); /*
745USED NSVCI (FROM ECI) */
746
747/* ERROR-CAUSE = ERRONEOUS_PDU */
748OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ERRONEOUS_PDU;
749/* ADDITIONAL_PDU_INFO */
750OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_PDU_TYPE:=
751 G9OC124_RESET_ACK_PDU;
752OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSEI:=
753 EVD_PTR->.ADD_DATA(0); /* NSEI FROM PDU */
754OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSVC:=
755 EVD_PTR->.ADD_DATA(1); /* NSVCI FROM PDU */
756
757
758
759
760/* SENDING */
761G9PX503_POST_EVENT_P(TX_EVD_PTR);
762
763@K@FREEZE
764935767189
765@K@NAME
766C_CON
767@K@INSCRIPT
768RC_DB
769@K@CODE
770RC_DB
771
772@K@FREEZE
773922176673
774@K@NAME
775M_BLK____M
776@K@INSCRIPT
777NS_
778BLOCK
779@K@CODE
780/* GETTING THE EVENT DESCRIPTOR */
781G9PB511_GET_MSG_BOUND_EV_DESCR_P
782(
783SID_GBNSVC,
784(SIZE(G9IBDF4_NS_LM_M) + G9IBD44_NS_PDU_DATA_OFFSET_C),
785TX_EVD_PTR
786);
787
788/* COMPOSING THE EVENT */
789/* FIRST THE DESCRIPTOR */
790TX_EVD_PTR->.EVENT_CMD:=         G9IBD40_NS_LM_PDU_C;
791TX_EVD_PTR->.EVENT_DESTINATION:= GBDL_HANDLE;
792TX_EVD_PTR->.KEYS.INT_ARR(0):=
793NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSEI;  /* NSEI TO BE USED FOR
794TRANSPORT */
795TX_EVD_PTR->.KEYS.INT_ARR(1):=
796NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVCI TO BE USED FOR
797TRANSPORT */
798/* POINTER TO PDU IN POOL-ELEMENT */
799NS_PDU_PTR:= NS_PDU_REF_M (INT(TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT)
800                           + G9IBD44_NS_PDU_DATA_OFFSET_C);
801/* OFFSET OF THE PDU IN POOL-ELEMENT */
802TX_EVD_PTR->.BOUND.DATA_OFFSET:= G9IBD44_NS_PDU_DATA_OFFSET_C;
803/* LENGTH OF THE PDU IN POOL-ELEMENT */
804TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(NS_PDU_PTR->.G9IBDF4_PDU_TYPE) +
805SIZE(NS_PDU_PTR->.D2);
806
807
808/* NOW THE POOL-ELEMENT */
809NS_PDU_PTR->.G9IBDF4_PDU_TYPE:= G9IBDR1_NS_BLOCK_C; /* PDU-TYPE */
810
811NS_PDU_PTR->.D2.CAUSE_TLV.CAUSE_VAL:=
812 G9IBBA2_NS_OAM_INTERVENTION;              /* CAUSE FOR BLOCK */
813NS_PDU_PTR->.D2.NSVCI_TLV.NSVCI_VAL :=
814 NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI; /* NSVC TO BE BLOCKED */
815
816
817/* SENDING */
818G9PX503_POST_EVENT_P(TX_EVD_PTR);
819
820@K@TEXT
821GSM 8.16 CHAP. 7.2:
822THE NS-BLOCK-PDU MAY BE SENT IN ANY ALIVE
823(BLOCKED OR UNBLOCKED) NS-VC...
824@K@FREEZE
825926348613
826@K@NAME
827S_BLOCKED
828@K@INSCRIPT
829G9IBSM0_
830BLOCKED
831@K@CODE
832
833
834@K@FREEZE
835922176496
836@K@NAME
837D_CON
838@K@INSCRIPT
839CONTEXT
840GOT
841@K@CODE
842RC_DB = G9IBSR0_RC_OK
843
844@K@FREEZE
845921772339
846@K@NAME
847M_OAME901M
848@K@INSCRIPT
849ERROR_MESSAGE:
850OPERATIONAL_STATE_CHANGE
851UBL->BLK
852@K@CODE
853/* GETTING THE EVENT DESCRIPTOR */
854G9PB511_GET_MSG_BOUND_EV_DESCR_P
855(
856SID_GBNSVC,
857(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
858TX_EVD_PTR
859);
860
861
862/* COMPOSING THE EVENT */
863/* FIRST THE DESCRIPTOR */
864TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
865TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
866TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
867TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
868TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
869
870/* NOW THE POOL-ELEMENT */
871/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
872OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
873
874/* COMPOSING THE MESSAGE */
875/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
876OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
877OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
878NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
879
880/* ERROR_CAUSE = OPERATIONAL_STATE_CHANGE */
881OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_OPERATIONAL_STATE_CHANGE;
882/* ADDITIONAL_OPERATIONAL_STATE_INFO */
883OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.OPER_STATE_OLD:=
884 G9OC101_UNBLOCKED;
885OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.OPER_STATE_NEW:=
886 G9OC101_BLOCKED;
887OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.ADMIN_STATE_OLD:=
888 G9OC102_ENABLED;
889OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.ADMIN_STATE_NEW:=
890 G9OC102_ENABLED;
891
892
893/* SENDING */
894G9PX503_POST_EVENT_P(TX_EVD_PTR);
895
896@K@FREEZE
897925970975
898@K@NAME
899M_OAME902M
900@K@INSCRIPT
901ERROR_MESSAGE:
902OPERATIONAL_STATE_CHANGE
903UBL->BLK
904
905@K@CODE
906/* GETTING THE EVENT DESCRIPTOR */
907G9PB511_GET_MSG_BOUND_EV_DESCR_P
908(
909SID_GBNSVC,
910(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
911TX_EVD_PTR
912);
913
914
915/* COMPOSING THE EVENT */
916/* FIRST THE DESCRIPTOR */
917TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
918TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
919TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
920TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
921TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
922
923/* NOW THE POOL-ELEMENT */
924/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
925OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
926
927/* COMPOSING THE MESSAGE */
928/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
929OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
930OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
931NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
932
933/* ERROR_CAUSE = OPERATIONAL_STATE_CHANGE */
934OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_OPERATIONAL_STATE_CHANGE;
935/* ADDITIONAL_OPERATIONAL_STATE_INFO */
936OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.OPER_STATE_OLD:=
937 G9OC101_UNBLOCKED;
938OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.OPER_STATE_NEW:=
939 G9OC101_BLOCKED;
940OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.ADMIN_STATE_OLD:=
941 G9OC102_ENABLED;
942OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.ADMIN_STATE_NEW:=
943 G9OC102_DISABLED;
944
945
946/* SENDING */
947G9PX503_POST_EVENT_P(TX_EVD_PTR);
948
949@K@FREEZE
950925970987
951@K@NAME
952M_OAME10SM
953@K@INSCRIPT
954ERROR_MESSAGE:
955ALARM_BEGIN_NS_ALIVE_TEST
956@K@CODE
957/* GETTING THE EVENT DESCRIPTOR */
958G9PB511_GET_MSG_BOUND_EV_DESCR_P
959(
960SID_GBNSVC,
961(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
962TX_EVD_PTR
963);
964
965
966/* COMPOSING THE EVENT */
967/* FIRST THE DESCRIPTOR */
968TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
969TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
970TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
971TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
972TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
973
974/* NOW THE POOL-ELEMENT */
975/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
976OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
977
978/* COMPOSING THE MESSAGE */
979/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
980OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
981OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
982NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
983
984/* ERROR_CAUSE = ALARM_BEGIN_NS_ALIVE_TEST*/
985OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_BEGIN_NS_ALIVE_TEST;
986/* ADDITIONAL_ALARM_INFO */
987OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
988 TRUE;
989OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
990 G9OC101_BLOCKED;
991OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
992 G9OC101_BLOCKED;
993OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
994 G9OC103_DEAD;
995OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
996 G9OC103_DEAD;
997OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
998 TRUE;
999
1000
1001
1002/* SENDING */
1003G9PX503_POST_EVENT_P(TX_EVD_PTR);
1004
1005@K@NAME
1006M_OAME911M
1007@K@INSCRIPT
1008ERROR_MESSAGE:
1009OPERATIONAL_STATE_CHANGE
1010BLK->UBL
1011@K@CODE
1012/* GETTING THE EVENT DESCRIPTOR */
1013G9PB511_GET_MSG_BOUND_EV_DESCR_P
1014(
1015SID_GBNSVC,
1016(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1017TX_EVD_PTR
1018);
1019
1020
1021/* COMPOSING THE EVENT */
1022/* FIRST THE DESCRIPTOR */
1023TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1024TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1025TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1026TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1027TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1028
1029/* NOW THE POOL-ELEMENT */
1030/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1031OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1032
1033/* COMPOSING THE MESSAGE */
1034/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1035OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1036OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1037NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1038
1039/* ERROR_CAUSE = OPERATIONAL_STATE_CHANGE */
1040OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_OPERATIONAL_STATE_CHANGE;
1041/* ADDITIONAL_OPERATIONAL_STATE_INFO */
1042OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.OPER_STATE_OLD:=
1043 G9OC101_BLOCKED;
1044OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.OPER_STATE_NEW:=
1045 G9OC101_UNBLOCKED;
1046OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.ADMIN_STATE_OLD:=
1047 G9OC102_ENABLED;
1048OAM_MSG_PTR->.ADDITIONAL_OPERATIONAL_STATE_INFO.ADMIN_STATE_NEW:=
1049 G9OC102_ENABLED;
1050
1051
1052/* SENDING */
1053G9PX503_POST_EVENT_P(TX_EVD_PTR);
1054
1055@K@FREEZE
1056925970996
1057@K@NAME
1058M_OAME20SM
1059@K@INSCRIPT
1060ERROR_MESSAGE:
1061ALARM_END_NS_ALIVE_TEST
1062@K@CODE
1063/* GETTING THE EVENT DESCRIPTOR */
1064G9PB511_GET_MSG_BOUND_EV_DESCR_P
1065(
1066SID_GBNSVC,
1067(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1068TX_EVD_PTR
1069);
1070
1071
1072/* COMPOSING THE EVENT */
1073/* FIRST THE DESCRIPTOR */
1074TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1075TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1076TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1077TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1078TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1079
1080/* NOW THE POOL-ELEMENT */
1081/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1082OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1083
1084/* COMPOSING THE MESSAGE */
1085/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1086OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1087OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1088NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1089
1090/* ERROR_CAUSE = ALARM_END_NS_ALIVE_TEST */
1091OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_END_NS_ALIVE_TEST;
1092/* ADDITIONAL_ALARM_INFO */
1093OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
1094 TRUE;
1095OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
1096 G9OC101_BLOCKED;
1097OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
1098 G9OC101_BLOCKED;
1099OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
1100 G9OC103_DEAD;
1101OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
1102 G9OC103_DEAD;
1103OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
1104 TRUE;
1105
1106
1107
1108/* SENDING */
1109G9PX503_POST_EVENT_P(TX_EVD_PTR);
1110
1111@K@NAME
1112M_OAME10_M
1113@K@INSCRIPT
1114ERROR_MESSAGE:
1115ALARM_BEGIN_NS_ALIVE_TEST
1116@K@CODE
1117/* GETTING THE EVENT DESCRIPTOR */
1118G9PB511_GET_MSG_BOUND_EV_DESCR_P
1119(
1120SID_GBNSVC,
1121(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1122TX_EVD_PTR
1123);
1124
1125
1126/* COMPOSING THE EVENT */
1127/* FIRST THE DESCRIPTOR */
1128TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1129TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1130TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1131TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1132TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1133
1134/* NOW THE POOL-ELEMENT */
1135/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1136OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1137
1138/* COMPOSING THE MESSAGE */
1139/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1140OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1141OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1142NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1143
1144/* ERROR_CAUSE = ALARM_BEGIN_NS_ALIVE_TEST*/
1145OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_BEGIN_NS_ALIVE_TEST;
1146/* ADDITIONAL_ALARM_INFO */
1147OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
1148 TRUE;
1149OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
1150 G9OC101_BLOCKED;
1151OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
1152 G9OC101_BLOCKED;
1153OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
1154 G9OC103_DEAD;
1155OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
1156 G9OC103_DEAD;
1157OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
1158 TRUE;
1159
1160
1161
1162/* SENDING */
1163G9PX503_POST_EVENT_P(TX_EVD_PTR);
1164
1165@K@FREEZE
1166922443813
1167@K@NAME
1168D_SEM
1169@K@INSCRIPT
1170CALL_SEM
1171=
1172TRUE
1173@K@CODE
1174CALL_SEM = TRUE
1175
1176@K@FREEZE
1177922176624
1178@K@NAME
1179D_N_0
1180@K@INSCRIPT
1181N = 0
1182
1183@K@CODE
1184NSVCI_CON_PTR->.N = 0
1185
1186@K@FREEZE
1187921511000
1188@K@NAME
1189M_OAME12_M
1190@K@INSCRIPT
1191ERROR_MESSAGE:
1192ALARM_BEGIN_NS_ALIVE_TEST
1193@K@CODE
1194/* GETTING THE EVENT DESCRIPTOR */
1195G9PB511_GET_MSG_BOUND_EV_DESCR_P
1196(
1197SID_GBNSVC,
1198(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1199TX_EVD_PTR
1200);
1201
1202
1203/* COMPOSING THE EVENT */
1204/* FIRST THE DESCRIPTOR */
1205TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1206TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1207TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1208TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1209TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1210
1211/* NOW THE POOL-ELEMENT */
1212/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1213OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1214
1215/* COMPOSING THE MESSAGE */
1216/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1217OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1218OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1219NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1220
1221/* ERROR_CAUSE = ALARM_BEGIN_NS_ALIVE_TEST*/
1222OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_BEGIN_NS_ALIVE_TEST;
1223/* ADDITIONAL_ALARM_INFO */
1224OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
1225 FALSE;
1226OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
1227 G9OC101_BLOCKED;
1228OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
1229 G9OC101_BLOCKED;
1230OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
1231 G9OC103_ALIVE;
1232OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
1233 G9OC103_DEAD;
1234OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
1235 TRUE;
1236
1237
1238
1239/* SENDING */
1240G9PX503_POST_EVENT_P(TX_EVD_PTR);
1241
1242@K@FREEZE
1243922443829
1244@K@NAME
1245M_OAME21_M
1246@K@INSCRIPT
1247ERROR_MESSAGE:
1248ALARM_END_NS_ALIVE_TEST
1249@K@CODE
1250/* GETTING THE EVENT DESCRIPTOR */
1251G9PB511_GET_MSG_BOUND_EV_DESCR_P
1252(
1253SID_GBNSVC,
1254(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1255TX_EVD_PTR
1256);
1257
1258
1259/* COMPOSING THE EVENT */
1260/* FIRST THE DESCRIPTOR */
1261TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1262TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1263TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1264TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1265TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1266
1267/* NOW THE POOL-ELEMENT */
1268/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1269OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1270
1271/* COMPOSING THE MESSAGE */
1272/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1273OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1274OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1275NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1276
1277/* ERROR_CAUSE = ALARM_END_NS_ALIVE_TEST */
1278OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_END_NS_ALIVE_TEST;
1279/* ADDITIONAL_ALARM_INFO */
1280OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
1281 TRUE;
1282OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
1283 G9OC101_BLOCKED;
1284OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
1285 G9OC101_BLOCKED;
1286OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
1287 G9OC103_DEAD;
1288OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
1289 G9OC103_DEAD;
1290OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
1291 FALSE;
1292
1293
1294
1295/* SENDING */
1296G9PX503_POST_EVENT_P(TX_EVD_PTR);
1297
1298@K@FREEZE
1299922443856
1300@K@NAME
1301M_OAME13_M
1302@K@INSCRIPT
1303ERROR_MESSAGE:
1304ALARM_BEGIN_NS_ALIVE_TEST
1305@K@CODE
1306/* GETTING THE EVENT DESCRIPTOR */
1307G9PB511_GET_MSG_BOUND_EV_DESCR_P
1308(
1309SID_GBNSVC,
1310(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1311TX_EVD_PTR
1312);
1313
1314
1315/* COMPOSING THE EVENT */
1316/* FIRST THE DESCRIPTOR */
1317TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1318TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1319TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1320TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1321TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1322
1323/* NOW THE POOL-ELEMENT */
1324/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1325OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1326
1327/* COMPOSING THE MESSAGE */
1328/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1329OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1330OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1331NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1332
1333/* ERROR_CAUSE = ALARM_BEGIN_NS_ALIVE_TEST*/
1334OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_BEGIN_NS_ALIVE_TEST;
1335/* ADDITIONAL_ALARM_INFO */
1336OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
1337 FALSE;
1338OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
1339 G9OC101_UNBLOCKED;
1340OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
1341 G9OC101_BLOCKED;
1342OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
1343 G9OC103_ALIVE;
1344OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
1345 G9OC103_DEAD;
1346OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
1347 TRUE;
1348
1349
1350
1351/* SENDING */
1352G9PX503_POST_EVENT_P(TX_EVD_PTR);
1353
1354@K@FREEZE
1355922443838
1356@K@NAME
1357M_OAME22_M
1358@K@INSCRIPT
1359ERROR_MESSAGE:
1360ALARM_END_NS_ALIVE_TEST
1361@K@CODE
1362/* GETTING THE EVENT DESCRIPTOR */
1363G9PB511_GET_MSG_BOUND_EV_DESCR_P
1364(
1365SID_GBNSVC,
1366(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1367TX_EVD_PTR
1368);
1369
1370
1371/* COMPOSING THE EVENT */
1372/* FIRST THE DESCRIPTOR */
1373TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1374TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1375TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1376TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1377TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1378
1379/* NOW THE POOL-ELEMENT */
1380/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1381OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1382
1383/* COMPOSING THE MESSAGE */
1384/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1385OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1386OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1387NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1388
1389/* ERROR_CAUSE = ALARM_END_NS_ALIVE_TEST */
1390OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ALARM_END_NS_ALIVE_TEST;
1391/* ADDITIONAL_ALARM_INFO */
1392OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.ADMINISTRATIVE_STATE_CHANGED:=
1393 FALSE;
1394OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_OLD:=
1395 G9OC101_BLOCKED;
1396OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.OPER_STATE_NEW:=
1397 G9OC101_BLOCKED;
1398OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_OLD:=
1399 G9OC103_DEAD;
1400OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.AVAIL_STATE_NEW:=
1401 G9OC103_ALIVE;
1402OAM_MSG_PTR->.ADDITIONAL_ALARM_INFO.CONFIGURATION_OF_NSVC:=
1403 TRUE;
1404
1405
1406
1407/* SENDING */
1408G9PX503_POST_EVENT_P(TX_EVD_PTR);
1409
1410@K@FREEZE
1411922443864
1412@K@NAME
1413M_OAME30_M
1414@K@INSCRIPT
1415ERROR_MESSAGE:
1416NO_ANSWER_FORM_BSS
1417RESET_PROCEDURE
1418
1419
1420@K@CODE
1421/* GETTING THE EVENT DESCRIPTOR */
1422G9PB511_GET_MSG_BOUND_EV_DESCR_P
1423(
1424SID_GBNSVC,
1425(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1426TX_EVD_PTR
1427);
1428
1429
1430/* COMPOSING THE EVENT */
1431/* FIRST THE DESCRIPTOR */
1432TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1433TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1434TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1435TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1436TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1437
1438/* NOW THE POOL-ELEMENT */
1439/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1440OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1441
1442/* COMPOSING THE MESSAGE */
1443/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1444OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1445OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1446NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1447
1448/* ERROR_CAUSE = NO_ANSWER_FROM_BSS */
1449OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_NO_ANSWER_FROM_BSS;
1450/* INITIATED_PROCEDURE */
1451OAM_MSG_PTR->.INITIATED_PROCEDURE:=
1452 G9OC123_RESET_PROCEDURE;
1453
1454
1455/* SENDING */
1456G9PX503_POST_EVENT_P(TX_EVD_PTR);
1457
1458@K@FREEZE
1459922175973
1460@K@NAME
1461M_OAME31_M
1462@K@INSCRIPT
1463ERROR_MESSAGE:
1464NO_ANSWER_FROM_BSS
1465BLOCK_PROCEDURE
1466
1467@K@CODE
1468/* GETTING THE EVENT DESCRIPTOR */
1469G9PB511_GET_MSG_BOUND_EV_DESCR_P
1470(
1471SID_GBNSVC,
1472(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1473TX_EVD_PTR
1474);
1475
1476
1477/* COMPOSING THE EVENT */
1478/* FIRST THE DESCRIPTOR */
1479TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1480TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1481TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1482TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1483TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1484
1485/* NOW THE POOL-ELEMENT */
1486/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1487OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1488
1489/* COMPOSING THE MESSAGE */
1490/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1491OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1492OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1493NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1494
1495/* ERROR_CAUSE = NO_ANSWER_FROM_BSS */
1496OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_NO_ANSWER_FROM_BSS;
1497/* INITIATED_PROCEDURE */
1498OAM_MSG_PTR->.INITIATED_PROCEDURE:=
1499 G9OC123_BLOCK_PROCEDURE;
1500
1501
1502/* SENDING */
1503G9PX503_POST_EVENT_P(TX_EVD_PTR);
1504
1505@K@FREEZE
1506922175976
1507@K@NAME
1508M_OAME32_M
1509@K@INSCRIPT
1510ERROR_MESSAGE:
1511NO_ANSWER_FROM_BSS
1512UNBLOCK_PROCEDURE
1513
1514@K@CODE
1515/* GETTING THE EVENT DESCRIPTOR */
1516G9PB511_GET_MSG_BOUND_EV_DESCR_P
1517(
1518SID_GBNSVC,
1519(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1520TX_EVD_PTR
1521);
1522
1523
1524/* COMPOSING THE EVENT */
1525/* FIRST THE DESCRIPTOR */
1526TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1527TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1528TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1529TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1530TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1531
1532/* NOW THE POOL-ELEMENT */
1533/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1534OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1535
1536/* COMPOSING THE MESSAGE */
1537/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1538OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1539OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1540NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1541
1542/* ERROR_CAUSE = NO_ANSWER_FROM_BSS */
1543OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_NO_ANSWER_FROM_BSS;
1544/* INITIATED_PROCEDURE */
1545OAM_MSG_PTR->.INITIATED_PROCEDURE:=
1546 G9OC123_UNBLOCK_PROCEDURE;
1547
1548
1549
1550/* SENDING */
1551G9PX503_POST_EVENT_P(TX_EVD_PTR);
1552
1553@K@FREEZE
1554922175980
1555@K@NAME
1556M_OAME42_M
1557@K@INSCRIPT
1558ERROR_MESSAGE:
1559ERRONOUS_PDU
1560BLOCK_PDU
1561@K@CODE
1562/* GETTING THE EVENT DESCRIPTOR */
1563G9PB511_GET_MSG_BOUND_EV_DESCR_P
1564(
1565SID_GBNSVC,
1566(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1567TX_EVD_PTR
1568);
1569
1570
1571/* COMPOSING THE EVENT */
1572/* FIRST THE DESCRIPTOR */
1573TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1574TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1575TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1576TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1577TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1578
1579/* NOW THE POOL-ELEMENT */
1580/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1581OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1582
1583/* COMPOSING THE MESSAGE */
1584/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1585OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1586OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=     EVD_PTR->.ADD_DATA(1); /*
1587USED NSVCI (FROM ECI) */
1588
1589/* ERROR-CAUSE = ERRONEOUS_PDU */
1590OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ERRONEOUS_PDU;
1591/* ADDITIONAL_PDU_INFO */
1592OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_PDU_TYPE:=
1593 G9OC124_BLOCK_PDU;
1594OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSEI:=
1595 EVD_PTR->.KEYS.INT_ARR(0); /* AFFECTED NSEI (FROM PDU) */
1596OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSVC:=
1597 EVD_PTR->.KEYS.INT_ARR(1); /* AFFECTED NSVCI (FROM PDU) */
1598
1599
1600
1601
1602/* SENDING */
1603G9PX503_POST_EVENT_P(TX_EVD_PTR);
1604
1605@K@FREEZE
1606934296141
1607@K@NAME
1608M_OAME50_M
1609@K@INSCRIPT
1610ERROR_MESSAGE:
1611STATUS_PDU_CONTAINS_ERROR_INFO
1612RECEIVED
1613@K@CODE
1614/* GETTING THE EVENT DESCRIPTOR */
1615G9PB511_GET_MSG_BOUND_EV_DESCR_P
1616(
1617SID_GBNSVC,
1618(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1619TX_EVD_PTR
1620);
1621
1622
1623/* COMPOSING THE EVENT */
1624/* FIRST THE DESCRIPTOR */
1625TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1626TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1627TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1628TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1629TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1630
1631/* NOW THE POOL-ELEMENT */
1632/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1633OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1634
1635/* COMPOSING THE MESSAGE */
1636/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1637OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1638OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=
1639NSVCI_CON_PTR->.DBMS.NSVC_INSTANCE.NSVCI;
1640
1641/* ERROR-CAUSE = STATUS_PDU_CONTAINS_ERROR_INFO */
1642OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_STATUS_PDU_CONTAINS_ERROR_INFO;
1643/* ADDITIONAL_STATUS_PDU_INFO */
1644INT_CAUSE_PTR.INT_PTR:= ADDR(EVD_PTR->.ADD_DATA(2));
1645OAM_MSG_PTR->.ADDITIONAL_STATUS_PDU_INFO:=
1646  INT_CAUSE_PTR.CAUSE_PTR->; /* CAUSE */
1647
1648
1649
1650/* SENDING */
1651G9PX503_POST_EVENT_P(TX_EVD_PTR);
1652
1653@K@TEXT
1654NICHT OK
1655
1656@K@FREEZE
1657934298924
1658@K@NAME
1659M_OAME43_M
1660@K@INSCRIPT
1661ERROR_MESSAGE:
1662ERRONOUS_PDU
1663BLOCK_ACK_PDU
1664@K@CODE
1665/* GETTING THE EVENT DESCRIPTOR */
1666G9PB511_GET_MSG_BOUND_EV_DESCR_P
1667(
1668SID_GBNSVC,
1669(SIZE(G9OC109_REPORTED_EVENT_STR_M)),
1670TX_EVD_PTR
1671);
1672
1673
1674/* COMPOSING THE EVENT */
1675/* FIRST THE DESCRIPTOR */
1676TX_EVD_PTR->.EVENT_CMD:=         G9PX040_SEND_MBC_C;
1677TX_EVD_PTR->.EVENT_DESTINATION:= RXTX_HANDLE;
1678TX_EVD_PTR->.KEYS.UBI_INDEX:=    OAM_UBI_INDEX;
1679TX_EVD_PTR->.BOUND.DATA_OFFSET:= 0;
1680TX_EVD_PTR->.BOUND.DATA_LENGTH:= SIZE(G9OC109_REPORTED_EVENT_STR_M);
1681
1682/* NOW THE POOL-ELEMENT */
1683/* INITIALIZATION OF THE POINTER WITH THE POOL-ELEMENT-START */
1684OAM_MSG_PTR:= OAM_MSG_PTR_M (TX_EVD_PTR->.BOUND.PTR_TO_POOL_ELEMENT);
1685
1686/* COMPOSING THE MESSAGE */
1687/* HANDLED OBJECT = AFFECTED INSTANCE, TYPE NSVC */
1688OAM_MSG_PTR->.HANDLED_OBJECT.OBJECT_TYPE:= G9OC104_NSVC;
1689OAM_MSG_PTR->.HANDLED_OBJECT.NSVC_ID:=     EVD_PTR->.ADD_DATA(1); /*
1690USED NSVCI (FROM ECI) */
1691
1692/* ERROR-CAUSE = ERRONEOUS_PDU */
1693OAM_MSG_PTR->.ERROR_CAUSE:= G9OC108_ERRONEOUS_PDU;
1694/* ADDITIONAL_PDU_INFO */
1695OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_PDU_TYPE:=
1696 G9OC124_BLOCK_ACK_PDU;
1697OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSEI:=
1698 EVD_PTR->.KEYS.INT_ARR(0); /* AFFECTED NSEI (FROM PDU) */
1699OAM_MSG_PTR->.ADDITIONAL_PDU_INFO.G9OC120_REPORTED_NSVC:=
1700 EVD_PTR->.KEYS.INT_ARR(1); /* AFFECTED NSVCI (FROM PDU) */
1701
1702
1703
1704/* SENDING */
1705G9PX503_POST_EVENT_P(TX_EVD_PTR);
1706
1707@K@FREEZE
1708934297710
1709