5: IS
6: l_length NUMBER;
7: l_start NUMBER := 1;
8: l_substring VARCHAR2(77);
9: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
10: BEGIN
11: IF l_debug THEN
12: AS_UTILITY_PVT.Debug_Message(p_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, msg);
13: ELSE
8: l_substring VARCHAR2(77);
9: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
10: BEGIN
11: IF l_debug THEN
12: AS_UTILITY_PVT.Debug_Message(p_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, msg);
13: ELSE
14: -- chop the message to 77 long
15: l_length := length(msg);
16: WHILE l_length > 77 LOOP