[Home] [Help]
PACKAGE BODY: APPS.AR_BILLS_MAIN
Source
1 package body AR_BILLS_MAIN as
2 /* $Header: ARBRCOMB.pls 120.10.12010000.3 2008/10/21 10:01:09 rsamanta ship $ */
3
4 PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
5
6 Function GTRUE RETURN VARCHAR2 IS
7 BEGIN
8 RETURN FND_API.G_TRUE;
9 END;
10
11
12 Function GFALSE RETURN VARCHAR2 IS
13 BEGIN
14 RETURN FND_API.G_FALSE;
15 END;
16
17 /*===========================================================================+
18 | FUNCTION get_fnd_api_constants_rec |
19 | |
20 | DESCRIPTION |
21 | Forms and libraries cannot directly refer to PL/SQL package global |
22 | variables, this function is relays FND_API constants to client side |
23 | |
24 | SCOPE - PUBLIC |
25 | |
26 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
27 | |
28 | ARGUMENTS : IN: None |
29 | |
30 | RETURNS : fnd_api_constants_rec |
31 | |
32 | MODIFICATION HISTORY |
33 | 12-AUG-2000 Jani Rautiainen Created |
34 | |
35 +===========================================================================*/
36 FUNCTION get_fnd_api_constants_rec RETURN fnd_api_constants_type IS
37
38 fnd_api_constants_rec fnd_api_constants_type;
39
40 BEGIN
41
42 RETURN fnd_api_constants_rec;
43
44 END get_fnd_api_constants_rec;
45
46 /*===========================================================================+
47 | FUNCTION get_fnd_api_constants_rec |
48 | |
49 | DESCRIPTION |
50 | Forms and libraries cannot directly refer to PL/SQL package global |
51 | variables, this function is relays FND_MSG_PUB constants to client side |
52 | |
53 | SCOPE - PUBLIC |
54 | |
55 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
56 | |
57 | ARGUMENTS : IN: None |
58 | |
59 | RETURNS : fnd_api_constants_rec |
60 | |
61 | MODIFICATION HISTORY |
62 | 12-AUG-2000 Jani Rautiainen Created |
63 | |
64 +===========================================================================*/
65 FUNCTION get_fnd_msg_pub_constants_rec RETURN fnd_msg_pub_constants_type IS
66
67 fnd_msg_pub_constants_rec fnd_msg_pub_constants_type;
68
69 BEGIN
70
71 RETURN fnd_msg_pub_constants_rec;
72
73 END get_fnd_msg_pub_constants_rec;
74
75 -- ==========================================================================================================================
76 /* Function get_all_items : Function to create a PL SQL table ( pblockitems ) of two columns
77
78
79 Parameters OUT NOCOPY :
80
81 pblockitems PL/SQL table defined as
82
83 Column 1 : br_block_item Varchar2(5) The BlockName.FieldName appearing in the Forms module separated by a point
84 Column 2 : update_allowed Varchar2(1) field with the values Y or N signifying if the field should be accessible
85 to the user.
86
87 Parameters IN
88
89 pbr_module : Varchar2(30) The forms module which contains fields for control.
90
91
92 Call this function in the WHEN-NEW-FORM-INSTANCE trigger of the form which uses this pl sql table
93
94 */
95
96
97 -- ==========================================================================================================================
98
99
100
101 function get_all_items(pbr_module IN VARCHAR2) RETURN blockitemtabtyp IS
102
103 i INTEGER;
104 j INTEGER:=0;
105 x statetabtyp;
106 pblockitems blockitemtabtyp;
107 BEGIN
108
109 x:=load_table(pbr_module);
110
111 for i in 1..brstate.COUNT LOOP
112
113 IF brstate(i).br_state = 'NEW' AND brstate(i).br_module = pbr_module THEN
114 j:=j+1;
115 pblockitems(j).br_block_item:=brstate(i).br_block_item;
116 END IF;
117 end loop;
118
119 return pblockitems;
120
121 end get_All_items;
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148 -- ==========================================================================================================================
149 /* Function : get_all_items_status
150
151 Returns a PL/SQL table of fields which are accessible depending on the Bills Receivable state
152 Table returned is of type blockitemtabtyp
153
154
155
156 Parameters IN :
157
158 pbr_module : varchar2(30) Module Name NOT NULL
159
160 Pbr_blockitem : PL/SQL table using the blockitemtabtyp type. NOT NULL
161
162 Pbr_state1 : First criteria ( State ) of the Bills Receivable. NOT NULL
163
164 Pbr_state2 : Second crieria for determination of field accessibility
165 This parameter is not mandatory. Only when a value is entered will the criteria be considered.
166 If the Bills has been posted the pbr_state2 should have the value POSTED otherwise a null
167 value should be entered
168
169 Pbr_state3 : Third criteria for determination of field accessibility
170 This parameter is not mandatory
171
172 If the Bill has activities , the parameter pbr_state3 should have the value ACTIVITIES
173 otherwise the value null should be entered.
174
175 Call this function in the WHEN-NEW-RECORD-INSTANCE trigger of the form to refresh the items which are accessible
176 */
177
178 -- ==========================================================================================================================
179
180
181
182
183
184 function get_all_items_status(pbr_module in varchar2 , pbr_blockitem in blockitemtabtyp , pbr_state1 in varchar2
185 , pbr_state2 in varchar2 , pbr_state3 in varchar2 , pbr_state4 in varchar2) return blockitemtabtyp IS
186
187 --
188 --
189
190 newstatus blockitemtabtyp;
191
192 i integer;
193 j integer:=0;
194 BEGIN
195
196
197
198 /* We need to reset all of the items back to being nonupdateble */
199
200 newstatus:=pbr_blockitem;
201
202
203 FOR i in newstatus.FIRST..newstatus.LAST LOOP
204 newstatus(i).update_allowed:='N';
205 null;
206 END LOOP;
207
208
209
210 /* Lets read the first 324 records. These are the ones in which the access is dependant upon the status of the bill */
211
212
213 FOR i IN brstate.FIRST..324 LOOP
214
215 IF brstate(i).br_state = pbr_state1 THEN
216
217
218 /* If the status matrix says N then ignore it as its already been set to N anyway */
219
220 IF brstate(i).update_allowed IN ('N')
221 THEN NULL;
222
223 ELSE
224
225 FOR j IN newstatus.FIRST..newstatus.LAST LOOP
226 IF newstatus(j).br_block_item = brstate(i).br_block_item THEN
227 IF newstatus(j).update_allowed in ('N' , 'Y') THEN
228 newstatus(j).update_allowed:=brstate(i).update_allowed;
229 null;
230 END IF;
231 END IF;
232 END LOOP;
233
234 END IF;
235
236 END IF;
237
238 END LOOP;
239
240
241 /* if none of the other statuses are applicable here then leave */
242
243 IF (pbr_state2 = 'XX' AND pbr_state3 = 'XX' AND pbr_state3 = 'XX' ) THEN
244
245 RETURN newstatus;
246
247 END IF;
248
249
250 FOR i IN 325..brstate.LAST LOOP
251
252 IF ( brstate(i).br_state = pbr_state2 OR brstate(i).br_state = pbr_state3 OR brstate(i).br_state = pbr_state4 )
253 THEN
254
255
256 /* If the status matrix has the 'Y' then we can ignore this */
257
258 IF brstate(i).update_allowed IN ('Y') THEN NULL;
259
260 ELSE
261
262
263 /* otherwise the value here overrides the previous one that the BR Status setup*/
264
265 FOR j IN newstatus.FIRST..newstatus.LAST LOOP
266 IF newstatus(j).br_block_item = brstate(i).br_block_item THEN
267 newstatus(j).update_allowed:='N';
268 END IF;
269 END LOOP;
270
271 END IF;
272
273 END IF;
274
275 END LOOP;
276
277
278
279 RETURN newstatus;
280
281 END get_all_items_status;
282
283
284
285
286 -- ==========================================================================================================================
287 /*
288
289 Function load_table
290
291 Returns a PL/SQL table of type StatetabType (defined in corresponding specification
292
293
294
295 Parameters
296
297 IN :
298
299 Pbr_module : Varchar2(30) Not Null Name of the module which has fields for control
300
301
302 This function is called by the function get_all_items
303
304
305
306
307
308 */
309
310 -- ==========================================================================================================================
311
312 function load_table (pbr_module IN VARCHAR2 ) return statetabtyp IS
313
314 begin
315
316
317
318 IF pbr_module = 'ARBRMAIN' THEN
319
320
321
322 brstate(236).br_module:='ARBRMAIN';
323 brstate(236).br_block_item:='RMAI_HEADER.ADDRESS1';
324 brstate(236).br_state:='INCOMPLETE';
325 brstate(236).update_allowed:='M';
326
327 brstate(238).br_module:='ARBRMAIN';
328 brstate(238).br_block_item:='RMAI_HEADER.ADDRESS1';
329 brstate(238).br_state:='PENDING_ACCEPTANCE';
330 brstate(238).update_allowed:='M';
331
332 brstate(239).br_module:='ARBRMAIN';
333 brstate(239).br_block_item:='RMAI_HEADER.ADDRESS1';
334 brstate(239).br_state:='PENDING_REMITTANCE';
335 brstate(239).update_allowed:='N';
336
337 brstate(235).br_module:='ARBRMAIN';
338 brstate(235).br_block_item:='RMAI_HEADER.ADDRESS1';
339 brstate(235).br_state:='FACTORED';
340 brstate(235).update_allowed:='N';
341
342 brstate(237).br_module:='ARBRMAIN';
343 brstate(237).br_block_item:='RMAI_HEADER.ADDRESS1';
344 brstate(237).br_state:='MATURED_PEND_RISK_ELIMINATION';
345 brstate(237).update_allowed:='N';
346
347 brstate(241).br_module:='ARBRMAIN';
348 brstate(241).br_block_item:='RMAI_HEADER.ADDRESS1';
349 brstate(241).br_state:='REMITTED';
350 brstate(241).update_allowed:='N';
351
352 brstate(233).br_module:='ARBRMAIN';
353 brstate(233).br_block_item:='RMAI_HEADER.ADDRESS1';
354 brstate(233).br_state:='CLOSED';
355 brstate(233).update_allowed:='N';
356
357 brstate(234).br_module:='ARBRMAIN';
358 brstate(234).br_block_item:='RMAI_HEADER.ADDRESS1';
359 brstate(234).br_state:='ENDORSED';
360 brstate(234).update_allowed:='N';
361
362 brstate(242).br_module:='ARBRMAIN';
363 brstate(242).br_block_item:='RMAI_HEADER.ADDRESS1';
364 brstate(242).br_state:='UNPAID';
365 brstate(242).update_allowed:='N';
366
367 brstate(240).br_module:='ARBRMAIN';
368 brstate(240).br_block_item:='RMAI_HEADER.ADDRESS1';
369 brstate(240).br_state:='PROTESTED';
370 brstate(240).update_allowed:='N';
371
372 brstate(232).br_module:='ARBRMAIN';
373 brstate(232).br_block_item:='RMAI_HEADER.ADDRESS1';
374 brstate(232).br_state:='CANCELLED';
375 brstate(232).update_allowed:='N';
376
377 brstate(49).br_module:='ARBRMAIN';
378 brstate(49).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
379 brstate(49).br_state:='INCOMPLETE';
380 brstate(49).update_allowed:='N';
381
382 brstate(51).br_module:='ARBRMAIN';
383 brstate(51).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
384 brstate(51).br_state:='PENDING_ACCEPTANCE';
385 brstate(51).update_allowed:='N';
386
387 brstate(52).br_module:='ARBRMAIN';
388 brstate(52).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
389 brstate(52).br_state:='PENDING_REMITTANCE';
390 brstate(52).update_allowed:='N';
391
392 brstate(48).br_module:='ARBRMAIN';
393 brstate(48).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
394 brstate(48).br_state:='FACTORED';
395 brstate(48).update_allowed:='N';
396
397 brstate(50).br_module:='ARBRMAIN';
398 brstate(50).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
399 brstate(50).br_state:='MATURED_PEND_RISK_ELIMINATION';
400 brstate(50).update_allowed:='N';
401
402 brstate(54).br_module:='ARBRMAIN';
403 brstate(54).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
404 brstate(54).br_state:='REMITTED';
405 brstate(54).update_allowed:='N';
406
407 brstate(46).br_module:='ARBRMAIN';
408 brstate(46).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
409 brstate(46).br_state:='CLOSED';
410 brstate(46).update_allowed:='N';
411
412 brstate(47).br_module:='ARBRMAIN';
413 brstate(47).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
414 brstate(47).br_state:='ENDORSED';
415 brstate(47).update_allowed:='N';
416
417 brstate(55).br_module:='ARBRMAIN';
418 brstate(55).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
419 brstate(55).br_state:='UNPAID';
420 brstate(55).update_allowed:='N';
421
422 brstate(53).br_module:='ARBRMAIN';
423 brstate(53).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
424 brstate(53).br_state:='PROTESTED';
425 brstate(53).update_allowed:='N';
426
427 brstate(45).br_module:='ARBRMAIN';
428 brstate(45).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
429 brstate(45).br_state:='CANCELLED';
430 brstate(45).update_allowed:='N';
431
432 brstate(115).br_module:='ARBRMAIN';
433 brstate(115).br_block_item:='RMAI_HEADER.BR_AMOUNT';
434 brstate(115).br_state:='INCOMPLETE';
435 brstate(115).update_allowed:='Y';
436
437 brstate(117).br_module:='ARBRMAIN';
438 brstate(117).br_block_item:='RMAI_HEADER.BR_AMOUNT';
439 brstate(117).br_state:='PENDING_ACCEPTANCE';
440 brstate(117).update_allowed:='Y';
441
442 brstate(118).br_module:='ARBRMAIN';
443 brstate(118).br_block_item:='RMAI_HEADER.BR_AMOUNT';
444 brstate(118).br_state:='PENDING_REMITTANCE';
445 brstate(118).update_allowed:='N';
446
447 brstate(114).br_module:='ARBRMAIN';
448 brstate(114).br_block_item:='RMAI_HEADER.BR_AMOUNT';
452 brstate(116).br_module:='ARBRMAIN';
449 brstate(114).br_state:='FACTORED';
450 brstate(114).update_allowed:='N';
451
453 brstate(116).br_block_item:='RMAI_HEADER.BR_AMOUNT';
454 brstate(116).br_state:='MATURED_PEND_RISK_ELIMINATION';
455 brstate(116).update_allowed:='N';
456
457 brstate(120).br_module:='ARBRMAIN';
458 brstate(120).br_block_item:='RMAI_HEADER.BR_AMOUNT';
459 brstate(120).br_state:='REMITTED';
460 brstate(120).update_allowed:='N';
461
462 brstate(112).br_module:='ARBRMAIN';
463 brstate(112).br_block_item:='RMAI_HEADER.BR_AMOUNT';
464 brstate(112).br_state:='CLOSED';
465 brstate(112).update_allowed:='N';
466
467 brstate(113).br_module:='ARBRMAIN';
468 brstate(113).br_block_item:='RMAI_HEADER.BR_AMOUNT';
469 brstate(113).br_state:='ENDORSED';
470 brstate(113).update_allowed:='N';
471
472 brstate(121).br_module:='ARBRMAIN';
473 brstate(121).br_block_item:='RMAI_HEADER.BR_AMOUNT';
474 brstate(121).br_state:='UNPAID';
475 brstate(121).update_allowed:='N';
476
477 brstate(119).br_module:='ARBRMAIN';
478 brstate(119).br_block_item:='RMAI_HEADER.BR_AMOUNT';
479 brstate(119).br_state:='PROTESTED';
480 brstate(119).update_allowed:='N';
481
482 brstate(111).br_module:='ARBRMAIN';
483 brstate(111).br_block_item:='RMAI_HEADER.BR_AMOUNT';
484 brstate(111).br_state:='CANCELLED';
485 brstate(111).update_allowed:='N';
486
487 brstate(82).br_module:='ARBRMAIN';
488 brstate(82).br_block_item:='RMAI_HEADER.COMMENTS';
489 brstate(82).br_state:='INCOMPLETE';
490 brstate(82).update_allowed:='Y';
491
492 brstate(84).br_module:='ARBRMAIN';
493 brstate(84).br_block_item:='RMAI_HEADER.COMMENTS';
494 brstate(84).br_state:='PENDING_ACCEPTANCE';
495 brstate(84).update_allowed:='Y';
496
497 brstate(85).br_module:='ARBRMAIN';
498 brstate(85).br_block_item:='RMAI_HEADER.COMMENTS';
499 brstate(85).br_state:='PENDING_REMITTANCE';
500 brstate(85).update_allowed:='Y';
501
502 brstate(81).br_module:='ARBRMAIN';
503 brstate(81).br_block_item:='RMAI_HEADER.COMMENTS';
504 brstate(81).br_state:='FACTORED';
505 brstate(81).update_allowed:='Y';
506
507 brstate(83).br_module:='ARBRMAIN';
508 brstate(83).br_block_item:='RMAI_HEADER.COMMENTS';
509 brstate(83).br_state:='MATURED_PEND_RISK_ELIMINATION';
510 brstate(83).update_allowed:='Y';
511
512 brstate(87).br_module:='ARBRMAIN';
513 brstate(87).br_block_item:='RMAI_HEADER.COMMENTS';
514 brstate(87).br_state:='REMITTED';
515 brstate(87).update_allowed:='Y';
516
517 brstate(79).br_module:='ARBRMAIN';
518 brstate(79).br_block_item:='RMAI_HEADER.COMMENTS';
519 brstate(79).br_state:='CLOSED';
520 brstate(79).update_allowed:='Y';
521
522 brstate(80).br_module:='ARBRMAIN';
523 brstate(80).br_block_item:='RMAI_HEADER.COMMENTS';
524 brstate(80).br_state:='ENDORSED';
525 brstate(80).update_allowed:='Y';
526
527 brstate(88).br_module:='ARBRMAIN';
528 brstate(88).br_block_item:='RMAI_HEADER.COMMENTS';
529 brstate(88).br_state:='UNPAID';
530 brstate(88).update_allowed:='Y';
531
532 brstate(86).br_module:='ARBRMAIN';
533 brstate(86).br_block_item:='RMAI_HEADER.COMMENTS';
534 brstate(86).br_state:='PROTESTED';
535 brstate(86).update_allowed:='Y';
536
537 brstate(78).br_module:='ARBRMAIN';
538 brstate(78).br_block_item:='RMAI_HEADER.COMMENTS';
539 brstate(78).br_state:='CANCELLED';
540 brstate(78).update_allowed:='Y';
541
542 brstate(181).br_module:='ARBRMAIN';
543 brstate(181).br_block_item:='RMAI_HEADER.CONTACT_NAME';
544 brstate(181).br_state:='INCOMPLETE';
545 brstate(181).update_allowed:='Y';
546
547 brstate(183).br_module:='ARBRMAIN';
548 brstate(183).br_block_item:='RMAI_HEADER.CONTACT_NAME';
549 brstate(183).br_state:='PENDING_ACCEPTANCE';
550 brstate(183).update_allowed:='Y';
551
552 brstate(184).br_module:='ARBRMAIN';
553 brstate(184).br_block_item:='RMAI_HEADER.CONTACT_NAME';
554 brstate(184).br_state:='PENDING_REMITTANCE';
555 brstate(184).update_allowed:='Y';
556
557 brstate(180).br_module:='ARBRMAIN';
558 brstate(180).br_block_item:='RMAI_HEADER.CONTACT_NAME';
559 brstate(180).br_state:='FACTORED';
560 brstate(180).update_allowed:='Y';
561
562 brstate(182).br_module:='ARBRMAIN';
563 brstate(182).br_block_item:='RMAI_HEADER.CONTACT_NAME';
564 brstate(182).br_state:='MATURED_PEND_RISK_ELIMINATION';
565 brstate(182).update_allowed:='Y';
566
567 brstate(186).br_module:='ARBRMAIN';
568 brstate(186).br_block_item:='RMAI_HEADER.CONTACT_NAME';
569 brstate(186).br_state:='REMITTED';
570 brstate(186).update_allowed:='Y';
571
572 brstate(178).br_module:='ARBRMAIN';
573 brstate(178).br_block_item:='RMAI_HEADER.CONTACT_NAME';
574 brstate(178).br_state:='CLOSED';
575 brstate(178).update_allowed:='Y';
576
577 brstate(179).br_module:='ARBRMAIN';
578 brstate(179).br_block_item:='RMAI_HEADER.CONTACT_NAME';
579 brstate(179).br_state:='ENDORSED';
580 brstate(179).update_allowed:='Y';
581
582 brstate(187).br_module:='ARBRMAIN';
583 brstate(187).br_block_item:='RMAI_HEADER.CONTACT_NAME';
584 brstate(187).br_state:='UNPAID';
585 brstate(187).update_allowed:='Y';
586
587 brstate(185).br_module:='ARBRMAIN';
588 brstate(185).br_block_item:='RMAI_HEADER.CONTACT_NAME';
592 brstate(177).br_module:='ARBRMAIN';
589 brstate(185).br_state:='PROTESTED';
590 brstate(185).update_allowed:='Y';
591
593 brstate(177).br_block_item:='RMAI_HEADER.CONTACT_NAME';
594 brstate(177).br_state:='CANCELLED';
595 brstate(177).update_allowed:='Y';
596
597 brstate(71).br_module:='ARBRMAIN';
598 brstate(71).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
599 brstate(71).br_state:='INCOMPLETE';
600 brstate(71).update_allowed:='Y';
601
602 brstate(73).br_module:='ARBRMAIN';
603 brstate(73).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
604 brstate(73).br_state:='PENDING_ACCEPTANCE';
605 brstate(73).update_allowed:='N';
606
607 brstate(74).br_module:='ARBRMAIN';
608 brstate(74).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
609 brstate(74).br_state:='PENDING_REMITTANCE';
610 brstate(74).update_allowed:='N';
611
612 brstate(70).br_module:='ARBRMAIN';
613 brstate(70).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
614 brstate(70).br_state:='FACTORED';
615 brstate(70).update_allowed:='N';
616
617 brstate(72).br_module:='ARBRMAIN';
618 brstate(72).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
619 brstate(72).br_state:='MATURED_PEND_RISK_ELIMINATION';
620 brstate(72).update_allowed:='N';
621
622 brstate(76).br_module:='ARBRMAIN';
623 brstate(76).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
624 brstate(76).br_state:='REMITTED';
625 brstate(76).update_allowed:='N';
626
627 brstate(68).br_module:='ARBRMAIN';
628 brstate(68).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
629 brstate(68).br_state:='CLOSED';
630 brstate(68).update_allowed:='N';
631
632 brstate(69).br_module:='ARBRMAIN';
633 brstate(69).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
634 brstate(69).br_state:='ENDORSED';
635 brstate(69).update_allowed:='N';
636
637 brstate(77).br_module:='ARBRMAIN';
638 brstate(77).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
639 brstate(77).br_state:='UNPAID';
640 brstate(77).update_allowed:='N';
641
642 brstate(75).br_module:='ARBRMAIN';
643 brstate(75).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
644 brstate(75).br_state:='PROTESTED';
645 brstate(75).update_allowed:='N';
646
647 brstate(67).br_module:='ARBRMAIN';
648 brstate(67).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
649 brstate(67).br_state:='CANCELLED';
650 brstate(67).update_allowed:='N';
651
652 brstate(192).br_module:='ARBRMAIN';
653 brstate(192).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
654 brstate(192).br_state:='INCOMPLETE';
655 brstate(192).update_allowed:='M';
656
657 brstate(194).br_module:='ARBRMAIN';
658 brstate(194).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
659 brstate(194).br_state:='PENDING_ACCEPTANCE';
660 brstate(194).update_allowed:='N';
661
662 brstate(195).br_module:='ARBRMAIN';
663 brstate(195).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
664 brstate(195).br_state:='PENDING_REMITTANCE';
665 brstate(195).update_allowed:='N';
666
667 brstate(191).br_module:='ARBRMAIN';
668 brstate(191).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
669 brstate(191).br_state:='FACTORED';
670 brstate(191).update_allowed:='N';
671
672 brstate(193).br_module:='ARBRMAIN';
673 brstate(193).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
674 brstate(193).br_state:='MATURED_PEND_RISK_ELIMINATION';
675 brstate(193).update_allowed:='N';
676
677 brstate(197).br_module:='ARBRMAIN';
678 brstate(197).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
679 brstate(197).br_state:='REMITTED';
680 brstate(197).update_allowed:='N';
681
682 brstate(189).br_module:='ARBRMAIN';
683 brstate(189).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
684 brstate(189).br_state:='CLOSED';
685 brstate(189).update_allowed:='N';
686
687 brstate(190).br_module:='ARBRMAIN';
688 brstate(190).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
689 brstate(190).br_state:='ENDORSED';
690 brstate(190).update_allowed:='N';
691
692 brstate(198).br_module:='ARBRMAIN';
693 brstate(198).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
694 brstate(198).br_state:='UNPAID';
695 brstate(198).update_allowed:='N';
696
697 brstate(196).br_module:='ARBRMAIN';
698 brstate(196).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
699 brstate(196).br_state:='PROTESTED';
700 brstate(196).update_allowed:='N';
701
702 brstate(188).br_module:='ARBRMAIN';
703 brstate(188).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
704 brstate(188).br_state:='CANCELLED';
705 brstate(188).update_allowed:='N';
706
707 brstate(203).br_module:='ARBRMAIN';
708 brstate(203).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
709 brstate(203).br_state:='INCOMPLETE';
710 brstate(203).update_allowed:='M';
711
712 brstate(205).br_module:='ARBRMAIN';
713 brstate(205).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
714 brstate(205).br_state:='PENDING_ACCEPTANCE';
715 brstate(205).update_allowed:='N';
716
717 brstate(206).br_module:='ARBRMAIN';
718 brstate(206).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
719 brstate(206).br_state:='PENDING_REMITTANCE';
720 brstate(206).update_allowed:='N';
721
722 brstate(202).br_module:='ARBRMAIN';
723 brstate(202).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
724 brstate(202).br_state:='FACTORED';
725 brstate(202).update_allowed:='N';
726
727 brstate(204).br_module:='ARBRMAIN';
731
728 brstate(204).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
729 brstate(204).br_state:='MATURED_PEND_RISK_ELIMINATION';
730 brstate(204).update_allowed:='N';
732 brstate(208).br_module:='ARBRMAIN';
733 brstate(208).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
734 brstate(208).br_state:='REMITTED';
735 brstate(208).update_allowed:='N';
736
737 brstate(200).br_module:='ARBRMAIN';
738 brstate(200).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
739 brstate(200).br_state:='CLOSED';
740 brstate(200).update_allowed:='N';
741
742 brstate(201).br_module:='ARBRMAIN';
743 brstate(201).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
744 brstate(201).br_state:='ENDORSED';
745 brstate(201).update_allowed:='N';
746
747 brstate(209).br_module:='ARBRMAIN';
748 brstate(209).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
749 brstate(209).br_state:='UNPAID';
750 brstate(209).update_allowed:='N';
751
752 brstate(207).br_module:='ARBRMAIN';
753 brstate(207).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
754 brstate(207).br_state:='PROTESTED';
755 brstate(207).update_allowed:='N';
756
757 brstate(199).br_module:='ARBRMAIN';
758 brstate(199).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
759 brstate(199).br_state:='CANCELLED';
760 brstate(199).update_allowed:='N';
761
762 brstate(38).br_module:='ARBRMAIN';
763 brstate(38).br_block_item:='RMAI_HEADER.GL_DATE';
764 brstate(38).br_state:='INCOMPLETE';
765 brstate(38).update_allowed:='M';
766
767 brstate(40).br_module:='ARBRMAIN';
768 brstate(40).br_block_item:='RMAI_HEADER.GL_DATE';
769 brstate(40).br_state:='PENDING_ACCEPTANCE';
770 brstate(40).update_allowed:='N';
771
772 brstate(41).br_module:='ARBRMAIN';
773 brstate(41).br_block_item:='RMAI_HEADER.GL_DATE';
774 brstate(41).br_state:='PENDING_REMITTANCE';
775 brstate(41).update_allowed:='N';
776
777 brstate(37).br_module:='ARBRMAIN';
778 brstate(37).br_block_item:='RMAI_HEADER.GL_DATE';
779 brstate(37).br_state:='FACTORED';
780 brstate(37).update_allowed:='N';
781
782 brstate(39).br_module:='ARBRMAIN';
783 brstate(39).br_block_item:='RMAI_HEADER.GL_DATE';
784 brstate(39).br_state:='MATURED_PEND_RISK_ELIMINATION';
785 brstate(39).update_allowed:='N';
786
787 brstate(43).br_module:='ARBRMAIN';
788 brstate(43).br_block_item:='RMAI_HEADER.GL_DATE';
789 brstate(43).br_state:='REMITTED';
790 brstate(43).update_allowed:='N';
791
792 brstate(35).br_module:='ARBRMAIN';
793 brstate(35).br_block_item:='RMAI_HEADER.GL_DATE';
794 brstate(35).br_state:='CLOSED';
795 brstate(35).update_allowed:='N';
796
797 brstate(36).br_module:='ARBRMAIN';
798 brstate(36).br_block_item:='RMAI_HEADER.GL_DATE';
799 brstate(36).br_state:='ENDORSED';
800 brstate(36).update_allowed:='N';
801
802 brstate(44).br_module:='ARBRMAIN';
803 brstate(44).br_block_item:='RMAI_HEADER.GL_DATE';
804 brstate(44).br_state:='UNPAID';
805 brstate(44).update_allowed:='N';
806
807 brstate(42).br_module:='ARBRMAIN';
808 brstate(42).br_block_item:='RMAI_HEADER.GL_DATE';
809 brstate(42).br_state:='PROTESTED';
810 brstate(42).update_allowed:='N';
811
812 brstate(34).br_module:='ARBRMAIN';
813 brstate(34).br_block_item:='RMAI_HEADER.GL_DATE';
814 brstate(34).br_state:='CANCELLED';
815 brstate(34).update_allowed:='N';
816
817 brstate(93).br_module:='ARBRMAIN';
818 brstate(93).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
819 brstate(93).br_state:='INCOMPLETE';
820 brstate(93).update_allowed:='Y';
821
822 brstate(95).br_module:='ARBRMAIN';
823 brstate(95).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
824 brstate(95).br_state:='PENDING_ACCEPTANCE';
825 brstate(95).update_allowed:='N';
826
827 brstate(96).br_module:='ARBRMAIN';
828 brstate(96).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
829 brstate(96).br_state:='PENDING_REMITTANCE';
830 brstate(96).update_allowed:='N';
831
832 brstate(92).br_module:='ARBRMAIN';
833 brstate(92).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
834 brstate(92).br_state:='FACTORED';
835 brstate(92).update_allowed:='N';
836
837 brstate(94).br_module:='ARBRMAIN';
838 brstate(94).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
839 brstate(94).br_state:='MATURED_PEND_RISK_ELIMINATION';
840 brstate(94).update_allowed:='N';
841
842 brstate(98).br_module:='ARBRMAIN';
843 brstate(98).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
844 brstate(98).br_state:='REMITTED';
845 brstate(98).update_allowed:='N';
846
847 brstate(90).br_module:='ARBRMAIN';
848 brstate(90).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
849 brstate(90).br_state:='CLOSED';
850 brstate(90).update_allowed:='N';
851
852 brstate(91).br_module:='ARBRMAIN';
853 brstate(91).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
854 brstate(91).br_state:='ENDORSED';
855 brstate(91).update_allowed:='N';
856
857 brstate(99).br_module:='ARBRMAIN';
858 brstate(99).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
859 brstate(99).br_state:='UNPAID';
860 brstate(99).update_allowed:='N';
861
862 brstate(97).br_module:='ARBRMAIN';
863 brstate(97).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
864 brstate(97).br_state:='PROTESTED';
865 brstate(97).update_allowed:='N';
866
867 brstate(89).br_module:='ARBRMAIN';
871
868 brstate(89).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
869 brstate(89).br_state:='CANCELLED';
870 brstate(89).update_allowed:='N';
872 brstate(214).br_module:='ARBRMAIN';
873 brstate(214).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
874 brstate(214).br_state:='INCOMPLETE';
875 brstate(214).update_allowed:='Y';
876
877 brstate(216).br_module:='ARBRMAIN';
878 brstate(216).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
879 brstate(216).br_state:='PENDING_ACCEPTANCE';
880 brstate(216).update_allowed:='N';
881
882 brstate(217).br_module:='ARBRMAIN';
883 brstate(217).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
884 brstate(217).br_state:='PENDING_REMITTANCE';
885 brstate(217).update_allowed:='N';
886
887 brstate(213).br_module:='ARBRMAIN';
888 brstate(213).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
889 brstate(213).br_state:='FACTORED';
890 brstate(213).update_allowed:='N';
891
892 brstate(215).br_module:='ARBRMAIN';
893 brstate(215).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
894 brstate(215).br_state:='MATURED_PEND_RISK_ELIMINATION';
895 brstate(215).update_allowed:='N';
896
897 brstate(219).br_module:='ARBRMAIN';
898 brstate(219).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
899 brstate(219).br_state:='REMITTED';
900 brstate(219).update_allowed:='N';
901
902 brstate(211).br_module:='ARBRMAIN';
903 brstate(211).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
904 brstate(211).br_state:='CLOSED';
905 brstate(211).update_allowed:='N';
906
907 brstate(212).br_module:='ARBRMAIN';
908 brstate(212).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
909 brstate(212).br_state:='ENDORSED';
910 brstate(212).update_allowed:='N';
911
912 brstate(220).br_module:='ARBRMAIN';
913 brstate(220).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
914 brstate(220).br_state:='UNPAID';
915 brstate(220).update_allowed:='N';
916
917 brstate(218).br_module:='ARBRMAIN';
918 brstate(218).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
919 brstate(218).br_state:='PROTESTED';
920 brstate(218).update_allowed:='N';
921
922 brstate(210).br_module:='ARBRMAIN';
923 brstate(210).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
924 brstate(210).br_state:='CANCELLED';
925 brstate(210).update_allowed:='N';
926
927 brstate(225).br_module:='ARBRMAIN';
928 brstate(225).br_block_item:='RMAI_HEADER.LOCATION';
929 brstate(225).br_state:='INCOMPLETE';
930 brstate(225).update_allowed:='M';
931
932 brstate(227).br_module:='ARBRMAIN';
933 brstate(227).br_block_item:='RMAI_HEADER.LOCATION';
934 brstate(227).br_state:='PENDING_ACCEPTANCE';
935 brstate(227).update_allowed:='M';
936
937 brstate(228).br_module:='ARBRMAIN';
938 brstate(228).br_block_item:='RMAI_HEADER.LOCATION';
939 brstate(228).br_state:='PENDING_REMITTANCE';
940 brstate(228).update_allowed:='N';
941
942 brstate(224).br_module:='ARBRMAIN';
943 brstate(224).br_block_item:='RMAI_HEADER.LOCATION';
944 brstate(224).br_state:='FACTORED';
945 brstate(224).update_allowed:='N';
946
947 brstate(226).br_module:='ARBRMAIN';
948 brstate(226).br_block_item:='RMAI_HEADER.LOCATION';
949 brstate(226).br_state:='MATURED_PEND_RISK_ELIMINATION';
950 brstate(226).update_allowed:='N';
951
952 brstate(230).br_module:='ARBRMAIN';
953 brstate(230).br_block_item:='RMAI_HEADER.LOCATION';
954 brstate(230).br_state:='REMITTED';
955 brstate(230).update_allowed:='N';
956
957 brstate(222).br_module:='ARBRMAIN';
958 brstate(222).br_block_item:='RMAI_HEADER.LOCATION';
959 brstate(222).br_state:='CLOSED';
960 brstate(222).update_allowed:='N';
961
962 brstate(223).br_module:='ARBRMAIN';
963 brstate(223).br_block_item:='RMAI_HEADER.LOCATION';
964 brstate(223).br_state:='ENDORSED';
965 brstate(223).update_allowed:='N';
966
967 brstate(231).br_module:='ARBRMAIN';
968 brstate(231).br_block_item:='RMAI_HEADER.LOCATION';
969 brstate(231).br_state:='UNPAID';
970 brstate(231).update_allowed:='N';
971
972 brstate(229).br_module:='ARBRMAIN';
973 brstate(229).br_block_item:='RMAI_HEADER.LOCATION';
974 brstate(229).br_state:='PROTESTED';
975 brstate(229).update_allowed:='N';
976
977 brstate(221).br_module:='ARBRMAIN';
978 brstate(221).br_block_item:='RMAI_HEADER.LOCATION';
979 brstate(221).br_state:='CANCELLED';
980 brstate(221).update_allowed:='N';
981
982 brstate(170).br_module:='ARBRMAIN';
983 brstate(170).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
984 brstate(170).br_state:='INCOMPLETE';
985 brstate(170).update_allowed:='Y';
986
987 brstate(172).br_module:='ARBRMAIN';
988 brstate(172).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
989 brstate(172).br_state:='PENDING_ACCEPTANCE';
990 brstate(172).update_allowed:='Y';
991
992 brstate(173).br_module:='ARBRMAIN';
993 brstate(173).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
994 brstate(173).br_state:='PENDING_REMITTANCE';
995 brstate(173).update_allowed:='Y';
996
997 brstate(169).br_module:='ARBRMAIN';
998 brstate(169).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
999 brstate(169).br_state:='FACTORED';
1000 brstate(169).update_allowed:='N';
1001
1002 brstate(171).br_module:='ARBRMAIN';
1003 brstate(171).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1007 brstate(175).br_module:='ARBRMAIN';
1004 brstate(171).br_state:='MATURED_PEND_RISK_ELIMINATION';
1005 brstate(171).update_allowed:='N';
1006
1008 brstate(175).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1009 brstate(175).br_state:='REMITTED';
1010 brstate(175).update_allowed:='N';
1011
1012 brstate(167).br_module:='ARBRMAIN';
1013 brstate(167).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1014 brstate(167).br_state:='CLOSED';
1015 brstate(167).update_allowed:='N';
1016
1017 brstate(168).br_module:='ARBRMAIN';
1018 brstate(168).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1019 brstate(168).br_state:='ENDORSED';
1020 brstate(168).update_allowed:='N';
1021
1022 brstate(176).br_module:='ARBRMAIN';
1023 brstate(176).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1024 brstate(176).br_state:='UNPAID';
1025 brstate(176).update_allowed:='Y';
1026
1027 brstate(174).br_module:='ARBRMAIN';
1028 brstate(174).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1029 brstate(174).br_state:='PROTESTED';
1030 brstate(174).update_allowed:='Y';
1031
1032 brstate(166).br_module:='ARBRMAIN';
1033 brstate(166).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1034 brstate(166).br_state:='CANCELLED';
1035 brstate(166).update_allowed:='N';
1036
1037 brstate(159).br_module:='ARBRMAIN';
1038 brstate(159).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1039 brstate(159).br_state:='INCOMPLETE';
1040 brstate(159).update_allowed:='Y';
1041
1042 brstate(161).br_module:='ARBRMAIN';
1043 brstate(161).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1044 brstate(161).br_state:='PENDING_ACCEPTANCE';
1045 brstate(161).update_allowed:='Y';
1046
1047 brstate(162).br_module:='ARBRMAIN';
1048 brstate(162).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1049 brstate(162).br_state:='PENDING_REMITTANCE';
1050 brstate(162).update_allowed:='Y';
1051
1052 brstate(158).br_module:='ARBRMAIN';
1053 brstate(158).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1054 brstate(158).br_state:='FACTORED';
1055 brstate(158).update_allowed:='Y';
1056
1057 brstate(160).br_module:='ARBRMAIN';
1058 brstate(160).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1059 brstate(160).br_state:='MATURED_PEND_RISK_ELIMINATION';
1060 brstate(160).update_allowed:='Y';
1061
1062 brstate(164).br_module:='ARBRMAIN';
1063 brstate(164).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1064 brstate(164).br_state:='REMITTED';
1065 brstate(164).update_allowed:='Y';
1066
1067 brstate(156).br_module:='ARBRMAIN';
1068 brstate(156).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1069 brstate(156).br_state:='CLOSED';
1070 brstate(156).update_allowed:='Y';
1071
1072 brstate(157).br_module:='ARBRMAIN';
1073 brstate(157).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1074 brstate(157).br_state:='ENDORSED';
1075 brstate(157).update_allowed:='Y';
1076
1077 brstate(165).br_module:='ARBRMAIN';
1078 brstate(165).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1079 brstate(165).br_state:='UNPAID';
1080 brstate(165).update_allowed:='Y';
1081
1082 brstate(163).br_module:='ARBRMAIN';
1083 brstate(163).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1084 brstate(163).br_state:='PROTESTED';
1085 brstate(163).update_allowed:='Y';
1086
1087 brstate(155).br_module:='ARBRMAIN';
1088 brstate(155).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1089 brstate(155).br_state:='CANCELLED';
1090 brstate(155).update_allowed:='Y';
1091
1092 brstate(27).br_module:='ARBRMAIN';
1093 brstate(27).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1094 brstate(27).br_state:='INCOMPLETE';
1095 brstate(27).update_allowed:='Y';
1096
1097 brstate(29).br_module:='ARBRMAIN';
1098 brstate(29).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1099 brstate(29).br_state:='PENDING_ACCEPTANCE';
1100 brstate(29).update_allowed:='Y';
1101
1102 brstate(30).br_module:='ARBRMAIN';
1103 brstate(30).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1104 brstate(30).br_state:='PENDING_REMITTANCE';
1105 brstate(30).update_allowed:='Y';
1106
1107 brstate(26).br_module:='ARBRMAIN';
1108 brstate(26).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1109 brstate(26).br_state:='FACTORED';
1110 brstate(26).update_allowed:='N';
1111
1112 brstate(28).br_module:='ARBRMAIN';
1113 brstate(28).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1114 brstate(28).br_state:='MATURED_PEND_RISK_ELIMINATION';
1115 brstate(28).update_allowed:='N';
1116
1117 brstate(32).br_module:='ARBRMAIN';
1118 brstate(32).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1119 brstate(32).br_state:='REMITTED';
1120 brstate(32).update_allowed:='N';
1121
1122 brstate(24).br_module:='ARBRMAIN';
1123 brstate(24).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1124 brstate(24).br_state:='CLOSED';
1125 brstate(24).update_allowed:='N';
1126
1127 brstate(25).br_module:='ARBRMAIN';
1128 brstate(25).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1129 brstate(25).br_state:='ENDORSED';
1130 brstate(25).update_allowed:='N';
1131
1132 brstate(33).br_module:='ARBRMAIN';
1133 brstate(33).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1134 brstate(33).br_state:='UNPAID';
1135 brstate(33).update_allowed:='Y';
1136
1137 brstate(31).br_module:='ARBRMAIN';
1138 brstate(31).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1139 brstate(31).br_state:='PROTESTED';
1143 brstate(23).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1140 brstate(31).update_allowed:='N';
1141
1142 brstate(23).br_module:='ARBRMAIN';
1144 brstate(23).br_state:='CANCELLED';
1145 brstate(23).update_allowed:='N';
1146
1147 brstate(16).br_module:='ARBRMAIN';
1148 brstate(16).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1149 brstate(16).br_state:='INCOMPLETE';
1150 brstate(16).update_allowed:='Y';
1151
1152 brstate(18).br_module:='ARBRMAIN';
1153 brstate(18).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1154 brstate(18).br_state:='PENDING_ACCEPTANCE';
1155 brstate(18).update_allowed:='Y';
1156
1157 brstate(19).br_module:='ARBRMAIN';
1158 brstate(19).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1159 brstate(19).br_state:='PENDING_REMITTANCE';
1160 brstate(19).update_allowed:='Y';
1161
1162 brstate(15).br_module:='ARBRMAIN';
1163 brstate(15).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1164 brstate(15).br_state:='FACTORED';
1165 brstate(15).update_allowed:='N';
1166
1167 brstate(17).br_module:='ARBRMAIN';
1168 brstate(17).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1169 brstate(17).br_state:='MATURED_PEND_RISK_ELIMINATION';
1170 brstate(17).update_allowed:='N';
1171
1172 brstate(21).br_module:='ARBRMAIN';
1173 brstate(21).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1174 brstate(21).br_state:='REMITTED';
1175 brstate(21).update_allowed:='N';
1176
1177 brstate(13).br_module:='ARBRMAIN';
1178 brstate(13).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1179 brstate(13).br_state:='CLOSED';
1180 brstate(13).update_allowed:='N';
1181
1182 brstate(14).br_module:='ARBRMAIN';
1183 brstate(14).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1184 brstate(14).br_state:='ENDORSED';
1185 brstate(14).update_allowed:='N';
1186
1187 brstate(22).br_module:='ARBRMAIN';
1188 brstate(22).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1189 brstate(22).br_state:='UNPAID';
1190 brstate(22).update_allowed:='Y';
1191
1192 brstate(20).br_module:='ARBRMAIN';
1193 brstate(20).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1194 brstate(20).br_state:='PROTESTED';
1195 brstate(20).update_allowed:='N';
1196
1197 brstate(12).br_module:='ARBRMAIN';
1198 brstate(12).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1199 brstate(12).br_state:='CANCELLED';
1200 brstate(12).update_allowed:='N';
1201
1202 brstate(247).br_module:='ARBRMAIN';
1203 brstate(247).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1204 brstate(247).br_state:='INCOMPLETE';
1205 brstate(247).update_allowed:='Y';
1206
1207 brstate(249).br_module:='ARBRMAIN';
1208 brstate(249).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1209 brstate(249).br_state:='PENDING_ACCEPTANCE';
1210 brstate(249).update_allowed:='Y';
1211
1212 brstate(250).br_module:='ARBRMAIN';
1213 brstate(250).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1214 brstate(250).br_state:='PENDING_REMITTANCE';
1215 brstate(250).update_allowed:='Y';
1216
1217 brstate(246).br_module:='ARBRMAIN';
1218 brstate(246).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1219 brstate(246).br_state:='FACTORED';
1220 brstate(246).update_allowed:='N';
1221
1222 brstate(248).br_module:='ARBRMAIN';
1223 brstate(248).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1224 brstate(248).br_state:='MATURED_PEND_RISK_ELIMINATION';
1225 brstate(248).update_allowed:='N';
1226
1227 brstate(252).br_module:='ARBRMAIN';
1228 brstate(252).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1229 brstate(252).br_state:='REMITTED';
1230 brstate(252).update_allowed:='N';
1231
1232 brstate(244).br_module:='ARBRMAIN';
1233 brstate(244).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1234 brstate(244).br_state:='CLOSED';
1235 brstate(244).update_allowed:='N';
1236
1237 brstate(245).br_module:='ARBRMAIN';
1238 brstate(245).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1239 brstate(245).br_state:='ENDORSED';
1240 brstate(245).update_allowed:='N';
1241
1242 brstate(253).br_module:='ARBRMAIN';
1243 brstate(253).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1244 brstate(253).br_state:='UNPAID';
1245 brstate(253).update_allowed:='Y';
1246
1247 brstate(251).br_module:='ARBRMAIN';
1248 brstate(251).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1249 brstate(251).br_state:='PROTESTED';
1250 brstate(251).update_allowed:='N';
1251
1252 brstate(243).br_module:='ARBRMAIN';
1253 brstate(243).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1254 brstate(243).br_state:='CANCELLED';
1255 brstate(243).update_allowed:='N';
1256
1257 brstate(5).br_module:='ARBRMAIN';
1258 brstate(5).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1259 brstate(5).br_state:='INCOMPLETE';
1260 brstate(5).update_allowed:='Y';
1261
1262 brstate(7).br_module:='ARBRMAIN';
1263 brstate(7).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1264 brstate(7).br_state:='PENDING_ACCEPTANCE';
1265 brstate(7).update_allowed:='Y';
1266
1267 brstate(8).br_module:='ARBRMAIN';
1268 brstate(8).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1269 brstate(8).br_state:='PENDING_REMITTANCE';
1270 brstate(8).update_allowed:='Y';
1271
1272 brstate(4).br_module:='ARBRMAIN';
1273 brstate(4).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1274 brstate(4).br_state:='FACTORED';
1275 brstate(4).update_allowed:='N';
1276
1277 brstate(6).br_module:='ARBRMAIN';
1278 brstate(6).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1282 brstate(10).br_module:='ARBRMAIN';
1279 brstate(6).br_state:='MATURED_PEND_RISK_ELIMINATION';
1280 brstate(6).update_allowed:='N';
1281
1283 brstate(10).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1284 brstate(10).br_state:='REMITTED';
1285 brstate(10).update_allowed:='N';
1286
1287 brstate(2).br_module:='ARBRMAIN';
1288 brstate(2).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1289 brstate(2).br_state:='CLOSED';
1290 brstate(2).update_allowed:='N';
1291
1292 brstate(3).br_module:='ARBRMAIN';
1293 brstate(3).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1294 brstate(3).br_state:='ENDORSED';
1295 brstate(3).update_allowed:='N';
1296
1297 brstate(11).br_module:='ARBRMAIN';
1298 brstate(11).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1299 brstate(11).br_state:='UNPAID';
1300 brstate(11).update_allowed:='Y';
1301
1302 brstate(9).br_module:='ARBRMAIN';
1303 brstate(9).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1304 brstate(9).br_state:='PROTESTED';
1305 brstate(9).update_allowed:='N';
1306
1307 brstate(1).br_module:='ARBRMAIN';
1308 brstate(1).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1309 brstate(1).br_state:='CANCELLED';
1310 brstate(1).update_allowed:='N';
1311
1312 brstate(148).br_module:='ARBRMAIN';
1313 brstate(148).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1314 brstate(148).br_state:='INCOMPLETE';
1315 brstate(148).update_allowed:='Y';
1316
1317 brstate(150).br_module:='ARBRMAIN';
1318 brstate(150).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1319 brstate(150).br_state:='PENDING_ACCEPTANCE';
1320 brstate(150).update_allowed:='Y';
1321
1322 brstate(151).br_module:='ARBRMAIN';
1323 brstate(151).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1324 brstate(151).br_state:='PENDING_REMITTANCE';
1325 brstate(151).update_allowed:='Y';
1326
1327 brstate(147).br_module:='ARBRMAIN';
1328 brstate(147).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1329 brstate(147).br_state:='FACTORED';
1330 brstate(147).update_allowed:='Y';
1331
1332 brstate(149).br_module:='ARBRMAIN';
1333 brstate(149).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1334 brstate(149).br_state:='MATURED_PEND_RISK_ELIMINATION';
1335 brstate(149).update_allowed:='Y';
1336
1337 brstate(153).br_module:='ARBRMAIN';
1338 brstate(153).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1339 brstate(153).br_state:='REMITTED';
1340 brstate(153).update_allowed:='N';
1341
1342 brstate(145).br_module:='ARBRMAIN';
1343 brstate(145).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1344 brstate(145).br_state:='CLOSED';
1345 brstate(145).update_allowed:='Y';
1346
1347 brstate(146).br_module:='ARBRMAIN';
1348 brstate(146).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1349 brstate(146).br_state:='ENDORSED';
1350 brstate(146).update_allowed:='Y';
1351
1352 brstate(154).br_module:='ARBRMAIN';
1353 brstate(154).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1354 brstate(154).br_state:='UNPAID';
1355 brstate(154).update_allowed:='Y';
1356
1357 brstate(152).br_module:='ARBRMAIN';
1358 brstate(152).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1359 brstate(152).br_state:='PROTESTED';
1360 brstate(152).update_allowed:='Y';
1361
1362 brstate(144).br_module:='ARBRMAIN';
1363 brstate(144).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1364 brstate(144).br_state:='CANCELLED';
1365 brstate(144).update_allowed:='Y';
1366
1367 brstate(126).br_module:='ARBRMAIN';
1368 brstate(126).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1369 brstate(126).br_state:='INCOMPLETE';
1370 brstate(126).update_allowed:='Y';
1371
1372 brstate(128).br_module:='ARBRMAIN';
1373 brstate(128).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1374 brstate(128).br_state:='PENDING_ACCEPTANCE';
1375 brstate(128).update_allowed:='Y';
1376
1377 brstate(129).br_module:='ARBRMAIN';
1378 brstate(129).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1379 brstate(129).br_state:='PENDING_REMITTANCE';
1380 brstate(129).update_allowed:='Y';
1381
1382 brstate(125).br_module:='ARBRMAIN';
1383 brstate(125).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1384 brstate(125).br_state:='FACTORED';
1385 brstate(125).update_allowed:='Y';
1386
1387 brstate(127).br_module:='ARBRMAIN';
1388 brstate(127).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1389 brstate(127).br_state:='MATURED_PEND_RISK_ELIMINATION';
1390 brstate(127).update_allowed:='N';
1391
1392 brstate(131).br_module:='ARBRMAIN';
1393 brstate(131).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1394 brstate(131).br_state:='REMITTED';
1395 brstate(131).update_allowed:='N';
1396
1397 brstate(123).br_module:='ARBRMAIN';
1398 brstate(123).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1399 brstate(123).br_state:='CLOSED';
1400 brstate(123).update_allowed:='N';
1401
1402 brstate(124).br_module:='ARBRMAIN';
1403 brstate(124).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1404 brstate(124).br_state:='ENDORSED';
1405 brstate(124).update_allowed:='N';
1406
1407 brstate(132).br_module:='ARBRMAIN';
1408 brstate(132).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1409 brstate(132).br_state:='UNPAID';
1410 brstate(132).update_allowed:='Y';
1411
1412 brstate(130).br_module:='ARBRMAIN';
1413 brstate(130).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1414 brstate(130).br_state:='PROTESTED';
1415 brstate(130).update_allowed:='N';
1416
1420 brstate(122).update_allowed:='N';
1417 brstate(122).br_module:='ARBRMAIN';
1418 brstate(122).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1419 brstate(122).br_state:='CANCELLED';
1421
1422 brstate(60).br_module:='ARBRMAIN';
1423 brstate(60).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1424 brstate(60).br_state:='INCOMPLETE';
1425 brstate(60).update_allowed:='M';
1426
1427 brstate(62).br_module:='ARBRMAIN';
1428 brstate(62).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1429 brstate(62).br_state:='PENDING_ACCEPTANCE';
1430 brstate(62).update_allowed:='N';
1431
1432 brstate(63).br_module:='ARBRMAIN';
1433 brstate(63).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1434 brstate(63).br_state:='PENDING_REMITTANCE';
1435 brstate(63).update_allowed:='N';
1436
1437 brstate(59).br_module:='ARBRMAIN';
1438 brstate(59).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1439 brstate(59).br_state:='FACTORED';
1440 brstate(59).update_allowed:='N';
1441
1442 brstate(61).br_module:='ARBRMAIN';
1443 brstate(61).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1444 brstate(61).br_state:='MATURED_PEND_RISK_ELIMINATION';
1445 brstate(61).update_allowed:='N';
1446
1447 brstate(65).br_module:='ARBRMAIN';
1448 brstate(65).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1449 brstate(65).br_state:='REMITTED';
1450 brstate(65).update_allowed:='N';
1451
1452 brstate(57).br_module:='ARBRMAIN';
1453 brstate(57).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1454 brstate(57).br_state:='CLOSED';
1455 brstate(57).update_allowed:='N';
1456
1457 brstate(58).br_module:='ARBRMAIN';
1458 brstate(58).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1459 brstate(58).br_state:='ENDORSED';
1460 brstate(58).update_allowed:='N';
1461
1462 brstate(66).br_module:='ARBRMAIN';
1463 brstate(66).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1464 brstate(66).br_state:='UNPAID';
1465 brstate(66).update_allowed:='N';
1466
1467 brstate(64).br_module:='ARBRMAIN';
1468 brstate(64).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1469 brstate(64).br_state:='PROTESTED';
1470 brstate(64).update_allowed:='N';
1471
1472 brstate(56).br_module:='ARBRMAIN';
1473 brstate(56).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1474 brstate(56).br_state:='CANCELLED';
1475 brstate(56).update_allowed:='N';
1476
1477 brstate(104).br_module:='ARBRMAIN';
1478 brstate(104).br_block_item:='RMAI_HEADER.TRX_DATE';
1479 brstate(104).br_state:='INCOMPLETE';
1480 brstate(104).update_allowed:='M';
1481
1482 brstate(106).br_module:='ARBRMAIN';
1483 brstate(106).br_block_item:='RMAI_HEADER.TRX_DATE';
1484 brstate(106).br_state:='PENDING_ACCEPTANCE';
1485 brstate(106).update_allowed:='N';
1486
1487 brstate(107).br_module:='ARBRMAIN';
1488 brstate(107).br_block_item:='RMAI_HEADER.TRX_DATE';
1489 brstate(107).br_state:='PENDING_REMITTANCE';
1490 brstate(107).update_allowed:='N';
1491
1492 brstate(103).br_module:='ARBRMAIN';
1493 brstate(103).br_block_item:='RMAI_HEADER.TRX_DATE';
1494 brstate(103).br_state:='FACTORED';
1495 brstate(103).update_allowed:='N';
1496
1497 brstate(105).br_module:='ARBRMAIN';
1498 brstate(105).br_block_item:='RMAI_HEADER.TRX_DATE';
1499 brstate(105).br_state:='MATURED_PEND_RISK_ELIMINATION';
1500 brstate(105).update_allowed:='N';
1501
1502 brstate(109).br_module:='ARBRMAIN';
1503 brstate(109).br_block_item:='RMAI_HEADER.TRX_DATE';
1504 brstate(109).br_state:='REMITTED';
1505 brstate(109).update_allowed:='N';
1506
1507 brstate(101).br_module:='ARBRMAIN';
1508 brstate(101).br_block_item:='RMAI_HEADER.TRX_DATE';
1509 brstate(101).br_state:='CLOSED';
1510 brstate(101).update_allowed:='N';
1511
1512 brstate(102).br_module:='ARBRMAIN';
1513 brstate(102).br_block_item:='RMAI_HEADER.TRX_DATE';
1514 brstate(102).br_state:='ENDORSED';
1515 brstate(102).update_allowed:='N';
1516
1517 brstate(110).br_module:='ARBRMAIN';
1518 brstate(110).br_block_item:='RMAI_HEADER.TRX_DATE';
1519 brstate(110).br_state:='UNPAID';
1520 brstate(110).update_allowed:='N';
1521
1522 brstate(108).br_module:='ARBRMAIN';
1523 brstate(108).br_block_item:='RMAI_HEADER.TRX_DATE';
1524 brstate(108).br_state:='PROTESTED';
1525 brstate(108).update_allowed:='N';
1526
1527 brstate(100).br_module:='ARBRMAIN';
1528 brstate(100).br_block_item:='RMAI_HEADER.TRX_DATE';
1529 brstate(100).br_state:='CANCELLED';
1530 brstate(100).update_allowed:='N';
1531
1532 brstate(137).br_module:='ARBRMAIN';
1533 brstate(137).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1534 brstate(137).br_state:='INCOMPLETE';
1535 brstate(137).update_allowed:='M';
1536
1537 brstate(139).br_module:='ARBRMAIN';
1538 brstate(139).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1539 brstate(139).br_state:='PENDING_ACCEPTANCE';
1540 brstate(139).update_allowed:='N';
1541
1542 brstate(140).br_module:='ARBRMAIN';
1543 brstate(140).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1544 brstate(140).br_state:='PENDING_REMITTANCE';
1545 brstate(140).update_allowed:='N';
1546
1547 brstate(136).br_module:='ARBRMAIN';
1548 brstate(136).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1549 brstate(136).br_state:='FACTORED';
1550 brstate(136).update_allowed:='N';
1551
1552 brstate(138).br_module:='ARBRMAIN';
1553 brstate(138).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1554 brstate(138).br_state:='MATURED_PEND_RISK_ELIMINATION';
1555 brstate(138).update_allowed:='N';
1556
1557 brstate(142).br_module:='ARBRMAIN';
1561
1558 brstate(142).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1559 brstate(142).br_state:='REMITTED';
1560 brstate(142).update_allowed:='N';
1562 brstate(134).br_module:='ARBRMAIN';
1563 brstate(134).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1564 brstate(134).br_state:='CLOSED';
1565 brstate(134).update_allowed:='N';
1566
1567 brstate(135).br_module:='ARBRMAIN';
1568 brstate(135).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1569 brstate(135).br_state:='ENDORSED';
1570 brstate(135).update_allowed:='N';
1571
1572 brstate(143).br_module:='ARBRMAIN';
1573 brstate(143).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1574 brstate(143).br_state:='UNPAID';
1575 brstate(143).update_allowed:='N';
1576
1577 brstate(141).br_module:='ARBRMAIN';
1578 brstate(141).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1579 brstate(141).br_state:='PROTESTED';
1580 brstate(141).update_allowed:='N';
1581
1582 brstate(133).br_module:='ARBRMAIN';
1583 brstate(133).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1584 brstate(133).br_state:='CANCELLED';
1585 brstate(133).update_allowed:='N';
1586
1587
1588 brstate( 254).br_module:='ARBRMAIN';
1589 brstate( 254).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1590 brstate( 254).br_state:='NEW';
1591 brstate( 254).update_allowed:='Y';
1592
1593 brstate( 255).br_module:='ARBRMAIN';
1594 brstate( 255).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1595 brstate( 255).br_state:='NEW';
1596 brstate( 255).update_allowed:='Y';
1597
1598 brstate( 256).br_module:='ARBRMAIN';
1599 brstate( 256).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1600 brstate( 256).br_state:='NEW';
1601 brstate( 256).update_allowed:='Y';
1602
1603 brstate( 257).br_module:='ARBRMAIN';
1604 brstate( 257).br_block_item:='RMAI_HEADER.GL_DATE';
1605 brstate( 257).br_state:='NEW';
1606 brstate( 257).update_allowed:='M';
1607
1608 brstate( 258).br_module:='ARBRMAIN';
1609 brstate( 258).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
1610 brstate( 258).br_state:='NEW';
1611 brstate( 258).update_allowed:='M';
1612
1613 brstate( 259).br_module:='ARBRMAIN';
1614 brstate( 259).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1615 brstate( 259).br_state:='NEW';
1616 brstate( 259).update_allowed:='M';
1617
1618 brstate( 260).br_module:='ARBRMAIN';
1619 brstate( 260).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
1620 brstate( 260).br_state:='NEW';
1621 brstate( 260).update_allowed:='Y';
1622
1623 brstate( 261).br_module:='ARBRMAIN';
1624 brstate( 261).br_block_item:='RMAI_HEADER.COMMENTS';
1625 brstate( 261).br_state:='NEW';
1626 brstate( 261).update_allowed:='Y';
1627
1628 brstate( 262).br_module:='ARBRMAIN';
1629 brstate( 262).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
1630 brstate( 262).br_state:='NEW';
1631 brstate( 262).update_allowed:='M';
1632
1633 brstate( 263).br_module:='ARBRMAIN';
1634 brstate( 263).br_block_item:='RMAI_HEADER.TRX_DATE';
1635 brstate( 263).br_state:='NEW';
1636 brstate( 263).update_allowed:='M';
1637
1638 brstate( 264).br_module:='ARBRMAIN';
1639 brstate( 264).br_block_item:='RMAI_HEADER.BR_AMOUNT';
1640 brstate( 264).br_state:='NEW';
1641 brstate( 264).update_allowed:='Y';
1642
1643 brstate( 265).br_module:='ARBRMAIN';
1644 brstate( 265).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1645 brstate( 265).br_state:='NEW';
1646 brstate( 265).update_allowed:='Y';
1647
1648 brstate( 266).br_module:='ARBRMAIN';
1649 brstate( 266).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1650 brstate( 266).br_state:='NEW';
1651 brstate( 266).update_allowed:='M';
1652
1653 brstate( 267).br_module:='ARBRMAIN';
1654 brstate( 267).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1655 brstate( 267).br_state:='NEW';
1656 brstate( 267).update_allowed:='Y';
1657
1658 brstate( 268).br_module:='ARBRMAIN';
1659 brstate( 268).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1660 brstate( 268).br_state:='NEW';
1661 brstate( 268).update_allowed:='Y';
1662
1663 brstate( 269).br_module:='ARBRMAIN';
1664 brstate( 269).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1665 brstate( 269).br_state:='NEW';
1666 brstate( 269).update_allowed:='Y';
1667
1668 brstate( 270).br_module:='ARBRMAIN';
1669 brstate( 270).br_block_item:='RMAI_HEADER.CONTACT_NAME';
1670 brstate( 270).br_state:='NEW';
1671 brstate( 270).update_allowed:='Y';
1672
1673 brstate( 271).br_module:='ARBRMAIN';
1674 brstate( 271).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
1675 brstate( 271).br_state:='NEW';
1676 brstate( 271).update_allowed:='M';
1677
1678 brstate( 272).br_module:='ARBRMAIN';
1679 brstate( 272).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
1680 brstate( 272).br_state:='NEW';
1681 brstate( 272).update_allowed:='M';
1682
1683 brstate( 273).br_module:='ARBRMAIN';
1684 brstate( 273).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
1685 brstate( 273).br_state:='NEW';
1686 brstate( 273).update_allowed:='Y';
1687
1688 brstate( 274).br_module:='ARBRMAIN';
1689 brstate( 274).br_block_item:='RMAI_HEADER.LOCATION';
1690 brstate( 274).br_state:='NEW';
1691 brstate( 274).update_allowed:='M';
1692
1693 brstate( 275).br_module:='ARBRMAIN';
1694 brstate( 275).br_block_item:='RMAI_HEADER.ADDRESS1';
1695 brstate( 275).br_state:='NEW';
1696 brstate( 275).update_allowed:='M';
1697
1698 brstate( 276).br_module:='ARBRMAIN';
1699 brstate( 276).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1703
1700 brstate( 276).br_state:='NEW';
1701 brstate( 276).update_allowed:='Y';
1702
1704
1705 /* Here are the status which override */
1706
1707 brstate( 277).br_module:='ARBRMAIN';
1708 brstate( 277).br_block_item:='RMAI_HEADER.GL_DATE';
1709 brstate( 277).br_state:='POSTED';
1710 brstate( 277).update_allowed:='N';
1711
1712 brstate( 278).br_module:='ARBRMAIN';
1713 brstate( 278).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
1714 brstate( 278).br_state:='POSTED';
1715 brstate( 278).update_allowed:='N';
1716
1717 brstate( 279).br_module:='ARBRMAIN';
1718 brstate( 279).br_block_item:='RMAI_HEADER.COMMENTS';
1719 brstate( 279).br_state:='POSTED';
1720 brstate( 279).update_allowed:='Y';
1721
1722 brstate( 280).br_module:='ARBRMAIN';
1723 brstate( 280).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
1724 brstate( 280).br_state:='POSTED';
1725 brstate( 280).update_allowed:='N';
1726
1727 brstate( 281).br_module:='ARBRMAIN';
1728 brstate( 281).br_block_item:='RMAI_HEADER.TRX_DATE';
1729 brstate( 281).br_state:='POSTED';
1730 brstate( 281).update_allowed:='N';
1731
1732 brstate( 282).br_module:='ARBRMAIN';
1733 brstate( 282).br_block_item:='RMAI_HEADER.BR_AMOUNT';
1734 brstate( 282).br_state:='POSTED';
1735 brstate( 282).update_allowed:='N';
1736
1737 brstate( 283).br_module:='ARBRMAIN';
1738 brstate( 283).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1739 brstate( 283).br_state:='POSTED';
1740 brstate( 283).update_allowed:='Y';
1741
1742 brstate( 284).br_module:='ARBRMAIN';
1743 brstate( 284).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1744 brstate( 284).br_state:='POSTED';
1745 brstate( 284).update_allowed:='N';
1746
1747 brstate( 285).br_module:='ARBRMAIN';
1748 brstate( 285).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1749 brstate( 285).br_state:='POSTED';
1750 brstate( 285).update_allowed:='Y';
1751
1752 brstate( 286).br_module:='ARBRMAIN';
1753 brstate( 286).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1754 brstate( 286).br_state:='POSTED';
1755 brstate( 286).update_allowed:='N';
1756
1757 brstate( 287).br_module:='ARBRMAIN';
1758 brstate( 287).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1759 brstate( 287).br_state:='POSTED';
1760 brstate( 287).update_allowed:='Y';
1761
1762 brstate( 288).br_module:='ARBRMAIN';
1763 brstate( 288).br_block_item:='RMAI_HEADER.CONTACT_NAME';
1764 brstate( 288).br_state:='POSTED';
1765 brstate( 288).update_allowed:='Y';
1766
1767 brstate( 289).br_module:='ARBRMAIN';
1768 brstate( 289).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
1769 brstate( 289).br_state:='POSTED';
1770 brstate( 289).update_allowed:='N';
1771
1772 brstate( 290).br_module:='ARBRMAIN';
1773 brstate( 290).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
1774 brstate( 290).br_state:='POSTED';
1775 brstate( 290).update_allowed:='N';
1776
1777 brstate( 291).br_module:='ARBRMAIN';
1778 brstate( 291).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
1779 brstate( 291).br_state:='POSTED';
1780 brstate( 291).update_allowed:='N';
1781
1782 brstate( 292).br_module:='ARBRMAIN';
1783 brstate( 292).br_block_item:='RMAI_HEADER.LOCATION';
1784 brstate( 292).br_state:='POSTED';
1785 brstate( 292).update_allowed:='N';
1786
1787 brstate( 293).br_module:='ARBRMAIN';
1788 brstate( 293).br_block_item:='RMAI_HEADER.ADDRESS1';
1789 brstate( 293).br_state:='POSTED';
1790 brstate( 293).update_allowed:='N';
1791
1792 brstate( 294).br_module:='ARBRMAIN';
1793 brstate( 294).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1794 brstate( 294).br_state:='POSTED';
1795 brstate( 294).update_allowed:='Y';
1796
1797 brstate( 295).br_module:='ARBRMAIN';
1798 brstate( 295).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1799 brstate( 295).br_state:='POSTED';
1800 brstate( 295).update_allowed:='Y';
1801
1802 brstate( 296).br_module:='ARBRMAIN';
1803 brstate( 296).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1804 brstate( 296).br_state:='POSTED';
1805 brstate( 296).update_allowed:='Y';
1806
1807 brstate( 297).br_module:='ARBRMAIN';
1808 brstate( 297).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1809 brstate( 297).br_state:='POSTED';
1810 brstate( 297).update_allowed:='Y';
1811
1812 brstate( 298).br_module:='ARBRMAIN';
1813 brstate( 298).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
1814 brstate( 298).br_state:='POSTED';
1815 brstate( 298).update_allowed:='N';
1816
1817 brstate( 299).br_module:='ARBRMAIN';
1818 brstate( 299).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1819 brstate( 299).br_state:='POSTED';
1820 brstate( 299).update_allowed:='N';
1821
1822
1823 brstate( 300).br_module:='ARBRMAIN';
1824 brstate( 300).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1825 brstate( 300).br_state:='ACTIVITIES';
1826 brstate( 300).update_allowed:='Y';
1827
1828 brstate( 301).br_module:='ARBRMAIN';
1829 brstate( 301).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1830 brstate( 301).br_state:='ACTIVITIES';
1831 brstate( 301).update_allowed:='Y';
1832
1833 brstate( 302).br_module:='ARBRMAIN';
1834 brstate( 302).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1835 brstate( 302).br_state:='ACTIVITIES';
1836 brstate( 302).update_allowed:='Y';
1837
1838 brstate( 303).br_module:='ARBRMAIN';
1839 brstate( 303).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1840 brstate( 303).br_state:='ACTIVITIES';
1844 brstate( 304).br_block_item:='RMAI_HEADER.GL_DATE';
1841 brstate( 303).update_allowed:='Y';
1842
1843 brstate( 304).br_module:='ARBRMAIN';
1845 brstate( 304).br_state:='ACTIVITIES';
1846 brstate( 304).update_allowed:='N';
1847
1848 brstate( 305).br_module:='ARBRMAIN';
1849 brstate( 305).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
1850 brstate( 305).br_state:='ACTIVITIES';
1851 brstate( 305).update_allowed:='N';
1852
1853 brstate( 306).br_module:='ARBRMAIN';
1854 brstate( 306).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1855 brstate( 306).br_state:='ACTIVITIES';
1856 brstate( 306).update_allowed:='N';
1857
1858 brstate( 307).br_module:='ARBRMAIN';
1859 brstate( 307).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
1860 brstate( 307).br_state:='ACTIVITIES';
1861 brstate( 307).update_allowed:='N';
1862
1863 brstate( 308).br_module:='ARBRMAIN';
1864 brstate( 308).br_block_item:='RMAI_HEADER.COMMENTS';
1865 brstate( 308).br_state:='ACTIVITIES';
1866 brstate( 308).update_allowed:='Y';
1867
1868 brstate( 309).br_module:='ARBRMAIN';
1869 brstate( 309).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
1870 brstate( 309).br_state:='ACTIVITIES';
1871 brstate( 309).update_allowed:='N';
1872
1873 brstate( 310).br_module:='ARBRMAIN';
1874 brstate( 310).br_block_item:='RMAI_HEADER.TRX_DATE';
1875 brstate( 310).br_state:='ACTIVITIES';
1876 brstate( 310).update_allowed:='N';
1877
1878 brstate( 311).br_module:='ARBRMAIN';
1879 brstate( 311).br_block_item:='RMAI_HEADER.BR_AMOUNT';
1880 brstate( 311).br_state:='ACTIVITIES';
1881 brstate( 311).update_allowed:='N';
1882
1883 brstate( 312).br_module:='ARBRMAIN';
1884 brstate( 312).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
1885 brstate( 312).br_state:='ACTIVITIES';
1886 brstate( 312).update_allowed:='Y';
1887
1888 brstate( 313).br_module:='ARBRMAIN';
1889 brstate( 313).br_block_item:='RMAI_HEADER.TRX_NUMBER';
1890 brstate( 313).br_state:='ACTIVITIES';
1891 brstate( 313).update_allowed:='N';
1892
1893 brstate( 314).br_module:='ARBRMAIN';
1894 brstate( 314).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
1895 brstate( 314).br_state:='ACTIVITIES';
1896 brstate( 314).update_allowed:='Y';
1897
1898 brstate( 315).br_module:='ARBRMAIN';
1899 brstate( 315).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
1900 brstate( 315).br_state:='ACTIVITIES';
1901 brstate( 315).update_allowed:='N';
1902
1903 brstate( 316).br_module:='ARBRMAIN';
1904 brstate( 316).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
1905 brstate( 316).br_state:='ACTIVITIES';
1906 brstate( 316).update_allowed:='Y';
1907
1908 brstate( 317).br_module:='ARBRMAIN';
1909 brstate( 317).br_block_item:='RMAI_HEADER.CONTACT_NAME';
1910 brstate( 317).br_state:='ACTIVITIES';
1911 brstate( 317).update_allowed:='Y';
1912
1913 brstate( 318).br_module:='ARBRMAIN';
1914 brstate( 318).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
1915 brstate( 318).br_state:='ACTIVITIES';
1916 brstate( 318).update_allowed:='N';
1917
1918 brstate( 319).br_module:='ARBRMAIN';
1919 brstate( 319).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
1920 brstate( 319).br_state:='ACTIVITIES';
1921 brstate( 319).update_allowed:='N';
1922
1923 brstate( 320).br_module:='ARBRMAIN';
1924 brstate( 320).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
1925 brstate( 320).br_state:='ACTIVITIES';
1926 brstate( 320).update_allowed:='N';
1927
1928 brstate( 321).br_module:='ARBRMAIN';
1929 brstate( 321).br_block_item:='RMAI_HEADER.LOCATION';
1930 brstate( 321).br_state:='ACTIVITIES';
1931 brstate( 321).update_allowed:='N';
1932
1933 brstate( 322).br_module:='ARBRMAIN';
1934 brstate( 322).br_block_item:='RMAI_HEADER.ADDRESS1';
1935 brstate( 322).br_state:='ACTIVITIES';
1936 brstate( 322).update_allowed:='N';
1937
1938 brstate( 323).br_module:='ARBRMAIN';
1939 brstate( 323).br_block_item:='RMAI_HEADER.REMIT_BANK_NAME';
1940 brstate( 323).br_state:='SELECTED';
1941 brstate( 323).update_allowed:='N';
1942
1943 brstate( 324).br_module:='ARBRMAIN';
1944 brstate( 324).br_block_item:='RMAI_HEADER.REMIT_BRANCH_NAME';
1945 brstate( 324).br_state:='SELECTED';
1946 brstate( 324).update_allowed:='N';
1947
1948 brstate( 325).br_module:='ARBRMAIN';
1949 brstate( 325).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NUM';
1950 brstate( 325).br_state:='SELECTED';
1951 brstate( 325).update_allowed:='N';
1952
1953 brstate( 326).br_module:='ARBRMAIN';
1954 brstate( 326).br_block_item:='RMAI_HEADER.REMIT_ACCOUNT_NAME';
1955 brstate( 326).br_state:='SELECTED';
1956 brstate( 326).update_allowed:='N';
1957
1958 brstate( 327).br_module:='ARBRMAIN';
1959 brstate( 327).br_block_item:='RMAI_HEADER.GL_DATE';
1960 brstate( 327).br_state:='SELECTED';
1961 brstate( 327).update_allowed:='N';
1962
1963 brstate( 328).br_module:='ARBRMAIN';
1964 brstate( 328).br_block_item:='RMAI_HEADER.BATCH_SOURCE_NAME';
1965 brstate( 328).br_state:='SELECTED';
1966 brstate( 328).update_allowed:='N';
1967
1968 brstate( 329).br_module:='ARBRMAIN';
1969 brstate( 329).br_block_item:='RMAI_HEADER.TRANS_TYPE';
1970 brstate( 329).br_state:='SELECTED';
1971 brstate( 329).update_allowed:='N';
1972
1973 brstate( 330).br_module:='ARBRMAIN';
1974 brstate( 330).br_block_item:='RMAI_HEADER.DOC_SEQUENCE_VALUE';
1975 brstate( 330).br_state:='SELECTED';
1976 brstate( 330).update_allowed:='N';
1977
1978 brstate( 331).br_module:='ARBRMAIN';
1982
1979 brstate( 331).br_block_item:='RMAI_HEADER.COMMENTS';
1980 brstate( 331).br_state:='SELECTED';
1981 brstate( 331).update_allowed:='Y';
1983 brstate( 332).br_module:='ARBRMAIN';
1984 brstate( 332).br_block_item:='RMAI_HEADER.INVOICE_CURRENCY_CODE';
1985 brstate( 332).br_state:='SELECTED';
1986 brstate( 332).update_allowed:='N';
1987
1988 brstate( 333).br_module:='ARBRMAIN';
1989 brstate( 333).br_block_item:='RMAI_HEADER.TRX_DATE';
1990 brstate( 333).br_state:='SELECTED';
1991 brstate( 333).update_allowed:='N';
1992
1993 brstate( 334).br_module:='ARBRMAIN';
1994 brstate( 334).br_block_item:='RMAI_HEADER.BR_AMOUNT';
1995 brstate( 334).br_state:='SELECTED';
1996 brstate( 334).update_allowed:='N';
1997
1998 brstate( 335).br_module:='ARBRMAIN';
1999 brstate( 335).br_block_item:='RMAI_HEADER.TERM_DUE_DATE';
2000 brstate( 335).br_state:='SELECTED';
2001 brstate( 335).update_allowed:='N';
2002
2003 brstate( 336).br_module:='ARBRMAIN';
2004 brstate( 336).br_block_item:='RMAI_HEADER.TRX_NUMBER';
2005 brstate( 336).br_state:='SELECTED';
2006 brstate( 336).update_allowed:='N';
2007
2008 brstate( 337).br_module:='ARBRMAIN';
2009 brstate( 337).br_block_item:='RMAI_HEADER.SPECIAL_INSTRUCTIONS';
2010 brstate( 337).br_state:='SELECTED';
2011 brstate( 337).update_allowed:='Y';
2012
2013 brstate( 338).br_module:='ARBRMAIN';
2014 brstate( 338).br_block_item:='RMAI_HEADER.PRINTING_OPTION';
2015 brstate( 338).br_state:='SELECTED';
2016 brstate( 338).update_allowed:='N';
2017
2018 brstate( 339).br_module:='ARBRMAIN';
2019 brstate( 339).br_block_item:='RMAI_HEADER.OVERRIDE_REMIT_ACCOUNT_FLAG';
2020 brstate( 339).br_state:='SELECTED';
2021 brstate( 339).update_allowed:='N';
2022
2023 brstate( 340).br_module:='ARBRMAIN';
2024 brstate( 340).br_block_item:='RMAI_HEADER.CONTACT_NAME';
2025 brstate( 340).br_state:='SELECTED';
2026 brstate( 340).update_allowed:='Y';
2027
2028 brstate( 341).br_module:='ARBRMAIN';
2029 brstate( 341).br_block_item:='RMAI_HEADER.DRAWEE_NAME';
2030 brstate( 341).br_state:='SELECTED';
2031 brstate( 341).update_allowed:='N';
2032
2033 brstate( 342).br_module:='ARBRMAIN';
2034 brstate( 342).br_block_item:='RMAI_HEADER.DRAWEE_NUMBER';
2035 brstate( 342).br_state:='SELECTED';
2036 brstate( 342).update_allowed:='N';
2037
2038 brstate( 343).br_module:='ARBRMAIN';
2039 brstate( 343).br_block_item:='RMAI_HEADER.JGZZ_FISCAL_CODE';
2040 brstate( 343).br_state:='SELECTED';
2041 brstate( 343).update_allowed:='N';
2042
2043 brstate( 344).br_module:='ARBRMAIN';
2044 brstate( 344).br_block_item:='RMAI_HEADER.LOCATION';
2045 brstate( 344).br_state:='SELECTED';
2046 brstate( 344).update_allowed:='N';
2047
2048 brstate( 345).br_module:='ARBRMAIN';
2049 brstate( 345).br_block_item:='RMAI_HEADER.ADDRESS1';
2050 brstate( 345).br_state:='SELECTED';
2051 brstate( 345).update_allowed:='N';
2052
2053
2054 END IF;
2055
2056
2057
2058
2059
2060 -- br_common_status.create_currentform_table(pbr_module);
2061
2062 return brstate;
2063
2064 end load_table;
2065
2066
2067
2068
2069 FUNCTION br_seq_enterable(p_sob_id in number , p_trans_type in varchar2 , P_trx_date in date ) RETURN boolean IS
2070
2071
2072
2073 fndseqnum number:=0;
2074 docseq_id number;
2075 docseq_type fnd_document_sequences.type%TYPE;
2076 docseq_name varchar2(30);
2077 seq_ass_id number;
2078 prd_tab_name varchar2(30);
2079 aud_tab_name varchar2(30);
2080 msg_flag varchar2(30);
2081 db_seq_name varchar2(30);
2082 suppress_error varchar2(1);
2083 suppress_warn varchar2(1);
2084
2085 begin
2086
2087 IF P_trans_type IS NULL THEN
2088
2089 RETURN FALSE;
2090
2091 END IF;
2092
2093
2094 FNDSEQNUM:=FND_SEQNUM.GET_SEQ_INFO(app_id=>222 ,
2095 cat_code=>p_trans_type ,
2096 sob_id=>p_sob_id ,
2097 met_code=>'M' ,
2098 trx_date=>NVL(p_trx_date , TRUNC(sysdate)) ,
2099 docseq_id=>docseq_id ,
2100 docseq_type=>docseq_type,
2101 docseq_name=>docseq_name ,
2102 db_seq_name=>db_seq_name ,
2103 seq_ass_id=>seq_ass_id ,
2104 prd_tab_name=>prd_tab_name ,
2105 aud_tab_name=>aud_tab_name ,
2106 msg_flag=>msg_flag,
2107 suppress_error=>'Y' ,
2108 suppress_warn=>'Y');
2109
2110 /* If we have sequence success SEQSUCC and if the document sequence type is manual then a sequence number should
2111 be entered by the user otherwise the user should not be allowed to enter the field */
2112
2113 IF fndseqnum = fnd_seqnum.seqsucc THEN
2114
2115 IF docseq_type in ('A' , 'G' ) THEN
2116 RETURN FALSE;
2117 ELSIF docseq_type in ('M') THEN
2118 RETURN TRUE;
2119 ELSE
2120 RETURN FALSE;
2121 END IF;
2122 ELSE
2123
2124 RETURN FALSE;
2125
2126 END IF;
2127
2128 end br_seq_enterable;
2129
2130 --
2131 -- Returns POSTED if the bill has been posted to GL
2132 --
2133
2137
2134 FUNCTION br_posted (p_customer_trx_id in NUMBER) RETURN VARCHAR2 IS
2135
2136 customer_trx_id ra_customer_trx.customer_trx_id%TYPE;
2138
2139 Cursor Cposted (CustomerTrxId NUMBER) IS SELECT
2140 customer_trx_id
2141 from ar_transaction_history
2142 where customer_trx_id = CUSTOMERTRXID
2143 and posting_control_id <> -3
2144 and gl_posted_date IS NOT NULL;
2145
2146 begin
2147
2148 open Cposted(p_customer_trx_id);
2149
2150 fetch Cposted into Customer_trx_id;
2151
2152 if Cposted%FOUND THEN
2153 close Cposted;
2154 return 'POSTED';
2155 ELSE
2156 close Cposted;
2157 return 'XX';
2158 END IF;
2159
2160 END br_posted;
2161
2162 FUNCTION br_selected(p_customer_trx_id in number) return VARCHAR2 IS
2163
2164 cursor Cselremit(CustomerTrxId NUMBER)
2165 IS SELECT
2166 customer_trx_id
2167 FROM
2168 ar_batches b ,
2169 ar_payment_schedules p
2170 where p.customer_trx_id = CUSTOMERTRXID
2171 and p.reserved_type = 'REMITTANCE'
2172 and p.reserved_value=b.batch_id
2173 and b.status='OP';
2174
2175
2176 dummy number;
2177
2178 BEGIN
2179
2180 open Cselremit(p_customer_trx_id);
2181
2182 fetch Cselremit into dummy;
2183
2184 IF Cselremit%FOUND THEN
2185 CLOSE CselREMIT;
2186 RETURN 'SELECTED';
2187 ELSE
2188
2189 CLOSE CselREMIT;
2190 RETURN 'XX';
2191
2192 END IF;
2193
2194 END br_selected;
2195
2196 FUNCTION fetch_assignments(
2197 Customer_trx_id IN NUMBER,
2198 Drawee_id IN NUMBER,
2199 Pay_unrelated_invoices IN VARCHAR2,
2200 pg_where_clause IN VARCHAR2,
2201 pg_order_clause IN VARCHAR2,
2202 p_le_id IN NUMBER,
2203 AssignMentAmount IN NUMBER,
2204 AssignTab IN OUT NOCOPY AssignTabTyp,
2205 Extended_total OUT NOCOPY NUMBER)
2206 RETURN BOOLEAN IS
2207
2208 TYPE AssignCurTyp IS REF CURSOR;
2209 AssignCur AssignCurTyp;
2210 TempAssignRec AssignRecTyp;
2211 TotalSoFar NUMBER;
2212 AssignCurStr VARCHAR2(8000);
2213 J INTEGER:=0;
2214 NewTotal NUMBER;
2215 br_currency VARCHAR2(15);
2216 br_trxdate VARCHAR2(30);
2217 br_trxid NUMBER;
2218
2219 BEGIN
2220
2221 IF PG_DEBUG in ('Y', 'C') THEN
2222 arp_util.debug('fetch_assignments()+');
2223 arp_util.debug( 'Dump out NOCOPY the parameters :');
2224 arp_util.debug( 'Customer_trx_id :'||Customer_trx_id);
2225 arp_util.debug( 'Drawee_id :'||Drawee_id);
2226 arp_util.debug( 'Pay_unrelated_invoices :'||Pay_unrelated_invoices);
2227 arp_util.debug( 'pg_where_clause :'|| pg_where_clause );
2228 arp_util.debug( 'p_le_id:'|| p_le_id);
2229 arp_util.debug( 'pg_order_clause :' || pg_order_clause );
2230 arp_util.debug( 'AssignmentAmount :'|| AssignMentAmount );
2231 END IF;
2232
2233 /* LE - R12 : add trx.legal_entity_id as a condition */
2234 /* modified for tca update */
2235 /* bug 1637367 Removed ; introduced in 115.11 (modifications for TCA update) */
2236 /* #1 retrieve the existing assignments to this BR */
2237
2238 AssignCurStr:=
2239 'Select
2240 TRX.trx_number,
2241 TRX.doc_sequence_value,
2242 TRX.trx_date,
2243 TRX.comments,
2244 TRX.purchase_order,
2245 TRX.invoice_currency_code,
2246 LINES.customer_trx_id,
2247 NULL,
2248 PAYS.amount_due_original,
2249 PAYS.amount_due_remaining,
2250 PAYS.acctd_amount_due_remaining,
2251 PAYS.due_date,
2252 PAYS.exchange_rate,
2253 PAYS.terms_sequence_number,
2254 PARTY.jgzz_fiscal_code,
2255 CUST_ACCT.account_number,
2256 substrb(party.party_name,1,50),
2257 CUST_ACCT.customer_class_code,
2258 PARTY.category_code,
2259 ARPT_SQL_FUNC_UTIL.get_lookup_meaning(''CUSTOMER_CATEGORY'', party.category_code),
2260 ARPT_SQL_FUNC_UTIL.get_trx_type_details(TRX.cust_trx_type_id,''NAME''),
2261 ARPT_SQL_FUNC_UTIL.get_lookup_meaning(''INV/CM'', types.type),
2262 ARPT_SQL_FUNC_UTIL.get_trx_type_details(TRX.cust_trx_type_id,''TYPE''),
2263 METH.name,
2264 METH.receipt_method_id,
2265 SITE.location,
2266 TRX.bill_to_site_use_id,
2267 ABB.bank_name,
2268 ABB.branch_party_id bank_branch_id,
2269 ABA.bank_account_id,
2270 CONS.cons_billing_number,
2271 CONS.cons_inv_id,
2272 LINES.br_ref_customer_trx_id,
2273 LINES.br_ref_payment_schedule_id,
2274 LINES.extended_amount,
2275 LINES.extended_acctd_amount,
2276 LINES.customer_trx_line_id
2277 FROM
2278 RA_CUSTOMER_TRX TRX ,
2279 RA_CUST_TRX_TYPES TYPES,
2280 AR_PAYMENT_SCHEDULES PAYS ,
2281 HZ_CUST_ACCOUNTS CUST_ACCT ,
2282 HZ_PARTIES PARTY,
2283 AR_RECEIPT_METHODS METH,
2284 CE_BANK_BRANCHES_V ABB,
2285 HZ_CUST_SITE_USES SITE,
2286 AP_BANK_ACCOUNTS ABA,
2287 RA_CUSTOMER_TRX_LINES LINES ,
2288 AR_CONS_INV_ALL CONS
2289 WHERE trx.legal_entity_id = ' || p_le_id ||
2290 ' and trx.bill_to_customer_id = cust_acct.cust_account_id
2291 and trx.cust_trx_type_id = types.cust_trx_type_id
2292 and cust_acct.party_id = party.party_id
2293 and trx.customer_trx_id = pays.customer_trx_id
2294 and pays.payment_schedule_id = lines.br_ref_payment_schedule_id
2295 and site.site_use_id = trx.bill_to_site_use_id
2299 and trx.receipt_method_id = meth.receipt_method_id (+)
2296 and trx.customer_bank_account_id = aba.bank_account_id (+)
2297 and aba.bank_branch_id = abb.branch_party_id (+)
2298 and cons.cons_inv_id(+) = pays.cons_inv_id
2300 and lines.customer_trx_id = '|| Customer_trx_id;
2301
2302 TotalSoFar := 0;
2303
2304 IF PG_DEBUG in ('Y', 'C') THEN
2305 arp_util.debug( 'Inserting the existing assignments into the table ');
2306 END IF;
2307
2308 OPEN AssignCur FOR AssignCurStr;
2309 LOOP
2310 FETCH AssignCur INTO TempAssignRec;
2311 EXIT WHEN AssignCur%NOTFOUND;
2312
2313 Assigntab(AssignCur%ROWCOUNT) := TempAssignRec;
2314
2315 TotalSoFar := TotalSoFar+NVL(TempAssignRec.Extended_amount , 0);
2316
2317 /* increment record count */
2318 j := j + 1;
2319 END LOOP;
2320 CLOSE AssignCur;
2321
2322 /* bug 2201843 :
2323 1) eliminate join to RA_CUSTOMER_TRX billsrec by storing BR's currency and
2324 trxdate of the BR in local variables br_currency and br_trxdate
2325 2) replace TRX.drawee_id = cust_acct.cust_account_id OR
2326 TRX.bill_to_customer_id = cust_acct.cust_account_id
2327 with decode to avoid full scan on HZ_CUST_ACCOUNTS
2328 3) use arpt_sql_func_util to eliminate join to ar_lookups
2329
2330 bug 1853587 :
2331 In not exists clause below, we are excluding all transactions that have
2332 already been assigned to a BR.
2333 An open transaction can be exchanged for a BR if :
2334 - it has not yet been assigned to this BR
2335 (this prevents one trx from being assigned to the same BR twice) OR
2336 - if it is assigned to another BR but it still has an outstanding amount
2337 */
2338
2339 br_trxid := customer_trx_id;
2340
2341 --Ajay bye passed the GSCC check.
2342 select '''' || invoice_currency_code ||'''',
2343 'to_dat'||'e(''' ||trx_date||''')'
2344 into br_currency,
2345 br_trxdate
2346 from ra_customer_trx
2347 where customer_trx_id = br_trxid;
2348
2349 /* get all non-BR transactions that can be assigned to this BR */
2350
2351 IF PG_DEBUG in ('Y', 'C') THEN
2352 arp_util.debug( 'Inserting the new assignments ');
2353 END IF;
2354
2355 /* bug 2473700 : for quick assign, show current balance due for invoices */
2356 /* modified for tca update */
2357 /* bug7046838 : Modified the query for performance improvement. */
2358 AssignCurStr:=
2359 'Select
2360 TRX.trx_number,
2361 TRX.doc_sequence_value,
2362 TRX.trx_date,
2363 TRX.comments,
2364 TRX.purchase_order,
2365 TRX.invoice_currency_code,
2366 NULL,
2367 NULL,
2368 PAYS.amount_due_original,
2369 -- bug 2473700 NULL,
2370 PAYS.amount_due_remaining,
2371 NULL,
2372 PAYS.due_date,
2373 PAYS.exchange_rate,
2374 PAYS.terms_sequence_number,
2375 PARTY.jgzz_fiscal_code,
2376 CUST_ACCT.account_number,
2377 substrb(PARTY.PARTY_name,1,50),
2378 CUST_ACCT.customer_class_code,
2379 PARTY.category_code,
2380 ARPT_SQL_FUNC_UTIL.get_lookup_meaning(''CUSTOMER_CATEGORY'', party.category_code),
2381 ARPT_SQL_FUNC_UTIL.get_trx_type_details(TRX.cust_trx_type_id,''NAME''),
2382 ARPT_SQL_FUNC_UTIL.get_lookup_meaning(''INV/CM'', types.type),
2383 ARPT_SQL_FUNC_UTIL.get_trx_type_details(TRX.cust_trx_type_id,''TYPE''),
2384 METH.name,
2385 METH.receipt_method_id,
2386 SITE.location,
2387 TRX.bill_to_site_use_id,
2388 ABB.bank_name,
2389 ABB.branch_party_id bank_branch_id,
2390 ABA.bank_account_id,
2391 NULL,
2392 NULL,
2393 TRX.customer_trx_id, /* br_ref_customer_trx_id */
2394 PAYS.payment_schedule_id, /* br_ref_payment_schedule_id */
2395 PAYS.amount_due_remaining, /* Extended Amount */
2396 PAYS.acctd_amount_due_remaining, /* Extended Acctd Amount */
2397 NULL /* Customer_trx_line_id */
2398 FROM
2399 RA_CUST_TRX_TYPES TYPES,
2400 RA_CUSTOMER_TRX TRX ,
2401 AR_PAYMENT_SCHEDULES PAYS ,
2402 HZ_CUST_ACCOUNTS CUST_ACCT ,
2403 HZ_PARTIES PARTY,
2404 AR_receipt_METHODS METH,
2405 CE_BANK_BRANCHES_V ABB,
2406 HZ_CUST_SITE_USES SITE,
2407 ap_bank_accounts ABA
2408 where trx.legal_entity_id = ' || p_le_id ||
2409 ' and decode(pays.class,''BR'', TRX.drawee_id, TRX.bill_to_customer_id) = cust_acct.cust_account_id
2410 and CUST_ACCT.party_id = PARTY.party_id
2411 and TRX.customer_trx_id = PAYS.customer_trx_id
2412 and TRX.cust_trx_type_id = TYPES.cust_trx_type_id
2413 and PAYS.reserved_type IS NULL
2414 and PAYS.amount_due_remaining <> 0
2415 and SITE.SITE_USE_ID = TRX.BILL_TO_SITE_USE_ID
2416 and TRX.CUSTOMER_BANK_ACCOUNT_ID = ABA.BANK_ACCOUNT_ID (+)
2417 and ABA.BANK_BRANCH_ID = ABB.branch_party_id (+)
2418 and trx.receipt_method_id = meth.receipt_method_id (+)
2419 and PAYS.selected_for_receipt_batch_id is null
2420 and not exists
2421 (select 1
2422 from ra_customer_trx_lines sub,
2423 ar_payment_schedules ps
2424 where sub.br_ref_customer_trx_id = TRX.customer_trx_id
2425 and ps.customer_trx_id = trx.customer_trx_id
2426 and ( ( ps.amount_due_remaining = 0 and
2430 ' and trx.trx_date <= ' || br_trxdate;
2427 sub.customer_trx_id <> ' || customer_trx_id || ' )' ||
2428 ' OR (sub.customer_trx_id = ' || customer_trx_id || ' )))' ||
2429 ' and trx.invoice_currency_code = ' || br_currency ||
2431
2432 /* modified for tca update */
2433 if PAY_UNRELATED_INVOICES = 'N' THEN
2434 AssignCurStr := AssignCurStr ||
2435 ' and trx.bill_to_customer_id in (
2436 SELECT rr.related_cust_account_id
2437 FROM hz_cust_acct_relate rr
2438 WHERE rr.cust_account_id = ' || drawee_id ||
2439 ' and rr.related_cust_account_id = trx.bill_to_customer_id
2440 and rr.bill_to_flag = ''Y'' ' ||
2441 ' UNION ' ||
2442 ' SELECT ' || drawee_id || ' from dual ' ||
2443 ' UNION ' ||
2444 ' SELECT rel.related_cust_account_id
2445 FROM ar_paying_relationships_v rel,
2446 hz_cust_accounts acc
2447 WHERE rel.party_id = acc.party_id
2448 AND rel.related_cust_account_id = trx.bill_to_customer_id
2449 AND acc.cust_account_id = ' || drawee_id ||
2450 ' AND ' || br_trxdate || ' BETWEEN effective_start_date
2451 AND effective_end_date) ';
2452
2453 end if;
2454
2455 AssignCurStr:= AssignCurStr || pg_where_clause;
2456
2457 /* get all BR transactions that can be assigned to this BR */
2458 /* bug 2473700 : for quick assign, show current balance due for invoices */
2459 /* modified for tca update */
2460 AssignCurStr:=AssignCurStr||
2461 'UNION Select
2462 TRX.trx_number,
2463 TRX.doc_sequence_value,
2464 TRX.trx_date,
2465 TRX.comments,
2466 TRX.purchase_order,
2467 TRX.invoice_currency_code,
2468 NULL,
2469 NULL,
2470 PAYS.amount_due_original,
2471 -- Bug 2473700 NULL,
2472 PAYS.amount_due_remaining,
2473 NULL,
2474 PAYS.due_date,
2475 PAYS.exchange_rate,
2476 PAYS.terms_sequence_number,
2477 PARTY.jgzz_fiscal_code,
2478 CUST_ACCT.account_number,
2479 substrb(party.party_name,1,50),
2480 CUST_ACCT.customer_class_code,
2481 PARTY.category_code,
2482 ARPT_SQL_FUNC_UTIL.get_lookup_meaning(''CUSTOMER_CATEGORY'', party.category_code),
2483 ARPT_SQL_FUNC_UTIL.get_trx_type_details(TRX.cust_trx_type_id,''NAME''),
2484 ARPT_SQL_FUNC_UTIL.get_lookup_meaning(''INV/CM'', types.type),
2485 ARPT_SQL_FUNC_UTIL.get_trx_type_details(TRX.cust_trx_type_id,''TYPE''),
2486 METH.name,
2487 METH.receipt_method_id,
2488 SITE.location,
2489 TRX.bill_to_site_use_id,
2490 ABB.bank_name,
2491 ABB.branch_party_id bank_branch_id,
2492 ABA.bank_account_id,
2493 NULL,
2494 NULL,
2495 TRX.customer_trx_id, /* br_ref_customer_trx_id */
2496 PAYS.payment_schedule_id, /* br_ref_payment_schedule_id */
2497 PAYS.amount_due_remaining, /* Extended Amount */
2498 PAYS.acctd_amount_due_remaining, /* Extended Acctd Amount */
2499 NULL /* Customer_TRX_LINE_ID */
2500 FROM
2501 RA_CUST_TRX_TYPES TYPES,
2502 RA_CUSTOMER_TRX TRX ,
2503 AR_PAYMENT_SCHEDULES PAYS ,
2504 HZ_CUST_ACCOUNTS CUST_ACCT ,
2505 HZ_PARTIES PARTY,
2506 AR_receipt_METHODS METH,
2507 CE_BANK_BRANCHES_V ABB,
2508 HZ_CUST_SITE_USES SITE,
2509 ap_bank_accounts ABA,
2510 AR_TRANSACTION_HISTORY H
2511 where trx.legal_entity_id = ' || p_le_id ||
2512 ' and TRX.drawee_id = cust_acct.cust_account_id
2513 and cust_acct.party_id = party.party_id
2514 and TRX.customer_trx_id = PAYS.customer_trx_id
2515 and TRX.cust_trx_type_id = TYPES.cust_trx_type_id
2516 and PAYS.amount_due_remaining <> 0
2517 and PAYS.amount_due_remaining = TRX.br_amount
2518 and PAYS.selected_for_receipt_batch_id is null
2519 and SITE.SITE_USE_ID = TRX.drawee_site_use_id
2520 and TRX.CUSTOMER_BANK_ACCOUNT_ID = ABA.BANK_ACCOUNT_ID (+)
2521 and ABA.BANK_BRANCH_ID = ABB.branch_party_id (+)
2522 and trx.receipt_method_id = meth.receipt_method_id (+)
2523 and H.customer_trx_id = TRX.customer_trx_id
2524 and H.current_record_flag = ''Y''
2525 and H.status = ''UNPAID''
2526 and not exists
2527 (select 1
2528 from ra_customer_trx_lines linesub,
2529 ar_payment_schedules paysub ,
2530 ra_customer_trx billsub
2531 where linesub.br_ref_customer_trx_id = TRX.customer_trx_id
2532 and linesub.customer_trx_id = billsub.customer_trx_id
2533 and billsub.customer_trx_id = paysub.customer_trx_id
2534 and (paysub.reserved_type is not null OR billsub.br_on_hold_flag = ''Y''))
2535 and trx.invoice_currency_code = ' || br_currency ||
2536 ' and trx.trx_date <= ' || br_trxdate;
2537
2538 /* modified for tca update */
2539 if PAY_UNRELATED_INVOICES='N' THEN
2540 AssignCurStr := AssignCurStr||
2541 ' and TRX.drawee_id in (
2542 SELECT rr.related_cust_account_id
2543 FROM hz_cust_acct_relate rr
2544 WHERE rr.cust_account_id = ' || drawee_id ||
2545 ' and rr.related_cust_account_id = trx.bill_to_customer_id
2546 and rr.bill_to_flag = ''Y'' ' ||
2547 ' UNION ' ||
2548 ' SELECT ' || drawee_id || ' from dual ' ||
2549 ' UNION ' ||
2550 ' SELECT rel.related_cust_account_id
2551 FROM ar_paying_relationships_v rel,
2552 hz_cust_accounts acc
2553 WHERE rel.party_id = acc.party_id
2554 AND rel.related_cust_account_id = trx.bill_to_customer_id
2555 AND acc.cust_account_id = ' || drawee_id ||
2556 ' AND ' || br_trxdate || ' BETWEEN effective_start_date
2557 AND effective_end_date) ';
2558
2559 end if;
2560
2561 AssignCurStr:=AssignCurStr||pg_where_clause||' '||pg_order_clause;
2562
2563 IF PG_DEBUG in ('Y', 'C') THEN
2564 arp_util.debug( 'AssignCurStr : ' || AssignCurStr);
2565 END IF;
2566 /* Now we retrieve all transactions that can be assigned to this BR */
2567
2568 OPEN AssignCur FOR AssignCurStr;
2569 LOOP
2570
2571 FETCH AssignCur INTO TempAssignRec;
2572 EXIT WHEN AssignCur%NOTFOUND;
2573
2574 NewTotal := TotalSoFar + NVL(TempAssignRec.Extended_amount , 0);
2575
2576 /* Bug 1421967 Remove functionality to assign up to an amount */
2577 /* EXIT WHEN AssignmentAmount < NewTotal; */
2578
2579 Assigntab(AssignCur%ROWCOUNT+ J ) := TempAssignRec;
2580 TotalSoFar := TotalSoFar + NVL(TempAssignRec.Extended_Amount , 0);
2581
2582 END LOOP;
2583
2584 Extended_total:=TotalSoFar;
2585
2586 IF AssignCur%ROWCOUNT>0 THEN
2587 CLOSE AssignCur;
2588 RETURN TRUE;
2589 ELSE
2590 CLOSE AssignCur;
2591 RETURN FALSE;
2592 END IF;
2593
2594 END Fetch_assignments;
2595
2596 /*===========================================================================+
2597 | FUNCTION |
2598 | revision |
2599 | |
2600 | DESCRIPTION |
2601 | This function returns the revision number of this package. |
2602 | |
2603 | SCOPE - PUBLIC |
2604 | |
2605 | RETURNS : Revision number of this package |
2606 | |
2607 | MODIFICATION HISTORY |
2608 | 10 JAN 2001 John HALL Created |
2609 +===========================================================================*/
2610 FUNCTION revision RETURN VARCHAR2 IS
2611 BEGIN
2612 RETURN '$Revision: 120.10.12010000.3 $';
2613 END revision;
2614
2615
2616 END;