51: END IF;
52:
53: -- Initialize message list if p_init_msg_list is set to TRUE.
54: IF FND_API.to_Boolean( p_init_msg_list ) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57:
58: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
59: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
144: COMMIT WORK;
145: END IF;
146:
147: -- Standard call to get message count and IF count is get message info.
148: FND_MSG_PUB.Count_And_Get
149: (p_count => x_msg_count,
150: p_data => x_msg_data );
151:
152: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
158: WHEN FND_API.G_EXC_ERROR THEN
159: ROLLBACK TO Create_Repair_Milestone;
160: x_return_status := FND_API.G_RET_STS_ERROR;
161:
162: FND_MSG_PUB.Count_And_Get
163: (p_count => x_msg_count,
164: p_data => x_msg_data );
165:
166: -- save message in debug log
173: ROLLBACK TO Create_Repair_Milestone;
174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
175:
176: -- save message in fnd stack
177: IF FND_MSG_PUB.Check_Msg_Level
178: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
181: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
174: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
175:
176: -- save message in fnd stack
177: IF FND_MSG_PUB.Check_Msg_Level
178: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
181: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
182: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
178: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
181: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
182: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
183: end if;
184: FND_MSG_PUB.Add_Exc_Msg
185: (G_PKG_NAME ,
186: lc_api_name );
180: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
181: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
182: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
183: end if;
184: FND_MSG_PUB.Add_Exc_Msg
185: (G_PKG_NAME ,
186: lc_api_name );
187: END IF;
188:
185: (G_PKG_NAME ,
186: lc_api_name );
187: END IF;
188:
189: FND_MSG_PUB.Count_And_Get
190: ( p_count => x_msg_count,
191: p_data => x_msg_data );
192:
193: -- save message in debug log
200: ROLLBACK TO Create_Repair_Milestone;
201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
202:
203: -- save message in fnd stack
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
206: THEN
207: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
208: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
202:
203: -- save message in fnd stack
204: IF FND_MSG_PUB.Check_Msg_Level
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
206: THEN
207: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
208: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
209: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
205: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
206: THEN
207: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
208: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
209: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
210: end if;
211: FND_MSG_PUB.Add_Exc_Msg
212: (G_PKG_NAME ,
213: lc_api_name );
207: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
208: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
209: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
210: end if;
211: FND_MSG_PUB.Add_Exc_Msg
212: (G_PKG_NAME ,
213: lc_api_name );
214: END IF;
215:
212: (G_PKG_NAME ,
213: lc_api_name );
214: END IF;
215:
216: FND_MSG_PUB.Count_And_Get
217: (p_count => x_msg_count,
218: p_data => x_msg_data );
219:
220: -- save message in debug log
272: END IF;
273:
274: -- Initialize message list if p_init_msg_list is set to TRUE.
275: IF FND_API.to_Boolean( p_init_msg_list ) THEN
276: FND_MSG_PUB.initialize;
277: END IF;
278:
279: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
369: COMMIT WORK;
370: END IF;
371:
372: -- Standard call to get message count and IF count is get message info.
373: FND_MSG_PUB.Count_And_Get
374: (p_count => x_msg_count,
375: p_data => x_msg_data );
376:
377: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
383: WHEN FND_API.G_EXC_ERROR THEN
384: ROLLBACK TO Update_Repair_Milestone;
385: x_return_status := FND_API.G_RET_STS_ERROR;
386:
387: FND_MSG_PUB.Count_And_Get
388: (p_count => x_msg_count,
389: p_data => x_msg_data );
390:
391: -- save message in debug log
397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
398: ROLLBACK TO Update_Repair_Milestone;
399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
400:
401: IF FND_MSG_PUB.Check_Msg_Level
402: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
403: THEN
404: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
398: ROLLBACK TO Update_Repair_Milestone;
399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
400:
401: IF FND_MSG_PUB.Check_Msg_Level
402: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
403: THEN
404: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
406: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
402: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
403: THEN
404: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
406: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
407: end if;
408: FND_MSG_PUB.Add_Exc_Msg
409: (G_PKG_NAME ,
410: lc_api_name );
404: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
406: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
407: end if;
408: FND_MSG_PUB.Add_Exc_Msg
409: (G_PKG_NAME ,
410: lc_api_name );
411: END IF;
412:
409: (G_PKG_NAME ,
410: lc_api_name );
411: END IF;
412:
413: FND_MSG_PUB.Count_And_Get
414: ( p_count => x_msg_count,
415: p_data => x_msg_data );
416:
417: -- save message in debug log
424: ROLLBACK TO Update_Repair_Milestone;
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
426:
427: -- save message in fnd stack
428: IF FND_MSG_PUB.Check_Msg_Level
429: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
432: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
426:
427: -- save message in fnd stack
428: IF FND_MSG_PUB.Check_Msg_Level
429: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
432: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
433: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
429: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
430: THEN
431: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
432: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
433: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
434: end if;
435: FND_MSG_PUB.Add_Exc_Msg
436: (G_PKG_NAME ,
437: lc_api_name );
431: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
432: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
433: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
434: end if;
435: FND_MSG_PUB.Add_Exc_Msg
436: (G_PKG_NAME ,
437: lc_api_name );
438: END IF;
439:
436: (G_PKG_NAME ,
437: lc_api_name );
438: END IF;
439:
440: FND_MSG_PUB.Count_And_Get
441: (p_count => x_msg_count,
442: p_data => x_msg_data );
443:
444: -- save message in debug log
492: END IF;
493:
494: -- Initialize message list if p_init_msg_list is set to TRUE.
495: IF FND_API.to_Boolean( p_init_msg_list ) THEN
496: FND_MSG_PUB.initialize;
497: END IF;
498:
499: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
556: COMMIT WORK;
557: END IF;
558:
559: -- Standard call to get message count and IF count is get message info.
560: FND_MSG_PUB.Count_And_Get
561: (p_count => x_msg_count,
562: p_data => x_msg_data );
563:
564: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
572: ROLLBACK TO Delete_Repair_Milestone;
573:
574: x_return_status := FND_API.G_RET_STS_ERROR;
575:
576: FND_MSG_PUB.Count_And_Get
577: (p_count => x_msg_count,
578: p_data => x_msg_data );
579:
580: -- save message in debug log
587: ROLLBACK TO Delete_Repair_Milestone;
588:
589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
590:
591: IF FND_MSG_PUB.Check_Msg_Level
592: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
593: THEN
594: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
595: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
588:
589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
590:
591: IF FND_MSG_PUB.Check_Msg_Level
592: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
593: THEN
594: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
595: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
596: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
592: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
593: THEN
594: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
595: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
596: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
597: end if;
598: FND_MSG_PUB.Add_Exc_Msg
599: (G_PKG_NAME ,
600: lc_api_name );
594: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
595: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
596: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
597: end if;
598: FND_MSG_PUB.Add_Exc_Msg
599: (G_PKG_NAME ,
600: lc_api_name );
601: END IF;
602:
599: (G_PKG_NAME ,
600: lc_api_name );
601: END IF;
602:
603: FND_MSG_PUB.Count_And_Get
604: ( p_count => x_msg_count,
605: p_data => x_msg_data );
606:
607: -- save message in debug log
615:
616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
617:
618: -- save message in fnd stack
619: IF FND_MSG_PUB.Check_Msg_Level
620: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
621: THEN
622: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
617:
618: -- save message in fnd stack
619: IF FND_MSG_PUB.Check_Msg_Level
620: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
621: THEN
622: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
624: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
620: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
621: THEN
622: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
624: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
625: end if;
626: FND_MSG_PUB.Add_Exc_Msg
627: (G_PKG_NAME ,
628: lc_api_name );
622: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
623: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
624: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
625: end if;
626: FND_MSG_PUB.Add_Exc_Msg
627: (G_PKG_NAME ,
628: lc_api_name );
629: END IF;
630:
627: (G_PKG_NAME ,
628: lc_api_name );
629: END IF;
630:
631: FND_MSG_PUB.Count_And_Get
632: (p_count => x_msg_count,
633: p_data => x_msg_data );
634:
635: -- save message in debug log
684: END IF;
685:
686: -- Initialize message list if p_init_msg_list is set to TRUE.
687: IF FND_API.to_Boolean( p_init_msg_list ) THEN
688: FND_MSG_PUB.initialize;
689: END IF;
690:
691: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
692: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
756: COMMIT WORK;
757: END IF;
758:
759: -- Standard call to get message count and IF count is get message info.
760: FND_MSG_PUB.Count_And_Get
761: (p_count => x_msg_count,
762: p_data => x_msg_data );
763:
764: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
771: WHEN FND_API.G_EXC_ERROR THEN
772: ROLLBACK TO Lock_Repair_Milestone;
773: x_return_status := FND_API.G_RET_STS_ERROR;
774:
775: FND_MSG_PUB.Count_And_Get
776: (p_count => x_msg_count,
777: p_data => x_msg_data );
778:
779: -- save message in debug log
785: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
786: ROLLBACK TO Lock_Repair_Milestone;
787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
788:
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
793: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
786: ROLLBACK TO Lock_Repair_Milestone;
787: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
788:
789: IF FND_MSG_PUB.Check_Msg_Level
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
793: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
794: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
790: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
791: THEN
792: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
793: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
794: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
795: end if;
796: FND_MSG_PUB.Add_Exc_Msg
797: (G_PKG_NAME ,
798: lc_api_name );
792: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
793: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
794: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
795: end if;
796: FND_MSG_PUB.Add_Exc_Msg
797: (G_PKG_NAME ,
798: lc_api_name );
799: END IF;
800:
797: (G_PKG_NAME ,
798: lc_api_name );
799: END IF;
800:
801: FND_MSG_PUB.Count_And_Get
802: ( p_count => x_msg_count,
803: p_data => x_msg_data );
804:
805: -- save message in debug log
812: ROLLBACK TO Lock_Repair_Milestone;
813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814:
815: -- save message in fnd stack
816: IF FND_MSG_PUB.Check_Msg_Level
817: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
818: THEN
819: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
820: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814:
815: -- save message in fnd stack
816: IF FND_MSG_PUB.Check_Msg_Level
817: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
818: THEN
819: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
820: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
821: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
817: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
818: THEN
819: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
820: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
821: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
822: end if;
823: FND_MSG_PUB.Add_Exc_Msg
824: (G_PKG_NAME ,
825: lc_api_name );
819: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
820: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
821: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
822: end if;
823: FND_MSG_PUB.Add_Exc_Msg
824: (G_PKG_NAME ,
825: lc_api_name );
826: END IF;
827:
824: (G_PKG_NAME ,
825: lc_api_name );
826: END IF;
827:
828: FND_MSG_PUB.Count_And_Get
829: (p_count => x_msg_count,
830: p_data => x_msg_data );
831:
832: -- save message in debug log