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